Erro Multiplos Cartoes

[volmir]

bom dia pessoal

estou enviando em anexo os logs do tef e da impressora pra analize

pois estou com um problema quando uso mais de um cartao

esta retornando um erro de transacao nao efetuada

ja se usar apenas um cartao da certo

nao sei o que estou fazendo de errado

quem puder me ajudar de uma olhada nos logs

[EMBarbosa]

Tente com o programa de exemplo.

[volmir]

ja testei acontece a mesma coisa

[EMBarbosa]

Por favor, descreva o passo a passo que está utilizando no DEMO.

[volmir]

segue em anexo imagens dos passo - a - passo seguido no demo

[volmir]

basicamente abreo cupom 

vende tres itens totalizando 3 reais

depois vou em CRT com 1 real

depois mais um CRT de 2 reias

ai depois pra finalizar clico em "Imprimir Trasacoes Pendentes"

  

[volmir]

para o exemplo aqui sitado como estou sem o pinpad aqui no momento fiz utilizando um numero de cartao da cielo por isso vai apresentar troco (desconto),

mas a mesma situacao ocorre usando pinpad com cartao normal pois ja estou a +/- uns tres meses com este problema e nao consiguo resolver

[volmir]

ninguem que possa me ajudar

[Juliomar Marchetti]

Antes tu fecha o cupom fiscal antes de imprimir transações pendentes?

[volmir]

//Finaliza o Cupom Imprime as vias do TEF (CNF - comprovantes nao fiscais) e confirma as transacoes pendentes

DM.tef1.ImprimirTransacoesPendentes;

 

eu so chamo este metodo

ele faz tudo finaliza o cupom imprime comprovantes etc

[volmir]

porem antes eu fazia assim

 

ACBrTEFD1.FinalizarCupom;

ACBrTEFD1.ImprimirTransacoesPendentes;

 

mas acontecia o mesmo erro

porem depois descobri que o metodo ImprimirTransacoesPendentes

finaliza o cupom caso ele ainda nao tenha sido finalizado

ai resolvi somente chamar o metodo ImprimirTransacoesPendentes  

[Juliomar Marchetti]

Finaliza se você programar os eventos do ACBrTEFD

mas também dá problema com o cielo premia pois ele sai finalizando e não aplica descontos e acréscimos

[volmir]

hum, entao o correto é 

ACBrTEFD1.FinalizarCupom;

ACBrTEFD1.ImprimirTransacoesPendentes;

[volmir]

acabei de fazer um teste com o demo

ACBrTEFD1.FinalizarCupom;

ACBrTEFD1.ImprimirTransacoesPendentes;

 

aconteceu a mesma coisa

Operacao nao realizada

[volmir]

o q sera isso

ninhuem mais passou por isso,

to ferrado pois preciso atualizar em meus clientes e isso nao funciona

[Juliomar Marchetti]

Bom dia!

você está com alguma coisa errada em sua logica e uso das propriedades do componente!

utilizo desde o começo o ACBrTEFD com múltiplos cartões e sempre funcionou!

[volmir]

mas qual gerenciador vc utiliza ?

eu utilizo o GPCliDTEF 

e mesmo com o demo esta dando este erro

[Juliomar Marchetti]

Boa tarde

Na aplicação da empresa que trabalhei sim está funcionando com o TEF Direção!

[volmir]

pois mas estranho pois no demo do acbr tambem nao funciona

pois ja testei e deu o mesmo problema que acontece na minha aplicacao

por isso acho que seja um problema do componente

[volmir]

bom dia juliomar

estava debugando aqui e descobri o seguinte na unit ACBrTEFDCliDTEF

metodo FinalizarTransacao vai passar duas vezes uma vez pra cada pagamento

 

case TipoTransacao of

    -1 : nStatus := xFinalizaTransacao;

    0  : nStatus := xConfirmaCartao( PAnsiChar( NSU ) );

    1  : nStatus := xConfirmaCartaoCredito( PAnsiChar( NSU ) );

    2  : nStatus := xConfirmaCartaoDebito( PAnsiChar( NSU ) );

    3  : nStatus := xConfirmaCartaoVoucher( PAnsiChar( NSU ) );

  //4  : nStatus Private Label

  //5  : nStatus := xConfirmaCartao

    10 : nStatus := xConfirmaCartaoFrota( PAnsiChar( NSU ) );

  else

    nStatus := -1 ;

  end;

 

  if ((nStatus = 0) and Confirma) then

  begin

     xFinalizaTransacao;

  end;

 

  if (nStatus = 11) then

  begin

     TACBrTEFD(Owner).DoExibeMsg( opmOK, 'Transação não efetuada.' );

     NCN(Operacao, NSU, '');

  end;

 

na primeira vez blz retorna 0 ai cai aqui

 if ((nStatus = 0) and Confirma) then

  begin

     xFinalizaTransacao;

  end;

 

na segunda vez(segunada forma de pagamento) esta retornando 11

ai cai nesta mensagem de Transação não efetuada

 

agora nao sei porq esta retornando 11 acredito que isso retorne da DLL 

[Juliomar Marchetti]

Sim!

o bom é ter a documentação dela pra poder achar o problema!

[volmir]

tentei enviar em anexo mas nao consegui vc quer me passar seu email talvez

[volmir]

if ((nStatus = 0) and Confirma) then

  begin

     xFinalizaTransacao;

  end;

 

esta variavel Confirma esta sempre vindo true

por isso esta finalizando a transacao 2 vezes e por isso esta vindo este erro

segundo o pessoal do suporte da linx ai esta o problema pois esta desfazendo a ultima transacao

deveria ser assim pra uma transacao com 2 pagamentos

xConfirmaCartaoDebito

xConfirmaCartaoDebito

xFinalizaTransacao

 

e esta fazendo assim

xConfirmaCartaoDebito

xFinalizaTransacao 

xConfirmaCartaoDebito

esta errado

[Juliomar Marchetti]

compacta

[volmir]

ja tentei compactar mas mesmo assim ao anexar da O enviou falhou