20372 - Base e Valor de ICMS ST está ficando com valor zerado - NF tipo 9 - Acerto
Rotina / Tela:
· F660INT_CIEC - Controladoria / Gestão de Tributos / Escrituração / Integrações / Notas Fiscais
Solução:
Solução: No cadastro do produto estava com o campo Recupera ICMS=N. Alterado para S e gerou corretamente.
É realizada a validação dos campos para determinar o que faz em relação ao ICM em:
RecuperaICMSFornecedor, RecuperaICMSTransacao, RecuperaICMSLigacao e LigacaoFornecedorProduto.
Instruções usadas para definir se tributa ou não:
if (((E075PRO.RecIcm = 'S') and (E075PRO.IndFpr = 'N'))
or ((E075PRO.IndFpr = 'S') and (E403FPR.RecIcm = 'S'))
or ((E075PRO.RecIcm = 'S') and (E075PRO.IndFpr = 'S') and (Trim(E403FPR.RecIcm) = '')))
and (E095FOR.RecIcm = 'S')
and (E001TNS.CprRic = 'S') then
if (not (E001TNS.CprTcf in ['V','S']))
or (E019SUB.SomNfs = 'N') then
Tributa
Comandos que mostram os dados da base, para confirmar os valores:
SELECT 'E075PRO',RECICM,INDFPR,' ' AS CPRRIC,' ' AS CPRTCF, ' ' AS SOMNFS FROM E075PRO WHERE CODEMP=101 AND CODPRO='1101'
UNION ALL
SELECT 'E095FOR',RECICM,' ',' ',' ',' ' FROM E095FOR WHERE CODFOR=2
UNION ALL
SELECT 'E001TNS',' ',' ',CPRRIC,CPRTCF,' ' FROM E001TNS WHERE CODEMP=101 AND CODTNS='2603'
UNION ALL
SELECT 'E403FPR',RECICM,' ',' ',' ',' ' FROM E403FPR WHERE CODEMP=101 AND CODPRO='1101' AND CODFOR=2
UNION ALL
SELECT 'E019SUB',' ',' ',' ',' ', SOMNFS FROM E019SUB WHERE CODEMP = 101 AND CODFIL = 1 AND CODTST = 'STP' AND SIGUFS = 'PR'