Problema ao especificar dados da transação.

[Natanael.Ribeiro]

olá, estou tentando especificar os dados da transação no tef(crédito, débito, quantidade de parcelas), mas o evento não está executando, eu coloco um pause break mas durante a operação esse evento não é executado.

procedure TForm1.ACBrTEFD1AntesFinalizarRequisicao(Req: TACBrTEFDReq);
begin
  if Req.Header = 'CRT' then
  begin
    Req.GravaInformacao(777, 777, 'REDECARD');
    Req.GravaInformacao(777, 777, 'CIELO');

    Req.GravaInformacao(800, 1, VMeuTipoCartao.toString); //0=crédito; 1=débito.
    Case VMeuTipoCartao of
      0:
      begin
        if VMinhaQtdeParc = 0 then
          Req.GravaInformacao(800, 2, '0') //0=à vista; 1=parcelado.
        else
        begin
          Req.GravaInformacao(800, 2, '1');                        //parcelado
          Req.GravaInformacao(800, 3, VMeuTipoParcelado.ToString); //0=ADM (juros por conta do dono do cartão); 1=Loja (juros por conta da loja).
          Req.GravaInformacao(800, 4, VMinhaQtdeParc.ToString);
        end;
      end;
      1: Req.GravaInformacao(800, 2, '0'); //Se for C.D., só à vista.
    end;
  end;
end;

[Daniel Simoes]

Verifique se o Evento está realmente associado... na dúvida apague-o e deixe a IDE gerar novamente...

[Natanael.Ribeiro]

realmente até no demo o evento não era acionado, eu consegui determinar o tipo da operação usando as restrições "fACBrTEFD.TEFCliSiTef.Restricoes:= '[27;28;34;35;36;41;];';"

[Daniel Simoes]

se o evento não é acionado é porque ele não está atribuído ao componente...