und wieder mal variable Feldnamen

[VAHLE]

damit :

d sqlStatement    s           1024    inz('') 
d myPgmVar        s            128

 /free                                          
  myPgmVar = 'MyFeld1';                           
  sqlStatement = 'select ' + %trim(myPgmVar) + ' ' +    
                 'from myLib/MyFile ';   

 /end-free   
                                   
C/exec sql                           
C+ prepare s1 FROM :sqlStatement     
c/end-exec                           
                                     
                                     
C/exec sql                           
C+ declare c01 cursor for s1         
c/end-exec                           
                                     
c/exec sql                           
c+ open c01                          
c/end-exec    

etc...

Danke. Bringt mich aber auch nicht weiter...

Denn ich möchte in der Where-Bedingung den Vergleichswert variabel haben...
Wenn ich das im RPG "hart" codieren würde, dann mache ich das ja über den Vergleich mit einer Hostvariablen.
Bsp.: "... Where Feld1 = :PgmFeld"

Aber eben diese Hostvariablen kann man im dynamischen SQL ja nicht verwenden...
Ich kenne also in dem Fall nur den Feldnamen. In meinem Beispiel "PgmFeld"... Und da hapert es momentan bei mir, wie ich an den Inhalt eines Feldes komme, dessen Name in einem Programmfeld steht...