APPS.PA_STARTUP dependencies on PA_STARTUP

Line 1: PACKAGE BODY PA_STARTUP AS

1: PACKAGE BODY PA_STARTUP AS
2: /* $Header: PARSTUPB.pls 115.5 2002/03/12 00:44:16 pkm ship $ */
3:
4: -- ----------------------------------------------------------------------------
5: -- PUBLIC PROCEDURE

Line 28: l_calling_module PA_STARTUP.G_Calling_Module%TYPE;

24: p_check_role_security_flag IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
25: p_check_resource_Security_flag IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
26: p_debug_level IN NUMBER DEFAULT FND_API.G_MISS_NUM
27: ) IS
28: l_calling_module PA_STARTUP.G_Calling_Module%TYPE;
29: l_check_id_flag PA_STARTUP.G_Check_ID_Flag%TYPE;
30: l_check_role_security_flag PA_STARTUP.G_Check_Role_Security_Flag%TYPE;
31: l_check_resource_security_flag PA_STARTUP.G_Check_Resource_Security_Flag%TYPE;
32: l_debug_level PA_DEBUG.debug_level%TYPE;

Line 29: l_check_id_flag PA_STARTUP.G_Check_ID_Flag%TYPE;

25: p_check_resource_Security_flag IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
26: p_debug_level IN NUMBER DEFAULT FND_API.G_MISS_NUM
27: ) IS
28: l_calling_module PA_STARTUP.G_Calling_Module%TYPE;
29: l_check_id_flag PA_STARTUP.G_Check_ID_Flag%TYPE;
30: l_check_role_security_flag PA_STARTUP.G_Check_Role_Security_Flag%TYPE;
31: l_check_resource_security_flag PA_STARTUP.G_Check_Resource_Security_Flag%TYPE;
32: l_debug_level PA_DEBUG.debug_level%TYPE;
33:

Line 30: l_check_role_security_flag PA_STARTUP.G_Check_Role_Security_Flag%TYPE;

26: p_debug_level IN NUMBER DEFAULT FND_API.G_MISS_NUM
27: ) IS
28: l_calling_module PA_STARTUP.G_Calling_Module%TYPE;
29: l_check_id_flag PA_STARTUP.G_Check_ID_Flag%TYPE;
30: l_check_role_security_flag PA_STARTUP.G_Check_Role_Security_Flag%TYPE;
31: l_check_resource_security_flag PA_STARTUP.G_Check_Resource_Security_Flag%TYPE;
32: l_debug_level PA_DEBUG.debug_level%TYPE;
33:
34: BEGIN

Line 31: l_check_resource_security_flag PA_STARTUP.G_Check_Resource_Security_Flag%TYPE;

27: ) IS
28: l_calling_module PA_STARTUP.G_Calling_Module%TYPE;
29: l_check_id_flag PA_STARTUP.G_Check_ID_Flag%TYPE;
30: l_check_role_security_flag PA_STARTUP.G_Check_Role_Security_Flag%TYPE;
31: l_check_resource_security_flag PA_STARTUP.G_Check_Resource_Security_Flag%TYPE;
32: l_debug_level PA_DEBUG.debug_level%TYPE;
33:
34: BEGIN
35: -- Set global variable for calling application as this is a required

Line 37: PA_STARTUP.G_Calling_Application := p_calling_application;

33:
34: BEGIN
35: -- Set global variable for calling application as this is a required
36: -- parameter required for this procedure.
37: PA_STARTUP.G_Calling_Application := p_calling_application;
38:
39: l_calling_module := p_calling_module;
40: l_check_id_flag := p_check_id_flag;
41: l_check_role_security_flag := p_check_role_security_flag;

Line 45: IF PA_STARTUP.G_Calling_Application = 'SELF_SERVICE' THEN

41: l_check_role_security_flag := p_check_role_security_flag;
42: l_check_resource_security_flag := p_check_resource_security_flag;
43: l_debug_level := p_debug_level;
44:
45: IF PA_STARTUP.G_Calling_Application = 'SELF_SERVICE' THEN
46: -- Calling Application is Self Service
47:
48: -- Set Check ID Flag if not passed
49: IF l_check_id_flag = FND_API.G_MISS_CHAR THEN

Line 68: ELSIF PA_STARTUP.G_Calling_Application = 'FORMS' THEN

64: IF l_check_id_flag = FND_API.G_MISS_CHAR THEN
65: l_check_id_flag := 'N';
66: END IF;
67:
68: ELSIF PA_STARTUP.G_Calling_Application = 'FORMS' THEN
69: -- Calling Application is Oracle Forms
70: null;
71:
72: ELSIF PA_STARTUP.G_Calling_application = 'REPORTS' THEN

Line 72: ELSIF PA_STARTUP.G_Calling_application = 'REPORTS' THEN

68: ELSIF PA_STARTUP.G_Calling_Application = 'FORMS' THEN
69: -- Calling Application is Oracle Forms
70: null;
71:
72: ELSIF PA_STARTUP.G_Calling_application = 'REPORTS' THEN
73: -- Calling Application is Oracle Reports
74: null;
75:
76: ELSIF PA_STARTUP.G_Calling_Application = 'PLSQL' THEN

Line 76: ELSIF PA_STARTUP.G_Calling_Application = 'PLSQL' THEN

72: ELSIF PA_STARTUP.G_Calling_application = 'REPORTS' THEN
73: -- Calling Application is Oracle Reports
74: null;
75:
76: ELSIF PA_STARTUP.G_Calling_Application = 'PLSQL' THEN
77: -- Calling Application is PLSQL
78: null;
79:
80: ELSE

Line 89: PA_STARTUP.G_Calling_Module := l_calling_module;

85: -- set global variables if input parameter passed or if value changed in the
86: -- above logic. If no input parameter passed or value changed then the Global
87: -- variable gets defaulted to its default value
88: IF l_calling_module <> FND_API.G_MISS_CHAR THEN
89: PA_STARTUP.G_Calling_Module := l_calling_module;
90: END IF;
91:
92: IF l_check_id_flag <> FND_API.G_MISS_CHAR THEN
93: PA_STARTUP.G_Check_ID_Flag := l_check_id_flag;

Line 93: PA_STARTUP.G_Check_ID_Flag := l_check_id_flag;

89: PA_STARTUP.G_Calling_Module := l_calling_module;
90: END IF;
91:
92: IF l_check_id_flag <> FND_API.G_MISS_CHAR THEN
93: PA_STARTUP.G_Check_ID_Flag := l_check_id_flag;
94: END IF;
95:
96: IF l_check_role_security_flag <> FND_API.G_MISS_CHAR THEN
97: PA_STARTUP.G_Check_Role_Security_Flag := l_check_role_security_flag;

Line 97: PA_STARTUP.G_Check_Role_Security_Flag := l_check_role_security_flag;

93: PA_STARTUP.G_Check_ID_Flag := l_check_id_flag;
94: END IF;
95:
96: IF l_check_role_security_flag <> FND_API.G_MISS_CHAR THEN
97: PA_STARTUP.G_Check_Role_Security_Flag := l_check_role_security_flag;
98: END IF;
99:
100: IF l_check_resource_security_flag <> FND_API.G_MISS_CHAR THEN
101: PA_STARTUP.G_Check_Resource_Security_Flag := l_check_resource_security_flag;

Line 101: PA_STARTUP.G_Check_Resource_Security_Flag := l_check_resource_security_flag;

97: PA_STARTUP.G_Check_Role_Security_Flag := l_check_role_security_flag;
98: END IF;
99:
100: IF l_check_resource_security_flag <> FND_API.G_MISS_CHAR THEN
101: PA_STARTUP.G_Check_Resource_Security_Flag := l_check_resource_security_flag;
102: END IF;
103:
104: IF l_debug_level <> FND_API.G_MISS_NUM THEN
105: pa_debug.enable_debug(l_debug_level);

Line 114: END PA_STARTUP ;

110: Raise;
111:
112: END Initialize;
113:
114: END PA_STARTUP ;