Leitura da tag NfseSubstituidora no provedor Betha

[everson.turossi]

Tenho implementado aqui para o provedor Betha uma rotina que verifica na Consulta de NFSe por RPS se uma nota foi substituída por outra e executa a atualização dos dados no banco. A informação que preciso vem na tag NfseSubstituidora. Segue as units alteradas.

ACBrNFSeWebServices.pas

pnfsNFSeR.pas

[Italo Giurizzato Junior]

Bom dia Everson,

Muito obrigado pela colaboração, já esta disponível.

Um detalhe a sua unit ACBrNFSeWebServices esta desatualizada, favor atualizar os fontes.

[Dercide Alvarez]

Boa tarde Italo,

Passei pela mesma situação do Everson, preciso pegar o retorno da  NfseSubstituidora, mas pra o BHISS.

Mas como esta na pnfsNFSeR.pas esta pegando apenas o retorna quando o provedor for Betha.

Fiz uma alteração incluindo o BHISS no retorno.

Acredito que tenha vários outros provedores que necessitem dessa informação, mas inclui apenas o BHISS.

Alterei apenas a linha 970.

De 

    if (FProvedor = proBetha) then
 

Para

    if (FProvedor = proBetha) or (FProvedor = proBHISS) then
 

Segue o arquivo em anexo.

 

Dercide.

pnfsNFSeR.pas

[Italo Giurizzato Junior]

Boa tarde Dercide,

Fiz diferente removi a condição de provedor, agora se a informação existir será lida independente do provedor.

[Dercide Alvarez]

Italo,

Eu ia fazer isso, mas não sabia se ia causar algum problema, estava sem tempo e precisava resolver.

Beleza então.

Abraços.