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.3 2008/09/25 23:01:32 jngeorge 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.3 2008/09/25 23:01:32 jngeorge 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 2818: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_UPGRADE_PKG'

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

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

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

Line 3036: pa_fp_upgrade_pkg.Validate_Project(

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

Line 3068: pa_fp_upgrade_pkg.Validate_Project_Plan_Type(

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

Line 3092: pa_fp_upgrade_pkg.Validate_Project_Plan_Type(

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

Line 3125: pa_fp_upgrade_pkg.Validate_Budget_Version

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

Line 3206: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'

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

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

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

Line 3331: pa_fp_upgrade_pkg.Insert_Audit_Record(

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

Line 3385: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'

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

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

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

Line 3507: pa_fp_upgrade_pkg.Insert_Audit_Record(

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

Line 3574: pa_fp_upgrade_pkg.Insert_Audit_Record(

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

Line 3629: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'

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

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

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

Line 3756: ( p_pkg_name => 'PA_FP_UPGRADE_PKG'

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

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

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

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

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

Line 4737: pa_fp_upgrade_pkg.Insert_Audit_Record(

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

Line 4767: pa_fp_upgrade_pkg.Insert_Audit_Record(

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

Line 4794: pa_fp_upgrade_pkg.Insert_Audit_Record(

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

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

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

Line 4880: END pa_fp_upgrade_pkg;

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