Who called me?

In OPP 2007 someone asked for a function to tell in what was procedure/function that called our program.
The OWA_UTIL.WHO_CALLED_ME procedure gives back the first original caller.

OWA_UTIL.WHO_CALLED_ME(
owner OUT VARCHAR2,
name OUT VARCHAR2,
lineno OUT NUMBER,
caller_t OUT VARCHAR2);