必要に応じて、これで十分な場合があります(ただし、v $ sessionとdba_objectsへのアクセスに依存します):
select 'CALLED PLSQL', vs.username, d_o.object_name -- whatever info you need
from dba_objects d_o
inner join
v$session vs
on d_o.object_id = vs.plsql_entry_object_id
union all
select 'CURRENT PLSQL', vs.username, d_o.object_name
from dba_objects d_o
inner join
v$session vs
on d_o.object_id = vs.plsql_object_id
ドキュメントによると:
PLSQL_ENTRY_OBJECT_ID-スタックの最上位のPL/SQLサブプログラムのID。スタックにPL/SQLサブプログラムがない場合はNULL
PLSQL_OBJECT_ID-現在実行中のPL/SQLサブプログラムのオブジェクトID。 SQLを実行する場合はNULL