Problema Com Carta De Correção

[jappakill]

Amigo não sei onde mais procurar como resolver esse problema viu ta complicado fiz de novo pelo exemplo do acbr marcando web service PA e coloquei o codigo do estado como 15 me retorno a msm coisa q o meu sistema to achando que o problema e da sefaz ta sem logica ja se não é o ambiente svan funciona normal

 

 

 

 <retEnvEvento versao="1.00" xmlns="http://www.portalfiscal.inf.br/nfe">

<idLote>1</idLote>

<tpAmb>1</tpAmb>

<verAplic>SP_EVENTOS_PL_100</verAplic>

<cOrgao>53</cOrgao>

<cStat>128</cStat>

<xMotivo>Lote de Evento Processado</xMotivo>

- <retEvento versao="1.00">

- <infEvento>

<tpAmb>1</tpAmb>

<verAplic>SP_EVENTOS_PL_100</verAplic>

<cOrgao>90</cOrgao>

<cStat>250</cStat> 

<xMotivo>Rejeicao: Codigo do orgao diverge da UF autorizadora</xMotivo> 

<chNFe>15130107481452000181550010000073181000015441</chNFe>

<tpEvento>110110</tpEvento>

<nSeqEvento>1</nSeqEvento>

<dhRegEvento>2013-02-05T13:41:30-02:00</dhRegEvento>

</infEvento>

</retEvento>

</retEnvEvento>

[Danilo]

Amigo não sei onde mais procurar como resolver esse problema viu ta complicado fiz de novo pelo exemplo do acbr marcando web service PA e coloquei o codigo do estado como 15 me retorno a msm coisa q o meu sistema to achando que o problema e da sefaz ta sem logica ja se não é o ambiente svan funciona normal

 

 

 

 <retEnvEvento versao="1.00" xmlns="http://www.portalfiscal.inf.br/nfe">

<idLote>1</idLote>

<tpAmb>1</tpAmb>

<verAplic>SP_EVENTOS_PL_100</verAplic>

<cOrgao>53</cOrgao>

<cStat>128</cStat>

<xMotivo>Lote de Evento Processado</xMotivo>

- <retEvento versao="1.00">

- <infEvento>

<tpAmb>1</tpAmb>

<verAplic>SP_EVENTOS_PL_100</verAplic>

<cOrgao>90</cOrgao>

<cStat>250</cStat> 

<xMotivo>Rejeicao: Codigo do orgao diverge da UF autorizadora</xMotivo> 

<chNFe>15130107481452000181550010000073181000015441</chNFe>

<tpEvento>110110</tpEvento>

<nSeqEvento>1</nSeqEvento>

<dhRegEvento>2013-02-05T13:41:30-02:00</dhRegEvento>

</infEvento>

</retEvento>

</retEnvEvento>

 

 

 

Esse código que vc postou antes :

 

Postado Ontem, 10:39 AM
Claro
 
 
{  -------- parametros de configuração no arquivo.ini-------------------}
  LerConfiguracao;
{  --------------- Dados para envio da carta de correção------------}
  chave := ClntDtStCRTCORRECAONFE.AsString;
  idLote := ClntDtStCRTCORRECAONUMVENDA.asstring;
  CNPJ := ClntDtStCRTCORRECAOCPFCNPJ.AsString;
  if ClntDtStCRTCORRECAOQTECCE.AsString = '0' then
    nSeqEvento := 1
  else
    nSeqEvento := StrToInt(ClntDtStCRTCORRECAOQTECCE.AsString) + 1;
 
  Correcao := Memo1.Lines.Text;
// ACBrNFe1.Configuracoes.WebServices.UF := ClntDtStCRTCORRECAOESTADO.AsString;
 ACBrNFe1.Configuracoes.WebServices.UF := ClntDtStCRTCORRECAOESTADOFILIAL.AsString;
 ACBrNFe1.EventoNFe.Evento.Clear;
// ACBrNFe1.EventoNFe.idLote := StrToInt(idLote);
 
  with ACBrNFe1.EventoNFe.Evento.Add do
  begin
    infEvento.chNFe := Chave;
    infEvento.CNPJ   := CNPJ;
    infEvento.dhEvento := Now;
    infEvento.tpEvento := teCCe;
    infEvento.nSeqEvento := nSeqEvento;
    infEvento.detEvento.xCorrecao := Correcao;
  end;
  ACBrNFe1.EnviarEventoNFe(StrToInt(idLote));

 

ACBrNFe1.Configuracoes.WebServices.UF := ClntDtStCRTCORRECAOESTADOFILIAL.AsString; .... coloca estático 'PA'  e roda pra ver... 

 

ACBrNFe1.Configuracoes.WebServices.UF := 'PA';

[jappakill]

certo

 

 

{  -------- parametros de configuração no arquivo.ini-------------------}

  LerConfiguracao;

{  --------------- Dados para envio da carta de correção------------}

  chave := ClntDtStCRTCORRECAONFE.AsString;

  codOrgao := copy(Chave,1,2);

  idLote := ClntDtStCRTCORRECAONUMVENDA.asstring;

  CNPJ := ClntDtStCRTCORRECAOCPFCNPJ.AsString;

  if ClntDtStCRTCORRECAOQTECCE.AsString = '0' then

    nSeqEvento := 1

  else

    nSeqEvento := StrToInt(ClntDtStCRTCORRECAOQTECCE.AsString) + 1;

 

  Correcao := Memo1.Lines.Text;

// ACBrNFe1.Configuracoes.WebServices.UF := ClntDtStCRTCORRECAOESTADO.AsString;

 ACBrNFe1.Configuracoes.WebServices.UF := 'PA'; //ClntDtStCRTCORRECAOESTADOFILIAL.AsString;

 ACBrNFe1.EventoNFe.Evento.Clear;

 ACBrNFe1.EventoNFe.idLote := StrToInt(idLote);

 

  with ACBrNFe1.EventoNFe.Evento.Add do

  begin

    infEvento.chNFe := Chave;

    infEvento.CNPJ   := CNPJ;

    infEvento.dhEvento := Now;

    infEvento.tpEvento := teCCe;

    infEvento.nSeqEvento := nSeqEvento;

    infEvento.detEvento.xCorrecao := Correcao;

  end;

  ACBrNFe1.EnviarEventoNFe(StrToInt(idLote));

 

envie o resultado não foi diferente

 

 

<retEnvEvento versao="1.00" xmlns="http://www.portalfiscal.inf.br/nfe">

<idLote>1</idLote>

<tpAmb>1</tpAmb>

<verAplic>SP_EVENTOS_PL_100</verAplic>

<cOrgao>53</cOrgao>

<cStat>128</cStat>

<xMotivo>Lote de Evento Processado</xMotivo>

- <retEvento versao="1.00">

- <infEvento>

<tpAmb>1</tpAmb>

<verAplic>SP_EVENTOS_PL_100</verAplic>

<cOrgao>90</cOrgao>

<cStat>250</cStat> 

<xMotivo>Rejeicao: Codigo do orgao diverge da UF autorizadora</xMotivo> 

<chNFe>15130107481452000181550010000073181000015441</chNFe>

<tpEvento>110110</tpEvento>

<nSeqEvento>1</nSeqEvento>

<dhRegEvento>2013-02-05T13:41:30-02:00</dhRegEvento>

</infEvento>

</retEvento>

</retEnvEvento>

[Danilo]

certo

 

 

{  -------- parametros de configuração no arquivo.ini-------------------}

  LerConfiguracao;

{  --------------- Dados para envio da carta de correção------------}

  chave := ClntDtStCRTCORRECAONFE.AsString;

  codOrgao := copy(Chave,1,2);

  idLote := ClntDtStCRTCORRECAONUMVENDA.asstring;

  CNPJ := ClntDtStCRTCORRECAOCPFCNPJ.AsString;

  if ClntDtStCRTCORRECAOQTECCE.AsString = '0' then

    nSeqEvento := 1

  else

    nSeqEvento := StrToInt(ClntDtStCRTCORRECAOQTECCE.AsString) + 1;

 

  Correcao := Memo1.Lines.Text;

// ACBrNFe1.Configuracoes.WebServices.UF := ClntDtStCRTCORRECAOESTADO.AsString;

 ACBrNFe1.Configuracoes.WebServices.UF := 'PA'; //ClntDtStCRTCORRECAOESTADOFILIAL.AsString;

 ACBrNFe1.EventoNFe.Evento.Clear;

 ACBrNFe1.EventoNFe.idLote := StrToInt(idLote);

 

  with ACBrNFe1.EventoNFe.Evento.Add do

  begin

    infEvento.chNFe := Chave;

    infEvento.CNPJ   := CNPJ;

    infEvento.dhEvento := Now;

    infEvento.tpEvento := teCCe;

    infEvento.nSeqEvento := nSeqEvento;

    infEvento.detEvento.xCorrecao := Correcao;

  end;

  ACBrNFe1.EnviarEventoNFe(StrToInt(idLote));

 

envie o resultado não foi diferente

 

 

<retEnvEvento versao="1.00" xmlns="http://www.portalfiscal.inf.br/nfe">

<idLote>1</idLote>

<tpAmb>1</tpAmb>

<verAplic>SP_EVENTOS_PL_100</verAplic>

<cOrgao>53</cOrgao>

<cStat>128</cStat>

<xMotivo>Lote de Evento Processado</xMotivo>

- <retEvento versao="1.00">

- <infEvento>

<tpAmb>1</tpAmb>

<verAplic>SP_EVENTOS_PL_100</verAplic>

<cOrgao>90</cOrgao>

<cStat>250</cStat> 

<xMotivo>Rejeicao: Codigo do orgao diverge da UF autorizadora</xMotivo> 

<chNFe>15130107481452000181550010000073181000015441</chNFe>

<tpEvento>110110</tpEvento>

<nSeqEvento>1</nSeqEvento>

<dhRegEvento>2013-02-05T13:41:30-02:00</dhRegEvento>

</infEvento>

</retEvento>

</retEnvEvento>

 

esse retorno foir gerado pelo exemplo do ACBrNFe

[jappakill]

Verdade amigo o xml estava um ao lado do outro copiei e colei errado 

este ja mostra que foi enviado para o SVAN

 

 

- <retEnvEvento versao="1.00" xmlns="http://www.portalfiscal.inf.br/nfe">

  <idLote>1015172</idLote> 

  <tpAmb>1</tpAmb> 

  <verAplic>SVAN_2.1.0</verAplic> 

  <cOrgao>53</cOrgao> 

  <cStat>128</cStat> 

  <xMotivo>Lote de evento processado</xMotivo> 

- <retEvento versao="1.00">

- <infEvento xmlns="http://www.portalfiscal.inf.br/nfe">

  <tpAmb>1</tpAmb> 

  <verAplic>SVAN_2.1.0</verAplic> 

  <cOrgao>90</cOrgao> 

  <cStat>250</cStat> 

  <xMotivo>Rejeicao: Codigo do orgao diverge da UF autorizadora</xMotivo> 

  <chNFe>15130107481452000181550010000073181000015441</chNFe> 

  <tpEvento>110110</tpEvento> 

  <nSeqEvento>1</nSeqEvento> 

  <dhRegEvento>2013-02-05T15:09:23-03:00</dhRegEvento> 

  </infEvento>

  </retEvento>

  </retEnvEvento>

[lulaviana]

certo

 

 

{  -------- parametros de configuração no arquivo.ini-------------------}

 

certo

 

 

{  -------- parametros de configuração no arquivo.ini-------------------}

  LerConfiguracao;

{  --------------- Dados para envio da carta de correção------------}

  chave := ClntDtStCRTCORRECAONFE.AsString;

  codOrgao := copy(Chave,1,2);

 

Quando vc coloca o codOrgao pra receber o valor, ele não recebe o que deveria. No caso do PA, que utiliza o SVAN é 90.

Comente essa linha.

[jappakill]

Mesma coisa amigo 

 

 

{  -------- parametros de configuração no arquivo.ini-------------------}

  LerConfiguracao;

{  --------------- Dados para envio da carta de correção------------}

  chave := ClntDtStCRTCORRECAONFE.AsString;

//  codOrgao := copy(Chave,1,2);

  idLote := ClntDtStCRTCORRECAONUMVENDA.asstring;

  CNPJ := ClntDtStCRTCORRECAOCPFCNPJ.AsString;

  if ClntDtStCRTCORRECAOQTECCE.AsString = '0' then

    nSeqEvento := 1

  else

    nSeqEvento := StrToInt(ClntDtStCRTCORRECAOQTECCE.AsString) + 1;

 

  Correcao := Memo1.Lines.Text;

// ACBrNFe1.Configuracoes.WebServices.UF := ClntDtStCRTCORRECAOESTADO.AsString;

 ACBrNFe1.Configuracoes.WebServices.UF := 'PA'; //ClntDtStCRTCORRECAOESTADOFILIAL.AsString;

 ACBrNFe1.EventoNFe.Evento.Clear;

 ACBrNFe1.EventoNFe.idLote := StrToInt(idLote);

 

  with ACBrNFe1.EventoNFe.Evento.Add do

  begin

    infEvento.chNFe := Chave;

    infEvento.CNPJ   := CNPJ;

    infEvento.dhEvento := Now;

    infEvento.tpEvento := teCCe;

    infEvento.nSeqEvento := nSeqEvento;

    infEvento.detEvento.xCorrecao := Correcao;

  end;

  ACBrNFe1.EnviarEventoNFe(StrToInt(idLote));

 

 

 

- <retEnvEvento versao="1.00" xmlns="http://www.portalfiscal.inf.br/nfe">

  <idLote>1015172</idLote> 

  <tpAmb>1</tpAmb> 

  <verAplic>SVAN_2.1.0</verAplic> 

  <cOrgao>53</cOrgao> 

  <cStat>128</cStat> 

  <xMotivo>Lote de evento processado</xMotivo> 

- <retEvento versao="1.00">

- <infEvento xmlns="http://www.portalfiscal.inf.br/nfe">

  <tpAmb>1</tpAmb> 

  <verAplic>SVAN_2.1.0</verAplic> 

  <cOrgao>90</cOrgao> 

  <cStat>250</cStat> 

  <xMotivo>Rejeicao: Codigo do orgao diverge da UF autorizadora</xMotivo>  

  <chNFe>15130107481452000181550010000073181000015441</chNFe> 

  <tpEvento>110110</tpEvento> 

  <nSeqEvento>1</nSeqEvento> 

  <dhRegEvento>2013-02-05T15:26:14-03:00</dhRegEvento> 

  </infEvento>

  </retEvento>

  </retEnvEvento>

[AlexandreADC]

Faz sentido, porque para cancelar uma Nota Fiscal (que também é um evento) enviada em modo SCAN, tem que Cancelar em Modo SCAN também...

[jappakill]

Algum colega sabe me falar se tem como postar print?

estou com um print do mesmo erro com uma carta gerada pelo exemplo do acbr 

[lulaviana]

Só pra mostrar o desfecho do meu caso, enviei o XML para o pessoal da SEFA e eles me deram um retorno:

 

"Prezado Senhor,

Como o senhor pode ler no seu próprio XML, carta de correção NÂO pode ser usada para corrigir valor de ICMS, sugiro a empresa a cancelar a nota e emitir outra, se não mais for possível que faça uma nota fiscal complementar, consulte seu contador."

 

Então na verdade, o erro era referente à correção e não a UF Autorizadora.

 

Grato a todos.

Editado 6 Fevereiro, 2013 por lulaviana

[jappakill]

Lulaviana pode me passar qual o email conseguiu falar com eles?

pq tenho um email da sefaz do Pará onde está meu  problema e ate agora ano obtive nenhum retorno

[Danilo]

Só pra mostrar o desfecho do meu caso, enviei o XML para o pessoal da SEFA e eles me deram um retorno:

 

"Prezado Senhor,

Como o senhor pode ler no seu próprio XML, carta de correção NÂO pode ser usada para corrigir valor de ICMS, sugiro a empresa a cancelar a nota e emitir outra, se não mais for possível que faça uma nota fiscal complementar, consulte seu contador."

 

Então na verdade, o erro era referente à correção e não a UF Autorizadora.

 

Grato a todos.

 

Notei isso no seu caso, mas nem comentei pq é irrelevante ao problema, já que o conteúdo da tag <xCorrerarcao> não é submetido à validação, pelo menos por enquanto não (a não ser caracteres especiais), o cara foi leviano e quis se livrar do problema apontando de fato um "problema", mas que não é a causa da NÃO AUTORIZAÇÃO da sua CCe, o seu e o do jappakill são problemas de UFs divergentes, ou seja de algum modo, as ufs que estão gerando os eventos de CCe não são as mesmas que geraram a da NFe .. se só está acontecendo com vcs dois, imagino que seja problema em seus códigos, agora se surgirem mais users do SVAN com o mesmo problema, pode ser que de fato exista algo errado nessa história, mas se analisar os xmls do post, são muito estranhos. o retorno é claro Rejeicao: Codigo do orgao diverge da UF autorizadora 

[lulaviana]

Notei isso no seu caso, mas nem comentei pq é irrelevante ao problema, já que o conteúdo da tag <xCorrerarcao> não é submetido à validação, pelo menos por enquanto não (a não ser caracteres especiais), o cara foi leviano e quis se livrar do problema apontando de fato um "problema", mas que não é a causa da NÃO AUTORIZAÇÃO da sua CCe, o seu e o do jappakill são problemas de UFs divergentes, ou seja de algum modo, as ufs que estão gerando os eventos de CCe não são as mesmas que geraram a da NFe .. se só está acontecendo com vcs dois, imagino que seja problema em seus códigos, agora se surgirem mais users do SVAN com o mesmo problema, pode ser que de fato exista algo errado nessa história, mas se analisar os xmls do post, são muito estranhos. o retorno é claro Rejeicao: Codigo do orgao diverge da UF autorizadora 

 

Foi o que respondi no e-mail pro pessoal. Realmente o erro retornado, aparentemente, não tem relação com o conteudo da correção.

O email da Sefa: [email protected] e [email protected]

[lulaviana]

Lulaviana pode me passar qual o email conseguiu falar com eles?

pq tenho um email da sefaz do Pará onde está meu  problema e ate agora ano obtive nenhum retorno

 

[email protected] e [email protected]

[jappakill]

Eh pessoal ainda não obtive o resultado sobre o problema.

Mais alguém pode dar uma ideia que pode me ajudar?

[lulaviana]

Bom dia,

 

Pensando que o caso tivesse um desfecho legal, deixei como estava, mas novamente fui questionado sobre o mesmo erro. Da outra vez, eles nem chegaram a analisar as informações do arquivo. Desta vez, depois de alguns dias pesquisando e discutindo com o pessoal da sefa, pela sugestão de um ouvidor, resolvi mudar o código da unit pcnEventoNFe e excluir o código do Pará:

 

 

        //if Result in [32,21,15,22,24] then

        if Result in [32,21,22,24] then

           Result := 90;

 

Só assim pra ser aceito. De acordo com o manual o código deveria ser 90, mas dessa forma dá o erro: Codigo do orgao diverge da UF autorizadora.

[jappakill]

Alem desta linha q foi postada tem outro lugar para modificar.

pois modifiquei e o problema ainda persiste

[luizsistemas]

Nos meus teste eu estava tendo o mesmo problema (utilizando ambiente de homologação) e também utilizo ambiente nacional.

 

Tente setar o campo cOrgao, por exemplo:

 

...

 

with frmNfe.cNFe.EventoNFe.Evento.Add do

    begin

      infEvento.chNFe := Chave;

      infEvento.CNPJ := CNPJ;

      InfEvento.cOrgao := StrToInt(Copy(Chave,1,2));

      infEvento.dhEvento := Data;

      infEvento.tpEvento := teCCe;

      infEvento.nSeqEvento := StrToInt(nSeqEvento);

      infEvento.detEvento.xCorrecao := Correcao;

    end;

...

 

Aqui, repito, utilizei ambiente de homologação e deu certo, conforme retorno:

 

- <retEnvEvento versao="1.00" xmlns="http://www.portalfiscal.inf.br/nfe">

  <idLote>1</idLote> 

  <tpAmb>2</tpAmb> 

  <verAplic>SVAN_2.1.0</verAplic> 

  <cOrgao>21</cOrgao> 

  <cStat>128</cStat> 

  <xMotivo>Lote de evento processado</xMotivo> 

- <retEvento versao="1.00">

- <infEvento Id="ID421130000004747" xmlns="http://www.portalfiscal.inf.br/nfe">

  <tpAmb>2</tpAmb> 

  <verAplic>SVAN_2.1.0</verAplic> 

  <cOrgao>21</cOrgao> 

  <cStat>135</cStat> 

  <xMotivo>Evento registrado e vinculado a NF-e</xMotivo> 

  <chNFe>21130312152120000193550010000000731000000731</chNFe> 

  <tpEvento>110110</tpEvento> 

  <nSeqEvento>1</nSeqEvento> 

  <dhRegEvento>2013-03-30T20:32:16-03:00</dhRegEvento> 

  <nProt>421130000004747</nProt> 

  </infEvento>

  </retEvento>

  </retEnvEvento>

Editado 30 Março, 2013 por luizsistemas

[carlos.azevedo]

Estive com o mesmo problema e consegui resolver apos a dica do Luiz:

 

InfEvento.cOrgao := StrToInt(Copy(Chave,1,2));