Cancelamento De Nfce

[Dércio Luis Zanatta]

Bom dia

Lendo alguns tópicos aqui no fórum, descobri que para efetuar cancelamento de NFCe 3.10, devo fazer cancelamento por evendo..

Me basei pelo exemplo e fiz assim:

            FrmNfce.ACBrNFe1.EventoNFe.Evento.Clear;

            with FrmNfCe.ACBrNFe1.EventoNFe.Evento.Add do

               begin

                 infEvento.chNFe := VChave_NfCe;

                 infEvento.CNPJ   := VCnpj_Estab;

                 infEvento.dhEvento := now;

                 infEvento.tpEvento := teCancelamento;

                 infEvento.detEvento.xJust := AllTrim(EdtJustificativa.Text);

                 infEvento.detEvento.nProt := VProt_Auto;

               end;

              Try

                FrmNfCe.ACBrNFe1.EnviarEventoNFe(1);

              Except on e:Exception do

                Begin

                 ShowMessage('Erro ao enviar cancelamento'+chr(10)+chr(13)+

                            e.Message);

                  FrmNfce.Free ;

                  M4202Erro:='1' ;

                  Exit ;

 

                End ;

              End ;

 

 

              ShowMessage(FrmNfce.ACBrNFe1.WebServices.EnvEvento.RetWS+chr(10)+chr(13)+

                          FrmNfce.ACBrNFe1.WebServices.EnvEvento.RetornoWS);

 

 

O cancelamento até funcionou, porém tenho duas dúvidas:

 

1 - Se eu passar no campo Justificativa uma String com tanho menor que 15, da erro de validação dizendo que a Tag xJust não é válido. Isso procede ?  a justificativa tem que ter mais que 14 dígitos ?

 

2 - FrmNfce.ACBrNFe1.WebServices.EnvEvento.RetWS e FrmNfce.ACBrNFe1.WebServices.EnvEvento.RetornoWS retornam todo o conteúdo do xml de retorno. Como faço para pegar somente o Cstat e o Xmotivo ?

 

No aguardo..

[André Ferreira de Moraes]

1 - Se eu passar no campo Justificativa uma String com tanho menor que 15, da erro de validação dizendo que a Tag xJust não é válido. Isso procede ?  a justificativa tem que ter mais que 14 dígitos ?

Veja http://www.nfe.fazenda.gov.br/portal/exibirArquivo.aspx?conteudo=wZKoBZaKXMI=

2 - FrmNfce.ACBrNFe1.WebServices.EnvEvento.RetWS e FrmNfce.ACBrNFe1.WebServices.EnvEvento.RetornoWS retornam todo o conteúdo do xml de retorno. Como faço para pegar somente o Cstat e o Xmotivo ?

ACBrNFe1.WebServices.EnvEvento.EventoRetorno.TpAmb

ACBrNFe1.WebServices.EnvEvento.EventoRetorno.verAplic

ACBrNFe1.WebServices.EnvEvento.EventoRetorno.cStat

ACBrNFe1.WebServices.EnvEvento.EventoRetorno.xMotivo

ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.chNFe

ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento

ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt

[Dércio Luis Zanatta]

Obrigado pela resposta, mas tentei fazer assim e não funcionou...

 

ACBrNFe1.WebServices.EnvEvento.EventoRetorno.cStat

Aqui pra mim não existe CStat no evendoRetorno

ACBrNFe1.WebServices.EnvEvento.EventoRetorno.xMotivo

o xmotivo retorna "Lote de evendo processado"  na verdade que quero pegar o motivo da rejeição:

 

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

<idLote>1</idLote>

<tpAmb>2</tpAmb>

<verAplic>RS20140728170403</verAplic>

<cOrgao>43</cOrgao>

<cStat>128</cStat>

<xMotivo>Lote de Evento Processado</xMotivo>

<retEvento versao="1.00">

<infEvento>

<tpAmb>2</tpAmb>

<verAplic>RS20140728170403</verAplic>

<cOrgao>43</cOrgao>

<cStat>501</cStat>

<xMotivo>

Rejeicao: Prazo de Cancelamento Superior ao Previsto na Legislacao

</xMotivo>

<chNFe>43140795821310000183650010000004281000004284</chNFe>

<tpEvento>110111</tpEvento>

<nSeqEvento>1</nSeqEvento>

<dhRegEvento>2014-07-30T09:26:32-03:00</dhRegEvento>

</infEvento>

</retEvento>

</retEnvEvento>

 

Preciso os dois que estão em negrito acima.. tem como pegar ?

[André Ferreira de Moraes]

ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat

ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo

[Dércio Luis Zanatta]

Boa... funcionou !!

Muito obrigado.