[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:
779: EXCEPTION
780:
781: WHEN Invalid_Arg_Exc THEN
782:
783: l_msg_count := FND_MSG_PUB.count_msg;
784:
785: IF l_msg_count = 1 THEN
786:
787: PA_INTERFACE_UTILS_PUB.get_messages
815: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
816: x_msg_count := 1;
817: x_msg_data := SQLERRM;
818:
819: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
820: ,p_procedure_name => 'GET_BASELINED_VERSION_INFO');
821:
822: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
823: IF P_PA_DEBUG_MODE = 'Y' THEN
1305: EXCEPTION
1306:
1307: WHEN Invalid_Arg_Exc THEN
1308:
1309: l_msg_count := FND_MSG_PUB.count_msg;
1310:
1311: IF l_msg_count = 1 THEN
1312:
1313: PA_INTERFACE_UTILS_PUB.get_messages
1342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1343: x_msg_count := 1;
1344: x_msg_data := SQLERRM;
1345:
1346: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
1347: ,p_procedure_name => 'Get_Curr_Working_Version_Info');
1348:
1349: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
1350: IF P_PA_DEBUG_MODE = 'Y' THEN
1463: EXCEPTION
1464:
1465: WHEN Invalid_Arg_Exc THEN
1466:
1467: l_msg_count := FND_MSG_PUB.count_msg;
1468:
1469: IF l_msg_count = 1 THEN
1470:
1471: PA_INTERFACE_UTILS_PUB.get_messages
1500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1501: x_msg_count := 1;
1502: x_msg_data := SQLERRM;
1503:
1504: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
1505: ,p_procedure_name => 'Get_Appr_Cost_Plan_Type_Info');
1506:
1507: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
1508: IF P_PA_DEBUG_MODE = 'Y' THEN
1617: EXCEPTION
1618:
1619: WHEN Invalid_Arg_Exc THEN
1620:
1621: l_msg_count := FND_MSG_PUB.count_msg;
1622:
1623: IF l_msg_count = 1 THEN
1624:
1625: PA_INTERFACE_UTILS_PUB.get_messages
1654: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1655: x_msg_count := 1;
1656: x_msg_data := SQLERRM;
1657:
1658: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
1659: ,p_procedure_name => 'Get_Appr_Rev_Plan_Type_Info');
1660:
1661: pa_debug.g_err_stage:='Unexpeted Error'||SQLERRM;
1662: IF P_PA_DEBUG_MODE = 'Y' THEN
2126: END IF;
2127: EXCEPTION
2128: WHEN Invalid_Arg_Exc THEN
2129:
2130: l_msg_count := FND_MSG_PUB.count_msg;
2131:
2132: IF l_msg_count = 1 THEN
2133:
2134: PA_INTERFACE_UTILS_PUB.get_messages
2160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2161: x_message_count := 1;
2162: x_message_data := SQLERRM;
2163:
2164: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
2165: ,p_procedure_name => 'GET_OR_CREATE_AMOUNT_SET_ID');
2166:
2167: pa_debug.g_err_stage:='Unexpected Error';
2168: IF P_PA_DEBUG_MODE = 'Y' THEN
2281: END IF;
2282: EXCEPTION
2283: WHEN Invalid_Arg_Exc THEN
2284:
2285: l_msg_count := FND_MSG_PUB.count_msg;
2286:
2287: IF l_msg_count = 1 THEN
2288:
2289: PA_INTERFACE_UTILS_PUB.get_messages
2315: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2316: x_message_count := 1;
2317: x_message_data := SQLERRM;
2318:
2319: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
2320: ,p_procedure_name => 'GET_PLAN_AMOUNT_FLAGS');
2321:
2322: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
2323: IF P_PA_DEBUG_MODE = 'Y' THEN
2486: EXCEPTION
2487:
2488: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
2489:
2490: l_msg_count := FND_MSG_PUB.count_msg;
2491:
2492: IF l_msg_count = 1 THEN
2493:
2494: PA_INTERFACE_UTILS_PUB.get_messages
2525: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2526: x_msg_count := 1;
2527: x_msg_data := SQLERRM;
2528:
2529: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_UTILS'
2530: ,p_procedure_name => 'Get_Peceding_Suceeding_Pd_Info');
2531:
2532: pa_debug.g_err_stage:='Unexpected Error';
2533: IF P_PA_DEBUG_MODE = 'Y' THEN
2647: EXCEPTION
2648:
2649: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
2650:
2651: l_msg_count := FND_MSG_PUB.count_msg;
2652:
2653: IF l_msg_count = 1 THEN
2654:
2655: PA_INTERFACE_UTILS_PUB.get_messages
2686: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2687: x_msg_count := 1;
2688: x_msg_data := SQLERRM;
2689:
2690: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_UTILS'
2691: ,p_procedure_name => 'Get_Element_Proj_PF_Amounts');
2692:
2693: pa_debug.g_err_stage:='Unexpected Error';
2694: IF P_PA_DEBUG_MODE = 'Y' THEN
2772: EXCEPTION
2773: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN -- Bug 2770562
2774:
2775: x_return_status := FND_API.G_RET_STS_ERROR;
2776: l_msg_count := FND_MSG_PUB.count_msg;
2777:
2778: IF l_msg_count = 1 and x_msg_data IS NULL THEN
2779: PA_INTERFACE_UTILS_PUB.get_messages
2780: (p_encoded => FND_API.G_TRUE
2806: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2807: p_msg_name => 'PA_FP_VERSION_NAME_AMBIGOUS');
2808: x_budget_version_id := NULL;
2809: WHEN OTHERS THEN
2810: FND_MSG_PUB.ADD_EXC_MSG (p_pkg_name => 'PA_FIN_PLAN_UTILS',
2811: p_procedure_name => pa_debug.g_err_stack );
2812: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2813: x_msg_data := SQLERRM;
2814: x_budget_version_id := NULL;
2892: x_msg_count := 1;
2893: x_msg_data := 'PA_FP_CURR_INVALID';
2894: x_txn_currency_code := NULL;
2895: WHEN OTHERS THEN
2896: fnd_msg_pub.add_exc_msg
2897: (p_pkg_name => 'PA_FIN_PLAN_UTILS',
2898: p_procedure_name => pa_debug.g_err_stack );
2899: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2900: x_txn_currency_code := NULL;
2988: end if;
2989: WHEN OTHERS THEN
2990: x_task_id := NULL;
2991: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2992: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
2993: p_procedure_name => 'check_task_name_or_id');
2994: RAISE;
2995: END check_task_name_or_id;
2996:
3079: end if;
3080: WHEN Invalid_Call_Exc THEN /* Changes for FP.M, Tracking Bug No - 3354518, Adding Exception handling block for Invalid_Call_Exc */
3081: x_resource_id := NULL;
3082: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3083: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3084: p_procedure_name => 'check_resource_gp_name_or_id');
3085: RAISE;
3086: WHEN OTHERS THEN
3087: x_resource_id := NULL;
3085: RAISE;
3086: WHEN OTHERS THEN
3087: x_resource_id := NULL;
3088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3089: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3090: p_procedure_name => 'check_resource_gp_name_or_id');
3091: RAISE;
3092: END check_resource_gp_name_or_id;
3093:
3162: end if;
3163: WHEN OTHERS THEN
3164: x_resource_id := NULL;
3165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3166: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3167: p_procedure_name => 'check_resource_name_or_id');
3168: RAISE;
3169: END check_resource_name_or_id;
3170:
3269: RETURN(l_amount_type_id);
3270:
3271: EXCEPTION
3272: WHEN OTHERS THEN
3273: FND_MSG_PUB.add_exc_msg(
3274: p_pkg_name => 'pa_fin_plan_utils.get_amttype_id'
3275: ,p_procedure_name => PA_DEBUG.G_Err_Stack);
3276:
3277: IF P_PA_DEBUG_MODE = 'Y' THEN
3368: end if; -- invalid budget_version_id
3369: close budget_csr;
3370:
3371: /* If There are ANY Business Rules Violations , Then Do NOT Proceed: RETURN */
3372: l_msg_count := FND_MSG_PUB.count_msg;
3373: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3374: IF P_PA_DEBUG_MODE = 'Y' THEN
3375: pa_debug.g_err_stage := 'l_msg_count = ' || l_msg_count;
3376: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
3437: END IF;
3438: EXCEPTION
3439: WHEN OTHERS THEN
3440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3441: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3442: p_procedure_name => 'Check_Locked_By_User');
3443: IF P_PA_DEBUG_MODE = 'Y' THEN
3444: pa_debug.reset_err_stack;
3445: END IF;
3518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3519: IF P_PA_DEBUG_MODE = 'Y' THEN
3520: pa_debug.write_file('Check_Both_Locked_By_User: ' || 'Check_Locked_By_User_Exception reached');
3521: END IF;
3522: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3523: p_procedure_name => 'Check_Both_Locked_By_User');
3524: WHEN OTHERS THEN
3525: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3526: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3522: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3523: p_procedure_name => 'Check_Both_Locked_By_User');
3524: WHEN OTHERS THEN
3525: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3526: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_UTILS',
3527: p_procedure_name => 'Check_Both_Locked_By_User');
3528: RAISE;
3529:
3530: END Check_Both_Locked_By_User;
3698: END IF;
3699: EXCEPTION
3700: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3701:
3702: l_msg_count := FND_MSG_PUB.count_msg;
3703:
3704: IF l_msg_count = 1 THEN
3705:
3706: PA_INTERFACE_UTILS_PUB.get_messages
3737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3738: x_msg_count := 1;
3739: x_msg_data := SQLERRM;
3740:
3741: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_UTILS'
3742: ,p_procedure_name => 'Get_Resource_List_Info');
3743:
3744: pa_debug.g_err_stage:='Unexpected Error';
3745: IF P_PA_DEBUG_MODE = 'Y' THEN
3834: END IF;
3835: EXCEPTION
3836: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3837:
3838: l_msg_count := FND_MSG_PUB.count_msg;
3839:
3840: IF l_msg_count = 1 THEN
3841:
3842: PA_INTERFACE_UTILS_PUB.get_messages
3873: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3874: x_msg_count := 1;
3875: x_msg_data := SQLERRM;
3876:
3877: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_UTILS'
3878: ,p_procedure_name => 'Get_Resource_List_Info');
3879:
3880: pa_debug.g_err_stage:='Unexpected Error';
3881: IF P_PA_DEBUG_MODE = 'Y' THEN
4127: EXCEPTION
4128:
4129: WHEN Invalid_Arg_Exc THEN
4130:
4131: l_msg_count := FND_MSG_PUB.count_msg;
4132:
4133: IF l_msg_count = 1 THEN
4134:
4135: PA_INTERFACE_UTILS_PUB.get_messages
4163: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4164: x_msg_count := 1;
4165: x_msg_data := SQLERRM;
4166:
4167: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
4168: ,p_procedure_name => 'Is_AC_PT_Attached_After_UPG');
4169:
4170: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4171: IF P_PA_DEBUG_MODE = 'Y' THEN
4309: EXCEPTION
4310:
4311: WHEN Invalid_Arg_Exc THEN
4312:
4313: l_msg_count := FND_MSG_PUB.count_msg;
4314:
4315: IF l_msg_count = 1 THEN
4316:
4317: PA_INTERFACE_UTILS_PUB.get_messages
4346: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4347: x_msg_count := 1;
4348: x_msg_data := SQLERRM;
4349:
4350: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
4351: ,p_procedure_name => 'Is_AR_PT_Attached_After_UPG');
4352:
4353: pa_debug.g_err_stage:='Unexpeted Error'||SQLERRM;
4354: IF P_PA_DEBUG_MODE = 'Y' THEN
4525: END IF;
4526: EXCEPTION
4527: WHEN Invalid_Arg_Exc THEN
4528:
4529: l_msg_count := FND_MSG_PUB.count_msg;
4530: IF l_msg_count = 1 THEN
4531: PA_INTERFACE_UTILS_PUB.get_messages
4532: (p_encoded => FND_API.G_TRUE
4533: ,p_msg_index => 1
4552:
4553: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4554: x_msg_count := 1;
4555: x_msg_data := SQLERRM;
4556: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
4557: ,p_procedure_name => 'Get_Budget_Version_Number');
4558: pa_debug.g_err_stage:='Unexpeted Error'||SQLERRM;
4559: IF P_PA_DEBUG_MODE = 'Y' THEN
4560: pa_debug.write('Get_Max_Budget_Version_Number: ' || l_module_name,pa_debug.g_err_stage,5);
4796: EXCEPTION
4797:
4798: WHEN PA_FP_ELEMENTS_PUB.Invalid_Arg_Exc THEN
4799:
4800: l_msg_count := FND_MSG_PUB.count_msg;
4801: IF l_msg_count = 1 THEN
4802: PA_INTERFACE_UTILS_PUB.get_messages
4803: (p_encoded => FND_API.G_TRUE
4804: ,p_msg_index => 1
4825:
4826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4827: x_msg_count := 1;
4828: x_msg_data := SQLERRM;
4829: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
4830: ,p_procedure_name => 'GET_COST_BASE_VERSION_INFO');
4831: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
4832: IF P_PA_DEBUG_MODE = 'Y' THEN
4833: pa_debug.write('GET_COST_BASE_VERSION_INFO: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4998: EXCEPTION
4999:
5000: WHEN PA_FP_ELEMENTS_PUB.Invalid_Arg_Exc THEN
5001:
5002: l_msg_count := FND_MSG_PUB.count_msg;
5003: IF l_msg_count = 1 THEN
5004: PA_INTERFACE_UTILS_PUB.get_messages
5005: (p_encoded => FND_API.G_TRUE
5006: ,p_msg_index => 1
5027:
5028: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5029: x_msg_count := 1;
5030: x_msg_data := SQLERRM;
5031: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
5032: ,p_procedure_name => 'GET_REV_BASE_VERSION_INFO');
5033: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
5034: IF P_PA_DEBUG_MODE = 'Y' THEN
5035: pa_debug.write('GET_REV_BASE_VERSION_INFO: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
5207:
5208: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
5209:
5210: x_return_status := FND_API.G_RET_STS_ERROR;
5211: l_msg_count := FND_MSG_PUB.count_msg;
5212: IF l_msg_count = 1 THEN
5213: PA_INTERFACE_UTILS_PUB.get_messages
5214: (p_encoded => FND_API.G_TRUE
5215: ,p_msg_index => 1
5234:
5235: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5236: x_msg_count := 1;
5237: x_msg_data := SQLERRM;
5238: FND_MSG_PUB.add_exc_msg
5239: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
5240: ,p_procedure_name => 'conv_est_amounts_of_ci_version'
5241: ,p_error_text => sqlerrm);
5242: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
5569:
5570: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
5571:
5572: x_return_status := FND_API.G_RET_STS_ERROR;
5573: l_msg_count := FND_MSG_PUB.count_msg;
5574: IF l_msg_count = 1 THEN
5575: PA_INTERFACE_UTILS_PUB.get_messages
5576: (p_encoded => FND_API.G_TRUE
5577: ,p_msg_index => 1
5593:
5594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5595: x_msg_count := 1;
5596: x_msg_data := SQLERRM;
5597: FND_MSG_PUB.add_exc_msg
5598: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
5599: ,p_procedure_name => 'Get_Period_Details'
5600: ,p_error_text => SQLERRM);
5601: IF p_pa_debug_mode = 'Y' THEN
5828:
5829: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
5830:
5831: x_return_status := FND_API.G_RET_STS_ERROR;
5832: l_msg_count := FND_MSG_PUB.count_msg;
5833: IF l_msg_count = 1 THEN
5834: PA_INTERFACE_UTILS_PUB.get_messages
5835: (p_encoded => FND_API.G_TRUE
5836: ,p_msg_index => 1
5853:
5854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5855: x_msg_count := 1;
5856: x_msg_data := SQLERRM;
5857: FND_MSG_PUB.add_exc_msg
5858: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
5859: ,p_procedure_name => 'Get_Shifted_Period'
5860: ,p_error_text => SQLERRM);
5861: IF p_pa_debug_mode = 'Y' THEN
6118: RAISE;
6119:
6120: WHEN others THEN
6121:
6122: FND_MSG_PUB.add_exc_msg
6123: ( p_pkg_name => 'Pa_Fin_Plan_Utils'
6124: ,p_procedure_name => 'Get_Approved_Budget_Ver_Qty'
6125: ,p_error_text => sqlerrm);
6126:
6306: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6307: x_msg_count := 1;
6308: x_msg_data := SQLERRM;
6309:
6310: FND_MSG_PUB.add_exc_msg
6311: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
6312: ,p_procedure_name => 'validate_input_params'
6313: ,p_error_text => sqlerrm);
6314:
6629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6630: x_msg_count := 1;
6631: x_msg_data := SQLERRM;
6632:
6633: FND_MSG_PUB.add_exc_msg
6634: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
6635: ,p_procedure_name => 'VALIDATE_CONV_ATTRIBUTES'
6636: ,p_error_text => sqlerrm);
6637:
7085: END IF;
7086: EXCEPTION
7087: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
7088: x_return_status := FND_API.G_RET_STS_ERROR;
7089: l_msg_count := FND_MSG_PUB.count_msg;
7090: IF l_msg_count = 1 THEN
7091: PA_INTERFACE_UTILS_PUB.get_messages
7092: (p_encoded => FND_API.G_TRUE,
7093: p_msg_index => 1,
7110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7111: x_msg_count := 1;
7112: x_msg_data := SQLERRM;
7113:
7114: FND_MSG_PUB.add_exc_msg
7115: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
7116: ,p_procedure_name => 'VALIDATE_CURRENCY_ATTRIBUTES'
7117: ,p_error_text => sqlerrm);
7118:
7227:
7228: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
7229:
7230: x_return_status := FND_API.G_RET_STS_ERROR;
7231: l_msg_count := FND_MSG_PUB.count_msg;
7232:
7233: IF l_msg_count = 1 and x_msg_data IS NULL THEN
7234: PA_INTERFACE_UTILS_PUB.get_messages
7235: (p_encoded => FND_API.G_TRUE
7253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7254: x_msg_count := 1;
7255: x_msg_data := SQLERRM;
7256:
7257: FND_MSG_PUB.add_exc_msg
7258: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
7259: ,p_procedure_name => 'GET_PLAN_TYPE_OPTS_FOR_VER'
7260: ,p_error_text => x_msg_data);
7261:
7356:
7357: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
7358:
7359: x_return_status := FND_API.G_RET_STS_ERROR;
7360: l_msg_count := FND_MSG_PUB.count_msg;
7361: IF l_msg_count = 1 THEN
7362: PA_INTERFACE_UTILS_PUB.get_messages
7363: (p_encoded => FND_API.G_TRUE
7364: ,p_msg_index => 1
7379:
7380: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7381: x_msg_count := 1;
7382: x_msg_data := SQLERRM;
7383: FND_MSG_PUB.add_exc_msg
7384: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
7385: ,p_procedure_name => 'Get_Project_Curr_Attributes'
7386: ,p_error_text => SQLERRM);
7387: IF p_pa_debug_mode = 'Y' THEN
7486:
7487: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
7488:
7489: x_return_status := FND_API.G_RET_STS_ERROR;
7490: l_msg_count := FND_MSG_PUB.count_msg;
7491:
7492: IF autobaseline_appr_rev_info_cur%ISOPEN THEN
7493: CLOSE autobaseline_appr_rev_info_cur;
7494: END IF;
7520: IF autobaseline_appr_rev_info_cur%ISOPEN THEN
7521: CLOSE autobaseline_appr_rev_info_cur;
7522: END IF;
7523:
7524: FND_MSG_PUB.add_exc_msg
7525: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
7526: ,p_procedure_name => 'IsRevVersionCreationAllowed'
7527: ,p_error_text => x_msg_data);
7528:
7626:
7627: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
7628:
7629: x_return_status := FND_API.G_RET_STS_ERROR;
7630: l_msg_count := FND_MSG_PUB.count_msg;
7631:
7632: IF lookups_cur%ISOPEN THEN
7633: close lookups_cur;
7634: END IF;
7660: IF lookups_cur%ISOPEN THEN
7661: close lookups_cur;
7662: END IF;
7663:
7664: FND_MSG_PUB.add_exc_msg
7665: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
7666: ,p_procedure_name => 'GET_LOOKUP_CODE'
7667: ,p_error_text => x_msg_data);
7668:
7956: IF x_return_status IS NULL OR
7957: x_return_status = FND_API.G_RET_STS_SUCCESS THEN
7958: x_return_status := FND_API.G_RET_STS_ERROR;
7959: END IF;
7960: l_msg_count := FND_MSG_PUB.count_msg;
7961:
7962: IF l_msg_count = 1 and x_msg_data IS NULL THEN
7963: PA_INTERFACE_UTILS_PUB.get_messages
7964: (p_encoded => FND_API.G_TRUE
7982: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7983: x_msg_count := 1;
7984: x_msg_data := SQLERRM;
7985:
7986: FND_MSG_PUB.add_exc_msg
7987: ( p_pkg_name => 'pa_fin_plan_utils'
7988: ,p_procedure_name => 'get_Version_type'
7989: ,p_error_text => x_msg_data);
7990:
8096: EXCEPTION
8097: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
8098:
8099: x_return_status := FND_API.G_RET_STS_ERROR;
8100: l_msg_count := FND_MSG_PUB.count_msg;
8101:
8102: IF l_msg_count = 1 and x_msg_data IS NULL THEN
8103: PA_INTERFACE_UTILS_PUB.get_messages
8104: (p_encoded => FND_API.G_TRUE
8122: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8123: x_msg_count := 1;
8124: x_msg_data := SQLERRM;
8125:
8126: FND_MSG_PUB.add_exc_msg
8127: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
8128: ,p_procedure_name => 'get_version_id'
8129: ,p_error_text => x_msg_data);
8130:
8250: EXCEPTION
8251: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
8252:
8253: x_return_status := FND_API.G_RET_STS_ERROR;
8254: l_msg_count := FND_MSG_PUB.count_msg;
8255:
8256: IF l_msg_count = 1 and x_msg_data IS NULL THEN
8257: PA_INTERFACE_UTILS_PUB.get_messages
8258: (p_encoded => FND_API.G_TRUE
8276: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8277: x_msg_count := 1;
8278: x_msg_data := SQLERRM;
8279:
8280: FND_MSG_PUB.add_exc_msg
8281: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
8282: ,p_procedure_name => 'perform_autobasline_checks'
8283: ,p_error_text => x_msg_data);
8284:
8363:
8364: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
8365:
8366: x_return_status := FND_API.G_RET_STS_ERROR;
8367: l_msg_count := FND_MSG_PUB.count_msg;
8368: IF l_msg_count = 1 THEN
8369: PA_INTERFACE_UTILS_PUB.get_messages
8370: (p_encoded => FND_API.G_TRUE
8371: ,p_msg_index => 1
8386:
8387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8388: x_msg_count := 1;
8389: x_msg_data := SQLERRM;
8390: FND_MSG_PUB.add_exc_msg
8391: ( p_pkg_name => 'PA_FIN_PLAN_UTILS'
8392: ,p_procedure_name => 'get_version_type_for_bdgt_type'
8393: ,p_error_text => sqlerrm);
8394: IF p_pa_debug_mode = 'Y' THEN
8415: -- and then logs out and logs back in as a different
8416: -- user to test second user-locked error in this api, the previous
8417: -- submit error improperly reappears.
8418: --
8419: -- FND_MSG_PUB.initialize seemed to address this issue.
8420: --
8421: -- 3) Sometimes, but not always, passing G_TRUE for the
8422: -- non-encoded (no-token) submit message appeared to
8423: -- result in a "null" being rendered on the attachments
8494: BEGIN
8495:
8496: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
8497:
8498: FND_MSG_PUB.initialize;
8499:
8500: IF l_debug_mode = 'Y' THEN
8501: pa_debug.Set_Curr_Function
8502: ( p_function => l_module_name,
8537:
8538: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8539: p_msg_name => 'PA_FP_ATTACH_SUBMITTED');
8540:
8541: l_msg_count := FND_MSG_PUB.Count_Msg;
8542:
8543: -- bug 2955756 --------------------------------------
8544:
8545: PA_INTERFACE_UTILS_PUB.get_messages
8588:
8589: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8590: p_msg_name => 'PA_FP_SUBMITTED_VERSION');
8591:
8592: l_msg_count := FND_MSG_PUB.Count_Msg;
8593:
8594: PA_INTERFACE_UTILS_PUB.get_messages
8595: (p_encoded => FND_API.G_FALSE
8596: ,p_msg_index => 1
8629: PA_UTILS.ADD_MESSAGE
8630: ( p_app_short_name => 'PA',
8631: p_msg_name => 'PA_FP_ATTACH_LOCKED_BY_PRC');
8632:
8633: l_msg_count := FND_MSG_PUB.Count_Msg;
8634:
8635: PA_INTERFACE_UTILS_PUB.get_messages
8636: (p_encoded => FND_API.G_FALSE
8637: ,p_msg_index => 1
8651: PA_UTILS.ADD_MESSAGE
8652: ( p_app_short_name => 'PA',
8653: p_msg_name => 'PA_FP_LOCKED_BY_PROCESSING');
8654:
8655: l_msg_count := FND_MSG_PUB.Count_Msg;
8656:
8657: PA_INTERFACE_UTILS_PUB.get_messages
8658: (p_encoded => FND_API.G_FALSE
8659: ,p_msg_index => 1
8709: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8710: p_msg_name => 'PA_FP_ATTACH_LOCKED_BY_USER');
8711: */
8712:
8713: l_msg_count := FND_MSG_PUB.Count_Msg;
8714:
8715:
8716: -- bug 2955756 --------------------------------------
8717:
8744: end if;
8745: */
8746:
8747: /*
8748: x_msg_count := FND_MSG_PUB.Count_Msg;
8749: if x_msg_count = 1 then
8750: PA_INTERFACE_UTILS_PUB.get_messages
8751: (p_encoded => FND_API.G_TRUE,
8752: p_msg_index => 1,
8762: PA_UTILS.ADD_MESSAGE
8763: ( p_app_short_name => 'PA',
8764: p_msg_name => 'PA_FP_LOCKED_BY_USER');
8765:
8766: l_msg_count := FND_MSG_PUB.Count_Msg;
8767:
8768: PA_INTERFACE_UTILS_PUB.get_messages
8769: (p_encoded => FND_API.G_FALSE
8770: ,p_msg_index => 1
8823: WHEN OTHERS THEN
8824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8825: x_msg_count := 1;
8826: x_msg_data := SQLERRM;
8827: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_utils',
8828: p_procedure_name => 'validate_editable_bv');
8829: IF P_PA_DEBUG_MODE = 'Y' THEN
8830: pa_debug.reset_err_stack;
8831: END IF;
8859: PA_UTILS.ADD_MESSAGE
8860: ( p_app_short_name => 'PA',
8861: p_msg_name => 'PA_FP_PLAN_TYPE_NON_EDITABLE');
8862:
8863: l_msg_count := FND_MSG_PUB.Count_Msg;
8864:
8865: PA_INTERFACE_UTILS_PUB.get_messages
8866: (p_encoded => FND_API.G_TRUE
8867: ,p_msg_index => 1
8907: WHEN NO_DATA_FOUND THEN
8908: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8909: x_msg_count := 1;
8910: x_msg_data := SQLERRM;
8911: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_utils',
8912: p_procedure_name => 'validate_editable_bv');
8913: IF P_PA_DEBUG_MODE = 'Y' THEN
8914: pa_debug.reset_err_stack;
8915: END IF;
8917: WHEN OTHERS THEN
8918: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8919: x_msg_count := 1;
8920: x_msg_data := SQLERRM;
8921: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_utils',
8922: p_procedure_name => 'validate_editable_bv');
8923: IF P_PA_DEBUG_MODE = 'Y' THEN
8924: pa_debug.reset_err_stack;
8925: END IF;
9152:
9153: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
9154:
9155: x_return_status := FND_API.G_RET_STS_ERROR;
9156: l_msg_count := FND_MSG_PUB.count_msg;
9157:
9158: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9159: PA_INTERFACE_UTILS_PUB.get_messages
9160: (p_encoded => FND_API.G_TRUE
9175:
9176: WHEN FND_API.G_Exc_Error THEN
9177:
9178: x_return_status := FND_API.G_RET_STS_ERROR;
9179: l_msg_count := FND_MSG_PUB.count_msg;
9180:
9181: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9182: PA_INTERFACE_UTILS_PUB.get_messages
9183: (p_encoded => FND_API.G_TRUE
9201: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9202: x_msg_count := 1;
9203: x_msg_data := SQLERRM;
9204:
9205: FND_MSG_PUB.add_exc_msg
9206: ( p_pkg_name => 'pa_fin_plan_utils'
9207: ,p_procedure_name => 'check_delete_task_ok'
9208: ,p_error_text => x_msg_data);
9209:
9298: ( p_app_short_name => 'PA',
9299: p_msg_name => 'PA_FP_REPARENT_ERR_TASK',
9300: p_token1 => 'TASK_NAME',
9301: p_value1 => l_task_name);
9302: l_msg_count := FND_MSG_PUB.count_msg;
9303: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9304: PA_INTERFACE_UTILS_PUB.get_messages
9305: (p_encoded => FND_API.G_TRUE,
9306: p_msg_index => 1,
9357: p_token1 => 'TASK_NAME',
9358: p_value1 => l_task_name,
9359: p_token2 => 'PARENT_TASK_NAME',
9360: p_value2 => l_old_parent_task_name);
9361: l_msg_count := FND_MSG_PUB.count_msg;
9362: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9363: PA_INTERFACE_UTILS_PUB.get_messages
9364: (p_encoded => FND_API.G_TRUE,
9365: p_msg_index => 1,
9416: -- p_token1 => 'TASK_NAME',
9417: -- p_value1 => l_task_name,
9418: p_token1 => 'PARENT_TASK_NAME',
9419: p_value1 => l_new_parent_task_name);
9420: l_msg_count := FND_MSG_PUB.count_msg;
9421: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9422: PA_INTERFACE_UTILS_PUB.get_messages
9423: (p_encoded => FND_API.G_TRUE,
9424: p_msg_index => 1,
9441: END IF;
9442: EXCEPTION
9443: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
9444: x_return_status := FND_API.G_RET_STS_ERROR;
9445: l_msg_count := FND_MSG_PUB.count_msg;
9446: IF l_msg_count = 1 and x_msg_data IS NULL THEN
9447: PA_INTERFACE_UTILS_PUB.get_messages
9448: (p_encoded => FND_API.G_TRUE
9449: ,p_msg_index => 1
9463: WHEN others THEN
9464: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9465: x_msg_count := 1;
9466: x_msg_data := SQLERRM;
9467: FND_MSG_PUB.add_exc_msg
9468: ( p_pkg_name => 'pa_fin_plan_utils'
9469: ,p_procedure_name => 'check_reparent_task_ok'
9470: ,p_error_text => x_msg_data);
9471: IF l_debug_mode = 'Y' THEN
9796:
9797:
9798: BEGIN
9799:
9800: FND_MSG_PUB.initialize;
9801: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
9802: l_debug_mode := NVL(l_debug_mode, 'Y');
9803: IF P_PA_DEBUG_MODE = 'Y' THEN
9804: pa_debug.set_curr_function( p_function => 'Check_if_plan_type_editable',
9898: END IF;
9899: EXCEPTION
9900:
9901: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
9902: l_msg_count := FND_MSG_PUB.count_msg;
9903: IF l_msg_count = 1 THEN
9904: PA_INTERFACE_UTILS_PUB.get_messages
9905: (p_encoded => FND_API.G_TRUE
9906: ,p_msg_index => 1
9924: WHEN Others THEN
9925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9926: x_msg_count := 1;
9927: x_msg_data := SQLERRM;
9928: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
9929: ,p_procedure_name => 'CHECK_IF_PLAN_TYPE_EDITABLE');
9930: IF P_PA_DEBUG_MODE = 'Y' THEN
9931: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
9932: pa_debug.write('Check_if_plan_type_editable: ' || l_module_name,pa_debug.g_err_stage,5);
9961: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
9962: p_msg_name => 'PA_INVALID_END_DATE');
9963: END IF;
9964:
9965: l_msg_count := FND_MSG_PUB.count_msg;
9966:
9967: IF l_msg_count > 0 THEN
9968: IF l_msg_count = 1 THEN
9969: PA_INTERFACE_UTILS_PUB.get_messages
9987: WHEN OTHERS THEN
9988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9989: x_msg_count := 1;
9990: x_msg_data := SQLERRM;
9991: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS',
9992: p_procedure_name => 'end_date_active_val');
9993: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9994: END End_date_active_val;
9995:
10173:
10174: EXCEPTION
10175:
10176: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10177: l_msg_count := FND_MSG_PUB.count_msg;
10178: IF l_msg_count = 1 THEN
10179: PA_INTERFACE_UTILS_PUB.get_messages
10180: (p_encoded => FND_API.G_TRUE
10181: ,p_msg_index => 1
10205: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10206: x_msg_count := 1;
10207: x_msg_data := SQLERRM;
10208:
10209: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
10210: ,p_procedure_name => 'Get_Curr_Original_Version_Info');
10211:
10212: IF l_debug_mode = 'Y' THEN
10213: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
10346: END IF;
10347: EXCEPTION
10348:
10349: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10350: l_msg_count := FND_MSG_PUB.count_msg;
10351: IF l_msg_count = 1 THEN
10352: PA_INTERFACE_UTILS_PUB.get_messages
10353: (p_encoded => FND_API.G_TRUE
10354: ,p_msg_index => 1
10377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10378: x_msg_count := 1;
10379: x_msg_data := SQLERRM;
10380:
10381: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
10382: ,p_procedure_name => 'GET_ACTUAL_AMTS_THRU_PERIOD');
10383:
10384: IF l_debug_mode = 'Y' THEN
10385: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
10642: END IF;
10643: EXCEPTION
10644:
10645: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10646: l_msg_count := FND_MSG_PUB.count_msg;
10647: IF l_msg_count = 1 THEN
10648: PA_INTERFACE_UTILS_PUB.get_messages
10649: (p_encoded => FND_API.G_TRUE
10650: ,p_msg_index => 1
10673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10674: x_msg_count := 1;
10675: x_msg_data := SQLERRM;
10676:
10677: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
10678: ,p_procedure_name => 'IS_WP_RL_UPDATEABLE');
10679:
10680: IF l_debug_mode = 'Y' THEN
10681: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
10767: END IF;
10768: EXCEPTION
10769:
10770: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10771: l_msg_count := FND_MSG_PUB.count_msg;
10772: IF l_msg_count = 1 THEN
10773: PA_INTERFACE_UTILS_PUB.get_messages
10774: (p_encoded => FND_API.G_TRUE
10775: ,p_msg_index => 1
10797: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10798: x_msg_count := 1;
10799: x_msg_data := SQLERRM;
10800:
10801: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
10802: ,p_procedure_name => 'IS_PRI_FCST_COST_PT_ATTACHED');
10803:
10804: IF l_debug_mode = 'Y' THEN
10805: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
10889: END IF;
10890: EXCEPTION
10891:
10892: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10893: l_msg_count := FND_MSG_PUB.count_msg;
10894: IF l_msg_count = 1 THEN
10895: PA_INTERFACE_UTILS_PUB.get_messages
10896: (p_encoded => FND_API.G_TRUE
10897: ,p_msg_index => 1
10919: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10920: x_msg_count := 1;
10921: x_msg_data := SQLERRM;
10922:
10923: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
10924: ,p_procedure_name => 'IS_PRI_FCST_REV_PT_ATTACHED');
10925:
10926: IF l_debug_mode = 'Y' THEN
10927: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
11141: pa_debug.reset_curr_function;
11142: END IF;
11143: EXCEPTION
11144: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
11145: l_msg_count := FND_MSG_PUB.count_msg;
11146:
11147: IF l_msg_count = 1 and x_msg_data IS NULL THEN
11148: PA_INTERFACE_UTILS_PUB.get_messages
11149: (p_encoded => FND_API.G_TRUE
11167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11168: x_msg_count := 1;
11169: x_msg_data := SQLERRM;
11170:
11171: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
11172: ,p_procedure_name => 'GET_CURR_WORKING_VERSION_IDS');
11173: IF P_PA_DEBUG_MODE = 'Y' THEN
11174: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
11175: pa_debug.write(l_mod_name,pa_debug.g_err_stage,l_debug_level5);
11411: pa_debug.reset_curr_function;
11412: END IF;
11413: EXCEPTION
11414: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
11415: l_msg_count := FND_MSG_PUB.count_msg;
11416:
11417: IF l_msg_count = 1 and x_msg_data IS NULL THEN
11418: PA_INTERFACE_UTILS_PUB.get_messages
11419: (p_encoded => FND_API.G_TRUE
11438: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11439: x_msg_count := 1;
11440: x_msg_data := SQLERRM;
11441:
11442: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
11443: ,p_procedure_name => 'GET_PROJ_IMPACT_AMOUNTS');
11444: IF P_PA_DEBUG_MODE = 'Y' THEN
11445: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
11446: pa_debug.write(l_mod_name,pa_debug.g_err_stage,l_debug_level5);
11755: pa_debug.reset_curr_function;
11756: END IF;
11757: EXCEPTION
11758: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
11759: l_msg_count := FND_MSG_PUB.count_msg;
11760:
11761: IF l_msg_count = 1 and x_msg_data IS NULL THEN
11762: PA_INTERFACE_UTILS_PUB.get_messages
11763: (p_encoded => FND_API.G_TRUE
11782: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11783: x_msg_count := 1;
11784: x_msg_data := SQLERRM;
11785:
11786: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
11787: ,p_procedure_name => 'GET_SUMMARY_AMOUNTS');
11788: IF P_PA_DEBUG_MODE = 'Y' THEN
11789: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
11790: pa_debug.write(l_mod_name,pa_debug.g_err_stage,l_debug_level5);
12083: RETURN is_valid_flag;
12084:
12085: EXCEPTION
12086: WHEN OTHERS THEN
12087: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
12088: ,p_procedure_name => 'Validate_Uncheck_MC_Flag');
12089: IF P_PA_DEBUG_MODE = 'Y' THEN
12090: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
12091: pa_debug.write(l_mod_name,pa_debug.g_err_stage,l_debug_level5);
12230:
12231: EXCEPTION
12232: WHEN Others THEN
12233:
12234: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
12235: ,p_procedure_name => 'Check_delete_txn_cur_ok');
12236:
12237: IF P_PA_DEBUG_MODE = 'Y' THEN
12238: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
12311:
12312: EXCEPTION
12313: WHEN Others THEN
12314:
12315: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
12316: ,p_procedure_name => 'check_if_amounts_exist_for_wp');
12317:
12318: IF P_PA_DEBUG_MODE = 'Y' THEN
12319: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
12393:
12394: EXCEPTION
12395: WHEN Others THEN
12396:
12397: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
12398: ,p_procedure_name => 'check_if_task_asgmts_exist');
12399:
12400: IF P_PA_DEBUG_MODE = 'Y' THEN
12401: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
12479:
12480: EXCEPTION
12481: WHEN Others THEN
12482:
12483: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
12484: ,p_procedure_name => 'check_if_amounts_exist_for_fp');
12485:
12486: IF P_PA_DEBUG_MODE = 'Y' THEN
12487: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
12840: END IF;
12841: EXCEPTION
12842:
12843: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
12844: l_msg_count := FND_MSG_PUB.count_msg;
12845: IF l_msg_count = 1 THEN
12846: PA_INTERFACE_UTILS_PUB.get_messages
12847: (p_encoded => FND_API.G_TRUE
12848: ,p_msg_index => 1
12870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12871: x_msg_count := 1;
12872: x_msg_data := SQLERRM;
12873:
12874: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_utils'
12875: ,p_procedure_name => 'return_and_vldt_plan_prc_code');
12876:
12877: IF l_debug_mode = 'Y' THEN
12878: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
13100: END IF;
13101:
13102: EXCEPTION
13103: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
13104: l_msg_count := FND_MSG_PUB.count_msg;
13105: IF l_msg_count = 1 THEN
13106: PA_INTERFACE_UTILS_PUB.get_messages
13107: (p_encoded => FND_API.G_TRUE
13108: ,p_msg_index => 1
13114: IF l_debug_mode = 'Y' THEN
13115: pa_debug.reset_curr_function;
13116: END IF;
13117: WHEN OTHERS THEN
13118: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PAFPWAUB'
13119: ,p_procedure_name => 'return_struct_ver_info');
13120:
13121: IF l_debug_mode = 'Y' THEN
13122: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
13460: EXCEPTION
13461:
13462: WHEN Invalid_Arg_Exc THEN
13463:
13464: l_msg_count := FND_MSG_PUB.count_msg;
13465:
13466: IF l_msg_count = 1 THEN
13467:
13468: PA_INTERFACE_UTILS_PUB.get_messages
13498: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13499: p_msg_count := 1;
13500: p_msg_data := SQLERRM;
13501:
13502: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_UTILS'
13503: ,p_procedure_name => 'create_draft_budget_wrp');
13504:
13505: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
13506: IF P_PA_DEBUG_MODE = 'Y' THEN