Ncn Em Operação Adm Abortada

[mascate.marcus]

Bom dia!

 

Estou em processo de homologação neste momento. O homologador está alertando sobre o envio de 

comando NCN após sair do gerenciador padrão (rede AMEX).

 

É chamado o comando ADM, depois acessa a rede AMEX e não faz nada. Apenas aborta o gerenciador (botão voltar, ESC ou fechar). Vai ser retornado uma mensagem ao operador de "operação abortada" (ou similar). Neste momento, o homologador força o fechamento do sistema de AC.

 

Ao ser iniciado, o sistema apresenta mensagem de cancelamento de transação (?) vindo do ACBrTEFD.

 

Algum dos colegas passou por isso? Estou utilizado a última versão do repositório.

[Daniel Simoes]

Se o homologador desligou a aplicação antes dela exibir "Operação Cancelada" o fluxo está correto... temos uma transação pendente, que deve ser tratada no inicio da aplicação...

[mascate.marcus]

Mas a operação foi cancelada antes de existir uma transação. Ele entrou no gerenciador padrão e saiu sem fazer nada.

[mascate.marcus]

E fazendo o mesmo processo na REDECARD, não ocorre. Somente para AMEX.

[Daniel Simoes]

Não estou compreendendo o que você que dizer...

 

Se ele criou um ADM, já há uma transação pendente a ser processada...

 

Por favor dê mais informações...

Qual o Teste ? De qual roteiro ?

Qual o Passo a passo para reprodução do problema usando o TEFDDemo ?

Qual o Log do TEF dial ?

Qual o Log do ACBrTEFD ?

[mascate.marcus]

O teste é fazer uma ADM.

Ao chamar o gerenciador padrão (com rede REDECARD e AMEX) é escolhido a rede AMEX. 

No módulo da AMEX, não fazer nada, fechar o módulo pressionando o botão Voltar.

Será retornado mensagem ao operador de operação cancelada.

Abortar AC.

 

Na inicialização da AC, o ACBrTEFd irá verificar por transação pendente. E quando é AMEX, a operação descrita anteriormente é encontrada e é enviado um NCN. Isso somente para AMEX, usei a rede REDECARD no mesmo procedimento e não ocorreu o problema.

[mascate.marcus]

Arquivos log separado por rede. Simulando o mesmo processo, chama ADM e fecha o módulo da rede.

logTEF_Dial_ADM_AMEX.txt

logTEF_Dial_ADM_REDECARD.txt

[Daniel Simoes]

Infelizmente não consigo instalar o simulador da AMEX no meu Windows 7 64...

 

Tem algum novo link para download ?

[mascate.marcus]

Coloquei os arquivos manualmente. Um momento que envio.

[mascate.marcus]

Em anexo, a pasta "amex" localizada em "C:\TEF_Dial".

 

Dentro desta pasta "amex" existe uma pasta "dll" para enviar as bibliotecas para a "C:\Windows\SysWOW64".

amex.7z

[Daniel Simoes]

Por favor envie o LOG gerado pelo G.P., geralmente fica na pasta C:\TEF_DIAL

[mascate.marcus]

Toda a pasta TEF_Dial já com "amex" e dentro dessa a pasta "dll".

TEF_Dial.7z

[mascate.marcus]

Inclusive foi por meio deste arquivo que o homologador fez o alerta.

debug.txt

[Daniel Simoes]

Consegui reproduzir o problema... estou analisando...

[Daniel Simoes]

O problema é que o arquivo da AMEX não está sendo retornado no padrão correto...

 

o ACBrTEFD tem um tratamento específico para essa situação... Veja a procedure Inicilizar abaixo, onde diz: { Verificando se o arquivo de Resposta é invalido ou seja, gerado quando clica-se em 9 - CANCELAR sem selecionar nenhuma Bandeira }

procedure TACBrTEFDClass.Inicializar;
begin
  if Inicializado then exit ;

  ApagaEVerifica( ArqTemp );  // Apagando Arquivo Temporario anterior //
  ApagaEVerifica( ArqReq );   // Apagando Arquivo de Requisicao anterior //
  ApagaEVerifica( ArqSTS );   // Apagando Arquivo de Status anterior //

  fpInicializado := True ;
  GravaLog( Name +' Inicializado' );

  { Verificando se o arquivo de Resposta é invalido ou seja, gerado quando
    clica-se em 9 - CANCELAR sem selecionar nenhuma Bandeira }
  if FileExists( ArqResp ) then
  begin
     Resp.LeArquivo( ArqResp );

     if UpperCase(Resp.Conteudo.LeInformacao(9,0).AsString) = 'FF' then
        ApagaEVerifica( ArqResp );

     Resp.Clear;
  end ;

  CancelarTransacoesPendentesClass ;

  VerificaAtivo;
end;

A resposta do REDECARD:

000-000 = ADM
001-000 = 38616
009-000 = FF
010-000 = REDECARD
011-000 = 00
025-000 =
026-000 =
028-000 = 0
030-000 = Finalizado pelo Operador
999-999 = 0

 

A resposta do AMEX

000-000 = ADM

001-000 = 38539

009-000 = 101

010-000 = AMEX

011-000 = 0

028-000 = 0

030-000 = A operação foi cancelada.

999-999 = 0

 

 

Ou seja, não tem FF na resposta do AMEX

 

Não seria um BUG deles ??

[Daniel Simoes]

Um WorkAround seria:

1543     // Amex retorna 101 e não FF
1544     if (pos(UpperCase(Resp.Conteudo.LeInformacao(9,0).AsString), 'FF|101') > 0) then
1545        ApagaEVerifica( ArqResp );

[mascate.marcus]

Compreendo sim. Mas questionar homologador é uma complicação, sempre "funciona nos outros sistemas".

Enquanto você analisava, procurei ver características da "transação" pendente para remover esta transação antes de enviar o NCN.

 

Então implementei em TACBrTEFDClass.CancelarTransacoesPendentesClass

        Resp.LeArquivo( ArquivosVerficar[ 0 ] );

        // bug amex
        if (UpperCase(Resp.Rede) = 'AMEX') and
           (Resp.TipoGP = gpNenhum) and
           (Trim(Resp.NSU) = '') and
           (Trim(Resp.TextoEspecialOperador) = 'A operação foi cancelada.') then
        begin
           Resp.Clear;

           ArquivosVerficar.Delete( 0 );
           Continue;
        end;

Estou realizando testes para ver o efeito disso.

 

Muito obrigado, Daniel!

[Daniel Simoes]

Não é bom amarrar ao "texto de retorno"... pois se eles mudarem a mensagem sua aplicação quebra... veja o meu tópico anterior...

[mascate.marcus]

Utilizando esta implementação em TACBrTEFDClass.Inicializar ("Verificando se o arquivo de Resposta é invalido...")?

[Daniel Simoes]

Acabei de subir as correções para o SVN... basta atualizar seus fontes... (talvez seja necessário renomear as Units que vc alterou)

[mascate.marcus]

Removi as alterações que fiz e acatei a rotina que postou aqui. E já testado!

Novamente, obrigado!