clear auf Datumsfeld mit DFT in DDS

[Fuerchau]

Nur, wenn du in der INZSR-Routine das Feld mit einem Wert initialisierst.
Clear = Löschen auf Runtime-Default (*zero, *Blank, 1.1.0001).
Reset = Reinit mit dem Wert aus der INZSR.

Also:

begsr *INZSR;
Eval MyDate = %date('01.01.1999');
endsr;