DBA Data[Home] [Help]

APPS.PA_FP_UPGRADE_PKG dependencies on PA_FP_UPGRADE_PKG

Line 1: PACKAGE BODY pa_fp_upgrade_pkg AS

1: PACKAGE BODY pa_fp_upgrade_pkg AS
2: /* $Header: PAFPUPGB.pls 120.7.12010000.4 2009/02/09 12:09:03 spasala ship $*/
3:
4: l_module_name VARCHAR2(100):= 'pa.plsql.pa_fp_upgrade_pkg';
5: p_pa_debug_mode VARCHAR2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

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

1: PACKAGE BODY pa_fp_upgrade_pkg AS
2: /* $Header: PAFPUPGB.pls 120.7.12010000.4 2009/02/09 12:09:03 spasala ship $*/
3:
4: l_module_name VARCHAR2(100):= 'pa.plsql.pa_fp_upgrade_pkg';
5: p_pa_debug_mode VARCHAR2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
6: l_migration_code varchar2(1) := null;
7:
8: TYPE res_list_tbl IS TABLE OF

Line 173: ,x_upgrade_elements_rec OUT NOCOPY pa_fp_upgrade_pkg.upgrade_elements_rec_type

169: p_project_id IN pa_proj_fp_options.project_id%TYPE
170: ,p_budget_type_code IN pa_budget_versions.budget_type_code%TYPE
171: ,p_fin_plan_version_id IN pa_proj_fp_options.fin_plan_version_id%TYPE
172: ,p_fin_plan_option_level IN pa_proj_fp_options.fin_plan_option_level_code%TYPE
173: ,x_upgrade_elements_rec OUT NOCOPY pa_fp_upgrade_pkg.upgrade_elements_rec_type
174: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
175: ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
176: ,x_msg_data OUT NOCOPY VARCHAR2) IS --File.Sql.39 bug 4440895
177:

Line 247: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.Populate_Local_Variables');

243:
244: x_msg_count := 0;
245: x_return_status := FND_API.G_RET_STS_SUCCESS;
246:
247: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.Populate_Local_Variables');
248: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
249: l_debug_mode := NVL(l_debug_mode, 'Y');
250: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
251:

Line 920: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'

916: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
917: x_msg_count := 1;
918: x_msg_data := SQLERRM;
919:
920: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'
921: ,p_procedure_name => 'Populate_Local_Variables');
922: IF p_pa_debug_mode = 'Y' THEN
923: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
924: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

Line 970: savepoint pa_fp_upgrade_pkg;

966:
967: BEGIN
968: x_msg_count := 0;
969: x_return_status := FND_API.G_RET_STS_SUCCESS;
970: savepoint pa_fp_upgrade_pkg;
971:
972: pa_debug.init_err_stack('PA_FP_UPGRADE_PKG.Upgrade_Budget_Types');
973: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
974: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 972: pa_debug.init_err_stack('PA_FP_UPGRADE_PKG.Upgrade_Budget_Types');

968: x_msg_count := 0;
969: x_return_status := FND_API.G_RET_STS_SUCCESS;
970: savepoint pa_fp_upgrade_pkg;
971:
972: pa_debug.init_err_stack('PA_FP_UPGRADE_PKG.Upgrade_Budget_Types');
973: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
974: l_debug_mode := NVL(l_debug_mode, 'Y');
975: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
976: IF p_pa_debug_mode = 'Y' THEN

Line 1010: pa_fp_upgrade_pkg.Upgrade_Budget_Types(

1006:
1007: pa_debug.g_err_stage := 'Calling Upgrade_Budget_Types';
1008: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
1009: END IF;
1010: pa_fp_upgrade_pkg.Upgrade_Budget_Types(
1011: p_budget_types => p_budget_types
1012: ,x_return_status => l_return_status
1013: ,x_msg_count => l_msg_count
1014: ,x_msg_data => l_msg_data);

Line 1108: pa_fp_upgrade_pkg.Validate_Project (

1104: WHEN no_data_found THEN
1105:
1106: -- Check for project level exceptions and
1107: -- set l_proj_validation_status accordingly
1108: pa_fp_upgrade_pkg.Validate_Project (
1109: p_project_id => l_project_id
1110: ,x_validation_status => l_proj_validation_status
1111: ,x_return_status => l_return_status
1112: ,x_msg_count => l_msg_count

Line 1128: pa_fp_upgrade_pkg.Create_fp_options(

1124: IF p_pa_debug_mode = 'Y' THEN
1125: pa_debug.g_err_stage := 'Calling Create_fp_options for project';
1126: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
1127: END IF;
1128: pa_fp_upgrade_pkg.Create_fp_options(
1129: p_project_id => l_project_id
1130: ,p_budget_type_code => NULL
1131: ,p_fin_plan_version_id => NULL
1132: ,p_fin_plan_option_level => PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PROJECT

Line 1170: pa_fp_upgrade_pkg.Insert_Audit_Record(

1166: raise pa_fp_constants_pkg.Invalid_Arg_Exc;
1167: end if;
1168:
1169: -- Insert into audit table
1170: pa_fp_upgrade_pkg.Insert_Audit_Record(
1171: p_project_id => l_project_id
1172: ,p_budget_type_code => NULL
1173: ,p_proj_fp_options_id => l_proj_fp_options_id
1174: ,p_fin_plan_option_level_code => PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PROJECT

Line 1204: pa_fp_upgrade_pkg.Add_Plan_Types(

1200: pa_debug.g_err_stage := 'Calling Add_Plan_Types';
1201: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
1202: END IF;
1203:
1204: pa_fp_upgrade_pkg.Add_Plan_Types(
1205: p_project_id => l_project_id
1206: ,p_budget_types => p_budget_types
1207: ,x_return_status => l_return_status
1208: ,x_msg_count => l_msg_count

Line 1219: pa_fp_upgrade_pkg.Upgrade_Budget_Versions(

1215: IF p_pa_debug_mode = 'Y' THEN
1216: pa_debug.g_err_stage := 'Calling Upgrade_Budget_Versions';
1217: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
1218: END IF;
1219: pa_fp_upgrade_pkg.Upgrade_Budget_Versions(
1220: p_project_id => l_project_id
1221: ,p_budget_types => p_budget_types
1222: ,p_budget_statuses => p_budget_statuses
1223: ,x_return_status => l_return_status

Line 1294: ROLLBACK TO pa_fp_upgrade_pkg;

1290: x_return_status:= FND_API.G_RET_STS_ERROR;
1291: pa_debug.write_file('Upgrade_Budgets : Upgrade has failed for the project: '||project_type_info_rec.segment1||'(project number)',5);
1292: pa_debug.write_file('Upgrade_Budgets : Failure Reason:'||x_msg_data,5);
1293: pa_debug.reset_err_stack;
1294: ROLLBACK TO pa_fp_upgrade_pkg;
1295: RAISE;
1296: WHEN Others THEN
1297:
1298: IF projects_for_upgrade_cur1%ISOPEN THEN

Line 1314: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'

1310: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1311: x_msg_count := 1;
1312: x_msg_data := SQLERRM;
1313:
1314: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'
1315: ,p_procedure_name => 'Upgrade_Budgets');
1316: IF p_pa_debug_mode = 'Y' THEN
1317: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
1318: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

Line 1323: ROLLBACK TO pa_fp_upgrade_pkg;

1319: END IF;
1320: pa_debug.write_file('Upgrade_Budgets : Upgrade has failed for the project'||project_type_info_rec.segment1||'(project number)',5);
1321: pa_debug.write_file('Upgrade_Budgets : Failure Reason:'||pa_debug.G_Err_Stack,5);
1322: pa_debug.reset_err_stack;
1323: ROLLBACK TO pa_fp_upgrade_pkg;
1324: RAISE;
1325: END Upgrade_Budgets;
1326:
1327: /*=============================================================================

Line 1390: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.Upgrade_Budget_Types');

1386: BEGIN
1387: x_msg_count := 0;
1388: x_return_status := FND_API.G_RET_STS_SUCCESS;
1389:
1390: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.Upgrade_Budget_Types');
1391: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
1392: l_debug_mode := NVL(l_debug_mode, 'Y');
1393: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
1394: IF p_pa_debug_mode = 'Y' THEN

Line 1550: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'

1546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1547: x_msg_count := 1;
1548: x_msg_data := SQLERRM;
1549:
1550: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'
1551: ,p_procedure_name => 'Upgrade_Budget_Types');
1552: IF p_pa_debug_mode = 'Y' THEN
1553: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
1554: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

Line 1576: ,x_upgrade_elements_rec OUT NOCOPY pa_fp_upgrade_pkg.upgrade_elements_rec_type

1572: ,p_budget_type_code IN pa_budget_versions.budget_type_code%TYPE
1573: ,p_fin_plan_version_id IN pa_proj_fp_options.fin_plan_version_id%TYPE
1574: ,p_fin_plan_option_level IN pa_proj_fp_options.fin_plan_option_level_code%TYPE
1575: ,x_proj_fp_options_id OUT NOCOPY pa_proj_fp_options.proj_fp_options_id%TYPE --File.Sql.39 bug 4440895
1576: ,x_upgrade_elements_rec OUT NOCOPY pa_fp_upgrade_pkg.upgrade_elements_rec_type
1577: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1578: ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
1579: ,x_msg_data OUT NOCOPY VARCHAR2) IS --File.Sql.39 bug 4440895
1580:

Line 1608: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.Create_fp_options');

1604:
1605: x_msg_count := 0;
1606: x_return_status := FND_API.G_RET_STS_SUCCESS;
1607:
1608: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.Create_fp_options');
1609: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
1610: l_debug_mode := NVL(l_debug_mode, 'Y');
1611: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
1612:

Line 1621: pa_fp_upgrade_pkg.Populate_Local_Variables(

1617: pa_debug.g_err_stage := 'Calling Populate_Local_Variables';
1618: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
1619: END IF;
1620:
1621: pa_fp_upgrade_pkg.Populate_Local_Variables(
1622: p_project_id => p_project_id
1623: ,p_budget_type_code => p_budget_type_code
1624: ,p_fin_plan_version_id => p_fin_plan_version_id
1625: ,p_fin_plan_option_level => p_fin_plan_option_level

Line 1809: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'

1805: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1806: x_msg_count := 1;
1807: x_msg_data := SQLERRM;
1808:
1809: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'
1810: ,p_procedure_name => 'Create_fp_options');
1811: IF p_pa_debug_mode = 'Y' THEN
1812: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
1813: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

Line 1853: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.Add_Plan_Types');

1849:
1850: x_msg_count := 0;
1851: x_return_status := FND_API.G_RET_STS_SUCCESS;
1852:
1853: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.Add_Plan_Types');
1854: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
1855: l_debug_mode := NVL(l_debug_mode, 'Y');
1856: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
1857: IF p_pa_debug_mode = 'Y' THEN

Line 1893: pa_fp_upgrade_pkg.Validate_Project_Plan_Type (

1889: FETCH attached_plan_types_cur INTO attached_plan_types_rec;
1890: EXIT WHEN attached_plan_types_cur%NOTFOUND;
1891:
1892: -- For each budget type fetched check if any plan type level exceptions exist
1893: pa_fp_upgrade_pkg.Validate_Project_Plan_Type (
1894: p_project_id => p_project_id
1895: ,p_budget_type_code => attached_plan_types_rec.budget_type_code
1896: ,x_validation_status => l_validation_status
1897: ,x_return_status => l_return_status

Line 1915: pa_fp_upgrade_pkg.Create_fp_options(

1911: IF p_pa_debug_mode = 'Y' THEN
1912: pa_debug.g_err_stage := 'Calling Create_fp_options for plan type';
1913: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
1914: END IF;
1915: pa_fp_upgrade_pkg.Create_fp_options(
1916: p_project_id => p_project_id
1917: ,p_budget_type_code => attached_plan_types_rec.budget_type_code
1918: ,p_fin_plan_version_id => NULL
1919: ,p_fin_plan_option_level => PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PLAN_TYPE

Line 1958: pa_fp_upgrade_pkg.Insert_Audit_Record(

1954: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1955: END IF;
1956:
1957: -- Insert into audit table
1958: pa_fp_upgrade_pkg.Insert_Audit_Record(
1959: p_project_id => p_project_id
1960: ,p_budget_type_code => attached_plan_types_rec.budget_type_code
1961: ,p_proj_fp_options_id => l_proj_fp_options_id
1962: ,p_fin_plan_option_level_code => PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PLAN_TYPE

Line 2019: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'

2015: END IF;
2016: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2017: x_msg_count := 1;
2018: x_msg_data := SQLERRM;
2019: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'
2020: ,p_procedure_name => 'Add_Plan_Types');
2021: IF p_pa_debug_mode = 'Y' THEN
2022: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
2023: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

Line 2122: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.Upgrade_Budget_Versions');

2118: x_msg_count := 0;
2119: x_msg_data := NULL;
2120: x_return_status := FND_API.G_RET_STS_SUCCESS;
2121:
2122: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.Upgrade_Budget_Versions');
2123: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2124: l_debug_mode := NVL(l_debug_mode, 'Y');
2125: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
2126: IF p_pa_debug_mode = 'Y' THEN

Line 2190: pa_fp_upgrade_pkg.Create_fp_options(

2186: pa_debug.g_err_stage := 'Calling Create_fp_options for '|| l_budget_ver_tbl(j);
2187: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2188: END IF;
2189:
2190: pa_fp_upgrade_pkg.Create_fp_options(
2191: p_project_id => p_project_id
2192: ,p_budget_type_code => l_bud_typ_code_tbl(j)
2193: ,p_fin_plan_version_id => l_budget_ver_tbl(j)
2194: ,p_fin_plan_option_level => pa_fp_constants_pkg.g_option_level_plan_version

Line 2507: pa_fp_upgrade_pkg.Apply_Calculate_FPM_Rules(

2503: l_upg_quantity_tbl_in := l_upg_quantity_tbl;
2504: l_upg_txn_raw_cost_tbl_in := l_upg_txn_raw_cost_tbl;
2505: l_upg_txn_burdened_cost_tbl_in := l_upg_txn_burdened_cost_tbl;
2506: l_upg_txn_revenue_tbl_in := l_upg_txn_revenue_tbl; --Bug 5676682
2507: pa_fp_upgrade_pkg.Apply_Calculate_FPM_Rules(
2508: p_preference_code => l_pref_code
2509: ,p_resource_assignment_id_tbl => l_upg_ra_id_tbl
2510: ,p_rate_based_flag_tbl => l_upg_rate_based_flag_tbl
2511: ,p_quantity_tbl => l_upg_quantity_tbl_in

Line 2532: pa_debug.write_file('Upgrade failed due to error in pa_fp_upgrade_pkg.Apply_Calculate_FPM_Rules ',5);

2528:
2529: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
2530: THEN
2531: IF p_pa_debug_mode = 'Y' THEN
2532: pa_debug.write_file('Upgrade failed due to error in pa_fp_upgrade_pkg.Apply_Calculate_FPM_Rules ',5);
2533: END IF;
2534: raise PA_FP_CONSTANTS_PKG.INVALID_ARG_EXC;
2535: END IF;
2536:

Line 2819: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_UPGRADE_PKG'

2815: END IF;
2816: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2817: x_msg_count := 1;
2818: x_msg_data := SQLERRM;
2819: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_UPGRADE_PKG'
2820: ,p_procedure_name => 'Upgrade_Budget_Versions');
2821: IF p_pa_debug_mode = 'Y' THEN
2822: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
2823: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

Line 2947: pa_debug.init_err_stack('PA_FP_UPGRADE_PKG.validate_budgets');

2943: BEGIN
2944:
2945: x_msg_count := 0;
2946: x_return_status := FND_API.G_RET_STS_SUCCESS;
2947: pa_debug.init_err_stack('PA_FP_UPGRADE_PKG.validate_budgets');
2948: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2949: l_debug_mode := NVL(l_debug_mode, 'Y');
2950: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
2951:

Line 3037: pa_fp_upgrade_pkg.Validate_Project(

3033: THEN
3034:
3035: -- Perform project level validations necessary for UPGRADE
3036:
3037: pa_fp_upgrade_pkg.Validate_Project(
3038: p_project_id => l_project_id
3039: ,x_validation_status => l_validation_status
3040: ,x_return_status => l_return_status
3041: ,x_msg_count => l_msg_count

Line 3069: pa_fp_upgrade_pkg.Validate_Project_Plan_Type(

3065: END IF;
3066:
3067: -- For each budget type fetched check for all the exceptions
3068:
3069: pa_fp_upgrade_pkg.Validate_Project_Plan_Type(
3070: p_project_id => l_project_id
3071: ,p_budget_type_code => attached_plan_types_rec.budget_type_code
3072: ,x_validation_status => l_validation_status
3073: ,x_return_status => l_return_status

Line 3093: pa_fp_upgrade_pkg.Validate_Project_Plan_Type(

3089: END IF;
3090:
3091: -- For each budget type fetched check for all the exceptions
3092:
3093: pa_fp_upgrade_pkg.Validate_Project_Plan_Type(
3094: p_project_id => l_project_id
3095: ,p_budget_type_code => attached_budget_types_rec.budget_type_code
3096: ,x_validation_status => l_validation_status
3097: ,x_return_status => l_return_status

Line 3126: pa_fp_upgrade_pkg.Validate_Budget_Version

3122: -- Perform budget_version level validations necessary for UPGRADE
3123: -- The only validation that was done in this api was for mixed resource planning level.
3124: -- This is not applicable for FP M and hence for FP M this api doesnt do any validation.
3125:
3126: pa_fp_upgrade_pkg.Validate_Budget_Version
3127: ( p_budget_version_id => budgets_for_upgrade_rec.budget_version_id
3128: ,x_return_status => l_return_status
3129: ,x_msg_count => l_msg_count
3130: ,x_msg_data => l_msg_data);

Line 3207: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'

3203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3204: x_msg_count := 1;
3205: x_msg_data := SQLERRM;
3206: FND_MSG_PUB.add_exc_msg
3207: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'
3208: ,p_procedure_name => 'validate_budgets'
3209: ,p_error_text => sqlerrm);
3210: IF p_pa_debug_mode = 'Y' THEN
3211: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;

Line 3260: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.VALIDATE_PROJECT');

3256: BEGIN
3257:
3258: x_msg_count := 0;
3259: x_return_status := FND_API.G_RET_STS_SUCCESS;
3260: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.VALIDATE_PROJECT');
3261: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3262: l_debug_mode := NVL(l_debug_mode, 'Y');
3263: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
3264:

Line 3332: pa_fp_upgrade_pkg.Insert_Audit_Record(

3328: x_validation_status := 'N';
3329:
3330: -- Insert into audit table
3331:
3332: pa_fp_upgrade_pkg.Insert_Audit_Record(
3333: p_project_id => p_project_id
3334: ,p_budget_type_code => NULL
3335: ,p_proj_fp_options_id => NULL
3336: ,p_fin_plan_option_level_code => PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PROJECT

Line 3386: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'

3382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3383: x_msg_count := 1;
3384: x_msg_data := SQLERRM;
3385: FND_MSG_PUB.add_exc_msg
3386: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'
3387: ,p_procedure_name => 'VALIDATE_PROJECT'
3388: ,p_error_text => sqlerrm);
3389: IF p_pa_debug_mode = 'Y' THEN
3390: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;

Line 3439: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.VALIDATE_PROJECT_PLAN_TYPE');

3435: BEGIN
3436:
3437: x_msg_count := 0;
3438: x_return_status := FND_API.G_RET_STS_SUCCESS;
3439: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.VALIDATE_PROJECT_PLAN_TYPE');
3440: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3441: l_debug_mode := NVL(l_debug_mode, 'Y');
3442: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
3443:

Line 3508: pa_fp_upgrade_pkg.Insert_Audit_Record(

3504: x_validation_status := 'N';
3505:
3506: -- Insert the exception into audit table
3507:
3508: pa_fp_upgrade_pkg.Insert_Audit_Record(
3509: p_project_id => p_project_id
3510: ,p_budget_type_code => p_budget_type_code
3511: ,p_proj_fp_options_id => NULL
3512: ,p_fin_plan_option_level_code => PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PLAN_TYPE

Line 3575: pa_fp_upgrade_pkg.Insert_Audit_Record(

3571:
3572: x_validation_status := 'N';
3573:
3574: -- Insert into audit table
3575: pa_fp_upgrade_pkg.Insert_Audit_Record(
3576: p_project_id => p_project_id
3577: ,p_budget_type_code => p_budget_type_code
3578: ,p_proj_fp_options_id => NULL
3579: ,p_fin_plan_option_level_code => PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PLAN_TYPE

Line 3630: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'

3626: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3627: x_msg_count := 1;
3628: x_msg_data := SQLERRM;
3629: FND_MSG_PUB.add_exc_msg
3630: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'
3631: ,p_procedure_name => 'VALIDATE_PROJECT_PLAN_TYPE'
3632: ,p_error_text => sqlerrm);
3633: IF p_pa_debug_mode = 'Y' THEN
3634: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;

Line 3687: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.validate_budget_version');

3683: BEGIN
3684:
3685: x_msg_count := 0;
3686: x_return_status := FND_API.G_RET_STS_SUCCESS;
3687: pa_debug.set_err_stack('PA_FP_UPGRADE_PKG.validate_budget_version');
3688: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3689: l_debug_mode := NVL(l_debug_mode, 'Y');
3690: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
3691:

Line 3757: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'

3753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3754: x_msg_count := 1;
3755: x_msg_data := SQLERRM;
3756: FND_MSG_PUB.add_exc_msg
3757: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'
3758: ,p_procedure_name => 'VALIDATE_BUDGET_VERSION'
3759: ,p_error_text => SQLERRM);
3760: IF p_pa_debug_mode = 'Y' THEN
3761: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;

Line 4321: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fp_upgrade_pkg'

4317: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4318: x_msg_count := 1;
4319: x_msg_data := SQLERRM;
4320:
4321: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fp_upgrade_pkg'
4322: ,p_procedure_name => 'Apply_Calculate_FPM_Rules l_stage'||l_stage);
4323:
4324: IF l_debug_mode = 'Y' THEN
4325: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

Line 4429: pa_debug.init_err_stack('PA_FP_UPGRADE_PKG.rollup_rejected_bl_amounts');

4425: x_msg_count := 0;
4426: x_return_status := FND_API.G_RET_STS_SUCCESS;
4427: savepoint rollup_rejected_bl_amounts;
4428:
4429: pa_debug.init_err_stack('PA_FP_UPGRADE_PKG.rollup_rejected_bl_amounts');
4430:
4431: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4432: l_debug_mode := NVL(l_debug_mode, 'Y');
4433: pa_debug.set_process('PLSQL','LOG',l_debug_mode);

Line 4738: pa_fp_upgrade_pkg.Insert_Audit_Record(

4734: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
4735: END IF;
4736:
4737:
4738: pa_fp_upgrade_pkg.Insert_Audit_Record(
4739: p_project_id => l_project_id
4740: ,p_budget_type_code => NULL
4741: ,p_proj_fp_options_id => NULL
4742: ,p_fin_plan_option_level_code => NULL

Line 4768: pa_fp_upgrade_pkg.Insert_Audit_Record(

4764: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
4765: END IF;
4766:
4767: rollback to rollup_bl_amounts_to_bv;
4768: pa_fp_upgrade_pkg.Insert_Audit_Record(
4769: p_project_id => l_project_id
4770: ,p_budget_type_code => NULL
4771: ,p_proj_fp_options_id => NULL
4772: ,p_fin_plan_option_level_code => NULL

Line 4795: pa_fp_upgrade_pkg.Insert_Audit_Record(

4791: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
4792: END IF;
4793:
4794: rollback to rollup_bl_amounts_to_bv;
4795: pa_fp_upgrade_pkg.Insert_Audit_Record(
4796: p_project_id => l_project_id
4797: ,p_budget_type_code => NULL
4798: ,p_proj_fp_options_id => NULL
4799: ,p_fin_plan_option_level_code => NULL

Line 4868: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'

4864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4865: x_msg_count := 1;
4866: x_msg_data := SQLERRM;
4867:
4868: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FP_UPGRADE_PKG'
4869: ,p_procedure_name => 'Rollup_rejected_bl_ampunts');
4870: IF p_pa_debug_mode = 'Y' THEN
4871: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4872: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

Line 4881: END pa_fp_upgrade_pkg;

4877: ROLLBACK TO rollup_rejected_bl_amounts;
4878: RAISE;
4879: END rollup_rejected_bl_amounts;
4880:
4881: END pa_fp_upgrade_pkg;