ajuste na unit pnfsNFSeR.pas

[thi4182]

Realizei um ajuste na linha 1796 na function TNFSeR.LerNFSe_ABRASF_V2 para incluir um bloco do XML que atualmente não está sendo lido.

Incluído texto:

  if Leitor.rExtrai(3, 'ContatoPrestadorServico') <> '' then
  begin
    NFSe.PrestadorServico.Contato.Telefone := Leitor.rCampo(tcStr, 'Telefone');
    NFSe.PrestadorServico.Contato.Email    := Leitor.rCampo(tcStr, 'Email');
  end; // fim ContatoPrestadorServico
 

Se alguém puder aplicá-la, agradeço.

pnfsNFSeR.pas

[Italo Giurizzato Junior]

Bom dia,

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