PACKAGE BODY: APPS.XNB_DEBUG

Source

1 PACKAGE BODY XNB_DEBUG AS
2 /* $Header: XNBVLOGB.pls 120.0 2005/05/30 13:45:15 appldev noship $ */
3 
4 PROCEDURE LOG (MODULE IN VARCHAR2 , MESSAGE_TEXT IN VARCHAR2 )
5 IS
6 PRAGMA AUTONOMOUS_TRANSACTION;
7 
8 BEGIN
9 INSERT INTO XNB_LOG_MESSAGES
10 (Log_sequence,
11 Module,
12 Message_Text,
13 user_id ,
14 time_stamp)
15 VALUES
16 (XNB_LOG_SEQUENCE_S.NEXTVAL,
17 MODULE,
18 MESSAGE_TEXT,
19 USER,
20 SYSDATE);
21 commit;
22 
23 EXCEPTION
24 
25     WHEN OTHERS THEN
26         ROLLBACK;
27 
28 
29 END LOG;
30 
31 END XNB_DEBUG;