Die Frage, wie man Werte aus einem dynamischen SQL herauskitzeln kann, wurde aber nicht beantwortet.

Code:
D #SQL            S           5000A   VARYING                  
 *                                                             
D #LIB            S             10A   INZ('QTEMP')             
D #FILE           S             10A   INZ('TEST')              
 *                                                             
D #Anz1           S             10P 0                          
                                                               
 /FREE                                                         
        #SQL = 'VALUES( +                                      
                  SELECT COUNT(*) FROM ' + %TRIMR(#LIB) + '/' +
                                           %TRIMR(#FILE) +     
                     ') +                                      
                INTO ?';                                       
                                                               
    EXEC SQL PREPARE Stmt1 FROM :#SQL;                         
                                                               
    EXEC SQL EXECUTE Stmt1 USING :#Anz1;                       
                                                               
 /END-FREE
von Scott Klement abgeschaut; z.B. hier noch komplexer:
https://www.ibm.com/developerworks/c...8-94cd018d1560