datumsaufbereitung

[jajonowak]

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

[B.Hauser]

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

[jajonowak]

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

[Pikachu]

Vielleicht geht's ja auch schon mit dem Schlüsselwort DATFMT in der Druckerdatei?

[jajonowak]

Danke Birgitta, danke Pikachu

mit beiden Möglichkeiten führten zum Erfolg.


lg
Hans-Joachim