likerec

[B.Hauser]

Hallo,

wenn mit LIKEREC oder auch mit EXTFILE und den Schlüssel-Worten QUALIFIED oder PREFIX eine externe Datenstruktur definiert wird, in die der Datensatz ausgegeben werden soll, muss diese Datenstruktur auch beim Lesebefehl angegeben werden. Um den Datensatz aus der Datenstrukrur fortzuschreiben, muss auch bei Update die Datenstruktur angegeben werden.

Auf die Ausgabe in die Datenstruktur kann man nur dann verzichten, wenn die Datenstruktur nicht qualifiziert ist und die Felder gleich heißen (also kein Prefix angegeben wurde).

FMYFILE    UF A E           K DISK

D DSMYFILE        DS                  likeRec(MyFormat) inz
D DSMyKey         DS                  LikeRec(MyFormat: *Key)

 /Free
    Chain %KDS(DSMyKey) MyFile DSMyFile;
    If %Found;
       DSMyFile.Fld1 = 123;
       ........
       Update MyFormat DSMyFile;
    EndIf; 

Birgitta