Ajuste na verificação de licenças quando houver falha com a licença o sistema so permitirá login com usuario admin e só irá carregar o menu de configurações para inserção de uma licença e o menu de sair do sistema.
upper( dbo.sip_remove_acentos(b.PrimeiroNome)) as contato_nome,
lower( dbo.sip_remove_acentos(coalesce(b.Email1, b.Email2, Email))) as contato_email,
coalesce(b.Celular, b.TelefoneComercial, b.TelefoneResidencial, a.Telefone) as contato_fone,
0 as perfil_aplicacao_id,
dbo.FormataData(d.DataAssinatura) as contrato_assinatura,
dbo.FormataData(d.DataInicio) as contrato_inicio,
dbo.FormataData(d.DataFim) as contrato_fim,
isnull((
select sum( cast(ContratosItens.Quantidade as int))
from ContratosItens
inner join Produtos on Produtos.ProdutoId = ContratosItens.ProdutoId
inner join Linhas on Linhas.LinhaId = Produtos.LinhaId and Linhas.LinhaId = 32
inner join Divisoes on Divisoes.DivisaoId = Linhas.DivisaoId and Divisoes.DivisaoId = 11
where ContratosItens.ContratoId = d.ContratoId
and Produtos.Referencia like '%AG-P%(%PA)%' OR Produtos.Referencia like '%ISP-P%(%PA)%' OR Produtos.Referencia like '%SX-P%(%PA)%' OR Produtos.Referencia like '%SMT-P%(%PA)%'
),0) as licenca_pa,
isnull((
select sum( cast(ContratosItens.Quantidade as int))
from ContratosItens
inner join Produtos on Produtos.ProdutoId = ContratosItens.ProdutoId
inner join Linhas on Linhas.LinhaId = Produtos.LinhaId and Linhas.LinhaId = 32
inner join Divisoes on Divisoes.DivisaoId = Linhas.DivisaoId and Divisoes.DivisaoId = 11
where ContratosItens.ContratoId = d.ContratoId
and Produtos.Referencia like '%AG-R%(%RAMAL)%' OR Produtos.Referencia like '%ISP-R%(%RAMAL)%' OR Produtos.Referencia like '%SX-R%(%RAMAL)%' OR Produtos.Referencia like '%SMT-R%(%RAMAL)%'), 0) as licenca_ramal,
isnull ((select sum( cast(ContratosItens.Quantidade as int))
from ContratosItens
inner join Produtos on Produtos.ProdutoId = ContratosItens.ProdutoId
inner join Linhas on Linhas.LinhaId = Produtos.LinhaId and Linhas.LinhaId = 32
inner join Divisoes on Divisoes.DivisaoId = Linhas.DivisaoId and Divisoes.DivisaoId = 11
where ContratosItens.ContratoId = d.ContratoId
and Produtos.Referencia like '%LICENCA DE SUPERVISOR%'), 0) as licenca_supervisor,
0 as licenca_discador_preview,
0 as licenca_discador_powerdial,
0 as licenca_discador_predictive,
0 as licenca_pesquisa,
0 as licenca_tarifador,
0 as licenca_whatsapp,
0 as licenca_workflow,
0 as licenca_mesaoperadora,
0 as mult_channel,
0 as licenca_helpdesk,
0 as licenca_crm,
0 as licenca_manager_one,
0 as licenca_help_custom,
'$data' as data_registro,
0 as user_registro,
0 as server_registro,
'$data' as confirma_registro
from Clientes a
inner join Contatos b on b.ClienteId = a.ClienteId
inner join RamosDeAtividade c on c.RamoDeAtividadeId = a.RamoDeAtividadeId
inner join Contratos d on d.ClienteId = a.ClienteId
inner join ClientesEnderecos f on f.ClienteId = a.ClienteId and f.TipoDeEnderecoId = (select min(TipoDeEnderecoId) from ClientesEnderecos where ClienteId = a.ClienteId)