Tag des Jahres abfragen

[SL]

Hallo Forum, im OS400 kann man ja über die Systemvalues das Datum (qdate), den Tag (dayofweek) und so weiter abrufen. Kann man auch irgendwie den Tag des Jahres abrufen? Zb. das heute der 72. Tag des Jahres ist.

Gruß SL

[mk]

Hallo SL,


der CL Befehl CVTDAT kann von einem Datum in ein
Julianisches Format umwandeln.

Damit kann man den Tag herausfinden

Gruss
Michael

[SL]

Hallo Michael, so ähnlich hab ich's mir gedacht. Danke für die schnelle Antwort.

Gruß SL

[B.Hauser]

Brauchst Du's unbedingt in CL oder kann's auch RPG mit embedded SQL sein?

D LfdTag          S              3P 0
D MyDate          S               D   inz(D'2006-03-13')
 *------------------------------------------------
C/EXEC SQL  Set :LfdTag = DayOfYear(:MyDate)
C/END-EXEC