Obtención del nombre del procedimiento en ejecución

[Mikel Gómez]

Para obtener el nombre del procedimiento que se está ejecutando en el
momento se pueden usar las siguientes variables de sistema:

&FOCFOCEXEC
Nombre del focexec en ejecución.
Variable muy problemática en varias versiones debido a que por error
suele devolver un guión bajo inicial. (es posible usar &FOCFEXNAME en
su lugar a partir de WF7)

&FOCINCLUDE
Nombre del focexec en ejecución, invocado mediante -INCLUDE.

&FOCFEXNAME
Nombre del focexec en ejecución.
Nueva variable de sistema aparecida en WebFOCUS 71x. A día de hoy no
parece que haya documentación oficial aún sobre ella.
Parece que puede venir a sustituir a las variables &FOCFOCEXEC e
&IBIMR_fex.

Se puede comprobar la disponibilidad de estas variables de sistema
mediante la orden:
-? &FOC

Referencias:
http://documentation.informationbuilders.com/masterindex/html/html_s390_72/s390_apps72/03app40.htm#03APP44_3
http://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/1881073691