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);