NFS-e Canela-RS com ISS Retido

[eliezerfb]

Ao imprimir uma NFS-e para a cidade de Canela (RS) com retenção de ISS o valor do imposto retido não estava imprimindo no campo ISS Retido nem calculando o total líquido corretamente.

O XML que retorna:

<Valores>
    <ValorServicos>350.00</ValorServicos>
    <ValorDeducoes>0.00</ValorDeducoes>
    <ValorPis>0.00</ValorPis>
    <ValorCofins>0.00</ValorCofins>
    <ValorInss>0.00</ValorInss>
    <ValorIr>0.00</ValorIr>
    <ValorCsll>0.00</ValorCsll>
    <ValorIss>17.50</ValorIss>
    <Aliquota>5.00</Aliquota>
</Valores>
<IssRetido>1</IssRetido>

Eu alterei a pnfsNFSeR.pas para que quando for o provedor SystemPro, tiver retenção de ISS e o valor do ISSRetido for zero, o componente atribuir o campo ValorIssRetido e zerar ValorIss.

   if (FProvedor = proSystemPro) and (NFSe.Servico.Valores.ValorIssRetido = 0) and (NFSe.Servico.Valores.IssRetido=stRetencao) then
   begin
    NFSe.Servico.Valores.ValorIssRetido := NFSe.Servico.Valores.ValorIss;
        NFSe.Servico.Valores.ValorIss := 0;
   end;

 

Segue o arquivo para avaliar minha sugestão de alteração.

pnfsNFSeR.pas

[Italo Giurizzato Junior]

Boa tarde Eliezer,

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