Processo Administrativo TEF - VESPAGUE/SOTECH

[Anderson Oliveira]

Boa noite senhores, estou com um problema ao tentar executar o processo administrativo TEF - VESPAGUE/SOTECH

Na unit ACBrTEFDVeSPague existe essa linha de código para executar o processo ADM TEF: 

   if RespVS.Retorno = 1 then
    begin
       SL1 := TStringList.Create;
       SL2 := TStringList.Create;
       try
          SL2.Clear;
          RespVS.GetParamStrings('mensagem',SL1);
          For I := 0 to SL1.Count-1 do
          begin
             if pos(copy(SL1[I],1,6), 'Cartao|Cheque') = 0 then
                SL2.Add(SL1[I]);
          end ;
          SL1.Clear;

          if SL2.Count > 0 then
          begin
             SL2.Sort;
             TACBrTEFD(Owner).BloquearMouseTeclado(False);
             OnExibeMenu( ACBrStr('Escolha a Transação'), SL2, SL1, I ) ;

             if (I >= 0) and (I < SL2.Count) then
                Transacao := SL2[ I ] ;
          end ;
       finally
          SL1.Free;
          SL2.Free;
       end ;
    end ;
  end ;

 

Onde a tag "mensagem" seria o responsável por indicar as opções do Adm TEF, porém a Sotech mudou a tag para "transação", desta forma, gostaria de saber se tal alteração foi efetuada na unit ACBrTEFDVeSPague?

Segue log abaixo:

-- 29/12 22:29:32:368 - Aguardando Resposta do V&SPague
-- 29/12 22:29:32:481 - <- RECEBIDO
retorno="1"
sequencial="29"
servico="consultar"
transacao="Administracao Pendente";"Administracao Extrato Transacao";"Administracao Cancelar";"Administracao Cartao Consultar";"Administracao Cartao Resgatar";"Administracao Extrato";"Administracao Manutencao Cartao";"Administracao Manutencao Rede";"Administracao Manutencao Rede Consultar";"Administracao Reimprimir";"Cartao Consultar Endereco";"Cartao Consultar Financiado";"Cartao Consultar Saldo";"Cartao Pre-autorizacao Capturar";"Cartao Pre-autorizacao Solicitar";"Cartao Sacar";"Cartao Senha Trocar";"Cartao Vender";"Conta Pagar";"Inicializacao"
transacao_produto="AMEX";"AURA";"Atualiza Chip";"BAIXA TECNICA";"BANESCARD CREDITO";"BANESCARD DEBITO";"CABAL CREDITO";"CABAL DEBITO";"CDC-Redecard";"CREDSYSTEM CREDITO";"Consulta AVS-Redecard";"Credito-Dacasacard";"Credito-Redecard";"Credito-Stone";"DINERS CREDITO";"Debito-Redecard";"Debito-Stone";"ELO CREDITO";"ELO DEBITO";"HIPERCARD CREDITO";"MAESTRO";"MASTERCARD";"Private Label Cash-Redecard";"Private Label-Redecard";"SOROCRED CREDITO";"VISA CREDITO";"VISA ELECTRON";"Voucher Frota-Redecard";"Voucher-Redecard"
 

[Juliomar Marchetti]

Não . mas se quiser mudar e efetuar os testes a anexar aqui por favor fique a vontade

[Anderson Oliveira]

Perfeito, entrei em contato com o Suporte Sotech e eles confirmaram que houve a alteração, então farei a modificação no arquivo, vou realizar alguns testes e depois anexo aqui para que a alteração seja compartilhada com a comunidade.