Da man in CL kein direktes SQL (also mit SELECT INTO machen kann, sondern sich das (meines Wissens nach) nur über DCLF, RCVF und OVRDBF lösen lässt, wirst Du wohl oder übel auf das zurück greifen müssen oder Du schreibst dir ein Service Programm, welches du CALL-st und dir über Rückgabeparameter den Datei-Typus holst.

Hier ein Link zu einem Blogeintrag auf RPGPGM.COM: Read, write, and update a file in CL
Ich bin z.B. mit dem Set Lower Limit Code gut gefahren, habe allerdings "nur" einen SETLL auf eine logische Datei mit 1 von 2 Keys. Da der Nutzername eindeutig war, hat es bei mir geklappt. Wenn man allerdings mehr als 1 Schlüssel braucht, muss man das in CL(P) mit einer CL Datenstruktur machen.

Hoffe ich konnte helfen!
Lg Radinator

Edit: Da sich das Beispiel von Robert Mack auf SQL mit einer View aus QSYS2 bezieht, weiß ich nicht, ob das mit CL und dem RCVF geht. Ich denke mal es wäre ökonomischer, wenn Du das einfach mit einem SRVPGM machst.