Probleme mit Datumsformat in RPG

[WeKaSys]

Danke vielmals, Birgitta!

1. Es ist also das dem Literal vorangestellte D, das den Unterschied ausmacht.

2. Jetzt muß ich doch auch einmal PHP testen, aber wie verhindere ich, daß die Leerzeichen aus meinem mit Ctrl-V eingefügten Code komprimiert werden, und warum mischt er mir die Farben so durcheinander ?

   1 H DatFmt(*Eur.) DatEdiT(*DMY.)
Eingabebestimmungen
DSPF
 274=I *EUR.D 18 27 F2AUDT Auftragsdatum
 124 D W1MIEU D DatFmt(*Eur.) Inz(D'01.01.1990')
 125 D W1MXEU D DatFmt(*Eur.) Inz(D'31.12.2049')
1001 C* Datumsprüfung: Auftragsdatum
1004 C If F2AUDT <> *Loval
1005 C and (F2AUDT < W1MIEU or
1006 C F2AUDT > W1MXEU)
1007 C Eval M0MSGT = %Trim(M0MSGT) +
1008 C ' * Auftragsdatum!'
1009 C Eval *In81 = *On
1000 C EndIf 

Beste Grüße
Werner.