TMS – Balancete de Verificação – Query do relatório de Balancete de Verificação
Dúvida
Qual é a query utilizada para gerar o relatório Balancete de Verificação, no Contábil?
Solução
Para gerar o Balancete de Verificação, o sistema utiliza a seguinte Query:
Select A.CdPlanoConta,A.NrPlanoConta, A.NrNivel, A.DsPlanoConta, Count(*),
case A.InTipoPlano when 0 then
ISNULL((SELECT Max(NrPlanoConta)
FROM CTBPLACT
WHERE NrPlanoConta = SUBSTRING(A.NrPlanoConta,1,-1)+''),NrPlanoConta)+CASE WHEN
NrNivel = 0 then DsPlanoConta ELSE '' END
when 1 then
ISNULL((SELECT Max(NrPlanoConta)
FROM CTBPLACT
WHERE NrPlanoConta = SUBSTRING(A.NrPlanoConta,1,-1)+''),NrPlanoConta)+CASE WHEN
NrNivel = 0 then DsPlanoConta ELSE '' END
when 2 then
ISNULL((SELECT Max(NrPlanoConta)
FROM CTBPLACT
WHERE NrPlanoConta = SUBSTRING(A.NrPlanoConta,1,-1)+''),NrPlanoConta)+CASE WHEN
NrNivel = 0 then DsPlanoConta ELSE '' END
when 3 then
ISNULL((SELECT Max(NrPlanoConta)
FROM CTBPLACT
WHERE NrPlanoConta = SUBSTRING(A.NrPlanoConta,1,-1)+''),NrPlanoConta)+CASE WHEN
NrNivel = 0 then DsPlanoConta ELSE '' END
when 4 then
ISNULL((SELECT Max(NrPlanoConta)
FROM CTBPLACT
WHERE NrPlanoConta = SUBSTRING(A.NrPlanoConta,1,-1)+''),NrPlanoConta)+CASE WHEN
NrNivel = 0 then DsPlanoConta ELSE '' END
end
from CTBPlaCt A Left Join CTBSdo B on A.CdPlanoConta = B.CdPlanoConta
Left Join SISEmpre C on C.CdEmpresa = B.CdEmpresa
Where A.CdPlanoConta = A.CdPlanoConta
Group By A.CdPlanoConta, A.NrPlanoConta, A.NrNivel, A.DsPlanoConta, A.InTipoPlano
Order By A.NrPlanoConta, A.DsPlanoConta
Atenção! Antes de realizar qualquer alteração, analise o impacto que poderá ter em outros lançamentos/processos do sistema.