Verissimo

Bom dia, Houve uma mudanca na geracao da TAG QUANTIDADE, agora tem que ser com 2 decimais Postei o codigo em texto porque nao conseguir anexxar o arquivo. function TNFSeW_AssessorPublico.GerarServico: TACBrXmlNodeArray; var i: integer; begin Result := nil; SetLength(Result, NFSe.Servico.ItemServico.Count); for i := 0 to NFSe.Servico.ItemServico.Count - 1 do begin Result[i] := CreateElement('SERVICO'); Result[i].AppendChild(AddNode(tcStr, '#1', 'DESCRICAO', 1, 60, 1, NFSe.Servico.ItemServico.Items[i].Descricao, '')); Result[i].AppendChild(AddNode(tcDe2, '#1', 'VALORUNIT', 1, 15, 1, NFSe.Servico.ItemServico.Items[i].ValorUnitario, '')); Result[i].AppendChild(AddNode(tcDe2, '#1', 'QUANTIDADE', 1, 10, 1, NFSe.Servico.ItemServico.Items[i].Quantidade, '')); Result[i].AppendChild(AddNode(tcDe2, '#1', 'DESCONTO', 1, 10, 1, NFSe.Servico.ItemServico.Items[i].DescontoIncondicionado, '')); end; if NFSe.Servico.ItemServico.Count > 10 then wAlerta('#54', 'SERVICO', '', ERR_MSG_MAIOR_MAXIMO + '10'); end;

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

Bom dia, Segue unit alterada. AssessorPublico.LerXml.pas

Boa tarde Italo, Birigui-SP

Bom dia, Ajuste para tratamento do caracter & no XML de envio NFSeBrasil.Provider.pas

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

Bom dia, Inclui uma nova consulta, segue arquivo alterado. SmarAPD.Provider.pas

obrigado.

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

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

Italo, boa noite. Nao deu certo, ocorreu os mesmos erros. XmlDepoisTratarXML.xmlXmlAntesTratarXML.xml

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

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

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

Italo, bom dia. Segue anexos. XML ao SAIR em TratarXmlRetornado.XMLXML ao ENTRAR em TratarXmlRetornado.XML