hallo @alle,
ich finde die moeglichkeiten wie %date... sehr interessant. da die bei uns nicht zum einsatz kommen hab ich die frage ob jemand einen link zu der uebersicht der einzelnen %XXX optionen nennen kann, wenn moeglich in deutsch ;-)
vielen dank

juniorprog



Zitat Zitat von B.Hauser
Hallo Jobra,

mit CL ist das nicht so ganz einfach!
Aber kannst Du nicht eine kleine RPG-Funktion oder -Programm schreiben, das den Monatsletzen ermittelt?
Was willst Du? Das Datum oder den Tag?

Hier ist ein Beispiel, wie aus einem numerischen Datum (JJJJMMTT) der Monatsletzte im gleichen Format ermittelt wird.
Code:
D DateNum S 8P 0 inz(20040525) 
D DateNxtMon S D 
D MonthEnd S D 
D MonthEndNum S 8P 0 
*****************************************************
C Monitor 
C Eval DateNxtMon = %Date(DateNum) + %Months(1) 
C Eval DateNew = DateNxtMon 
C - %Days(%SubDt(DateNxtMon:*D))
C Move DateNew MonthEndNum 
C MonthEndNum dsply 
C on-Error 
C 'Ungült.Dat.' dsply 
C EndMon 
C eval *InLR = *on