clear auf Datumsfeld mit DFT in DDS

[Fuerchau]

Das DFT gab es schon bevor es SQL auf der AS/400 gab.
Nur in diesem Fall wurde es ausschließlich von DSPF's interpretiert.
D.h., wenn man in der DSPF auf eine PF referiert und dort ein paar Schlüsselwörter wie DFT, COLOR, hinterlegt, wurden diese automatisch zur Compilezeit übernommen und bei der Anzeige am Terminal wurden diese Attribute dann verwendet.

[Pikachu]

Vielleicht über eine externe Datenstuktur mit INZ(*EXTDFT)?

[Fuerchau]

Dies ist so wie mit allen INZ-Anweisungen. Diese initialisieren die Felder per MI-Definition als Template zur Compilezeit.
Beim Fehlen einer *INZSR-Routine löscht RESET genauso wie CLEAR auf den Typ-Grundzustand.
Hat das Programm eine *INZSR, kann auch leer sein, dann baut der Compiler beim Auftauchen einer RESET-Anweisung für diese Struktur/das Feld eine Kopie, die in der *INZSR gespeichert wird und somit für RESET verfügbar ist.

[Pikachu]

Ein INZ-Wert genügt dem RESET aber auch...

The RESET operation is used to restore a variable to the value held at the end of the *INIT phase. This value is called the reset value. If there is no *INZSR subroutine, the reset value is the same as the initial value (either the value specified by the INZ{(initial value)}, or the default value). If there is a *INZSR subroutine, the reset value is the value the variable holds when the *INZSR subroutine has completed. - (Quelle)

[Fuerchau]

OK, das ist mir auch noch neu.