Jump to content

Delphi chamada_delphi.png acbr.png

C6 chamada_c6.png botao.png

Erro Cc-E List Index Out Of Bounds


Go to solution Solved by Italo Giurizzato Junior,
  • Este tópico foi criado há 2854 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

CT-e 2.0

 

To fazendo uma carta de correção 

 

da erro neste comando,  list index out of bounds

 

 

unit

unit ACBrCTeWebServices;

 

 

function TCTeEnvEvento.Executar: Boolean;

 

 

    FEventoRetorno                := TRetEventoCTe.Create;
    FEventoRetorno.Leitor.Arquivo := FRetWS;
    FEventoRetorno.LerXml;

    TACBrCTe( FACBrCTe ).SetStatus( stCTeIdle );
    aMsg := 'Ambiente : '+TpAmbToStr(EventoRetorno.retEvento.Items[0].RetInfEvento.tpAmb)+LineBreak+
            'Versão Aplicativo : '+EventoRetorno.retEvento.Items[0].RetInfEvento.verAplic+LineBreak+
            'Status Código : '+IntToStr(EventoRetorno.retEvento.Items[0].RetInfEvento.cStat)+LineBreak+
            'Status Descrição : '+EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo+LineBreak;


    if (EventoRetorno.retEvento.Count > 0) then
      aMsg := aMsg + 'Recebimento : '+DFeUtil.SeSenao(EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento = 0,
  '',
         

     o que devo fazer ?

post-4970-0-51972500-1406671312_thumb.jp

post-4970-0-17296300-1406671313_thumb.jp

post-4970-0-31954400-1406671314_thumb.jp

1-ped-evento.xml

51140709911489000128570010000013091000013090-cte.xml

Edited by hetoandrade
Link to comment
Share on other sites

  • Consultores
  • Solution

Bom dia Heto Andrade,

 

O componente ACBrCTe agora possui uma propriedade de configuração:

 

Configuracao.WebService.Salvar := False ou True;

 

Atribua o valor True a essa propriedade.

 

Desta forma os XMLs de envio e de retorno da SEFAZ serão gravados de forma completa, para identifica-los, no nome consta -soap.

 

Por exemplo:

 

1-ped-evento-soap.xml (envio)

e

1-eve-soap.xml (retorno)

 

Para descobrir o porque desse erro, configure com True a propriedade acima e realize o teste novamente, depois post como anexo os arquivo de envio e de retorno, mostrados no exemplo acima.

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Link to comment
Share on other sites

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.