ACBrUtil.StringToDateTime com erro no Alexandria

[Jéter Rabelo Ferreira]

Boa tarde.

Estamos testando o Delphi Alexandria e nos deparamos um uma exception ao chamar a função StringToDateTime.

Segue anexo um programa com a unit ACBrUtil com diretivas onde fica compatibilizado com o Delphi Alexandria e os anteriores.

O Erro ocorre quando se passa a data como yyyy-mm-dd / 2020-08-15.

A Embarcadero reescreveu o método (SysUtils.StrToDateTime), onde passou a ocorrer o problema.

Atenciosamente.

ACBrUtilData.zip

[Daniel Simoes]

@Jéter Rabelo Ferreira, por favor teste com essa nova versão..

Eu testei ela com sucesso em D-7, D-Rio, D-Alexandria e Lazarus

ACBrUtil.pas

[Jéter Rabelo Ferreira]

@Daniel Simoes, nos testes que efetuei aqui, tudo OK.

Atenciosamente.

[Daniel Simoes]

Obrigado por reportar e pelos testes... Commit [r23492]

[Paulo Alexandre Hostert]

Bom dia,

Também estou bom esse problema no retorno do arquivo de remessa. Já ratualizamos o fontes mais o problema ainda ocorre na linha que destaquei no print.

 

[Daniel Simoes]

Qual a IDE ?

[Paulo Alexandre Hostert]

Delphi Alexandria.

Consegue nesse caso ajustando o formato que destaquei abaixo no print de DDMMYY para DD/MM/YYYY. 

Não sei se seria correto, pois está ocorrendo para outros bancos, ai teria que alterar todos.

[Daniel Simoes]

Realmente a mascara informada, parece errada.. (sem as barras)

@José M. S. Junior e @Victor H. Gonzales - Panda, tem ideia do porque foi informada esse tipo de mascara, como parâmetro ?

[Daniel Simoes]

Fiz uma revisão, e creio que corrigi, todas as ocorrências de erro no uso da StringToDateTimeDef.. Commit [r23493]

[Paulo Alexandre Hostert]

Os bancos que estavam apresentado problema deram certo.

Vamos continuar acompanhando.

Obrigado!

[Victor H. Gonzales - Panda]

1 hora atrás, Daniel Simoes disse:

Realmente a mascara informada, parece errada.. (sem as barras)

@José M. S. Junior e @Victor H. Gonzales - Panda, tem ideia do porque foi informada esse tipo de mascara, como parâmetro ?

Acredito que isso era feito a leitura direta das posições 74 a 82, depois foi inserido a validação se era valor diferente de 0, e acabou ficando legado.

na leitura direta do arquivo vem DDMMYY ou DDMMYYYY e a função fazia a mascara com as /

no BB API é . o separador dai tem outra função que faz a conversão dd.mm.yyyy

[Daniel Simoes]

Ainda referente a esse tópico.. corrigi mais uma situação, que só afetava o Delphi 11... peguei com os Testes Unitários, e testei em D7, D10.3, D11, FPC

Citar

-- ACBrUtil --
[-] Ajuste em StringToDateTime, para funcionar corretamente no Delphi Alexandria,
quando informado Mascaras com Data e Hora

Commit [r23598]