DBA Data[Home] [Help]

PACKAGE BODY: APPS.WSH_CODE_CONTROL

Source


1 PACKAGE BODY WSH_CODE_CONTROL as
2 /* $Header: WSHCRCNB.pls 120.0 2005/05/26 17:41:47 appldev noship $ */
3 
4    --
5    G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_CODE_CONTROL';
6    --
7    Function Get_Code_Release_Level
8    return varchar2
9    is
10    --
11 l_debug_on BOOLEAN;
12    --
13    l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'GET_CODE_RELEASE_LEVEL';
14    --
15    Begin
16       -- Bug#3772380: Removing the debug statements in the function
17       /*
18       --
19       -- Debug Statements
20       --
21       --
22       l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
23       --
24       IF l_debug_on IS NULL
25       THEN
26           l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
27       END IF;
28       --
29       IF l_debug_on THEN
30           WSH_DEBUG_SV.push(l_module_name);
31       END IF;
32       --
33       --
34       -- Debug Statements
35       --
36       IF l_debug_on THEN
37           WSH_DEBUG_SV.pop(l_module_name);
38       END IF;
39       --
40       */
41       return WSH_CODE_CONTROL.CODE_RELEASE_LEVEL;
42    End Get_Code_Release_Level;
43 
44 End WSH_CODE_CONTROL;