DBA Data[Home] [Help]

APPS.PA_FIN_PLAN_PVT dependencies on FND_API

Line 73: x_return_status := FND_API.G_RET_STS_ERROR;

69:
70: /* CHECK FOR BUSINESS RULES VIOLATIONS */
71: /* check for null budget_version_id */
72: if p_budget_version_id is NULL then
73: x_return_status := FND_API.G_RET_STS_ERROR;
74: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
75: p_msg_name => 'PA_FP_NO_PLAN_VERSION');
76: end if;
77: /* check to see if the budget version we're updating has */

Line 85: if x_return_status = FND_API.G_RET_STS_ERROR then

81: p_record_version_number => p_record_version_number,
82: x_valid_flag => l_valid_flag,
83: x_return_status => l_return_status,
84: x_error_msg_code => l_error_msg_code);
85: if x_return_status = FND_API.G_RET_STS_ERROR then
86: IF P_PA_DEBUG_MODE = 'Y' THEN
87: pa_debug.write_file('lock_unlock_version: ' || 'record version number error ');
88: END IF;
89: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 104: x_return_status := FND_API.G_RET_STS_ERROR;

100: x_person_id => l_person_id,
101: x_resource_id => l_resource_id,
102: x_resource_name => l_resource_name);
103: if l_person_id is null then
104: x_return_status := FND_API.G_RET_STS_ERROR;
105: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
106: p_msg_name => 'PA_FP_BAD_USER_ID');
107: end if; -- error with p_user_id
108: else

Line 124: x_return_status := FND_API.G_RET_STS_ERROR;

120: --if p_action = 'U' and not (bv_rec.locked_by_person_id = l_person_id) then
121: --Irrespective of the action, if the locked_by_person_id and l_person_id
122: --are different, an error should be thrown. AMG UT2
123: if not ( nvl(bv_rec.locked_by_person_id,l_person_id) = l_person_id ) then
124: x_return_status := FND_API.G_RET_STS_ERROR;
125: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
126: p_msg_name => 'PA_FP_LOCKED_BY_USER',
127: p_token1 => 'USERNAME',
128: p_value1 => pa_fin_plan_utils.get_person_name(bv_rec.locked_by_person_id));

Line 144: (p_encoded => FND_API.G_TRUE,

140: --if l_msg_count > 0 then
141: if l_msg_count > l_initial_msg_count then
142: if l_msg_count = 1 then
143: PA_INTERFACE_UTILS_PUB.get_messages
144: (p_encoded => FND_API.G_TRUE,
145: p_msg_index => 1,
146: p_msg_count => l_msg_count,
147: p_msg_data => l_msg_data,
148: p_data => l_data,

Line 165: x_return_status := FND_API.G_RET_STS_SUCCESS;

161: /* IF NO BUSINESS RULES VIOLATIONS, PROCEED WITH LOCK/UNLOCK */
162: IF P_PA_DEBUG_MODE = 'Y' THEN
163: pa_debug.write_file('lock_unlock_version: ' || 'no business rules violations');
164: END IF;
165: x_return_status := FND_API.G_RET_STS_SUCCESS;
166: --if l_msg_count = 0 then
167: if l_msg_count = l_initial_msg_count then
168: SAVEPOINT PA_FP_LOCK_UNLOCK;
169: -- LOCK the version

Line 219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

215:
216: EXCEPTION
217: when others then
218: rollback to PA_FP_LOCK_UNLOCK;
219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
220: x_msg_count := 1;
221: x_msg_data := SQLERRM;
222: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
223: p_procedure_name => 'lock_unlock_version');

Line 227: raise FND_API.G_EXC_UNEXPECTED_ERROR;

223: p_procedure_name => 'lock_unlock_version');
224: IF p_pa_debug_mode = 'Y' THEN
225: pa_debug.reset_err_stack;
226: END IF;
227: raise FND_API.G_EXC_UNEXPECTED_ERROR;
228: END lock_unlock_version;
229:
230:
231:

Line 381: x_return_status := FND_API.G_RET_STS_ERROR;

377: if not((l_valid1_flag='Y') and (l_valid2_flag='Y')) then
378: IF P_PA_DEBUG_MODE = 'Y' THEN
379: pa_debug.write_file('Baseline_FinPlan: ' || 'BUSINESS RULE VIOLATION: Check_Record_Version_Number failed');
380: END IF;
381: x_return_status := FND_API.G_RET_STS_ERROR;
382: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
383: p_msg_name => l_error_msg_code);
384: end if;
385: end if;

Line 392: (p_encoded => FND_API.G_TRUE,

388: l_msg_count := FND_MSG_PUB.count_msg;
389: if l_msg_count > 0 then
390: if l_msg_count = 1 then
391: PA_INTERFACE_UTILS_PUB.get_messages
392: (p_encoded => FND_API.G_TRUE,
393: p_msg_index => 1,
394: p_msg_count => l_msg_count,
395: p_msg_data => l_msg_data,
396: p_data => l_data,

Line 420: x_return_status := FND_API.G_RET_STS_SUCCESS;

416: -- proj_fp_options.
417:
418: savepoint before_fp_baseline;
419:
420: x_return_status := FND_API.G_RET_STS_SUCCESS;
421: x_fc_version_created_flag := 'N';
422:
423: select bv.budget_type_code,
424: bv.resource_list_id,

Line 558: x_return_status := FND_API.G_RET_STS_ERROR;

554: PA_UTILS.Add_Message(p_app_short_name => 'PA',
555: p_msg_name => x_err_code);
556: */
557:
558: x_return_status := FND_API.G_RET_STS_ERROR;
559: x_msg_count := FND_MSG_PUB.Count_Msg;
560: if x_msg_count = 1 then
561: PA_INTERFACE_UTILS_PUB.get_messages
562: (p_encoded => FND_API.G_TRUE,

Line 562: (p_encoded => FND_API.G_TRUE,

558: x_return_status := FND_API.G_RET_STS_ERROR;
559: x_msg_count := FND_MSG_PUB.Count_Msg;
560: if x_msg_count = 1 then
561: PA_INTERFACE_UTILS_PUB.get_messages
562: (p_encoded => FND_API.G_TRUE,
563: p_msg_index => 1,
564: p_data => x_msg_data,
565: p_msg_index_out => l_msg_index_out);
566: end if;

Line 591: x_return_status := FND_API.G_RET_STS_ERROR;

587: if (x_err_code <> 0) then
588: PA_UTILS.Add_Message(p_app_short_name => 'PA',
589: p_msg_name => x_err_code);
590:
591: x_return_status := FND_API.G_RET_STS_ERROR;
592: x_msg_count := FND_MSG_PUB.Count_Msg;
593: if x_msg_count = 1 then
594: PA_INTERFACE_UTILS_PUB.get_messages
595: (p_encoded => FND_API.G_TRUE,

Line 595: (p_encoded => FND_API.G_TRUE,

591: x_return_status := FND_API.G_RET_STS_ERROR;
592: x_msg_count := FND_MSG_PUB.Count_Msg;
593: if x_msg_count = 1 then
594: PA_INTERFACE_UTILS_PUB.get_messages
595: (p_encoded => FND_API.G_TRUE,
596: p_msg_index => 1,
597: p_data => x_msg_data,
598: p_msg_index_out => l_msg_index_out);
599: end if;

Line 614: x_return_status := FND_API.G_RET_STS_ERROR;

610: if (x_err_code <> 0) then
611: PA_UTILS.Add_Message(p_app_short_name => 'PA',
612: p_msg_name => x_err_code);
613:
614: x_return_status := FND_API.G_RET_STS_ERROR;
615: x_msg_count := FND_MSG_PUB.Count_Msg;
616: if x_msg_count = 1 then
617: PA_INTERFACE_UTILS_PUB.get_messages
618: (p_encoded => FND_API.G_TRUE,

Line 618: (p_encoded => FND_API.G_TRUE,

614: x_return_status := FND_API.G_RET_STS_ERROR;
615: x_msg_count := FND_MSG_PUB.Count_Msg;
616: if x_msg_count = 1 then
617: PA_INTERFACE_UTILS_PUB.get_messages
618: (p_encoded => FND_API.G_TRUE,
619: p_msg_index => 1,
620: p_data => x_msg_data,
621: p_msg_index_out => l_msg_index_out);
622: end if;

Line 639: x_return_status := FND_API.G_RET_STS_ERROR;

635: if (x_err_code <> 0) then
636: PA_UTILS.Add_Message(p_app_short_name => 'PA',
637: p_msg_name => x_err_code);
638:
639: x_return_status := FND_API.G_RET_STS_ERROR;
640: x_msg_count := FND_MSG_PUB.Count_Msg;
641: if x_msg_count = 1 then
642: PA_INTERFACE_UTILS_PUB.get_messages
643: (p_encoded => FND_API.G_TRUE,

Line 643: (p_encoded => FND_API.G_TRUE,

639: x_return_status := FND_API.G_RET_STS_ERROR;
640: x_msg_count := FND_MSG_PUB.Count_Msg;
641: if x_msg_count = 1 then
642: PA_INTERFACE_UTILS_PUB.get_messages
643: (p_encoded => FND_API.G_TRUE,
644: p_msg_index => 1,
645: p_data => x_msg_data,
646: p_msg_index_out => l_msg_index_out);
647: end if;

Line 736: x_return_status := FND_API.G_RET_STS_ERROR;

732: if (x_err_code <> 0) then
733: PA_UTILS.Add_Message(p_app_short_name => 'PA',
734: p_msg_name => x_err_code);
735:
736: x_return_status := FND_API.G_RET_STS_ERROR;
737: x_msg_count := FND_MSG_PUB.Count_Msg;
738: if x_msg_count = 1 then
739: PA_INTERFACE_UTILS_PUB.get_messages
740: (p_encoded => FND_API.G_TRUE,

Line 740: (p_encoded => FND_API.G_TRUE,

736: x_return_status := FND_API.G_RET_STS_ERROR;
737: x_msg_count := FND_MSG_PUB.Count_Msg;
738: if x_msg_count = 1 then
739: PA_INTERFACE_UTILS_PUB.get_messages
740: (p_encoded => FND_API.G_TRUE,
741: p_msg_index => 1,
742: p_data => x_msg_data,
743: p_msg_index_out => l_msg_index_out);
744: end if;

Line 764: x_return_status := FND_API.G_RET_STS_ERROR;

760: if (x_err_code <> 0) then
761: PA_UTILS.Add_Message(p_app_short_name => 'PA',
762: p_msg_name => x_err_code);
763:
764: x_return_status := FND_API.G_RET_STS_ERROR;
765: x_msg_count := FND_MSG_PUB.Count_Msg;
766: if x_msg_count = 1 then
767: PA_INTERFACE_UTILS_PUB.get_messages
768: (p_encoded => FND_API.G_TRUE,

Line 768: (p_encoded => FND_API.G_TRUE,

764: x_return_status := FND_API.G_RET_STS_ERROR;
765: x_msg_count := FND_MSG_PUB.Count_Msg;
766: if x_msg_count = 1 then
767: PA_INTERFACE_UTILS_PUB.get_messages
768: (p_encoded => FND_API.G_TRUE,
769: p_msg_index => 1,
770: p_data => x_msg_data,
771: p_msg_index_out => l_msg_index_out);
772: end if;

Line 811: if x_return_status <> FND_API.G_RET_STS_SUCCESS then -- bug 2691822

807: x_msg_count => l_msg_count,
808: x_msg_data => l_msg_data);
809: /* PA_FIN_PLAN_PUB.Copy_Version may have generated errors */
810: --dbms_output.put_line('PA_FIN_PLAN_PUB.Copy_Version executed');
811: if x_return_status <> FND_API.G_RET_STS_SUCCESS then -- bug 2691822
812: PA_UTILS.Add_Message(p_app_short_name => 'PA',
813: p_msg_name => x_err_code);
814:
815: x_return_status := FND_API.G_RET_STS_ERROR;

Line 815: x_return_status := FND_API.G_RET_STS_ERROR;

811: if x_return_status <> FND_API.G_RET_STS_SUCCESS then -- bug 2691822
812: PA_UTILS.Add_Message(p_app_short_name => 'PA',
813: p_msg_name => x_err_code);
814:
815: x_return_status := FND_API.G_RET_STS_ERROR;
816: x_msg_count := FND_MSG_PUB.Count_Msg;
817: if x_msg_count = 1 then
818: PA_INTERFACE_UTILS_PUB.get_messages
819: (p_encoded => FND_API.G_TRUE,

Line 819: (p_encoded => FND_API.G_TRUE,

815: x_return_status := FND_API.G_RET_STS_ERROR;
816: x_msg_count := FND_MSG_PUB.Count_Msg;
817: if x_msg_count = 1 then
818: PA_INTERFACE_UTILS_PUB.get_messages
819: (p_encoded => FND_API.G_TRUE,
820: p_msg_index => 1,
821: p_data => x_msg_data,
822: p_msg_index_out => l_msg_index_out);
823: end if;

Line 960: (p_encoded => FND_API.G_TRUE,

956:
957: x_msg_count := FND_MSG_PUB.Count_Msg;
958: if x_msg_count = 1 then
959: PA_INTERFACE_UTILS_PUB.get_messages
960: (p_encoded => FND_API.G_TRUE,
961: p_msg_index => 1,
962: p_data => x_msg_data,
963: p_msg_index_out => l_msg_index_out);
964: end if;

Line 966: x_return_status := FND_API.G_RET_STS_ERROR;

962: p_data => x_msg_data,
963: p_msg_index_out => l_msg_index_out);
964: end if;
965: if x_msg_count > 0 then
966: x_return_status := FND_API.G_RET_STS_ERROR;
967: end if;
968:
969: Bug 3841942 Raja 21-Sep-04 */
970:

Line 985: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then

981: p_baseline_version_id => p_budget_version_id,
982: p_new_version_id => l_target_version_id,
983: x_return_status => l_return_status,
984: x_msg_code => l_error_msg_code);
985: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
986: PA_UTILS.ADD_MESSAGE(p_app_short_name => PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_PA,
987: p_msg_name => l_error_msg_code);
988:
989: RAISE pa_fin_plan_pub.rollback_on_error;

Line 1087: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1083: ,x_return_status => x_return_status
1084: ,x_msg_count => x_msg_count
1085: ,x_msg_data => x_msg_data);
1086:
1087: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1088:
1089: IF P_PA_DEBUG_MODE = 'Y' THEN
1090: pa_debug.g_err_stage:='Pa_Fin_Plan_Utils.Get_Curr_Working_Version_Info errored: project_id : ' ||
1091: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||

Line 1116: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1112: ,x_return_status => x_return_status
1113: ,x_msg_count => x_msg_count
1114: ,x_msg_data => x_msg_data);
1115:
1116: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1117:
1118: IF P_PA_DEBUG_MODE = 'Y' THEN
1119: pa_debug.g_err_stage:='Pa_fin_plan_pub.Create_Version errored. p_project_id ' ||
1120: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||

Line 1140: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1136: x_msg_count => l_msg_count,
1137: x_msg_data => l_msg_data);
1138:
1139:
1140: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1141:
1142: IF P_PA_DEBUG_MODE = 'Y' THEN
1143: pa_debug.g_err_stage:='PA_FIN_PLAN_PUB.Copy_Version errored: project_id : ' ||
1144: p_project_id || ' : l_target_version_id : ' ||

Line 1195: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1191: ,x_return_status => x_return_status
1192: ,x_msg_count => x_msg_count
1193: ,x_msg_data => x_msg_data);
1194:
1195: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1196:
1197: IF P_PA_DEBUG_MODE = 'Y' THEN
1198: pa_debug.g_err_stage:='Pa_Fin_Plan_Utils.Get_Curr_Working_Version_Info errored: project_id : ' ||
1199: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||

Line 1224: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1220: ,x_return_status => x_return_status
1221: ,x_msg_count => x_msg_count
1222: ,x_msg_data => x_msg_data);
1223:
1224: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1225:
1226: IF P_PA_DEBUG_MODE = 'Y' THEN
1227: pa_debug.g_err_stage:='Pa_fin_plan_pub.Create_Version errored. p_project_id ' ||
1228: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||

Line 1248: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1244: x_msg_count => l_msg_count,
1245: x_msg_data => l_msg_data);
1246:
1247:
1248: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1249:
1250: IF P_PA_DEBUG_MODE = 'Y' THEN
1251: pa_debug.g_err_stage:='PA_FIN_PLAN_PUB.Copy_Version errored: project_id : ' ||
1252: p_project_id || ' : l_target_version_id : ' ||

Line 1287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1283: EXCEPTION
1284:
1285: when pa_fin_plan_pvt.baseline_finplan_error then
1286: rollback to before_fp_baseline;
1287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1288: return;
1289: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1290: rollback to before_fp_baseline;
1291: --Bug 4044009

Line 1292: x_return_status := FND_API.G_RET_STS_ERROR;

1288: return;
1289: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1290: rollback to before_fp_baseline;
1291: --Bug 4044009
1292: x_return_status := FND_API.G_RET_STS_ERROR;
1293: l_msg_count := FND_MSG_PUB.count_msg;
1294: IF l_msg_count = 1 THEN
1295: PA_INTERFACE_UTILS_PUB.get_messages
1296: (p_encoded => FND_API.G_TRUE,

Line 1296: (p_encoded => FND_API.G_TRUE,

1292: x_return_status := FND_API.G_RET_STS_ERROR;
1293: l_msg_count := FND_MSG_PUB.count_msg;
1294: IF l_msg_count = 1 THEN
1295: PA_INTERFACE_UTILS_PUB.get_messages
1296: (p_encoded => FND_API.G_TRUE,
1297: p_msg_index => 1,
1298: p_msg_count => l_msg_count,
1299: p_msg_data => l_msg_data,
1300: p_data => l_data,

Line 1314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1310: --Bug 4044009
1311: RETURN;
1312: when others then
1313: rollback to before_fp_baseline;
1314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1315: x_msg_count := 1;
1316: x_msg_data := SQLERRM;
1317: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_PVT',
1318: p_procedure_name => 'Baseline_FinPlan');

Line 1322: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1318: p_procedure_name => 'Baseline_FinPlan');
1319: IF p_pa_debug_mode = 'Y' THEN
1320: pa_debug.reset_err_stack;
1321: END IF;
1322: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1323:
1324: END Baseline_FinPlan;
1325: /* ------------------------------------------------------------------------ */
1326:

Line 1391: if x_return_status = FND_API.G_RET_STS_ERROR then

1387: p_record_version_number => p_record_version_number,
1388: x_valid_flag => l_valid_flag,
1389: x_return_status => l_return_status,
1390: x_error_msg_code => l_error_msg_code);
1391: if x_return_status = FND_API.G_RET_STS_ERROR then
1392: IF P_PA_DEBUG_MODE = 'Y' THEN
1393: pa_debug.write_file('Submit_Current_Working_FinPlan: ' || 'record version number error ');
1394: END IF;
1395: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 1404: (p_encoded => FND_API.G_TRUE,

1400: l_msg_count := FND_MSG_PUB.count_msg;
1401: if l_msg_count > 0 then
1402: if l_msg_count = 1 then
1403: PA_INTERFACE_UTILS_PUB.get_messages
1404: (p_encoded => FND_API.G_TRUE,
1405: p_msg_index => 1,
1406: p_msg_count => l_msg_count,
1407: p_msg_data => l_msg_data,
1408: p_data => l_data,

Line 1422: x_return_status := FND_API.G_RET_STS_SUCCESS;

1418: return;
1419: end if;
1420:
1421: ----- IF NO BUSINESS RULES VIOLATIONS, PROCEED AS USUAL -----
1422: x_return_status := FND_API.G_RET_STS_SUCCESS;
1423: savepoint before_fp_sbmt_cur_working;
1424: --dbms_output.put_line('passed all violations');
1425: -- retrieve all necessary parameters for further processing
1426: select bv.budget_type_code,

Line 1519: x_return_status := FND_API.G_RET_STS_ERROR;

1515:
1516: if (l_err_msg_count > 0 ) then
1517: if (l_warnings_only_flag = 'N') then
1518:
1519: x_return_status := FND_API.G_RET_STS_ERROR;
1520: x_msg_count := FND_MSG_PUB.Count_Msg;
1521: if x_msg_count = 1 then
1522: PA_INTERFACE_UTILS_PUB.get_messages
1523: (p_encoded => FND_API.G_TRUE,

Line 1523: (p_encoded => FND_API.G_TRUE,

1519: x_return_status := FND_API.G_RET_STS_ERROR;
1520: x_msg_count := FND_MSG_PUB.Count_Msg;
1521: if x_msg_count = 1 then
1522: PA_INTERFACE_UTILS_PUB.get_messages
1523: (p_encoded => FND_API.G_TRUE,
1524: p_msg_index => 1,
1525: p_data => x_msg_data,
1526: p_msg_index_out => l_msg_index_out);
1527: end if;

Line 1594: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1590:
1591: EXCEPTION
1592: when check_wf_error then
1593: rollback to before_fp_sbmt_cur_working;
1594: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1595:
1596: when start_wf_error then
1597: rollback to before_fp_sbmt_cur_working;
1598: raise FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1598: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1594: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1595:
1596: when start_wf_error then
1597: rollback to before_fp_sbmt_cur_working;
1598: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1599:
1600: when others then
1601: rollback to before_fp_sbmt_cur_working;
1602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1598: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1599:
1600: when others then
1601: rollback to before_fp_sbmt_cur_working;
1602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1603: x_msg_count := 1;
1604: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_PVT',
1605: p_procedure_name => 'Submit_Current_Working_FinPlan');
1606: IF p_pa_debug_mode = 'Y' THEN

Line 1609: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1605: p_procedure_name => 'Submit_Current_Working_FinPlan');
1606: IF p_pa_debug_mode = 'Y' THEN
1607: pa_debug.reset_err_stack;
1608: END IF;
1609: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1610:
1611: END Submit_Current_Working_FinPlan;
1612: /* ------------------------------------------------------------------------ */
1613:

Line 1713: x_return_status := FND_API.G_RET_STS_SUCCESS;

1709: l_msg_index_out number;
1710:
1711: BEGIN
1712:
1713: x_return_status := FND_API.G_RET_STS_SUCCESS;
1714:
1715: x_ci_rec_tab.delete;
1716:
1717: If p_to_bv_id is not null then

Line 1770: x_return_status := FND_API.G_RET_STS_SUCCESS;

1766: Close c2;
1767:
1768: End if;
1769:
1770: x_return_status := FND_API.G_RET_STS_SUCCESS;
1771: x_msg_count := FND_MSG_PUB.Count_Msg;
1772:
1773: EXCEPTION WHEN OTHERS THEN
1774: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1774: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1770: x_return_status := FND_API.G_RET_STS_SUCCESS;
1771: x_msg_count := FND_MSG_PUB.Count_Msg;
1772:
1773: EXCEPTION WHEN OTHERS THEN
1774: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1775: x_msg_count := 1;
1776: x_msg_data := substr(SQLERRM,1,240);
1777:
1778: fnd_msg_pub.add_exc_msg

Line 1824: x_return_status := FND_API.G_RET_STS_SUCCESS;

1820: l_stage NUMBER := null;
1821: l_impact_type_code pa_ci_impacts.impact_type_code%TYPE;
1822:
1823: BEGIN
1824: x_return_status := FND_API.G_RET_STS_SUCCESS;
1825: l_stage := 10;
1826: open c1;
1827: l_stage := 20;
1828: fetch c1 into l_approved_budget_plan_type,

Line 1854: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1850: ,x_return_status => l_return_status
1851: ,x_msg_count => l_msg_count
1852: ,x_msg_data => l_msg_data);
1853:
1854: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1855: fnd_msg_pub.add_exc_msg
1856: ( p_pkg_name => 'pa_fin_plan_pvt'
1857: ,p_procedure_name => 'handle_ci_links'
1858: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));

Line 1879: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1875: , x_msg_count => l_msg_count
1876: , x_msg_data => l_msg_data);
1877:
1878:
1879: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1880: fnd_msg_pub.add_exc_msg
1881: ( p_pkg_name => 'pa_fin_plan_pvt'
1882: ,p_procedure_name => 'handle_ci_links'
1883: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));

Line 1915: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1911: ,x_msg_count => l_msg_count
1912: ,x_msg_data => l_msg_data
1913: ) ;
1914:
1915: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1916: fnd_msg_pub.add_exc_msg
1917: ( p_pkg_name => 'pa_fin_plan_pvt'
1918: ,p_procedure_name => 'handle_ci_links'
1919: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));

Line 1920: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS

1916: fnd_msg_pub.add_exc_msg
1917: ( p_pkg_name => 'pa_fin_plan_pvt'
1918: ,p_procedure_name => 'handle_ci_links'
1919: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
1920: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1921: END LOOP;
1922: END IF; -- l_ci_rec_tab.count > 0
1923: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1924: END IF; -- l_fin_plan_version_id IS NOT NULL

Line 1923: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS

1919: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
1920: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1921: END LOOP;
1922: END IF; -- l_ci_rec_tab.count > 0
1923: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1924: END IF; -- l_fin_plan_version_id IS NOT NULL
1925: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1926:
1927: /* Get CI from Old Current Working and not there in New Current Working

Line 1925: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS

1921: END LOOP;
1922: END IF; -- l_ci_rec_tab.count > 0
1923: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1924: END IF; -- l_fin_plan_version_id IS NOT NULL
1925: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1926:
1927: /* Get CI from Old Current Working and not there in New Current Working
1928: and change their status to un-implemented - At this stage New Current Working
1929: contains the links to ci from Latest Baselined version */

Line 1943: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1939: , x_msg_count => l_msg_count
1940: , x_msg_data => l_msg_data);
1941:
1942:
1943: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1944: fnd_msg_pub.add_exc_msg
1945: ( p_pkg_name => 'pa_fin_plan_pvt'
1946: ,p_procedure_name => 'handle_ci_links'
1947: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));

Line 1984: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1980: ,x_return_status => l_return_status
1981: ,x_msg_count => l_msg_count
1982: ,x_msg_data => l_msg_data);
1983:
1984: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1985: fnd_msg_pub.add_exc_msg
1986: ( p_pkg_name => 'pa_fin_plan_pvt'
1987: ,p_procedure_name => 'handle_ci_links'
1988: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));

Line 1989: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS

1985: fnd_msg_pub.add_exc_msg
1986: ( p_pkg_name => 'pa_fin_plan_pvt'
1987: ,p_procedure_name => 'handle_ci_links'
1988: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
1989: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1990: END LOOP;
1991: END IF; -- l_ci_rec_tab.count > 0
1992: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1993:

Line 1992: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS

1988: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
1989: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1990: END LOOP;
1991: END IF; -- l_ci_rec_tab.count > 0
1992: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1993:
1994:
1995: /* Get CI from New Current Working which have not been implemented
1996: and change their status to implemented */

Line 2010: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2006: , x_msg_count => l_msg_count
2007: , x_msg_data => l_msg_data);
2008:
2009:
2010: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2011: fnd_msg_pub.add_exc_msg
2012: ( p_pkg_name => 'pa_fin_plan_pvt'
2013: ,p_procedure_name => 'handle_ci_links'
2014: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));

Line 2037: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2033: ,x_return_status => l_return_status
2034: ,x_msg_count => l_msg_count
2035: ,x_msg_data => l_msg_data);
2036:
2037: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2038: fnd_msg_pub.add_exc_msg
2039: ( p_pkg_name => 'pa_fin_plan_pvt'
2040: ,p_procedure_name => 'handle_ci_links'
2041: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));

Line 2042: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS

2038: fnd_msg_pub.add_exc_msg
2039: ( p_pkg_name => 'pa_fin_plan_pvt'
2040: ,p_procedure_name => 'handle_ci_links'
2041: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
2042: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
2043: END LOOP;
2044: END IF; -- l_ci_rec_tab.count > 0
2045: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
2046:

Line 2045: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS

2041: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
2042: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
2043: END LOOP;
2044: END IF; -- l_ci_rec_tab.count > 0
2045: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
2046:
2047: END IF; -- l_approved_budget_plan_type = 'Y'
2048: x_return_status := FND_API.G_RET_STS_SUCCESS;
2049: x_msg_count := FND_MSG_PUB.Count_Msg;

Line 2048: x_return_status := FND_API.G_RET_STS_SUCCESS;

2044: END IF; -- l_ci_rec_tab.count > 0
2045: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
2046:
2047: END IF; -- l_approved_budget_plan_type = 'Y'
2048: x_return_status := FND_API.G_RET_STS_SUCCESS;
2049: x_msg_count := FND_MSG_PUB.Count_Msg;
2050:
2051: EXCEPTION WHEN NO_DATA_FOUND THEN
2052: l_approved_budget_plan_type := 'N';

Line 2054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2050:
2051: EXCEPTION WHEN NO_DATA_FOUND THEN
2052: l_approved_budget_plan_type := 'N';
2053: WHEN OTHERS THEN
2054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2055: x_msg_count := FND_MSG_PUB.Count_Msg;
2056: IF x_msg_count = 1 THEN
2057: pa_interface_utils_pub.get_messages ( p_encoded => FND_API.G_TRUE
2058: ,p_msg_index => 1

Line 2057: pa_interface_utils_pub.get_messages ( p_encoded => FND_API.G_TRUE

2053: WHEN OTHERS THEN
2054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2055: x_msg_count := FND_MSG_PUB.Count_Msg;
2056: IF x_msg_count = 1 THEN
2057: pa_interface_utils_pub.get_messages ( p_encoded => FND_API.G_TRUE
2058: ,p_msg_index => 1
2059: ,p_data => x_msg_data
2060: ,p_msg_index_out => l_msg_index_out);
2061: END IF;

Line 2203: x_return_status := FND_API.G_RET_STS_SUCCESS;

2199: l_rlm_id_tbl SYSTEM.pa_num_tbl_type:=SYSTEM.pa_num_tbl_type();
2200: BEGIN
2201:
2202: x_msg_count := 0;
2203: x_return_status := FND_API.G_RET_STS_SUCCESS;
2204: IF p_pa_debug_mode = 'Y' THEN
2205: pa_debug.set_err_stack('PA_FIN_PLAN_PVT.CREATE_DRAFT');
2206: END IF;
2207: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);

Line 2241: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2237: ,x_return_status => x_return_status
2238: ,x_msg_count => x_msg_count
2239: ,x_msg_data => x_msg_data );
2240:
2241: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2242: pa_debug.g_err_stage:= 'Error Calling Get_Baselined_Version_Info';
2243: IF P_PA_DEBUG_MODE = 'Y' THEN
2244: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2245: END IF;

Line 2288: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2284: ,x_return_status => x_return_status
2285: ,x_msg_count => x_msg_count
2286: ,x_msg_data => x_msg_data );
2287:
2288: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2289: Raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2290: END IF;
2291:
2292: pa_debug.g_err_stage:='Current working version id -> ' || l_curr_work_version_id;

Line 2307: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2303: ,x_return_status => x_return_status
2304: ,x_msg_count => x_msg_count
2305: ,x_msg_data => x_msg_data );
2306:
2307: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2308: pa_debug.g_err_stage:= 'Could not obtain the CI information for the version';
2309: IF P_PA_DEBUG_MODE = 'Y' THEN
2310: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2311: END IF;

Line 2348: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

2344: x_return_status => x_return_status,
2345: x_msg_count => x_msg_count,
2346: x_msg_data => x_msg_data) ;
2347:
2348: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2349:
2350: IF l_debug_mode = 'Y' THEN
2351: pa_debug.g_err_stage := 'Error in lock unlock version - cannot delete working version';
2352: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);

Line 2371: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2367: ,x_msg_count => x_msg_count
2368: ,x_msg_data => x_msg_data
2369: );
2370:
2371: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2372: pa_debug.g_err_stage:= 'Could not delete the current working version';
2373: IF P_PA_DEBUG_MODE = 'Y' THEN
2374: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2375: END IF;

Line 2477: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2473: ,x_return_status => x_return_status
2474: ,x_msg_count => x_msg_count
2475: ,x_msg_data => x_msg_data );
2476:
2477: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2478: pa_debug.g_err_stage:= 'Error in calling Create_Version';
2479: IF P_PA_DEBUG_MODE = 'Y' THEN
2480: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2481: END IF;

Line 2514: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2510: ,x_return_status => x_return_status
2511: ,x_msg_count => x_msg_count
2512: ,x_msg_data => x_msg_data );
2513:
2514: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2515: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2516: END IF;
2517:
2518: -- Further processing is required only if the newly created version is not the current working verion

Line 2538: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

2534: x_return_status => x_return_status,
2535: x_msg_count => x_msg_count,
2536: x_msg_data => x_msg_data) ;
2537:
2538: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2539:
2540: IF l_debug_mode = 'Y' THEN
2541: pa_debug.g_err_stage := 'Error executing lock unlock version';
2542: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);

Line 2567: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2563: x_return_status => x_return_status,
2564: x_msg_count => x_msg_count,
2565: x_msg_data => x_msg_data);
2566:
2567: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2568: IF P_PA_DEBUG_MODE = 'Y' THEN
2569: pa_debug.g_err_stage:= 'Error executing Set_Current_Working ';
2570: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2571: END IF;

Line 2675: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2671: ,x_return_status => x_return_status
2672: ,x_msg_count => x_msg_count
2673: ,x_msg_data => x_msg_data);
2674:
2675: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2676: Raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2677: END IF;
2678:
2679:

Line 2691: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2687: ,x_return_status => x_return_status
2688: ,x_msg_count => x_msg_count
2689: ,x_msg_data => x_msg_data);
2690:
2691: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2692: Raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2693: END IF;
2694:
2695: */

Line 2712: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2708: ,X_return_status => x_return_status
2709: ,X_msg_count => x_msg_count
2710: ,X_msg_data => x_msg_data);
2711:
2712: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2713: Raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2714: END IF;
2715:
2716: ELSE

Line 2747: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2743: ,x_return_status => x_return_status
2744: ,x_msg_count => x_msg_count
2745: ,x_msg_data => x_msg_data);
2746:
2747: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2748: pa_debug.g_err_stage := 'Error while fetching uncat res list id info ...';
2749: IF P_PA_DEBUG_MODE = 'Y' THEN
2750: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);
2751: END IF;

Line 2770: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2766: x_return_status => x_return_status,
2767: x_msg_count => x_msg_count,
2768: x_msg_data => x_msg_data);
2769:
2770: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2771: pa_debug.g_err_stage:= 'Exception while inserting a row into pa_resource_assignments;';
2772: IF P_PA_DEBUG_MODE = 'Y' THEN
2773: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2774: END IF;

Line 2800: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2796: ,x_return_status => x_return_status
2797: ,x_msg_count => x_msg_count
2798: ,x_msg_data => x_msg_data );
2799:
2800: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2801: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';
2802: IF P_PA_DEBUG_MODE = 'Y' THEN
2803: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2804: END IF;

Line 2819: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2815: ,x_return_status => x_return_status
2816: ,x_msg_count => x_msg_count
2817: ,x_msg_data => x_msg_data );
2818:
2819: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2820: pa_debug.g_err_stage:= 'Error Calling ADD_FIN_PLAN_LINES';
2821: IF P_PA_DEBUG_MODE = 'Y' THEN
2822: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2823: END IF;

Line 2845: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2841: ,x_return_status => x_return_status
2842: ,x_msg_count => x_msg_count
2843: ,x_msg_data => x_msg_data);
2844:
2845: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2846: pa_debug.g_err_stage:= 'Error Calling FP_CI_LINK_CONTROL_ITEMS';
2847: IF P_PA_DEBUG_MODE = 'Y' THEN
2848: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2849: END IF;

Line 2851: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS

2847: IF P_PA_DEBUG_MODE = 'Y' THEN
2848: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2849: END IF;
2850: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2851: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
2852:
2853: END LOOP; --first..last
2854: END IF; -- l_ci_rec_tab is not null */
2855:

Line 2867: x_return_status := FND_API.G_RET_STS_ERROR;

2863: EXCEPTION
2864:
2865: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
2866:
2867: x_return_status := FND_API.G_RET_STS_ERROR;
2868: l_msg_count := FND_MSG_PUB.count_msg;
2869: IF l_msg_count = 1 THEN
2870: PA_INTERFACE_UTILS_PUB.get_messages
2871: (p_encoded => FND_API.G_TRUE

Line 2871: (p_encoded => FND_API.G_TRUE

2867: x_return_status := FND_API.G_RET_STS_ERROR;
2868: l_msg_count := FND_MSG_PUB.count_msg;
2869: IF l_msg_count = 1 THEN
2870: PA_INTERFACE_UTILS_PUB.get_messages
2871: (p_encoded => FND_API.G_TRUE
2872: ,p_msg_index => 1
2873: ,p_msg_count => l_msg_count
2874: ,p_msg_data => l_msg_data
2875: ,p_data => l_data

Line 2892: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2888: RAISE;
2889:
2890: WHEN others THEN
2891:
2892: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2893: x_msg_count := 1;
2894: x_msg_data := SQLERRM;
2895: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
2896: ,p_procedure_name => 'CREATE_DRAFT');

Line 3004: x_return_status := FND_API.G_RET_STS_SUCCESS;

3000:
3001: BEGIN
3002:
3003: x_msg_count := 0;
3004: x_return_status := FND_API.G_RET_STS_SUCCESS;
3005:
3006: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3007: l_debug_mode := NVL(l_debug_mode, 'Y');
3008: IF p_pa_debug_mode = 'Y' THEN

Line 3291: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

3287: ,x_return_status => x_return_status
3288: ,x_msg_count => x_msg_count
3289: ,x_msg_data => x_msg_data );
3290:
3291: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3292: IF P_PA_DEBUG_MODE = 'Y' THEN
3293: pa_debug.g_err_stage:= 'Error Calling create_assgmt_from_rolluptmp';
3294: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3295: END IF;

Line 3317: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

3313: ,x_return_status => x_return_status
3314: ,x_msg_count => x_msg_count
3315: ,x_msg_data => x_msg_data );
3316:
3317: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3318:
3319: IF P_PA_DEBUG_MODE = 'Y' THEN
3320: pa_debug.g_err_stage:= 'Error Calling PROCESS_MODIFIED_LINES';
3321: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);

Line 3683: x_return_status := FND_API.G_RET_STS_ERROR;

3679: END IF;
3680: EXCEPTION
3681: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3682:
3683: x_return_status := FND_API.G_RET_STS_ERROR;
3684: l_msg_count := FND_MSG_PUB.count_msg;
3685: IF l_msg_count = 1 THEN
3686: PA_INTERFACE_UTILS_PUB.get_messages
3687: (p_encoded => FND_API.G_TRUE

Line 3687: (p_encoded => FND_API.G_TRUE

3683: x_return_status := FND_API.G_RET_STS_ERROR;
3684: l_msg_count := FND_MSG_PUB.count_msg;
3685: IF l_msg_count = 1 THEN
3686: PA_INTERFACE_UTILS_PUB.get_messages
3687: (p_encoded => FND_API.G_TRUE
3688: ,p_msg_index => 1
3689: ,p_msg_count => l_msg_count
3690: ,p_msg_data => l_msg_data
3691: ,p_data => l_data

Line 3708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3704: RAISE;
3705:
3706: WHEN others THEN
3707:
3708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3709: x_msg_count := 1;
3710: x_msg_data := SQLERRM;
3711: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
3712: ,p_procedure_name => 'CREATE_FINPLAN_LINES');

Line 3794: x_return_status := FND_API.G_RET_STS_SUCCESS;

3790:
3791: BEGIN
3792:
3793: x_msg_count := 0;
3794: x_return_status := FND_API.G_RET_STS_SUCCESS;
3795: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3796:
3797: IF p_pa_debug_mode = 'Y' THEN
3798: pa_debug.set_curr_function( p_function => 'convert_plan_type_name_to_id',

Line 3816: x_return_status := FND_API.G_RET_STS_ERROR;

3812: p_msg_name => 'PA_FP_INVALID_PLAN_TYPE',
3813: p_token1 => 'PLAN_TYPE',
3814: p_value1 => p_fin_plan_type_id);
3815:
3816: x_return_status := FND_API.G_RET_STS_ERROR;
3817: x_fin_plan_type_id:=NULL;
3818: CLOSE l_fin_plan_type_id_csr;
3819: IF l_debug_mode='Y' THEN
3820: pa_debug.g_err_stage := 'p_fin_plan_type_id is '||p_fin_plan_type_id ;

Line 3844: x_return_status := FND_API.G_RET_STS_ERROR;

3840: p_msg_name => 'PA_FP_INVALID_PLAN_TYPE',
3841: p_token1 => 'PLAN_TYPE',
3842: p_value1 => p_fin_plan_type_name);
3843:
3844: x_return_status := FND_API.G_RET_STS_ERROR;
3845: IF l_debug_mode='Y' THEN
3846: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3847: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3848: ,pa_debug.g_err_stage,l_debug_level5);

Line 3866: x_return_status := FND_API.G_RET_STS_ERROR;

3862: PA_UTILS.ADD_MESSAGE
3863: (p_app_short_name => 'PA',
3864: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
3865:
3866: x_return_status := FND_API.G_RET_STS_ERROR;
3867: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3868: END IF;
3869:
3870: IF l_debug_mode='Y' THEN

Line 3880: x_return_status = FND_API.G_RET_STS_SUCCESS THEN

3876: EXCEPTION
3877: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3878:
3879: IF x_return_status IS NULL OR
3880: x_return_status = FND_API.G_RET_STS_SUCCESS THEN
3881: x_return_status := FND_API.G_RET_STS_ERROR;
3882: END IF;
3883: l_msg_count := FND_MSG_PUB.count_msg;
3884:

Line 3881: x_return_status := FND_API.G_RET_STS_ERROR;

3877: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3878:
3879: IF x_return_status IS NULL OR
3880: x_return_status = FND_API.G_RET_STS_SUCCESS THEN
3881: x_return_status := FND_API.G_RET_STS_ERROR;
3882: END IF;
3883: l_msg_count := FND_MSG_PUB.count_msg;
3884:
3885: IF l_msg_count = 1 and x_msg_data IS NULL THEN

Line 3887: (p_encoded => FND_API.G_TRUE

3883: l_msg_count := FND_MSG_PUB.count_msg;
3884:
3885: IF l_msg_count = 1 and x_msg_data IS NULL THEN
3886: PA_INTERFACE_UTILS_PUB.get_messages
3887: (p_encoded => FND_API.G_TRUE
3888: ,p_msg_index => 1
3889: ,p_msg_count => l_msg_count
3890: ,p_msg_data => l_msg_data
3891: ,p_data => l_data

Line 3905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3901: RETURN;
3902:
3903: WHEN OTHERS THEN
3904:
3905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3906: x_msg_count := 1;
3907: x_msg_data := SQLERRM;
3908:
3909:

Line 3979: x_return_status := FND_API.G_RET_STS_SUCCESS;

3975:
3976: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3977: l_debug_mode := NVL(l_debug_mode, 'N');
3978: x_msg_count := 0;
3979: x_return_status := FND_API.G_RET_STS_SUCCESS;
3980: IF p_pa_debug_mode = 'Y' THEN
3981: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_option',
3982: p_debug_mode => l_debug_mode );
3983: END IF;

Line 4062: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4058: ,x_return_status => l_return_status
4059: ,x_msg_count => l_msg_count
4060: ,x_msg_data => l_msg_data);
4061:
4062: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4063:
4064: IF l_debug_mode = 'Y' THEN
4065: pa_debug.g_err_stage:='Call to Delete_wp_budget_versions is returning error status';
4066: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);

Line 4106: (p_encoded => FND_API.G_TRUE

4102: ROLLBACK TO SAVEPOINT PA_FP_PUB_DELETE_VER;
4103: l_msg_count := FND_MSG_PUB.count_msg;
4104: IF l_msg_count = 1 THEN
4105: PA_INTERFACE_UTILS_PUB.get_messages
4106: (p_encoded => FND_API.G_TRUE
4107: ,p_msg_index => 1
4108: ,p_msg_count => l_msg_count
4109: ,p_msg_data => l_msg_data
4110: ,p_data => l_data

Line 4118: x_return_status := FND_API.G_RET_STS_ERROR;

4114: ELSE
4115: x_msg_count := l_msg_count;
4116: END IF;
4117:
4118: x_return_status := FND_API.G_RET_STS_ERROR;
4119:
4120: IF l_debug_mode = 'Y' THEN
4121: pa_debug.g_err_stage:='Delete_wp_budget_versions returned error';
4122: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);

Line 4130: (p_encoded => FND_API.G_TRUE

4126: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
4127: l_msg_count := FND_MSG_PUB.count_msg;
4128: IF l_msg_count = 1 THEN
4129: PA_INTERFACE_UTILS_PUB.get_messages
4130: (p_encoded => FND_API.G_TRUE
4131: ,p_msg_index => 1
4132: ,p_msg_count => l_msg_count
4133: ,p_msg_data => l_msg_data
4134: ,p_data => l_data

Line 4142: x_return_status := FND_API.G_RET_STS_ERROR;

4138: ELSE
4139: x_msg_count := l_msg_count;
4140: END IF;
4141:
4142: x_return_status := FND_API.G_RET_STS_ERROR;
4143:
4144: IF l_debug_mode = 'Y' THEN
4145: pa_debug.g_err_stage:='Invalid Arguments Passed';
4146: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);

Line 4152: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4148: END IF;
4149:
4150: WHEN Others THEN
4151: ROLLBACK TO SAVEPOINT DELETE_WP_OPTION_SAVE;
4152: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4153: x_msg_count := 1;
4154: x_msg_data := SQLERRM;
4155: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PVT'
4156: ,p_procedure_name => 'Delete_wp_option');

Line 4205: x_return_status := FND_API.G_RET_STS_SUCCESS;

4201:
4202: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4203: l_debug_mode := NVL(l_debug_mode, 'N');
4204: x_msg_count := 0;
4205: x_return_status := FND_API.G_RET_STS_SUCCESS;
4206: IF p_pa_debug_mode = 'Y' THEN
4207: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_bugdet_versions',
4208: p_debug_mode => l_debug_mode );
4209: END IF;

Line 4272: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4268: x_return_Status => l_return_Status,
4269: x_msg_count => l_msg_count,
4270: x_msg_data => l_msg_data);
4271:
4272: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4273: RAISE Delete_Ver_Exc_PVT;
4274: END IF;
4275:
4276: END LOOP; -- LoopB Closed

Line 4287: (p_encoded => FND_API.G_TRUE

4283: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
4284: l_msg_count := FND_MSG_PUB.count_msg;
4285: IF l_msg_count = 1 THEN
4286: PA_INTERFACE_UTILS_PUB.get_messages
4287: (p_encoded => FND_API.G_TRUE
4288: ,p_msg_index => 1
4289: ,p_msg_count => l_msg_count
4290: ,p_msg_data => l_msg_data
4291: ,p_data => l_data

Line 4299: x_return_status := FND_API.G_RET_STS_ERROR;

4295: ELSE
4296: x_msg_count := l_msg_count;
4297: END IF;
4298:
4299: x_return_status := FND_API.G_RET_STS_ERROR;
4300:
4301: IF l_debug_mode = 'Y' THEN
4302: pa_debug.g_err_stage:='Invalid Arguments Passed';
4303: pa_debug.write('Delete_wp_budget_version: ' || g_module_name,pa_debug.g_err_stage,5);

Line 4312: (p_encoded => FND_API.G_TRUE

4308: ROLLBACK TO SAVEPOINT PA_FP_PUB_DELETE_VER;
4309: l_msg_count := FND_MSG_PUB.count_msg;
4310: IF l_msg_count = 1 THEN
4311: PA_INTERFACE_UTILS_PUB.get_messages
4312: (p_encoded => FND_API.G_TRUE
4313: ,p_msg_index => 1
4314: ,p_msg_count => l_msg_count
4315: ,p_msg_data => l_msg_data
4316: ,p_data => l_data

Line 4323: x_return_status := FND_API.G_RET_STS_ERROR;

4319: x_msg_count := l_msg_count;
4320: ELSE
4321: x_msg_count := l_msg_count;
4322: END IF;
4323: x_return_status := FND_API.G_RET_STS_ERROR;
4324:
4325: IF l_debug_mode = 'Y' THEN
4326: pa_debug.g_err_stage:='Delete_version_helper returned error';
4327: pa_debug.write('Delete_wp_options: ' || g_module_name,pa_debug.g_err_stage,5);

Line 4333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4329: END IF;
4330:
4331: WHEN Others THEN
4332: ROLLBACK TO SAVEPOINT DELETE_WP_OPTION_SAVE;
4333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4334: x_msg_count := 1;
4335: x_msg_data := SQLERRM;
4336: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PVT'
4337: ,p_procedure_name => 'Delete_wp_budget_versions');

Line 4399: x_return_status := FND_API.G_RET_STS_SUCCESS;

4395:
4396: BEGIN
4397:
4398: x_msg_count := 0;
4399: x_return_status := FND_API.G_RET_STS_SUCCESS;
4400: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4401: l_debug_mode := NVL(l_debug_mode, 'Y');
4402:
4403: IF p_pa_debug_mode = 'Y' THEN

Line 4446: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

4442: pa_debug.g_err_stage:='Return Status After CREATE_FINPLAN_LINES :'||x_return_status;
4443: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4444: END IF;
4445:
4446: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4447:
4448: IF P_PA_DEBUG_MODE = 'Y' THEN
4449: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';
4450: pa_debug.write('CREATE_DRAFT: '||g_module_name,pa_debug.g_err_stage,5);

Line 4693: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4689: pa_debug.g_err_stage:='Return Status After CALCULATE :'||x_return_status;
4690: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4691: END IF;
4692:
4693: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4694:
4695: IF l_debug_mode = 'Y' THEN
4696: pa_debug.g_err_stage:='Called API PA_FP_CALC_PLAN_PKG.calculate returned error';
4697: pa_debug.write(l_module_name,pa_debug.g_err_stage, l_debug_level3);

Line 4712: x_return_status := FND_API.G_RET_STS_ERROR;

4708: EXCEPTION
4709:
4710: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
4711:
4712: x_return_status := FND_API.G_RET_STS_ERROR;
4713: l_msg_count := FND_MSG_PUB.count_msg;
4714:
4715: IF l_msg_count = 1 THEN
4716: PA_INTERFACE_UTILS_PUB.get_messages

Line 4717: (p_encoded => FND_API.G_TRUE

4713: l_msg_count := FND_MSG_PUB.count_msg;
4714:
4715: IF l_msg_count = 1 THEN
4716: PA_INTERFACE_UTILS_PUB.get_messages
4717: (p_encoded => FND_API.G_TRUE
4718: ,p_msg_index => 1
4719: ,p_msg_count => l_msg_count
4720: ,p_msg_data => l_msg_data
4721: ,p_data => l_data

Line 4739: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4735: RETURN;
4736:
4737: WHEN others THEN
4738:
4739: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4740: x_msg_count := 1;
4741: x_msg_data := SQLERRM;
4742:
4743: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'