Datumsformate in unterschiedlicher Form

[JonnyRico]

Hi,

da kannst du SQL für bemühen.

HDatFMT(*EUR)
D Date            S             10A   inz('1.7.2006')
D NewDate         S               D

C/Exec SQL Set Option DATFMT=*EUR
C/End-Exec
C/Exec SQL Set :NewDate = Cast(:Date As Date)
C/End-Exec
 /Free

   DSPLY %Char(NewDate)  ;

   *INLR=*ON;
 /End-Free 

Gruß

Sascha