Usando Múltiplo Cartão em ACBrTEFAPI

herculanojs · 30 Agosto

Boa noite

Primeiramente não consegui criar o tópico diretamente em TEF. Não dá opção para selecionar ou criar novo tópico ali.

Estou enfrentando uma problemática na implementação de pagamento com múltiplos cartões no tef.

Faço a venda passando uma parte em um cartão, e outra parte em outro cartão.

O processo faço usando a função ACBrTEFAPI.EfetuarPagamento.

Quando vou concluir a transação finalizando a venda usando a função ACBrTEFAPI.FinalizarTransacoesPendentes apenas o último cartão esta sendo confirmando, ficando pendente o primeiro.

Debugando, pude observar que na função o loop efetuado em RespostasTEF retorna apenas um, sendo a última transação.

Alguém poderia me auxiliar.

procedure TACBrTEFAPIComum.FinalizarTransacoesPendentes(Status: TACBrTEFStatusTransacao);
var
i: Integer;
ATEFResp: TACBrTEFResp;
begin
GravarLog('FinalizarTransacoes( '+
GetEnumName(TypeInfo(TACBrTEFStatusTransacao), integer(Status) )+' )');

for i := 0 to RespostasTEF.Count-1 do
begin
ATEFResp := RespostasTEF[i];
if ATEFResp.Confirmar and // Transação requer Confirmação ?
(not ATEFResp.CNFEnviado) then // Ainda não enviou Terceira Perna ?
begin
FinalizarTransacao( ATEFResp.Rede,
ATEFResp.NSU,
ATEFResp.Finalizacao,
Status );
end;
end;
end;