Carta de correção

[johnbh3]

Bom dia,

 

Estou com um erro na carta de correeção que ao depurarar da um erro que o número do lote não e um numero inteiro valido.

  with ACBrNFe1.EventoNFe.Evento.Add do
   begin
     infEvento.chNFe      := Chave;
     infEvento.CNPJ       := FrmPrincipal.CNPJ_EMP;
     infEvento.dhEvento   := now;
     infEvento.tpEvento   := teCCe;
     infEvento.nSeqEvento := StrToInt(nSeqEvento);
     infEvento.detEvento.xCorrecao := Correcao;
   end;

  Try
      ACBrNFe1.EnviarEvento(StrToInt(idLote)); 

Erro na linha enviar !

[johnbh3]

Perdão resolvido o lote coloquei com mmyyddhhnn

[Victor H. Gonzales - Panda]

o problema é na sua codificação, perceba que você está usando int32 StrToInt;

você precisa corrigir sua codificação para int64;

esse assunto está muito debatido no forum e no discord, tambem saiu vários vídeos a respeito;

 

Essa mascara sua está errada
mmyy vai te gerar mes/ano, sendo assim tu fere a regra de NSU (numero sequencial unico)
sendo que você terá vários ciclos iniciando de 01 a 12, só alterando o 3 e 4 dígitos, sugiro ler a NT referente ao controle de lote, o mais simples é um NSU da empresa, não precisa ser temporal;