[Home] [Help]
74: when others then
75: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
76: x_msg_count := 1;
77: x_msg_data := SQLERRM;
78: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS',
79: p_procedure_name => 'Check_Record_Version_Number');
80: */
81: end Check_Record_Version_Number;
82:
781: EXCEPTION
782:
783: WHEN Invalid_Arg_Exc THEN
784:
785: l_msg_count := FND_MSG_PUB.count_msg;
786:
787: IF l_msg_count = 1 THEN
788:
789: PA_INTERFACE_UTILS_PUB.get_messages
817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
818: x_msg_count := 1;
819: x_msg_data := SQLERRM;
820:
821: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
822: ,p_procedure_name => 'GET_BASELINED_VERSION_INFO');
823:
824: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
825: IF P_PA_DEBUG_MODE = 'Y' THEN
1307: EXCEPTION
1308:
1309: WHEN Invalid_Arg_Exc THEN
1310:
1311: l_msg_count := FND_MSG_PUB.count_msg;
1312:
1313: IF l_msg_count = 1 THEN
1314:
1315: PA_INTERFACE_UTILS_PUB.get_messages
1344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1345: x_msg_count := 1;
1346: x_msg_data := SQLERRM;
1347:
1348: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
1349: ,p_procedure_name => 'Get_Curr_Working_Version_Info');
1350:
1351: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
1352: IF P_PA_DEBUG_MODE = 'Y' THEN
1465: EXCEPTION
1466:
1467: WHEN Invalid_Arg_Exc THEN
1468:
1469: l_msg_count := FND_MSG_PUB.count_msg;
1470:
1471: IF l_msg_count = 1 THEN
1472:
1473: PA_INTERFACE_UTILS_PUB.get_messages
1502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1503: x_msg_count := 1;
1504: x_msg_data := SQLERRM;
1505:
1506: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
1507: ,p_procedure_name => 'Get_Appr_Cost_Plan_Type_Info');
1508:
1509: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
1510: IF P_PA_DEBUG_MODE = 'Y' THEN
1619: EXCEPTION
1620:
1621: WHEN Invalid_Arg_Exc THEN
1622:
1623: l_msg_count := FND_MSG_PUB.count_msg;
1624:
1625: IF l_msg_count = 1 THEN
1626:
1627: PA_INTERFACE_UTILS_PUB.get_messages
1656: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1657: x_msg_count := 1;
1658: x_msg_data := SQLERRM;
1659:
1660: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
1661: ,p_procedure_name => 'Get_Appr_Rev_Plan_Type_Info');
1662:
1663: pa_debug.g_err_stage:='Unexpeted Error'||SQLERRM;
1664: IF P_PA_DEBUG_MODE = 'Y' THEN
2128: END IF;
2129: EXCEPTION
2130: WHEN Invalid_Arg_Exc THEN
2131:
2132: l_msg_count := FND_MSG_PUB.count_msg;
2133:
2134: IF l_msg_count = 1 THEN
2135:
2136: PA_INTERFACE_UTILS_PUB.get_messages
2162: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2163: x_message_count := 1;
2164: x_message_data := SQLERRM;
2165:
2166: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
2167: ,p_procedure_name => 'GET_OR_CREATE_AMOUNT_SET_ID');
2168:
2169: pa_debug.g_err_stage:='Unexpected Error';
2170: IF P_PA_DEBUG_MODE = 'Y' THEN
2283: END IF;
2284: EXCEPTION
2285: WHEN Invalid_Arg_Exc THEN
2286:
2287: l_msg_count := FND_MSG_PUB.count_msg;
2288:
2289: IF l_msg_count = 1 THEN
2290:
2291: PA_INTERFACE_UTILS_PUB.get_messages
2317: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2318: x_message_count := 1;
2319: x_message_data := SQLERRM;
2320:
2321: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
2322: ,p_procedure_name => 'GET_PLAN_AMOUNT_FLAGS');
2323:
2324: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
2325: IF P_PA_DEBUG_MODE = 'Y' THEN
2488: EXCEPTION
2489:
2490: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
2491:
2492: l_msg_count := FND_MSG_PUB.count_msg;
2493:
2494: IF l_msg_count = 1 THEN
2495:
2496: PA_INTERFACE_UTILS_PUB.get_messages
2527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2528: x_msg_count := 1;
2529: x_msg_data := SQLERRM;
2530:
2531: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_UTILS'
2532: ,p_procedure_name => 'Get_Peceding_Suceeding_Pd_Info');
2533:
2534: pa_debug.g_err_stage:='Unexpected Error';
2535: IF P_PA_DEBUG_MODE = 'Y' THEN
2649: EXCEPTION
2650:
2651: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
2652:
2653: l_msg_count := FND_MSG_PUB.count_msg;
2654:
2655: IF l_msg_count = 1 THEN
2656:
2657: PA_INTERFACE_UTILS_PUB.get_messages
2688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2689: x_msg_count := 1;
2690: x_msg_data := SQLERRM;
2691:
2692: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_UTILS'
2693: ,p_procedure_name => 'Get_Element_Proj_PF_Amounts');
2694:
2695: pa_debug.g_err_stage:='Unexpected Error';
2696: IF P_PA_DEBUG_MODE = 'Y' THEN
2774: EXCEPTION
2775: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN -- Bug 2770562
2776:
2777: x_return_status := FND_API.G_RET_STS_ERROR;
2778: l_msg_count := FND_MSG_PUB.count_msg;
2779:
2780: IF l_msg_count = 1 and x_msg_data IS NULL THEN
2781: PA_INTERFACE_UTILS_PUB.get_messages
2782: (p_encoded => FND_API.G_TRUE
2808: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2809: p_msg_name => 'PA_FP_VERSION_NAME_AMBIGOUS');
2810: x_budget_version_id := NULL;
2811: WHEN OTHERS THEN
2812: FND_MSG_PUB.ADD_EXC_MSG (p_pkg_name => 'PA_FIN_PLAN_UTILS',
2813: p_procedure_name => pa_debug.g_err_stack );
2814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2815: x_msg_data := SQLERRM;
2816: x_budget_version_id := NULL;
2894: x_msg_count := 1;
2895: x_msg_data := 'PA_FP_CURR_INVALID';
2896: x_txn_currency_code := NULL;
2897: WHEN OTHERS THEN
2898: fnd_msg_pub.add_exc_msg
2899: (p_pkg_name => 'PA_FIN_PLAN_UTILS',
2900: p_procedure_name => pa_debug.g_err_stack );
2901: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2902: x_txn_currency_code := NULL;
2990: end if;
2991: WHEN OTHERS THEN
2992: x_task_id := NULL;
2993: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2994: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
2995: p_procedure_name => 'check_task_name_or_id');
2996: RAISE;
2997: END check_task_name_or_id;
2998:
3081: end if;
3082: WHEN Invalid_Call_Exc THEN /* Changes for FP.M, Tracking Bug No - 3354518, Adding Exception handling block for Invalid_Call_Exc */
3083: x_resource_id := NULL;
3084: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3085: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3086: p_procedure_name => 'check_resource_gp_name_or_id');
3087: RAISE;
3088: WHEN OTHERS THEN
3089: x_resource_id := NULL;
3087: RAISE;
3088: WHEN OTHERS THEN
3089: x_resource_id := NULL;
3090: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3091: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3092: p_procedure_name => 'check_resource_gp_name_or_id');
3093: RAISE;
3094: END check_resource_gp_name_or_id;
3095:
3164: end if;
3165: WHEN OTHERS THEN
3166: x_resource_id := NULL;
3167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3168: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3169: p_procedure_name => 'check_resource_name_or_id');
3170: RAISE;
3171: END check_resource_name_or_id;
3172:
3271: RETURN(l_amount_type_id);
3272:
3273: EXCEPTION
3274: WHEN OTHERS THEN
3275: FND_MSG_PUB.add_exc_msg(
3276: p_pkg_name => 'pa_fin_plan_utils.get_amttype_id'
3277: ,p_procedure_name => PA_DEBUG.G_Err_Stack);
3278:
3279: IF P_PA_DEBUG_MODE = 'Y' THEN
3370: end if; -- invalid budget_version_id
3371: close budget_csr;
3372:
3373: /* If There are ANY Business Rules Violations , Then Do NOT Proceed: RETURN */
3374: l_msg_count := FND_MSG_PUB.count_msg;
3375: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3376: IF P_PA_DEBUG_MODE = 'Y' THEN
3377: pa_debug.g_err_stage := 'l_msg_count = ' || l_msg_count;
3378: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
3439: END IF;
3440: EXCEPTION
3441: WHEN OTHERS THEN
3442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3443: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3444: p_procedure_name => 'Check_Locked_By_User');
3445: IF P_PA_DEBUG_MODE = 'Y' THEN
3446: pa_debug.reset_err_stack;
3447: END IF;
3520: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3521: IF P_PA_DEBUG_MODE = 'Y' THEN
3522: pa_debug.write_file('Check_Both_Locked_By_User: ' || 'Check_Locked_By_User_Exception reached');
3523: END IF;
3524: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3525: p_procedure_name => 'Check_Both_Locked_By_User');
3526: WHEN OTHERS THEN
3527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3528: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3524: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3525: p_procedure_name => 'Check_Both_Locked_By_User');
3526: WHEN OTHERS THEN
3527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3528: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3529: p_procedure_name => 'Check_Both_Locked_By_User');
3530: RAISE;
3531:
3532: END Check_Both_Locked_By_User;
3700: END IF;
3701: EXCEPTION
3702: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3703:
3704: l_msg_count := FND_MSG_PUB.count_msg;
3705:
3706: IF l_msg_count = 1 THEN
3707:
3708: PA_INTERFACE_UTILS_PUB.get_messages
3739: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3740: x_msg_count := 1;
3741: x_msg_data := SQLERRM;
3742:
3743: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_UTILS'
3744: ,p_procedure_name => 'Get_Resource_List_Info');
3745:
3746: pa_debug.g_err_stage:='Unexpected Error';
3747: IF P_PA_DEBUG_MODE = 'Y' THEN
3836: END IF;
3837: EXCEPTION
3838: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3839:
3840: l_msg_count := FND_MSG_PUB.count_msg;
3841:
3842: IF l_msg_count = 1 THEN
3843:
3844: PA_INTERFACE_UTILS_PUB.get_messages
3875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3876: x_msg_count := 1;
3877: x_msg_data := SQLERRM;
3878:
3879: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_UTILS'
3880: ,p_procedure_name => 'Get_Resource_List_Info');
3881:
3882: pa_debug.g_err_stage:='Unexpected Error';
3883: IF P_PA_DEBUG_MODE = 'Y' THEN
4129: EXCEPTION
4130:
4131: WHEN Invalid_Arg_Exc THEN
4132:
4133: l_msg_count := FND_MSG_PUB.count_msg;
4134:
4135: IF l_msg_count = 1 THEN
4136:
4137: PA_INTERFACE_UTILS_PUB.get_messages
4165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4166: x_msg_count := 1;
4167: x_msg_data := SQLERRM;
4168:
4169: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
4170: ,p_procedure_name => 'Is_AC_PT_Attached_After_UPG');
4171:
4172: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4173: IF P_PA_DEBUG_MODE = 'Y' THEN
4311: EXCEPTION
4312:
4313: WHEN Invalid_Arg_Exc THEN
4314:
4315: l_msg_count := FND_MSG_PUB.count_msg;
4316:
4317: IF l_msg_count = 1 THEN
4318:
4319: PA_INTERFACE_UTILS_PUB.get_messages
4348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4349: x_msg_count := 1;
4350: x_msg_data := SQLERRM;
4351:
4352: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
4353: ,p_procedure_name => 'Is_AR_PT_Attached_After_UPG');
4354:
4355: pa_debug.g_err_stage:='Unexpeted Error'||SQLERRM;
4356: IF P_PA_DEBUG_MODE = 'Y' THEN
4527: END IF;
4528: EXCEPTION
4529: WHEN Invalid_Arg_Exc THEN
4530:
4531: l_msg_count := FND_MSG_PUB.count_msg;
4532: IF l_msg_count = 1 THEN
4533: PA_INTERFACE_UTILS_PUB.get_messages
4534: (p_encoded => FND_API.G_TRUE
4535: ,p_msg_index => 1
4554:
4555: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4556: x_msg_count := 1;
4557: x_msg_data := SQLERRM;
4558: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
4559: ,p_procedure_name => 'Get_Budget_Version_Number');
4560: pa_debug.g_err_stage:='Unexpeted Error'||SQLERRM;
4561: IF P_PA_DEBUG_MODE = 'Y' THEN
4562: pa_debug.write('Get_Max_Budget_Version_Number: ' || l_module_name,pa_debug.g_err_stage,5);
4798: EXCEPTION
4799:
4800: WHEN PA_FP_ELEMENTS_PUB.Invalid_Arg_Exc THEN
4801:
4802: l_msg_count := FND_MSG_PUB.count_msg;
4803: IF l_msg_count = 1 THEN
4804: PA_INTERFACE_UTILS_PUB.get_messages
4805: (p_encoded => FND_API.G_TRUE
4806: ,p_msg_index => 1
4827:
4828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4829: x_msg_count := 1;
4830: x_msg_data := SQLERRM;
4831: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
4832: ,p_procedure_name => 'GET_COST_BASE_VERSION_INFO');
4833: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
4834: IF P_PA_DEBUG_MODE = 'Y' THEN
4835: pa_debug.write('GET_COST_BASE_VERSION_INFO: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
5000: EXCEPTION
5001:
5002: WHEN PA_FP_ELEMENTS_PUB.Invalid_Arg_Exc THEN
5003:
5004: l_msg_count := FND_MSG_PUB.count_msg;
5005: IF l_msg_count = 1 THEN
5006: PA_INTERFACE_UTILS_PUB.get_messages
5007: (p_encoded => FND_API.G_TRUE
5008: ,p_msg_index => 1
5029:
5030: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5031: x_msg_count := 1;
5032: x_msg_data := SQLERRM;
5033: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
5034: ,p_procedure_name => 'GET_REV_BASE_VERSION_INFO');
5035: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
5036: IF P_PA_DEBUG_MODE = 'Y' THEN
5037: pa_debug.write('GET_REV_BASE_VERSION_INFO: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
5209:
5210: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
5211:
5212: x_return_status := FND_API.G_RET_STS_ERROR;
5213: l_msg_count := FND_MSG_PUB.count_msg;
5214: IF l_msg_count = 1 THEN
5215: PA_INTERFACE_UTILS_PUB.get_messages
5216: (p_encoded => FND_API.G_TRUE
5217: ,p_msg_index => 1
5236:
5237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5238: x_msg_count := 1;
5239: x_msg_data := SQLERRM;
5240: FND_MSG_PUB.add_exc_msg
5241: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
5242: ,p_procedure_name => 'conv_est_amounts_of_ci_version'
5243: ,p_error_text => sqlerrm);
5244: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
5571:
5572: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
5573:
5574: x_return_status := FND_API.G_RET_STS_ERROR;
5575: l_msg_count := FND_MSG_PUB.count_msg;
5576: IF l_msg_count = 1 THEN
5577: PA_INTERFACE_UTILS_PUB.get_messages
5578: (p_encoded => FND_API.G_TRUE
5579: ,p_msg_index => 1
5595:
5596: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5597: x_msg_count := 1;
5598: x_msg_data := SQLERRM;
5599: FND_MSG_PUB.add_exc_msg
5600: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
5601: ,p_procedure_name => 'Get_Period_Details'
5602: ,p_error_text => SQLERRM);
5603: IF p_pa_debug_mode = 'Y' THEN
5830:
5831: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
5832:
5833: x_return_status := FND_API.G_RET_STS_ERROR;
5834: l_msg_count := FND_MSG_PUB.count_msg;
5835: IF l_msg_count = 1 THEN
5836: PA_INTERFACE_UTILS_PUB.get_messages
5837: (p_encoded => FND_API.G_TRUE
5838: ,p_msg_index => 1
5855:
5856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5857: x_msg_count := 1;
5858: x_msg_data := SQLERRM;
5859: FND_MSG_PUB.add_exc_msg
5860: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
5861: ,p_procedure_name => 'Get_Shifted_Period'
5862: ,p_error_text => SQLERRM);
5863: IF p_pa_debug_mode = 'Y' THEN
6124: RAISE;
6125:
6126: WHEN others THEN
6127:
6128: FND_MSG_PUB.add_exc_msg
6129: ( p_pkg_name => 'Pa_Fin_Plan_Utils'
6130: ,p_procedure_name => 'Get_Approved_Budget_Ver_Qty'
6131: ,p_error_text => sqlerrm);
6132:
6312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6313: x_msg_count := 1;
6314: x_msg_data := SQLERRM;
6315:
6316: FND_MSG_PUB.add_exc_msg
6317: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
6318: ,p_procedure_name => 'validate_input_params'
6319: ,p_error_text => sqlerrm);
6320:
6635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6636: x_msg_count := 1;
6637: x_msg_data := SQLERRM;
6638:
6639: FND_MSG_PUB.add_exc_msg
6640: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
6641: ,p_procedure_name => 'VALIDATE_CONV_ATTRIBUTES'
6642: ,p_error_text => sqlerrm);
6643:
7091: END IF;
7092: EXCEPTION
7093: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
7094: x_return_status := FND_API.G_RET_STS_ERROR;
7095: l_msg_count := FND_MSG_PUB.count_msg;
7096: IF l_msg_count = 1 THEN
7097: PA_INTERFACE_UTILS_PUB.get_messages
7098: (p_encoded => FND_API.G_TRUE,
7099: p_msg_index => 1,
7116: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7117: x_msg_count := 1;
7118: x_msg_data := SQLERRM;
7119:
7120: FND_MSG_PUB.add_exc_msg
7121: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
7122: ,p_procedure_name => 'VALIDATE_CURRENCY_ATTRIBUTES'
7123: ,p_error_text => sqlerrm);
7124:
7233:
7234: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
7235:
7236: x_return_status := FND_API.G_RET_STS_ERROR;
7237: l_msg_count := FND_MSG_PUB.count_msg;
7238:
7239: IF l_msg_count = 1 and x_msg_data IS NULL THEN
7240: PA_INTERFACE_UTILS_PUB.get_messages
7241: (p_encoded => FND_API.G_TRUE
7259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7260: x_msg_count := 1;
7261: x_msg_data := SQLERRM;
7262:
7263: FND_MSG_PUB.add_exc_msg
7264: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
7265: ,p_procedure_name => 'GET_PLAN_TYPE_OPTS_FOR_VER'
7266: ,p_error_text => x_msg_data);
7267:
7362:
7363: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
7364:
7365: x_return_status := FND_API.G_RET_STS_ERROR;
7366: l_msg_count := FND_MSG_PUB.count_msg;
7367: IF l_msg_count = 1 THEN
7368: PA_INTERFACE_UTILS_PUB.get_messages
7369: (p_encoded => FND_API.G_TRUE
7370: ,p_msg_index => 1
7385:
7386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7387: x_msg_count := 1;
7388: x_msg_data := SQLERRM;
7389: FND_MSG_PUB.add_exc_msg
7390: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
7391: ,p_procedure_name => 'Get_Project_Curr_Attributes'
7392: ,p_error_text => SQLERRM);
7393: IF p_pa_debug_mode = 'Y' THEN
7492:
7493: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
7494:
7495: x_return_status := FND_API.G_RET_STS_ERROR;
7496: l_msg_count := FND_MSG_PUB.count_msg;
7497:
7498: IF autobaseline_appr_rev_info_cur%ISOPEN THEN
7499: CLOSE autobaseline_appr_rev_info_cur;
7500: END IF;
7526: IF autobaseline_appr_rev_info_cur%ISOPEN THEN
7527: CLOSE autobaseline_appr_rev_info_cur;
7528: END IF;
7529:
7530: FND_MSG_PUB.add_exc_msg
7531: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
7532: ,p_procedure_name => 'IsRevVersionCreationAllowed'
7533: ,p_error_text => x_msg_data);
7534:
7632:
7633: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
7634:
7635: x_return_status := FND_API.G_RET_STS_ERROR;
7636: l_msg_count := FND_MSG_PUB.count_msg;
7637:
7638: IF lookups_cur%ISOPEN THEN
7639: close lookups_cur;
7640: END IF;
7666: IF lookups_cur%ISOPEN THEN
7667: close lookups_cur;
7668: END IF;
7669:
7670: FND_MSG_PUB.add_exc_msg
7671: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
7672: ,p_procedure_name => 'GET_LOOKUP_CODE'
7673: ,p_error_text => x_msg_data);
7674:
7962: IF x_return_status IS NULL OR
7963: x_return_status = FND_API.G_RET_STS_SUCCESS THEN
7964: x_return_status := FND_API.G_RET_STS_ERROR;
7965: END IF;
7966: l_msg_count := FND_MSG_PUB.count_msg;
7967:
7968: IF l_msg_count = 1 and x_msg_data IS NULL THEN
7969: PA_INTERFACE_UTILS_PUB.get_messages
7970: (p_encoded => FND_API.G_TRUE
7988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7989: x_msg_count := 1;
7990: x_msg_data := SQLERRM;
7991:
7992: FND_MSG_PUB.add_exc_msg
7993: ( p_pkg_name => 'pa_fin_plan_utils'
7994: ,p_procedure_name => 'get_Version_type'
7995: ,p_error_text => x_msg_data);
7996:
8102: EXCEPTION
8103: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
8104:
8105: x_return_status := FND_API.G_RET_STS_ERROR;
8106: l_msg_count := FND_MSG_PUB.count_msg;
8107:
8108: IF l_msg_count = 1 and x_msg_data IS NULL THEN
8109: PA_INTERFACE_UTILS_PUB.get_messages
8110: (p_encoded => FND_API.G_TRUE
8128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8129: x_msg_count := 1;
8130: x_msg_data := SQLERRM;
8131:
8132: FND_MSG_PUB.add_exc_msg
8133: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
8134: ,p_procedure_name => 'get_version_id'
8135: ,p_error_text => x_msg_data);
8136:
8256: EXCEPTION
8257: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
8258:
8259: x_return_status := FND_API.G_RET_STS_ERROR;
8260: l_msg_count := FND_MSG_PUB.count_msg;
8261:
8262: IF l_msg_count = 1 and x_msg_data IS NULL THEN
8263: PA_INTERFACE_UTILS_PUB.get_messages
8264: (p_encoded => FND_API.G_TRUE
8282: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8283: x_msg_count := 1;
8284: x_msg_data := SQLERRM;
8285:
8286: FND_MSG_PUB.add_exc_msg
8287: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
8288: ,p_procedure_name => 'perform_autobasline_checks'
8289: ,p_error_text => x_msg_data);
8290:
8369:
8370: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
8371:
8372: x_return_status := FND_API.G_RET_STS_ERROR;
8373: l_msg_count := FND_MSG_PUB.count_msg;
8374: IF l_msg_count = 1 THEN
8375: PA_INTERFACE_UTILS_PUB.get_messages
8376: (p_encoded => FND_API.G_TRUE
8377: ,p_msg_index => 1
8392:
8393: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8394: x_msg_count := 1;
8395: x_msg_data := SQLERRM;
8396: FND_MSG_PUB.add_exc_msg
8397: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
8398: ,p_procedure_name => 'get_version_type_for_bdgt_type'
8399: ,p_error_text => sqlerrm);
8400: IF p_pa_debug_mode = 'Y' THEN
8421: -- and then logs out and logs back in as a different
8422: -- user to test second user-locked error in this api, the previous
8423: -- submit error improperly reappears.
8424: --
8425: -- FND_MSG_PUB.initialize seemed to address this issue.
8426: --
8427: -- 3) Sometimes, but not always, passing G_TRUE for the
8428: -- non-encoded (no-token) submit message appeared to
8429: -- result in a "null" being rendered on the attachments
8500: BEGIN
8501:
8502: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
8503:
8504: FND_MSG_PUB.initialize;
8505:
8506: IF l_debug_mode = 'Y' THEN
8507: pa_debug.Set_Curr_Function
8508: ( p_function => l_module_name,
8543:
8544: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8545: p_msg_name => 'PA_FP_ATTACH_SUBMITTED');
8546:
8547: l_msg_count := FND_MSG_PUB.Count_Msg;
8548:
8549: -- bug 2955756 --------------------------------------
8550:
8551: PA_INTERFACE_UTILS_PUB.get_messages
8594:
8595: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8596: p_msg_name => 'PA_FP_SUBMITTED_VERSION');
8597:
8598: l_msg_count := FND_MSG_PUB.Count_Msg;
8599:
8600: PA_INTERFACE_UTILS_PUB.get_messages
8601: (p_encoded => FND_API.G_FALSE
8602: ,p_msg_index => 1
8635: PA_UTILS.ADD_MESSAGE
8636: ( p_app_short_name => 'PA',
8637: p_msg_name => 'PA_FP_ATTACH_LOCKED_BY_PRC');
8638:
8639: l_msg_count := FND_MSG_PUB.Count_Msg;
8640:
8641: PA_INTERFACE_UTILS_PUB.get_messages
8642: (p_encoded => FND_API.G_FALSE
8643: ,p_msg_index => 1
8657: PA_UTILS.ADD_MESSAGE
8658: ( p_app_short_name => 'PA',
8659: p_msg_name => 'PA_FP_LOCKED_BY_PROCESSING');
8660:
8661: l_msg_count := FND_MSG_PUB.Count_Msg;
8662:
8663: PA_INTERFACE_UTILS_PUB.get_messages
8664: (p_encoded => FND_API.G_FALSE
8665: ,p_msg_index => 1
8715: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8716: p_msg_name => 'PA_FP_ATTACH_LOCKED_BY_USER');
8717: */
8718:
8719: l_msg_count := FND_MSG_PUB.Count_Msg;
8720:
8721:
8722: -- bug 2955756 --------------------------------------
8723:
8750: end if;
8751: */
8752:
8753: /*
8754: x_msg_count := FND_MSG_PUB.Count_Msg;
8755: if x_msg_count = 1 then
8756: PA_INTERFACE_UTILS_PUB.get_messages
8757: (p_encoded => FND_API.G_TRUE,
8758: p_msg_index => 1,
8768: PA_UTILS.ADD_MESSAGE
8769: ( p_app_short_name => 'PA',
8770: p_msg_name => 'PA_FP_LOCKED_BY_USER');
8771:
8772: l_msg_count := FND_MSG_PUB.Count_Msg;
8773:
8774: PA_INTERFACE_UTILS_PUB.get_messages
8775: (p_encoded => FND_API.G_FALSE
8776: ,p_msg_index => 1
8829: WHEN OTHERS THEN
8830: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8831: x_msg_count := 1;
8832: x_msg_data := SQLERRM;
8833: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_utils',
8834: p_procedure_name => 'validate_editable_bv');
8835: IF P_PA_DEBUG_MODE = 'Y' THEN
8836: pa_debug.reset_err_stack;
8837: END IF;
8865: PA_UTILS.ADD_MESSAGE
8866: ( p_app_short_name => 'PA',
8867: p_msg_name => 'PA_FP_PLAN_TYPE_NON_EDITABLE');
8868:
8869: l_msg_count := FND_MSG_PUB.Count_Msg;
8870:
8871: PA_INTERFACE_UTILS_PUB.get_messages
8872: (p_encoded => FND_API.G_TRUE
8873: ,p_msg_index => 1
8913: WHEN NO_DATA_FOUND THEN
8914: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8915: x_msg_count := 1;
8916: x_msg_data := SQLERRM;
8917: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_utils',
8918: p_procedure_name => 'validate_editable_bv');
8919: IF P_PA_DEBUG_MODE = 'Y' THEN
8920: pa_debug.reset_err_stack;
8921: END IF;
8923: WHEN OTHERS THEN
8924: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8925: x_msg_count := 1;
8926: x_msg_data := SQLERRM;
8927: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_utils',
8928: p_procedure_name => 'validate_editable_bv');
8929: IF P_PA_DEBUG_MODE = 'Y' THEN
8930: pa_debug.reset_err_stack;
8931: END IF;
9158:
9159: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
9160:
9161: x_return_status := FND_API.G_RET_STS_ERROR;
9162: l_msg_count := FND_MSG_PUB.count_msg;
9163:
9164: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9165: PA_INTERFACE_UTILS_PUB.get_messages
9166: (p_encoded => FND_API.G_TRUE
9181:
9182: WHEN FND_API.G_Exc_Error THEN
9183:
9184: x_return_status := FND_API.G_RET_STS_ERROR;
9185: l_msg_count := FND_MSG_PUB.count_msg;
9186:
9187: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9188: PA_INTERFACE_UTILS_PUB.get_messages
9189: (p_encoded => FND_API.G_TRUE
9207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9208: x_msg_count := 1;
9209: x_msg_data := SQLERRM;
9210:
9211: FND_MSG_PUB.add_exc_msg
9212: ( p_pkg_name => 'pa_fin_plan_utils'
9213: ,p_procedure_name => 'check_delete_task_ok'
9214: ,p_error_text => x_msg_data);
9215:
9304: ( p_app_short_name => 'PA',
9305: p_msg_name => 'PA_FP_REPARENT_ERR_TASK',
9306: p_token1 => 'TASK_NAME',
9307: p_value1 => l_task_name);
9308: l_msg_count := FND_MSG_PUB.count_msg;
9309: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9310: PA_INTERFACE_UTILS_PUB.get_messages
9311: (p_encoded => FND_API.G_TRUE,
9312: p_msg_index => 1,
9363: p_token1 => 'TASK_NAME',
9364: p_value1 => l_task_name,
9365: p_token2 => 'PARENT_TASK_NAME',
9366: p_value2 => l_old_parent_task_name);
9367: l_msg_count := FND_MSG_PUB.count_msg;
9368: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9369: PA_INTERFACE_UTILS_PUB.get_messages
9370: (p_encoded => FND_API.G_TRUE,
9371: p_msg_index => 1,
9422: -- p_token1 => 'TASK_NAME',
9423: -- p_value1 => l_task_name,
9424: p_token1 => 'PARENT_TASK_NAME',
9425: p_value1 => l_new_parent_task_name);
9426: l_msg_count := FND_MSG_PUB.count_msg;
9427: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9428: PA_INTERFACE_UTILS_PUB.get_messages
9429: (p_encoded => FND_API.G_TRUE,
9430: p_msg_index => 1,
9447: END IF;
9448: EXCEPTION
9449: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
9450: x_return_status := FND_API.G_RET_STS_ERROR;
9451: l_msg_count := FND_MSG_PUB.count_msg;
9452: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9453: PA_INTERFACE_UTILS_PUB.get_messages
9454: (p_encoded => FND_API.G_TRUE
9455: ,p_msg_index => 1
9469: WHEN others THEN
9470: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9471: x_msg_count := 1;
9472: x_msg_data := SQLERRM;
9473: FND_MSG_PUB.add_exc_msg
9474: ( p_pkg_name => 'pa_fin_plan_utils'
9475: ,p_procedure_name => 'check_reparent_task_ok'
9476: ,p_error_text => x_msg_data);
9477: IF l_debug_mode = 'Y' THEN
9802:
9803:
9804: BEGIN
9805:
9806: FND_MSG_PUB.initialize;
9807: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
9808: l_debug_mode := NVL(l_debug_mode, 'Y');
9809: IF P_PA_DEBUG_MODE = 'Y' THEN
9810: pa_debug.set_curr_function( p_function => 'Check_if_plan_type_editable',
9904: END IF;
9905: EXCEPTION
9906:
9907: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
9908: l_msg_count := FND_MSG_PUB.count_msg;
9909: IF l_msg_count = 1 THEN
9910: PA_INTERFACE_UTILS_PUB.get_messages
9911: (p_encoded => FND_API.G_TRUE
9912: ,p_msg_index => 1
9930: WHEN Others THEN
9931: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9932: x_msg_count := 1;
9933: x_msg_data := SQLERRM;
9934: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
9935: ,p_procedure_name => 'CHECK_IF_PLAN_TYPE_EDITABLE');
9936: IF P_PA_DEBUG_MODE = 'Y' THEN
9937: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
9938: pa_debug.write('Check_if_plan_type_editable: ' || l_module_name,pa_debug.g_err_stage,5);
9967: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
9968: p_msg_name => 'PA_INVALID_END_DATE');
9969: END IF;
9970:
9971: l_msg_count := FND_MSG_PUB.count_msg;
9972:
9973: IF l_msg_count > 0 THEN
9974: IF l_msg_count = 1 THEN
9975: PA_INTERFACE_UTILS_PUB.get_messages
9993: WHEN OTHERS THEN
9994: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9995: x_msg_count := 1;
9996: x_msg_data := SQLERRM;
9997: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS',
9998: p_procedure_name => 'end_date_active_val');
9999: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10000: END End_date_active_val;
10001:
10179:
10180: EXCEPTION
10181:
10182: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10183: l_msg_count := FND_MSG_PUB.count_msg;
10184: IF l_msg_count = 1 THEN
10185: PA_INTERFACE_UTILS_PUB.get_messages
10186: (p_encoded => FND_API.G_TRUE
10187: ,p_msg_index => 1
10211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10212: x_msg_count := 1;
10213: x_msg_data := SQLERRM;
10214:
10215: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
10216: ,p_procedure_name => 'Get_Curr_Original_Version_Info');
10217:
10218: IF l_debug_mode = 'Y' THEN
10219: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
10352: END IF;
10353: EXCEPTION
10354:
10355: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10356: l_msg_count := FND_MSG_PUB.count_msg;
10357: IF l_msg_count = 1 THEN
10358: PA_INTERFACE_UTILS_PUB.get_messages
10359: (p_encoded => FND_API.G_TRUE
10360: ,p_msg_index => 1
10383: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10384: x_msg_count := 1;
10385: x_msg_data := SQLERRM;
10386:
10387: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
10388: ,p_procedure_name => 'GET_ACTUAL_AMTS_THRU_PERIOD');
10389:
10390: IF l_debug_mode = 'Y' THEN
10391: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
10648: END IF;
10649: EXCEPTION
10650:
10651: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10652: l_msg_count := FND_MSG_PUB.count_msg;
10653: IF l_msg_count = 1 THEN
10654: PA_INTERFACE_UTILS_PUB.get_messages
10655: (p_encoded => FND_API.G_TRUE
10656: ,p_msg_index => 1
10679: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10680: x_msg_count := 1;
10681: x_msg_data := SQLERRM;
10682:
10683: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
10684: ,p_procedure_name => 'IS_WP_RL_UPDATEABLE');
10685:
10686: IF l_debug_mode = 'Y' THEN
10687: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
10773: END IF;
10774: EXCEPTION
10775:
10776: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10777: l_msg_count := FND_MSG_PUB.count_msg;
10778: IF l_msg_count = 1 THEN
10779: PA_INTERFACE_UTILS_PUB.get_messages
10780: (p_encoded => FND_API.G_TRUE
10781: ,p_msg_index => 1
10803: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10804: x_msg_count := 1;
10805: x_msg_data := SQLERRM;
10806:
10807: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
10808: ,p_procedure_name => 'IS_PRI_FCST_COST_PT_ATTACHED');
10809:
10810: IF l_debug_mode = 'Y' THEN
10811: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
10895: END IF;
10896: EXCEPTION
10897:
10898: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10899: l_msg_count := FND_MSG_PUB.count_msg;
10900: IF l_msg_count = 1 THEN
10901: PA_INTERFACE_UTILS_PUB.get_messages
10902: (p_encoded => FND_API.G_TRUE
10903: ,p_msg_index => 1
10925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10926: x_msg_count := 1;
10927: x_msg_data := SQLERRM;
10928:
10929: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
10930: ,p_procedure_name => 'IS_PRI_FCST_REV_PT_ATTACHED');
10931:
10932: IF l_debug_mode = 'Y' THEN
10933: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
11147: pa_debug.reset_curr_function;
11148: END IF;
11149: EXCEPTION
11150: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
11151: l_msg_count := FND_MSG_PUB.count_msg;
11152:
11153: IF l_msg_count = 1 and x_msg_data IS NULL THEN
11154: PA_INTERFACE_UTILS_PUB.get_messages
11155: (p_encoded => FND_API.G_TRUE
11173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11174: x_msg_count := 1;
11175: x_msg_data := SQLERRM;
11176:
11177: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
11178: ,p_procedure_name => 'GET_CURR_WORKING_VERSION_IDS');
11179: IF P_PA_DEBUG_MODE = 'Y' THEN
11180: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
11181: pa_debug.write(l_mod_name,pa_debug.g_err_stage,l_debug_level5);
11417: pa_debug.reset_curr_function;
11418: END IF;
11419: EXCEPTION
11420: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
11421: l_msg_count := FND_MSG_PUB.count_msg;
11422:
11423: IF l_msg_count = 1 and x_msg_data IS NULL THEN
11424: PA_INTERFACE_UTILS_PUB.get_messages
11425: (p_encoded => FND_API.G_TRUE
11444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11445: x_msg_count := 1;
11446: x_msg_data := SQLERRM;
11447:
11448: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
11449: ,p_procedure_name => 'GET_PROJ_IMPACT_AMOUNTS');
11450: IF P_PA_DEBUG_MODE = 'Y' THEN
11451: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
11452: pa_debug.write(l_mod_name,pa_debug.g_err_stage,l_debug_level5);
11761: pa_debug.reset_curr_function;
11762: END IF;
11763: EXCEPTION
11764: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
11765: l_msg_count := FND_MSG_PUB.count_msg;
11766:
11767: IF l_msg_count = 1 and x_msg_data IS NULL THEN
11768: PA_INTERFACE_UTILS_PUB.get_messages
11769: (p_encoded => FND_API.G_TRUE
11788: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11789: x_msg_count := 1;
11790: x_msg_data := SQLERRM;
11791:
11792: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
11793: ,p_procedure_name => 'GET_SUMMARY_AMOUNTS');
11794: IF P_PA_DEBUG_MODE = 'Y' THEN
11795: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
11796: pa_debug.write(l_mod_name,pa_debug.g_err_stage,l_debug_level5);
12089: RETURN is_valid_flag;
12090:
12091: EXCEPTION
12092: WHEN OTHERS THEN
12093: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
12094: ,p_procedure_name => 'Validate_Uncheck_MC_Flag');
12095: IF P_PA_DEBUG_MODE = 'Y' THEN
12096: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
12097: pa_debug.write(l_mod_name,pa_debug.g_err_stage,l_debug_level5);
12236:
12237: EXCEPTION
12238: WHEN Others THEN
12239:
12240: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
12241: ,p_procedure_name => 'Check_delete_txn_cur_ok');
12242:
12243: IF P_PA_DEBUG_MODE = 'Y' THEN
12244: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
12317:
12318: EXCEPTION
12319: WHEN Others THEN
12320:
12321: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
12322: ,p_procedure_name => 'check_if_amounts_exist_for_wp');
12323:
12324: IF P_PA_DEBUG_MODE = 'Y' THEN
12325: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
12399:
12400: EXCEPTION
12401: WHEN Others THEN
12402:
12403: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
12404: ,p_procedure_name => 'check_if_task_asgmts_exist');
12405:
12406: IF P_PA_DEBUG_MODE = 'Y' THEN
12407: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
12485:
12486: EXCEPTION
12487: WHEN Others THEN
12488:
12489: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
12490: ,p_procedure_name => 'check_if_amounts_exist_for_fp');
12491:
12492: IF P_PA_DEBUG_MODE = 'Y' THEN
12493: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
12846: END IF;
12847: EXCEPTION
12848:
12849: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
12850: l_msg_count := FND_MSG_PUB.count_msg;
12851: IF l_msg_count = 1 THEN
12852: PA_INTERFACE_UTILS_PUB.get_messages
12853: (p_encoded => FND_API.G_TRUE
12854: ,p_msg_index => 1
12876: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12877: x_msg_count := 1;
12878: x_msg_data := SQLERRM;
12879:
12880: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_utils'
12881: ,p_procedure_name => 'return_and_vldt_plan_prc_code');
12882:
12883: IF l_debug_mode = 'Y' THEN
12884: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
13106: END IF;
13107:
13108: EXCEPTION
13109: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
13110: l_msg_count := FND_MSG_PUB.count_msg;
13111: IF l_msg_count = 1 THEN
13112: PA_INTERFACE_UTILS_PUB.get_messages
13113: (p_encoded => FND_API.G_TRUE
13114: ,p_msg_index => 1
13120: IF l_debug_mode = 'Y' THEN
13121: pa_debug.reset_curr_function;
13122: END IF;
13123: WHEN OTHERS THEN
13124: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PAFPWAUB'
13125: ,p_procedure_name => 'return_struct_ver_info');
13126:
13127: IF l_debug_mode = 'Y' THEN
13128: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
13500: EXCEPTION
13501:
13502: WHEN Invalid_Arg_Exc THEN
13503:
13504: l_msg_count := FND_MSG_PUB.count_msg;
13505:
13506: IF l_msg_count = 1 THEN
13507:
13508: PA_INTERFACE_UTILS_PUB.get_messages
13538: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13539: p_msg_count := 1;
13540: p_msg_data := SQLERRM;
13541:
13542: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
13543: ,p_procedure_name => 'create_draft_budget_wrp');
13544:
13545: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
13546: IF P_PA_DEBUG_MODE = 'Y' THEN