Ir para conteúdo
  • Cadastre-se

Márcio Antônio

Membros
  • Total de ítens

    255
  • Registro em

  • Última visita

Tudo que Márcio Antônio postou

  1. Italo, Correto! Testei também no ambiente de produção e deu a mesma coisa. E existe notas emitidas no ambiente de produção contra o meu cnpj.
  2. Boa tarde Italo, Existe sim várias notas emitidas no ambiente de homologação contra o meu cnpj e sempre dá a mesma mensagem quando eu tento realizar o manifesto, em anexo o meu código para realizar o manifesto(Manifesto.txt): 136 - Evento registrado, mas não vinculado a NF-e. E consequentemente não consigo realizar o download, segue em anexo o meu código para realizar o download(Download.txt): No Aguardo. Manifesto.txt Download.txt
  3. Italo, fiq o que você falou, sendo que quando eu manifesto uma NF-e pela chave, me retornou a seguinte mensagem: 136 - Evento registrado, mas não vinculado a NF-e. Logo depois tento realizar o download e me retorna o seguinte: 217 - Rejeicao: NF-e nao consta na base de dados da SEFAZ Isso no ambiente de homologação! Alguém me ajuda por favor..... Já fiz a NF-e 3.10, a devolução, a carta de correção e etc... tudo usando o ACBR, mas esse download.... tá fogo!
  4. Ok Italo, muito obrigado. Irei refazer o meu código.
  5. Olá amigos, sou novato com o ACBR, estou tentando realizar o download do XML em produção e só me retorna que(Rejeicao: NF-e nao consta na base de dados da SEFAZ). Segue abaixo como está o meu código: dtmCompra.ACBRNFeTriviaDownload.EventoNFe.Evento.Clear; dtmCompra.ACBRNFeTriviaDownload.ConsultaNFeDest(vCNPJ, inTodas, ieTodos, '0'); with dtmCompra.ACBRNFeTriviaDownload.EventoNFe.Evento.Add do begin // InfEvento.cOrgao := StrToInt(empresaInfo.PessoaInfo.EnderecoPrinc.Estado.CODESTADOIBGE); InfEvento.cOrgao := 91; if dtmVarGlobal.VarGlobal('NFE_TXT_IDENTIFICACAOAMBIENTE') = 1 then InfEvento.tpAmb := taProducao else InfEvento.tpAmb := taHomologacao; InfEvento.chNFe := vChave; InfEvento.dhEvento := dtmGenIbx.GetDBNow; InfEvento.tpEvento := teManifDestConfirmacao; infEvento.nSeqEvento := StrToInt(vSeqEvento); InfEvento.CNPJ := vCNPJ; end; dtmCompra.ACBRNFeTriviaDownload.EnviarEventoNFe(StrToInt(vIdLote)); dtmCompra.ACBRNFeTriviaDownload.DownloadNFe.Download.CNPJ := vCNPJ; with dtmCompra.ACBRNFeTriviaDownload.DownloadNFe.Download.Chaves.Add do begin chNFe := vChave; end; dtmCompra.ACBRNFeTriviaDownload.WebServices.DownloadNFe.Executar; Memo1.Lines.Text := UTF8Encode(dtmCompra.ACBRNFeTriviaDownload.WebServices.DownloadNFe.retDownloadNFe.XML); Memo1.Lines.SaveToFile( PAnsiChar('C:\Download'+'\'+dtmCompra.ACBRNFeTriviaDownload.WebServices.DownloadNFe.retDownloadNFe.retNFe.Items[0].chNFe+ '.xml')); Aonde estou errando???
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.