Ir para conteúdo
  • Cadastre-se

dev botao
  • Este tópico foi criado há 4133 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado

Amigos,

No processo de manifestação de Notas Destinadas eu não estou conseguindo confirmar notas fiscais emitidas por fornecedores de outra UF, apenas os da minha própria UF (ES). Para confirmar notas de outro Estado eu preciso configurar em algum lugaro o WS que recebeu a nota?

  • Consultores
Postado

Paulo,

O arquivo que você anexou se refere a consulta da situação de uma NFe, essa opção só é utilizada para você consultar a situação de uma NFe que você emitiu.

Portanto não tem nada haver com a Manifestação do Destinatário, onde eu confirmo ou não uma NFe que eu recebi, neste caso "eu" sou o destinatário e não o emitente da NFe.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

  • Consultores
Postado

Paulo,

Se você esta se manifestando sobre uma NFe, essa nota não foi emitida por você.

Você recebeu essa nota do seu fornecedor ou suposto fornecedor.

A SEFAZ disponibilizou o serviço de Manifestação do Destinatário, veja bem Destinatário e não Emitente.

Com ele é possível saber as notas que foram emitidas contra o seu CNPJ, mesmo que o emitente não envie a nota por e-mail.

Desta forma é possível saber se alguem esta emitindo notas sem você ter comprado algo dele.

É neste momento que você informa a SEFAZ se a operação é verdadeira ou não.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Postado

Italo,

Entendi o funcionamento do processo. Eu primeiro consulto as notas destinadas e tenho o retorno:

24/10/2012 10:40:05 - Nfe.ConsultarDestinadas("27550193000100","1","0")

OK:

[DESTINADAS]

ultNSU=5552542572

ChNFe=33120968571041000171550010008907701008366391

CNPJCPF=68571041000171

xNome=OPTOTAL HOYA S/A

dEmi=14/09/2012

vNF=754,32

IE=84659460

tpNF=1

DhRecbto=14/09/2012 16:09:39

cSitNFe=1

cSitConf=0

ChNFe=33120968571041000171550010008907721006618711

CNPJCPF=68571041000171

xNome=OPTOTAL HOYA S/A

dEmi=14/09/2012

vNF=139,2

IE=84659460

tpNF=1

DhRecbto=14/09/2012 16:09:39

cSitNFe=1

cSitConf=0

ChNFe=32120927550193000534550010000000281000000287

CNPJCPF=27550193000534

xNome=OTICAS PARIS LTDA

dEmi=14/09/2012

vNF=136,7

IE=081251165

tpNF=1

DhRecbto=14/09/2012 16:16:39

cSitNFe=1

cSitConf=0

Jogo a lista em um dataset e apresento ao operador. Ofereço as opções de dar ciência, confirmar, não confirmar e desconhecer a existência da transação fiscal. Baseado no registro selecionado, eu envio ao acbrnfemonitor a chave e a opção selecionada. Está retornando esta falha:

24/10/2012 10:40:10 - NFe.enviarmanifestacao("33120968571041000171550010008907701008366391","210200","")

OK: Lote de evento processado

[MANIFESTACAO]

Versao=AN_1.0.0

tpAmb=1

VerAplic=AN_1.0.0

CStat=213

XMotivo=Rejeicao: CNPJ-Base do Emitente difere do CNPJ-Base do Certificado Digital

CUF=91

ChNFe=33120968571041000171550010008907701008366391

DhRecbto=24/10/2012 10:40:11

NProt=

tpEvento=210200

xEvento=

nSeqEvento=1

CNPJDest=

emailDest=

Como ainda não existe a confirmação no acbrnfemonitor, criei um comando, baseado no demo do acbrnfe:

ELSE IF Cmd.Metodo = 'enviarmanifestacao' THEN

BEGIN // Parâmetros: 0=Chave, 1=Tipo do Evento, 2=Justificativa

ACBrNFe1.EventoNFe.Evento.Clear;

WITH ACBrNFe1.EventoNFe.Evento.Add DO

BEGIN

infEvento.chNFe := Cmd.Params(0);

infEvento.CNPJ := Copy(Cmd.Params(0), 7, 14);

infEvento.dhEvento := IncMinute(now, -70);

infEvento.tpEvento := StrToTpEvento(oK, Cmd.Params(1));

infEvento.cOrgao := StrToInt(Copy(Trim(Cmd.Params(0)),1,2));

infEvento.detEvento.xJust := Cmd.Params(2);

END;

ACBrNFe1.EnviarEventoNFe(StrToInt(Copy(Cmd.Params(0), 26, 9)));

WITH ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento DO

BEGIN

Cmd.Resposta := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.xMotivo + sLineBreak +

'[MANIFESTACAO]' + sLineBreak +

'Versao=' + verAplic + sLineBreak +

'tpAmb=' + TpAmbToStr(tpAmb) + sLineBreak +

'VerAplic=' + VerAplic + sLineBreak +

'CStat=' + IntToStr(cStat) + sLineBreak +

'XMotivo=' + xMotivo + sLineBreak +

'CUF=' + IntToStr(cOrgao) + sLineBreak +

'ChNFe=' + chNFe + sLineBreak +

'DhRecbto=' + DateTimeToStr(ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento) + sLineBreak +

'NProt=' + nProt + sLineBreak +

'tpEvento=' + TpEventoToStr(tpEvento) + sLineBreak +

'xEvento=' + xEvento + sLineBreak +

'nSeqEvento=' + IntToStr(nSeqEvento) + sLineBreak +

'CNPJDest=' + CNPJDest + sLineBreak +

'emailDest=' + emailDest + sLineBreak +

'XML=' + ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.XML + sLineBreak +

'cOrgao=' + IntToStr(cOrgao) + sLineBreak +

'dhRegEvento=' + DateTimeToStr(dhRegEvento) + sLineBreak +

'Id=' + Id + sLineBreak;

END;

END;

Postado

Italo, o terceiro parâmetro é para o caso de não realização da operação, onde eu posso fornecer uma justificativa.

Acrescentei mais um parâmetro que deu um passo adiante no problema. Antes eu informava o CNPJ do emitente da nota e agora iinformo o CNPJ do destinatário (minha empresa). O erro agora se refere ao código do orgão:

NFe.enviarmanifestacao("32120932047581000456550010000038521490609540","210200","","27550193000100 ")

OK: Lote de evento processado

[MANIFESTACAO]

Versao=AN_1.0.0

tpAmb=1

VerAplic=AN_1.0.0

CStat=657

XMotivo=Rejeicao: Codigo do Orgao diverge do orgao autorizador

CUF=91

ChNFe=32120932047581000456550010000038521490609540

DhRecbto=24/10/2012 11:34:10

NProt=

tpEvento=210200

xEvento=

nSeqEvento=1

CNPJDest=

emailDest=

  • 5 meses depois ...
Postado

Estou um problema:

 

Tenho a seguinte NFE para manifestação,  

43130403442315000187550010000166871018349494

 

O Acbr esta colocando no código do orgão 43, e aparece a seguinte mensagem "Codigo do orgao diverge do orgao autorizador", vi que na mensagem de retorno vinha com código do Orgao = 91

dai preenchi o codigo do orgão com 91 e voi aprovado a manifestação. Só que o codigo 43 não foi eu quem informou foi o acbr.

Liandro Costa

Analista / Programador Delphi

email: [email protected]

Sapucaia do Sul - RS

 

Postado
<retEnvEvento versao="1.00" xmlns="http://www.portalfiscal.inf.br/nfe">
idLote>1304221517</idLote>
<tpAmb>1</tpAmb>
<verAplic>AN_1.0.0</verAplic>
<cOrgao>91</cOrgao>
<cStat>128</cStat>
<xMotivo>Lote de evento processado</xMotivo>
<retEvento versao="1.00"><infEvento>
<tpAmb>1</tpAmb>
<verAplic>AN_1.0.0</verAplic>
<cOrgao>91</cOrgao>
<cStat>657</cStat>
<xMotivo>Rejeicao: Codigo do Orgao diverge do orgao autorizador</xMotivo>
<chNFe>43130403442315000187550010000166871018349494</chNFe>
<tpEvento>210210</tpEvento>
<nSeqEvento>1</nSeqEvento>
<dhRegEvento>2013-04-22T15:20:15-03:00</dhRegEvento></infEvento></retEvento></retEnvEvento>

Liandro Costa

Analista / Programador Delphi

email: [email protected]

Sapucaia do Sul - RS

 

  • Moderadores
Postado

Italo, o terceiro parâmetro é para o caso de não realização da operação, onde eu posso fornecer uma justificativa.

Acrescentei mais um parâmetro que deu um passo adiante no problema. Antes eu informava o CNPJ do emitente da nota e agora iinformo o CNPJ do destinatário (minha empresa). O erro agora se refere ao código do orgão:

NFe.enviarmanifestacao("32120932047581000456550010000038521490609540","210200","","27550193000100 ")

OK: Lote de evento processado

[MANIFESTACAO]

Versao=AN_1.0.0

tpAmb=1

VerAplic=AN_1.0.0

CStat=657

XMotivo=Rejeicao: Codigo do Orgao diverge do orgao autorizador

CUF=91

ChNFe=32120932047581000456550010000038521490609540

DhRecbto=24/10/2012 11:34:10

NProt=

tpEvento=210200

xEvento=

nSeqEvento=1

CNPJDest=

emailDest=

Pessoal boa tarde!

Este comando NFe.enviarmanifestacao() não foi acrescentado no ACBrNFeMonitor correto?

Pergunto porque no post #9 vi o comando Nfe.ConsultarDestinadas() que oficialmente passou a ser: NFe.ConsultaNFeDest() na versão que o André disponibilizou para teste.

Minha dúvida é se poderia o comando NFe.enviarmanifestacao() se apresentar com outro nome nas ultimas compilações, mas como não localizei também no Help do ACBrNFeMonitor creio que não foi incluído.

É isto mesmo?


logoacbr.pngConheça o Portal do Projeto ACBr

Ajude o Projeto ACBr crescer - Assine o SAC ACBr
Assine um dos planos de longa duração do SAC ACBr, obtenha Descontos Especiais, Parcele no Cartão e ainda ganhe Brindes Exclusivos. Saiba mais aqui

Conheça o ACBrLib, o ACBr de forma nativa para qualquer linguagem de programação. Saiba mais aqui

 

 

 

 

Postado
<envEvento xmlns="http://www.portalfiscal.inf.br/nfe" versao="1.00">
<idLote>1304221517</idLote>
<evento xmlns="http://www.portalfiscal.inf.br/nfe" versao="1.00">
<infEvento Id="ID2102104313040344231500018755001000016687101834949401">
<cOrgao>43</cOrgao>
<tpAmb>1</tpAmb>
<CNPJ>93632370000122</CNPJ>
<chNFe>43130403442315000187550010000166871018349494</chNFe>
<dhEvento>2013-04-22T15:17:49-03:00</dhEvento>
<tpEvento>210210</tpEvento>
<nSeqEvento>1</nSeqEvento>
<verEvento>1.00</verEvento>
<detEvento versao="1.00">
<descEvento>Ciencia da Operacao</descEvento>
...

Liandro Costa

Analista / Programador Delphi

email: [email protected]

Sapucaia do Sul - RS

 

Postado

Lendo alguns tópicos passados achei isso, que foi alterado...

 

 

 

Pessoal, consegui realizar o cancelamento comentando o que tinha sido feito anteriormente na linha 167 da Unit pcnEventoNFe

function TInfEvento.getcOrgao: integer;

 

na parte em que está eu comentei e passou normalmente:

 

 

     {Estados que utilizam a SVAN: ES, MA, PA, PI, RN => Devem utilizar 91}
//     if Result in [32,21,15,22,24] then
//       Result := 91;

Liandro Costa

Analista / Programador Delphi

email: [email protected]

Sapucaia do Sul - RS

 

Postado

 

Lendo alguns tópicos passados achei isso, que foi alterado...

 

 

 

Pessoal, consegui realizar o cancelamento comentando o que tinha sido feito anteriormente na linha 167 da Unit pcnEventoNFe

function TInfEvento.getcOrgao: integer;

 

na parte em que está eu comentei e passou normalmente:

 

 

     {Estados que utilizam a SVAN: ES, MA, PA, PI, RN => Devem utilizar 91}
//     if Result in [32,21,15,22,24] then
//       Result := 91;

 

 

 

Tambem estou sofrendo com esse problema nas configuracoes do acbr codigo orgao = 43 (RS) so que esta dando o mesmo erro:

Chave:

43130490710583000137550010000237781000237780

 

 

 
Não foi possível Efetuar o Vínculo
Ambiente: 2
Versão: AN_1.0.0
Cod. Orgão: 91
Status: 657
Rejeicao: Codigo do Orgao diverge do orgao autorizador
NFE: 43130490710583000137550010000237781000237780
Tipo Evento: 210200
Sequência: 1
Data/Hora: 23/04/2013 17:07:29
 
alguem conseguiu resolver sem tem que trocar para 91?
 
Obs: estou com todos os fontes atualizados
Postado

Sim, com uma POG.

Se o retorno for status = 657 -  Codigo do Orgao diverge do orgao autorizador.

Isso resolveu meu problema.

 

  ACBrNFe1 := TACBrNFe.Create(nil);

  try
    ConfiguraACBRNFE(ACBrNFe1);
 
    NumeroLote := StrToInt(FormatDateTime('yymmddhhmm', NOW));
 
    ACBrNFe1.EventoNFe.Evento.Clear;
    ACBrNFe1.EventoNFe.idLote := NumeroLote;
    with ACBrNFe1.EventoNFe.Evento.Add do
    begin
      infEvento.chNFe := Chave;
      infEvento.CNPJ := CNPJ;
      infEvento.dhEvento := now;
      infEvento.tpEvento := teManifDestCiencia;

;

    end;
 
    // Enviar o evento de manifestação
    if ACBrNFe1.EnviarEventoNFe(NumeroLote) then
    begin
      // 657 = Rejeicao: Codigo do Orgao diverge do orgao autorizador
      //       Em todos os casos testados deveria ser o 91 que vem no arquivo de resposta
      //       que eu atribuo ele ao evento e reenvio..
      if ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 657 then
      begin
        ACBrNFe1.EventoNFe.Evento.Items[0].InfEvento.cOrgao := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.cOrgao;
        if not ACBrNFe1.EnviarEventoNFe(NumeroLote) then
        begin
          with ACBrNFe1.WebServices.EnvEvento do
          begin
            raise Exception.Create('Ocorreram erros ao tentar efetuar a manifestação:' + sLineBreak +
                                   'Lote: ' + IntToStr(EventoRetorno.idLote) + sLineBreak +
                                   'Ambiente: ' + TpAmbToStr(EventoRetorno.tpAmb) + sLineBreak +
                                   'Orgao: ' + IntToStr(EventoRetorno.cOrgao) + sLineBreak +
                                   'Status: ' + IntToStr(EventoRetorno.cStat) + sLineBreak +
                                   'Motivo: ' + EventoRetorno.xMotivo);
          end;
        end;
      end;
  • Curtir 1

Liandro Costa

Analista / Programador Delphi

email: [email protected]

Sapucaia do Sul - RS

 

  • 1 mês depois ...
Postado

boa tarde,

 

alguem mais comenta sobre, parece que agora aqui no RS em notas com valor maior que 100.000,00 sera obrigatorio para 1/07/2013.

 

Luis.

Postado

Pessoal, estou tendo esse problema tbm..

Sempre no retorno ele vem como orgão 91, mas a NF-e é de SP 35.

 

657 - Rejeicao: Codigo do Orgao diverge do orgao autorizador

 

Estou com o fonte do acbr atualizado.. alguém conseguiu resolver sem precisar utilizar a POG?

 

Obrigado.

Postado (editado)

Pessoal, estou tendo esse problema tbm..

Sempre no retorno ele vem como orgão 91, mas a NF-e é de SP 35.

 

657 - Rejeicao: Codigo do Orgao diverge do orgao autorizador

 

Estou com o fonte do acbr atualizado.. alguém conseguiu resolver sem precisar utilizar a POG?

 

Obrigado.

 

 

Alex , "Manifestos de NF's de SP" Implemente isso :

 

infEvento.cOrgao  := 91 ;

 

...algumas UF's utilizam SVAN , fiz uma function própria fora do componente pra isso ,

Editado por marcelo_sp
Postado

Sou de MG, quero manifestar a confirmação de uma NFe, esta dando o erro

"Rejeicao: Codigo do Orgao diverge do orgao autorizador"

Chave da NF, 31130600952948000147550050002894001700400869

 

Uso o seguinte código para preencher a manifestacação:

 

 with DM.ACBrNFe1.EventoNFe.Evento.Add do

  begin
    infEvento.chNFe    := Trim(OnlyNumber(edChaveNfe.Text));
    infEvento.CNPJ     := RegEmpresa.Cnpj; // CNPJ da Empresa que esta transmitindo
    infEvento.dhEvento := now;
    infEvento.tpEvento := teManifDestConfirmacao;
    infEvento.cOrgao   := StrToInt(copy(RegEmpresa.CidadeIBGE,1, 2)); //CidadeIBGE =  IBGE do Munucipio da empresa que esta transmitindo a manifestação

 

  end;
 
 
Faço isso usando o WS de MG, será que tenho que MUDAR a UF para a UF do emissor da NFe ?

 

Thiago Balbino

Analista de Sistemas Programador

email: [email protected]

Muriaé - MG

 

  • Este tópico foi criado há 4133 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.