Ir para conteúdo
  • Cadastre-se

dev botao

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

Recommended Posts

Postado

Saudações, estou precisando o retorno do protocolo da CC-e.

Faço o envio da seguinte forma:

MainForm.NFe.EnviarEventoNFe(qCCe.FieldByName('LOTE').AsInteger);

e estou tentando buscar o retorno no numero do protocolo da seguinte forma:

MainForm.NFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt;

Porem só me retorna em branco.

É isso mesmo? Estou fazendo Certo?

Att... Murilo Roniclei

Postado

Eu estou com o seguinte problema, quando transmito retorna o erro 578 "Rejeicao: A data do evento nao pode ser maior que a data do processamento" exemplo do XML que gera:

1

2

2.00

51

128

Lote de Evento Processado

2

2.00

51

578

Rejeicao: A data do evento nao pode ser maior que a data do processamento

51120910894945000158550010000000551000000558

110110

13

2012-09-13T15:07:00-04:00

estou usando os seguintes comandos:

MainForm.NFe.EnvEvento.EnvEventoNFe.Evento.Clear;

MainForm.NFe.EnvEvento.EnvEventoNFe.idLote := qCCe.FieldByName('LOTE').AsInteger; //idLote

with MainForm.NFe.EnvEvento.EnvEventoNFe.Evento.Add do

begin

infEvento.chNFe := qCCe.FieldByName('CHAVE').AsString;

infEvento.CNPJ := qCCe.FieldByName('CNPJ').AsString;

infEvento.dhEvento := now;

If (qCCe.FieldByName('EVENTO').AsString)='110110' then

infEvento.tpEvento := teCCe;

infEvento.nSeqEvento := qCCe.FieldByName('SEQUENCIAL').AsInteger;

infEvento.detEvento.xCorrecao := qCCe.FieldByName('XCORRECAO').AsString;

end;

MainForm.NFe.EnviarEventoNFe(qCCe.FieldByName('LOTE').AsInteger);//idLote

MemoResp.Lines.Text := UTF8Encode(MainForm.NFe.WebServices.EnvEvento.RetWS);

memoRespWS.Lines.Text := UTF8Encode(MainForm.NFe.WebServices.EnvEvento.RetornoWS);

//DM.ACBrNFe1.WebServices.CartaCorrecao.CCeRetorno.retEvento.Items[0].RetInfEvento.XML;

LoadXML(MemoResp, WBResposta);

///////////////

vProtocoloCCe:=Copy(MemoRespWS.Text,Pos('',MemoResp.Text)+7,15);

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

The popup will be closed in 10 segundos...