Boa tarde
Estamos começando a Utilizar as Novas ECF Blindadas MP 4200 em nosso estado e tive alguns problemas.
procedure TDMECF.ACBrTEFDComandaECFImprimeVia(TipoRelatorio
: TACBrTEFDTipoRelatorio; Via: Integer; ImagemComprovante: TStringList;
var RetornoECF: Integer);
begin
try
case TipoRelatorio of
trGerencial:
begin
vLocalErro := 'Imprimindo Via Gerencial';
ECF.LinhaRelatorioGerencial(ImagemComprovante.Text);
end;
trVinculado:
begin
vLocalErro := 'Imprimindo Via Vinculado';
ECF.LinhaCupomVinculado(ImagemComprovante.Text)
end;
end;
RetornoECF := 1;
except
FrmPdv.LblStatus.Caption :=
'Ocorreu um erro no TEF: Imprimindo Via Gerencial ' + vLocalErro;
Gravar_Log(FrmPdv.LblStatus.Caption);
RetornoECF := 0;
end;
end;
Nesta Função quando enviamos ao ECF ele dá erro, segue o log para verificação...Alguém já passou por isso?
Agradeço a Atenção