Hallo,

ich habe mal wieder ein kleines Problem:

Am besten poste ich mal den Source zu meinem Problem:

Code:
D ind1            S              3I 0 Inz(1)
 *
D VarField        S             30    Dim(20)
/Free
    Read DBDatei;
    DoW Not %Eof(DBDatei) and ind1 <= 20;
       VarField(ind1) = DBFeldName;
       Read DBDatei;
       ind1 = ind1 + 1;
    EndDo;
    D_Feld01 = VarField(1);
    D_Feld02 = VarField(2);
    D_Feld03 = VarField(3);
       .     .     .
       .     .     .
       .     .     .
    D_Feld20 = VarField(20);
    ExFmt TabelleS1;
     *InLR = *On;
     Return;
/End-Free
Die Felder D_Feld01 - D_Feld20 sind OUTPUT-Felder einer DSPF-Datei. Diese Felder werden hier aus einer DBDatei vor Aufruf der Maske gefüllt.

So, nun zu meiner Frage : Wie kann ich die 20 Zuweisungen umgehen ?

Ich habe mit LikeRec und mit Overlay experimentiert, im Forum gelesen, IBM-Literatur gelesen - nichts hat geholfen (oder ich habs halt noch nicht verstanden)

Kann mir da jemand helfen ?
Vielen Dank.

Gruß

KaFi