DBA Data[Home] [Help]

APPS.OKC_UTIL dependencies on FND_LOG

Line 87: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

83: l_return_error CONSTANT VARCHAR2(1) := 'E';
84:
85: BEGIN
86:
87: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
88: okc_debug.Set_Indentation('OKC_UTIL');
89: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'Entered Dff_Displayed');
90: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'p_application_short_name' ||p_application_short_name);
91: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'p_dff_name' ||p_dff_name);

Line 89: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'Entered Dff_Displayed');

85: BEGIN
86:
87: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
88: okc_debug.Set_Indentation('OKC_UTIL');
89: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'Entered Dff_Displayed');
90: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'p_application_short_name' ||p_application_short_name);
91: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'p_dff_name' ||p_dff_name);
92: END IF;
93:

Line 90: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'p_application_short_name' ||p_application_short_name);

86:
87: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
88: okc_debug.Set_Indentation('OKC_UTIL');
89: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'Entered Dff_Displayed');
90: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'p_application_short_name' ||p_application_short_name);
91: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'p_dff_name' ||p_dff_name);
92: END IF;
93:
94:

Line 91: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'p_dff_name' ||p_dff_name);

87: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
88: okc_debug.Set_Indentation('OKC_UTIL');
89: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'Entered Dff_Displayed');
90: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'p_application_short_name' ||p_application_short_name);
91: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'p_dff_name' ||p_dff_name);
92: END IF;
93:
94:
95: FND_DFLEX.get_flexfield(p_application_short_name, p_dff_name, flexfield, flexinfo);

Line 97: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

93:
94:
95: FND_DFLEX.get_flexfield(p_application_short_name, p_dff_name, flexfield, flexinfo);
96:
97: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
98: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'=== FLEXFIELD INFO ===');
99: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'title=' || flexinfo.title);
100: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'table=' || flexinfo.table_name);
101: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'descr=' || flexinfo.description);

Line 98: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'=== FLEXFIELD INFO ===');

94:
95: FND_DFLEX.get_flexfield(p_application_short_name, p_dff_name, flexfield, flexinfo);
96:
97: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
98: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'=== FLEXFIELD INFO ===');
99: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'title=' || flexinfo.title);
100: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'table=' || flexinfo.table_name);
101: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'descr=' || flexinfo.description);
102: END IF;

Line 99: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'title=' || flexinfo.title);

95: FND_DFLEX.get_flexfield(p_application_short_name, p_dff_name, flexfield, flexinfo);
96:
97: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
98: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'=== FLEXFIELD INFO ===');
99: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'title=' || flexinfo.title);
100: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'table=' || flexinfo.table_name);
101: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'descr=' || flexinfo.description);
102: END IF;
103:

Line 100: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'table=' || flexinfo.table_name);

96:
97: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
98: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'=== FLEXFIELD INFO ===');
99: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'title=' || flexinfo.title);
100: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'table=' || flexinfo.table_name);
101: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'descr=' || flexinfo.description);
102: END IF;
103:
104: FND_DFLEX.get_contexts(flexfield, contexts);

Line 101: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'descr=' || flexinfo.description);

97: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
98: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'=== FLEXFIELD INFO ===');
99: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'title=' || flexinfo.title);
100: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'table=' || flexinfo.table_name);
101: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'descr=' || flexinfo.description);
102: END IF;
103:
104: FND_DFLEX.get_contexts(flexfield, contexts);
105: FOR i IN 1 .. contexts.ncontexts LOOP

Line 106: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

102: END IF;
103:
104: FND_DFLEX.get_contexts(flexfield, contexts);
105: FOR i IN 1 .. contexts.ncontexts LOOP
106: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
107: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'Processing context: ' || contexts.context_code(i) || ' - ' ||
108: contexts.context_description(i));
109: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'=== SEGMENT INFO (for one context) ===');
110: END IF;

Line 107: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'Processing context: ' || contexts.context_code(i) || ' - ' ||

103:
104: FND_DFLEX.get_contexts(flexfield, contexts);
105: FOR i IN 1 .. contexts.ncontexts LOOP
106: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
107: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'Processing context: ' || contexts.context_code(i) || ' - ' ||
108: contexts.context_description(i));
109: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'=== SEGMENT INFO (for one context) ===');
110: END IF;
111:

Line 109: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'=== SEGMENT INFO (for one context) ===');

105: FOR i IN 1 .. contexts.ncontexts LOOP
106: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
107: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'Processing context: ' || contexts.context_code(i) || ' - ' ||
108: contexts.context_description(i));
109: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'=== SEGMENT INFO (for one context) ===');
110: END IF;
111:
112: FND_DFLEX.get_segments(FND_DFLEX.make_context(flexfield, contexts.context_code(i)),
113: segments,

Line 118: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

114: TRUE);
115: FOR i IN 1 .. segments.nsegments LOOP
116:
117: IF(segments.is_displayed(i)) THEN
118: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'This segments is displayed: ' || segments.segment_name(i));
120: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'Returning Y');
121: END IF;
122:

Line 119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'This segments is displayed: ' || segments.segment_name(i));

115: FOR i IN 1 .. segments.nsegments LOOP
116:
117: IF(segments.is_displayed(i)) THEN
118: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'This segments is displayed: ' || segments.segment_name(i));
120: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'Returning Y');
121: END IF;
122:
123: x_return_status := l_return_success;

Line 120: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'Returning Y');

116:
117: IF(segments.is_displayed(i)) THEN
118: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'This segments is displayed: ' || segments.segment_name(i));
120: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'Returning Y');
121: END IF;
122:
123: x_return_status := l_return_success;
124: RETURN l_displayed_yes;

Line 133: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

129: END LOOP; -- FOR i IN 1 .. contexts.ncontexts
130:
131: --After looping through all the segments, none are displayed
132: --Returning false
133: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
134: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'None of the segments are displayed. Returning N');
135: END IF;
136:
137:

Line 134: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'None of the segments are displayed. Returning N');

130:
131: --After looping through all the segments, none are displayed
132: --Returning false
133: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
134: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'None of the segments are displayed. Returning N');
135: END IF;
136:
137:
138: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 138: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

134: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,l_module||l_api_name,'None of the segments are displayed. Returning N');
135: END IF;
136:
137:
138: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'Leaving Dff_Displayed');
140: END IF;
141:
142: x_return_status := l_return_success;

Line 139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'Leaving Dff_Displayed');

135: END IF;
136:
137:
138: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,l_module||l_api_name,'Leaving Dff_Displayed');
140: END IF;
141:
142: x_return_status := l_return_success;
143: RETURN l_displayed_no;

Line 147: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

143: RETURN l_displayed_no;
144:
145: EXCEPTION
146: WHEN OTHERS THEN
147: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
148: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_module||l_api_name,'leaving OKC_UTIL.Dff_Displayed with error');
149: END IF;
150:
151: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 148: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_module||l_api_name,'leaving OKC_UTIL.Dff_Displayed with error');

144:
145: EXCEPTION
146: WHEN OTHERS THEN
147: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
148: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_module||l_api_name,'leaving OKC_UTIL.Dff_Displayed with error');
149: END IF;
150:
151: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
152: FND_MSG_PUB.Add_Exc_Msg(l_module,l_api_name);

Line 162: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

158: p_count => x_msg_count,
159: p_data => x_msg_data
160: );
161:
162: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
163: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_module||l_api_name,'x_msg_count: '||x_msg_count);
164: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_module||l_api_name,'x_msg_data: '||x_msg_data);
165: END IF;
166:

Line 163: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_module||l_api_name,'x_msg_count: '||x_msg_count);

159: p_data => x_msg_data
160: );
161:
162: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
163: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_module||l_api_name,'x_msg_count: '||x_msg_count);
164: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_module||l_api_name,'x_msg_data: '||x_msg_data);
165: END IF;
166:
167: END Dff_Displayed;

Line 164: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_module||l_api_name,'x_msg_data: '||x_msg_data);

160: );
161:
162: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
163: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_module||l_api_name,'x_msg_count: '||x_msg_count);
164: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_module||l_api_name,'x_msg_data: '||x_msg_data);
165: END IF;
166:
167: END Dff_Displayed;
168:

Line 1824: -- fnd_log.string(1, 'okc', 'l_scs_code : ' || l_scs_code);

1820: If l_row_notfound Then
1821: Raise Exception_No_Access;
1822: End If;
1823: End If;
1824: -- fnd_log.string(1, 'okc', 'l_scs_code : ' || l_scs_code);
1825:
1826: -- Determine if the access for the category and responsibility has
1827: -- been determined earlier and cached in the global variables. If not,
1828: -- then determine it using the resp_csr g_resp_access is initialized

Line 1850: -- fnd_log.string(1, 'okc', 'l_resp_access : ' || l_resp_access);

1846: If l_row_notfound Then
1847: l_resp_access := Null;
1848: End If;
1849:
1850: -- fnd_log.string(1, 'okc', 'l_resp_access : ' || l_resp_access);
1851: -- Save the current access level into global variables. If no access
1852: -- was determined, the local variables hold null and so do the global
1853: -- variables
1854:

Line 1891: -- fnd_log.string(1, 'okc', 'g_user_resource_id : ' || g_user_resource_id);

1887:
1888: If l_row_notfound Then
1889: g_user_resource_id := Null;
1890: End If;
1891: -- fnd_log.string(1, 'okc', 'g_user_resource_id : ' || g_user_resource_id);
1892: End If;
1893:
1894: -- Determine the access level for the resource id on the contract
1895:

Line 1908: -- fnd_log.string(1, 'okc', 'l_resource_access : ' || l_resource_access);

1904: If l_resource_access = l_modify_access Then
1905: Raise Exception_Modify_Access;
1906: End If;
1907:
1908: -- fnd_log.string(1, 'okc', 'l_resource_access : ' || l_resource_access);
1909: -- Since the resource does not have Update access, we need to get its
1910: -- parent group and its grand parent groups (recursively). Cache it in
1911: -- the global pl/sql table since this hierarchy is not going to change
1912: -- for a resource. So do it only for the first time. Do this by

Line 1927: -- fnd_log.string(1, 'okc', 'g_sec_groups.count : ' || to_char(g_sec_groups.count));

1923: End If;
1924:
1925: -- Finally check for any access granted at the group level.
1926: -- Do it only if the resource belongs to at least one group
1927: -- fnd_log.string(1, 'okc', 'g_sec_groups.count : ' || to_char(g_sec_groups.count));
1928:
1929: l_group_has_read_access := False;
1930: If g_sec_groups.COUNT > 0 Then
1931: Open grp_acc_csr;

Line 1954: -- fnd_log.string(1, 'okc', 'l_resource_access : ' || l_resource_access);

1950: End If;
1951:
1952: End If;
1953:
1954: -- fnd_log.string(1, 'okc', 'l_resource_access : ' || l_resource_access);
1955: -- fnd_log.string(1, 'okc', 'l_group_access : ' || l_group_Access);
1956: -- fnd_log.string(1, 'okc', 'g_resp_access : ' || g_resp_access);
1957: If (l_read_access in (g_resp_access, l_resource_access)) Or
1958: l_group_has_read_access Then

Line 1955: -- fnd_log.string(1, 'okc', 'l_group_access : ' || l_group_Access);

1951:
1952: End If;
1953:
1954: -- fnd_log.string(1, 'okc', 'l_resource_access : ' || l_resource_access);
1955: -- fnd_log.string(1, 'okc', 'l_group_access : ' || l_group_Access);
1956: -- fnd_log.string(1, 'okc', 'g_resp_access : ' || g_resp_access);
1957: If (l_read_access in (g_resp_access, l_resource_access)) Or
1958: l_group_has_read_access Then
1959: Raise Exception_Read_Access;

Line 1956: -- fnd_log.string(1, 'okc', 'g_resp_access : ' || g_resp_access);

1952: End If;
1953:
1954: -- fnd_log.string(1, 'okc', 'l_resource_access : ' || l_resource_access);
1955: -- fnd_log.string(1, 'okc', 'l_group_access : ' || l_group_Access);
1956: -- fnd_log.string(1, 'okc', 'g_resp_access : ' || g_resp_access);
1957: If (l_read_access in (g_resp_access, l_resource_access)) Or
1958: l_group_has_read_access Then
1959: Raise Exception_Read_Access;
1960: End If;

Line 1967: -- fnd_log.string(1, 'okc', 'Modify Access Allowed');

1963:
1964: EXCEPTION
1965:
1966: When Exception_Modify_Access Then
1967: -- fnd_log.string(1, 'okc', 'Modify Access Allowed');
1968: If grp_acc_csr%ISOPEN Then
1969: Close grp_acc_csr;
1970: End If;
1971: If g_reset_access_flag Then

Line 2009: -- fnd_log.string(1, 'okc', 'Read Access Allowed');

2005:
2006: Return(l_ret_status);
2007:
2008: When Exception_Read_Access Then
2009: -- fnd_log.string(1, 'okc', 'Read Access Allowed');
2010: If g_reset_access_flag Then
2011: g_reset_access_flag := False;
2012: End If;
2013: Return(l_read_access);

Line 2016: -- fnd_log.string(1, 'okc', 'No Access Allowed');

2012: End If;
2013: Return(l_read_access);
2014:
2015: When Exception_No_Access Then
2016: -- fnd_log.string(1, 'okc', 'No Access Allowed');
2017: l_ret_status := l_no_access;
2018:
2019: If g_reset_access_flag Then
2020: g_reset_access_flag := False;

Line 2700: IF l_trace_flag THEN -- If true, write into fnd_log_messages

2696: l_db_module := p_module;
2697:
2698: l_mesg:=LPAD(p_trace_line, LENGTH(p_trace_line)+(4*p_indent), ' ');
2699:
2700: IF l_trace_flag THEN -- If true, write into fnd_log_messages
2701: IF (l_debug = 'Y') THEN
2702: OKC_DEBUG.log(l_mesg,l_level,l_db_module);
2703: END IF;
2704: ELSE -- write into log file for the conc.program

Line 2821: --is set to 0. However in the subsequent call to the Fnd_Log.test procedure

2817: FND_PROFILE.PUT('AFLOG_LEVEL',1); -- Set the debug level
2818: FND_PROFILE.PUT('AFLOG_MODULE','OKC'); -- Set the module name
2819: --
2820: --In the Non-apps mode the value of g_profile_log_level in the okc_debug API
2821: --is set to 0. However in the subsequent call to the Fnd_Log.test procedure
2822: --the value of G_CURRENT_RUNTIME_LEVEL is used.Hence we need to set its value
2823: --to 1 by executing the fnd_log_repository.init procedure call,as done below.
2824: --Also, when the okc_util.print_trace is called it DOESNOT go through the
2825: --looping in the set connection context procedure in the OKC_DEBUG package, so

Line 2823: --to 1 by executing the fnd_log_repository.init procedure call,as done below.

2819: --
2820: --In the Non-apps mode the value of g_profile_log_level in the okc_debug API
2821: --is set to 0. However in the subsequent call to the Fnd_Log.test procedure
2822: --the value of G_CURRENT_RUNTIME_LEVEL is used.Hence we need to set its value
2823: --to 1 by executing the fnd_log_repository.init procedure call,as done below.
2824: --Also, when the okc_util.print_trace is called it DOESNOT go through the
2825: --looping in the set connection context procedure in the OKC_DEBUG package, so
2826: --g_profile_log_level is never set and it is defaulted to 0
2827: --

Line 2831: FND_LOG_REPOSITORY.INIT(OKC_DEBUG.g_session_id,l_user_id);

2827: --
2828:
2829: -- Initialize the current runtime level
2830:
2831: FND_LOG_REPOSITORY.INIT(OKC_DEBUG.g_session_id,l_user_id);
2832: -- Bug 1996039 Initializing aso debug
2833: aso_debug_pub.debug_on;
2834: aso_debug_pub.initialize;
2835: l_file :=aso_DEBUG_PUB.Set_Debug_Mode('FILE');

Line 2842: --fnd_log_repository.init procedure is invoked ,which sets the

2838: ELSE -- Apps mode
2839:
2840: --
2841: --In the apps mode,the profile values are explicitly set and the
2842: --fnd_log_repository.init procedure is invoked ,which sets the
2843: --G_CURRENT_RUNTIME_LEVEL (based on profile option values)
2844: --but since the set connection context is already
2845: --executed (to run apps_initialize) and has set up g_profile_log_level,
2846: --we need now to explicitly call fnd_log_repository.init to assign the

Line 2846: --we need now to explicitly call fnd_log_repository.init to assign the

2842: --fnd_log_repository.init procedure is invoked ,which sets the
2843: --G_CURRENT_RUNTIME_LEVEL (based on profile option values)
2844: --but since the set connection context is already
2845: --executed (to run apps_initialize) and has set up g_profile_log_level,
2846: --we need now to explicitly call fnd_log_repository.init to assign the
2847: --new value of G_CURRENT_RUNTIME_LEVEL, which is then used to initialize
2848: --g_profile_log_level value (p_level of okc_debug.log will be then greater
2849: --or equal to g_profile_log_level)
2850: --

Line 2859: FND_LOG_REPOSITORY.INIT(OKC_DEBUG.g_session_id,l_user_id);

2855: FND_PROFILE.PUT('AFLOG_ENABLED','Y');
2856: FND_PROFILE.PUT('AFLOG_LEVEL',1);
2857: FND_PROFILE.PUT('AFLOG_MODULE','OKC');
2858:
2859: FND_LOG_REPOSITORY.INIT(OKC_DEBUG.g_session_id,l_user_id);
2860:
2861: IF (l_debug = 'Y') THEN
2862: OKC_DEBUG.g_profile_log_level := Fnd_Log.G_CURRENT_RUNTIME_LEVEL;
2863: END IF;

Line 2862: OKC_DEBUG.g_profile_log_level := Fnd_Log.G_CURRENT_RUNTIME_LEVEL;

2858:
2859: FND_LOG_REPOSITORY.INIT(OKC_DEBUG.g_session_id,l_user_id);
2860:
2861: IF (l_debug = 'Y') THEN
2862: OKC_DEBUG.g_profile_log_level := Fnd_Log.G_CURRENT_RUNTIME_LEVEL;
2863: END IF;
2864: -- Bug 1996039 Initializing aso debug
2865: aso_debug_pub.debug_on;
2866: aso_debug_pub.initialize;

Line 3295: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3291: FUNCTION ACCESS_ELIGIBLE (object_schema in varchar2, object_name varchar2) return varchar2 AS
3292: BEGIN
3293: RETURN ' okc_util.get_k_access_level(OKC_K_HEADERS_B_ACCESS.id,OKC_K_HEADERS_B_ACCESS.scs_code) <>''N''';
3294: EXCEPTION WHEN OTHERS THEN
3295: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3296: fnd_log.string(FND_LOG.LEVEL_PROCEDURE, 'invoked', 'Error : '||SQLERRM);
3297: END IF;
3298: END ACCESS_ELIGIBLE;
3299:

Line 3296: fnd_log.string(FND_LOG.LEVEL_PROCEDURE, 'invoked', 'Error : '||SQLERRM);

3292: BEGIN
3293: RETURN ' okc_util.get_k_access_level(OKC_K_HEADERS_B_ACCESS.id,OKC_K_HEADERS_B_ACCESS.scs_code) <>''N''';
3294: EXCEPTION WHEN OTHERS THEN
3295: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3296: fnd_log.string(FND_LOG.LEVEL_PROCEDURE, 'invoked', 'Error : '||SQLERRM);
3297: END IF;
3298: END ACCESS_ELIGIBLE;
3299:
3300: ----------------------------------------------------------------------------