How can I access the name of a current library in a CL program?

Question

I need to use the current library name explicitly in a CL program.

CHGVAR &LIB *CURLIB

doesn't work (after this line &lib = '*curlib'). This should be simple - any ideas?

Answer 1

Found it:

RTVJOBA CURLIB(&LIB)

Answer 2

Be aware that a given job may not have a current library. In which case &LIB will have a value of *NONE