Possível Erro nas Rotinas do TEF PayGo

[Valdir Dill]

Boa noite,

Acredito que tenhamos encontrado um erro na ACBrTEFAPIPayGoWeb.pas.

Nas linhas 484/485 está assim:
if (DataPreDatado <> 0) then
      PA.ValueInfo[PWINFO_INSTALLMDATE] := FormatDateTime('ddmmaa', DataPreDatado);
O resultado de FormatDateTime('ddmmaa', DataPreDatado) é  uma string assim: '3105aa', que obviamente está errada.

Acredito que correto seria:
   if (DataPreDatado <> 0) then
      PA.ValueInfo[PWINFO_INSTALLMDATE] := FormatDateTime('ddmmyy', DataPreDatado);
O resultado de FormatDateTime('ddmmyy', DataPreDatado) será uma string assim: '310523'

Podem verificar, por gentileza?

Obrigado!
 

[Daniel Simoes]

Obrigado por reportar... realmente parece errado... verificando..

[Daniel Simoes]

Muito obrigado pela análise e correção @Valdir Dill.. envie para o SVN... Commit [r29646]

[Valdir Dill]

Bom dia,

Ok, fontes atualizados e testados.

Tudo certo agora.

Obrigado!

[Daniel Simoes]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.