[email protected]

Gentileza avaliar a impressão dos dados adicionais no danfe da NFS-e nacional. if fpNFSe.Servico.infoCompl.xInfComp > '' Then rlmDadosAdicionais.Lines.Append(fpNFSe.Servico.infoCompl.xInfComp); ACBrNFSeXDANFSeRLPadraoNacional.pas

Boa noite, Hoje, na leitura do xml (padrão nacional), quando não existe a TAG indFinal ( no XML ), ocorre um erro na procedure LerXMLIBSCBSDPS, nesta linha IBSCBS.indFinal := StrToindFinal(ObterConteudo(ANode.Childrens.FindAnyNs('indFinal'), tcStr)); Valor string inválido para TindFinal Como sugestão: If ObterConteudo(ANode.Childrens.FindAnyNs('indFinal'), tcStr) > '' Then IBSCBS.indFinal := StrToindFinal(ObterConteudo(ANode.Childrens.FindAnyNs('indFinal'), tcStr)); ou, tratar a procedure StrToIndFinal para aceitar o conteúdo vazio. Abaixo, exemplo do xml sem a TAG IndFinal Obrigado

Boa tarde Italo, Por acaso tem algum relato de erro ao tentar consultar NFS-e do Portal Nacional por NSU? Toda requisição retorna HTTP/1.1 400 Bad Request Código : E999 Mensagem: Erro não catalogado Correção: 10100841171144773042 {"StatusProcessamento":"REJEICAO","Alertas":[],"Erros":[{"Mensagem":{},"Codigo":"E999","Descricao":"Erro não catalogado","Complemento":"10100841171144773042"}],"TipoAmbiente":"PRODUCAO","VersaoAplicativo":"1.0.0.0","DataHoraProcessamento":"2024-11-01T23:41:12.0671472-03:00"}