PACKAGE BODY: APPS.WSH_FTE_ENABLED

Source

1 PACKAGE BODY WSH_FTE_ENABLED  AS
2 /* $Header: WSHENBLB.pls 115.5 2002/11/12 01:33:30 nparikh noship $ */
3 
4 -- Global constant for package name
5 g_pkg_name constant varchar2(50) := 'FTE_ENABLED';
6 
7 /*
8 ** -------------------------------------------------------------------------
9 ** Function:    check_status
10 ** Description: Checks to see if FTE is installed
11 ** Output:
12 ** Input:
13 **      There is no input parameter.
14 ** Returns:
15 **	'Y' if FTE enabled, else 'N'
16 **
17 ** --------------------------------------------------------------------------
18 */
19 
20 FUNCTION check_status return varchar2 is
21 
22 -- constants
23 c_api_name		constant varchar2(30) := 'check_status';
24 
25 --
26 l_debug_on BOOLEAN;
27 --
28 l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'CHECK_STATUS';
29 --
30 BEGIN
31 /* return "Y" since FTE is always enabled as of now
32    to disable please replace Y with N in the return statement
33    */
34    --
35    -- Debug Statements
36    --
37    --
38    l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
39    --
40    IF l_debug_on IS NULL
41    THEN
42        l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
43    END IF;
44    --
45    IF l_debug_on THEN
46        WSH_DEBUG_SV.push(l_module_name);
47    END IF;
48    --
49    --
50    -- Debug Statements
51    --
52    IF l_debug_on THEN
53        WSH_DEBUG_SV.pop(l_module_name);
54    END IF;
55    --
56    return 'Y';
57 EXCEPTION
58       when others then
59 
60       	if (fnd_msg_pub.check_msg_level
61        	    (fnd_msg_pub.g_msg_lvl_unexp_error)) then
62 	    fnd_msg_pub.add_exc_msg(g_pkg_name, c_api_name);
63       	end if;
64 
65 	--
66 	-- Debug Statements
67 	--
68 	IF l_debug_on THEN
69 	    WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
70 	    WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
71 	END IF;
72 	--
73 	-- Debug Statements
74 	--
75 	IF l_debug_on THEN
76 	    WSH_DEBUG_SV.pop(l_module_name);
77 	END IF;
78 	--
79 	return 'N';
80 	--
81 END check_status;
82 
83 END WSH_FTE_ENABLED;