DBA Data[Home] [Help]

APPS.PA_PERF_RULES_PVT dependencies on PA_PERF_RULES

Line 1: PACKAGE BODY pa_perf_rules_pvt AS

1: PACKAGE BODY pa_perf_rules_pvt AS
2: /* $Header: PAPERLVB.pls 120.1 2005/08/19 16:39:43 mwasowic noship $ */
3:
4: g_module_name VARCHAR2(100) := 'pa.plsql.pa_perf_rules_pvt';
5:

Line 4: g_module_name VARCHAR2(100) := 'pa.plsql.pa_perf_rules_pvt';

1: PACKAGE BODY pa_perf_rules_pvt AS
2: /* $Header: PAPERLVB.pls 120.1 2005/08/19 16:39:43 mwasowic noship $ */
3:
4: g_module_name VARCHAR2(100) := 'pa.plsql.pa_perf_rules_pvt';
5:
6: /*==================================================================
7: PROCEDURE
8: create_rule

Line 10: This procedure inserts a row into the pa_perf_rules table.

6: /*==================================================================
7: PROCEDURE
8: create_rule
9: PURPOSE
10: This procedure inserts a row into the pa_perf_rules table.
11: ==================================================================*/
12:
13:
14: PROCEDURE create_rule(

Line 54: FROM PA_PERF_RULES --Changed to PA_PERF_RULES from PA_PERF_RULES_V for Bug# 3639469

50: duplicate_name EXCEPTION;
51:
52: CURSOR CHECK_RULE_NAME IS
53: SELECT 1
54: FROM PA_PERF_RULES --Changed to PA_PERF_RULES from PA_PERF_RULES_V for Bug# 3639469
55: WHERE RULE_NAME=P_RULE_NAME
56: AND RULE_TYPE = P_RULE_TYPE; -- Added for Bug 4199228
57:
58: BEGIN

Line 62: PA_DEBUG.init_err_stack('PA_PERF_RULES_PVT.create_rule');

58: BEGIN
59:
60: savepoint sp;
61: -- Initialize the Error Stack
62: PA_DEBUG.init_err_stack('PA_PERF_RULES_PVT.create_rule');
63: x_msg_count := 0;
64: x_msg_data := NULL;
65: x_return_status := FND_API.G_RET_STS_SUCCESS;
66: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');

Line 69: pa_debug.set_curr_function( p_function => 'PA_PERF_RULES_PVT.create_rule',

65: x_return_status := FND_API.G_RET_STS_SUCCESS;
66: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
67:
68: IF l_debug_mode = 'Y' THEN
69: pa_debug.set_curr_function( p_function => 'PA_PERF_RULES_PVT.create_rule',
70: p_debug_mode => l_debug_mode );
71: END IF;
72:
73: IF l_debug_mode = 'Y' THEN

Line 74: pa_debug.g_err_stage:= 'Entered PA_PERF_RULES_PVT.create_rule';

70: p_debug_mode => l_debug_mode );
71: END IF;
72:
73: IF l_debug_mode = 'Y' THEN
74: pa_debug.g_err_stage:= 'Entered PA_PERF_RULES_PVT.create_rule';
75: pa_debug.write(g_module_name,pa_debug.g_err_stage,
76: l_debug_level3);
77: END IF;
78:

Line 92: PA_PERF_RULES_PKG.insert_row(

88: RAISE duplicate_name;
89: END IF;
90: CLOSE CHECK_RULE_NAME;
91:
92: PA_PERF_RULES_PKG.insert_row(
93: X_ROWID => l_rowid,
94: X_RULE_ID => P_RULE_ID,
95: X_RULE_NAME => P_RULE_NAME,
96: X_RULE_DESCRIPTION => P_RULE_DESCRIPTION,

Line 125: pa_debug.g_err_stage:= 'Exiting PA_PERF_RULES_PVT.create_rule';

121: END IF;
122:
123:
124: IF l_debug_mode = 'Y' THEN
125: pa_debug.g_err_stage:= 'Exiting PA_PERF_RULES_PVT.create_rule';
126: pa_debug.write(g_module_name,pa_debug.g_err_stage,
127: l_debug_level3);
128: pa_debug.reset_curr_function;
129: END IF;

Line 159: p_pkg_name => 'PA_PERF_RULES_PVT'

155: x_msg_count := 1;
156: x_msg_data := SQLERRM;
157:
158: FND_MSG_PUB.add_exc_msg(
159: p_pkg_name => 'PA_PERF_RULES_PVT'
160: ,p_procedure_name => 'CREATE_RULE'
161: ,p_error_text => x_msg_data);
162:
163: IF l_debug_mode = 'Y' THEN

Line 176: This procedure updates a row into the pa_perf_rules table.

172: /*==================================================================
173: PROCEDURE
174: update_rule
175: PURPOSE
176: This procedure updates a row into the pa_perf_rules table.
177: ==================================================================*/
178:
179: PROCEDURE update_rule(
180: P_RULE_ID IN NUMBER,

Line 217: FROM PA_PERF_RULES --Changed to PA_PERF_RULES from PA_PERF_RULES_V for Bug# 3639469

213: duplicate_name EXCEPTION;
214:
215: CURSOR CHECK_RULE_NAME IS
216: SELECT 1
217: FROM PA_PERF_RULES --Changed to PA_PERF_RULES from PA_PERF_RULES_V for Bug# 3639469
218: WHERE RULE_NAME=P_RULE_NAME
219: AND RULE_ID <> P_RULE_ID
220: AND RULE_TYPE = P_RULE_TYPE; -- Added for Bug 4199228
221:

Line 226: PA_DEBUG.init_err_stack('PA_PERF_RULES_PVT.Update_Rule');

222: BEGIN
223:
224: savepoint sp;
225: -- Initialize the Error Stack
226: PA_DEBUG.init_err_stack('PA_PERF_RULES_PVT.Update_Rule');
227: x_msg_count := 0;
228: x_msg_data := NULL;
229:
230: -- Initialize the return status to success

Line 234: pa_debug.set_curr_function( p_function => 'PA_PERF_RULES_PVT.update_rule',

230: -- Initialize the return status to success
231: x_return_status := FND_API.G_RET_STS_SUCCESS;
232: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
233: IF l_debug_mode = 'Y' THEN
234: pa_debug.set_curr_function( p_function => 'PA_PERF_RULES_PVT.update_rule',
235: p_debug_mode => l_debug_mode );
236: END IF;
237:
238: IF l_debug_mode = 'Y' THEN

Line 239: pa_debug.g_err_stage:= 'Entered PA_PERF_RULES_PVT.update_rule';

235: p_debug_mode => l_debug_mode );
236: END IF;
237:
238: IF l_debug_mode = 'Y' THEN
239: pa_debug.g_err_stage:= 'Entered PA_PERF_RULES_PVT.update_rule';
240: pa_debug.write(g_module_name,pa_debug.g_err_stage,
241: l_debug_level3);
242:
243: pa_debug.g_err_stage:= 'P_RULE_ID = '|| P_RULE_ID;

Line 274: PA_PERF_RULES_PKG.LOCK_ROW (

270: pa_debug.write(g_module_name,pa_debug.g_err_stage,
271: l_debug_level3);
272: END IF;
273:
274: PA_PERF_RULES_PKG.LOCK_ROW (
275: X_RULE_ID => P_RULE_ID,
276: X_RECORD_VERSION_NUMBER => P_RECORD_VERSION_NUMBER );
277:
278: IF l_debug_mode = 'Y' THEN

Line 291: pa_debug.g_err_stage:= 'about to call PA_PERF_RULES_PKG.UPDATE_ROW';

287: Raise Invalid_Ret_Status;
288: end if;
289:
290: IF l_debug_mode = 'Y' THEN
291: pa_debug.g_err_stage:= 'about to call PA_PERF_RULES_PKG.UPDATE_ROW';
292: pa_debug.write(g_module_name,pa_debug.g_err_stage,
293: l_debug_level3);
294: END IF;
295:

Line 296: PA_PERF_RULES_PKG.UPDATE_ROW(

292: pa_debug.write(g_module_name,pa_debug.g_err_stage,
293: l_debug_level3);
294: END IF;
295:
296: PA_PERF_RULES_PKG.UPDATE_ROW(
297: X_RULE_ID => P_RULE_ID,
298: X_RULE_NAME => P_RULE_NAME,
299: X_RULE_DESCRIPTION => P_RULE_DESCRIPTION,
300: X_RULE_TYPE => P_RULE_TYPE,

Line 316: pa_debug.g_err_stage:= 'Exiting PA_PERF_RULES_PVT.update_rule';

312: X_LAST_UPDATED_BY => P_LAST_UPDATED_BY,
313: X_LAST_UPDATE_LOGIN => P_LAST_UPDATE_LOGIN );
314:
315: IF l_debug_mode = 'Y' THEN
316: pa_debug.g_err_stage:= 'Exiting PA_PERF_RULES_PVT.update_rule';
317: pa_debug.write(g_module_name,pa_debug.g_err_stage,
318: l_debug_level3);
319: pa_debug.reset_curr_function;
320: END IF;

Line 374: p_pkg_name => 'PA_PERF_RULES_PVT'

370: x_msg_count := 1;
371: x_msg_data := substr(SQLERRM,1,240);
372: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
373: FND_MSG_PUB.add_exc_msg (
374: p_pkg_name => 'PA_PERF_RULES_PVT'
375: , p_procedure_name => PA_DEBUG.G_Err_Stack
376: , p_error_text => substr(SQLERRM,1,240));
377:
378: rollback to sp;

Line 387: This procedure deletes a row from the pa_perf_rules table.

383: /*==================================================================
384: PROCEDURE
385: delete_rule
386: PURPOSE
387: This procedure deletes a row from the pa_perf_rules table.
388: ==================================================================*/
389:
390: PROCEDURE delete_rule (
391: P_RULE_ID IN NUMBER,

Line 428: PA_DEBUG.init_err_stack('PA_PERF_RULES_PVT.Delete_Row');

424: savepoint sp;
425:
426:
427: -- Initialize the Error Stack
428: PA_DEBUG.init_err_stack('PA_PERF_RULES_PVT.Delete_Row');
429: x_msg_count := 0;
430: x_msg_data := NULL;
431:
432: -- Initialize the return status to success

Line 436: pa_debug.set_curr_function( p_function => 'PA_PERF_RULES_PVT.delete_rule',

432: -- Initialize the return status to success
433: x_return_status := FND_API.G_RET_STS_SUCCESS;
434:
435: IF l_debug_mode = 'Y' THEN
436: pa_debug.set_curr_function( p_function => 'PA_PERF_RULES_PVT.delete_rule',
437: p_debug_mode => l_debug_mode );
438: END IF;
439:
440: IF l_debug_mode = 'Y' THEN

Line 441: pa_debug.g_err_stage:= 'Entered PA_PERF_RULES_PVT.delete_rule';

437: p_debug_mode => l_debug_mode );
438: END IF;
439:
440: IF l_debug_mode = 'Y' THEN
441: pa_debug.g_err_stage:= 'Entered PA_PERF_RULES_PVT.delete_rule';
442: pa_debug.write(g_module_name,pa_debug.g_err_stage,
443: l_debug_level3);
444: pa_debug.g_err_stage:= 'P_RULE_ID = '|| P_RULE_ID;
445: pa_debug.write(g_module_name,pa_debug.g_err_stage,

Line 453: PA_PERF_RULES_PKG.LOCK_ROW

449: pa_debug.write(g_module_name,pa_debug.g_err_stage,
450: l_debug_level3);
451: END IF;
452:
453: PA_PERF_RULES_PKG.LOCK_ROW
454: (
455: X_RULE_ID => P_RULE_ID,
456: X_RECORD_VERSION_NUMBER => P_RECORD_VERSION_NUMBER
457: );

Line 465: pa_debug.g_err_stage:= 'about to call PA_PERF_RULES_PKG.delete_row';

461: Raise Invalid_Ret_Status;
462: end if;
463:
464: IF l_debug_mode = 'Y' THEN
465: pa_debug.g_err_stage:= 'about to call PA_PERF_RULES_PKG.delete_row';
466: pa_debug.write(g_module_name,pa_debug.g_err_stage,
467: l_debug_level3);
468: END IF;
469:

Line 519: PA_PERF_RULES_PKG.DELETE_ROW

515:
516: END LOOP;
517:
518: -- Delete Rule
519: PA_PERF_RULES_PKG.DELETE_ROW
520: ( X_RULE_ID => P_RULE_ID);
521:
522: IF l_debug_mode = 'Y' THEN
523: pa_debug.g_err_stage:= 'Exiting PA_PERF_RULES_PVT.delete_rule';

Line 523: pa_debug.g_err_stage:= 'Exiting PA_PERF_RULES_PVT.delete_rule';

519: PA_PERF_RULES_PKG.DELETE_ROW
520: ( X_RULE_ID => P_RULE_ID);
521:
522: IF l_debug_mode = 'Y' THEN
523: pa_debug.g_err_stage:= 'Exiting PA_PERF_RULES_PVT.delete_rule';
524: pa_debug.write(g_module_name,pa_debug.g_err_stage,
525: l_debug_level3);
526: pa_debug.reset_curr_function;
527: END IF;

Line 564: ( p_pkg_name => 'PA_PERF_RULES_PVT'

560: x_msg_count := 1;
561: x_msg_data := substr(SQLERRM,1,240);
562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
563: FND_MSG_PUB.add_exc_msg
564: ( p_pkg_name => 'PA_PERF_RULES_PVT'
565: , p_procedure_name => PA_DEBUG.G_Err_Stack
566: , p_error_text => substr(SQLERRM,1,240));
567:
568: rollback to sp;

Line 608: PA_DEBUG.init_err_stack('PA_PERF_RULES_PVT.validate_rule');

604: l_debug_mode VARCHAR2(1);
605: BEGIN
606:
607: -- Initialize the Error Stack
608: PA_DEBUG.init_err_stack('PA_PERF_RULES_PVT.validate_rule');
609: x_msg_count := 0;
610: x_msg_data := NULL;
611:
612: -- Initialize the return status to success

Line 618: pa_debug.set_curr_function( p_function => 'PA_PERF_RULES_PVT.validate_rule',

614:
615: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
616:
617: IF l_debug_mode = 'Y' THEN
618: pa_debug.set_curr_function( p_function => 'PA_PERF_RULES_PVT.validate_rule',
619: p_debug_mode => l_debug_mode );
620: END IF;
621:
622: k := P_THRESHOLD_ID.count; /* Get the number of lines */

Line 736: END PA_PERF_RULES_PVT;

732: END IF ;
733:
734: END validate_rule;
735:
736: END PA_PERF_RULES_PVT;