[Ajuste URL Provedor SmarAPD]

Ajuste na configuracao de 2 URLs do provedor SmarAPD

[3506508]
; Atualizado em 15/03/2024
Nome=Birigui
UF=SP
Provedor=SmarAPD

Configuracao Atual
ProConsultarNFSeRps=https://pmbirigui02.smarapd.com.br:8443/smartb/services/WSSaida
HomConsultarNFSeRps=https://tributacao.smarapd.com.br:8443/birigui/services/WSSaida

Configuracao Correta
ProConsultarNFSeRps=https://pmbirigui02.smarapd.com.br:8443/smartb/services/WSUtil
HomConsultarNFSeRps=https://tributacao.smarapd.com.br:8443/birigui/services/WSUtil 
 

ACBrNFSeXServicos.ini

[Inclusao da leitura da Situacao da nota - NFSe AssessorPublico]

Bom dia,

 

Segue unit alterada.

AssessorPublico.LerXml.pas

[Nova consulta - SmarAPD]

Boa tarde Italo,

Birigui-SP

[Provedor NFSeBrasil]

Bom dia,

Ajuste para tratamento do caracter & no XML de envio

 

NFSeBrasil.Provider.pas

[Nova consulta - SmarAPD]

Bom dia,

Tinha um erro de compilação na unit,  segue correcao.SmarAPD.Provider.pas

[Nova consulta - SmarAPD]

Bom dia,

Inclui uma nova consulta, segue arquivo alterado.

 

SmarAPD.Provider.pas

[Provedor Fiorilli]

obrigado.

[Provedor Fiorilli]

Italo, bom dia.

O Provedor fiorilli na consulta por faixa exige que seja preenchido o Numero final da Faixa, caso contrario ocorre o erro:

E o parametro default esta FALSE.

Alterei a unit FIORILLI.PROVIDER ajustando o default para TRUE.

 

Fiorilli.Provider.pas

[Falha na leitura das notas retornadas - Provedor NFSeBrasil (Prefeitura de Vespasiano-MG)]

Bom dia Italo/Jéter,

Segue anexo um XML depois do tratamento.

Percebi que no XML ha a Tag CompNfse que nao esta sendo lida nas rotinas TratarRetornoConsultaLoteRps e TratarRetornoConsultaNFSeporRps, fiz uma modificações nessas rotinas consegue testar Jéter?

O XML carregado dessa Tag eu utilizei  na leitura do XML  ....TACBrNFSeX(FAOwner).NotasFiscais.LoadFromString(sXmlCompNfse, False) que ha nessas rotinas tambem.

 

NFSeBrasil.Provider.pas

DepoisTratarXmlRetornado.xml

 

[Falha na leitura das notas retornadas - Provedor NFSeBrasil (Prefeitura de Vespasiano-MG)]

Italo, boa noite.

Nao deu certo, ocorreu os mesmos erros.

XmlDepoisTratarXML.xmlXmlAntesTratarXML.xml

[Falha na leitura das notas retornadas - Provedor NFSeBrasil (Prefeitura de Vespasiano-MG)]

Italo, bom dia.

 

Nao deu certo, a falha na leitura do XML apos passar pela TACBrNFSeXWebserviceNFSeBrasil.TratarXmlRetornado continua.

 

Erro: Aqui loadedDoc esta NIL

 

Erro: Descricao do Exception

XmlAntesTratarXML.xml XmlDepoisTratarXML.xml

[Falha na leitura das notas retornadas - Provedor NFSeBrasil (Prefeitura de Vespasiano-MG)]

Italo, bom dia.

Nao deu certo, ocorre a falha em leitura do XML, retorna NIL:

 

Segue XML ao entrar e sair da rotina TratarXmlRetornado.

Com o NFSEBrasil.Provider do Jeter postado em no link abaixo funciona.

 

Xml ao Entrar em TratarXMLRetornado Xml ao Sair de TratarXMLRetornado

[Encode XML NFS-e]

Deu certo Italo, nota autorizada com o envio do Nome da Prestador com '&'.

 

Obrigado.

[Falha na leitura das notas retornadas - Provedor NFSeBrasil (Prefeitura de Vespasiano-MG)]

Italo, bom dia.

Segue anexos.

XML ao SAIR em TratarXmlRetornado.XMLXML ao ENTRAR em TratarXmlRetornado.XML

[Encode XML NFS-e]

Italo, bom dia.

No componente antigo ACBrNFSe e resolvi esse situação trocando & por & com isso eu conseguia enviar o & contido no nome da Empresa.

ACBrNFSeWebServices.pas
 procedure TNFSeEnviarLoteRPS.DefinirDadosMsg;
var

begin

   ........
   if FProvedor in [proSMARAPD, proGiap] then
      begin
      FPDadosMsg := StringReplace(FPDadosMsg, '<?xml version="1.0" encoding="UTF-8"?>', '', [rfReplaceAll]);

      // Tratar caracteres especiais: &
        FPDadosMsg := StringReplace(FPDadosMsg, '&amp;', '&amp;amp;',[rfReplaceAll]);
      end;

 

 

 

[Falha na leitura das notas retornadas - Provedor NFSeBrasil (Prefeitura de Vespasiano-MG)]

Nao estou conseguindo fazer com a rotina TACBrNFSeProviderNFSeBrasil.TratarRetornoConsultaLoteRps(Response: TNFSeConsultaLoteRpsResponse) leia as Notas retornadas.

        AuxNode := ANode.Childrens.FindAnyNs('xml');     <= Aqui consegue ler

        if AuxNode <> nil then
        begin
//          DocumentoNota := TACBrXmlDocument.Create;
//          try
//            NumRps := ParseText(AnsiString(TratarXmlRetorno(AuxNode.Content)), True, True);
//            NumRps := StringReplace(NumRps, 'R$', '', [rfReplaceAll]);
//            DocumentoNota.LoadFromXml(ConverteXMLtoUTF8(NumRps));

//            NotaNode := DocumentoNota.Root;
            AuxNode := AuxNode.Childrens.FindAnyNs('Nfse');     <= Aqui ja nao le mais, retorna NIL
            AuxNode := AuxNode.Childrens.FindAnyNs('InfNfse');

 

Alguém passou por essa situação?

 

 

XML ao ENTRAR em TratarXmlRetornado.XML XML ao SAIR em TratarXmlRetornado.XML

[Migrando para ACBRNFSeX - Provedor SmarAPD]

Farei os testes.

Obrigado.

[Migrando para ACBRNFSeX - Provedor SmarAPD]

Fiz 2 modificações:

SmarAPD.GravarXml - Na geração do XML utilizar o numero da NFSe quando informado

SmarAPD.Provider - Tratar o XML retornada para permitir sua leitura corretamente.

 

Essas modificações podem ser aplicadas no repositório do ACBR para que nas próximas atualizações eu nao necessite refaze-las?

 

Obrigado.

 

 

SmarAPD.Provider.pas SmarAPD.GravarXml.pas

[Migrando para ACBRNFSeX]

Ok, obrigado Italo.

[Migrando para ACBRNFSeX]

Bom dia Italo,

E na leitura do XML da NFSe que a prefeitura retornou.

[Migrando para ACBRNFSeX]

Estou homologando o provedor SMARApd (ACBRNFSeX) na cidade de birigui, a consulta da NFSe enviada e autorizada esta funcionando corretamente porem no XML da Nota que é salvo na pasta mensal esta com alguns caracteres especiais,  e devido a isso nao estou conseguindo carrega-la no componente, aparece o seguinte erro:

input is not proper UTF-8, indicate encoding! 

Segue em anexo exemplos de XML

 

Tem alguma configuração no novo componente para que o XML seja salvo com esses caracteres especiais?

 

[Três Lagoas - MS com novo Provedor (Fiorilli)]

Italo, bom dia.

 

Segue Cidades.ini

 

Obrigado.

Cidades.ini

[Três Lagoas - MS com novo Provedor (Fiorilli)]

Arquivo Fiorilli.ini com a nova URL_P

; Tres Lagoas/MS
RecepcaoLoteRPS_5008305=http://issweb.treslagoas.ms.gov.br:8080/IssWeb-ejb/IssWebWS/IssWebWS?wsdl

 

Obs: O Provedor anterior era NEAInformatica

Fiorilli.ini

[Tratamento retorno cancelamento Provedor AssessorPublico]

Incluído o tratamento para o retorno de Cancelamento da NFSe Provedor AssessorPúblico.

pnfsCancNfseResposta.pas

[NT 2019.001 1.30]