Variable DTAARA

[ebschubert]

Hallo @ all

Ich habe folgendes Problem:

Der Name eines DTAARA ist erst zur Laufzeit bekannt und kann variabel sein.
Gibt es eine Möglichkeit, diesen in RPG auch variabel anzusprechen? Ein entspr. OVR-Befehl existiert ja leider nicht. Oder?

Grüße und vielen Dank vorab

[B.Hauser]

Gibt es eine Möglichkeit, diesen in RPG auch variabel anzusprechen?

Ja! Etwa so!

D VarDtaAra       DS                  dtaara(*Var: VarName)   
D   VA1Fld1                     10A                           
 *                                                            
D VarName         S             21A  
 /Free
    VarName = 'MYLIB/DTAARA02';
    in VarDtaara;
    //  Oder
    VarName = 'NEWDTAARA';
    in VarDtaara; 
 /End-Free 

Birgitta

[ebschubert]

Danke Brigitta, das funxt!