Erro Com Multiplos Cartoes + Saque (Sitef Seq 67)

[guilhermeleal]

Boa Tarde!
 
Estou realizando a Pre-Homologação da SiTEF, e para os fins desta sequencia de teste, utilizo tanto o ACBrECF quanto o ACBrTEFD.
 
A sequencia diz o seguinte:
 
"
Execução:
- Realizar uma transação com cartão de Débito
 
- Selecionar a opção: á vista
- Valor do Saque: R$ 10,99
 
- Passar o 2º cartão em crédito à vista
- Ao solicitar taxa de serviço digitar até 10% do valor da venda
 
- Prosseguir com a venda normalmente
 
 
Resultado Esperado:
- Verificar se o valor do saque foi atribuído corretamente e lançado como troco no cupom fiscal.
 
- Verificar comandos de mensagem retornados.
 
- Exibir mensagem retornada para o operador.
 
- Há impressão de cupom.
 
- A transação será autorizada
"
 
O meu problema ocorre justamente no "Verificar se o valor do saque foi atribuído corretamente e lançado como troco no cupom fiscal". O ACBrTEFD nao esta passando (ao menos nao consegui encontrar ao debugar o componente) o valor do saque parao ECF, e portanto ele nao sai como troco no cupom.
 
Veja bem, o valor do saque é contaiblizado normalmente na transação de debito, apenas nao é contabilizado como "Troco" no Cupom.
 
Testei pelo TEFDemo, com diferentes Ordens de transação (primeiro Debito, depois Credito, e vice-versa), e o resultado foi o mesmo.
 
Eu tentei agregar manualmente o valor do Saque obtido pela propriedade "resp", mas isso faz com que ele seja posteriormente agregado no valor em aberto, o que acarreta de nao conseguir realizar a segunda transação (excede o valor faltante do TEF).
 
Desde já, grato pela atenção.

Editado 26 Junho, 2013 por guilhermeleal

[guilhermeleal]

Ninguem?

[Juliomar Marchetti]

Sim para que ele saia no troco ele deve ser adicionando a forma de pagamento cartão eu acredito correto?

então é só alterar o valor que foi passado do cartão adicionando o valor e ao inserir na ecf deve somar o valor

[guilhermeleal]

Se deveria ser assim, nao esta funcionando.

 

Ex:

Cupom de R$100.

 

Vou fazer 2 pagamentos, um de debito e um de credito, cada um no valor de R$50.

No de debito, eu vou adicionar um saque de R$10, o que vai resultar em uma transação de R$60 para o cliente, mas o ACBRTEFD sabe que é 50 + 10. A transação é autorizada com sucesso, e eu pego os 2 valores (50 + 10) e mando pagar estes valores no ECF.

 

Ao tentar fazer a solicitação de credito de R$50, o ACBRTEFD nao permite, por entender que o valor que eu ainda posso fazer é apenas de R$40. Isso quer dizer que ao pagar no ECF, ele deduziu o valor do saque do SaldoAPagar.

 

Este é o problema que eu nao consegui contornar.

[Juliomar Marchetti]

Então seu problema está no evento oninfoecf

lá tem subtotal e totalpagar

 

vai debugando passo a passo e verifica os retornos 

pois ali você tem que retornar o valor que falta a pagar e tratar a parte do acréscimo do cartão

[guilhermeleal]

Realmente Juliomar, havia um erro meu neste evento.

 

Autorizou as 2 solicitações TEF corretamente, o valor do saque saiu no vinculado.. massssssss........ nao sai como troco no cupom (requisito da sequencia).

 

Em qual evento eu devo configurar para que ele saia como troco, e como devo fazer, pois nem no TEFDemo isso acontece.

[Juliomar Marchetti]

Como falei você deve somar a finalizadora esse valor de saque assim será gerado o troco

esse é o único caso em que você modifica o valor vindo para a finalizadora cartão

[guilhermeleal]

Ahhhh, achei que o ACBR ja tratava esta situação.

 

Eu ate tentei fazer desta forma Juliomar, mas nao deu muito certo. Tu pode me passar eu qual evento devo realizar o tratamento "Saque + ValorTEF" para que fique correto?

 

Tentei da seguinte forma (bem parecido com o que é implementado no TEFDemo):

procedure TTEF.ACBRTEFComandaECFPagamento(IndiceECF: String; Valor: Double;
  var RetornoECF: Integer);
var
   Est : TACBrECFEstado ;
begin

  try
    if not (fACBRECF.Estado in [estPagamento]) then
      fACBRECF.SubtotalizaCupom(0, Mensagem);

    Est := fACBRECF.Estado;


    if Est = estNaoFiscal then
      fACBRECF.EfetuaPagamentoNaoFiscal(IndiceECF, Valor)
    else
      fACBRECF.EfetuaPagamento(IndiceECF, Valor + Saque);

    RetornoECF := 1 ;
  except
     RetornoECF := 0 ;
  end;

end;

Desde já grato pela atenção.

[Juliomar Marchetti]

E bem isso mesmo deve somar os valores

[guilhermeleal]

JULIOMAR!!!!

 

Obrigado pela ajuda.

 

Na verdade, o grande problema da minha implementação é que eu nao estava definindo o field TrocoMaximo, o que fazia com que o ACBrTEF nao permitisse operaçoes com troco.

 

Esta propriedade permite algum padrao que defina como "ilimitado"?