DBA Data[Home] [Help]

APPS.PA_EXCEPTION_ENGINE_PKG dependencies on PA_DEBUG

Line 4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

1: PACKAGE BODY pa_exception_engine_pkg AS
2: /* $Header: PAPEXENB.pls 120.5.12010000.3 2009/07/02 08:45:06 rthumma ship $ */
3:
4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: -- Procedure PAPFEXCP
7: -- Purpose This procedure will be called from Concurrent Program to call
8: -- logic to generate exception transaction, KPA Scoring or

Line 106: pa_debug.init_err_stack('PAPFEXCP');

102:
103: x_retcode := '1';
104: x_errbuf := null;
105:
106: pa_debug.init_err_stack('PAPFEXCP');
107: pa_debug.set_process('PLSQL','LOG','Y');
108: pa_debug.G_err_stage := 'Entering PAPFEXCP ()';
109: IF P_PA_DEBUG_MODE = 'Y' THEN
110: pa_debug.write_file('LOG', pa_debug.g_err_stage);

Line 107: pa_debug.set_process('PLSQL','LOG','Y');

103: x_retcode := '1';
104: x_errbuf := null;
105:
106: pa_debug.init_err_stack('PAPFEXCP');
107: pa_debug.set_process('PLSQL','LOG','Y');
108: pa_debug.G_err_stage := 'Entering PAPFEXCP ()';
109: IF P_PA_DEBUG_MODE = 'Y' THEN
110: pa_debug.write_file('LOG', pa_debug.g_err_stage);
111: END IF;

Line 108: pa_debug.G_err_stage := 'Entering PAPFEXCP ()';

104: x_errbuf := null;
105:
106: pa_debug.init_err_stack('PAPFEXCP');
107: pa_debug.set_process('PLSQL','LOG','Y');
108: pa_debug.G_err_stage := 'Entering PAPFEXCP ()';
109: IF P_PA_DEBUG_MODE = 'Y' THEN
110: pa_debug.write_file('LOG', pa_debug.g_err_stage);
111: END IF;
112: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

Line 109: IF P_PA_DEBUG_MODE = 'Y' THEN

105:
106: pa_debug.init_err_stack('PAPFEXCP');
107: pa_debug.set_process('PLSQL','LOG','Y');
108: pa_debug.G_err_stage := 'Entering PAPFEXCP ()';
109: IF P_PA_DEBUG_MODE = 'Y' THEN
110: pa_debug.write_file('LOG', pa_debug.g_err_stage);
111: END IF;
112: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
113: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 110: pa_debug.write_file('LOG', pa_debug.g_err_stage);

106: pa_debug.init_err_stack('PAPFEXCP');
107: pa_debug.set_process('PLSQL','LOG','Y');
108: pa_debug.G_err_stage := 'Entering PAPFEXCP ()';
109: IF P_PA_DEBUG_MODE = 'Y' THEN
110: pa_debug.write_file('LOG', pa_debug.g_err_stage);
111: END IF;
112: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
113: IF P_PA_DEBUG_MODE = 'Y' THEN
114: pa_debug.write_file('LOG', pa_debug.g_err_stage);

Line 112: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

108: pa_debug.G_err_stage := 'Entering PAPFEXCP ()';
109: IF P_PA_DEBUG_MODE = 'Y' THEN
110: pa_debug.write_file('LOG', pa_debug.g_err_stage);
111: END IF;
112: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
113: IF P_PA_DEBUG_MODE = 'Y' THEN
114: pa_debug.write_file('LOG', pa_debug.g_err_stage);
115: END IF;
116:

Line 113: IF P_PA_DEBUG_MODE = 'Y' THEN

109: IF P_PA_DEBUG_MODE = 'Y' THEN
110: pa_debug.write_file('LOG', pa_debug.g_err_stage);
111: END IF;
112: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
113: IF P_PA_DEBUG_MODE = 'Y' THEN
114: pa_debug.write_file('LOG', pa_debug.g_err_stage);
115: END IF;
116:
117: /* Write the Parameters passed in */

Line 114: pa_debug.write_file('LOG', pa_debug.g_err_stage);

110: pa_debug.write_file('LOG', pa_debug.g_err_stage);
111: END IF;
112: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
113: IF P_PA_DEBUG_MODE = 'Y' THEN
114: pa_debug.write_file('LOG', pa_debug.g_err_stage);
115: END IF;
116:
117: /* Write the Parameters passed in */
118: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 118: IF P_PA_DEBUG_MODE = 'Y' THEN

114: pa_debug.write_file('LOG', pa_debug.g_err_stage);
115: END IF;
116:
117: /* Write the Parameters passed in */
118: IF P_PA_DEBUG_MODE = 'Y' THEN
119: PA_DEBUG.write_file('LOG', 'Parameters passed ');
120: PA_DEBUG.write_file('LOG', 'Project OU => '||p_project_ou);
121: PA_DEBUG.write_file('LOG', 'Project Org => '||p_project_org);
122: PA_DEBUG.write_file('LOG', 'Project Type => '||p_project_type);

Line 119: PA_DEBUG.write_file('LOG', 'Parameters passed ');

115: END IF;
116:
117: /* Write the Parameters passed in */
118: IF P_PA_DEBUG_MODE = 'Y' THEN
119: PA_DEBUG.write_file('LOG', 'Parameters passed ');
120: PA_DEBUG.write_file('LOG', 'Project OU => '||p_project_ou);
121: PA_DEBUG.write_file('LOG', 'Project Org => '||p_project_org);
122: PA_DEBUG.write_file('LOG', 'Project Type => '||p_project_type);
123: PA_DEBUG.write_file('LOG', 'Project Manager => '||p_project_manager);

Line 120: PA_DEBUG.write_file('LOG', 'Project OU => '||p_project_ou);

116:
117: /* Write the Parameters passed in */
118: IF P_PA_DEBUG_MODE = 'Y' THEN
119: PA_DEBUG.write_file('LOG', 'Parameters passed ');
120: PA_DEBUG.write_file('LOG', 'Project OU => '||p_project_ou);
121: PA_DEBUG.write_file('LOG', 'Project Org => '||p_project_org);
122: PA_DEBUG.write_file('LOG', 'Project Type => '||p_project_type);
123: PA_DEBUG.write_file('LOG', 'Project Manager => '||p_project_manager);
124: PA_DEBUG.write_file('LOG', 'Project From => '||p_project_from);

Line 121: PA_DEBUG.write_file('LOG', 'Project Org => '||p_project_org);

117: /* Write the Parameters passed in */
118: IF P_PA_DEBUG_MODE = 'Y' THEN
119: PA_DEBUG.write_file('LOG', 'Parameters passed ');
120: PA_DEBUG.write_file('LOG', 'Project OU => '||p_project_ou);
121: PA_DEBUG.write_file('LOG', 'Project Org => '||p_project_org);
122: PA_DEBUG.write_file('LOG', 'Project Type => '||p_project_type);
123: PA_DEBUG.write_file('LOG', 'Project Manager => '||p_project_manager);
124: PA_DEBUG.write_file('LOG', 'Project From => '||p_project_from);
125: PA_DEBUG.write_file('LOG', 'Project To => '||p_project_to);

Line 122: PA_DEBUG.write_file('LOG', 'Project Type => '||p_project_type);

118: IF P_PA_DEBUG_MODE = 'Y' THEN
119: PA_DEBUG.write_file('LOG', 'Parameters passed ');
120: PA_DEBUG.write_file('LOG', 'Project OU => '||p_project_ou);
121: PA_DEBUG.write_file('LOG', 'Project Org => '||p_project_org);
122: PA_DEBUG.write_file('LOG', 'Project Type => '||p_project_type);
123: PA_DEBUG.write_file('LOG', 'Project Manager => '||p_project_manager);
124: PA_DEBUG.write_file('LOG', 'Project From => '||p_project_from);
125: PA_DEBUG.write_file('LOG', 'Project To => '||p_project_to);
126: PA_DEBUG.write_file('LOG', 'Exception Flag => '||p_generate_exceptions);

Line 123: PA_DEBUG.write_file('LOG', 'Project Manager => '||p_project_manager);

119: PA_DEBUG.write_file('LOG', 'Parameters passed ');
120: PA_DEBUG.write_file('LOG', 'Project OU => '||p_project_ou);
121: PA_DEBUG.write_file('LOG', 'Project Org => '||p_project_org);
122: PA_DEBUG.write_file('LOG', 'Project Type => '||p_project_type);
123: PA_DEBUG.write_file('LOG', 'Project Manager => '||p_project_manager);
124: PA_DEBUG.write_file('LOG', 'Project From => '||p_project_from);
125: PA_DEBUG.write_file('LOG', 'Project To => '||p_project_to);
126: PA_DEBUG.write_file('LOG', 'Exception Flag => '||p_generate_exceptions);
127: PA_DEBUG.write_file('LOG', 'KPA Scoring Flag => '||p_generate_scoring);

Line 124: PA_DEBUG.write_file('LOG', 'Project From => '||p_project_from);

120: PA_DEBUG.write_file('LOG', 'Project OU => '||p_project_ou);
121: PA_DEBUG.write_file('LOG', 'Project Org => '||p_project_org);
122: PA_DEBUG.write_file('LOG', 'Project Type => '||p_project_type);
123: PA_DEBUG.write_file('LOG', 'Project Manager => '||p_project_manager);
124: PA_DEBUG.write_file('LOG', 'Project From => '||p_project_from);
125: PA_DEBUG.write_file('LOG', 'Project To => '||p_project_to);
126: PA_DEBUG.write_file('LOG', 'Exception Flag => '||p_generate_exceptions);
127: PA_DEBUG.write_file('LOG', 'KPA Scoring Flag => '||p_generate_scoring);
128: PA_DEBUG.write_file('LOG', 'Notification Flag => '||p_generate_notification);

Line 125: PA_DEBUG.write_file('LOG', 'Project To => '||p_project_to);

121: PA_DEBUG.write_file('LOG', 'Project Org => '||p_project_org);
122: PA_DEBUG.write_file('LOG', 'Project Type => '||p_project_type);
123: PA_DEBUG.write_file('LOG', 'Project Manager => '||p_project_manager);
124: PA_DEBUG.write_file('LOG', 'Project From => '||p_project_from);
125: PA_DEBUG.write_file('LOG', 'Project To => '||p_project_to);
126: PA_DEBUG.write_file('LOG', 'Exception Flag => '||p_generate_exceptions);
127: PA_DEBUG.write_file('LOG', 'KPA Scoring Flag => '||p_generate_scoring);
128: PA_DEBUG.write_file('LOG', 'Notification Flag => '||p_generate_notification);
129: PA_DEBUG.write_file('LOG', 'Purge Flag => '||p_purge);

Line 126: PA_DEBUG.write_file('LOG', 'Exception Flag => '||p_generate_exceptions);

122: PA_DEBUG.write_file('LOG', 'Project Type => '||p_project_type);
123: PA_DEBUG.write_file('LOG', 'Project Manager => '||p_project_manager);
124: PA_DEBUG.write_file('LOG', 'Project From => '||p_project_from);
125: PA_DEBUG.write_file('LOG', 'Project To => '||p_project_to);
126: PA_DEBUG.write_file('LOG', 'Exception Flag => '||p_generate_exceptions);
127: PA_DEBUG.write_file('LOG', 'KPA Scoring Flag => '||p_generate_scoring);
128: PA_DEBUG.write_file('LOG', 'Notification Flag => '||p_generate_notification);
129: PA_DEBUG.write_file('LOG', 'Purge Flag => '||p_purge);
130: END IF;

Line 127: PA_DEBUG.write_file('LOG', 'KPA Scoring Flag => '||p_generate_scoring);

123: PA_DEBUG.write_file('LOG', 'Project Manager => '||p_project_manager);
124: PA_DEBUG.write_file('LOG', 'Project From => '||p_project_from);
125: PA_DEBUG.write_file('LOG', 'Project To => '||p_project_to);
126: PA_DEBUG.write_file('LOG', 'Exception Flag => '||p_generate_exceptions);
127: PA_DEBUG.write_file('LOG', 'KPA Scoring Flag => '||p_generate_scoring);
128: PA_DEBUG.write_file('LOG', 'Notification Flag => '||p_generate_notification);
129: PA_DEBUG.write_file('LOG', 'Purge Flag => '||p_purge);
130: END IF;
131:

Line 128: PA_DEBUG.write_file('LOG', 'Notification Flag => '||p_generate_notification);

124: PA_DEBUG.write_file('LOG', 'Project From => '||p_project_from);
125: PA_DEBUG.write_file('LOG', 'Project To => '||p_project_to);
126: PA_DEBUG.write_file('LOG', 'Exception Flag => '||p_generate_exceptions);
127: PA_DEBUG.write_file('LOG', 'KPA Scoring Flag => '||p_generate_scoring);
128: PA_DEBUG.write_file('LOG', 'Notification Flag => '||p_generate_notification);
129: PA_DEBUG.write_file('LOG', 'Purge Flag => '||p_purge);
130: END IF;
131:
132: /* Check the parameters. If none of the parameters are passed in then do not

Line 129: PA_DEBUG.write_file('LOG', 'Purge Flag => '||p_purge);

125: PA_DEBUG.write_file('LOG', 'Project To => '||p_project_to);
126: PA_DEBUG.write_file('LOG', 'Exception Flag => '||p_generate_exceptions);
127: PA_DEBUG.write_file('LOG', 'KPA Scoring Flag => '||p_generate_scoring);
128: PA_DEBUG.write_file('LOG', 'Notification Flag => '||p_generate_notification);
129: PA_DEBUG.write_file('LOG', 'Purge Flag => '||p_purge);
130: END IF;
131:
132: /* Check the parameters. If none of the parameters are passed in then do not
133: proceed on processing else continue */

Line 141: IF P_PA_DEBUG_MODE = 'Y' THEN -- Added for Bug 4324724

137: p_project_manager is NULL AND
138: p_project_from is NULL AND
139: p_project_to is NULL ) THEN
140:
141: IF P_PA_DEBUG_MODE = 'Y' THEN -- Added for Bug 4324724
142: PA_DEBUG.write_file('LOG', 'No parameters passed in () Exception Engine will not continue');
143: END IF;
144:
145: RAISE FND_API.G_EXC_ERROR; -- For Bug 4324724

Line 142: PA_DEBUG.write_file('LOG', 'No parameters passed in () Exception Engine will not continue');

138: p_project_from is NULL AND
139: p_project_to is NULL ) THEN
140:
141: IF P_PA_DEBUG_MODE = 'Y' THEN -- Added for Bug 4324724
142: PA_DEBUG.write_file('LOG', 'No parameters passed in () Exception Engine will not continue');
143: END IF;
144:
145: RAISE FND_API.G_EXC_ERROR; -- For Bug 4324724
146:

Line 181: IF P_PA_DEBUG_MODE = 'Y' THEN

177:
178: END IF;
179:
180: -- Do not proceed if there are no projects selected
181: IF P_PA_DEBUG_MODE = 'Y' THEN
182: pa_debug.write_file('LOG', 'Project count selected : '||l_project_list.COUNT);
183: END IF;
184:
185: IF l_project_list.COUNT <> 0 THEN

Line 182: pa_debug.write_file('LOG', 'Project count selected : '||l_project_list.COUNT);

178: END IF;
179:
180: -- Do not proceed if there are no projects selected
181: IF P_PA_DEBUG_MODE = 'Y' THEN
182: pa_debug.write_file('LOG', 'Project count selected : '||l_project_list.COUNT);
183: END IF;
184:
185: IF l_project_list.COUNT <> 0 THEN
186: /*** End business logic to get the list of Projects ***/

Line 197: IF P_PA_DEBUG_MODE = 'Y' THEN

193: x_errbuf => l_errbuf,
194: x_retcode => l_retcode
195: );
196: IF l_retcode = '0' THEN
197: IF P_PA_DEBUG_MODE = 'Y' THEN
198: PA_DEBUG.g_err_stage := 'After calling Generate Exceptions API . . returns error: '||l_errbuf;
199: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
200: RETURN;
201: END IF;

Line 198: PA_DEBUG.g_err_stage := 'After calling Generate Exceptions API . . returns error: '||l_errbuf;

194: x_retcode => l_retcode
195: );
196: IF l_retcode = '0' THEN
197: IF P_PA_DEBUG_MODE = 'Y' THEN
198: PA_DEBUG.g_err_stage := 'After calling Generate Exceptions API . . returns error: '||l_errbuf;
199: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
200: RETURN;
201: END IF;
202: END IF;

Line 199: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

195: );
196: IF l_retcode = '0' THEN
197: IF P_PA_DEBUG_MODE = 'Y' THEN
198: PA_DEBUG.g_err_stage := 'After calling Generate Exceptions API . . returns error: '||l_errbuf;
199: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
200: RETURN;
201: END IF;
202: END IF;
203: END IF;

Line 215: IF P_PA_DEBUG_MODE = 'Y' THEN

211: x_retcode => l_retcode
212: );
213:
214: IF l_retcode = '0' THEN
215: IF P_PA_DEBUG_MODE = 'Y' THEN
216: PA_DEBUG.g_err_stage := 'After calling Generate KPA Scoring API . . returns error: '||l_errbuf;
217: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
218: RETURN;
219: END IF;

Line 216: PA_DEBUG.g_err_stage := 'After calling Generate KPA Scoring API . . returns error: '||l_errbuf;

212: );
213:
214: IF l_retcode = '0' THEN
215: IF P_PA_DEBUG_MODE = 'Y' THEN
216: PA_DEBUG.g_err_stage := 'After calling Generate KPA Scoring API . . returns error: '||l_errbuf;
217: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
218: RETURN;
219: END IF;
220: END IF;

Line 217: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

213:
214: IF l_retcode = '0' THEN
215: IF P_PA_DEBUG_MODE = 'Y' THEN
216: PA_DEBUG.g_err_stage := 'After calling Generate KPA Scoring API . . returns error: '||l_errbuf;
217: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
218: RETURN;
219: END IF;
220: END IF;
221: END IF;

Line 233: IF P_PA_DEBUG_MODE = 'Y' THEN

229: x_retcode => l_retcode
230: );
231:
232: IF l_retcode = '0' THEN
233: IF P_PA_DEBUG_MODE = 'Y' THEN
234: PA_DEBUG.g_err_stage := 'After calling Generate Notification Logic API . . returns error: '||l_errbuf;
235: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
236: END IF;
237: END IF;

Line 234: PA_DEBUG.g_err_stage := 'After calling Generate Notification Logic API . . returns error: '||l_errbuf;

230: );
231:
232: IF l_retcode = '0' THEN
233: IF P_PA_DEBUG_MODE = 'Y' THEN
234: PA_DEBUG.g_err_stage := 'After calling Generate Notification Logic API . . returns error: '||l_errbuf;
235: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
236: END IF;
237: END IF;
238:

Line 235: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

231:
232: IF l_retcode = '0' THEN
233: IF P_PA_DEBUG_MODE = 'Y' THEN
234: PA_DEBUG.g_err_stage := 'After calling Generate Notification Logic API . . returns error: '||l_errbuf;
235: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
236: END IF;
237: END IF;
238:
239: END IF;

Line 243: pa_debug.write_file('LOG', 'Days Old not passed in () Purge Logic API will not continue');

239: END IF;
240:
241: IF ( NVL(p_purge,'N') = 'Y' ) THEN
242: IF p_daysold is NULL THEN
243: pa_debug.write_file('LOG', 'Days Old not passed in () Purge Logic API will not continue');
244: ELSE
245:
246: -- CALL PURGE TRANSACTION LOGIC --
247: PA_EXCEPTION_ENGINE_PKG.purge_transaction(

Line 255: IF P_PA_DEBUG_MODE = 'Y' THEN

251: x_retcode => l_retcode
252: );
253:
254: IF l_retcode = '0' THEN
255: IF P_PA_DEBUG_MODE = 'Y' THEN
256: PA_DEBUG.g_err_stage := 'After calling Purge Transaction Logic API . . returns error: '||l_errbuf;
257: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
258: END IF;
259: END IF;

Line 256: PA_DEBUG.g_err_stage := 'After calling Purge Transaction Logic API . . returns error: '||l_errbuf;

252: );
253:
254: IF l_retcode = '0' THEN
255: IF P_PA_DEBUG_MODE = 'Y' THEN
256: PA_DEBUG.g_err_stage := 'After calling Purge Transaction Logic API . . returns error: '||l_errbuf;
257: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
258: END IF;
259: END IF;
260: END IF;

Line 257: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

253:
254: IF l_retcode = '0' THEN
255: IF P_PA_DEBUG_MODE = 'Y' THEN
256: PA_DEBUG.g_err_stage := 'After calling Purge Transaction Logic API . . returns error: '||l_errbuf;
257: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
258: END IF;
259: END IF;
260: END IF;
261: END IF;

Line 263: pa_debug.write_file('LOG', 'No valid project to be processed.');

259: END IF;
260: END IF;
261: END IF;
262: ELSE
263: pa_debug.write_file('LOG', 'No valid project to be processed.');
264: END IF; --end if for Project count 0
265:
266: END IF; --end if for No parameters passed in
267:

Line 270: pa_debug.G_err_stage := 'Leaving PAPFEXCP () with success';

266: END IF; --end if for No parameters passed in
267:
268: x_retcode := '0';
269:
270: pa_debug.G_err_stage := 'Leaving PAPFEXCP () with success';
271: IF P_PA_DEBUG_MODE = 'Y' THEN
272: pa_debug.write_file('LOG', pa_debug.g_err_stage);
273: END IF;
274: pa_debug.reset_err_stack;

Line 271: IF P_PA_DEBUG_MODE = 'Y' THEN

267:
268: x_retcode := '0';
269:
270: pa_debug.G_err_stage := 'Leaving PAPFEXCP () with success';
271: IF P_PA_DEBUG_MODE = 'Y' THEN
272: pa_debug.write_file('LOG', pa_debug.g_err_stage);
273: END IF;
274: pa_debug.reset_err_stack;
275:

Line 272: pa_debug.write_file('LOG', pa_debug.g_err_stage);

268: x_retcode := '0';
269:
270: pa_debug.G_err_stage := 'Leaving PAPFEXCP () with success';
271: IF P_PA_DEBUG_MODE = 'Y' THEN
272: pa_debug.write_file('LOG', pa_debug.g_err_stage);
273: END IF;
274: pa_debug.reset_err_stack;
275:
276:

Line 274: pa_debug.reset_err_stack;

270: pa_debug.G_err_stage := 'Leaving PAPFEXCP () with success';
271: IF P_PA_DEBUG_MODE = 'Y' THEN
272: pa_debug.write_file('LOG', pa_debug.g_err_stage);
273: END IF;
274: pa_debug.reset_err_stack;
275:
276:
277: EXCEPTION
278:

Line 281: pa_debug.write_file('LOG', 'PAPFEXCP () exception: No data found');

277: EXCEPTION
278:
279: WHEN NO_DATA_FOUND THEN
280:
281: pa_debug.write_file('LOG', 'PAPFEXCP () exception: No data found');
282: pa_debug.write_file('LOG', pa_debug.g_err_stack);
283: pa_debug.write_file('LOG', pa_debug.g_err_stage);
284:
285: WHEN FND_API.G_EXC_ERROR THEN -- Added for Bug 4324724

Line 282: pa_debug.write_file('LOG', pa_debug.g_err_stack);

278:
279: WHEN NO_DATA_FOUND THEN
280:
281: pa_debug.write_file('LOG', 'PAPFEXCP () exception: No data found');
282: pa_debug.write_file('LOG', pa_debug.g_err_stack);
283: pa_debug.write_file('LOG', pa_debug.g_err_stage);
284:
285: WHEN FND_API.G_EXC_ERROR THEN -- Added for Bug 4324724
286:

Line 283: pa_debug.write_file('LOG', pa_debug.g_err_stage);

279: WHEN NO_DATA_FOUND THEN
280:
281: pa_debug.write_file('LOG', 'PAPFEXCP () exception: No data found');
282: pa_debug.write_file('LOG', pa_debug.g_err_stack);
283: pa_debug.write_file('LOG', pa_debug.g_err_stage);
284:
285: WHEN FND_API.G_EXC_ERROR THEN -- Added for Bug 4324724
286:
287: FND_MESSAGE.SET_NAME ('PA', 'PA_EXCP_NO_PARAMS_PASSED'); -- Set the translatable message name.

Line 290: PA_DEBUG.write_file('LOG', l_no_params_err_msg); -- Write the error message to the log file.

286:
287: FND_MESSAGE.SET_NAME ('PA', 'PA_EXCP_NO_PARAMS_PASSED'); -- Set the translatable message name.
288: l_no_params_err_msg := FND_MESSAGE.GET; -- Get the error message.
289: x_errbuf := x_errbuf || 'errbuf: ' || l_no_params_err_msg; -- Set it in errbuf.
290: PA_DEBUG.write_file('LOG', l_no_params_err_msg); -- Write the error message to the log file.
291: RAISE; -- Pass on the exception to the calling API.
292:
293: WHEN OTHERS THEN
294:

Line 296: pa_debug.write_file('LOG', 'PAPFEXCP () exception: Others');

292:
293: WHEN OTHERS THEN
294:
295: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
296: pa_debug.write_file('LOG', 'PAPFEXCP () exception: Others');
297: pa_debug.write_file('LOG', pa_debug.g_err_stack);
298: pa_debug.write_file('LOG', pa_debug.g_err_stage);
299:
300: END PAPFEXCP;

Line 297: pa_debug.write_file('LOG', pa_debug.g_err_stack);

293: WHEN OTHERS THEN
294:
295: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
296: pa_debug.write_file('LOG', 'PAPFEXCP () exception: Others');
297: pa_debug.write_file('LOG', pa_debug.g_err_stack);
298: pa_debug.write_file('LOG', pa_debug.g_err_stage);
299:
300: END PAPFEXCP;
301:

Line 298: pa_debug.write_file('LOG', pa_debug.g_err_stage);

294:
295: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
296: pa_debug.write_file('LOG', 'PAPFEXCP () exception: Others');
297: pa_debug.write_file('LOG', pa_debug.g_err_stack);
298: pa_debug.write_file('LOG', pa_debug.g_err_stage);
299:
300: END PAPFEXCP;
301:
302: -- Procedure generate_exception

Line 424: pa_debug.G_err_stage := 'Entering GENERATE_EXCEPTION ()';

420:
421: BEGIN
422: x_retcode := '0';
423:
424: pa_debug.G_err_stage := 'Entering GENERATE_EXCEPTION ()';
425: IF P_PA_DEBUG_MODE = 'Y' THEN
426: pa_debug.write_file('LOG', pa_debug.g_err_stage);
427: END IF;
428: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

Line 425: IF P_PA_DEBUG_MODE = 'Y' THEN

421: BEGIN
422: x_retcode := '0';
423:
424: pa_debug.G_err_stage := 'Entering GENERATE_EXCEPTION ()';
425: IF P_PA_DEBUG_MODE = 'Y' THEN
426: pa_debug.write_file('LOG', pa_debug.g_err_stage);
427: END IF;
428: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
429: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 426: pa_debug.write_file('LOG', pa_debug.g_err_stage);

422: x_retcode := '0';
423:
424: pa_debug.G_err_stage := 'Entering GENERATE_EXCEPTION ()';
425: IF P_PA_DEBUG_MODE = 'Y' THEN
426: pa_debug.write_file('LOG', pa_debug.g_err_stage);
427: END IF;
428: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
429: IF P_PA_DEBUG_MODE = 'Y' THEN
430: pa_debug.write_file('LOG', pa_debug.g_err_stage);

Line 428: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

424: pa_debug.G_err_stage := 'Entering GENERATE_EXCEPTION ()';
425: IF P_PA_DEBUG_MODE = 'Y' THEN
426: pa_debug.write_file('LOG', pa_debug.g_err_stage);
427: END IF;
428: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
429: IF P_PA_DEBUG_MODE = 'Y' THEN
430: pa_debug.write_file('LOG', pa_debug.g_err_stage);
431: END IF;
432:

Line 429: IF P_PA_DEBUG_MODE = 'Y' THEN

425: IF P_PA_DEBUG_MODE = 'Y' THEN
426: pa_debug.write_file('LOG', pa_debug.g_err_stage);
427: END IF;
428: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
429: IF P_PA_DEBUG_MODE = 'Y' THEN
430: pa_debug.write_file('LOG', pa_debug.g_err_stage);
431: END IF;
432:
433: -- Remove the data in temp table

Line 430: pa_debug.write_file('LOG', pa_debug.g_err_stage);

426: pa_debug.write_file('LOG', pa_debug.g_err_stage);
427: END IF;
428: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
429: IF P_PA_DEBUG_MODE = 'Y' THEN
430: pa_debug.write_file('LOG', pa_debug.g_err_stage);
431: END IF;
432:
433: -- Remove the data in temp table
434: EXECUTE IMMEDIATE ('delete from pa_perf_temp_obj_measure') ;

Line 440: IF P_PA_DEBUG_MODE = 'Y' THEN

436:
437: /*** Begin business logic to generate the Performance Transaction ***/
438:
439: -- Step 1: Populate the temp table and prepare to get the measure value
440: IF P_PA_DEBUG_MODE = 'Y' THEN
441: PA_DEBUG.write_file('LOG', 'Number of Projects to be processed is : '||p_project_list.COUNT);
442: END IF;
443: FOR i IN p_project_list.FIRST .. p_project_list.LAST LOOP
444: -- Step 1: Populate PA_PERF_TEMP_OBJ_MEASURE (temp table)

Line 441: PA_DEBUG.write_file('LOG', 'Number of Projects to be processed is : '||p_project_list.COUNT);

437: /*** Begin business logic to generate the Performance Transaction ***/
438:
439: -- Step 1: Populate the temp table and prepare to get the measure value
440: IF P_PA_DEBUG_MODE = 'Y' THEN
441: PA_DEBUG.write_file('LOG', 'Number of Projects to be processed is : '||p_project_list.COUNT);
442: END IF;
443: FOR i IN p_project_list.FIRST .. p_project_list.LAST LOOP
444: -- Step 1: Populate PA_PERF_TEMP_OBJ_MEASURE (temp table)
445: -- get all the rules attached to the project

Line 453: IF P_PA_DEBUG_MODE = 'Y' THEN

449: CLOSE get_rule_id;
450:
451: IF l_rule_list.COUNT <> 0 THEN
452:
453: IF P_PA_DEBUG_MODE = 'Y' THEN
454: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_TEMP_OBJ_MEASURE temp table for Project: '||p_project_list(i));
455: PA_DEBUG.write_file('LOG', 'Number of Rule IDs : '||l_rule_list.COUNT);
456: END IF;
457:

Line 454: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_TEMP_OBJ_MEASURE temp table for Project: '||p_project_list(i));

450:
451: IF l_rule_list.COUNT <> 0 THEN
452:
453: IF P_PA_DEBUG_MODE = 'Y' THEN
454: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_TEMP_OBJ_MEASURE temp table for Project: '||p_project_list(i));
455: PA_DEBUG.write_file('LOG', 'Number of Rule IDs : '||l_rule_list.COUNT);
456: END IF;
457:
458: FOR j IN l_rule_list.FIRST .. l_rule_list.LAST LOOP

Line 455: PA_DEBUG.write_file('LOG', 'Number of Rule IDs : '||l_rule_list.COUNT);

451: IF l_rule_list.COUNT <> 0 THEN
452:
453: IF P_PA_DEBUG_MODE = 'Y' THEN
454: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_TEMP_OBJ_MEASURE temp table for Project: '||p_project_list(i));
455: PA_DEBUG.write_file('LOG', 'Number of Rule IDs : '||l_rule_list.COUNT);
456: END IF;
457:
458: FOR j IN l_rule_list.FIRST .. l_rule_list.LAST LOOP
459:

Line 468: PA_DEBUG.write_file('LOG', 'Rule ID '||l_rule_list(j)||' has no associated measure id');

464: l_currency_type, l_object_type;
465: CLOSE get_measures;
466:
467: IF l_measure_id is NULL THEN
468: PA_DEBUG.write_file('LOG', 'Rule ID '||l_rule_list(j)||' has no associated measure id');
469: ELSE
470: --- If bz_ent_code is not passed in, get one bz_ent_code
471: --- from pa_perf_bz_measures for the given measure id
472: IF (p_business_event_code = 'N') THEN

Line 544: IF P_PA_DEBUG_MODE = 'Y' THEN

540: END LOOP; -- end loop for l_rule_list
541: ELSE
542: --NULL;
543: --Added for bug# 3918182
544: IF P_PA_DEBUG_MODE = 'Y' THEN
545: PA_DEBUG.write_file('LOG', 'No performance rules are associated to the project ');
546: END IF;
547: -- Since there are no performance rules associated to the project there should not be
548: -- any current transaction record for the project. So marking all the transaction for the

Line 545: PA_DEBUG.write_file('LOG', 'No performance rules are associated to the project ');

541: ELSE
542: --NULL;
543: --Added for bug# 3918182
544: IF P_PA_DEBUG_MODE = 'Y' THEN
545: PA_DEBUG.write_file('LOG', 'No performance rules are associated to the project ');
546: END IF;
547: -- Since there are no performance rules associated to the project there should not be
548: -- any current transaction record for the project. So marking all the transaction for the
549: -- project as History

Line 561: IF P_PA_DEBUG_MODE = 'Y' THEN

557: END LOOP; --end loop for l_project_list
558:
559: commit; --Save the work after inserting all the projects into temp table
560:
561: IF P_PA_DEBUG_MODE = 'Y' THEN
562: PA_DEBUG.write_file('LOG', 'End of Step 1 .. Inserting into PA_PERF_TEMP_OBJ_MEASURE temp table');
563: END IF;
564:
565: --- Step 2: Call Business Event API to get the value of measure_id

Line 562: PA_DEBUG.write_file('LOG', 'End of Step 1 .. Inserting into PA_PERF_TEMP_OBJ_MEASURE temp table');

558:
559: commit; --Save the work after inserting all the projects into temp table
560:
561: IF P_PA_DEBUG_MODE = 'Y' THEN
562: PA_DEBUG.write_file('LOG', 'End of Step 1 .. Inserting into PA_PERF_TEMP_OBJ_MEASURE temp table');
563: END IF;
564:
565: --- Step 2: Call Business Event API to get the value of measure_id
566: --- for a given project_id. This API will do the update on the temp

Line 590: IF P_PA_DEBUG_MODE = 'Y' THEN

586: -- for PA_PERF_BZ_EVENTS lookup_type --
587: -- l_program_name is the name of the extension API.
588: -- For instance 'SUMMARIZATION.EXCEPTION'
589:
590: IF P_PA_DEBUG_MODE = 'Y' THEN
591: PA_DEBUG.g_err_stage := 'Executing Dynamic SQL to call API that will set the measure value.';
592: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
593: END IF;
594:

Line 591: PA_DEBUG.g_err_stage := 'Executing Dynamic SQL to call API that will set the measure value.';

587: -- l_program_name is the name of the extension API.
588: -- For instance 'SUMMARIZATION.EXCEPTION'
589:
590: IF P_PA_DEBUG_MODE = 'Y' THEN
591: PA_DEBUG.g_err_stage := 'Executing Dynamic SQL to call API that will set the measure value.';
592: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
593: END IF;
594:
595: BEGIN

Line 592: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

588: -- For instance 'SUMMARIZATION.EXCEPTION'
589:
590: IF P_PA_DEBUG_MODE = 'Y' THEN
591: PA_DEBUG.g_err_stage := 'Executing Dynamic SQL to call API that will set the measure value.';
592: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
593: END IF;
594:
595: BEGIN
596:

Line 634: IF P_PA_DEBUG_MODE = 'Y' THEN

630: dbms_sql.variable_value(l_cursor, ':msg_data', l_msg_data);
631: dbms_sql.variable_value(l_cursor, ':return_status', l_return_status);
632:
633: IF ( l_return_status <> 'S') THEN
634: IF P_PA_DEBUG_MODE = 'Y' THEN
635: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with error';
636: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
637: END IF;
638: ELSE

Line 635: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with error';

631: dbms_sql.variable_value(l_cursor, ':return_status', l_return_status);
632:
633: IF ( l_return_status <> 'S') THEN
634: IF P_PA_DEBUG_MODE = 'Y' THEN
635: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with error';
636: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
637: END IF;
638: ELSE
639: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 636: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

632:
633: IF ( l_return_status <> 'S') THEN
634: IF P_PA_DEBUG_MODE = 'Y' THEN
635: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with error';
636: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
637: END IF;
638: ELSE
639: IF P_PA_DEBUG_MODE = 'Y' THEN
640: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with success';

Line 639: IF P_PA_DEBUG_MODE = 'Y' THEN

635: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with error';
636: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
637: END IF;
638: ELSE
639: IF P_PA_DEBUG_MODE = 'Y' THEN
640: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with success';
641: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
642: END IF;
643: dbms_sql.close_cursor(l_cursor);

Line 640: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with success';

636: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
637: END IF;
638: ELSE
639: IF P_PA_DEBUG_MODE = 'Y' THEN
640: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with success';
641: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
642: END IF;
643: dbms_sql.close_cursor(l_cursor);
644: END IF;

Line 641: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

637: END IF;
638: ELSE
639: IF P_PA_DEBUG_MODE = 'Y' THEN
640: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with success';
641: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
642: END IF;
643: dbms_sql.close_cursor(l_cursor);
644: END IF;
645:

Line 649: pa_debug.write_file('LOG', 'Error executing Dynamic SQL () exception: Others '||sqlerrm);

645:
646: EXCEPTION
647: WHEN others THEN
648: dbms_sql.close_cursor(l_cursor);
649: pa_debug.write_file('LOG', 'Error executing Dynamic SQL () exception: Others '||sqlerrm);
650: END;
651: IF P_PA_DEBUG_MODE = 'Y' THEN
652: PA_DEBUG.write_file('LOG', 'End of Step 2 . . Called Business Event API to get the measure value');
653: END IF;

Line 651: IF P_PA_DEBUG_MODE = 'Y' THEN

647: WHEN others THEN
648: dbms_sql.close_cursor(l_cursor);
649: pa_debug.write_file('LOG', 'Error executing Dynamic SQL () exception: Others '||sqlerrm);
650: END;
651: IF P_PA_DEBUG_MODE = 'Y' THEN
652: PA_DEBUG.write_file('LOG', 'End of Step 2 . . Called Business Event API to get the measure value');
653: END IF;
654: -- till here for dynamic SQL
655: END IF;

Line 652: PA_DEBUG.write_file('LOG', 'End of Step 2 . . Called Business Event API to get the measure value');

648: dbms_sql.close_cursor(l_cursor);
649: pa_debug.write_file('LOG', 'Error executing Dynamic SQL () exception: Others '||sqlerrm);
650: END;
651: IF P_PA_DEBUG_MODE = 'Y' THEN
652: PA_DEBUG.write_file('LOG', 'End of Step 2 . . Called Business Event API to get the measure value');
653: END IF;
654: -- till here for dynamic SQL
655: END IF;
656:

Line 659: IF P_PA_DEBUG_MODE = 'Y' THEN -- Added for Bug 4324824

655: END IF;
656:
657: END LOOP; --end loop for l_bz_code_list
658: ELSE
659: IF P_PA_DEBUG_MODE = 'Y' THEN -- Added for Bug 4324824
660: PA_DEBUG.write_file('LOG', 'No Business Event code selected from PA_PERF_TEMP_OBJ_MEASURE temp table.');
661: END IF;
662: END IF;
663: -- End of Step 2

Line 660: PA_DEBUG.write_file('LOG', 'No Business Event code selected from PA_PERF_TEMP_OBJ_MEASURE temp table.');

656:
657: END LOOP; --end loop for l_bz_code_list
658: ELSE
659: IF P_PA_DEBUG_MODE = 'Y' THEN -- Added for Bug 4324824
660: PA_DEBUG.write_file('LOG', 'No Business Event code selected from PA_PERF_TEMP_OBJ_MEASURE temp table.');
661: END IF;
662: END IF;
663: -- End of Step 2
664:

Line 671: IF P_PA_DEBUG_MODE = 'Y' THEN

667: OPEN get_object_id ;
668: FETCH get_object_id bulk collect INTO l_object_list;
669: CLOSE get_object_id;
670:
671: IF P_PA_DEBUG_MODE = 'Y' THEN
672: PA_DEBUG.write_file('LOG', 'Number of Object IDs to be inserted into transaction table : '||l_object_list.COUNT);
673: END IF;
674: IF l_object_list.COUNT <> 0 THEN
675: FOR i IN l_object_list.FIRST .. l_object_list.LAST LOOP

Line 672: PA_DEBUG.write_file('LOG', 'Number of Object IDs to be inserted into transaction table : '||l_object_list.COUNT);

668: FETCH get_object_id bulk collect INTO l_object_list;
669: CLOSE get_object_id;
670:
671: IF P_PA_DEBUG_MODE = 'Y' THEN
672: PA_DEBUG.write_file('LOG', 'Number of Object IDs to be inserted into transaction table : '||l_object_list.COUNT);
673: END IF;
674: IF l_object_list.COUNT <> 0 THEN
675: FOR i IN l_object_list.FIRST .. l_object_list.LAST LOOP
676:

Line 677: IF P_PA_DEBUG_MODE = 'Y' THEN

673: END IF;
674: IF l_object_list.COUNT <> 0 THEN
675: FOR i IN l_object_list.FIRST .. l_object_list.LAST LOOP
676:
677: IF P_PA_DEBUG_MODE = 'Y' THEN
678: PA_DEBUG.write_file('LOG', 'Project ID : '||l_object_list(i));
679: END IF;
680: OPEN get_measure_id (l_object_list(i));
681: FETCH get_measure_id bulk collect INTO l_measure_list;

Line 678: PA_DEBUG.write_file('LOG', 'Project ID : '||l_object_list(i));

674: IF l_object_list.COUNT <> 0 THEN
675: FOR i IN l_object_list.FIRST .. l_object_list.LAST LOOP
676:
677: IF P_PA_DEBUG_MODE = 'Y' THEN
678: PA_DEBUG.write_file('LOG', 'Project ID : '||l_object_list(i));
679: END IF;
680: OPEN get_measure_id (l_object_list(i));
681: FETCH get_measure_id bulk collect INTO l_measure_list;
682: CLOSE get_measure_id;

Line 725: IF P_PA_DEBUG_MODE = 'Y' THEN

721:
722: END IF;
723: /* till here for marking the transaction to be not current */
724:
725: IF P_PA_DEBUG_MODE = 'Y' THEN
726: PA_DEBUG.write_file('LOG', 'Number of Measure ID : '||l_measure_list.COUNT);
727: END IF;
728: FOR j IN l_measure_list.FIRST .. l_measure_list.LAST LOOP
729: -- Get all the rule_id associated with the given measure_id

Line 726: PA_DEBUG.write_file('LOG', 'Number of Measure ID : '||l_measure_list.COUNT);

722: END IF;
723: /* till here for marking the transaction to be not current */
724:
725: IF P_PA_DEBUG_MODE = 'Y' THEN
726: PA_DEBUG.write_file('LOG', 'Number of Measure ID : '||l_measure_list.COUNT);
727: END IF;
728: FOR j IN l_measure_list.FIRST .. l_measure_list.LAST LOOP
729: -- Get all the rule_id associated with the given measure_id
730: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 730: IF P_PA_DEBUG_MODE = 'Y' THEN

726: PA_DEBUG.write_file('LOG', 'Number of Measure ID : '||l_measure_list.COUNT);
727: END IF;
728: FOR j IN l_measure_list.FIRST .. l_measure_list.LAST LOOP
729: -- Get all the rule_id associated with the given measure_id
730: IF P_PA_DEBUG_MODE = 'Y' THEN
731: PA_DEBUG.write_file('LOG', 'Measure ID : '||l_measure_list(j));
732: END IF;
733: OPEN get_rule_id_tmp (l_object_list(i), l_measure_list(j));
734: FETCH get_rule_id_tmp bulk collect INTO l_rule_list;

Line 731: PA_DEBUG.write_file('LOG', 'Measure ID : '||l_measure_list(j));

727: END IF;
728: FOR j IN l_measure_list.FIRST .. l_measure_list.LAST LOOP
729: -- Get all the rule_id associated with the given measure_id
730: IF P_PA_DEBUG_MODE = 'Y' THEN
731: PA_DEBUG.write_file('LOG', 'Measure ID : '||l_measure_list(j));
732: END IF;
733: OPEN get_rule_id_tmp (l_object_list(i), l_measure_list(j));
734: FETCH get_rule_id_tmp bulk collect INTO l_rule_list;
735: CLOSE get_rule_id_tmp;

Line 739: IF P_PA_DEBUG_MODE = 'Y' THEN

735: CLOSE get_rule_id_tmp;
736:
737: FOR k IN l_rule_list.FIRST .. l_rule_list.LAST LOOP
738:
739: IF P_PA_DEBUG_MODE = 'Y' THEN
740: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_rule_list(k));
741: END IF;
742: -- Get the calendar_type associated with the rule_id and measure_id
743: SELECT calendar_type

Line 740: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_rule_list(k));

736:
737: FOR k IN l_rule_list.FIRST .. l_rule_list.LAST LOOP
738:
739: IF P_PA_DEBUG_MODE = 'Y' THEN
740: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_rule_list(k));
741: END IF;
742: -- Get the calendar_type associated with the rule_id and measure_id
743: SELECT calendar_type
744: INTO l_period_type

Line 751: IF P_PA_DEBUG_MODE = 'Y' THEN

747: AND object_type = 'PA_PROJECTS'
748: AND measure_id = l_measure_list(j)
749: AND rule_id = l_rule_list(k);
750:
751: IF P_PA_DEBUG_MODE = 'Y' THEN
752: PA_DEBUG.write_file('LOG', 'Period Type : '||l_period_type);
753: END IF;
754:
755: -- Get the measure_value, period_type, period_name and rule_id

Line 752: PA_DEBUG.write_file('LOG', 'Period Type : '||l_period_type);

748: AND measure_id = l_measure_list(j)
749: AND rule_id = l_rule_list(k);
750:
751: IF P_PA_DEBUG_MODE = 'Y' THEN
752: PA_DEBUG.write_file('LOG', 'Period Type : '||l_period_type);
753: END IF;
754:
755: -- Get the measure_value, period_type, period_name and rule_id
756: -- for a given project_id and measure_id

Line 779: IF P_PA_DEBUG_MODE = 'Y' THEN

775: AND ppor.rule_id = ppr.rule_id
776: AND ppor.rule_id = pptom.rule_id
777: AND rownum = 1;
778:
779: IF P_PA_DEBUG_MODE = 'Y' THEN
780: PA_DEBUG.write_file('LOG', 'After selecting values from PA_PERF_TEMP_OBJ_MEASURE temp table' );
781: END IF;
782:
783: -- If measure value is null for a given measure_id and there is associated API

Line 780: PA_DEBUG.write_file('LOG', 'After selecting values from PA_PERF_TEMP_OBJ_MEASURE temp table' );

776: AND ppor.rule_id = pptom.rule_id
777: AND rownum = 1;
778:
779: IF P_PA_DEBUG_MODE = 'Y' THEN
780: PA_DEBUG.write_file('LOG', 'After selecting values from PA_PERF_TEMP_OBJ_MEASURE temp table' );
781: END IF;
782:
783: -- If measure value is null for a given measure_id and there is associated API
784: -- then call the API to get the measure value

Line 798: IF P_PA_DEBUG_MODE = 'Y' THEN

794: IF ( l_program_name IS NOT NULL ) THEN
795: -- Construct the dynamic SQL that will call the API from PJI_MT_MEASURES_V
796: -- l_program_name is the name of the extension API.
797: -- For instance 'SUMMARIZATION.EXCEPTION'
798: IF P_PA_DEBUG_MODE = 'Y' THEN
799: PA_DEBUG.g_err_stage := 'Executing Dynamic SQL to call Measure Value API '||l_program_name;
800: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
801: END IF;
802: BEGIN

Line 799: PA_DEBUG.g_err_stage := 'Executing Dynamic SQL to call Measure Value API '||l_program_name;

795: -- Construct the dynamic SQL that will call the API from PJI_MT_MEASURES_V
796: -- l_program_name is the name of the extension API.
797: -- For instance 'SUMMARIZATION.EXCEPTION'
798: IF P_PA_DEBUG_MODE = 'Y' THEN
799: PA_DEBUG.g_err_stage := 'Executing Dynamic SQL to call Measure Value API '||l_program_name;
800: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
801: END IF;
802: BEGIN
803:

Line 800: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

796: -- l_program_name is the name of the extension API.
797: -- For instance 'SUMMARIZATION.EXCEPTION'
798: IF P_PA_DEBUG_MODE = 'Y' THEN
799: PA_DEBUG.g_err_stage := 'Executing Dynamic SQL to call Measure Value API '||l_program_name;
800: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
801: END IF;
802: BEGIN
803:
804: l_return_status := 'S';

Line 860: IF P_PA_DEBUG_MODE = 'Y' THEN

856: dbms_sql.variable_value(l_cursor, ':msg_data', l_msg_data);
857:
858: -- Check if the call to Get Measure Value API is successful
859: IF ( l_return_status <> 'S' ) THEN
860: IF P_PA_DEBUG_MODE = 'Y' THEN
861: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with error';
862: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
863: END IF;
864: ELSE

Line 861: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with error';

857:
858: -- Check if the call to Get Measure Value API is successful
859: IF ( l_return_status <> 'S' ) THEN
860: IF P_PA_DEBUG_MODE = 'Y' THEN
861: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with error';
862: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
863: END IF;
864: ELSE
865: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 862: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

858: -- Check if the call to Get Measure Value API is successful
859: IF ( l_return_status <> 'S' ) THEN
860: IF P_PA_DEBUG_MODE = 'Y' THEN
861: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with error';
862: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
863: END IF;
864: ELSE
865: IF P_PA_DEBUG_MODE = 'Y' THEN
866: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with success';

Line 865: IF P_PA_DEBUG_MODE = 'Y' THEN

861: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with error';
862: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
863: END IF;
864: ELSE
865: IF P_PA_DEBUG_MODE = 'Y' THEN
866: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with success';
867: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
868: END IF;
869:

Line 866: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with success';

862: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
863: END IF;
864: ELSE
865: IF P_PA_DEBUG_MODE = 'Y' THEN
866: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with success';
867: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
868: END IF;
869:
870: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 867: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

863: END IF;
864: ELSE
865: IF P_PA_DEBUG_MODE = 'Y' THEN
866: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with success';
867: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
868: END IF;
869:
870: IF P_PA_DEBUG_MODE = 'Y' THEN
871: pa_debug.write_file('LOG','Period Name : '||l_period_name);

Line 870: IF P_PA_DEBUG_MODE = 'Y' THEN

866: PA_DEBUG.g_err_stage := 'After executing Dynamic SQL () with success';
867: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
868: END IF;
869:
870: IF P_PA_DEBUG_MODE = 'Y' THEN
871: pa_debug.write_file('LOG','Period Name : '||l_period_name);
872: END IF;
873:
874: IF l_measure_value is NOT NULL THEN

Line 871: pa_debug.write_file('LOG','Period Name : '||l_period_name);

867: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
868: END IF;
869:
870: IF P_PA_DEBUG_MODE = 'Y' THEN
871: pa_debug.write_file('LOG','Period Name : '||l_period_name);
872: END IF;
873:
874: IF l_measure_value is NOT NULL THEN
875: -- Update the measure value on pa_perf_temp_obj_measure table

Line 883: IF P_PA_DEBUG_MODE = 'Y' THEN

879: WHERE object_id = l_object_list(i)
880: AND measure_id = l_measure_list(j)
881: AND rule_id = l_rule_list(k)
882: AND object_type = 'PA_PROJECTS';
883: IF P_PA_DEBUG_MODE = 'Y' THEN
884: pa_debug.write_file('LOG','Updating PA_PERF_TEMP_OBJ_MEASURE () with success');
885: END IF;
886: END IF;
887: dbms_sql.close_cursor(l_cursor);

Line 884: pa_debug.write_file('LOG','Updating PA_PERF_TEMP_OBJ_MEASURE () with success');

880: AND measure_id = l_measure_list(j)
881: AND rule_id = l_rule_list(k)
882: AND object_type = 'PA_PROJECTS';
883: IF P_PA_DEBUG_MODE = 'Y' THEN
884: pa_debug.write_file('LOG','Updating PA_PERF_TEMP_OBJ_MEASURE () with success');
885: END IF;
886: END IF;
887: dbms_sql.close_cursor(l_cursor);
888: END IF;

Line 893: pa_debug.write_file('LOG','Error executing Dynamic SQL () exception: Others '||sqlerrm);

889:
890: EXCEPTION
891: WHEN others THEN
892: dbms_sql.close_cursor(l_cursor);
893: pa_debug.write_file('LOG','Error executing Dynamic SQL () exception: Others '||sqlerrm);
894: END;
895: -- till here for dynamic SQL --
896: ELSE
897: PA_DEBUG.write_file('LOG', 'No Measure Value API for measure id '||l_measure_list(j));

Line 897: PA_DEBUG.write_file('LOG', 'No Measure Value API for measure id '||l_measure_list(j));

893: pa_debug.write_file('LOG','Error executing Dynamic SQL () exception: Others '||sqlerrm);
894: END;
895: -- till here for dynamic SQL --
896: ELSE
897: PA_DEBUG.write_file('LOG', 'No Measure Value API for measure id '||l_measure_list(j));
898: END IF; --end if for program name is not null
899: END IF; --end if for measure values is not null
900:
901: SELECT measure_value

Line 910: IF P_PA_DEBUG_MODE = 'Y' THEN

906: AND object_type = 'PA_PROJECTS'
907: AND rule_id = l_rule_list(k)
908: AND ROWNUM = 1;
909:
910: IF P_PA_DEBUG_MODE = 'Y' THEN
911: pa_debug.write_file('LOG','Get Threshold for Measure Value : '||l_measure_value);
912: END IF;
913: -- Check whether the measure value is between the threshold from
914: -- and threshold to. If l_retcode = 1 then there is a match . . hence

Line 911: pa_debug.write_file('LOG','Get Threshold for Measure Value : '||l_measure_value);

907: AND rule_id = l_rule_list(k)
908: AND ROWNUM = 1;
909:
910: IF P_PA_DEBUG_MODE = 'Y' THEN
911: pa_debug.write_file('LOG','Get Threshold for Measure Value : '||l_measure_value);
912: END IF;
913: -- Check whether the measure value is between the threshold from
914: -- and threshold to. If l_retcode = 1 then there is a match . . hence
915: -- inserting the record into pa_perf_transactions table ELSE do nothing

Line 930: pa_debug.write_file('LOG','No matching threshold');

926: ,l_errbuf
927: ,l_retcode);
928:
929: IF l_retcode = '0' THEN
930: pa_debug.write_file('LOG','No matching threshold');
931: ELSE
932: -- Insert new record into PA_PERF_TRANSACTIONS table
933: IF P_PA_DEBUG_MODE = 'Y' THEN
934: pa_debug.write_file('LOG','Inserting record into PA_PERF_TRANSACTIONS');

Line 933: IF P_PA_DEBUG_MODE = 'Y' THEN

929: IF l_retcode = '0' THEN
930: pa_debug.write_file('LOG','No matching threshold');
931: ELSE
932: -- Insert new record into PA_PERF_TRANSACTIONS table
933: IF P_PA_DEBUG_MODE = 'Y' THEN
934: pa_debug.write_file('LOG','Inserting record into PA_PERF_TRANSACTIONS');
935: END IF;
936: INSERT INTO pa_perf_transactions
937: ( perf_txn_id

Line 934: pa_debug.write_file('LOG','Inserting record into PA_PERF_TRANSACTIONS');

930: pa_debug.write_file('LOG','No matching threshold');
931: ELSE
932: -- Insert new record into PA_PERF_TRANSACTIONS table
933: IF P_PA_DEBUG_MODE = 'Y' THEN
934: pa_debug.write_file('LOG','Inserting record into PA_PERF_TRANSACTIONS');
935: END IF;
936: INSERT INTO pa_perf_transactions
937: ( perf_txn_id
938: ,perf_txn_obj_type

Line 1010: IF P_PA_DEBUG_MODE = 'Y' THEN

1006:
1007: END LOOP; --end loop for l_object_list
1008: END IF; --end if for l_object_list.count is 0
1009:
1010: IF P_PA_DEBUG_MODE = 'Y' THEN
1011: PA_DEBUG.write_file('LOG', 'End of Step 3 . . Inserting into PA_PERF_TRANSACTIONS table');
1012: END IF;
1013: -- End of Step 3 --
1014:

Line 1011: PA_DEBUG.write_file('LOG', 'End of Step 3 . . Inserting into PA_PERF_TRANSACTIONS table');

1007: END LOOP; --end loop for l_object_list
1008: END IF; --end if for l_object_list.count is 0
1009:
1010: IF P_PA_DEBUG_MODE = 'Y' THEN
1011: PA_DEBUG.write_file('LOG', 'End of Step 3 . . Inserting into PA_PERF_TRANSACTIONS table');
1012: END IF;
1013: -- End of Step 3 --
1014:
1015: -- Remove the data in temp table

Line 1017: IF P_PA_DEBUG_MODE = 'Y' THEN

1013: -- End of Step 3 --
1014:
1015: -- Remove the data in temp table
1016: -- EXECUTE IMMEDIATE ('delete from pa_perf_temp_obj_measure') ;
1017: IF P_PA_DEBUG_MODE = 'Y' THEN
1018: pa_debug.write_file('LOG','Deleting records from PA_PERF_TEMP_OBJ_MEASURE () with success');
1019: END IF;
1020:
1021: -- Clean the Interface Table PA_PER_BZ_OBJECT --

Line 1018: pa_debug.write_file('LOG','Deleting records from PA_PERF_TEMP_OBJ_MEASURE () with success');

1014:
1015: -- Remove the data in temp table
1016: -- EXECUTE IMMEDIATE ('delete from pa_perf_temp_obj_measure') ;
1017: IF P_PA_DEBUG_MODE = 'Y' THEN
1018: pa_debug.write_file('LOG','Deleting records from PA_PERF_TEMP_OBJ_MEASURE () with success');
1019: END IF;
1020:
1021: -- Clean the Interface Table PA_PER_BZ_OBJECT --
1022:

Line 1024: IF P_PA_DEBUG_MODE = 'Y' THEN -- Added for Bug 4324824

1020:
1021: -- Clean the Interface Table PA_PER_BZ_OBJECT --
1022:
1023: IF p_business_event_code = 'N' THEN
1024: IF P_PA_DEBUG_MODE = 'Y' THEN -- Added for Bug 4324824
1025: pa_debug.write_file('LOG','No records will be deleted from PA_PERF_BZ_OBJECT since Business Event code is not passed in.');
1026: END IF;
1027: ELSE
1028: DELETE from pa_perf_bz_object

Line 1025: pa_debug.write_file('LOG','No records will be deleted from PA_PERF_BZ_OBJECT since Business Event code is not passed in.');

1021: -- Clean the Interface Table PA_PER_BZ_OBJECT --
1022:
1023: IF p_business_event_code = 'N' THEN
1024: IF P_PA_DEBUG_MODE = 'Y' THEN -- Added for Bug 4324824
1025: pa_debug.write_file('LOG','No records will be deleted from PA_PERF_BZ_OBJECT since Business Event code is not passed in.');
1026: END IF;
1027: ELSE
1028: DELETE from pa_perf_bz_object
1029: WHERE bz_ent_code = p_business_event_code;

Line 1030: IF P_PA_DEBUG_MODE = 'Y' THEN

1026: END IF;
1027: ELSE
1028: DELETE from pa_perf_bz_object
1029: WHERE bz_ent_code = p_business_event_code;
1030: IF P_PA_DEBUG_MODE = 'Y' THEN
1031: pa_debug.write_file('LOG','Deleting records from PA_PERF_BZ_OBJECT () with success');
1032: END IF;
1033: END IF;
1034:

Line 1031: pa_debug.write_file('LOG','Deleting records from PA_PERF_BZ_OBJECT () with success');

1027: ELSE
1028: DELETE from pa_perf_bz_object
1029: WHERE bz_ent_code = p_business_event_code;
1030: IF P_PA_DEBUG_MODE = 'Y' THEN
1031: pa_debug.write_file('LOG','Deleting records from PA_PERF_BZ_OBJECT () with success');
1032: END IF;
1033: END IF;
1034:
1035:

Line 1038: pa_debug.G_err_stage := 'Leaving GENERATE_EXCEPTION () with success';

1034:
1035:
1036: x_retcode := '1';
1037:
1038: pa_debug.G_err_stage := 'Leaving GENERATE_EXCEPTION () with success';
1039: IF P_PA_DEBUG_MODE = 'Y' THEN
1040: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1041: END IF;
1042: pa_debug.reset_err_stack;

Line 1039: IF P_PA_DEBUG_MODE = 'Y' THEN

1035:
1036: x_retcode := '1';
1037:
1038: pa_debug.G_err_stage := 'Leaving GENERATE_EXCEPTION () with success';
1039: IF P_PA_DEBUG_MODE = 'Y' THEN
1040: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1041: END IF;
1042: pa_debug.reset_err_stack;
1043:

Line 1040: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1036: x_retcode := '1';
1037:
1038: pa_debug.G_err_stage := 'Leaving GENERATE_EXCEPTION () with success';
1039: IF P_PA_DEBUG_MODE = 'Y' THEN
1040: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1041: END IF;
1042: pa_debug.reset_err_stack;
1043:
1044: commit;

Line 1042: pa_debug.reset_err_stack;

1038: pa_debug.G_err_stage := 'Leaving GENERATE_EXCEPTION () with success';
1039: IF P_PA_DEBUG_MODE = 'Y' THEN
1040: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1041: END IF;
1042: pa_debug.reset_err_stack;
1043:
1044: commit;
1045:
1046:

Line 1051: pa_debug.write_file('LOG', 'GENERATE_EXCEPTION () exception: No data found');

1047: EXCEPTION
1048:
1049: WHEN NO_DATA_FOUND THEN
1050:
1051: pa_debug.write_file('LOG', 'GENERATE_EXCEPTION () exception: No data found');
1052: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1053: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1054:
1055: WHEN OTHERS THEN

Line 1052: pa_debug.write_file('LOG', pa_debug.g_err_stack);

1048:
1049: WHEN NO_DATA_FOUND THEN
1050:
1051: pa_debug.write_file('LOG', 'GENERATE_EXCEPTION () exception: No data found');
1052: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1053: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1054:
1055: WHEN OTHERS THEN
1056:

Line 1053: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1049: WHEN NO_DATA_FOUND THEN
1050:
1051: pa_debug.write_file('LOG', 'GENERATE_EXCEPTION () exception: No data found');
1052: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1053: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1054:
1055: WHEN OTHERS THEN
1056:
1057: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;

Line 1058: pa_debug.write_file('LOG', 'GENERATE_EXCEPTION () exception: Others '||x_errbuf);

1054:
1055: WHEN OTHERS THEN
1056:
1057: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1058: pa_debug.write_file('LOG', 'GENERATE_EXCEPTION () exception: Others '||x_errbuf);
1059: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1060: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1061:
1062: END generate_exception;

Line 1059: pa_debug.write_file('LOG', pa_debug.g_err_stack);

1055: WHEN OTHERS THEN
1056:
1057: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1058: pa_debug.write_file('LOG', 'GENERATE_EXCEPTION () exception: Others '||x_errbuf);
1059: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1060: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1061:
1062: END generate_exception;
1063:

Line 1060: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1056:
1057: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1058: pa_debug.write_file('LOG', 'GENERATE_EXCEPTION () exception: Others '||x_errbuf);
1059: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1060: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1061:
1062: END generate_exception;
1063:
1064: -- Procedure generate_notification

Line 1098: pa_debug.G_err_stage := 'Entering GENERATE_NOTIFICATION ()';

1094: x_retcode := '0';
1095:
1096: l_project_list := p_project_list;
1097:
1098: pa_debug.G_err_stage := 'Entering GENERATE_NOTIFICATION ()';
1099: IF P_PA_DEBUG_MODE = 'Y' THEN
1100: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1101: END If;
1102: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

Line 1099: IF P_PA_DEBUG_MODE = 'Y' THEN

1095:
1096: l_project_list := p_project_list;
1097:
1098: pa_debug.G_err_stage := 'Entering GENERATE_NOTIFICATION ()';
1099: IF P_PA_DEBUG_MODE = 'Y' THEN
1100: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1101: END If;
1102: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1103: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 1100: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1096: l_project_list := p_project_list;
1097:
1098: pa_debug.G_err_stage := 'Entering GENERATE_NOTIFICATION ()';
1099: IF P_PA_DEBUG_MODE = 'Y' THEN
1100: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1101: END If;
1102: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1103: IF P_PA_DEBUG_MODE = 'Y' THEN
1104: pa_debug.write_file('LOG', pa_debug.g_err_stage);

Line 1102: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

1098: pa_debug.G_err_stage := 'Entering GENERATE_NOTIFICATION ()';
1099: IF P_PA_DEBUG_MODE = 'Y' THEN
1100: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1101: END If;
1102: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1103: IF P_PA_DEBUG_MODE = 'Y' THEN
1104: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1105: END IF;
1106:

Line 1103: IF P_PA_DEBUG_MODE = 'Y' THEN

1099: IF P_PA_DEBUG_MODE = 'Y' THEN
1100: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1101: END If;
1102: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1103: IF P_PA_DEBUG_MODE = 'Y' THEN
1104: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1105: END IF;
1106:
1107:

Line 1104: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1100: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1101: END If;
1102: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1103: IF P_PA_DEBUG_MODE = 'Y' THEN
1104: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1105: END IF;
1106:
1107:
1108: /*** Begin Notification logic ***/

Line 1128: pa_debug.g_err_stage:= 'Error calling START_PERF_NOTIFICATION_WF';

1124: ,x_msg_count => l_msg_count
1125: ,x_msg_data => l_msg_data);
1126:
1127: IF (l_return_status <> 'S') THEN
1128: pa_debug.g_err_stage:= 'Error calling START_PERF_NOTIFICATION_WF';
1129: IF P_PA_DEBUG_MODE = 'Y' THEN
1130: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1131: pa_debug.write_file('LOG','l_msg_data : '||l_msg_data);
1132: END IF;

Line 1129: IF P_PA_DEBUG_MODE = 'Y' THEN

1125: ,x_msg_data => l_msg_data);
1126:
1127: IF (l_return_status <> 'S') THEN
1128: pa_debug.g_err_stage:= 'Error calling START_PERF_NOTIFICATION_WF';
1129: IF P_PA_DEBUG_MODE = 'Y' THEN
1130: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1131: pa_debug.write_file('LOG','l_msg_data : '||l_msg_data);
1132: END IF;
1133:

Line 1130: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1126:
1127: IF (l_return_status <> 'S') THEN
1128: pa_debug.g_err_stage:= 'Error calling START_PERF_NOTIFICATION_WF';
1129: IF P_PA_DEBUG_MODE = 'Y' THEN
1130: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1131: pa_debug.write_file('LOG','l_msg_data : '||l_msg_data);
1132: END IF;
1133:
1134: PA_INTERFACE_UTILS_PUB.get_messages

Line 1131: pa_debug.write_file('LOG','l_msg_data : '||l_msg_data);

1127: IF (l_return_status <> 'S') THEN
1128: pa_debug.g_err_stage:= 'Error calling START_PERF_NOTIFICATION_WF';
1129: IF P_PA_DEBUG_MODE = 'Y' THEN
1130: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1131: pa_debug.write_file('LOG','l_msg_data : '||l_msg_data);
1132: END IF;
1133:
1134: PA_INTERFACE_UTILS_PUB.get_messages
1135: (p_encoded => FND_API.G_TRUE

Line 1142: IF P_PA_DEBUG_MODE = 'Y' THEN

1138: ,p_msg_data => l_msg_data
1139: ,p_data => l_data
1140: ,p_msg_index_out => l_msg_index_out);
1141:
1142: IF P_PA_DEBUG_MODE = 'Y' THEN
1143: pa_debug.write_file('LOG','l_data : '||l_data);
1144: END IF;
1145:
1146: END IF;

Line 1143: pa_debug.write_file('LOG','l_data : '||l_data);

1139: ,p_data => l_data
1140: ,p_msg_index_out => l_msg_index_out);
1141:
1142: IF P_PA_DEBUG_MODE = 'Y' THEN
1143: pa_debug.write_file('LOG','l_data : '||l_data);
1144: END IF;
1145:
1146: END IF;
1147: ELSE

Line 1148: pa_debug.write_file('LOG', ' There is no report type associated to the project( Project Id: '||l_project_list(i)||') to send the performance status notification ');

1144: END IF;
1145:
1146: END IF;
1147: ELSE
1148: pa_debug.write_file('LOG', ' There is no report type associated to the project( Project Id: '||l_project_list(i)||') to send the performance status notification ');
1149: END IF;
1150: CLOSE get_page;
1151: END LOOP;
1152:

Line 1155: pa_debug.G_err_stage := 'Leaving GENERATE_NOTIFICATION () with success';

1151: END LOOP;
1152:
1153: x_retcode := '1';
1154:
1155: pa_debug.G_err_stage := 'Leaving GENERATE_NOTIFICATION () with success';
1156: IF P_PA_DEBUG_MODE = 'Y' THEN
1157: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1158: END IF;
1159: pa_debug.reset_err_stack;

Line 1156: IF P_PA_DEBUG_MODE = 'Y' THEN

1152:
1153: x_retcode := '1';
1154:
1155: pa_debug.G_err_stage := 'Leaving GENERATE_NOTIFICATION () with success';
1156: IF P_PA_DEBUG_MODE = 'Y' THEN
1157: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1158: END IF;
1159: pa_debug.reset_err_stack;
1160:

Line 1157: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1153: x_retcode := '1';
1154:
1155: pa_debug.G_err_stage := 'Leaving GENERATE_NOTIFICATION () with success';
1156: IF P_PA_DEBUG_MODE = 'Y' THEN
1157: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1158: END IF;
1159: pa_debug.reset_err_stack;
1160:
1161: commit;

Line 1159: pa_debug.reset_err_stack;

1155: pa_debug.G_err_stage := 'Leaving GENERATE_NOTIFICATION () with success';
1156: IF P_PA_DEBUG_MODE = 'Y' THEN
1157: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1158: END IF;
1159: pa_debug.reset_err_stack;
1160:
1161: commit;
1162:
1163:

Line 1168: pa_debug.write_file('LOG', 'GENERATE_NOTIFICATION () exception: No data found');

1164: EXCEPTION
1165:
1166: WHEN NO_DATA_FOUND THEN
1167:
1168: pa_debug.write_file('LOG', 'GENERATE_NOTIFICATION () exception: No data found');
1169: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1170: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1171:
1172: WHEN OTHERS THEN

Line 1169: pa_debug.write_file('LOG', pa_debug.g_err_stack);

1165:
1166: WHEN NO_DATA_FOUND THEN
1167:
1168: pa_debug.write_file('LOG', 'GENERATE_NOTIFICATION () exception: No data found');
1169: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1170: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1171:
1172: WHEN OTHERS THEN
1173:

Line 1170: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1166: WHEN NO_DATA_FOUND THEN
1167:
1168: pa_debug.write_file('LOG', 'GENERATE_NOTIFICATION () exception: No data found');
1169: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1170: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1171:
1172: WHEN OTHERS THEN
1173:
1174: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;

Line 1175: pa_debug.write_file('LOG', 'GENERATE_NOTIFICATION () exception: Others');

1171:
1172: WHEN OTHERS THEN
1173:
1174: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1175: pa_debug.write_file('LOG', 'GENERATE_NOTIFICATION () exception: Others');
1176: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1177: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1178:
1179: END generate_notification;

Line 1176: pa_debug.write_file('LOG', pa_debug.g_err_stack);

1172: WHEN OTHERS THEN
1173:
1174: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1175: pa_debug.write_file('LOG', 'GENERATE_NOTIFICATION () exception: Others');
1176: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1177: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1178:
1179: END generate_notification;
1180:

Line 1177: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1173:
1174: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1175: pa_debug.write_file('LOG', 'GENERATE_NOTIFICATION () exception: Others');
1176: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1177: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1178:
1179: END generate_notification;
1180:
1181: -- Procedure purge_transaction

Line 1195: pa_debug.init_err_stack('PURGE_TRANSACTION ');

1191:
1192: x_retcode := '0';
1193:
1194:
1195: pa_debug.init_err_stack('PURGE_TRANSACTION ');
1196: pa_debug.set_process('PLSQL','LOG','Y');
1197: pa_debug.G_err_stage := 'Entering PURGE_TRANSACTION ()';
1198: IF P_PA_DEBUG_MODE = 'Y' THEN
1199: pa_debug.write_file('LOG', pa_debug.g_err_stage);

Line 1196: pa_debug.set_process('PLSQL','LOG','Y');

1192: x_retcode := '0';
1193:
1194:
1195: pa_debug.init_err_stack('PURGE_TRANSACTION ');
1196: pa_debug.set_process('PLSQL','LOG','Y');
1197: pa_debug.G_err_stage := 'Entering PURGE_TRANSACTION ()';
1198: IF P_PA_DEBUG_MODE = 'Y' THEN
1199: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1200: END IF;

Line 1197: pa_debug.G_err_stage := 'Entering PURGE_TRANSACTION ()';

1193:
1194:
1195: pa_debug.init_err_stack('PURGE_TRANSACTION ');
1196: pa_debug.set_process('PLSQL','LOG','Y');
1197: pa_debug.G_err_stage := 'Entering PURGE_TRANSACTION ()';
1198: IF P_PA_DEBUG_MODE = 'Y' THEN
1199: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1200: END IF;
1201: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

Line 1198: IF P_PA_DEBUG_MODE = 'Y' THEN

1194:
1195: pa_debug.init_err_stack('PURGE_TRANSACTION ');
1196: pa_debug.set_process('PLSQL','LOG','Y');
1197: pa_debug.G_err_stage := 'Entering PURGE_TRANSACTION ()';
1198: IF P_PA_DEBUG_MODE = 'Y' THEN
1199: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1200: END IF;
1201: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1202: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 1199: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1195: pa_debug.init_err_stack('PURGE_TRANSACTION ');
1196: pa_debug.set_process('PLSQL','LOG','Y');
1197: pa_debug.G_err_stage := 'Entering PURGE_TRANSACTION ()';
1198: IF P_PA_DEBUG_MODE = 'Y' THEN
1199: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1200: END IF;
1201: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1202: IF P_PA_DEBUG_MODE = 'Y' THEN
1203: pa_debug.write_file('LOG', pa_debug.g_err_stage);

Line 1201: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

1197: pa_debug.G_err_stage := 'Entering PURGE_TRANSACTION ()';
1198: IF P_PA_DEBUG_MODE = 'Y' THEN
1199: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1200: END IF;
1201: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1202: IF P_PA_DEBUG_MODE = 'Y' THEN
1203: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1204: END IF;
1205:

Line 1202: IF P_PA_DEBUG_MODE = 'Y' THEN

1198: IF P_PA_DEBUG_MODE = 'Y' THEN
1199: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1200: END IF;
1201: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1202: IF P_PA_DEBUG_MODE = 'Y' THEN
1203: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1204: END IF;
1205:
1206: FOR i IN p_project_list.FIRST .. p_project_list.LAST LOOP

Line 1203: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1199: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1200: END IF;
1201: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1202: IF P_PA_DEBUG_MODE = 'Y' THEN
1203: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1204: END IF;
1205:
1206: FOR i IN p_project_list.FIRST .. p_project_list.LAST LOOP
1207:

Line 1208: IF P_PA_DEBUG_MODE = 'Y' THEN

1204: END IF;
1205:
1206: FOR i IN p_project_list.FIRST .. p_project_list.LAST LOOP
1207:
1208: IF P_PA_DEBUG_MODE = 'Y' THEN
1209: pa_debug.write_file('LOG', 'Purging Project : ' || p_project_list(i));
1210: END IF;
1211:
1212: /*** clean up the comments transaction table based on project_id and purge_date ***/

Line 1209: pa_debug.write_file('LOG', 'Purging Project : ' || p_project_list(i));

1205:
1206: FOR i IN p_project_list.FIRST .. p_project_list.LAST LOOP
1207:
1208: IF P_PA_DEBUG_MODE = 'Y' THEN
1209: pa_debug.write_file('LOG', 'Purging Project : ' || p_project_list(i));
1210: END IF;
1211:
1212: /*** clean up the comments transaction table based on project_id and purge_date ***/
1213: DELETE from pa_perf_comments

Line 1258: pa_debug.G_err_stage := 'Leaving PURGE_TRANSACTION () with success';

1254: END LOOP;
1255:
1256: x_retcode := '1';
1257:
1258: pa_debug.G_err_stage := 'Leaving PURGE_TRANSACTION () with success';
1259: IF P_PA_DEBUG_MODE = 'Y' THEN
1260: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1261: END IF;
1262: pa_debug.reset_err_stack;

Line 1259: IF P_PA_DEBUG_MODE = 'Y' THEN

1255:
1256: x_retcode := '1';
1257:
1258: pa_debug.G_err_stage := 'Leaving PURGE_TRANSACTION () with success';
1259: IF P_PA_DEBUG_MODE = 'Y' THEN
1260: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1261: END IF;
1262: pa_debug.reset_err_stack;
1263:

Line 1260: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1256: x_retcode := '1';
1257:
1258: pa_debug.G_err_stage := 'Leaving PURGE_TRANSACTION () with success';
1259: IF P_PA_DEBUG_MODE = 'Y' THEN
1260: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1261: END IF;
1262: pa_debug.reset_err_stack;
1263:
1264: commit;

Line 1262: pa_debug.reset_err_stack;

1258: pa_debug.G_err_stage := 'Leaving PURGE_TRANSACTION () with success';
1259: IF P_PA_DEBUG_MODE = 'Y' THEN
1260: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1261: END IF;
1262: pa_debug.reset_err_stack;
1263:
1264: commit;
1265:
1266:

Line 1271: pa_debug.write_file('LOG', 'PURGE_TRANSACTION () exception: No data found');

1267: EXCEPTION
1268:
1269: WHEN NO_DATA_FOUND THEN
1270:
1271: pa_debug.write_file('LOG', 'PURGE_TRANSACTION () exception: No data found');
1272: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1273: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1274:
1275: WHEN OTHERS THEN

Line 1272: pa_debug.write_file('LOG', pa_debug.g_err_stack);

1268:
1269: WHEN NO_DATA_FOUND THEN
1270:
1271: pa_debug.write_file('LOG', 'PURGE_TRANSACTION () exception: No data found');
1272: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1273: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1274:
1275: WHEN OTHERS THEN
1276:

Line 1273: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1269: WHEN NO_DATA_FOUND THEN
1270:
1271: pa_debug.write_file('LOG', 'PURGE_TRANSACTION () exception: No data found');
1272: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1273: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1274:
1275: WHEN OTHERS THEN
1276:
1277: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;

Line 1278: pa_debug.write_file('LOG', 'PURGE_TRANSACTION () exception: Others');

1274:
1275: WHEN OTHERS THEN
1276:
1277: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1278: pa_debug.write_file('LOG', 'PURGE_TRANSACTION () exception: Others');
1279: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1280: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1281:
1282: END purge_transaction;

Line 1279: pa_debug.write_file('LOG', pa_debug.g_err_stack);

1275: WHEN OTHERS THEN
1276:
1277: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1278: pa_debug.write_file('LOG', 'PURGE_TRANSACTION () exception: Others');
1279: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1280: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1281:
1282: END purge_transaction;
1283:

Line 1280: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1276:
1277: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1278: pa_debug.write_file('LOG', 'PURGE_TRANSACTION () exception: Others');
1279: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1280: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1281:
1282: END purge_transaction;
1283:
1284: -- Procedure get_threshold

Line 1307: pa_debug.G_err_stage := 'Entering GET_THRESHOLD ()';

1303: BEGIN
1304:
1305: x_retcode := '0';
1306:
1307: pa_debug.G_err_stage := 'Entering GET_THRESHOLD ()';
1308: IF P_PA_DEBUG_MODE = 'Y' THEN
1309: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1310: END IF;
1311: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

Line 1308: IF P_PA_DEBUG_MODE = 'Y' THEN

1304:
1305: x_retcode := '0';
1306:
1307: pa_debug.G_err_stage := 'Entering GET_THRESHOLD ()';
1308: IF P_PA_DEBUG_MODE = 'Y' THEN
1309: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1310: END IF;
1311: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1312: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 1309: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1305: x_retcode := '0';
1306:
1307: pa_debug.G_err_stage := 'Entering GET_THRESHOLD ()';
1308: IF P_PA_DEBUG_MODE = 'Y' THEN
1309: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1310: END IF;
1311: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1312: IF P_PA_DEBUG_MODE = 'Y' THEN
1313: pa_debug.write_file('LOG', pa_debug.g_err_stage);

Line 1311: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

1307: pa_debug.G_err_stage := 'Entering GET_THRESHOLD ()';
1308: IF P_PA_DEBUG_MODE = 'Y' THEN
1309: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1310: END IF;
1311: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1312: IF P_PA_DEBUG_MODE = 'Y' THEN
1313: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1314: END IF;
1315:

Line 1312: IF P_PA_DEBUG_MODE = 'Y' THEN

1308: IF P_PA_DEBUG_MODE = 'Y' THEN
1309: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1310: END IF;
1311: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1312: IF P_PA_DEBUG_MODE = 'Y' THEN
1313: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1314: END IF;
1315:
1316: SELECT COUNT(*) INTO l_count FROM dual WHERE EXISTS

Line 1313: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1309: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1310: END IF;
1311: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1312: IF P_PA_DEBUG_MODE = 'Y' THEN
1313: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1314: END IF;
1315:
1316: SELECT COUNT(*) INTO l_count FROM dual WHERE EXISTS
1317: (

Line 1348: pa_debug.G_err_stage := 'Leaving GET_THRESHOLD () with success';

1344: END IF;
1345:
1346: x_retcode := '1';
1347:
1348: pa_debug.G_err_stage := 'Leaving GET_THRESHOLD () with success';
1349: IF P_PA_DEBUG_MODE = 'Y' THEN
1350: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1351: END IF;
1352: pa_debug.reset_err_stack;

Line 1349: IF P_PA_DEBUG_MODE = 'Y' THEN

1345:
1346: x_retcode := '1';
1347:
1348: pa_debug.G_err_stage := 'Leaving GET_THRESHOLD () with success';
1349: IF P_PA_DEBUG_MODE = 'Y' THEN
1350: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1351: END IF;
1352: pa_debug.reset_err_stack;
1353:

Line 1350: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1346: x_retcode := '1';
1347:
1348: pa_debug.G_err_stage := 'Leaving GET_THRESHOLD () with success';
1349: IF P_PA_DEBUG_MODE = 'Y' THEN
1350: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1351: END IF;
1352: pa_debug.reset_err_stack;
1353:
1354:

Line 1352: pa_debug.reset_err_stack;

1348: pa_debug.G_err_stage := 'Leaving GET_THRESHOLD () with success';
1349: IF P_PA_DEBUG_MODE = 'Y' THEN
1350: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1351: END IF;
1352: pa_debug.reset_err_stack;
1353:
1354:
1355:
1356: EXCEPTION

Line 1360: pa_debug.write_file('LOG', 'GET_THRESHOLD () exception: No data found');

1356: EXCEPTION
1357:
1358: WHEN NO_DATA_FOUND THEN
1359:
1360: pa_debug.write_file('LOG', 'GET_THRESHOLD () exception: No data found');
1361: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1362: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1363:
1364: WHEN OTHERS THEN

Line 1361: pa_debug.write_file('LOG', pa_debug.g_err_stack);

1357:
1358: WHEN NO_DATA_FOUND THEN
1359:
1360: pa_debug.write_file('LOG', 'GET_THRESHOLD () exception: No data found');
1361: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1362: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1363:
1364: WHEN OTHERS THEN
1365:

Line 1362: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1358: WHEN NO_DATA_FOUND THEN
1359:
1360: pa_debug.write_file('LOG', 'GET_THRESHOLD () exception: No data found');
1361: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1362: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1363:
1364: WHEN OTHERS THEN
1365:
1366: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;

Line 1367: pa_debug.write_file('LOG', 'GET_THRESHOLD () exception: Others');

1363:
1364: WHEN OTHERS THEN
1365:
1366: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1367: pa_debug.write_file('LOG', 'GET_THRESHOLD () exception: Others');
1368: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1369: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1370:
1371: END get_threshold;

Line 1368: pa_debug.write_file('LOG', pa_debug.g_err_stack);

1364: WHEN OTHERS THEN
1365:
1366: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1367: pa_debug.write_file('LOG', 'GET_THRESHOLD () exception: Others');
1368: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1369: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1370:
1371: END get_threshold;
1372:

Line 1369: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1365:
1366: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
1367: pa_debug.write_file('LOG', 'GET_THRESHOLD () exception: Others');
1368: pa_debug.write_file('LOG', pa_debug.g_err_stack);
1369: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1370:
1371: END get_threshold;
1372:
1373: -- Procedure get_kpa_score

Line 1487: pa_debug.G_err_stage := 'Entering PAPFSCRE ()';

1483: BEGIN
1484:
1485: x_retcode := '0';
1486:
1487: pa_debug.G_err_stage := 'Entering PAPFSCRE ()';
1488: IF P_PA_DEBUG_MODE = 'Y' THEN
1489: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1490: END IF;
1491: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

Line 1488: IF P_PA_DEBUG_MODE = 'Y' THEN

1484:
1485: x_retcode := '0';
1486:
1487: pa_debug.G_err_stage := 'Entering PAPFSCRE ()';
1488: IF P_PA_DEBUG_MODE = 'Y' THEN
1489: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1490: END IF;
1491: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1492: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 1489: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1485: x_retcode := '0';
1486:
1487: pa_debug.G_err_stage := 'Entering PAPFSCRE ()';
1488: IF P_PA_DEBUG_MODE = 'Y' THEN
1489: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1490: END IF;
1491: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1492: IF P_PA_DEBUG_MODE = 'Y' THEN
1493: pa_debug.write_file('LOG', pa_debug.g_err_stage);

Line 1491: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');

1487: pa_debug.G_err_stage := 'Entering PAPFSCRE ()';
1488: IF P_PA_DEBUG_MODE = 'Y' THEN
1489: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1490: END IF;
1491: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1492: IF P_PA_DEBUG_MODE = 'Y' THEN
1493: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1494: END IF;
1495:

Line 1492: IF P_PA_DEBUG_MODE = 'Y' THEN

1488: IF P_PA_DEBUG_MODE = 'Y' THEN
1489: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1490: END IF;
1491: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1492: IF P_PA_DEBUG_MODE = 'Y' THEN
1493: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1494: END IF;
1495:
1496:

Line 1493: pa_debug.write_file('LOG', pa_debug.g_err_stage);

1489: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1490: END IF;
1491: pa_debug.g_err_stage := ' Current system time is '||to_char(sysdate, 'DD-MON-YYYY HH24:MI:SS');
1492: IF P_PA_DEBUG_MODE = 'Y' THEN
1493: pa_debug.write_file('LOG', pa_debug.g_err_stage);
1494: END IF;
1495:
1496:
1497: /*** Begin business logic to generate the KPA Summary Info ***/

Line 1499: IF P_PA_DEBUG_MODE = 'Y' THEN

1495:
1496:
1497: /*** Begin business logic to generate the KPA Summary Info ***/
1498:
1499: IF P_PA_DEBUG_MODE = 'Y' THEN
1500: PA_DEBUG.write_file('LOG', 'Begin business logic to generate the KPA Summary Info ');
1501: PA_DEBUG.write_file('LOG', 'Get all KPA codes');
1502: END IF;
1503:

Line 1500: PA_DEBUG.write_file('LOG', 'Begin business logic to generate the KPA Summary Info ');

1496:
1497: /*** Begin business logic to generate the KPA Summary Info ***/
1498:
1499: IF P_PA_DEBUG_MODE = 'Y' THEN
1500: PA_DEBUG.write_file('LOG', 'Begin business logic to generate the KPA Summary Info ');
1501: PA_DEBUG.write_file('LOG', 'Get all KPA codes');
1502: END IF;
1503:
1504: -- get all kpa codes

Line 1501: PA_DEBUG.write_file('LOG', 'Get all KPA codes');

1497: /*** Begin business logic to generate the KPA Summary Info ***/
1498:
1499: IF P_PA_DEBUG_MODE = 'Y' THEN
1500: PA_DEBUG.write_file('LOG', 'Begin business logic to generate the KPA Summary Info ');
1501: PA_DEBUG.write_file('LOG', 'Get all KPA codes');
1502: END IF;
1503:
1504: -- get all kpa codes
1505: OPEN get_kpas;

Line 1511: IF P_PA_DEBUG_MODE = 'Y' THEN

1507: CLOSE get_kpas;
1508:
1509: -- mass update the current_flag in PA_PERF_KPA_SUMMARY table
1510:
1511: IF P_PA_DEBUG_MODE = 'Y' THEN
1512: PA_DEBUG.write_file('LOG', 'Mass update the KPA Summary table');
1513: END IF;
1514:
1515: FORALL i IN p_project_list.first..p_project_list.last

Line 1512: PA_DEBUG.write_file('LOG', 'Mass update the KPA Summary table');

1508:
1509: -- mass update the current_flag in PA_PERF_KPA_SUMMARY table
1510:
1511: IF P_PA_DEBUG_MODE = 'Y' THEN
1512: PA_DEBUG.write_file('LOG', 'Mass update the KPA Summary table');
1513: END IF;
1514:
1515: FORALL i IN p_project_list.first..p_project_list.last
1516: UPDATE pa_perf_kpa_summary

Line 1523: IF P_PA_DEBUG_MODE = 'Y' THEN

1519: AND object_id = p_project_list(i);
1520:
1521: /* write the Scoring Logic Here */
1522:
1523: IF P_PA_DEBUG_MODE = 'Y' THEN
1524: PA_DEBUG.write_file('LOG', 'Process scoring logic for each project');
1525: END IF;
1526:
1527:

Line 1524: PA_DEBUG.write_file('LOG', 'Process scoring logic for each project');

1520:
1521: /* write the Scoring Logic Here */
1522:
1523: IF P_PA_DEBUG_MODE = 'Y' THEN
1524: PA_DEBUG.write_file('LOG', 'Process scoring logic for each project');
1525: END IF;
1526:
1527:
1528: FOR i IN p_project_list.first..p_project_list.last LOOP

Line 1530: IF P_PA_DEBUG_MODE = 'Y' THEN

1526:
1527:
1528: FOR i IN p_project_list.first..p_project_list.last LOOP
1529:
1530: IF P_PA_DEBUG_MODE = 'Y' THEN
1531: PA_DEBUG.write_file('LOG', 'Project ID : '||p_project_list(i));
1532: END IF;
1533:
1534: SELECT pa_perf_kpa_summary_s1.nextval

Line 1531: PA_DEBUG.write_file('LOG', 'Project ID : '||p_project_list(i));

1527:
1528: FOR i IN p_project_list.first..p_project_list.last LOOP
1529:
1530: IF P_PA_DEBUG_MODE = 'Y' THEN
1531: PA_DEBUG.write_file('LOG', 'Project ID : '||p_project_list(i));
1532: END IF;
1533:
1534: SELECT pa_perf_kpa_summary_s1.nextval
1535: INTO l_summary_seq

Line 1588: IF P_PA_DEBUG_MODE = 'Y' THEN

1584: SELECT pa_perf_kpa_summary_det_s1.NEXTVAL
1585: INTO l_summary_det_seq
1586: FROM dual;
1587:
1588: IF P_PA_DEBUG_MODE = 'Y' THEN
1589: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1590: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1591: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_rule_id);
1592: END IF;

Line 1589: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');

1585: INTO l_summary_det_seq
1586: FROM dual;
1587:
1588: IF P_PA_DEBUG_MODE = 'Y' THEN
1589: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1590: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1591: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_rule_id);
1592: END IF;
1593:

Line 1590: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));

1586: FROM dual;
1587:
1588: IF P_PA_DEBUG_MODE = 'Y' THEN
1589: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1590: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1591: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_rule_id);
1592: END IF;
1593:
1594: INSERT INTO pa_perf_kpa_summary_det

Line 1591: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_rule_id);

1587:
1588: IF P_PA_DEBUG_MODE = 'Y' THEN
1589: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1590: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1591: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_rule_id);
1592: END IF;
1593:
1594: INSERT INTO pa_perf_kpa_summary_det
1595: (

Line 1696: IF P_PA_DEBUG_MODE = 'Y' THEN

1692: SELECT pa_perf_kpa_summary_det_s1.NEXTVAL
1693: INTO l_summary_det_seq
1694: FROM dual;
1695:
1696: IF P_PA_DEBUG_MODE = 'Y' THEN
1697: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1698: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1699: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_kpa_rule_id);
1700: END IF;

Line 1697: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');

1693: INTO l_summary_det_seq
1694: FROM dual;
1695:
1696: IF P_PA_DEBUG_MODE = 'Y' THEN
1697: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1698: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1699: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_kpa_rule_id);
1700: END IF;
1701:

Line 1698: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));

1694: FROM dual;
1695:
1696: IF P_PA_DEBUG_MODE = 'Y' THEN
1697: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1698: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1699: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_kpa_rule_id);
1700: END IF;
1701:
1702: INSERT INTO pa_perf_kpa_summary_det

Line 1699: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_kpa_rule_id);

1695:
1696: IF P_PA_DEBUG_MODE = 'Y' THEN
1697: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1698: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1699: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_kpa_rule_id);
1700: END IF;
1701:
1702: INSERT INTO pa_perf_kpa_summary_det
1703: (

Line 1759: IF P_PA_DEBUG_MODE = 'Y' THEN

1755:
1756: );
1757:
1758: --- save the result to PA_PERF_KPA_TRANS table
1759: IF P_PA_DEBUG_MODE = 'Y' THEN
1760: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_TRANS');
1761: END IF;
1762:
1763: INSERT INTO pa_perf_kpa_trans

Line 1760: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_TRANS');

1756: );
1757:
1758: --- save the result to PA_PERF_KPA_TRANS table
1759: IF P_PA_DEBUG_MODE = 'Y' THEN
1760: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_TRANS');
1761: END IF;
1762:
1763: INSERT INTO pa_perf_kpa_trans
1764: (kpa_summary_det_id,

Line 1829: IF P_PA_DEBUG_MODE = 'Y' THEN

1825: SELECT pa_perf_kpa_summary_det_s1.NEXTVAL
1826: INTO l_summary_det_seq
1827: FROM dual;
1828:
1829: IF P_PA_DEBUG_MODE = 'Y' THEN
1830: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1831: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1832: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_kpa_rule_id);
1833: END IF;

Line 1830: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');

1826: INTO l_summary_det_seq
1827: FROM dual;
1828:
1829: IF P_PA_DEBUG_MODE = 'Y' THEN
1830: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1831: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1832: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_kpa_rule_id);
1833: END IF;
1834:

Line 1831: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));

1827: FROM dual;
1828:
1829: IF P_PA_DEBUG_MODE = 'Y' THEN
1830: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1831: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1832: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_kpa_rule_id);
1833: END IF;
1834:
1835: INSERT INTO pa_perf_kpa_summary_det

Line 1832: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_kpa_rule_id);

1828:
1829: IF P_PA_DEBUG_MODE = 'Y' THEN
1830: PA_DEBUG.write_file('LOG', 'Inserting into PA_PERF_KPA_SUMMARY_DET');
1831: PA_DEBUG.write_file('LOG', 'KPA code : '||l_kpas(j));
1832: PA_DEBUG.write_file('LOG', 'Rule ID : '||l_kpa_rule_id);
1833: END IF;
1834:
1835: INSERT INTO pa_perf_kpa_summary_det
1836: (

Line 2068: IF P_PA_DEBUG_MODE = 'Y' THEN

2064:
2065: END LOOP;
2066:
2067:
2068: IF P_PA_DEBUG_MODE = 'Y' THEN
2069: PA_DEBUG.write_file('LOG', 'Sucessfully processed scoring logic for each project');
2070: END IF;
2071:
2072: x_retcode := '1';

Line 2069: PA_DEBUG.write_file('LOG', 'Sucessfully processed scoring logic for each project');

2065: END LOOP;
2066:
2067:
2068: IF P_PA_DEBUG_MODE = 'Y' THEN
2069: PA_DEBUG.write_file('LOG', 'Sucessfully processed scoring logic for each project');
2070: END IF;
2071:
2072: x_retcode := '1';
2073:

Line 2074: pa_debug.G_err_stage := 'Leaving PAPFSCRE () with success';

2070: END IF;
2071:
2072: x_retcode := '1';
2073:
2074: pa_debug.G_err_stage := 'Leaving PAPFSCRE () with success';
2075: IF P_PA_DEBUG_MODE = 'Y' THEN
2076: pa_debug.write_file('LOG', pa_debug.g_err_stage);
2077: END IF;
2078: pa_debug.reset_err_stack;

Line 2075: IF P_PA_DEBUG_MODE = 'Y' THEN

2071:
2072: x_retcode := '1';
2073:
2074: pa_debug.G_err_stage := 'Leaving PAPFSCRE () with success';
2075: IF P_PA_DEBUG_MODE = 'Y' THEN
2076: pa_debug.write_file('LOG', pa_debug.g_err_stage);
2077: END IF;
2078: pa_debug.reset_err_stack;
2079:

Line 2076: pa_debug.write_file('LOG', pa_debug.g_err_stage);

2072: x_retcode := '1';
2073:
2074: pa_debug.G_err_stage := 'Leaving PAPFSCRE () with success';
2075: IF P_PA_DEBUG_MODE = 'Y' THEN
2076: pa_debug.write_file('LOG', pa_debug.g_err_stage);
2077: END IF;
2078: pa_debug.reset_err_stack;
2079:
2080: commit;

Line 2078: pa_debug.reset_err_stack;

2074: pa_debug.G_err_stage := 'Leaving PAPFSCRE () with success';
2075: IF P_PA_DEBUG_MODE = 'Y' THEN
2076: pa_debug.write_file('LOG', pa_debug.g_err_stage);
2077: END IF;
2078: pa_debug.reset_err_stack;
2079:
2080: commit;
2081:
2082: EXCEPTION

Line 2086: pa_debug.write_file('LOG', 'PAPFSCRE () exception: No data found');

2082: EXCEPTION
2083:
2084: WHEN NO_DATA_FOUND THEN
2085:
2086: pa_debug.write_file('LOG', 'PAPFSCRE () exception: No data found');
2087: pa_debug.write_file('LOG', pa_debug.g_err_stack);
2088: pa_debug.write_file('LOG', pa_debug.g_err_stage);
2089:
2090: WHEN OTHERS THEN

Line 2087: pa_debug.write_file('LOG', pa_debug.g_err_stack);

2083:
2084: WHEN NO_DATA_FOUND THEN
2085:
2086: pa_debug.write_file('LOG', 'PAPFSCRE () exception: No data found');
2087: pa_debug.write_file('LOG', pa_debug.g_err_stack);
2088: pa_debug.write_file('LOG', pa_debug.g_err_stage);
2089:
2090: WHEN OTHERS THEN
2091: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;

Line 2088: pa_debug.write_file('LOG', pa_debug.g_err_stage);

2084: WHEN NO_DATA_FOUND THEN
2085:
2086: pa_debug.write_file('LOG', 'PAPFSCRE () exception: No data found');
2087: pa_debug.write_file('LOG', pa_debug.g_err_stack);
2088: pa_debug.write_file('LOG', pa_debug.g_err_stage);
2089:
2090: WHEN OTHERS THEN
2091: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
2092: pa_debug.write_file('LOG', 'PAPFSCRE () exception: Others');

Line 2092: pa_debug.write_file('LOG', 'PAPFSCRE () exception: Others');

2088: pa_debug.write_file('LOG', pa_debug.g_err_stage);
2089:
2090: WHEN OTHERS THEN
2091: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
2092: pa_debug.write_file('LOG', 'PAPFSCRE () exception: Others');
2093: pa_debug.write_file('LOG', pa_debug.g_err_stack);
2094: pa_debug.write_file('LOG', pa_debug.g_err_stage);
2095:
2096: END get_kpa_score;

Line 2093: pa_debug.write_file('LOG', pa_debug.g_err_stack);

2089:
2090: WHEN OTHERS THEN
2091: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
2092: pa_debug.write_file('LOG', 'PAPFSCRE () exception: Others');
2093: pa_debug.write_file('LOG', pa_debug.g_err_stack);
2094: pa_debug.write_file('LOG', pa_debug.g_err_stage);
2095:
2096: END get_kpa_score;
2097:

Line 2094: pa_debug.write_file('LOG', pa_debug.g_err_stage);

2090: WHEN OTHERS THEN
2091: x_errbuf := x_errbuf||'errbuf: '||sqlerrm;
2092: pa_debug.write_file('LOG', 'PAPFSCRE () exception: Others');
2093: pa_debug.write_file('LOG', pa_debug.g_err_stack);
2094: pa_debug.write_file('LOG', pa_debug.g_err_stage);
2095:
2096: END get_kpa_score;
2097:
2098: END pa_exception_engine_pkg;