ONPROCEDURE returns the name of a procedure in which a condition is raised.
>>-ONPROCEDURE-+----+------------------------------------------>< '-()-'
Abbreviation: ONPROC
ONPROCEDURE always returns the leftmost name of a multiple label specification, regardless of which name appears in the CALL or GOTO statement. If the name is a DBCS name, it is returned as a mixed-character string. It is in context in any ON-unit, or in any of its dynamic descendants.
If ONPROCEDURE is used out of context, a null string is returned.