DBA Data[Home] [Help]

APPS.PA_FP_REV_GEN_PUB dependencies on PA_DEBUG

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

1: PACKAGE body PA_FP_REV_GEN_PUB as
2: /* $Header: PAFPGCRB.pls 120.7 2007/02/06 09:57:59 dthakker ship $ */
3:
4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: PROCEDURE GEN_COST_BASED_REVENUE
7: (P_BUDGET_VERSION_ID IN PA_BUDGET_VERSIONS.BUDGET_VERSION_ID%TYPE,
8: P_FP_COLS_REC IN PA_FP_GEN_AMOUNT_UTILS.FP_COLS,

Line 148: IF p_pa_debug_mode = 'Y' THEN

144: /* Setting initial values */
145: X_MSG_COUNT := 0;
146: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
147:
148: IF p_pa_debug_mode = 'Y' THEN
149: PA_DEBUG.SET_CURR_FUNCTION
150: ( p_function => 'GEN_COMMITMENT_AMOUNTS',
151: p_debug_mode => p_pa_debug_mode );
152: END IF;

Line 149: PA_DEBUG.SET_CURR_FUNCTION

145: X_MSG_COUNT := 0;
146: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
147:
148: IF p_pa_debug_mode = 'Y' THEN
149: PA_DEBUG.SET_CURR_FUNCTION
150: ( p_function => 'GEN_COMMITMENT_AMOUNTS',
151: p_debug_mode => p_pa_debug_mode );
152: END IF;
153:

Line 151: p_debug_mode => p_pa_debug_mode );

147:
148: IF p_pa_debug_mode = 'Y' THEN
149: PA_DEBUG.SET_CURR_FUNCTION
150: ( p_function => 'GEN_COMMITMENT_AMOUNTS',
151: p_debug_mode => p_pa_debug_mode );
152: END IF;
153:
154: IF p_fp_cols_rec.x_version_type = 'ALL' THEN
155: l_cost_or_rev_code := 'COST';

Line 167: IF p_pa_debug_mode = 'Y' THEN

163: PA_FIN_PLAN_TYPES_B fpt
164: WHERE bv.BUDGET_VERSION_ID = P_BUDGET_VERSION_ID
165: AND bv.fin_plan_type_id = fpt.fin_plan_type_id;
166:
167: IF p_pa_debug_mode = 'Y' THEN
168: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
169: ( p_msg => 'Value of l_plan_class_code: '||l_plan_class_code,
170: p_module_name => l_module_name,
171: p_log_level => 5 );

Line 265: IF p_pa_debug_mode = 'Y' THEN

261: l_calling_module := PA_RES_ASG_CURRENCY_PUB.G_FORECAST_GENERATION;
262: END IF;
263:
264: -- Call the maintenance api in INSERT mode
265: IF p_pa_debug_mode = 'Y' THEN
266: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
267: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
268: 'MAINTAIN_DATA',
269: --P_CALLED_MODE => p_called_mode,

Line 281: IF p_pa_debug_mode = 'Y' THEN

277: --P_CALLED_MODE => p_called_mode,
278: X_RETURN_STATUS => x_return_status,
279: X_MSG_COUNT => x_msg_count,
280: X_MSG_DATA => x_msg_data );
281: IF p_pa_debug_mode = 'Y' THEN
282: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
283: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
284: 'MAINTAIN_DATA: '||x_return_status,
285: --P_CALLED_MODE => p_called_mode,

Line 320: IF P_PA_DEBUG_MODE = 'Y' THEN

316: l_pfc_project_value := null;
317: l_pc_project_value := null;
318: END;
319: ELSE
320: IF P_PA_DEBUG_MODE = 'Y' THEN
321: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
322: ( P_MSG => 'Before calling PA_FIN_PLAN_UTILS.'||
323: 'Get_Appr_Rev_Plan_Type_Info',
324: P_MODULE_NAME => l_module_name,

Line 333: IF P_PA_DEBUG_MODE = 'Y' THEN

329: x_plan_type_id => l_fin_plan_type_id,
330: x_return_status => x_return_status,
331: x_msg_count => x_msg_count,
332: x_msg_data => x_msg_data );
333: IF P_PA_DEBUG_MODE = 'Y' THEN
334: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
335: ( P_MSG => 'After calling PA_FIN_PLAN_UTILS.'||
336: 'Get_Appr_Rev_Plan_Type_Info: '||x_return_status,
337: P_MODULE_NAME => l_module_name,

Line 367: IF P_PA_DEBUG_MODE = 'Y' THEN

363: WHERE fin_plan_type_id = l_fin_plan_type_id
364: AND fin_plan_option_level_code = 'PLAN_TYPE'
365: AND project_id = P_FP_COLS_REC.X_PROJECT_ID;
366:
367: IF P_PA_DEBUG_MODE = 'Y' THEN
368: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
369: ( P_MSG => 'Before calling PA_FP_GEN_AMOUNT_UTILS.'||
370: 'Get_Curr_Original_Version_Info',
371: P_MODULE_NAME => l_module_name,

Line 384: IF P_PA_DEBUG_MODE = 'Y' THEN

380: x_fin_plan_version_id => l_approved_fp_version_id,
381: x_return_status => x_return_status,
382: x_msg_count => x_msg_count,
383: x_msg_data => x_msg_data );
384: IF P_PA_DEBUG_MODE = 'Y' THEN
385: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
386: ( P_MSG => 'After calling PA_FP_GEN_AMOUNT_UTILS.'||
387: 'Get_Curr_Original_Version_Info: '||x_return_status,
388: P_MODULE_NAME => l_module_name,

Line 430: IF P_PA_DEBUG_MODE = 'Y' THEN

426: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
427: END IF;
428:
429: IF P_FP_COLS_REC.X_GEN_INCL_BILL_EVENT_FLAG = 'Y' THEN
430: IF P_PA_DEBUG_MODE = 'Y' THEN
431: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
432: ( P_MSG => 'Before calling PA_FP_GEN_BILLING_AMOUNTS.'
433: ||'GET_BILLING_EVENT_AMT_IN_PFC',
434: P_MODULE_NAME => l_module_name,

Line 452: IF P_PA_DEBUG_MODE = 'Y' THEN

448: X_MSG_DATA => x_msg_data );
449: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
450: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
451: END IF;
452: IF P_PA_DEBUG_MODE = 'Y' THEN
453: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
454: ( P_MSG => 'After calling PA_FP_GEN_BILLING_AMOUNTS.'
455: ||'GET_BILLING_EVENT_AMT_IN_PFC',
456: P_MODULE_NAME => l_module_name,

Line 465: IF p_pa_debug_mode = 'Y' THEN

461: --dbms_output.put_line('l_bill_amt_pfc_revenue:'||l_bill_amt_pfc_revenue);
462: l_pfc_project_value := l_pfc_project_value - NVL(l_bill_amt_pfc_revenue,0);
463: l_pc_project_value := l_pc_project_value - NVL(l_bill_amt_pc_revenue,0);
464:
465: IF p_pa_debug_mode = 'Y' THEN
466: pa_fp_gen_amount_utils.fp_debug
467: ( p_msg => 'Value of l_pfc_project_value: '
468: || l_pfc_project_value,
469: p_module_name => l_module_name,

Line 505: IF p_pa_debug_mode = 'Y' THEN

501: FROM pa_budget_lines
502: WHERE budget_version_id = p_budget_version_id;
503: END IF;
504:
505: IF p_pa_debug_mode = 'Y' THEN
506: pa_fp_gen_amount_utils.fp_debug
507: ( p_msg => 'Value of l_init_rev_sum when the '
508: || 'plan_class_code is FORECAST:'
509: || l_init_rev_sum,

Line 519: IF p_pa_debug_mode = 'Y' THEN

515:
516: l_pfc_project_value := l_pfc_project_value - l_init_rev_sum;
517: l_pc_project_value := l_pc_project_value - l_pc_init_rev_sum;
518:
519: IF p_pa_debug_mode = 'Y' THEN
520: pa_fp_gen_amount_utils.fp_debug
521: ( p_msg => 'Value of l_pfc_project_value when the '
522: || 'plan_class_code is FORECAST: '
523: || l_pfc_project_value,

Line 553: IF P_PA_DEBUG_MODE = 'Y' THEN

549: -- Before returning from this API, call PUSH_RES_SCH_DATA_TO_BL to
550: -- Insert/Update data from the temp table to the budget lines.
551:
552: IF l_gen_src_code = 'RESOURCE_SCHEDULE' THEN
553: IF P_PA_DEBUG_MODE = 'Y' THEN
554: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
555: ( P_MSG => 'Before calling PA_FP_REV_GEN_PUB.'
556: ||'PUSH_RES_SCH_DATA_TO_BL',
557: P_MODULE_NAME => l_module_name,

Line 571: IF P_PA_DEBUG_MODE = 'Y' THEN

567: X_MSG_DATA => x_msg_data );
568: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
569: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
570: END IF;
571: IF P_PA_DEBUG_MODE = 'Y' THEN
572: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
573: ( P_MSG => 'After calling PA_FP_REV_GEN_PUB.'
574: ||'PUSH_RES_SCH_DATA_TO_BL',
575: P_MODULE_NAME => l_module_name,

Line 580: IF P_PA_DEBUG_MODE = 'Y' THEN

576: P_LOG_LEVEL => 5);
577: END IF;
578: END IF; -- insert/update temp table data to budget lines
579:
580: IF P_PA_DEBUG_MODE = 'Y' THEN
581: PA_DEBUG.Reset_Curr_Function;
582: END IF;
583: RETURN;
584: END IF;

Line 581: PA_DEBUG.Reset_Curr_Function;

577: END IF;
578: END IF; -- insert/update temp table data to budget lines
579:
580: IF P_PA_DEBUG_MODE = 'Y' THEN
581: PA_DEBUG.Reset_Curr_Function;
582: END IF;
583: RETURN;
584: END IF;
585:

Line 657: IF p_pa_debug_mode = 'Y' THEN

653: AND bl.pfc_cur_conv_rejection_code is null
654: AND bl.BILLABLE_FLAG = 'Y'
655: ORDER BY bl.resource_assignment_id,
656: bl.start_date;
657: IF p_pa_debug_mode = 'Y' THEN
658: pa_fp_gen_amount_utils.fp_debug
659: ( p_msg => 'Count of l_budget_line_id_tab when the '
660: || 'plan_class_code is BUDGET: '
661: || l_budget_line_id_tab.count,

Line 714: IF p_pa_debug_mode = 'Y' THEN

710: AND bl.BILLABLE_FLAG = 'Y'
711: ORDER BY bl.resource_assignment_id,
712: bl.start_date;
713:
714: IF p_pa_debug_mode = 'Y' THEN
715: pa_fp_gen_amount_utils.fp_debug
716: ( p_msg => 'Count of l_budget_line_id_tab when the '
717: || 'plan_class_code is FORECAST: '
718: || l_budget_line_id_tab.count,

Line 738: IF p_pa_debug_mode = 'Y' THEN

734: AND bl.pc_cur_conv_rejection_code is null
735: AND bl.pfc_cur_conv_rejection_code is null
736: AND bl.BILLABLE_FLAG = 'Y';
737:
738: IF p_pa_debug_mode = 'Y' THEN
739: pa_fp_gen_amount_utils.fp_debug
740: ( p_msg => 'Value of l_pfc_burdened_cost when the '
741: || 'plan_class_code is FORECAST: '
742: || l_pfc_burdened_cost,

Line 857: IF p_pa_debug_mode = 'Y' THEN

853: AND NVL(ta.billable_flag,'Y') = 'Y' /* Bug 4546405, ER 4376722 */
854: AND ra.project_id = P_FP_COLS_REC.X_PROJECT_ID /* Added for Bug 4546405 */
855: ORDER BY bl.resource_assignment_id,
856: bl.start_date;
857: IF p_pa_debug_mode = 'Y' THEN
858: pa_fp_gen_amount_utils.fp_debug
859: ( p_msg => 'Count of l_budget_line_id_tab when the '
860: || 'plan_class_code is BUDGET: '
861: || l_budget_line_id_tab.count,

Line 981: IF p_pa_debug_mode = 'Y' THEN

977: ORDER BY bl.resource_assignment_id,
978: bl.start_date;
979: END IF; -- timephased check
980:
981: IF p_pa_debug_mode = 'Y' THEN
982: pa_fp_gen_amount_utils.fp_debug
983: ( p_msg => 'Count of l_budget_line_id_tab when the '
984: || 'plan_class_code is FORECAST: '
985: || l_budget_line_id_tab.count,

Line 1058: IF p_pa_debug_mode = 'Y' THEN

1054: AND NVL(ta.billable_flag,'Y') = 'Y' /* Bug 4546405, ER 4376722 */
1055: AND ra.project_id = P_FP_COLS_REC.X_PROJECT_ID; /* Added for Bug 4546405 */
1056: END IF; -- timephased check
1057:
1058: IF p_pa_debug_mode = 'Y' THEN
1059: pa_fp_gen_amount_utils.fp_debug
1060: ( p_msg => 'Value of l_pfc_burdened_cost when the '
1061: || 'plan_class_code is FORECAST: '
1062: || l_pfc_burdened_cost,

Line 1093: IF P_PA_DEBUG_MODE = 'Y' THEN

1089: -- Before returning from this API, call PUSH_RES_SCH_DATA_TO_BL to
1090: -- Insert/Update data from the temp table to the budget lines.
1091:
1092: IF l_gen_src_code = 'RESOURCE_SCHEDULE' THEN
1093: IF P_PA_DEBUG_MODE = 'Y' THEN
1094: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1095: ( P_MSG => 'Before calling PA_FP_REV_GEN_PUB.'
1096: ||'PUSH_RES_SCH_DATA_TO_BL',
1097: P_MODULE_NAME => l_module_name,

Line 1111: IF P_PA_DEBUG_MODE = 'Y' THEN

1107: X_MSG_DATA => x_msg_data );
1108: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1109: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1110: END IF;
1111: IF P_PA_DEBUG_MODE = 'Y' THEN
1112: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1113: ( P_MSG => 'After calling PA_FP_REV_GEN_PUB.'
1114: ||'PUSH_RES_SCH_DATA_TO_BL',
1115: P_MODULE_NAME => l_module_name,

Line 1120: IF P_PA_DEBUG_MODE = 'Y' THEN

1116: P_LOG_LEVEL => 5);
1117: END IF;
1118: END IF; -- insert/update temp table data to budget lines
1119:
1120: IF P_PA_DEBUG_MODE = 'Y' THEN
1121: PA_DEBUG.Reset_Curr_Function;
1122: END IF;
1123: RETURN;
1124: END IF;

Line 1121: PA_DEBUG.Reset_Curr_Function;

1117: END IF;
1118: END IF; -- insert/update temp table data to budget lines
1119:
1120: IF P_PA_DEBUG_MODE = 'Y' THEN
1121: PA_DEBUG.Reset_Curr_Function;
1122: END IF;
1123: RETURN;
1124: END IF;
1125:

Line 1134: IF p_pa_debug_mode = 'Y' THEN

1130: l_ratio := l_pfc_project_value/l_pfc_revenue;
1131: l_ratio_pc := l_pc_project_value/l_pc_revenue;
1132: END IF;
1133:
1134: IF p_pa_debug_mode = 'Y' THEN
1135: pa_fp_gen_amount_utils.fp_debug
1136: ( p_msg => 'Value of l_ratio, l_ratio_pc:'
1137: ||l_ratio||','||l_ratio_pc,
1138: p_module_name => l_module_name,

Line 1369: IF p_pa_debug_mode = 'Y' THEN

1365: project_rev_exchange_rate = l_rev_pc_exchg_rate_tab(jj)
1366: WHERE budget_line_id = l_budget_line_id_tab(jj);
1367: END IF; -- time phase check
1368: END IF;
1369: IF p_pa_debug_mode = 'Y' THEN
1370: pa_fp_gen_amount_utils.fp_debug
1371: ( p_msg => 'No. of rows updated in bdgt_lines '
1372: || 'table when multi_curr_flag is N: '
1373: || sql%rowcount,

Line 1397: IF p_pa_debug_mode = 'Y' THEN

1393: l_pc_rev_tab(i) := l_project_revenue_tab(i) * l_ratio_pc;
1394: l_pfc_rev_tab(i) := l_revenue_tab(i) * l_ratio;
1395: END LOOP;
1396: END IF;
1397: IF p_pa_debug_mode = 'Y' THEN
1398: pa_fp_gen_amount_utils.fp_debug
1399: ( p_msg => 'Value of l_txn_rev_tab.count:'||l_txn_rev_tab.count,
1400: p_module_name => l_module_name,
1401: p_log_level => 5 );

Line 1499: IF p_pa_debug_mode = 'Y' THEN

1495: projfunc_rev_exchange_rate = l_rev_pfc_exchg_rate_tab(kk)
1496: WHERE budget_line_id = l_budget_line_id_tab(kk);
1497: END IF; -- time phase check
1498: END IF;
1499: IF p_pa_debug_mode = 'Y' THEN
1500: pa_fp_gen_amount_utils.fp_debug
1501: ( p_msg => 'No. of rows updated in bdgt_lines table '
1502: || 'when multi_curr_flag is Y: '||sql%rowcount,
1503: p_module_name => l_module_name,

Line 1520: IF P_PA_DEBUG_MODE = 'Y' THEN

1516: -- from the temp table to the budget lines.
1517:
1518: IF l_gen_src_code = 'RESOURCE_SCHEDULE' THEN
1519:
1520: IF P_PA_DEBUG_MODE = 'Y' THEN
1521: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1522: ( P_MSG => 'Before calling PA_FP_REV_GEN_PUB.'
1523: ||'PUSH_RES_SCH_DATA_TO_BL',
1524: P_MODULE_NAME => l_module_name,

Line 1538: IF P_PA_DEBUG_MODE = 'Y' THEN

1534: X_MSG_DATA => x_msg_data );
1535: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1536: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1537: END IF;
1538: IF P_PA_DEBUG_MODE = 'Y' THEN
1539: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1540: ( P_MSG => 'After calling PA_FP_REV_GEN_PUB.'
1541: ||'PUSH_RES_SCH_DATA_TO_BL',
1542: P_MODULE_NAME => l_module_name,

Line 1554: IF P_PA_DEBUG_MODE = 'Y' THEN

1550: SET quantity = null
1551: WHERE budget_version_id = p_budget_version_id;
1552: END IF; */
1553:
1554: IF P_PA_DEBUG_MODE = 'Y' THEN
1555: PA_DEBUG.Reset_Curr_Function;
1556: END IF;
1557:
1558: EXCEPTION

Line 1555: PA_DEBUG.Reset_Curr_Function;

1551: WHERE budget_version_id = p_budget_version_id;
1552: END IF; */
1553:
1554: IF P_PA_DEBUG_MODE = 'Y' THEN
1555: PA_DEBUG.Reset_Curr_Function;
1556: END IF;
1557:
1558: EXCEPTION
1559: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1580: IF P_PA_DEBUG_MODE = 'Y' THEN

1576: ROLLBACK;
1577:
1578: x_return_status := FND_API.G_RET_STS_ERROR;
1579:
1580: IF P_PA_DEBUG_MODE = 'Y' THEN
1581: PA_DEBUG.Reset_Curr_Function;
1582: END IF;
1583:
1584: RAISE;

Line 1581: PA_DEBUG.Reset_Curr_Function;

1577:
1578: x_return_status := FND_API.G_RET_STS_ERROR;
1579:
1580: IF P_PA_DEBUG_MODE = 'Y' THEN
1581: PA_DEBUG.Reset_Curr_Function;
1582: END IF;
1583:
1584: RAISE;
1585:

Line 1593: IF P_PA_DEBUG_MODE = 'Y' THEN

1589: FND_MSG_PUB.add_exc_msg
1590: ( p_pkg_name => 'PA_FP_REV_GEN_PUB'
1591: ,p_procedure_name => 'GEN_COST_BASED_REVENUE' );
1592:
1593: IF P_PA_DEBUG_MODE = 'Y' THEN
1594: PA_DEBUG.Reset_Curr_Function;
1595: END IF;
1596:
1597: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1594: PA_DEBUG.Reset_Curr_Function;

1590: ( p_pkg_name => 'PA_FP_REV_GEN_PUB'
1591: ,p_procedure_name => 'GEN_COST_BASED_REVENUE' );
1592:
1593: IF P_PA_DEBUG_MODE = 'Y' THEN
1594: PA_DEBUG.Reset_Curr_Function;
1595: END IF;
1596:
1597: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1598:

Line 1897: IF p_pa_debug_mode = 'Y' THEN

1893: /* Setting initial values */
1894: X_MSG_COUNT := 0;
1895: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1896:
1897: IF p_pa_debug_mode = 'Y' THEN
1898: PA_DEBUG.SET_CURR_FUNCTION
1899: ( p_function => 'PUSH_RES_SCH_DATA_TO_BL',
1900: p_debug_mode => p_pa_debug_mode );
1901: END IF;

Line 1898: PA_DEBUG.SET_CURR_FUNCTION

1894: X_MSG_COUNT := 0;
1895: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1896:
1897: IF p_pa_debug_mode = 'Y' THEN
1898: PA_DEBUG.SET_CURR_FUNCTION
1899: ( p_function => 'PUSH_RES_SCH_DATA_TO_BL',
1900: p_debug_mode => p_pa_debug_mode );
1901: END IF;
1902:

Line 1900: p_debug_mode => p_pa_debug_mode );

1896:
1897: IF p_pa_debug_mode = 'Y' THEN
1898: PA_DEBUG.SET_CURR_FUNCTION
1899: ( p_function => 'PUSH_RES_SCH_DATA_TO_BL',
1900: p_debug_mode => p_pa_debug_mode );
1901: END IF;
1902:
1903: -- Bug 4549862: Update pc/pfc rate types to 'User' in PA_FP_ROLLUP_TMP:
1904: -- 1. Revenue rate types will always be 'User', so no update needed.

Line 2388: IF P_PA_DEBUG_MODE = 'Y' THEN

2384: AND TXN_CURRENCY_CODE = l_upd_bl_TXN_CURRENCY_CODE_tab(bl_index);
2385:
2386: END IF; -- l_upd_bl_RES_ASSIGNMENT_ID_tab.COUNT > 0 check
2387:
2388: IF P_PA_DEBUG_MODE = 'Y' THEN
2389: PA_DEBUG.Reset_Curr_Function;
2390: END IF;
2391:
2392: EXCEPTION

Line 2389: PA_DEBUG.Reset_Curr_Function;

2385:
2386: END IF; -- l_upd_bl_RES_ASSIGNMENT_ID_tab.COUNT > 0 check
2387:
2388: IF P_PA_DEBUG_MODE = 'Y' THEN
2389: PA_DEBUG.Reset_Curr_Function;
2390: END IF;
2391:
2392: EXCEPTION
2393: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 2414: IF P_PA_DEBUG_MODE = 'Y' THEN

2410: ROLLBACK;
2411:
2412: x_return_status := FND_API.G_RET_STS_ERROR;
2413:
2414: IF P_PA_DEBUG_MODE = 'Y' THEN
2415: PA_DEBUG.Reset_Curr_Function;
2416: END IF;
2417:
2418: RAISE;

Line 2415: PA_DEBUG.Reset_Curr_Function;

2411:
2412: x_return_status := FND_API.G_RET_STS_ERROR;
2413:
2414: IF P_PA_DEBUG_MODE = 'Y' THEN
2415: PA_DEBUG.Reset_Curr_Function;
2416: END IF;
2417:
2418: RAISE;
2419:

Line 2427: IF P_PA_DEBUG_MODE = 'Y' THEN

2423: FND_MSG_PUB.add_exc_msg
2424: ( p_pkg_name => 'PA_FP_REV_GEN_PUB'
2425: ,p_procedure_name => 'PUSH_RES_SCH_DATA_TO_BL' );
2426:
2427: IF P_PA_DEBUG_MODE = 'Y' THEN
2428: PA_DEBUG.Reset_Curr_Function;
2429: END IF;
2430:
2431: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 2428: PA_DEBUG.Reset_Curr_Function;

2424: ( p_pkg_name => 'PA_FP_REV_GEN_PUB'
2425: ,p_procedure_name => 'PUSH_RES_SCH_DATA_TO_BL' );
2426:
2427: IF P_PA_DEBUG_MODE = 'Y' THEN
2428: PA_DEBUG.Reset_Curr_Function;
2429: END IF;
2430:
2431: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2432: