Ronaldo Souza

Perdão a demora no retorno, realizei testes e obtive ainda erros, notei que primeiro no cabeçalho continuam as duas linhas: <?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="ISO-8859-1"?> Isso vem do fonte SigISSWeb.Provider.pas na linha 355, dentro da função procedure TACBrNFSeProviderSigISSWeb.PrepararEmitir for I := 0 to TACBrNFSeX(FAOwner).NotasFiscais.Count -1 do begin Nota := TACBrNFSeX(FAOwner).NotasFiscais.Items[I]; Nota.GerarXML; Nota.XmlRps := AplicarXMLtoUTF8(Nota.XmlRps); Nota.XmlRps := AplicarLineBreak(Nota.XmlRps, ''); SalvarXmlRps(Nota); ListaRps := ListaRps + Nota.XmlRps; end; Response.ArquivoEnvio := RemoverDeclaracaoXML(ListaRps); Response.ArquivoEnvio := '<?xml version="1.0" encoding="ISO-8859-1"?>' + Response.ArquivoEnvio; FpPath := 'rest/nfes'; FpMethod := 'POST'; FpMimeType := 'text/xml'; Note onde existe a chamada da função "AplicarXMLtoUTF8" onde insere o cabeçalho para enconding UTF-8, porém logo abaixo é simplesmente adicionado o cabeçalho com enconding ISO-8859-1 "na mão" como string. Testei comentando uma linha de cada vez, porém obtive o mesmo resultado, na hora de enviar o XML assinado para o servidor: raised exception class EACBrXmlException with message 'Start tag expected, '<' not found '. raised exception class EACBrXmlException with message 'Start tag expected, '<' not found '.

Italo, irei realizar os testes aqui agora e retorno

Certo, irei testar isso De antemão, já adianto que por enquanto não está funcionando a emissão, continua me dando um erro: raised exception class EACBrXmlException with message 'Extra content at the end of the document (HTTP 500 Internal Server Error) Notei que no XML de envio está assim o inicio: <?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="ISO-8859-1"?> <notafiscal> <cnpj_cpf_prestador>XXXXXXXXXXXXXXXXXX</cnpj_cpf_prestador> <exterior_dest>0</exterior_dest> <cnpj_cpf_destinatario>XXXXXXXXXXXXXXXXXX</cnpj_cpf_destinatario> <pessoa_destinatario>F</pessoa_destinatario> <ie_destinatario>XXXXXXXXXXXXXXXXXX</ie_destinatario> <im_destinatario>XXXXXXXXXXXXXXXXXX</im_destinatario> <razao_social_destinatario>XXXXXXXXXXXXXXXXXX</razao_social_destinatario> <endereco_destinatario>Rua</endereco_destinatario> <numero_ende_destinatario>51</numero_ende_destinatario> <complemento_ende_destinatario/> <bairro_destinatario></bairro_destinatario> <cep_destinatario>XXXXX</cep_destinatario> <cidade_destinatario>Araras</cidade_destinatario> <uf_destinatario>SP</uf_destinatario> <pais_destinatario>BRASIL</pais_destinatario> <fone_destinatario>XXXXX</fone_destinatario> <email_destinatario></email_destinatario> <valor_nf>11.00</valor_nf> <deducao>0.00</deducao> <valor_servico>11.00</valor_servico> <data_emissao>2022-12-05</data_emissao> <forma_de_pagamento/> <descricao>Laboratorios de analise na area veterinaria</descricao> <id_codigo_servico>05.03</id_codigo_servico> <cancelada>N</cancelada> <iss_retido>N</iss_retido> <aliq_iss>2.69</aliq_iss> <valor_iss>0.30</valor_iss> <bc_pis>11.00</bc_pis> <aliq_pis>0.00</aliq_pis> <valor_pis>0.00</valor_pis> <bc_cofins>11.00</bc_cofins> <aliq_cofins>0.00</aliq_cofins> <valor_cofins>0.00</valor_cofins> <bc_csll>11.00</bc_csll> <aliq_csll>0.00</aliq_csll> <valor_csll>0.00</valor_csll> <bc_irrf>11.00</bc_irrf> <aliq_irrf>0.00</aliq_irrf> <valor_irrf>0.00</valor_irrf> <bc_inss>11.00</bc_inss> <aliq_inss>0.00</aliq_inss> <valor_inss>0.00</valor_inss> <sistema_gerador/> <serie_rps>1</serie_rps> <rps>3</rps> </notafiscal> Removi alguns dados do cliente, mas note que no cabeçalho existem duas tags <xml>, como UTF-8 e ISO-8859-1, poderia ser isso que causa o erro? '.

No caso é aqui mesmo no forum para anexar a resposta, ainda não estou conseguindo.

Bom dia, Estou tentando dar upload do arquivo .pas mas está dando erro Houve um problema no processamento do arquivo enviado. -200 Mas o arquivo foi a unit SigISSWeb.Provider.pas no caminho ACBr\Fontes\ACBrDFe\ACBrNFSeX\Provedores Vou tentar dar upload novamente em outro momento aqui ou outra resposta, mas dentro desta unit há a procedure TratarRetornoGerarToken (Error code: -200)

Diego, boa noite! O principio que você sugeriu seria a solução! Porém, a função TratarRetornoGerarToken dentro do arquivo especifico do provedor SigISSWeb.Provider.pas está vazia! Para tratar isso, eu deixei desta forma: procedure TACBrNFSeProviderSigISSWeb.TratarRetornoGerarToken( Response: TNFSeGerarTokenResponse); var AErro: TNFSeEventoCollectionItem; begin try try if Response.ArquivoRetorno = '' then Exit; Response.Token := Response.ArquivoRetorno; except on E:Exception do begin AErro := Response.Erros.New; AErro.Codigo := Cod999; AErro.Descricao := Desc999 + E.Message; end; end; finally end; end; Claro que pode ser muito melhorada mas isso supriu para informar o token de retorno do XML na tag apropriada que deveria retornar (ACBrNFSeX.WebService.GerarToken.Token), assim informando como sugeriu na "ACBrNFSeX.Configuracoes.Geral.Emitente.WSChaveAutoriz", consegui passar o erro HTTP 401 e estou com outros erros de tags não preenchidas (parece que o provedor exige IE e IM do Destinatário, por exemplo, ou ao menos não permite vazia, ou devem ser preenchidas mesmo vazia, estou verificando ainda), mas agora creio que pelo horário ou excessivas tentativas estou tendo erro HTTP 500 no envio, porém isso solucionou o problema do Token em si Creio que será necessário atualizar essa procedure para esse provedor no svn

Diego, boa noite! Implementei essa chamada, ele gera com sucesso o token, inclusive mandei a senha errada para testar e realmente retornaria um erro, porém mesmo com a senha certa eu vejo que ele retorna primeiro um HTTP 200 e volta o token sem problemas, mas ainda sim na função Emitir continua o mesmo erro voltando um HTTP 401, examente na função procedure TACBrNFSeXWebservice.EnvioInterno dentro do fonte ACBrNFSeXWebServiceBase, na linha: try HttpClient.Execute; finally CodigoErro := HttpClient.HTTPResultCode; CodigoInterno := HttpClient.InternalErrorCode; end; A chamada do token está certa e me retornando, talvez precisaria informar o retorno do Token em alguma propriedade? Eu até pensei nisso mas a função ACBrNFSeX.GerarToken não tem um retorno

Já estou informando elas com a senha que me foi passada, creio que se a senha tivesse errada o erro seria outro?

Atualizei o arquivo ini, pois no meu projeto estava procurando um ini na raiz do projeto que estava desatualizado, Ao faze isso, mudou o erro, desta vez um 401 Unauthorized, gerando o xml de envio mas não o de resposta, pode ser alguma propriedade de chave ou certificado talvez? Segue em anexo. 3-ger-nfse-soap.xml 3-ger-nfse.xml

Italo, No meu arquivo .ini a inscrição está: [3503307] ; Atualizado em 20/09/2021 Nome=Araras UF=SP Provedor=SigISSWeb ProRecepcionar=https://wsararas.sigissweb.com/ Vou testar o programa de exemplo e posto o retorno

Sim, meus fontes estão atualizados, eu gero o arquivo dos provedores (res) ao rodar o "Compila_RES.BAT" na pasta Fontes\ACBrDFe\ACBrNFSeX sem problemas, e assim é gerado o arquivo .res e .rc Porém talvez meu fonte não esteja lendo eles corretamente? Qual variavel eu poderia verificar isso? Que saiba a cidade trocou de provedor ano passado sim, mas o atual é o SigISSWeb creio Estou utilizando a função ACBrNFSeX.Emitir

Estou realizando o envio de NFSeX para o municipio de Araras, provedor SigISSWeb O xml gerado para o envio está anexado junto com o recebimento de retorno Ocorre um erro que nos retorna: raised exception class EACBrXmlException with message 'Extra content at the end of the document ' try HttpClient.Execute; finally CodigoErro := HttpClient.HTTPResultCode; CodigoInterno := HttpClient.InternalErrorCode; end; O CodigoErro retorna 404, como se o link do arquivo res estivesse errado, recompilei com o .bat para ter certeza, o link é: ProRecepcionar=https://wsararas.sigissweb.com/ Todos outros provedores que utilizo estão carregando sem problemas do arquivo res depois de trocar o componente para o ACBrNFSeX, acessando pelo browser pelo menos a URL base parece existir, mas talvez os métodos que não sejam, atualizei o SVN para verificar mas ainda mantém, existe alguma documentação ou alguém está conseguindo utilizar provedor de Araras em produção? 3-rec-soap.xml 3-env-lot.xml

Boa Tarde, Italo Sobre o provedor ISSDSF usando o método ConsultarNFSePorRpstenho apenas o seguinte retorno, sem o XML da nota: Erro de Validação: 1824 - Element 'SeriePrestacao': 'NF' is not a valid value of the atomic type '{http://localhost:8080/WsNFe2/tp}tpSeriePrestacao'.\n Isso pois o provedor manda automaticamente a Serie como "NF" sempre, porém ao consultar não aceita isso no Schema pelo que me parece

Olá, Estou realizando consultas para os municipios Campinas e Barueri, respectivamente nos provedores ISSDSF e ISSBarueri No provedor ISSDSF a consulta está sendo feita pela função ACBrNFSeX.ConsultarLoteRps No provedor ISSBarueri pela função ACBrNFSeX.ConsultarSituacao, já que não existem as outras funções implementadas Em ambos casos a consulta me retorna ok com um XML com os dados básicos, porém não tenho o XML completo para montar o PDF, e como neste caso a chamada da consulta em meu sistema pode ocorrer depois da Emissão, onde ja foi limpo o objeto ACBrNFSeX precisaria popular os dados da NotaFiscal pela consulta, neste caso tenho salvo apenas os XMLs de resposta dos Web Services, como posso proceder para o PDF nessa situação?

Olá, necessito de um desenvolvedor delphi para implementar Nfe, TEF, e ECF num aplicativo que já possuo. Peço aos interessados enviar email para [email protected] abs