Alterar nome dos Log de Envio e Retorno

[infopointerp]

Olá boa tarde,

Gostaria de alterar os nome dos arquivos env-lot.xml e pro-lot.xml para colocar uma data na frente para diferenciar a cada envio.

Olhando no fonte no momento do envio na classe abaixo gera o prefixo com o horário.

function TDFeWebService.GerarPrefixoArquivo: String;
begin
  Result := FormatDateTime('yyyymmddhhnnss', Now);
end;

Mas é Sobrescrito com a função:

 

function TNFeRecepcao.GerarPrefixoArquivo: String;
begin
  if FSincrono then  // Esta procesando nome do Retorno Sincrono ?
  begin
    if FRecibo <> '' then
    begin
      Result := Recibo;
      FPArqResp := 'pro-rec';
    end
    else
    begin
      Result := Lote;
      FPArqResp := 'pro-lot';
    end;
  end
  else
    Result := Lote;
end;

Ficando dessa forma o "LOTE-pro-lot.xml". Tem alguma forma de eu passar pro componente como gostaria de pegar o prefixo?

[Italo Giurizzato Junior]

Boa tarde,

Em vez de alterar o prefixo do nome do arquivo, porque você não adota um numero sequencial para o Lote.

Desta forma você consegue diferenciar e no banco de dados na tabela das notas acrescente mais um campo para armazenar o numero do lote a qual ela pertence.

[infopointerp]

Obrigado