आपकी आवश्यकताओं के आधार पर, यह पर्याप्त हो सकता है (लेकिन 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 उपप्रोग्राम की आईडी; NULL अगर स्टैक पर कोई PL/SQL सबप्रोग्राम नहीं है
PLSQL_OBJECT_ID - वर्तमान में निष्पादित PL/SQL सबप्रोग्राम की ऑब्जेक्ट आईडी; SQL निष्पादित करते समय NULL