Cancelamento transação TEF

[diegao15]

Olá bom dia, estou tentando realizar o cancelamento de uma transação no tef utilizando a função CNC, estou utilizando o paygo cliente e servidor na mesma maquina, e passando os parametros certinho, no entanto quando chamo a função o paygo cliente me retorna a seguinte mensagem de erro: "Erro ao ler registro 745-000 do arquivo intpos.001.Mine"(Campo inexistente), alguem sabe o que pode ser?

eu olhei o arquivo gerado e ele realmente esta sem o campo NSU estendido(745-000)

[Gabriel Bonzanini]

Olá @diegao15.

Também estou com um problema semelhante. No meu caso, o arquivo retornado após a aprovação não possui o NSU estendido (campo 745). Ele aparece apenas na impressão do comprovante (029-015):

000-000 = CRT
001-000 = 44094
003-000 = 1234567
004-000 = 0
009-000 = 0
010-000 = CERTIF
011-000 = 10
012-000 = 9C123456789D
013-000 = 031088
015-000 = 0712043000
016-000 = 0712043000
022-000 = 07122017
023-000 = 043000
027-000 = 1712070430003456789C123456789D
028-000 = 27
029-001 = "****************************************"
029-002 = "********* DEMONSTRACAO  PAY&GO *********"
029-003 = "****************************************"
029-004 = "    "
029-005 = "           COMPROVANTE DE TEF"
029-006 = "    "
029-007 = "    CERTIFICACAO - PASSO 41"
029-008 = "    "
029-009 = "        ESTABELECIMENTO DE TESTE"
029-010 = "    823982346832235/03876463"
029-011 = "    "
029-012 = "    07/12/2017              04:30:00"
029-013 = "    DOC:123456        AUTORIZ:031088"
029-014 = "REF.HOST: "
029-015 = "123456789A123456789B123456789C123456789D"
029-016 = "    "
029-017 = "    TEST CARD       ************3012"
029-018 = "    VENDA CREDITO A VISTA"
029-019 = "    VALOR FINAL: R$ 12.345,67"
029-020 = "    "
029-021 = "    "
029-022 = "    ________________________________"
029-023 = "             JOAO DA SILVA"
029-024 = "    "
029-025 = "****************************************"
029-026 = "********* DEMONSTRACAO  PAY&GO *********"
029-027 = "****************************************"
030-000 = TRANSACAO APROVADA - AUTORIZACAO: 031088
040-000 = TEST CARD
729-000 = 2
730-000 = 1
731-000 = 1
732-000 = 1
737-000 = 3
739-000 = 029
999-999 = 0

Além disso, o componente faz um tratamento para remover as letras (fNSU := OnlyNumber(AValue)), ocasionando a rejeição da requisição, mesmo que seja passado o NSU correto por parâmetro para a função CNC, manualmente:

procedure TACBrTEFDReq.SetNSU(const AValue : String);
begin
  fNSU := OnlyNumber(AValue);
  fConteudo.GravaInformacao(12,0,fNSU);
end;

Fiz o teste removendo este tratamento e o cancelamento foi aprovado. Porém, não consegui automatizar o cancelamento do pagamento ao cancelar o documento por não ter o NSU estendido armazenado no banco de dados.

IntPos.001

[Gabriel Bonzanini]

Em anexo, a unit ACBrTEFDClass sem o tratamento mencionado, caso os administradores entendam que a alteração esteja correta.

Grato pela atenção.

ACBrTEFDClass.pas

[Gabriel Bonzanini]

Acabei de receber a resposta de um dos desenvolvedores da NTK a respeito do NSU estendido:

Citar

Olá Gabriel, boa tarde

Para que você consiga tratar o NSU estendido, se faz necessário informar essa capacidade no campo 706-000 (Capacidades da automação), no caso acrescente na somatória o valor de 128.

128: suporta NSU com tamanho de até 40 caracteres (campos 012-000 e 025-000)

Para ajudar neste entendimento sugiro que acompanhe a documentação: Pay&Go Cliente Windows Especificação Técnica da interface com a Automação Comercial, ná página 32, consta um descritivo do campo 706-000. Estude as funcionalidades de sua aplicação, caso queria tratar outras funcionalidades você deve acrescentar na somatória.

Atenciosamente.

David Belo
Relacionamento com desenvolvedores e Parceiros
(011) 3044 9988 - central atendimento
0800 737 2255 - canal direto

Adicionei uma nova propriedade ao componente, chamada SuportaNSUEstendido, e também o tratamento para que o valor 128 seja somado nas capacidades da automação caso esta propriedade estiver assinalada.

Fiz alguns testes, e aparentemente está ok.

ACBrTEFD.pas

ACBrTEFDClass.pas

[Juliomar Marchetti]

Em 07/12/2017 at 15:28, Gabriel Bonzanini disse:

Acabei de receber a resposta de um dos desenvolvedores da NTK a respeito do NSU estendido:

Adicionei uma nova propriedade ao componente, chamada SuportaNSUEstendido, e também o tratamento para que o valor 128 seja somado nas capacidades da automação caso esta propriedade estiver assinalada.

Fiz alguns testes, e aparentemente está ok.

ACBrTEFD.pas

ACBrTEFDClass.pas

Bom dia

isso é para todos os modelos de tefdial ou troca de txt ou é especifico para um?

[Gabriel Bonzanini]

Boa tarde Juliomar.

Obrigado pelo retorno. Infelizmente não conheço todos os gerenciadores de pagamentos existentes, mas se considerarmos que as propriedades SuportaSaque (1), SuportaDesconto (2) e SuportaReajusteValor (64) são válidas para todos, pela lógica o tratamento do NSU estendido (128) também deve ser... Qual seria o procedimento para verificarmos com precisão?

[Andrey Monteiro]

E essa alteração ai... vai rolar ou não? Eu tbm estaria precisando dessa propriedade no componente.

Editado 29 Agosto, 2018 por Andrey Monteiro

[Felipe E. Resende Mesquita]

19 minutos atrás, Andrey Monteiro disse:

E essa alteração ai... vai rolar ou não? Eu tbm estaria precisando dessa propriedade no componente.

Boa tarde, Andrey Monteiro.

Esse tópico é antigo. Sugiro que crie um novo, relatando sua dúvida ou problema. Assim poderá copiar e colar a URL desse tópico como referência.

Fechando.