1 PACKAGE asn_debug AS
2 /* $Header: RCVDBUGS.pls 120.0.12010000.2 2008/10/14 19:05:06 vthevark ship $ */
3 /*===========================================================================
4 PACKAGE NAME: ASN_DEBUG
5
6 DESCRIPTION: Contains the routines needed to write debug messages
7 to a file
8
9 CLIENT/SERVER: Server
10
11 LIBRARY NAME NONE
12
13 OWNER: Raj Bhakta
14
15 PROCEDURES/FUNCTIONS: PUT_LINE(v_line in varchar2))
16
17 ===========================================================================*/
18
19 /*===========================================================================
20 PROCEDURE NAME: PUT_LINE()
21
22 DESCRIPTION: Writes messages to a file
23
24 PARAMETERS: v_line in varchar2
25
26 DESIGN REFERENCES:
27
28 ALGORITHM:
29
30 NOTES:
31
32 OPEN ISSUES:
33
34 CLOSED ISSUES:
35
36 CHANGE HISTORY: Raj Bhakta 03/26/97 Created
37 ===========================================================================*/
38 PROCEDURE put_line(
39 v_line IN VARCHAR2,
40 v_level IN VARCHAR2 DEFAULT fnd_log.level_error,
41 v_inv_debug_level IN NUMBER DEFAULT 9 -- lcm changes
42 );
43
44 g_debugging_enabled VARCHAR2(1) := fnd_profile.VALUE('RCV_DEBUG_MODE');
45 g_current_module VARCHAR2(255) := 'po.plsql.ASN_DEBUG';
46 g_level NUMBER := 0;
47 g_procedure_stack VARCHAR2(4000) := '? ';
48 g_current_procedure VARCHAR2(20) := '? ';
49 g_inv_debug_enabled VARCHAR2(1) := fnd_profile.VALUE('INV_DEBUG_TRACE'); -- lcm changes
50 FUNCTION get_debugging_enabled
51 RETURN BOOLEAN;
52
53 PROCEDURE set_module_name(
54 module IN VARCHAR2
55 );
56
57 PROCEDURE start_procedure(
58 procedure_name IN VARCHAR2
59 );
60
61 PROCEDURE stop_procedure(
62 procedure_name IN VARCHAR2,
63 pop_this_procedure IN BOOLEAN DEFAULT TRUE
64 );
65
66 PROCEDURE print_stack;
67
68 PROCEDURE debug_msg(
69 line IN VARCHAR2,
70 LEVEL IN VARCHAR2 DEFAULT NULL,
71 label IN VARCHAR2 DEFAULT NULL
72 );
73
74 PROCEDURE debug_msg_ex(
75 MESSAGE IN VARCHAR2,
76 module IN VARCHAR2 DEFAULT NULL,
77 procedure_name IN VARCHAR2 DEFAULT NULL,
78 line_num IN NUMBER DEFAULT NULL,
79 LEVEL IN VARCHAR2 DEFAULT NULL
80 );
81
82 -- If you do not specify a level then it will use the last level specified
83 -- if there is no last level specified then it Will default to log level: Statement
84 -- If you do not specify a module then it will use the last module specified
85 -- if there is no last module specified then it Will default to module name: RCV
86 PROCEDURE get_calling_module(
87 p_module OUT NOCOPY VARCHAR2,
88 p_procedure OUT NOCOPY VARCHAR2,
89 p_label OUT NOCOPY VARCHAR2,
90 p_stack_depth IN NUMBER DEFAULT 2
91 );
92 END asn_debug;