Wo ist die Source zu einem Pogramm?

Hallo zusammen,

ich möchte wissen, mit welcher Source ein Programm erstellt wurde.
Dies kann ich mit DSPPGM problemlos feststellen.

Nun wollte ich die Geschichte aber in einem CL-Programm machen und habe hierfür den Befehl RTVOBJD wie folgt verwendet:

PGM

DCL VAR(&SRCF ) TYPE(*CHAR) LEN(10)
DCL VAR(&SRCFLIB ) TYPE(*CHAR) LEN(10)
DCL VAR(&SRCMBR ) TYPE(*CHAR) LEN(10)
DCL VAR(&TEXT ) TYPE(*CHAR) LEN(50)

RTVOBJD OBJ(XXXXX/WIDSCL) OBJTYPE(*PGM) TEXT(&TEXT) SRCF(&SRCF) SRCFLIB(&SRCFLIB) SRCMBR(&SRCMBR)

ENDPGM


Nun kommt aber nur der Variablen &TEXT was zurück, die Variablen &SRCF, &SRCFLIB, &SRCMBR sind leer.

Hat jemand eine Idee, was ich falsch mache?