Correção da Impressao do DANFE - Provedor proActconv202

[leonard.miranda]

Boa tarde, pessoal

 

Fiz  2 ajustes na unit pnfsNFSeR para o provedor proActconv202.

1 - Na hora de carregar o XML para impressão, multipliquei a aliquota por 100, porque esse provedor exige que a aliquota de 5% seja enviada com 0,05. Dessa forma, ao fazer a impressão, ele não imprimia 5%.

        if (FProvedor in [proActconv202]) then
          NFSe.Servico.Valores.Aliquota := (NFSe.Servico.Valores.Aliquota * 100);
 

2 - Como esse provedor não possui a tag ValorIssRetido, fiz a inclusão dele na condição que calcula esse valor.

        if (FProvedor in [proActconv202, proISSe, proVersaTecnologia, proNEAInformatica, proFiorilli, proPronimv2]) then
        begin
          if NFSe.Servico.Valores.IssRetido = stRetencao then
            NFSe.Servico.Valores.ValorIssRetido := Leitor.rCampo(tcDe2, 'ValorIss')
          else
            NFSe.Servico.Valores.ValorIssRetido := 0;
        end
        else
          NFSe.Servico.Valores.ValorIssRetido := Leitor.rCampo(tcDe2, 'ValorIssRetido');
 

Espero ter ajudado

pnfsNFSeR.pas

[Italo Giurizzato Junior]

Boa tarde Leonard,

Muito obrigado pela colaboração, ainda hoje estarei enviando para o repositório.