ILE RPG aktuelles Datum

[Robi]

Hi Birgitta

Das hat man nun davon wenn man abschreibt ...

 /FREE                                   
          RETURN    %DEC(%DATE(): *ISO); 
 /END-FREE

*RNF0327 30        000088  Der erste Parameter für %DEC oder %DECH ist ungültig.    
*RNF0328 30        000088  Der zweite Parameter für %DEC oder %DECH ist ungültig.   
*RNF0338 20        000088  Der dritte Parameter für %DEC darf nicht fehlen, wenn der
                           zweite Parameter angegeben wird.

oder ist die Syntax bei Return anders ?
Gruß
Robi

[B.Hauser]

Die Syntax ist schon in Ordnung, Du solltest allerdings für Release V5R3 oder höher umwandeln.

Sofern Du auf V5R2 runterwandeln musst, musst Du das Ganze wie folgt umsetzen:

 /Free
   Return (%Int(%Char(%Date(): *ISO0)));
 /End-Free 

Birgitta

[Robi]

Grummel

Der Umwandel-Releasestand war tatsächlich auf V5R2 zurückgesetzt.
Da soll mal einer dauf kommen
Danke
Robi