DBA Data[Home] [Help]

APPS.PA_FP_ROLLUP_PKG dependencies on PA_FP_ROLLUP_PKG

Line 1: PACKAGE BODY PA_FP_ROLLUP_PKG as

1: PACKAGE BODY PA_FP_ROLLUP_PKG as
2: /* $Header: PAFPRLPB.pls 120.3 2005/09/26 12:20:20 rnamburi noship $ */
3:
4: l_module_name VARCHAR2(100) := 'pa.plsql.pa_fp_rollup_pkg';
5: g_plsql_max_array_size NUMBER := 200;

Line 4: l_module_name VARCHAR2(100) := 'pa.plsql.pa_fp_rollup_pkg';

1: PACKAGE BODY PA_FP_ROLLUP_PKG as
2: /* $Header: PAFPRLPB.pls 120.3 2005/09/26 12:20:20 rnamburi noship $ */
3:
4: l_module_name VARCHAR2(100) := 'pa.plsql.pa_fp_rollup_pkg';
5: g_plsql_max_array_size NUMBER := 200;
6: g_first_ra_id pa_resource_assignments.RESOURCE_ASSIGNMENT_ID%TYPE;
7:
8: -- Bug Fix: 4569365. Removed MRC code.

Line 53: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Populate_Local_Vars');

49: BEGIN
50:
51: -- Set the error stack.
52:
53: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Populate_Local_Vars');
54:
55: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
56:
57: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);

Line 66: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Populate_Local_Vars ';

62: IF P_PA_DEBUG_MODE = 'Y' THEN
63: pa_debug.set_process('POPULATE_LOCAL_VARS: ' || 'PLSQL','LOG',l_debug_mode);
64: END IF;
65:
66: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Populate_Local_Vars ';
67: IF P_PA_DEBUG_MODE = 'Y' THEN
68: pa_debug.write('POPULATE_LOCAL_VARS: ' || l_module_name,pa_debug.g_err_stage,2);
69: END IF;
70:

Line 80: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

76: END IF;
77: x_return_status := FND_API.G_RET_STS_ERROR;
78: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
79: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
80: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
81: END IF;
82:
83: /* Populating the Resource List ID, Uncategorized flag of the Resource List and the Group Type ID
84: of the Resource list attached to the Budget version. */

Line 154: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN

150:
151: pa_debug.reset_err_stack;
152:
153: EXCEPTION
154: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN
155: l_msg_count := FND_MSG_PUB.count_msg;
156: IF l_msg_count = 1 THEN
157: PA_INTERFACE_UTILS_PUB.get_messages
158: (p_encoded => FND_API.G_TRUE,

Line 176: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
173: x_msg_count := 1;
174: x_msg_data := SQLERRM;
175: FND_MSG_PUB.add_exc_msg
176: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
177: ,p_procedure_name => 'POPULATE_LOCAL_VARS');
178: IF P_PA_DEBUG_MODE = 'Y' THEN
179: pa_debug.write('POPULATE_LOCAL_VARS: ' || l_module_name,SQLERRM,5);
180: END IF;

Line 328: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

324:
325: EXCEPTION
326: WHEN OTHERS THEN
327: FND_MSG_PUB.add_exc_msg
328: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
329: ,p_procedure_name => 'Insert_Parent_Rec_Tmp');
330: IF P_PA_DEBUG_MODE = 'Y' THEN
331: pa_debug.write('INSERT_PARENT_REC_TMP: ' || l_module_name,SQLERRM,5);
332: END IF;

Line 468: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Rollup_Budget_Version');

464:
465: -- Initialize and Set the error stack.
466: FND_MSG_PUB.initialize;
467: IF P_PA_DEBUG_MODE = 'Y' THEN
468: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Rollup_Budget_Version');
469: END IF;
470:
471: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
472: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);

Line 483: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Rollup_Budget_Version';

479: pa_debug.set_process('ROLLUP_BUDGET_VERSION: ' || 'PLSQL','LOG',l_debug_mode);
480: END IF;
481: x_msg_count := 0;
482:
483: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Rollup_Budget_Version';
484: IF P_PA_DEBUG_MODE = 'Y' THEN
485: pa_debug.write('ROLLUP_BUDGET_VERSION: ' || l_module_name,pa_debug.g_err_stage,3);
486: END IF;
487:

Line 497: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

493: END IF;
494: x_return_status := FND_API.G_RET_STS_ERROR;
495: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
496: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
497: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
498: END IF;
499:
500: pa_debug.g_err_stage := 'Budget Version ID is '||p_budget_version_id;
501: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 738: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN

734: CLOSE c_proj_level_amounts;
735: pa_debug.reset_err_stack;
736:
737: EXCEPTION
738: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN
739: l_msg_count := FND_MSG_PUB.count_msg;
740: IF l_msg_count = 1 THEN
741: PA_INTERFACE_UTILS_PUB.get_messages
742: (p_encoded => FND_API.G_TRUE,

Line 760: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

756: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
757: x_msg_count := 1;
758: x_msg_data := SQLERRM;
759: FND_MSG_PUB.add_exc_msg
760: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
761: ,p_procedure_name => 'Rollup_Budget_Version');
762: IF P_PA_DEBUG_MODE = 'Y' THEN
763: pa_debug.write('ROLLUP_BUDGET_VERSION: ' || l_module_name,SQLERRM,5);
764: END IF;

Line 991: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Refresh_Resource_Assignments');

987:
988: BEGIN
989:
990: -- Set the error stack.
991: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Refresh_Resource_Assignments');
992:
993: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
994: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
995: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 1004: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Refresh_Resource_Assignments';

1000: IF P_PA_DEBUG_MODE = 'Y' THEN
1001: pa_debug.set_process('REFRESH_RESOURCE_ASSIGNMENTS: ' || 'PLSQL','LOG',l_debug_mode);
1002: END IF;
1003:
1004: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Refresh_Resource_Assignments';
1005: IF P_PA_DEBUG_MODE = 'Y' THEN
1006: pa_debug.write('REFRESH_RESOURCE_ASSIGNMENTS: ' || l_module_name,pa_debug.g_err_stage,3);
1007: END IF;
1008:

Line 1019: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

1015: END IF;
1016: x_return_status := FND_API.G_RET_STS_ERROR;
1017: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1018: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
1019: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
1020: END IF;
1021:
1022: /* Populate the local variables for usage. */
1023: pa_debug.g_err_stage := 'calling populate_local_vars';

Line 1554: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN

1550:
1551: pa_debug.reset_err_stack;
1552:
1553: EXCEPTION
1554: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN
1555: l_msg_count := FND_MSG_PUB.count_msg;
1556: IF l_msg_count = 1 THEN
1557: PA_INTERFACE_UTILS_PUB.get_messages
1558: (p_encoded => FND_API.G_TRUE,

Line 1576: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

1572: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1573: x_msg_count := 1;
1574: x_msg_data := SQLERRM;
1575: FND_MSG_PUB.add_exc_msg
1576: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
1577: ,p_procedure_name => 'REFRESH_RESOURCE_ASSIGNMENTS');
1578: IF P_PA_DEBUG_MODE = 'Y' THEN
1579: pa_debug.write('REFRESH_RESOURCE_ASSIGNMENTS: ' || l_module_name,SQLERRM,5);
1580: END IF;

Line 1615: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.UPDATE_RES_PARENT_ASSIGN_ID');

1611:
1612: BEGIN
1613:
1614: -- Set the error stack.
1615: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.UPDATE_RES_PARENT_ASSIGN_ID');
1616:
1617: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
1618: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
1619: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 1628: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.UPDATE_RES_PARENT_ASSIGN_ID';

1624: IF P_PA_DEBUG_MODE = 'Y' THEN
1625: pa_debug.set_process('UPDATE_RES_PARENT_ASSIGN_ID: ' || 'PLSQL','LOG',l_debug_mode);
1626: END IF;
1627:
1628: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.UPDATE_RES_PARENT_ASSIGN_ID';
1629: IF P_PA_DEBUG_MODE = 'Y' THEN
1630: pa_debug.write('UPDATE_RES_PARENT_ASSIGN_ID: ' || l_module_name,pa_debug.g_err_stage,3);
1631: END IF;
1632:

Line 1643: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

1639: END IF;
1640: x_return_status := FND_API.G_RET_STS_ERROR;
1641: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1642: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
1643: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
1644: END IF;
1645:
1646: /* Populate the local variables. */
1647:

Line 1826: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN

1822: END IF;
1823: pa_debug.reset_err_stack;
1824:
1825: EXCEPTION
1826: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN
1827: l_msg_count := FND_MSG_PUB.count_msg;
1828: IF l_msg_count = 1 THEN
1829: PA_INTERFACE_UTILS_PUB.get_messages
1830: (p_encoded => FND_API.G_TRUE,

Line 1848: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

1844: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1845: x_msg_count := 1;
1846: x_msg_data := SQLERRM;
1847: FND_MSG_PUB.add_exc_msg
1848: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
1849: ,p_procedure_name => 'UPDATE_RES_PARENT_ASSIGN_ID');
1850: IF P_PA_DEBUG_MODE = 'Y' THEN
1851: pa_debug.write('UPDATE_RES_PARENT_ASSIGN_ID: ' || l_module_name,SQLERRM,5);
1852: END IF;

Line 1892: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Insert_Bulk_Rows_Res');

1888:
1889: BEGIN
1890:
1891: -- Set the error stack.
1892: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Insert_Bulk_Rows_Res');
1893:
1894: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
1895: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
1896: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 1905: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Insert_Bulk_Rows_Res ';

1901: IF P_PA_DEBUG_MODE = 'Y' THEN
1902: pa_debug.set_process('Insert_Bulk_Rows_Res: ' || 'PLSQL','LOG',l_debug_mode);
1903: END IF;
1904:
1905: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Insert_Bulk_Rows_Res ';
1906: IF P_PA_DEBUG_MODE = 'Y' THEN
1907: pa_debug.write('Insert_Bulk_Rows_Res: ' || l_module_name,pa_debug.g_err_stage,3);
1908: END IF;
1909:

Line 1982: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN

1978:
1979: pa_debug.reset_err_stack;
1980:
1981: EXCEPTION
1982: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN
1983: l_msg_count := FND_MSG_PUB.count_msg;
1984: IF l_msg_count = 1 THEN
1985: PA_INTERFACE_UTILS_PUB.get_messages
1986: (p_encoded => FND_API.G_TRUE,

Line 2004: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

2000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2001: x_msg_count := 1;
2002: x_msg_data := SQLERRM;
2003: FND_MSG_PUB.add_exc_msg
2004: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
2005: ,p_procedure_name => 'Insert_Bulk_Rows_Res') ;
2006: IF P_PA_DEBUG_MODE = 'Y' THEN
2007: pa_debug.write('Insert_Bulk_Rows_Res: ' || l_module_name,SQLERRM,5);
2008: END IF;

Line 2060: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Refresh_Period_Denorm');

2056:
2057: BEGIN
2058:
2059: -- Set the error stack.
2060: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Refresh_Period_Denorm');
2061:
2062: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
2063: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2064: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 2073: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Refresh_Period_Denorm ';

2069: IF P_PA_DEBUG_MODE = 'Y' THEN
2070: pa_debug.set_process('REFRESH_PERIOD_DENORM: ' || 'PLSQL','LOG',l_debug_mode);
2071: END IF;
2072:
2073: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Refresh_Period_Denorm ';
2074: IF P_PA_DEBUG_MODE = 'Y' THEN
2075: pa_debug.write('REFRESH_PERIOD_DENORM: ' || l_module_name,pa_debug.g_err_stage,3);
2076: END IF;
2077:

Line 2088: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

2084: END IF;
2085: x_return_status := FND_API.G_RET_STS_ERROR;
2086: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2087: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
2088: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
2089: END IF;
2090:
2091: /* Populate the local variables. */
2092: /* M21-AUG: made call parameterized */

Line 2429: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN

2425:
2426: pa_debug.reset_err_stack;
2427:
2428: EXCEPTION
2429: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN
2430: l_msg_count := FND_MSG_PUB.count_msg;
2431: IF l_msg_count = 1 THEN
2432: PA_INTERFACE_UTILS_PUB.get_messages
2433: (p_encoded => FND_API.G_TRUE,

Line 2451: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

2447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2448: x_msg_count := 1;
2449: x_msg_data := SQLERRM;
2450: FND_MSG_PUB.add_exc_msg
2451: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
2452: ,p_procedure_name => 'Refresh_Period_Denorm');
2453: IF P_PA_DEBUG_MODE = 'Y' THEN
2454: pa_debug.write('REFRESH_PERIOD_DENORM: ' || l_module_name,SQLERRM,5);
2455: END IF;

Line 2482: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Update_Denorm_Parent_Assign_ID');

2478:
2479: BEGIN
2480:
2481: -- Set the error stack.
2482: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Update_Denorm_Parent_Assign_ID');
2483:
2484: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
2485: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2486: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 2521: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

2517: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2518: x_msg_count := 1;
2519: x_msg_data := SQLERRM;
2520: FND_MSG_PUB.add_exc_msg
2521: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
2522: ,p_procedure_name => 'UPDATE_DENORM_PARENT_ASSIGN_ID');
2523: IF P_PA_DEBUG_MODE = 'Y' THEN
2524: pa_debug.write('UPDATE_DENORM_PARENT_ASSIGN_ID: ' || l_module_name,SQLERRM,5);
2525: END IF;

Line 2646: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Insert_Missing_Res_Parents');

2642:
2643: BEGIN
2644:
2645: -- Set the error stack.
2646: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Insert_Missing_Res_Parents');
2647:
2648: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
2649: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2650: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 2659: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Insert_Missing_Res_Parents ';

2655: IF P_PA_DEBUG_MODE = 'Y' THEN
2656: pa_debug.set_process('INSERT_MISSING_RES_PARENTS: ' || 'PLSQL','LOG',l_debug_mode);
2657: END IF;
2658:
2659: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Insert_Missing_Res_Parents ';
2660: IF P_PA_DEBUG_MODE = 'Y' THEN
2661: pa_debug.write('INSERT_MISSING_RES_PARENTS: ' || l_module_name,pa_debug.g_err_stage,3);
2662: END IF;
2663:

Line 2674: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

2670: END IF;
2671: x_return_status := FND_API.G_RET_STS_ERROR;
2672: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2673: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
2674: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
2675: END IF;
2676:
2677: /* Populate the local variables. */
2678:

Line 3307: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN

3303: pa_debug.reset_err_stack;
3304:
3305:
3306: EXCEPTION
3307: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN
3308: l_msg_count := FND_MSG_PUB.count_msg;
3309: IF l_msg_count = 1 THEN
3310: PA_INTERFACE_UTILS_PUB.get_messages
3311: (p_encoded => FND_API.G_TRUE,

Line 3329: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

3325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3326: x_msg_count := 1;
3327: x_msg_data := SQLERRM;
3328: FND_MSG_PUB.add_exc_msg
3329: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
3330: ,p_procedure_name => 'Insert_Missing_Res_Parents');
3331: IF P_PA_DEBUG_MODE = 'Y' THEN
3332: pa_debug.write('INSERT_MISSING_RES_PARENTS: ' || l_module_name,SQLERRM,5);
3333: END IF;

Line 3396: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Rollup_Res_Assignment_Amounts');

3392:
3393: BEGIN
3394:
3395: -- Set the error stack.
3396: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Rollup_Res_Assignment_Amounts');
3397:
3398: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
3399: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3400: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 3409: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Rollup_Res_Assignment_Amounts ';

3405: IF P_PA_DEBUG_MODE = 'Y' THEN
3406: pa_debug.set_process('ROLLUP_RES_ASSIGNMENT_AMOUNTS: ' || 'PLSQL','LOG',l_debug_mode);
3407: END IF;
3408:
3409: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Rollup_Res_Assignment_Amounts ';
3410: IF P_PA_DEBUG_MODE = 'Y' THEN
3411: pa_debug.write('ROLLUP_RES_ASSIGNMENT_AMOUNTS: ' || l_module_name,pa_debug.g_err_stage,3);
3412: END IF;
3413:

Line 3423: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

3419: END IF;
3420: x_return_status := FND_API.G_RET_STS_ERROR;
3421: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3422: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
3423: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
3424: END IF;
3425:
3426: OPEN c_res_amt_diffs;
3427:

Line 3612: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN

3608: END IF;
3609: pa_debug.reset_err_stack;
3610:
3611: EXCEPTION
3612: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN
3613: l_msg_count := FND_MSG_PUB.count_msg;
3614: IF l_msg_count = 1 THEN
3615: PA_INTERFACE_UTILS_PUB.get_messages
3616: (p_encoded => FND_API.G_TRUE,

Line 3634: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

3630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3631: x_msg_count := 1;
3632: x_msg_data := SQLERRM;
3633: FND_MSG_PUB.add_exc_msg
3634: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
3635: ,p_procedure_name => 'Rollup_Res_Assignment_Amounts');
3636: IF P_PA_DEBUG_MODE = 'Y' THEN
3637: pa_debug.write('ROLLUP_RES_ASSIGNMENT_AMOUNTS: ' || l_module_name,SQLERRM,5);
3638: END IF;

Line 3725: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Insert_Missing_Parent_Denorm');

3721: BEGIN
3722:
3723:
3724: -- Set the error stack.
3725: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Insert_Missing_Parent_Denorm');
3726:
3727: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
3728: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3729: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 3738: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Insert_Missing_Parent_Denorm ';

3734: IF P_PA_DEBUG_MODE = 'Y' THEN
3735: pa_debug.set_process('INSERT_MISSING_PARENT_DENORM: ' || 'PLSQL','LOG',l_debug_mode);
3736: END IF;
3737:
3738: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Insert_Missing_Parent_Denorm ';
3739: IF P_PA_DEBUG_MODE = 'Y' THEN
3740: pa_debug.write('INSERT_MISSING_PARENT_DENORM: ' || l_module_name,pa_debug.g_err_stage,3);
3741: END IF;
3742:

Line 3753: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

3749: END IF;
3750: x_return_status := FND_API.G_RET_STS_ERROR;
3751: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3752: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
3753: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
3754: END IF;
3755:
3756: populate_local_vars(p_budget_version_id => p_budget_version_id,
3757: x_project_id => l_project_id,

Line 3919: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN

3915:
3916: pa_debug.reset_err_stack;
3917:
3918: EXCEPTION
3919: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN
3920: l_msg_count := FND_MSG_PUB.count_msg;
3921: IF l_msg_count = 1 THEN
3922: PA_INTERFACE_UTILS_PUB.get_messages
3923: (p_encoded => FND_API.G_TRUE,

Line 3941: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

3937: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3938: x_msg_count := 1;
3939: x_msg_data := SQLERRM;
3940: FND_MSG_PUB.add_exc_msg
3941: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
3942: ,p_procedure_name => 'Insert_Missing_Parent_Denorm');
3943: IF P_PA_DEBUG_MODE = 'Y' THEN
3944: pa_debug.write('INSERT_MISSING_PARENT_DENORM: ' || l_module_name,'sqlerrm = ' || SQLERRM,5);
3945: END IF;

Line 3977: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Rollup_Denorm_Amounts');

3973:
3974: BEGIN
3975:
3976: -- Set the error stack.
3977: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Rollup_Denorm_Amounts');
3978:
3979: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
3980: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3981: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 3990: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Rollup_Denorm_Amounts ';

3986: IF P_PA_DEBUG_MODE = 'Y' THEN
3987: pa_debug.set_process('ROLLUP_DENORM_AMOUNTS: ' || 'PLSQL','LOG',l_debug_mode);
3988: END IF;
3989:
3990: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Rollup_Denorm_Amounts ';
3991: IF P_PA_DEBUG_MODE = 'Y' THEN
3992: pa_debug.write('ROLLUP_DENORM_AMOUNTS: ' || l_module_name,pa_debug.g_err_stage,3);
3993: END IF;
3994:

Line 4005: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

4001: END IF;
4002: x_return_status := FND_API.G_RET_STS_ERROR;
4003: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4004: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
4005: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
4006: END IF;
4007:
4008: /* Inserting the parent level records that need to be updated into pa_fp_ra_map_tmp
4009: from Resource_Assignments and those that are present in the pa_fp_rollup_tmp

Line 4349: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN

4345:
4346: pa_debug.reset_err_stack;
4347:
4348: EXCEPTION
4349: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN
4350: l_msg_count := FND_MSG_PUB.count_msg;
4351: IF l_msg_count = 1 THEN
4352: PA_INTERFACE_UTILS_PUB.get_messages
4353: (p_encoded => FND_API.G_TRUE,

Line 4371: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

4367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4368: x_msg_count := 1;
4369: x_msg_data := SQLERRM;
4370: FND_MSG_PUB.add_exc_msg
4371: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
4372: ,p_procedure_name => 'Rollup_Denorm_Amounts');
4373: IF P_PA_DEBUG_MODE = 'Y' THEN
4374: pa_debug.write('ROLLUP_DENORM_AMOUNTS: ' || l_module_name,SQLERRM,5);
4375: END IF;

Line 4458: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Delete_Element');

4454:
4455: BEGIN
4456:
4457: -- Set the error stack.
4458: pa_debug.set_err_stack('PA_FP_ROLLUP_PKG.Delete_Element');
4459:
4460: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
4461: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4462: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 4471: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Delete_Element ';

4467: IF P_PA_DEBUG_MODE = 'Y' THEN
4468: pa_debug.set_process('DELETE_ELEMENT: ' || 'PLSQL','LOG',l_debug_mode);
4469: END IF;
4470:
4471: pa_debug.g_err_stage := 'In PA_FP_ROLLUP_PKG.Delete_Element ';
4472: IF P_PA_DEBUG_MODE = 'Y' THEN
4473: pa_debug.write('DELETE_ELEMENT: ' || l_module_name,pa_debug.g_err_stage,3);
4474: END IF;
4475:

Line 4486: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

4482: END IF;
4483: x_return_status := FND_API.G_RET_STS_ERROR;
4484: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4485: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
4486: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
4487: END IF;
4488:
4489: /* Check for Resource Assignment ID not being NULL. */
4490: IF ( p_resource_assignment_id IS NULL) THEN

Line 4498: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

4494: END IF;
4495: x_return_status := FND_API.G_RET_STS_ERROR;
4496: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4497: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
4498: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
4499: END IF;
4500:
4501: /* Populate the local variables. */
4502:

Line 4796: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;

4792: IF P_PA_DEBUG_MODE = 'Y' THEN
4793: pa_debug.g_err_stage := 'pa_planning_transaction_utils.call_update_rep_lines_api errored .... ' || x_msg_data;
4794: pa_debug.write('DELETE_ELEMENT: ' || l_module_name,pa_debug.g_err_stage,5);
4795: END IF;
4796: RAISE PA_FP_ROLLUP_PKG.Invalid_Arg_Exc;
4797: END IF;
4798:
4799: END IF;
4800:

Line 5087: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN

5083:
5084: pa_debug.reset_err_stack;
5085:
5086: EXCEPTION
5087: WHEN PA_FP_ROLLUP_PKG.Invalid_Arg_Exc THEN
5088: l_msg_count := FND_MSG_PUB.count_msg;
5089: IF l_msg_count = 1 THEN
5090: PA_INTERFACE_UTILS_PUB.get_messages
5091: (p_encoded => FND_API.G_TRUE,

Line 5109: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'

5105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5106: x_msg_count := 1;
5107: x_msg_data := SQLERRM;
5108: FND_MSG_PUB.add_exc_msg
5109: ( p_pkg_name => 'PA_FP_ROLLUP_PKG'
5110: ,p_procedure_name => 'Delete_Element');
5111: IF P_PA_DEBUG_MODE = 'Y' THEN
5112: pa_debug.write('DELETE_ELEMENT: ' || l_module_name,SQLERRM,5);
5113: END IF;

Line 5119: END PA_FP_ROLLUP_PKG;

5115:
5116: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5117: END DELETE_ELEMENT;
5118:
5119: END PA_FP_ROLLUP_PKG;