PACKAGE BODY: APPS.OTA_OM_DEBUG

Source

1 PACKAGE BODY OTA_OM_DEBUG AS
2 /* $Header: ottomdbg.pkb 120.0 2005/05/29 07:45:33 appldev noship $ */
3 --
4 -- Package Variables
5 --
6 g_package  	VARCHAR2(33) := 'OTA_OM_DEBUG.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |--------------------------< <reset_debug_level> >------------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 PROCEDURE RESET_DEBUG_LEVEL
13 IS
14 
15 BEGIN
16  OE_DEBUG_PUB.G_DEBUG_LEVEL:=0;
17 
18 END RESET_DEBUG_LEVEL;
19 
20 -- ----------------------------------------------------------------------------
21 -- |--------------------------< <set_debug_level> >------------------------|
22 -- ----------------------------------------------------------------------------
23 
24 PROCEDURE SET_DEBUG_LEVEL (p_debug_level IN NUMBER)
25 IS
26 
27 BEGIN
28  OE_DEBUG_PUB.G_DEBUG_LEVEL:=p_debug_level;
29 
30 END SET_DEBUG_LEVEL;
31 
32 
33 END OTA_OM_DEBUG;