View Full Version : datumsaufbereitung
Hallo Forum,
ich hab da ein klitzekleines Problemchen.....
Auf einer Auswertung werden mehrere Datumsfelder gedruckt.
5 * mit dem Format 2007-05-01 o.k.
1 * mit dem Format 17.01.2007 --> nur was muß ich dem RPG in diesem Fall mitteilen?
vielen Dank im Voraus
Hans-Joachim
Hallo Hans-Joachim,
mir ist Dein Problem nicht ganz klar.
Du hast ein Datumsfeld und musst das entweder im Format 'JJJJ-MM-TT' oder 'TT.MM.JJJJ' ausdrucken?
Wenn ja: Konvertiere das ganze in einen Alpha-String mit der entsprechenden Aufbereitung:
/Free
Select
When Option = 1; //Format ISO: JJJJ-MM-TT
DruckDatum = %Char(MyDate: *ISO)
When Option = 5; //Format Eur: TT.MM.JJJJ
DruckDatum = %Char(MyDate: *EUR)
....
EndSL;
/End-Free
Anmerkung: Das Format (*ISO, *EUR ...) kann nicht als Variable übergeben werden.
Birgitta
Hallo Birgitta,
es sollen 5 Datenbank-Datumfelder auf diesem Ausdruck im Format ccjj-mm-tt ausgedruckt werden.
Das andere Datumsfeld kommt von aussen als Parameter und soll im Format tt.mm.ccjj gedruckt werden.
Printerfile:
A PRTDATE L
RPG:
Parm pa_date 6
move pa_date num06 6 0
*dmy move num06 prtdate
lg
Hans-Joachim
Vielleicht geht's ja auch schon mit dem Schlüsselwort DATFMT (http://publib.boulder.ibm.com/iseries/v5r2/ic2929/info/rzakd/rzakdmstptdatfmt.htm#HDRPTDATFMT) in der Druckerdatei?
Danke Birgitta, danke Pikachu
mit beiden Möglichkeiten führten zum Erfolg.
lg
Hans-Joachim