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

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?

From stackoverflow

• Found it:

  RTVJOBA CURLIB(&LIB)

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