Datum-Konvertierung free rpg

[B.Hauser]

Hallo,

das ist jetzt nicht die Antwort auf Deine Frage, aber ...

Warum machst Du es nicht so:

 /Free
   Monitor;
     $prodateur = %date($prodat:*EUR);
   On-Error;
     $prodateur = *loval;
     ERR_Datum = *on; 
     write bild01;
     //Und was Du sonst noch im Fehlerfall machen willst
   EndMon;
 /End-Free 

Birgitta