Ist es möglich zu wissen, aus welchem ​​Paket eine Prozedur aufgerufen wurde?

Question

Nehmen wir an, ich habe 2 Pakete: A und B.

Im Paket A, I, ein Verfahren in Paket B.

nennen

Im Verfahren von packcage B ist es möglich, dieses Verfahren zu wissen, wurde von genannt worden Paket A?

---

Vielen Dank für diese Informationen. Es war sehr lehrreich.

Ich schätze.

Answer 1

Sie Prozedur namens who_called_me von der Oracle gelieferten Paket OWA_UTIL

http://download.oracle.com/docs/cd/B25221_04/web.1013/b25598/psutil.htm#i1006497

Answer 2

Sie können möglicherweise den Text analysieren, der von der DBMS_UTILITY.FORMAT_CALL_STACK()-Funktion zurückgegeben wird.

Edit: Ich habe versucht, einige Testpakete zu erstellen. Ich habe eine Prozedur im XX_TESTA-Paket, die eine andere im XX_TESTB-Paket aufruft. Die Prozedur in XX_TESTB druckt einfach den von DBMS_UTILITY.FORMAT_CALL_STACK() zurückgegebenen Text zur Ausgabe aus. Dies ist der resultierende Text:

----- PL/SQL Call Stack ----- 
    object  line object 
    handle number name 
416fe0e68   5 package body APPS.XX_TESTB 
415182f10   5 package body APPS.XX_TESTA 
416e9b448   3 anonymous block 

Answer 3

Sie könnten den Namen als Parameter übergeben?

Mit ....

$$PLSQL_UNIT 

Von: http://awads.net/wp/2006/08/03/heres-a-quick-way-to-get-the-line-number-in-plsql

EDDIE@XE> CREATE OR REPLACE PACKAGE my_pkg 
    2 IS 
    3  PROCEDURE my_proc; 
    4 END; 
    5/

Package created. 

EDDIE@XE> CREATE OR REPLACE PACKAGE BODY my_pkg 
    2 IS 
    3  PROCEDURE my_proc 
    4  IS 
    5  BEGIN 
    6  DBMS_OUTPUT.put_line ('Line number: ' || $$plsql_line); 
    7  DBMS_OUTPUT.put_line ( 'Unit: ' 
    8        || $$plsql_unit 
    9       ); 
10  END; 
11 END; 
12/

Package body created. 

EDDIE@XE> exec my_pkg.my_proc; 
Line number: 6 
Unit: MY_PKG