Italo Giurizzato Junior

Boa tarde, É a sua aplicação que esta gerando o XML? Se sim, confronta o XML que esta sendo gerado com o manual, pode ser que a grafia de alguma tag não esteja conforme consta no manual.

Verissimo, Favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e faça testes usando o programa exemplo.

Boa tarde Verissimo, Você fez essa implementação para atender qual cidade?

Bom dia Solivan, No retorno do Emitir não tem nenhuma lista de erros, é por isso que a lista de erros do Emitir esta vazia. Veja o XML de retorno do Emitir: <EnviarLoteRpsResposta> <NumeroLote>2</NumeroLote> <DataRecebimento>2023-07-05</DataRecebimento> <Protocolo>7da411db6e31990c3785</Protocolo> <ListaMensagemRetorno/> </EnviarLoteRpsResposta> Note que é retornado o numero do protocolo que atesta que o lote foi recebido com sucesso e se encontra na fila de processamento. O grupo ListaMensagemRetorno que poderia conter algum erro esta vazio. Ao consultar a situação do Lote temos o seguinte retorno: <ConsultarSituacaoLoteRpsResposta> <NumeroLote>2</NumeroLote> <Situacao>2</Situacao> <ListaMensagemRetorno/> </ConsultarSituacaoLoteRpsResposta> Note que o código da situação é 2 indicando que o lote ainda esta na fila de processamento. Você esta executando cada método separadamente ou configurou o componente para executar o ConsultarSituacao e o ConsultarLote automaticamente? Como no retorno do ConsultarLote temos a lista de erros, no retorno do ConsultarSituacao o valor da tag Situacao tem que ser 3. Mas pelos arquivos que você anexou esta tudo funcionando como previsto.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Solivan, Você colocou os pontos de parada onde eu lhe pedi? Fez um teste usando o programa exemplo? Pra que isso? case LFormaEnvio of 0: ACBrNFSeX1.Emitir(IntToStr(fsLote), meLoteSincrono, False); 1: ACBrNFSeX1.Emitir(IntToStr(fsLote), meLoteAssincrono, False); end; Sendo que você pode fazer assim: ACBrNFSeX1.Emitir(IntToStr(fsLote), meAutomatico, False);

Boa tarde, Acabei de realizar um teste, veja resultado: Requisição Ambiente: 1 Cidade : Belo Horizonte/MG Provedor: BHISS Versão: 1.00 Método Executado: Enviar Lote Parâmetros de Envio Numero do Lote: 1 Parâmetros de Retorno Data de Envio : 30/12/1899 Numero do Prot: Numero da Nota: Link : Código Verif. : Sucesso : False Erro(s): Código : E50 Mensagem: Inscrição Municipal do prestador inválida Correção: ---------

Boa tarde, Você tem fontes com alterações locais? Verifica se não tem nenhuma unit do ACBr com uma bolinha vermelha em seu ícone, caso afirmativo delete a unit. Atualize todos os fontes de todas as pastas. Reinstale o ACBr com a opção de apagar arquivos antigos marcada. Compile a aplicação com a opção Build.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Alexandre, Já enviei para o SVN a unit que anexei acima.

Boa tarde Verissimo, Muito obrigado pela contribuição, já inclui na minha lista de tarefas. TK-4174

Boa tarde Flavio, No caso do provedor Fiorilli, faça o seguinte para que não ocorra a assinatura: ACBrNFSeX1.Configuracoes.Geral.Assinaturas := taNaoAssinar; Essa linha tem que ser colocada na procedure que configura o componente. Quanto a URL de produção você precisa confirmar com a prefeitura/provedor, pode ser que essa informação esteja no site da prefeitura.

Boa tarde Alexandre, Substitua a unit por esta em anexo, acredito que vai resolver alguns desses erros. Os demais você vai ter que entrar em contato com o contador para saber qual é a informação correta para cada um deles. ACBrNFSeXGravarXml_ABRASFv2.pas Após substituir a unit não esqueça de reinstalar o ACBr e compilar a aplicação com a opção Build.

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

Boa tarde Solivan, Eu não tenho como testar pois o webservice acusa que o certificado que estou usando não esta autorizado, logo me retorna um erro de conexão: S04. Por favor abra a unit ACBrNFSeXProviderABRASFv1 e coloque um ponto de parada no inicio da procedure: TratarRetornoConsultaLoteRps Document.LoadFromXml(Response.ArquivoRetorno); ProcessarMensagemErros(Document.Root, Response); Response.Sucesso := (Response.Erros.Count = 0); Nesse fragmento de código da procedure, a primeira linha faz a leitura do XML de retorno; A segunda linha faz a leitura da lista de erros. Por fim a terceira recebe o valor True se a lista de erros estiver vazia. Se no XML retornado contem a lista de erros e mesmo assim o valor de Sucesso é True, vai ser necessário colocar um ponto de parada na procedure: ProcessarMensagemErros para descobrir o porque ele não esta lendo a lista. Faça os testes usando o programa exemplo.

Boa tarde Verissimo, O que me parece é que esse serviço não é para consultar uma NFS-e por RPS. Pois as tags dessa consulta se referem ao numero e série de uma nota. A tag raiz da mensagem de dados é: urlNfd que me sugere ser um serviço que retorna a URL de uma nota. E a procedure que trata o retorno dessa consulta escrita por você confirma que o retorno é mesmo uma URL. Já existe na nossa lista de tarefas a implementação de um método visando obter como retorno a URL de uma nota. Como certeza vamos aproveitar a sua contribuição. Por favor aguarde mais um pouco.

Bom dia Elisângela, Vai ter que entrar em contato com a prefeitura/provedor e expor o problema. No ambiente de homologação, diz que a nota foi emitida com sucesso, mas nesse retorno o numero da nota é zero. <numeroNota>0</numeroNota> Dessa forma fica complicado testar os demais métodos. Já no ambiente de produção ocorre o erro 500 - Erro Interno no Servidor. Dessa forma como os contribuintes vão emitir as suas notas?

Bom dia Joemil, Favor atualizar os fontes, reinstale o ACBr e faça novos testes.

Bom dia Flavio, Porque você alterou os fontes do componente? Criamos uma opção de configuração para fazer com que ele assine ou não o XML evitando assim a necessidade de alterar os fontes do componente.

Bom dia Patrick, Já esta no SVN essa alteração. Muito obrigado pela colaboração.

Boa tarde Elisângela, Você poderia anexar XML de retorno do Emitir? Pois esse é que você anexou é o retorno da Consulta.

Boa tarde Edmilson, Em todos os retornos que contem data, ela esta nesse formato?

Boa tarde Iure, Me parece que você ainda usa o componente antigo. Lhe convido a iniciar os testes com o novo componente de emissão de NFS-e: ACBrNFSeX O componente antigo: ACBrNFSe não está mais tendo manutenção. Faça os testes usando o programa exemplo do novo componente. Manual de Migração

Boa tarde Gledston, Altere o arquivo ACBrNFSeXServicos.ini deixando conforme abaixo: [4304705] Nome=Carazinho UF=RS Provedor=DBSeller Versao=2.04 ProRecepcionar=https://nfse.carazinho.rs.gov.br/webservice/index/producao HomRecepcionar=https://nfse.carazinho.rs.gov.br/webservice/index/homologacao ; ProNameSpace=https://nfse.carazinho.rs.gov.br/webservice/index/producao HomNameSpace=https://nfse.carazinho.rs.gov.br/webservice/index/homologacao Execute o Compila_RES.BAT Reinstale o ACBr Compila o programa exemplo com a opção Build. E faça novos testes.

Bom dia Solivan, Por favor substitua a unit por esta em anexo. Reinstale o ACBr e faça novos testes. ACBrNFSeXProviderABRASFv1.pas