View Full Version : Datumsformate in unterschiedlicher Form
Hallo,
vielleicht kann mir da jemand eine kleine Hilfe geben
Bekomme das Datum in verschiedener Form geliefert
zB. 10 St. Char Feld
"1.7.2006 "
"10.7.2006 "
"1.10.2006 "
"10.10.2006"
diese muss ich möglichst einfach in *EUR bringen ? "01.07.2006"
danke für die Hilfe
falke34
c/exec sql
c+ set mydate=date(:var)
c/end-exec
Auf Grund der Punkte erkkent die Funktion das *EUR-Format.
Bei mir funktionierts.
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
sorry, hatte ich nicht angegeben - in RPGLE :rolleyes: ?
danke, für die Hinweise
Hallo,
normalerweise kannst Du SQL in RPGLE ohne Probleme verwenden.
Allerdings denke ich, an dieser Stelle ist es unnötig, da auch RPG ein Datum mit einem einstelligen Monat oder Tag korrekt erkennen und konvertieren kann.
Du brauchst nur die Aufbereitung des alphanumerischen Strings, also das Ergebnis soll wieder ein Alpha-Feld sein?
Wenn ja kannst Du das folgende Statement verwenden:
/Free
AufberDatumAlpha = %Char(%Date(UrsprDatumAlpha: *EUR): *EUR);
/End-Free
Birgitta