¿Cómo puedo acceder al nombre de una biblioteca actual en un programa CL?

Question

Necesito usar el nombre de la biblioteca actual explícitamente en un programa CL.

CHGVAR &LIB *CURLIB

no funciona (después de esta línea & amp; lib = '* curlib'). Esto debería ser simple: ¿alguna idea?

Answer 1

Lo encontré:

RTVJOBA CURLIB (& amp; LIB)

Answer 2

Tenga en cuenta que un trabajo determinado puede no tener una biblioteca actual. En cuyo caso & amp; LIB tendrá un valor de * NONE