SQL>
SQL> SET SERVEROUTPUT ON SIZE 1000000
SQL> DECLARE
2 lv_module_txt VARCHAR2(48);
3 lv_action_txt VARCHAR2(32);
4 BEGIN
5
6 DBMS_APPLICATION_INFO.READ_MODULE(lv_module_txt, lv_action_txt);
7 DBMS_OUTPUT.PUT_LINE('Before Module: ' || lv_module_txt ||
8 CHR(9) || ' Action: ' || lv_action_txt);
9 DBMS_APPLICATION_INFO.SET_MODULE('PL/SQL BLock',
10 'Testing DBMS_APPLICATION_INFO');
11 END;
12 /
Before Module: 9 Action:
PL/SQL procedure successfully completed.
|