Cancelando Ecf

[Marcos Gerene]

Boa tarde,

 

Continuando a implementação do ACBrTef, hoje ele já pede meu cartão, escolhe  forma de pagamento

pede a senha aprova a transação...

 

mas quando ele deveria lançar o pagamento na impressora, tenho um retorno -24 da DLL e isso

faz com que o cupom seja cancelado...

 

Rotina:

 

procedure TFrmTef.TefComandaECFPagamento(IndiceECF: String; Valor: Double;

  var RetornoECF: Integer);

var

iretorno:integer;

begin

case modeloImpressora of

   4: iRetorno := Daruma_FI_EfetuaFormaPagamento(xFormaPagto, FormatFloat('0.00',fValor));

   5: iRetorno := Bematech_FI_EfetuaFormaPagamento(xFormaPagto, FormatFloat('0.00',fValor));

   end;

RetornoECF:=iRetorno;

end;

 

PS: Uso V$Pague (não pude mudar para o SiTef) + ACBRTEFD + DLL da Bematech...

 

Desde já, Obrigado

[Daniel Simoes]

Acho que somente o Fabricante da DLL poderia lhe ajudar no controle de erros da mesma...

[Marcos Gerene]

Bom dia Daniel,

 

Então achei estranho porque quando faço algum pagamento sem cartão, ou seja, chamo a função

da DLL "por fora" e paga e dá o retorno 1 normal...

 

Estou pensando seriamente em descartar algumas coisas e usar o ACBRECF também... ele funciona "normal" com

o emulador da bematech?

[Daniel Simoes]

sim, funciona... em todos os emuladores de ECF...

 

Sobre a DLL, inicie descobrindo o que significa o erro -24