Value of *ROUTINE

When a call fails, the contents of the *ROUTINE subfield of the program status data structure (PSDS) is updated with the following:

• On an external call, the name of the called program (that is, for CALL or CALLP to a program).
• On a bound static call, the name of the called procedure.
• On a bound procedure pointer call, *N.

Note that since the size of this subfield is only 8 bytes long, the name may be truncated.