Code: Alles auswählen.
* Ergebnis von ddif_fieldinfo_get steht in dfies_tab
* Inhalt der Variablen TABNAME: eine Tabelle
assign (tabname) to <tab>.
select * from (tabname) into <tab>.
very_long_field = <tab>.
loop at dfies_tab into dfies where keyflag = 'X'.
add dfies-intlen to keylen.
endloop.
key = very_long_field(keylen).
append key to keytab.
endselect.
Code: Alles auswählen.
key = very_long_field(keylen).