Provedor Tecnos

[thi4182]

Olá,

Precisei realizar três tipos de ajustes em dois fontes para que a leitura de xml/rps funcione corretamente:

1°: Incluído a função LerXmlRps no "ACBrDFe/ACBrNFSeX/Provedores/Tecnos.LerXml.pas", pois em algumas situações o xml tem tags antes da tag principal "InfDeclaracaoPrestacaoServico" e com isto foi tratado para verificar a existencia delas;
2°: O provedor gera a tag "BaseCalculoCRS" e com isto foi ajustado a unit "ACBrDFe/ACBrNFSeX/Base/Provedores/ACBrNFSeXLerXml_ABRASFv2.pas" para alimentar a variavél "BaseCalculo";
3°: O provedor gera a tag "CodigoNBS" diferente do padrão "CodigoNbs" e com isto foi ajustado a unit "ACBrDFe/ACBrNFSeX/Base/Provedores/ACBrNFSeXLerXml_ABRASFv2.pas";

No primeiro ajuste também foi ajustado a unit "ACBrDFe/ACBrNFSeX/Base/Provedores/ACBrNFSeXLerXml_ABRASFv2.pas" para que a função "LerXmlRps" passe a ser "virtual";

Segue em anexo os dois arquivos.

ACBrNFSeXLerXml_ABRASFv2.pas Tecnos.LerXml.pas