Pesquisar na Comunidade

Caros Srs, estou com uma situação especial aqui, tem um cliente meu que utiliza uma NFe de apenas credito de ICMS todo o mês. este mês tivemos um problema com a NFe, conforme segue: NFe de entrada/ cfop 1.949 CST 090 - e é preenchido somente o valor do ICMS, sem base de calculo e produto e total geral com 0.00 somente o campo vICMS contem valor. depois de muito sofrer uma madrugada sem dormir e mais uma manha. cheguei no meu problema, no arquivo fonte do acbr, pcnNFeW.pas na pasta PCN2, precisei alterar o if para testar o vICMS e não a base vBC maior que zero, pois a base de calculo é zero, so o ICMS que é maior que zero. então alterei conforme abaixo: (resolveu meu problema....) não sei se mais alguém usa este tipo de nota ?????? cst90, cstPart90 : begin >>>>>>>> if nfe.Det.Imposto.ICMS.vICMS > 0 then <<<<<<alterei aqui>>>>>>>>>>>> begin Gerador.wCampo(tcStr, 'N13', 'modBC ', 01, 01, 1, modBCToStr(nfe.Det.Imposto.ICMS.modBC), DSC_MODBC); Gerador.wCampo(tcDe2, 'N15', 'vBC ', 01, 15, 1, nfe.Det.Imposto.ICMS.vBC, DSC_VBC); Gerador.wCampo(IIf(NFe.infNFe.Versao >= 3.10,tcDe4,tcDe2), 'N14', 'pRedBC ', 01, 05, 0, nfe.Det.Imposto.ICMS.pRedBC, DSC_PREDBC); Gerador.wCampo(IIf(NFe.infNFe.Versao >= 3.10,tcDe4,tcDe2), 'N16', 'pICMS ', 01, 05, 1, nfe.Det.Imposto.ICMS.pICMS, DSC_PICMS); Gerador.wCampo(tcDe2, 'N17', 'vICMS ', 01, 15, 1, nfe.Det.Imposto.ICMS.vICMS, DSC_VICMS); end; >>>>>>>>>> if nfe.Det.Imposto.ICMS.vICMSST > 0 then <<<<<<<e alterei aqui tbm ??? não sei se necessita>>>>>>>> begin Gerador.wCampo(tcStr, 'N18', 'modBCST ', 01, 01, 1, modBCSTToStr(nfe.Det.Imposto.ICMS.modBCST), DSC_MODBCST); Gerador.wCampo(tcDe2, 'N19', 'pMVAST ', 01, 05, 0, nfe.Det.Imposto.ICMS.pMVAST, DSC_PMVAST); Gerador.wCampo(IIf(NFe.infNFe.Versao >= 3.10,tcDe4,tcDe2), 'N20', 'pRedBCST', 01, 05, 0, nfe.Det.Imposto.ICMS.pRedBCST, DSC_PREDBCST); Gerador.wCampo(tcDe2, 'N21', 'vBCST ', 01, 15, 1, nfe.Det.Imposto.ICMS.vBCST, DSC_VBCST); Gerador.wCampo(IIf(NFe.infNFe.Versao >= 3.10,tcDe4,tcDe2), 'N22', 'pICMSST ', 01, 05, 1, nfe.Det.Imposto.ICMS.pICMSST, DSC_PICMSST); Gerador.wCampo(tcDe2, 'N23', 'vICMSST ', 01, 15, 1, nfe.Det.Imposto.ICMS.vICMSST, DSC_VICMSST); end; atenciosamente, Reginaldo Costa.