[Web Service De Distribuição De Documentos Fiscais Eletrônicos]

Carissimos,

 

eu usei a solução do Lesf, post

 

Alguns testes realizados, funcionando perfeito.

 

Segue anexo.

 

Darlana Nogueira

pcnDistDFeInt.pas

[Testando Df-E (Trocas De Nf-E [Cnpj])]

Travache,

 

fiz atualização do componente... ontem... tenta fazer atualização - da build all... e faz o testes que Italo sugeriu...

 

Ambiente produção

 

gcultimoNSU := '1';
gcAtualNSU := '';

 

ACBrNFe1.DistribuicaoDFe(31, CNPJ, gcUltimoNSU, gcAtualNSU);

 

Provavelmente dará certo.

 

Atenciosamente,

Darlana Nogueira

[Testando Df-E (Trocas De Nf-E [Cnpj])]

Italo,

 

excelente... em modo de produção retornou... agora vou testar e organizar as coisas por aqui... vou postar os arquivos para você, caso queira verificar ou fazer testes...

 

Valeu.

 

20150115162514-con-dist-dfe.xml

20150115162514-con-dist-dfe-soap.xml

20150115162516-dist-dfe.xml

20150115162516-dist-dfe-soap.xml

[Testando Df-E (Trocas De Nf-E [Cnpj])]

Italo,

 

fiz o seguinte agora...

 

gcultimoNSU := '1';
gcAtualNSU := '';

 

ACBrNFe1.DistribuicaoDFe(31, CNPJ, gcUltimoNSU, gcAtualNSU);

 

E nada, continua não retornando nada.

 

Alguma outra possibilidade?

Grata pelo dedicação...

[Testando Df-E (Trocas De Nf-E [Cnpj])]

Italo,

 

o codigo fonte esta assim... e mesmo com '0' no 3º parametro e '' (vazio) no ultimo, continuo recebendo

 

Nenhum documento encontrado

 

 

  try
    CNPJ := DbCNPJCPFEmpresa.Text;
    lcUfAutor := DbEstaEmpresa.Text;

    gcultimoNSU := '0';
    gcAtualNSU := '';

    indNFe := '0';

    IndEmi := '0';

    ACBrNFe1.DistribuicaoDFe(BuscarCodigoCidadeUF('',lcUFAutor),CNPJ, gcUltimoNSU, gcAtualNSU);

 

 

Atenciosamente,

Darlana

20150114132428-dist-dfe-soap.xml

20150114132428-dist-dfe.xml

20150114132426-con-dist-dfe-soap.xml

20150114132426-con-dist-dfe.xml

[Testando Df-E (Trocas De Nf-E [Cnpj])]

Prezados,

 

estou emitindo NF-e usando o meu CNPJ também para destinatário (CNPJ Emitente = CNPJ Destinatario), na intenção de testar o DF-e. Conforme XML anexo.

Porem sem sucesso, continuo recebendo Nenhum documento localizado no DF-e.

 

<cStat>137</cStat>

  <xMotivo>Nenhum documento localizado</xMotivo>

  <dhResp>2015-01-14T13:09:19</dhResp>

  <ultNSU>000000000000000</ultNSU>

  <maxNSU>000000000000000</maxNSU>

 

Logo, como vi que muitos estão na mesma situação, então gostaria de convidá-los à uma parceria, quem puder emitir NF-e para o meu cnpj em modo de homologação, e querendo que eu emita para vocês é so deixar os dados basicos.

 

Meus Dados:

CNPJ: 05229436000170

IE: 0010466600062

UF: MG

Ambiente: Homologação

 

Obrigado,

Darlana Nogueira

 

 

 

 

 

 

 

31150105229436000170550020002600181258427428-nfe.xml

[Testando Df-E (Trocas De Nf-E [Cnpj])]

Prezados,

 

estou emitindo NF-e usando o meu CNPJ também para destinatário (CNPJ Emitente = CNPJ Destinatario), na intenção de testar o DF-e. Conforme XML anexo.

Porem sem sucesso, continuo recebendo Nenhum documento localizado no DF-e.

 

<cStat>137</cStat>

  <xMotivo>Nenhum documento localizado</xMotivo>

  <dhResp>2015-01-14T13:09:19</dhResp>

  <ultNSU>000000000000000</ultNSU>

  <maxNSU>000000000000000</maxNSU>

 

Logo, como vi que muitos estão na mesma situação, então gostaria de convidá-los à uma parceria, quem puder emitir NF-e para o meu cnpj em modo de homologação, e querendo que eu emita para vocês é so deixar os dados basicos.

 

Meus Dados:

CNPJ: 05229436000170

IE: 0010466600062

UF: MG

Ambiente: Homologação

 

Obrigado,

Darlana Nogueira

 

 

 

 

 

 

 

[Problemas Com Retorno De Xml Da Carta De Correção]

[Atualização Acbrnfe2]

Andre,

 

como dito ainda não consegui identificar o problema, mas em ACBrNFe, ao enviar uma carta de correção em modo de homologação, quando chega no codigo abaixo, o valor de CartaCorrecao.CCe.Evento.InfEvento.tpAmb chega com o valor  taProdução. Porem, ao executar o procedimento DefinirDadosMsg, retorma o valor retorna para Homologação. Testei também em Produção, e aparetenmente sem problemas, então creio que podemos desconsiderar.

 

Teste o envio da carta de correção, em Homologação, funcionou perfeitamente. Em produção não tenho como faze-lo.

 

 

function TACBrNFe.EnviarCartaCorrecao(idLote: Integer): Boolean;
var
  i : integer;
begin
  EventoNFe.Evento.Clear;
  for i:= 0 to CartaCorrecao.CCe.Evento.Count-1 do
   begin
     with EventoNFe.Evento.Add do
      begin
        infEvento.id       := CartaCorrecao.CCe.Evento.InfEvento.id;
        infEvento.cOrgao   := CartaCorrecao.CCe.Evento.InfEvento.cOrgao;
        infEvento.tpAmb    := CartaCorrecao.CCe.Evento.InfEvento.tpAmb;

 

 

 

 

 

procedure TNFeEnvEvento.DefinirDadosMsg;
var
  EventoNFe: TEventoNFe;
  I, F: Integer;
  Lote, Evento, Eventos, EventosAssinados: String;
begin
  EventoNFe := TEventoNFe.Create;
  try
    EventoNFe.idLote := FidLote;

    for I := 0 to TNFeEnvEvento(Self).FEvento.Evento.Count-1 do
    begin
      with EventoNFe.Evento.Add do
      begin
        infEvento.tpAmb      := TpcnTipoAmbiente(FConfiguracoes.WebServices.AmbienteCodigo-1);

 

 

Darlana Nogueira.

[Atualização Acbrnfe2]

.

[Problemas Apos Baixar Versão Com Relação A Carta De Correção]

Ronaldo Paulino,

 

De uma olhada no post

 

Darlana Nogueira

[Atualização Acbrnfe2]

Prezados,

 

Ja não estou certa se aqui será o melhor local para falarmos sobre o assunto, visto que tornou-se especifico da atualização do Carta de Correção,  vi vários posts criados por colegas, falando, qualquer coisa oriente-me melhor.

 

Andre,

fiz as alterações sugeridas  e funcionou corretamente,

 

porem deparei com o seguinte problema nos fontes:

 

ACBrNFe.pas

 

Linha(413)

function TACBrNFe.EnviarCartaCorrecao(idLote: Integer): Boolean;
var
  i : integer;
begin
  EventoNFe.Evento.Clear;
  for i:= 0 to CartaCorrecao.CCe.Evento.Count do
   begin
     with EventoNFe.Evento.Add do
 

Necessita de um -1 no count, pois senão dará List out Bound(1)

Correçao: for i:= 0 to CartaCorrecao.CCe.Evento.Count -1 do

 

 

 

ACBrNFeWebServices.pas

 

Agora a respeito do Ambiente, ainda não encontrei a solução... Segue os problemas

 

Linhas com erro (1317, 1914, 2029, 2129, 2501, 2969, 3097, 3370, 3459, 3561, 3641, )

procedure TNFeEnvEvento.DefinirDadosMsg;
var
  EventoNFe: TEventoNFe;
  I, F: Integer;
  Lote, Evento, Eventos, EventosAssinados: String;
begin
  EventoNFe := TEventoNFe.Create;
  try
    EventoNFe.idLote := FidLote;

    for I := 0 to TNFeEnvEvento(Self).FEvento.Evento.Count-1 do
    begin
      with EventoNFe.Evento.Add do
      begin
        infEvento.tpAmb      := TpcnTipoAmbiente(FConfiguracoes.WebServices.AmbienteCodigo-1);

 

A função em pcnConversao, considera os valores numericos dos ambiente...

 

 

Linha(731)

function StrToTpAmb(var ok: boolean; const s: string): TpcnTipoAmbiente;
begin
  result := StrToEnumerado(ok, s, ['1', '2'], [taProducao, taHomologacao]);
end;

 

 

Atenciosamente,

Darlana Nogueira

[Problema!? Comentado Parte Código Carta Correção]

Cantu,

 

veja esse post... pode te ajudar

 

 

Darlana

[Atualização Acbrnfe2]

Andre,

 

na atualização não consegui identificar os retornos da carta de correção, estava utilizando os seguintes

 

ACBrNFe1.WebServices.CartaCorrecao.CCeRetorno.cStat
ACBrNFe1.WebServices.CartaCorrecao.CCeRetorno.retEvento.Items[0].RetInfEvento.nProt
ACBrNFe1.CartaCorrecao.CCe.Evento.Items[0].InfEvento.FChave
ACBrNFe1.CartaCorrecao.CCe.Evento.Items[0].InfEvento.FTpEvento
ACBrNFe1.CartaCorrecao.CCe.Evento.Items[0].InfEvento.FnSeqEvento
 

 

alguns destes poderei substituir pelo obternomedoarquivo, mas este como consigo, tentei pesquisar no compoente não consegui, não estou conseguindo compilar.

 

 ACBrNFe1.WebServices.CartaCorrecao.CCeRetorno.cStat

 

Atenciosamente,

Darlana Nogueira

[Web Service De Distribuição De Documentos Fiscais Eletrônicos]

Valeu Italo,

 

e otairlaveso,

 

tudo indica que o ambiente não pronto, inclusive o de homologação, visto que se o mesmo ja estivesse funcionando normalmente, creio que teriam liberado o produção.

Logo nos resta esperar, como sugerido.

 

Darlana Nogueira

[Web Service De Distribuição De Documentos Fiscais Eletrônicos]

Prezados,

 

Estou fazendo apenas assim, ainda em testes, na esperança de obter algum retorno diferente do que tenho obtido.

 

Em homologação:

Ate o momento nenhum documento localizado.

 

Em Produção:

Hoje obtive uma resposta diferente. Ressalto que estou emitindo NF-e, normalmente.

---------------------------
Debugger Exception Notification
---------------------------
Project NFE.exe raised exception class EACBrNFeException with message 'WebService Distribuição de DFe:
- Inativo ou Inoperante tente novamente.
- An error occurred in the secure channel support - URL:https://www.nfe.fazenda.gov.br/NFeDistribuicaoDFe/NFeDistribuicaoDFe.asmx - SOAPAction:http://www.portalfiscal.inf.br/nfe/wsdl/NFeDistribuicaoDFe/nfeDistDFeInteresse'.Process stopped. Use Step or Run to continue.
---------------------------
OK   Help  
---------------------------
 

 

try
    CNPJ := DbCNPJCPFEmpresa.Text;
    lcUfAutor := DbEstaEmpresa.Text;

    gcultimoNSU := '0';
    gcAtualNSU := '';

    indNFe := '0';

    IndEmi := '0';

    ACBrNFe1.DistribuicaoDFe(BuscarCodigoCidadeUF('',lcUFAutor),CNPJ, gcUltimoNSU, gcAtualNSU);

finnaly
    Application.MessageBox('Finalizado.','Aviso',0+64);
end;

 

Atenciosamente,

Darlana Nogueira

20141111143340-con-dist-dfe-soap.xml

20141111143340-con-dist-dfe.xml

[Cancelar Nfe Após 24 Hrs]

Prezados,

 

o cancelamento fora do prazo "Cancelamento extemporâneo" tem particularidades em cada estado, a melhor opção é ligar para o Suporte Tecnico da SEFAZ do seu estado.

 

Segue anexo um material que fiz pesquisas ha um tempo atras, talvez possa nortea-lo melhor.

 

Atenciosamente,

Darlana Nogueira

Cancelamento Extemporaneo.pdf

[Erro 283 – Rejeição: Certificado Transmissor – Erro Cadeia De Certificação]

Karlo Uchoa

 

 

se porventura o erro que esta acontecendo seja parecido com este

 

Erro: Requisição não enviada.
12157 - Erro no suporte a canais seguros

 

Dê uma olhada no post

 

Pode ser que resolva seu problema ai também.

 

Otimo dia,

Darlana Nogueira

[Lote Em Processamento Versão : 3.10]

Carlos,

 

de uma olhada no post

 

Creio que seja o mesmo caso, ou pelo menos possa resolver o seu ai também.

 

Otimo dia.

Darlana

[Retornou Status 100, Protocolo. Mas A Nf-E Não Consta Na Sefaz]

Prezados,

 

não estou certa do motivo, e ainda observando. Mas depois que fiz a alteração sugerida pelo Andre, em outro post, não ocorreu. Ainda monitorando.

 

a alteração feita foi:

 

// Descomente a linha abaixo para usar o componente de comunicação SOAP do Delphi ao invés do ACBrHTTPReqResp - ACBr.inc da pasta ACBrComum
(Funciona apenas com a versão CAPICOM) - Não é compatível com o Lazarus
//--------------------------------------------------------------------------------
{$DEFINE SoapHTTP

 

Atenciosamente,

Darlana Nogueira

[Retornou Status 100, Protocolo. Mas A Nf-E Não Consta Na Sefaz]

Prezados,

 

Deparei em 4 clientes a semana passada com uma situação inusitada, e resolvi compartilhar com vocês para avaliarmos, e até mesmo verificar se ocorreu com mais alguém.

 

Ao transmirir uma NF-e, obtivemos o status e protocolo de autorização da mesma no momento do envio, e o componente resgatou os retornos, como pode ser visto no arquivo de log anexo.

 

E no log, identificamos o erro de:

 

Erro: Requisição não enviada.
12157 - Erro no suporte a canais seguros 10:10:11hs

 

Lamentávelmente uso a propriedade de salvar esta ativa, logo como o cliente realizou a consulta na sequencia, o XML foi atualizado, e consequentemente não temos o XML de retorno dos protocolos, para uma analise melhorada.

 

Alguém vivenciou essa situação? Alguma luz no final do tunel?

 

 

Atenciosamente,

Darlana Nogueira

31141010572553000172550030000236301330155085-NFe.xml

LogNFE-10-09.txt

[Web Service De Distribuição De Documentos Fiscais Eletrônicos]

Italo,

 

o erro permanece. Mesmo no ambiente de produção.

 

---------------------------
Debugger Exception Notification
---------------------------
Project NFE.exe raised exception class EACBrNFeException with message 'WebService Distribuição de DFe:
- Inativo ou Inoperante tente novamente.
- Erro: Requisição não enviada.
The resource cannot be found.'. Process stopped. Use Step or Run to continue.
---------------------------
OK   Help  
---------------------------
 

Enviando os XML também.

20141013114901-con-dist-dfe.xml

20141013114901-con-dist-dfe-soap.xml

[Web Service De Distribuição De Documentos Fiscais Eletrônicos]

Italo,

 

a ultima string esta vazia.

E de fato não esta disponivel mesmo.

Então nos resta aguardar.

 

Valeu.

[Web Service De Distribuição De Documentos Fiscais Eletrônicos]

Prezados,

 

Acabei de realizar uma consulta a DF-e

 

ACBrNFe1.DistribuicaoDFe(FrmPrincipal.BuscarCodigoCidadeUF('',lcUFAutor),CNPJ, gcUltimoNSU, gcAtualNSU);

 

E aparentemente obtive sucesso conforme os arquivos anexos.

Porem a duvida é, neste caso os retornos foram sem documentos, e valores zerados para o ultimoNSU e também para o MaxNSU, o que indica se ao enviar uma nova consulta, o ultimo NSU, novamente será 0...

 

O questionamento é o seguinte, ao realizar a consulta a DistribuicaoDFe, existindo documento, o arquivo zipadoscom os documentos ficara disponivel na mesma pasta? Ou teremos que realizar as pesquisas como faziamos no manifesto, várias vezes, até o encontrasse ou não encontrasse mais documentos?

 

Em modo de produção esta apresentando erro, na chamada

 

unit ACBrNFeWebServices;

FRetornoWS := EnviarDadosWebService(FURL,SoapAction,Texto);

 

Erro, ocorre exatamente ao executar, a linha 366, de unit ACBrHTTPReqResp;

PosError := Pos('<TITLE>',UpperCase(Result))+7;

 

---------------------------
Debugger Exception Notification
---------------------------
Project NFE.exe raised exception class Exception with message 'Erro: Requisição não enviada.
The resource cannot be found.'. Process stopped. Use Step or Run to continue.
---------------------------
OK   Help  
---------------------------
 

 

Segue anexo os XML da consulta em homologação e produção.

 

Darlana Nogueira

20141009110857-dist-dfe.xml

20141009110851-con-dist-dfe.xml

20141009134300-con-dist-dfe.xml

20141009134300-con-dist-dfe-soap.xml

[Nfe 3.10 Validação L102-10 Descrição Anp]

Prezados,

 

voces viram que na nota tecnica liberada hj a regra foi "Desativada", o que eu entendi, foi continua a obrigatoriedade de informar a descrição conforme a tabela ANP, porem não sofrerá rejeição para transmissão.

 

Atenciosamente,

Darlana Nogueira