[Campo CEST - I05c]

26 minutos atrás, Damires disse:

Olá.

Um cliente(indústria) está cobrando a impressão do CEST na DANFE, assim como NCM, CST e CFOP. Seu contador argumenta o seguinte:

CONVÊNIO ICMS 146, DE 11 DE DEZEMBRO DE 2015

Cláusula primeira Os dispositivos a seguir indicados do Convênio ICMS 92/15, de 20 de agosto de 2015, passam a vigorar com as seguintes redações:

II - o §1° da cláusula terceira:

 “§ 1º ... o contribuinte deverá mencionar o respectivo CEST no documento fiscal ..."

Mas não aparece esse campo na DANFE, há alguma previsão de ter isso?

Grata!

 

Damaris,

Desculpa se entendi mal a pergunta, mas é o seguinte:

O DANFE ( Documento Auxiliar de Nota Fiscal Eletrônica ) não é o Documento Fiscal e sim o XML.

De acordo com Nota Técnica 002-003/2015, não terá alteração no DANFE, sairá apenas no XML por item.

[Como conseguir o Numero de Protocolo de uma NF-e Denegada?]

Então Angelo...

Ja fiz o debug e cai exatamente no "else if ( StatusRetorno = 205 ) then " o WebService pelo ACBr não me dá o numero de Protocolo... já olhei varias propriedades do WebService.Retorno como por exemplo a RetornoWS que retorna um tipo de XML onde também não tem nem cheiro de Protocolo.

Mas a NF-e esta já no SEFAZ e tem o numeor de protocolo normal lá... só esta denegada....

[Como conseguir o Numero de Protocolo de uma NF-e Denegada?]

Bom dia, Pessoal.

Estou com um problema aqui, onde não consigo pegar o numero de protocolo de uma NF-e denegada (Status = 205).

Mais ou menos o meu trecho é assim:

Enviou := ACBrNFe1.Enviar(0); // Enviando NF-e por Definitivo.

Quando envia uma NF-e denegada da a seguinte mensagem:

"Rejeição: NF-e está denegada na base de dados da SEFAZ [nRec]"

Com isso entra no meu tratamento de except:

except

on E: Exception do

begin

Application.MessageBox(PChar(e.Message), 'Atenção', MB_OK);

if StatusRetorno = 0 then

StatusRetorno := ACBrNFe1.WebServices.Retorno.cStat;

ACBrNFe1.WebServices.Retorno.Recibo := ACBrNFe1.WebServices.Enviar.Recibo;

if ( StatusRetorno = 204 ) then // Rejeição: Duplicidade de NF-e

begin

............

end

else if ( StatusRetorno = 205 ) then // Rejeição: NF-e está denegada na base de dados da SEFAZ

begin

AuxChave := copy(ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID, (length(ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID)-44)+1, 44);

ACBrNFe1.WebServices.Retorno.Executar;

AuxProtocolo := ACBrNFe1.WebServices.Retorno.Protocolo; // Protocolo (uso autorizado) ou (uso denegado)

GravaNotaEnviada(.......);

end;

Podem ver que tento até dar um Retorno.Executar e mesmo assim não me retorno o numero de Protocolo... Alguém já passou por isso ou sabe como posso pegar esse Numero de Protocolo quando a NFe foi denegada no momento que foi enviada?

A unica coisa que consigo é o Numero de Recibo e o Status e a Chave.

Eu uso Delphi 7 e componte ACBrNFe2 no modo Capicom (Fiz Update semana passada no ACBr).