eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_PROGRESS_PUB dependencies on FND_API

Line 11: p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE,

7: g1_debug_mode varchar2(1) := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',fnd_global.user_id,fnd_global.login_id,275,null,null), 'N');
8:
9: PROCEDURE UPDATE_TASK_PROGRESS(
10: p_api_version IN NUMBER :=1.0,
11: p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE,
12: p_commit IN VARCHAR2 :=FND_API.G_FALSE,
13: p_validate_only IN VARCHAR2 :=FND_API.G_TRUE,
14: p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
15: p_calling_module IN VARCHAR2 :='SELF_SERVICE',

Line 12: p_commit IN VARCHAR2 :=FND_API.G_FALSE,

8:
9: PROCEDURE UPDATE_TASK_PROGRESS(
10: p_api_version IN NUMBER :=1.0,
11: p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE,
12: p_commit IN VARCHAR2 :=FND_API.G_FALSE,
13: p_validate_only IN VARCHAR2 :=FND_API.G_TRUE,
14: p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
15: p_calling_module IN VARCHAR2 :='SELF_SERVICE',
16: p_calling_mode IN VARCHAR2 := null,-- bug 4287638

Line 13: p_validate_only IN VARCHAR2 :=FND_API.G_TRUE,

9: PROCEDURE UPDATE_TASK_PROGRESS(
10: p_api_version IN NUMBER :=1.0,
11: p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE,
12: p_commit IN VARCHAR2 :=FND_API.G_FALSE,
13: p_validate_only IN VARCHAR2 :=FND_API.G_TRUE,
14: p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
15: p_calling_module IN VARCHAR2 :='SELF_SERVICE',
16: p_calling_mode IN VARCHAR2 := null,-- bug 4287638
17: p_debug_mode IN VARCHAR2 :='N',

Line 14: p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,

10: p_api_version IN NUMBER :=1.0,
11: p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE,
12: p_commit IN VARCHAR2 :=FND_API.G_FALSE,
13: p_validate_only IN VARCHAR2 :=FND_API.G_TRUE,
14: p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
15: p_calling_module IN VARCHAR2 :='SELF_SERVICE',
16: p_calling_mode IN VARCHAR2 := null,-- bug 4287638
17: p_debug_mode IN VARCHAR2 :='N',
18: p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,

Line 674: IF (p_commit = FND_API.G_TRUE) THEN

670: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_TASK_PROGRESS', x_Msg => 'p_planned_cost='||p_planned_cost, x_Log_Level=> 3);
671: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_TASK_PROGRESS', x_Msg => 'p_planned_effort='||p_planned_effort, x_Log_Level=> 3);
672: END IF;
673:
674: IF (p_commit = FND_API.G_TRUE) THEN
675: savepoint UPDATE_TASK_PROGRESS;
676: END IF;
677:
678: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 678: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

674: IF (p_commit = FND_API.G_TRUE) THEN
675: savepoint UPDATE_TASK_PROGRESS;
676: END IF;
677:
678: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: END IF;
681:
682: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

675: savepoint UPDATE_TASK_PROGRESS;
676: END IF;
677:
678: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: END IF;
681:
682: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
683: FND_MSG_PUB.initialize;

Line 682: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

678: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: END IF;
681:
682: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
683: FND_MSG_PUB.initialize;
684: END IF;
685:
686: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 686: x_return_status := FND_API.G_RET_STS_SUCCESS;

682: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
683: FND_MSG_PUB.initialize;
684: END IF;
685:
686: x_return_status := FND_API.G_RET_STS_SUCCESS;
687:
688: --BUG 4085882, added by rtarway
689: --bug 4320365, changed to p_calling_mode from p_calling_module
690: --the code to set prog_as_of_date is needed.

Line 744: raise FND_API.G_EXC_ERROR;

740: ,x_msg_data => l_msg_data
741: );
742: -- Bug 4632744 : Added Return Status check
743: IF l_return_status <> 'S' THEN
744: raise FND_API.G_EXC_ERROR;
745: END IF;
746: END LOOP;
747: -- if there are working deliverable records associated with this task, we need to puyblish those deliverable progress
748: FOR l_working_dlvr_rec in c_dlvr_working_prog (p_project_id , p_object_id, p_object_version_id ) LOOP

Line 780: raise FND_API.G_EXC_ERROR;

776: ,x_msg_data => l_msg_data
777: );
778: -- Bug 4632744 : Added Return Status check
779: IF l_return_status <> 'S' THEN
780: raise FND_API.G_EXC_ERROR;
781: END IF;
782: END LOOP;
783: END IF ; -- p_calling_module='TEAM_MEM_HOME'
784: --end add by rtarway for BUG 4085882

Line 820: RAISE FND_API.G_EXC_ERROR;

816: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
817: ,p_msg_name => 'PA_TP_CANT_NTER_ACT_4FN_STR');
818: x_msg_data := 'PA_TP_CANT_NTER_ACT_4FN_STR';
819: x_return_status := 'E';
820: RAISE FND_API.G_EXC_ERROR;
821: END IF;
822: END IF;
823: /* reverted 14602604
824: -- Bug14602604 Begin

Line 838: RAISE FND_API.G_EXC_ERROR;

834: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
835: ,p_msg_name => 'PA_WP_VD_CANT_UPDATE_ETC');
836: x_msg_data := 'PA_WP_VD_CANT_UPDATE_ETC';
837: x_return_status := 'E';
838: RAISE FND_API.G_EXC_ERROR;
839: END IF;
840: END IF;
841: -- Bug14602604 End
842: */

Line 871: RAISE FND_API.G_EXC_ERROR;

867: p_msg_name => 'PA_FP_INVALID_DATE_RANGE');
868: x_msg_data := 'PA_FP_INVALID_DATE_RANGE';
869: x_return_status := 'E';
870: x_msg_count := fnd_msg_pub.count_msg;
871: RAISE FND_API.G_EXC_ERROR;
872: END;
873:
874: IF g1_debug_mode = 'Y' THEN
875: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_TASK_PROGRESS', x_Msg => 'l_element_struc_type='||l_element_struc_type, x_Log_Level=> 3);

Line 948: RAISE FND_API.G_EXC_ERROR;

944: ,p_token2 => 'TASK_NUMBER'
945: ,p_value2 => PA_TASK_UTILS.get_task_number(l_task_id));
946: x_msg_data := 'PA_TP_CANT_NTER_PRG_CANCEL';
947: x_return_status := 'E';
948: RAISE FND_API.G_EXC_ERROR;
949: ELSE
950: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
951: ,p_msg_name => 'PA_TP_CANT_NTER_PRG_CANCEL_AMG'
952: ,p_token1 => 'TASK_ID'

Line 957: RAISE FND_API.G_EXC_ERROR;

953: ,p_value1 => p_object_id
954: );
955: x_msg_data := 'PA_TP_CANT_NTER_PRG_CANCEL';
956: x_return_status := 'E';
957: RAISE FND_API.G_EXC_ERROR;
958: END IF;
959: END IF;
960: ---- if status is CANCELLED
961:

Line 1016: RAISE FND_API.G_EXC_ERROR;

1012: ,p_token4 => 'PROJECT_NUMBER'
1013: ,p_value4 => PA_TASK_UTILS.get_project_number(p_project_id));
1014: x_msg_data := 'PA_TP_CANT_ENTER_PROG';
1015: x_return_status := 'E';
1016: RAISE FND_API.G_EXC_ERROR;
1017: ELSE
1018: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1019: ,p_msg_name => 'PA_TP_CANT_ENTER_PROG_AMG'
1020: ,p_token1 => 'TASK_ID'

Line 1026: RAISE FND_API.G_EXC_ERROR;

1022: ,p_token2 => 'PROJECT_ID'
1023: ,p_value2 => p_project_id);
1024: x_msg_data := 'PA_TP_CANT_ENTER_PROG';
1025: x_return_status := 'E';
1026: RAISE FND_API.G_EXC_ERROR;
1027: END IF;
1028: END IF;
1029: ----- No PRPGRESS
1030:

Line 1038: RAISE FND_API.G_EXC_ERROR;

1034: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1035: ,p_msg_name => 'PA_TP_WRONG_PRG_MODE4');
1036: x_msg_data := 'PA_TP_WRONG_PRG_MODE4';
1037: x_return_status := 'E';
1038: RAISE FND_API.G_EXC_ERROR;
1039: END IF;
1040: ----- Wrong MODE
1041:
1042: ----- Wrong DATE

Line 1051: RAISE FND_API.G_EXC_ERROR;

1047: ,p_token1 => 'AS_OF_DATE'
1048: ,p_value1 => p_as_of_date);
1049: x_msg_data := 'PA_TP_INV_AOD';
1050: x_return_status := 'E';
1051: RAISE FND_API.G_EXC_ERROR;
1052: END IF;
1053: ----- Wrong DATE
1054:
1055: ----- Wrong PROGRESS STATUS

Line 1062: RAISE FND_API.G_EXC_ERROR;

1058: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1059: ,p_msg_name => 'PA_TP_INV_PRG_STAT');
1060: x_msg_data := 'PA_TP_INV_PRG_STAT';
1061: x_return_status := 'E';
1062: RAISE FND_API.G_EXC_ERROR;
1063: END IF;
1064: ----- Wrong PROGRESS STATUS
1065: --Added by rtarway, for BUG 3819619
1066:

Line 1092: RAISE FND_API.G_EXC_ERROR;

1088: ,p_token5 => 'PROJECT_NUMBER'
1089: ,p_value5 => PA_TASK_UTILS.get_project_number(p_project_id));
1090: x_msg_data := 'PA_TP_INV_PRG_STAT';
1091: x_return_status := 'E';
1092: RAISE FND_API.G_EXC_ERROR;
1093: ELSE
1094: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1095: p_msg_name => 'PA_TP_INV_PRG_STAT_AMG'
1096: ,p_token1 => 'PROG_STATUS'

Line 1104: x_return_status := FND_API.G_RET_STS_ERROR;

1100: ,p_token3 => 'PROJECT_ID'
1101: ,p_value3 => p_project_id
1102: );
1103: x_msg_data := 'PA_TP_INV_PRG_STAT';
1104: x_return_status := FND_API.G_RET_STS_ERROR;
1105: RAISE FND_API.G_EXC_ERROR;
1106: END IF;
1107: END;
1108: END IF;

Line 1105: RAISE FND_API.G_EXC_ERROR;

1101: ,p_value3 => p_project_id
1102: );
1103: x_msg_data := 'PA_TP_INV_PRG_STAT';
1104: x_return_status := FND_API.G_RET_STS_ERROR;
1105: RAISE FND_API.G_EXC_ERROR;
1106: END IF;
1107: END;
1108: END IF;
1109: --End Add for BUG 3819619

Line 1127: RAISE FND_API.G_EXC_ERROR;

1123: ,p_token2 => 'TASK_NUMBER'
1124: ,p_value2 => PA_TASK_UTILS.get_task_number(p_object_id));
1125: x_msg_data := 'PA_TP_INV_TSK_STAT';
1126: x_return_status := 'E';
1127: RAISE FND_API.G_EXC_ERROR;
1128: ELSE
1129: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1130: ,p_msg_name => 'PA_TP_INV_TSK_STAT_AMG'
1131: ,p_token1 => 'TASK_ID'

Line 1136: RAISE FND_API.G_EXC_ERROR;

1132: ,p_value1 => p_object_id
1133: );
1134: x_msg_data := 'PA_TP_INV_TSK_STAT';
1135: x_return_status := 'E';
1136: RAISE FND_API.G_EXC_ERROR;
1137: END IF;
1138: END IF;
1139: END IF;
1140: ----- Wrong STATUS

Line 1162: RAISE FND_API.G_EXC_ERROR;

1158: ,p_token2 => 'TASK_NUMBER'
1159: ,p_value2 => PA_TASK_UTILS.get_task_number(p_object_id));
1160: x_msg_data := 'PA_TP_NO_NEG_WQ';
1161: x_return_status := 'E';
1162: RAISE FND_API.G_EXC_ERROR;
1163: ELSE
1164: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1165: ,p_msg_name => 'PA_TP_NO_NEG_WQ_AMG'
1166: ,p_token1 => 'TASK_ID'

Line 1170: RAISE FND_API.G_EXC_ERROR;

1166: ,p_token1 => 'TASK_ID'
1167: ,p_value1 => p_object_id);
1168: x_msg_data := 'PA_TP_NO_NEG_WQ';
1169: x_return_status := 'E';
1170: RAISE FND_API.G_EXC_ERROR;
1171: END IF;
1172: ELSE
1173: --bug 3824042, round wq upto 2 decimal places
1174: --l_actual_work_quantity := nvl(p_actual_work_quantity,0);

Line 1197: RAISE FND_API.G_EXC_ERROR;

1193: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1194: ,p_msg_name => 'PA_TP_NO_NEG_ETC');
1195: x_msg_data := 'PA_TP_NO_NEG_ETC';
1196: x_return_status := 'E';
1197: RAISE FND_API.G_EXC_ERROR;
1198: END IF;
1199: --3779387
1200: */
1201:

Line 1331: -- RAISE FND_API.G_EXC_ERROR;

1327: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1328: p_msg_name => 'PA_TP_NO_PC_OVRIDE');
1329: x_msg_data := 'PA_TP_NO_PC_OVRIDE';
1330: x_return_status := 'E';
1331: -- RAISE FND_API.G_EXC_ERROR;
1332: l_tp_pcc_est_disabl := 'Y';
1333: END IF;
1334: END IF;
1335:

Line 1347: RAISE FND_API.G_EXC_ERROR;

1343: ,p_token2 => 'TASK_NUMBER'
1344: ,p_value2 => PA_TASK_UTILS.get_task_number(p_object_id));
1345: x_msg_data := 'PA_PERC_COMP_INV';
1346: x_return_status := 'E';
1347: RAISE FND_API.G_EXC_ERROR;
1348: ELSE
1349: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1350: ,p_msg_name => 'PA_PERC_COMP_INV_AMG'
1351: ,p_token1 => 'TASK_ID'

Line 1356: RAISE FND_API.G_EXC_ERROR;

1352: ,p_value1 => p_object_id
1353: );
1354: x_msg_data := 'PA_PERC_COMP_INV';
1355: x_return_status := 'E';
1356: RAISE FND_API.G_EXC_ERROR;
1357: END IF;
1358: END IF;
1359:
1360: --Get the SCHEDULE DATES for lowest level task.

Line 1370: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

1366: CLOSE cur_pa_proj_sch;
1367: END IF;
1368: --Get the SCHEDULE DATES for lowest level task.
1369:
1370: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1371: THEN
1372: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1373: ,p_msg_name => l_error_message_code);
1374: x_msg_data := l_error_message_code;

Line 1376: RAISE FND_API.G_EXC_ERROR;

1372: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1373: ,p_msg_name => l_error_message_code);
1374: x_msg_data := l_error_message_code;
1375: x_return_status := 'E';
1376: RAISE FND_API.G_EXC_ERROR;
1377: END IF;
1378:
1379: IF p_progress_mode <> 'BACKDATED'
1380: AND l_element_struc_type = 'WORKPLAN'

Line 1414: RAISE FND_API.G_EXC_ERROR;

1410: ,p_token2 => 'TASK_NUMBER'
1411: ,p_value2 => PA_TASK_UTILS.get_task_number(p_object_id));
1412: x_msg_data := 'PA_TP_INV_TSK_STAT';
1413: x_return_status := 'E';
1414: RAISE FND_API.G_EXC_ERROR;
1415: ELSE
1416: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1417: ,p_msg_name => 'PA_TP_INV_TSK_STAT_AMG'
1418: ,p_token1 => 'TASK_ID'

Line 1423: RAISE FND_API.G_EXC_ERROR;

1419: ,p_value1 => p_object_id
1420: );
1421: x_msg_data := 'PA_TP_INV_TSK_STAT';
1422: x_return_status := 'E';
1423: RAISE FND_API.G_EXC_ERROR;
1424: END IF;
1425: END IF;
1426: END IF;
1427:

Line 1504: --RAISE FND_API.G_EXC_ERROR; --rasie error message.

1500: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1501: p_msg_name => 'PA_TP_CANT_NTR_EFF_SUMMRY');
1502: x_msg_data := 'PA_TP_CANT_NTR_EFF_SUMMRY';
1503: x_return_status := 'E';
1504: --RAISE FND_API.G_EXC_ERROR; --rasie error message.
1505: l_tp_pcc_est_disabl := 'Y';
1506: ELSIF ( l_assignment_exists = 'Y' ) -- Bug 3784904 : Changed from N to Y
1507: AND ( l_actual_effort > 0 OR l_est_remaining_effort > 0 )
1508: THEN

Line 1521: --RAISE FND_API.G_EXC_ERROR; --rasie error message.

1517: ,p_value2 => PA_TASK_UTILS.get_task_number(p_object_id)
1518: );
1519: x_msg_data := 'PA_TP_NO_EFF_WITH_ASSN';
1520: x_return_status := 'E';
1521: --RAISE FND_API.G_EXC_ERROR; --rasie error message.
1522: l_tp_pcc_est_disabl := 'Y';
1523: ELSE
1524: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA'
1525: ,p_msg_name => 'PA_TP_NO_EFF_WITH_ASSN_AMG'

Line 1530: --RAISE FND_API.G_EXC_ERROR; --rasie error message.

1526: ,p_token1 => 'TASK_ID'
1527: ,p_value1 => p_object_id);
1528: x_msg_data := 'PA_TP_NO_EFF_WITH_ASSN';
1529: x_return_status := 'E';
1530: --RAISE FND_API.G_EXC_ERROR; --rasie error message.
1531: l_tp_pcc_est_disabl := 'Y';
1532: END IF;
1533: ELSIF NVL( l_lowest_level_task, 'N' ) = 'N'
1534: AND l_structure_sharing_code = 'SHARE_FULL' --Bug 3586648

Line 1542: --RAISE FND_API.G_EXC_ERROR; --rasie error message.

1538: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1539: p_msg_name => 'PA_TP_NO_ACT_EFF_4SH_STR');
1540: x_msg_data := 'PA_TP_NO_ACT_EFF_4SH_STR';
1541: x_return_status := 'E';
1542: --RAISE FND_API.G_EXC_ERROR; --rasie error message.
1543: l_tp_pcc_est_disabl := 'Y';
1544: END IF;
1545: END IF; -- IF p_calling_module <> 'SELF_SERVICE' --maansari4/4
1546: END IF; --l_est_remaining_eff_flag = 'N'

Line 1550: RAISE FND_API.G_EXC_ERROR;

1546: END IF; --l_est_remaining_eff_flag = 'N'
1547: END IF; --l_element_struc_type
1548:
1549: IF x_return_status = 'E' THEN -- Bug 3784904
1550: RAISE FND_API.G_EXC_ERROR;
1551: END IF;
1552: --End maansari: fpm changes
1553: ----- End of validation
1554:

Line 1580: --RAISE FND_API.G_EXC_ERROR;

1576: ,p_value4 => PA_TASK_UTILS.get_project_number(p_project_id)
1577: );
1578: x_msg_data := 'PA_TP_EST_REM_EFF_DISABL';
1579: x_return_status := 'E';
1580: --RAISE FND_API.G_EXC_ERROR;
1581: l_tp_pcc_est_disabl := 'Y';
1582: ELSE
1583: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA'
1584: ,p_msg_name => 'PA_TP_EST_REM_EFF_DISABL_AMG'

Line 1591: --RAISE FND_API.G_EXC_ERROR;

1587: ,p_token2 => 'PROJECT_ID'
1588: ,p_value2 => p_project_id);
1589: x_msg_data := 'PA_TP_EST_REM_EFF_DISABL';
1590: x_return_status := 'E';
1591: --RAISE FND_API.G_EXC_ERROR;
1592: l_tp_pcc_est_disabl := 'Y';
1593: END IF;
1594: END IF;
1595: END IF;

Line 1620: -- RAISE FND_API.G_EXC_ERROR;

1616: ,p_value4 => PA_TASK_UTILS.get_project_number(p_project_id)
1617: );
1618: x_msg_data := 'PA_TP_PCC_DISABL';
1619: x_return_status := 'E';
1620: -- RAISE FND_API.G_EXC_ERROR;
1621: l_tp_pcc_est_disabl := 'Y';
1622: ELSE
1623: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA'
1624: ,p_msg_name => 'PA_TP_PCC_DISABL_AMG'

Line 1631: -- RAISE FND_API.G_EXC_ERROR;

1627: ,p_token2 => 'PROJECT_ID'
1628: ,p_value2 => p_project_id);
1629: x_msg_data := 'PA_TP_PCC_DISABL';
1630: x_return_status := 'E';
1631: -- RAISE FND_API.G_EXC_ERROR;
1632: l_tp_pcc_est_disabl := 'Y';
1633: END IF;
1634: END IF;
1635: END IF;

Line 1640: RAISE FND_API.G_EXC_ERROR;

1636:
1637: -- Raise in case of any of the above two errors
1638: IF l_tp_pcc_est_disabl = 'Y'
1639: THEN
1640: RAISE FND_API.G_EXC_ERROR;
1641: END IF;
1642:
1643: -- Bug 3606627 : AMG Changes, Getting planned values
1644: IF p_calling_module = 'AMG' THEN

Line 1843: RAISE FND_API.G_EXC_ERROR;

1839: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1840: ,p_msg_name => 'PA_TP_WRONG_PRG_MODE1');
1841: x_msg_data := 'PA_TP_WRONG_PRG_MODE1';
1842: x_return_status := 'E';
1843: RAISE FND_API.G_EXC_ERROR;
1844: ELSIF p_as_of_date > l_last_progress_date -- progress exists before as of date
1845: THEN
1846: --You cannot create a backdated progress when there exists a progress
1847: --before AS_OF_DATE for this task.

Line 1854: RAISE FND_API.G_EXC_ERROR;

1850: p_token1 => 'AS_OF_DATE',
1851: p_value1 => l_last_progress_date );
1852: x_msg_data := 'PA_TP_WRONG_PRG_MODE2';
1853: x_return_status := 'E';
1854: RAISE FND_API.G_EXC_ERROR;
1855: ELSIF p_as_of_date < l_last_progress_date -- backdated
1856: THEN
1857: IF l_progress_exists_on_aod = 'WORKING'
1858: THEN

Line 1875: RAISE FND_API.G_EXC_ERROR;

1871: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1872: p_msg_name => 'PA_TP_WRONG_PRG_MODE5');
1873: x_msg_data := 'PA_TP_WRONG_PRG_MODE5';
1874: x_return_status := 'E';
1875: RAISE FND_API.G_EXC_ERROR;
1876: ELSIF l_progress_exists_on_aod = 'PUBLISHED' and p_record_version_number is not null THEN
1877: l_db_action := 'CREATE';
1878: l_process := 'CORRECT';
1879: END IF;

Line 1893: RAISE FND_API.G_EXC_ERROR;

1889: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1890: ,p_msg_name => 'PA_TP_ACTUALS_NOT_ALLWD');
1891: x_msg_data := 'PA_TP_ACTUALS_NOT_ALLWD';
1892: x_return_status := 'E';
1893: RAISE FND_API.G_EXC_ERROR;
1894: END IF;
1895: ELSIF p_as_of_date = l_last_progress_date -- Current
1896: THEN
1897: IF l_progress_exists_on_aod = 'WORKING'

Line 1908: RAISE FND_API.G_EXC_ERROR;

1904: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1905: p_msg_name => 'PA_TP_WRONG_PRG_MODE5');
1906: x_msg_data := 'PA_TP_WRONG_PRG_MODE5';
1907: x_return_status := 'E';
1908: RAISE FND_API.G_EXC_ERROR;
1909: ELSIF l_progress_exists_on_aod = 'PUBLISHED' OR l_progress_exists_on_aod = 'N'
1910: THEN
1911: --Create a new working progress record. ( publish and roll it only when p_action = 'PUBLISH' )
1912: --1. if l_progress_exists_on_aod = 'N' or 'Y' then we create new record in ppc

Line 1942: RAISE FND_API.G_EXC_ERROR;

1938: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1939: p_msg_name => 'PA_TP_WRONG_PRG_MODE5');
1940: x_msg_data := 'PA_TP_WRONG_PRG_MODE5';
1941: x_return_status := 'E';
1942: RAISE FND_API.G_EXC_ERROR;
1943: ELSIF l_progress_exists_on_aod = 'PUBLISHED' and p_record_version_number is not null THEN
1944: l_db_action := 'CREATE';
1945: l_process := 'CORRECT';
1946: END IF;

Line 1965: RAISE FND_API.G_EXC_ERROR;

1961: p_token1 => 'AS_OF_DATE',
1962: p_value1 => p_as_of_date );
1963: x_msg_data := 'PA_TP_WRONG_PRG_MODE3';
1964: x_return_status := 'E';
1965: RAISE FND_API.G_EXC_ERROR;
1966: ELSE
1967: --Validate as of date
1968: -- Bug 3627315 : Check valid as of date should not be called from AMG or Task Progress Details page
1969: -- Beacuse from both the places we submit progress for all objects against one cycle date

Line 1985: RAISE FND_API.G_EXC_ERROR;

1981: ,p_token1 => 'AS_OF_DATE'
1982: ,p_value1 => p_as_of_date);
1983: x_msg_data := 'PA_TP_INV_AOD2';
1984: x_return_status := 'E';
1985: RAISE FND_API.G_EXC_ERROR;
1986: END IF;
1987:
1988: IF l_progress_exists_on_aod = 'WORKING'
1989: THEN

Line 2136: RAISE fnd_api.g_exc_error;

2132: WHEN OTHERS THEN
2133: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
2134: p_procedure_name => 'UPDATE_TASK_PROGRESS',
2135: p_error_text => SUBSTRB('PA_TASK_ASSIGNMENTS_PUB.DERIVE_TASK_ASSIGNMENTS:'||SQLERRM,1,120));
2136: RAISE fnd_api.g_exc_error;
2137: END;
2138:
2139: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2140: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 2139: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2135: p_error_text => SUBSTRB('PA_TASK_ASSIGNMENTS_PUB.DERIVE_TASK_ASSIGNMENTS:'||SQLERRM,1,120));
2136: RAISE fnd_api.g_exc_error;
2137: END;
2138:
2139: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2140: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2141: p_msg_name => l_msg_data);
2142: x_msg_data := l_msg_data;
2143: x_return_status := 'E';

Line 2145: RAISE FND_API.G_EXC_ERROR;

2141: p_msg_name => l_msg_data);
2142: x_msg_data := l_msg_data;
2143: x_return_status := 'E';
2144: x_msg_count := l_msg_count;
2145: RAISE FND_API.G_EXC_ERROR;
2146: END IF;
2147: END IF;
2148: END IF;
2149: -- END: Adding code to fix Bug # 3815741.

Line 2337: raise FND_API.G_EXC_ERROR;

2333: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_TASK_PROGRESS', x_Msg => 'l_clex_actual_finish_date='||l_clex_actual_finish_date, x_Log_Level=> 3);
2334: END IF;
2335:
2336: IF x_return_status <> 'S' THEN
2337: raise FND_API.G_EXC_ERROR;
2338: END IF;
2339:
2340: IF nvl(l_estimated_start_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
2341: OR nvl(l_estimated_finish_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)

Line 2340: IF nvl(l_estimated_start_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)

2336: IF x_return_status <> 'S' THEN
2337: raise FND_API.G_EXC_ERROR;
2338: END IF;
2339:
2340: IF nvl(l_estimated_start_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
2341: OR nvl(l_estimated_finish_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
2342: OR nvl(l_actual_start_date,FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
2343: OR nvl(l_actual_finish_date,FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
2344: THEN

Line 2341: OR nvl(l_estimated_finish_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)

2337: raise FND_API.G_EXC_ERROR;
2338: END IF;
2339:
2340: IF nvl(l_estimated_start_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
2341: OR nvl(l_estimated_finish_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
2342: OR nvl(l_actual_start_date,FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
2343: OR nvl(l_actual_finish_date,FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
2344: THEN
2345: l_date_override_flag := 'Y';

Line 2342: OR nvl(l_actual_start_date,FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)

2338: END IF;
2339:
2340: IF nvl(l_estimated_start_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
2341: OR nvl(l_estimated_finish_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
2342: OR nvl(l_actual_start_date,FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
2343: OR nvl(l_actual_finish_date,FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
2344: THEN
2345: l_date_override_flag := 'Y';
2346: l_estimated_start_date := l_clex_estimated_start_date;

Line 2343: OR nvl(l_actual_finish_date,FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)

2339:
2340: IF nvl(l_estimated_start_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
2341: OR nvl(l_estimated_finish_date,FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
2342: OR nvl(l_actual_start_date,FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
2343: OR nvl(l_actual_finish_date,FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
2344: THEN
2345: l_date_override_flag := 'Y';
2346: l_estimated_start_date := l_clex_estimated_start_date;
2347: l_estimated_finish_date := l_clex_estimated_finish_date;

Line 2357: (nvl(l_estimated_start_date,FND_API.g_miss_date) <> nvl(l_db_estimated_start_date,FND_API.g_miss_date)

2353: l_date_override_flag := 'Y';
2354: END IF;
2355:
2356: IF l_date_override_flag = 'N' AND
2357: (nvl(l_estimated_start_date,FND_API.g_miss_date) <> nvl(l_db_estimated_start_date,FND_API.g_miss_date)
2358: OR nvl(l_estimated_finish_date,FND_API.g_miss_date) <> nvl(l_db_estimated_finish_date,FND_API.g_miss_date)
2359: OR nvl(l_actual_start_date,FND_API.g_miss_date) <> nvl(l_db_actual_start_date,FND_API.g_miss_date)
2360: OR nvl(l_actual_finish_date,FND_API.g_miss_date) <> nvl(l_db_actual_finish_date,FND_API.g_miss_date))
2361: THEN

Line 2358: OR nvl(l_estimated_finish_date,FND_API.g_miss_date) <> nvl(l_db_estimated_finish_date,FND_API.g_miss_date)

2354: END IF;
2355:
2356: IF l_date_override_flag = 'N' AND
2357: (nvl(l_estimated_start_date,FND_API.g_miss_date) <> nvl(l_db_estimated_start_date,FND_API.g_miss_date)
2358: OR nvl(l_estimated_finish_date,FND_API.g_miss_date) <> nvl(l_db_estimated_finish_date,FND_API.g_miss_date)
2359: OR nvl(l_actual_start_date,FND_API.g_miss_date) <> nvl(l_db_actual_start_date,FND_API.g_miss_date)
2360: OR nvl(l_actual_finish_date,FND_API.g_miss_date) <> nvl(l_db_actual_finish_date,FND_API.g_miss_date))
2361: THEN
2362: l_date_override_flag := 'Y';

Line 2359: OR nvl(l_actual_start_date,FND_API.g_miss_date) <> nvl(l_db_actual_start_date,FND_API.g_miss_date)

2355:
2356: IF l_date_override_flag = 'N' AND
2357: (nvl(l_estimated_start_date,FND_API.g_miss_date) <> nvl(l_db_estimated_start_date,FND_API.g_miss_date)
2358: OR nvl(l_estimated_finish_date,FND_API.g_miss_date) <> nvl(l_db_estimated_finish_date,FND_API.g_miss_date)
2359: OR nvl(l_actual_start_date,FND_API.g_miss_date) <> nvl(l_db_actual_start_date,FND_API.g_miss_date)
2360: OR nvl(l_actual_finish_date,FND_API.g_miss_date) <> nvl(l_db_actual_finish_date,FND_API.g_miss_date))
2361: THEN
2362: l_date_override_flag := 'Y';
2363: END IF;

Line 2360: OR nvl(l_actual_finish_date,FND_API.g_miss_date) <> nvl(l_db_actual_finish_date,FND_API.g_miss_date))

2356: IF l_date_override_flag = 'N' AND
2357: (nvl(l_estimated_start_date,FND_API.g_miss_date) <> nvl(l_db_estimated_start_date,FND_API.g_miss_date)
2358: OR nvl(l_estimated_finish_date,FND_API.g_miss_date) <> nvl(l_db_estimated_finish_date,FND_API.g_miss_date)
2359: OR nvl(l_actual_start_date,FND_API.g_miss_date) <> nvl(l_db_actual_start_date,FND_API.g_miss_date)
2360: OR nvl(l_actual_finish_date,FND_API.g_miss_date) <> nvl(l_db_actual_finish_date,FND_API.g_miss_date))
2361: THEN
2362: l_date_override_flag := 'Y';
2363: END IF;
2364:

Line 2376: x_return_status := FND_API.G_RET_STS_ERROR;

2372:
2373: -- 4533112 End
2374:
2375: IF (l_estimated_finish_date is not null and l_estimated_finish_date < nvl(l_estimated_start_date,l_estimated_finish_date)) THEN --removed +1 bug 5186825
2376: x_return_status := FND_API.G_RET_STS_ERROR;
2377: pa_utils.add_message(p_app_short_name => 'PA',
2378: p_msg_name => 'PA_EST_DATES_INV');
2379: raise fnd_api.g_exc_error;
2380: END IF;

Line 2379: raise fnd_api.g_exc_error;

2375: IF (l_estimated_finish_date is not null and l_estimated_finish_date < nvl(l_estimated_start_date,l_estimated_finish_date)) THEN --removed +1 bug 5186825
2376: x_return_status := FND_API.G_RET_STS_ERROR;
2377: pa_utils.add_message(p_app_short_name => 'PA',
2378: p_msg_name => 'PA_EST_DATES_INV');
2379: raise fnd_api.g_exc_error;
2380: END IF;
2381: -- Bug 3922325 : Actual Start date and Finish date should efualt even if percent completete is not enabled
2382: -- It should be based on Task Status rather than % Complete
2383: --bug# 3823433 Satish

Line 2456: RAISE FND_API.G_EXC_ERROR;

2452: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
2453: ,p_msg_name => 'PA_TP_ACT_ST_DATE_NOT_NULL');
2454: x_msg_data := 'PA_TP_ACT_ST_DATE_NOT_NULL';
2455: x_return_status := 'E';
2456: RAISE FND_API.G_EXC_ERROR;
2457: END IF;
2458:
2459: IF (nvl(l_percent_complete, l_BASE_PERCENT_COMPLETE) = 100 and l_actual_finish_date is null ) THEN
2460: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'

Line 2464: RAISE FND_API.G_EXC_ERROR;

2460: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
2461: ,p_msg_name => 'PA_TP_ACT_END_DT_NOT_NULL');
2462: x_msg_data := 'PA_TP_ACT_END_DT_NOT_NULL';
2463: x_return_status := 'E';
2464: RAISE FND_API.G_EXC_ERROR;
2465: END IF;
2466: END IF;
2467: */
2468: IF ( l_task_status2 IN ('COMPLETED','IN_PROGRESS') and l_actual_start_date is null ) THEN

Line 2474: RAISE FND_API.G_EXC_ERROR;

2470: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
2471: ,p_msg_name => 'PA_TP_ACT_ST_DATE_NOT_NULL');
2472: x_msg_data := 'PA_TP_ACT_ST_DATE_NOT_NULL';
2473: x_return_status := 'E';
2474: RAISE FND_API.G_EXC_ERROR;
2475: END IF;
2476:
2477: IF (l_task_status2 = 'COMPLETED' and l_actual_finish_date is null ) THEN
2478: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'

Line 2482: RAISE FND_API.G_EXC_ERROR;

2478: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
2479: ,p_msg_name => 'PA_TP_ACT_END_DT_NOT_NULL');
2480: x_msg_data := 'PA_TP_ACT_END_DT_NOT_NULL';
2481: x_return_status := 'E';
2482: RAISE FND_API.G_EXC_ERROR;
2483: END IF;
2484:
2485: END IF; -- IF NVL( l_lowest_level_task, 'N' ) = 'Y'
2486: END IF; -- IF p_progress_mode <> 'BACKDATED'

Line 2538: RAISE FND_API.G_EXC_ERROR;

2534: ,p_token2 => 'TASK_NUMBER'
2535: ,p_value2 => PA_TASK_UTILS.get_task_number(l_task_id));
2536: x_msg_data := 'PA_TP_STAT_DTES_PC_COMB';
2537: x_return_status := 'E';
2538: RAISE FND_API.G_EXC_ERROR;
2539: ELSE
2540: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
2541: ,p_msg_name => 'PA_TP_STAT_DTES_PC_COMB_AMG'
2542: ,p_token1 => 'TASK_ID'

Line 2547: RAISE FND_API.G_EXC_ERROR;

2543: ,p_value1 => l_task_id
2544: );
2545: x_msg_data := 'PA_TP_STAT_DTES_PC_COMB';
2546: x_return_status := 'E';
2547: RAISE FND_API.G_EXC_ERROR;
2548: END IF;
2549: END IF;
2550: END IF;
2551:

Line 2619: RAISE FND_API.G_EXC_ERROR;

2615: ,p_token2 => 'TASK_NUMBER'
2616: ,p_value2 => PA_TASK_UTILS.get_task_number(l_task_id));
2617: x_msg_data := 'PA_TP_STAT_DTES_PC_COMB';
2618: x_return_status := 'E';
2619: RAISE FND_API.G_EXC_ERROR;
2620: ELSE
2621: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
2622: ,p_msg_name => 'PA_TP_STAT_DTES_PC_COMB_AMG'
2623: ,p_token1 => 'TASK_ID'

Line 2628: RAISE FND_API.G_EXC_ERROR;

2624: ,p_value1 => l_task_id
2625: );
2626: x_msg_data := 'PA_TP_STAT_DTES_PC_COMB';
2627: x_return_status := 'E';
2628: RAISE FND_API.G_EXC_ERROR;
2629: END IF;
2630: END IF;
2631: END IF;
2632:

Line 2636: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2632:
2633: -- Bug 3951531 End
2634:
2635:
2636: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2637: x_return_status := 'E';
2638: x_msg_data := l_msg_data;
2639: x_msg_count := l_msg_count;
2640: RAISE FND_API.G_EXC_ERROR;

Line 2640: RAISE FND_API.G_EXC_ERROR;

2636: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2637: x_return_status := 'E';
2638: x_msg_data := l_msg_data;
2639: x_msg_count := l_msg_count;
2640: RAISE FND_API.G_EXC_ERROR;
2641: END IF;
2642:
2643: IF ( p_action = 'PUBLISH' or NVL( l_rollup_required, 'N') = 'Y' )
2644: THEN

Line 3250: RAISE FND_API.G_EXC_ERROR;

3246: ,x_subprj_eqpmt_etc_rawcost_pc => l_rollup_rec2.subprj_eqpmt_etc_rawcost_pc
3247: );
3248: -- FPM Dev CR 6
3249: IF Fnd_Msg_Pub.count_msg > 0 THEN
3250: RAISE FND_API.G_EXC_ERROR;
3251: END IF;
3252:
3253: -----update percent_complete_id in pa_progress_rollup
3254: UPDATE pa_progress_rollup

Line 3365: RAISE FND_API.G_EXC_ERROR;

3361: ,p_structure_type => p_structure_type
3362: );
3363: -- FPM Dev CR 6
3364: IF Fnd_Msg_Pub.count_msg > 0 THEN
3365: RAISE FND_API.G_EXC_ERROR;
3366: END IF;
3367:
3368:
3369: --update progress rollup

Line 3582: RAISE FND_API.G_EXC_ERROR;

3578: END IF;
3579:
3580: -- FPM Dev CR 6
3581: IF Fnd_Msg_Pub.count_msg > 0 THEN
3582: RAISE FND_API.G_EXC_ERROR;
3583: END IF;
3584: ELSE ---2
3585:
3586: -- BEGIN: Fix for Bug # 3926827.

Line 3893: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3889: ,x_msg_data => l_msg_data
3890: );
3891:
3892: -- Bug 8294708
3893: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3894: x_msg_data := l_msg_data;
3895: x_return_status := 'E';
3896: RAISE FND_API.G_EXC_ERROR;
3897: END IF;

Line 3896: RAISE FND_API.G_EXC_ERROR;

3892: -- Bug 8294708
3893: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3894: x_msg_data := l_msg_data;
3895: x_return_status := 'E';
3896: RAISE FND_API.G_EXC_ERROR;
3897: END IF;
3898:
3899: END IF;
3900: END IF;

Line 3923: raise FND_API.G_EXC_ERROR;

3919:
3920: IF (l_return_status <> 'S') THEN
3921: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3922: p_msg_name => l_error_message_code);
3923: raise FND_API.G_EXC_ERROR;
3924: END IF;
3925: END IF;
3926: */
3927:

Line 3969: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

3965: ,p_task_status => l_task_status
3966: );
3967: END IF;
3968:
3969: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
3970: THEN
3971: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3972: p_msg_name => l_msg_data
3973: );

Line 3976: RAISE FND_API.G_EXC_ERROR;

3972: p_msg_name => l_msg_data
3973: );
3974: x_msg_data := l_msg_data;
3975: x_return_status := 'E';
3976: RAISE FND_API.G_EXC_ERROR;
3977: END IF;
3978:
3979: /* Bug 2751159 Moved the update task_status code out of IF condition for workplan
3980: It means updation of task status shd happen for financial also */

Line 4097: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

4093: ,x_return_status => l_return_status
4094: ,x_msg_count => l_msg_count
4095: ,x_msg_data => l_msg_data);
4096:
4097: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4098: raise FND_API.G_EXC_ERROR;
4099: END IF;
4100: END IF;
4101: */

Line 4098: raise FND_API.G_EXC_ERROR;

4094: ,x_msg_count => l_msg_count
4095: ,x_msg_data => l_msg_data);
4096:
4097: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4098: raise FND_API.G_EXC_ERROR;
4099: END IF;
4100: END IF;
4101: */
4102:

Line 4123: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

4119: ,x_return_status => l_return_status
4120: ,x_msg_count => l_msg_count
4121: ,x_msg_data => l_msg_data );
4122:
4123: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
4124: THEN
4125: -- Bug 3248988 : Update_schedule_version adds the message, here message shd not be added
4126: -- PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4127: -- p_msg_name => l_msg_data

Line 4131: RAISE FND_API.G_EXC_ERROR;

4127: -- p_msg_name => l_msg_data
4128: -- );
4129: -- x_msg_data := l_msg_data;
4130: x_return_status := 'E';
4131: RAISE FND_API.G_EXC_ERROR;
4132: END IF;
4133: /* Bug2756007 End */
4134: END IF;
4135:

Line 4153: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

4149: ,p_element_version_id => p_object_version_id
4150: ,x_return_status => l_return_status
4151: ,x_msg_count => l_msg_count
4152: ,x_msg_data => l_msg_data );
4153: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
4154: THEN
4155: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4156: p_msg_name => l_msg_data
4157: );

Line 4160: RAISE FND_API.G_EXC_ERROR;

4156: p_msg_name => l_msg_data
4157: );
4158: x_msg_data := l_msg_data;
4159: x_return_status := 'E';
4160: RAISE FND_API.G_EXC_ERROR;
4161: END IF;
4162:
4163: BEGIN
4164: Select ppev1.proj_element_id

Line 4182: p_validate_only => FND_API.G_FALSE

4178: (PA_PROJECT_STRUCTURE_UTILS.CHECK_SHARING_ENABLED(p_project_id) = 'Y'))
4179: THEN
4180: --copy to transaction dates
4181: PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES(
4182: p_validate_only => FND_API.G_FALSE
4183: ,p_project_id => p_project_id
4184: ,x_return_status => x_return_status
4185: ,x_msg_count => x_msg_count
4186: ,x_msg_data => x_msg_data);

Line 4199: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

4195: IF g1_debug_mode = 'Y' THEN
4196: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_TASK_PROGRESS', x_Msg => 'Update Task Progress Complete ', x_Log_Level=> 3);
4197: END IF;
4198:
4199: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
4200: THEN
4201: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4202: p_msg_name => l_msg_data
4203: );

Line 4207: RAISE FND_API.G_EXC_ERROR;

4203: );
4204:
4205: x_msg_data := l_msg_data;
4206: x_return_status := 'E';
4207: RAISE FND_API.G_EXC_ERROR;
4208: END IF;
4209:
4210: x_resource_list_member_id := l_resource_list_member_id;
4211:

Line 4213: WHEN FND_API.G_EXC_ERROR THEN

4209:
4210: x_resource_list_member_id := l_resource_list_member_id;
4211:
4212: EXCEPTION
4213: WHEN FND_API.G_EXC_ERROR THEN
4214: IF p_commit = FND_API.G_TRUE
4215: THEN
4216: rollback to UPDATE_TASK_PROGRESS;
4217: END IF;

Line 4214: IF p_commit = FND_API.G_TRUE

4210: x_resource_list_member_id := l_resource_list_member_id;
4211:
4212: EXCEPTION
4213: WHEN FND_API.G_EXC_ERROR THEN
4214: IF p_commit = FND_API.G_TRUE
4215: THEN
4216: rollback to UPDATE_TASK_PROGRESS;
4217: END IF;
4218: x_return_status := FND_API.G_RET_STS_ERROR;

Line 4218: x_return_status := FND_API.G_RET_STS_ERROR;

4214: IF p_commit = FND_API.G_TRUE
4215: THEN
4216: rollback to UPDATE_TASK_PROGRESS;
4217: END IF;
4218: x_return_status := FND_API.G_RET_STS_ERROR;
4219: x_msg_count := fnd_msg_pub.count_msg; -- FPM Dev CR 3
4220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4221: IF p_commit = FND_API.G_TRUE
4222: THEN

Line 4220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4216: rollback to UPDATE_TASK_PROGRESS;
4217: END IF;
4218: x_return_status := FND_API.G_RET_STS_ERROR;
4219: x_msg_count := fnd_msg_pub.count_msg; -- FPM Dev CR 3
4220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4221: IF p_commit = FND_API.G_TRUE
4222: THEN
4223: rollback to UPDATE_TASK_PROGRESS;
4224: END IF;

Line 4221: IF p_commit = FND_API.G_TRUE

4217: END IF;
4218: x_return_status := FND_API.G_RET_STS_ERROR;
4219: x_msg_count := fnd_msg_pub.count_msg; -- FPM Dev CR 3
4220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4221: IF p_commit = FND_API.G_TRUE
4222: THEN
4223: rollback to UPDATE_TASK_PROGRESS;
4224: END IF;
4225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4221: IF p_commit = FND_API.G_TRUE
4222: THEN
4223: rollback to UPDATE_TASK_PROGRESS;
4224: END IF;
4225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4226: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
4227: p_procedure_name => 'UPDATE_TASK_PROGRESS',
4228: p_error_text => SUBSTRB(SQLERRM,1,120));
4229: x_msg_count := fnd_msg_pub.count_msg; -- FPM Dev CR 3

Line 4231: IF p_commit = FND_API.G_TRUE THEN

4227: p_procedure_name => 'UPDATE_TASK_PROGRESS',
4228: p_error_text => SUBSTRB(SQLERRM,1,120));
4229: x_msg_count := fnd_msg_pub.count_msg; -- FPM Dev CR 3
4230: WHEN OTHERS THEN
4231: IF p_commit = FND_API.G_TRUE THEN
4232: rollback to UPDATE_TASK_PROGRESS;
4233: END IF;
4234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4235: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 4234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4230: WHEN OTHERS THEN
4231: IF p_commit = FND_API.G_TRUE THEN
4232: rollback to UPDATE_TASK_PROGRESS;
4233: END IF;
4234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4235: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
4236: p_procedure_name => 'UPDATE_TASK_PROGRESS',
4237: p_error_text => SUBSTRB(SQLERRM,1,120));
4238: x_msg_count := fnd_msg_pub.count_msg; -- FPM Dev CR 3

Line 4273: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

4269: -- End of comments
4270:
4271: PROCEDURE ROLLUP_PROGRESS_PVT(
4272: p_api_version IN NUMBER :=1.0
4273: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4274: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4275: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4276: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4277: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 4274: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

4270:
4271: PROCEDURE ROLLUP_PROGRESS_PVT(
4272: p_api_version IN NUMBER :=1.0
4273: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4274: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4275: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4276: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4277: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4278: ,p_debug_mode IN VARCHAR2 :='N'

Line 4275: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

4271: PROCEDURE ROLLUP_PROGRESS_PVT(
4272: p_api_version IN NUMBER :=1.0
4273: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4274: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4275: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4276: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4277: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4278: ,p_debug_mode IN VARCHAR2 :='N'
4279: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4276: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

4272: p_api_version IN NUMBER :=1.0
4273: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4274: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4275: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4276: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4277: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4278: ,p_debug_mode IN VARCHAR2 :='N'
4279: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
4280: ,p_progress_mode IN VARCHAR2 := 'FUTURE'

Line 4367: IF (p_commit = FND_API.G_TRUE) THEN

4363: IF p_structure_version_id IS NULL OR (p_as_of_date IS NULL OR p_as_of_date = PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE ) THEN
4364: return;
4365: END IF;
4366:
4367: IF (p_commit = FND_API.G_TRUE) THEN
4368: savepoint ROLLUP_PROGRESS_PVT;
4369: END IF;
4370:
4371: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 4371: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

4367: IF (p_commit = FND_API.G_TRUE) THEN
4368: savepoint ROLLUP_PROGRESS_PVT;
4369: END IF;
4370:
4371: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4373: END IF;
4374:
4375: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 4372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4368: savepoint ROLLUP_PROGRESS_PVT;
4369: END IF;
4370:
4371: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4373: END IF;
4374:
4375: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4376: FND_MSG_PUB.initialize;

Line 4375: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

4371: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4373: END IF;
4374:
4375: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4376: FND_MSG_PUB.initialize;
4377: END IF;
4378:
4379: -- Bug # 3879910. Call corresponding API in package: PA_PROGRESS_PVT.

Line 4410: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4406: ,x_return_status => l_return_status
4407: ,x_msg_count => l_msg_count
4408: ,x_msg_data => l_msg_data);
4409:
4410: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4411: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4412: p_msg_name => l_msg_data
4413: );
4414: x_msg_data := l_msg_data;

Line 4416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4412: p_msg_name => l_msg_data
4413: );
4414: x_msg_data := l_msg_data;
4415: x_return_status := 'E';
4416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4417: END IF;
4418:
4419: x_return_status := FND_API.G_RET_STS_SUCCESS;
4420:

Line 4419: x_return_status := FND_API.G_RET_STS_SUCCESS;

4415: x_return_status := 'E';
4416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4417: END IF;
4418:
4419: x_return_status := FND_API.G_RET_STS_SUCCESS;
4420:
4421: IF (p_commit = FND_API.G_TRUE) THEN
4422: COMMIT;
4423: END IF;

Line 4421: IF (p_commit = FND_API.G_TRUE) THEN

4417: END IF;
4418:
4419: x_return_status := FND_API.G_RET_STS_SUCCESS;
4420:
4421: IF (p_commit = FND_API.G_TRUE) THEN
4422: COMMIT;
4423: END IF;
4424:
4425:

Line 4431: WHEN FND_API.G_EXC_ERROR THEN

4427: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.ROLLUP_PROGRESS_PVT', x_Msg => 'PA_PROGRESS_PUB.ROLLUP_PROGRESS_PVT END', x_Log_Level=> 3);
4428: END IF;
4429:
4430: EXCEPTION
4431: WHEN FND_API.G_EXC_ERROR THEN
4432: IF p_commit = FND_API.G_TRUE THEN
4433: rollback to ROLLUP_PROGRESS_PVT;
4434: END IF;
4435: x_return_status := FND_API.G_RET_STS_ERROR;

Line 4432: IF p_commit = FND_API.G_TRUE THEN

4428: END IF;
4429:
4430: EXCEPTION
4431: WHEN FND_API.G_EXC_ERROR THEN
4432: IF p_commit = FND_API.G_TRUE THEN
4433: rollback to ROLLUP_PROGRESS_PVT;
4434: END IF;
4435: x_return_status := FND_API.G_RET_STS_ERROR;
4436: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 4435: x_return_status := FND_API.G_RET_STS_ERROR;

4431: WHEN FND_API.G_EXC_ERROR THEN
4432: IF p_commit = FND_API.G_TRUE THEN
4433: rollback to ROLLUP_PROGRESS_PVT;
4434: END IF;
4435: x_return_status := FND_API.G_RET_STS_ERROR;
4436: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4437: IF p_commit = FND_API.G_TRUE THEN
4438: rollback to ROLLUP_PROGRESS_PVT;
4439: END IF;

Line 4436: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4432: IF p_commit = FND_API.G_TRUE THEN
4433: rollback to ROLLUP_PROGRESS_PVT;
4434: END IF;
4435: x_return_status := FND_API.G_RET_STS_ERROR;
4436: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4437: IF p_commit = FND_API.G_TRUE THEN
4438: rollback to ROLLUP_PROGRESS_PVT;
4439: END IF;
4440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4437: IF p_commit = FND_API.G_TRUE THEN

4433: rollback to ROLLUP_PROGRESS_PVT;
4434: END IF;
4435: x_return_status := FND_API.G_RET_STS_ERROR;
4436: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4437: IF p_commit = FND_API.G_TRUE THEN
4438: rollback to ROLLUP_PROGRESS_PVT;
4439: END IF;
4440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4441: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 4440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4436: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4437: IF p_commit = FND_API.G_TRUE THEN
4438: rollback to ROLLUP_PROGRESS_PVT;
4439: END IF;
4440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4441: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
4442: p_procedure_name => 'ROLLUP_PROGRESS_PVT',
4443: p_error_text => SUBSTRB(SQLERRM,1,120));
4444: WHEN OTHERS THEN

Line 4445: IF p_commit = FND_API.G_TRUE THEN

4441: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
4442: p_procedure_name => 'ROLLUP_PROGRESS_PVT',
4443: p_error_text => SUBSTRB(SQLERRM,1,120));
4444: WHEN OTHERS THEN
4445: IF p_commit = FND_API.G_TRUE THEN
4446: rollback to ROLLUP_PROGRESS_PVT;
4447: END IF;
4448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4449: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 4448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4444: WHEN OTHERS THEN
4445: IF p_commit = FND_API.G_TRUE THEN
4446: rollback to ROLLUP_PROGRESS_PVT;
4447: END IF;
4448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4449: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
4450: p_procedure_name => 'ROLLUP_PROGRESS_PVT',
4451: p_error_text => SUBSTRB(SQLERRM,1,120));
4452: raise;

Line 4481: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

4477: -- End of comments
4478:
4479: PROCEDURE UPDATE_ROLLUP_PROGRESS_PVT(
4480: p_api_version IN NUMBER :=1.0
4481: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4482: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4483: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4484: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4485: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 4482: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

4478:
4479: PROCEDURE UPDATE_ROLLUP_PROGRESS_PVT(
4480: p_api_version IN NUMBER :=1.0
4481: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4482: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4483: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4484: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4485: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4486: ,p_debug_mode IN VARCHAR2 :='N'

Line 4483: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

4479: PROCEDURE UPDATE_ROLLUP_PROGRESS_PVT(
4480: p_api_version IN NUMBER :=1.0
4481: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4482: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4483: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4484: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4485: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4486: ,p_debug_mode IN VARCHAR2 :='N'
4487: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4484: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

4480: p_api_version IN NUMBER :=1.0
4481: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4482: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4483: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4484: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4485: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4486: ,p_debug_mode IN VARCHAR2 :='N'
4487: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
4488: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4550: IF (p_commit = FND_API.G_TRUE) THEN

4546: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'p_published_structure='||p_published_structure, x_Log_Level=> 3);
4547: END IF;
4548:
4549:
4550: IF (p_commit = FND_API.G_TRUE) THEN
4551: savepoint UPDATE_ROLLUP_PROGRESS_PVT;
4552: END IF;
4553:
4554: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 4554: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

4550: IF (p_commit = FND_API.G_TRUE) THEN
4551: savepoint UPDATE_ROLLUP_PROGRESS_PVT;
4552: END IF;
4553:
4554: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4556: END IF;
4557:
4558: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 4555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4551: savepoint UPDATE_ROLLUP_PROGRESS_PVT;
4552: END IF;
4553:
4554: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4556: END IF;
4557:
4558: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4559: FND_MSG_PUB.initialize;

Line 4558: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

4554: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4556: END IF;
4557:
4558: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4559: FND_MSG_PUB.initialize;
4560: END IF;
4561:
4562: -- Bug # 3879910. Call corresponding API in package: PA_PROGRESS_PVT.

Line 4592: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4588: ,x_return_status => l_return_status
4589: ,x_msg_count => l_msg_count
4590: ,x_msg_data => l_msg_data);
4591:
4592: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4593: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4594: p_msg_name => l_msg_data);
4595: x_msg_data := l_msg_data;
4596: x_return_status := 'E';

Line 4598: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4594: p_msg_name => l_msg_data);
4595: x_msg_data := l_msg_data;
4596: x_return_status := 'E';
4597: x_msg_count := l_msg_count;
4598: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4599: END IF;
4600:
4601:
4602: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4602: x_return_status := FND_API.G_RET_STS_SUCCESS;

4598: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4599: END IF;
4600:
4601:
4602: x_return_status := FND_API.G_RET_STS_SUCCESS;
4603:
4604: IF (p_commit = FND_API.G_TRUE) THEN
4605: COMMIT;
4606: END IF;

Line 4604: IF (p_commit = FND_API.G_TRUE) THEN

4600:
4601:
4602: x_return_status := FND_API.G_RET_STS_SUCCESS;
4603:
4604: IF (p_commit = FND_API.G_TRUE) THEN
4605: COMMIT;
4606: END IF;
4607:
4608: IF g1_debug_mode = 'Y' THEN

Line 4613: WHEN FND_API.G_EXC_ERROR THEN

4609: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT End', x_Log_Level=> 3);
4610: END IF;
4611:
4612: EXCEPTION
4613: WHEN FND_API.G_EXC_ERROR THEN
4614: IF g1_debug_mode = 'Y' THEN
4615: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_ERROR', x_Log_Level=> 3);
4616: END IF;
4617:

Line 4615: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_ERROR', x_Log_Level=> 3);

4611:
4612: EXCEPTION
4613: WHEN FND_API.G_EXC_ERROR THEN
4614: IF g1_debug_mode = 'Y' THEN
4615: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_ERROR', x_Log_Level=> 3);
4616: END IF;
4617:
4618: IF p_commit = FND_API.G_TRUE THEN
4619: rollback to UPDATE_ROLLUP_PROGRESS_PVT;

Line 4618: IF p_commit = FND_API.G_TRUE THEN

4614: IF g1_debug_mode = 'Y' THEN
4615: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_ERROR', x_Log_Level=> 3);
4616: END IF;
4617:
4618: IF p_commit = FND_API.G_TRUE THEN
4619: rollback to UPDATE_ROLLUP_PROGRESS_PVT;
4620: END IF;
4621: x_return_status := FND_API.G_RET_STS_ERROR;
4622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 4621: x_return_status := FND_API.G_RET_STS_ERROR;

4617:
4618: IF p_commit = FND_API.G_TRUE THEN
4619: rollback to UPDATE_ROLLUP_PROGRESS_PVT;
4620: END IF;
4621: x_return_status := FND_API.G_RET_STS_ERROR;
4622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4623:
4624: IF g1_debug_mode = 'Y' THEN
4625: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);

Line 4622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4618: IF p_commit = FND_API.G_TRUE THEN
4619: rollback to UPDATE_ROLLUP_PROGRESS_PVT;
4620: END IF;
4621: x_return_status := FND_API.G_RET_STS_ERROR;
4622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4623:
4624: IF g1_debug_mode = 'Y' THEN
4625: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);
4626: END IF;

Line 4625: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);

4621: x_return_status := FND_API.G_RET_STS_ERROR;
4622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4623:
4624: IF g1_debug_mode = 'Y' THEN
4625: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);
4626: END IF;
4627:
4628: IF p_commit = FND_API.G_TRUE THEN
4629: rollback to UPDATE_ROLLUP_PROGRESS_PVT;

Line 4628: IF p_commit = FND_API.G_TRUE THEN

4624: IF g1_debug_mode = 'Y' THEN
4625: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);
4626: END IF;
4627:
4628: IF p_commit = FND_API.G_TRUE THEN
4629: rollback to UPDATE_ROLLUP_PROGRESS_PVT;
4630: END IF;
4631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4632: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 4631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4627:
4628: IF p_commit = FND_API.G_TRUE THEN
4629: rollback to UPDATE_ROLLUP_PROGRESS_PVT;
4630: END IF;
4631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4632: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
4633: p_procedure_name => 'UPDATE_ROLLUP_PROGRESS_PVT',
4634: p_error_text => SUBSTRB(SQLERRM,1,120));
4635: WHEN OTHERS THEN

Line 4640: IF p_commit = FND_API.G_TRUE THEN

4636: IF g1_debug_mode = 'Y' THEN
4637: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'OTHERS = '||sqlerrm, x_Log_Level=> 3);
4638: END IF;
4639:
4640: IF p_commit = FND_API.G_TRUE THEN
4641: rollback to UPDATE_ROLLUP_PROGRESS_PVT;
4642: END IF;
4643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4644: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 4643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4639:
4640: IF p_commit = FND_API.G_TRUE THEN
4641: rollback to UPDATE_ROLLUP_PROGRESS_PVT;
4642: END IF;
4643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4644: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
4645: p_procedure_name => 'UPDATE_ROLLUP_PROGRESS_PVT',
4646: p_error_text => SUBSTRB(SQLERRM,1,120));
4647: raise;

Line 4653: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

4649:
4650:
4651: PROCEDURE CREATE_PROJ_PROG_ATTR(
4652: p_api_version IN NUMBER :=1.0
4653: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4654: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4655: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4656: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4657: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 4654: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

4650:
4651: PROCEDURE CREATE_PROJ_PROG_ATTR(
4652: p_api_version IN NUMBER :=1.0
4653: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4654: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4655: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4656: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4657: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4658: ,p_debug_mode IN VARCHAR2 :='N'

Line 4655: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

4651: PROCEDURE CREATE_PROJ_PROG_ATTR(
4652: p_api_version IN NUMBER :=1.0
4653: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4654: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4655: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4656: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4657: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4658: ,p_debug_mode IN VARCHAR2 :='N'
4659: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4656: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

4652: p_api_version IN NUMBER :=1.0
4653: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4654: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4655: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4656: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4657: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4658: ,p_debug_mode IN VARCHAR2 :='N'
4659: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
4660: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4711: IF (p_commit = FND_API.G_TRUE) THEN

4707: pa_debug.debug('PA_PROGRESS_PUB.CREATE_PROJ_PROG_ATTR');
4708: END IF;
4709: END IF;
4710:
4711: IF (p_commit = FND_API.G_TRUE) THEN
4712: savepoint CREATE_PROJ_PROG_ATTR;
4713: END IF;
4714:
4715: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 4715: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

4711: IF (p_commit = FND_API.G_TRUE) THEN
4712: savepoint CREATE_PROJ_PROG_ATTR;
4713: END IF;
4714:
4715: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4717: END IF;
4718:
4719: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 4716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4712: savepoint CREATE_PROJ_PROG_ATTR;
4713: END IF;
4714:
4715: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4717: END IF;
4718:
4719: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4720: FND_MSG_PUB.initialize;

Line 4719: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

4715: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4717: END IF;
4718:
4719: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4720: FND_MSG_PUB.initialize;
4721: END IF;
4722:
4723: IF P_PROGRESS_CYCLE_ID = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4788: x_return_status := FND_API.G_RET_STS_SUCCESS;

4784: ,X_ALLW_PHY_PRCNT_CMP_OVERRIDES => P_ALLW_PHY_PRCNT_CMP_OVERRIDES
4785: ,X_STRUCTURE_TYPE => P_STRUCTURE_TYPE
4786: );
4787:
4788: x_return_status := FND_API.G_RET_STS_SUCCESS;
4789:
4790: IF (p_commit = FND_API.G_TRUE) THEN
4791: COMMIT;
4792: END IF;

Line 4790: IF (p_commit = FND_API.G_TRUE) THEN

4786: );
4787:
4788: x_return_status := FND_API.G_RET_STS_SUCCESS;
4789:
4790: IF (p_commit = FND_API.G_TRUE) THEN
4791: COMMIT;
4792: END IF;
4793:
4794: IF (p_debug_mode = 'Y') THEN

Line 4801: when FND_API.G_EXC_ERROR then

4797: END IF;
4798: END IF;
4799:
4800: EXCEPTION
4801: when FND_API.G_EXC_ERROR then
4802: if p_commit = FND_API.G_TRUE then
4803: rollback to CREATE_PROJ_PROG_ATTR;
4804: end if;
4805: x_return_status := FND_API.G_RET_STS_ERROR;

Line 4802: if p_commit = FND_API.G_TRUE then

4798: END IF;
4799:
4800: EXCEPTION
4801: when FND_API.G_EXC_ERROR then
4802: if p_commit = FND_API.G_TRUE then
4803: rollback to CREATE_PROJ_PROG_ATTR;
4804: end if;
4805: x_return_status := FND_API.G_RET_STS_ERROR;
4806: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 4805: x_return_status := FND_API.G_RET_STS_ERROR;

4801: when FND_API.G_EXC_ERROR then
4802: if p_commit = FND_API.G_TRUE then
4803: rollback to CREATE_PROJ_PROG_ATTR;
4804: end if;
4805: x_return_status := FND_API.G_RET_STS_ERROR;
4806: when FND_API.G_EXC_UNEXPECTED_ERROR then
4807: if p_commit = FND_API.G_TRUE then
4808: rollback to CREATE_PROJ_PROG_ATTR;
4809: end if;

Line 4806: when FND_API.G_EXC_UNEXPECTED_ERROR then

4802: if p_commit = FND_API.G_TRUE then
4803: rollback to CREATE_PROJ_PROG_ATTR;
4804: end if;
4805: x_return_status := FND_API.G_RET_STS_ERROR;
4806: when FND_API.G_EXC_UNEXPECTED_ERROR then
4807: if p_commit = FND_API.G_TRUE then
4808: rollback to CREATE_PROJ_PROG_ATTR;
4809: end if;
4810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4807: if p_commit = FND_API.G_TRUE then

4803: rollback to CREATE_PROJ_PROG_ATTR;
4804: end if;
4805: x_return_status := FND_API.G_RET_STS_ERROR;
4806: when FND_API.G_EXC_UNEXPECTED_ERROR then
4807: if p_commit = FND_API.G_TRUE then
4808: rollback to CREATE_PROJ_PROG_ATTR;
4809: end if;
4810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4811: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 4810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4806: when FND_API.G_EXC_UNEXPECTED_ERROR then
4807: if p_commit = FND_API.G_TRUE then
4808: rollback to CREATE_PROJ_PROG_ATTR;
4809: end if;
4810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4811: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
4812: p_procedure_name => 'CREATE_PROJ_PROG_ATTR',
4813: p_error_text => SUBSTRB(SQLERRM,1,120));
4814: when OTHERS then

Line 4815: if p_commit = FND_API.G_TRUE then

4811: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
4812: p_procedure_name => 'CREATE_PROJ_PROG_ATTR',
4813: p_error_text => SUBSTRB(SQLERRM,1,120));
4814: when OTHERS then
4815: if p_commit = FND_API.G_TRUE then
4816: rollback to CREATE_PROJ_PROG_ATTR;
4817: end if;
4818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4819: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 4818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4814: when OTHERS then
4815: if p_commit = FND_API.G_TRUE then
4816: rollback to CREATE_PROJ_PROG_ATTR;
4817: end if;
4818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4819: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
4820: p_procedure_name => 'CREATE_PROJ_PROG_ATTR',
4821: p_error_text => SUBSTRB(SQLERRM,1,120));
4822: raise;

Line 4828: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

4824:
4825:
4826: PROCEDURE UPDATE_PROJ_PROG_ATTR(
4827: p_api_version IN NUMBER :=1.0
4828: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4829: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4830: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4831: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4832: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 4829: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

4825:
4826: PROCEDURE UPDATE_PROJ_PROG_ATTR(
4827: p_api_version IN NUMBER :=1.0
4828: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4829: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4830: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4831: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4832: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4833: ,p_debug_mode IN VARCHAR2 :='N'

Line 4830: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

4826: PROCEDURE UPDATE_PROJ_PROG_ATTR(
4827: p_api_version IN NUMBER :=1.0
4828: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4829: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4830: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4831: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4832: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4833: ,p_debug_mode IN VARCHAR2 :='N'
4834: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4831: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

4827: p_api_version IN NUMBER :=1.0
4828: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4829: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4830: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4831: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4832: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4833: ,p_debug_mode IN VARCHAR2 :='N'
4834: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
4835: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4943: IF (p_commit = FND_API.G_TRUE) THEN

4939: pa_debug.debug('PA_PROGRESS_PUB.UPDATE_PROJ_PROG_ATTR');
4940: END IF;
4941: END IF;
4942:
4943: IF (p_commit = FND_API.G_TRUE) THEN
4944: savepoint UPDATE_PROJ_PROG_ATTR;
4945: END IF;
4946:
4947: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 4947: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

4943: IF (p_commit = FND_API.G_TRUE) THEN
4944: savepoint UPDATE_PROJ_PROG_ATTR;
4945: END IF;
4946:
4947: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4948: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4949: END IF;
4950:
4951: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 4948: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4944: savepoint UPDATE_PROJ_PROG_ATTR;
4945: END IF;
4946:
4947: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4948: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4949: END IF;
4950:
4951: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4952: FND_MSG_PUB.initialize;

Line 4951: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

4947: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4948: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4949: END IF;
4950:
4951: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4952: FND_MSG_PUB.initialize;
4953: END IF;
4954:
4955: /* IF P_PROGRESS_CYCLE_ID = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 5008: RAISE FND_API.G_EXC_ERROR;

5004: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5005: p_msg_name => 'PA_TP_CANT_DIS_PC');
5006: x_msg_data := 'PA_TP_CANT_DIS_PC';
5007: x_return_status := 'E';
5008: RAISE FND_API.G_EXC_ERROR;
5009: END IF;
5010:
5011: IF p_WQ_ENABLE_FLAG = 'N' AND
5012: l_old_enable_wq_flag = 'Y'

Line 5018: RAISE FND_API.G_EXC_ERROR;

5014: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5015: p_msg_name => 'PA_TP_CANT_DIS_WQ');
5016: x_msg_data := 'PA_TP_CANT_DIS_WQ';
5017: x_return_status := 'E';
5018: RAISE FND_API.G_EXC_ERROR;
5019: END IF;
5020:
5021: IF p_REMAIN_EFFORT_ENABLE_FLAG = 'N' AND
5022: l_old_REMAIN_EFF_ENABLE_FLAG = 'Y'

Line 5028: RAISE FND_API.G_EXC_ERROR;

5024: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5025: p_msg_name => 'PA_TP_CANT_DIS_REM_EFF');
5026: x_msg_data := 'PA_TP_CANT_DIS_REM_EFF';
5027: x_return_status := 'E';
5028: RAISE FND_API.G_EXC_ERROR;
5029: END IF;
5030:
5031: END IF;
5032:

Line 5086: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5082: );
5083: end if;
5084: -- Bug # 4576303.
5085: --------------dbms_output.put_line('ret stat = '||l_return_status);
5086: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5087: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5088: p_msg_name => l_msg_data
5089: );
5090: x_msg_data := l_msg_data;

Line 5093: RAISE FND_API.G_EXC_ERROR;

5089: );
5090: x_msg_data := l_msg_data;
5091: x_return_status := 'E';
5092: CLOSE cur_get_wk_ver_struct_id;
5093: RAISE FND_API.G_EXC_ERROR;
5094: END IF;
5095: END LOOP;
5096: CLOSE cur_get_wk_ver_struct_id;
5097: ELSE

Line 5121: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5117: );
5118: end if;
5119: -- Bug # 4576303.
5120: --------------dbms_output.put_line('ret stat = '||l_return_status);
5121: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5122: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5123: p_msg_name => l_msg_data
5124: );
5125: x_msg_data := l_msg_data;

Line 5127: RAISE FND_API.G_EXC_ERROR;

5123: p_msg_name => l_msg_data
5124: );
5125: x_msg_data := l_msg_data;
5126: x_return_status := 'E';
5127: RAISE FND_API.G_EXC_ERROR;
5128: END IF;
5129: END IF;
5130: ELSE
5131: --3035902: process update flag changes; added check for

Line 5153: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5149: x_msg_count => l_msg_count,
5150: x_msg_data => l_msg_data
5151: );
5152: --------------dbms_output.put_line('ret stat = '||l_return_status);
5153: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5154: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5155: p_msg_name => l_msg_data
5156: );
5157: x_msg_data := l_msg_data;

Line 5160: RAISE FND_API.G_EXC_ERROR;

5156: );
5157: x_msg_data := l_msg_data;
5158: x_return_status := 'E';
5159: CLOSE cur_get_wk_ver_struct_id;
5160: RAISE FND_API.G_EXC_ERROR;
5161: END IF;
5162: END LOOP;
5163: CLOSE cur_get_wk_ver_struct_id;
5164: ELSE

Line 5182: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5178: x_msg_count => l_msg_count,
5179: x_msg_data => l_msg_data
5180: );
5181: --------------dbms_output.put_line('ret stat = '||l_return_status);
5182: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5183: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5184: p_msg_name => l_msg_data
5185: );
5186: x_msg_data := l_msg_data;

Line 5188: RAISE FND_API.G_EXC_ERROR;

5184: p_msg_name => l_msg_data
5185: );
5186: x_msg_data := l_msg_data;
5187: x_return_status := 'E';
5188: RAISE FND_API.G_EXC_ERROR;
5189: END IF;
5190: END IF ;
5191: END IF;
5192: END IF;

Line 5218: x_return_status := FND_API.G_RET_STS_SUCCESS;

5214: ,X_ALLW_PHY_PRCNT_CMP_OVERRIDES => p_allw_phy_prcnt_cmp_overrides
5215: ,X_STRUCTURE_TYPE => p_structure_type
5216: );
5217:
5218: x_return_status := FND_API.G_RET_STS_SUCCESS;
5219:
5220: IF (p_commit = FND_API.G_TRUE) THEN
5221: COMMIT;
5222: END IF;

Line 5220: IF (p_commit = FND_API.G_TRUE) THEN

5216: );
5217:
5218: x_return_status := FND_API.G_RET_STS_SUCCESS;
5219:
5220: IF (p_commit = FND_API.G_TRUE) THEN
5221: COMMIT;
5222: END IF;
5223:
5224: IF (p_debug_mode = 'Y') THEN

Line 5231: when FND_API.G_EXC_ERROR then

5227: END IF;
5228: END IF;
5229:
5230: EXCEPTION
5231: when FND_API.G_EXC_ERROR then
5232: if p_commit = FND_API.G_TRUE then
5233: rollback to UPDATE_PROJ_PROG_ATTR;
5234: end if;
5235: x_return_status := FND_API.G_RET_STS_ERROR;

Line 5232: if p_commit = FND_API.G_TRUE then

5228: END IF;
5229:
5230: EXCEPTION
5231: when FND_API.G_EXC_ERROR then
5232: if p_commit = FND_API.G_TRUE then
5233: rollback to UPDATE_PROJ_PROG_ATTR;
5234: end if;
5235: x_return_status := FND_API.G_RET_STS_ERROR;
5236: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 5235: x_return_status := FND_API.G_RET_STS_ERROR;

5231: when FND_API.G_EXC_ERROR then
5232: if p_commit = FND_API.G_TRUE then
5233: rollback to UPDATE_PROJ_PROG_ATTR;
5234: end if;
5235: x_return_status := FND_API.G_RET_STS_ERROR;
5236: when FND_API.G_EXC_UNEXPECTED_ERROR then
5237: if p_commit = FND_API.G_TRUE then
5238: rollback to UPDATE_PROJ_PROG_ATTR;
5239: end if;

Line 5236: when FND_API.G_EXC_UNEXPECTED_ERROR then

5232: if p_commit = FND_API.G_TRUE then
5233: rollback to UPDATE_PROJ_PROG_ATTR;
5234: end if;
5235: x_return_status := FND_API.G_RET_STS_ERROR;
5236: when FND_API.G_EXC_UNEXPECTED_ERROR then
5237: if p_commit = FND_API.G_TRUE then
5238: rollback to UPDATE_PROJ_PROG_ATTR;
5239: end if;
5240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5237: if p_commit = FND_API.G_TRUE then

5233: rollback to UPDATE_PROJ_PROG_ATTR;
5234: end if;
5235: x_return_status := FND_API.G_RET_STS_ERROR;
5236: when FND_API.G_EXC_UNEXPECTED_ERROR then
5237: if p_commit = FND_API.G_TRUE then
5238: rollback to UPDATE_PROJ_PROG_ATTR;
5239: end if;
5240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5241: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 5240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5236: when FND_API.G_EXC_UNEXPECTED_ERROR then
5237: if p_commit = FND_API.G_TRUE then
5238: rollback to UPDATE_PROJ_PROG_ATTR;
5239: end if;
5240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5241: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
5242: p_procedure_name => 'UPDATE_PROJ_PROG_ATTR',
5243: p_error_text => SUBSTRB(SQLERRM,1,120));
5244: when OTHERS then

Line 5245: if p_commit = FND_API.G_TRUE then

5241: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
5242: p_procedure_name => 'UPDATE_PROJ_PROG_ATTR',
5243: p_error_text => SUBSTRB(SQLERRM,1,120));
5244: when OTHERS then
5245: if p_commit = FND_API.G_TRUE then
5246: rollback to UPDATE_PROJ_PROG_ATTR;
5247: end if;
5248: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5249: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 5248: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5244: when OTHERS then
5245: if p_commit = FND_API.G_TRUE then
5246: rollback to UPDATE_PROJ_PROG_ATTR;
5247: end if;
5248: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5249: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
5250: p_procedure_name => 'UPDATE_PROJ_PROG_ATTR',
5251: p_error_text => SUBSTRB(SQLERRM,1,120));
5252: raise;

Line 5257: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

5253: END UPDATE_PROJ_PROG_ATTR;
5254:
5255: PROCEDURE DELETE_PROJ_PROG_ATTR(
5256: p_api_version IN NUMBER :=1.0
5257: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5258: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5259: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5260: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5261: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 5258: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

5254:
5255: PROCEDURE DELETE_PROJ_PROG_ATTR(
5256: p_api_version IN NUMBER :=1.0
5257: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5258: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5259: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5260: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5261: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5262: ,p_debug_mode IN VARCHAR2 :='N'

Line 5259: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

5255: PROCEDURE DELETE_PROJ_PROG_ATTR(
5256: p_api_version IN NUMBER :=1.0
5257: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5258: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5259: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5260: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5261: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5262: ,p_debug_mode IN VARCHAR2 :='N'
5263: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 5260: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

5256: p_api_version IN NUMBER :=1.0
5257: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5258: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5259: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5260: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5261: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5262: ,p_debug_mode IN VARCHAR2 :='N'
5263: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
5264: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 5306: IF (p_commit = FND_API.G_TRUE) THEN

5302: pa_debug.debug('PA_PROGRESS_PUB.DELETE_PROJ_PROG_ATTR');
5303: END IF;
5304: END IF;
5305:
5306: IF (p_commit = FND_API.G_TRUE) THEN
5307: savepoint DELETE_PROJ_PROG_ATTR; --Amit
5308: END IF;
5309:
5310: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 5310: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

5306: IF (p_commit = FND_API.G_TRUE) THEN
5307: savepoint DELETE_PROJ_PROG_ATTR; --Amit
5308: END IF;
5309:
5310: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
5311: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5312: END IF;
5313:
5314: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 5311: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5307: savepoint DELETE_PROJ_PROG_ATTR; --Amit
5308: END IF;
5309:
5310: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
5311: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5312: END IF;
5313:
5314: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
5315: FND_MSG_PUB.initialize;

Line 5314: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

5310: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
5311: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5312: END IF;
5313:
5314: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
5315: FND_MSG_PUB.initialize;
5316: END IF;
5317:
5318: OPEN cur_ppp;

Line 5325: x_return_status := FND_API.G_RET_STS_SUCCESS;

5321:
5322: PA_PROJ_PROGRESS_ATTR_PKG.DELETE_ROW( l_ppp_row_id
5323: );
5324:
5325: x_return_status := FND_API.G_RET_STS_SUCCESS;
5326:
5327: IF (p_commit = FND_API.G_TRUE) THEN
5328: COMMIT;
5329: END IF;

Line 5327: IF (p_commit = FND_API.G_TRUE) THEN

5323: );
5324:
5325: x_return_status := FND_API.G_RET_STS_SUCCESS;
5326:
5327: IF (p_commit = FND_API.G_TRUE) THEN
5328: COMMIT;
5329: END IF;
5330:
5331: IF (p_debug_mode = 'Y') THEN

Line 5338: when FND_API.G_EXC_ERROR then

5334: END IF;
5335: END IF;
5336:
5337: EXCEPTION
5338: when FND_API.G_EXC_ERROR then
5339: if p_commit = FND_API.G_TRUE then
5340: rollback to DELETE_PROJ_PROG_ATTR;
5341: end if;
5342: x_return_status := FND_API.G_RET_STS_ERROR;

Line 5339: if p_commit = FND_API.G_TRUE then

5335: END IF;
5336:
5337: EXCEPTION
5338: when FND_API.G_EXC_ERROR then
5339: if p_commit = FND_API.G_TRUE then
5340: rollback to DELETE_PROJ_PROG_ATTR;
5341: end if;
5342: x_return_status := FND_API.G_RET_STS_ERROR;
5343: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 5342: x_return_status := FND_API.G_RET_STS_ERROR;

5338: when FND_API.G_EXC_ERROR then
5339: if p_commit = FND_API.G_TRUE then
5340: rollback to DELETE_PROJ_PROG_ATTR;
5341: end if;
5342: x_return_status := FND_API.G_RET_STS_ERROR;
5343: when FND_API.G_EXC_UNEXPECTED_ERROR then
5344: if p_commit = FND_API.G_TRUE then
5345: rollback to DELETE_PROJ_PROG_ATTR;
5346: end if;

Line 5343: when FND_API.G_EXC_UNEXPECTED_ERROR then

5339: if p_commit = FND_API.G_TRUE then
5340: rollback to DELETE_PROJ_PROG_ATTR;
5341: end if;
5342: x_return_status := FND_API.G_RET_STS_ERROR;
5343: when FND_API.G_EXC_UNEXPECTED_ERROR then
5344: if p_commit = FND_API.G_TRUE then
5345: rollback to DELETE_PROJ_PROG_ATTR;
5346: end if;
5347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5344: if p_commit = FND_API.G_TRUE then

5340: rollback to DELETE_PROJ_PROG_ATTR;
5341: end if;
5342: x_return_status := FND_API.G_RET_STS_ERROR;
5343: when FND_API.G_EXC_UNEXPECTED_ERROR then
5344: if p_commit = FND_API.G_TRUE then
5345: rollback to DELETE_PROJ_PROG_ATTR;
5346: end if;
5347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5348: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 5347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5343: when FND_API.G_EXC_UNEXPECTED_ERROR then
5344: if p_commit = FND_API.G_TRUE then
5345: rollback to DELETE_PROJ_PROG_ATTR;
5346: end if;
5347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5348: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
5349: p_procedure_name => 'DELETE_PROJ_PROG_ATTR',
5350: p_error_text => SUBSTRB(SQLERRM,1,120));
5351: when OTHERS then

Line 5352: if p_commit = FND_API.G_TRUE then

5348: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
5349: p_procedure_name => 'DELETE_PROJ_PROG_ATTR',
5350: p_error_text => SUBSTRB(SQLERRM,1,120));
5351: when OTHERS then
5352: if p_commit = FND_API.G_TRUE then
5353: rollback to DELETE_PROJ_PROG_ATTR;
5354: end if;
5355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5356: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 5355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5351: when OTHERS then
5352: if p_commit = FND_API.G_TRUE then
5353: rollback to DELETE_PROJ_PROG_ATTR;
5354: end if;
5355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5356: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
5357: p_procedure_name => 'DELETE_PROJ_PROG_ATTR',
5358: p_error_text => SUBSTRB(SQLERRM,1,120));
5359: raise;

Line 5364: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

5360: END DELETE_PROJ_PROG_ATTR;
5361:
5362: PROCEDURE delete_progress_record(
5363: p_api_version IN NUMBER :=1.0
5364: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5365: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5366: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5367: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5368: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 5365: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

5361:
5362: PROCEDURE delete_progress_record(
5363: p_api_version IN NUMBER :=1.0
5364: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5365: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5366: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5367: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5368: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5369: ,p_debug_mode IN VARCHAR2 :='N'

Line 5366: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

5362: PROCEDURE delete_progress_record(
5363: p_api_version IN NUMBER :=1.0
5364: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5365: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5366: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5367: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5368: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5369: ,p_debug_mode IN VARCHAR2 :='N'
5370: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 5367: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

5363: p_api_version IN NUMBER :=1.0
5364: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5365: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5366: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5367: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5368: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5369: ,p_debug_mode IN VARCHAR2 :='N'
5370: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
5371: ,p_structure_version_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 5447: IF (p_commit = FND_API.G_TRUE) THEN

5443: pa_debug.debug('PA_PROGRESS_PUB.delete_progress_record');
5444: END IF;
5445: END IF;
5446:
5447: IF (p_commit = FND_API.G_TRUE) THEN
5448: savepoint delete_progress_record;
5449: END IF;
5450:
5451: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 5451: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

5447: IF (p_commit = FND_API.G_TRUE) THEN
5448: savepoint delete_progress_record;
5449: END IF;
5450:
5451: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
5452: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5453: END IF;
5454:
5455: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 5452: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5448: savepoint delete_progress_record;
5449: END IF;
5450:
5451: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
5452: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5453: END IF;
5454:
5455: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
5456: FND_MSG_PUB.initialize;

Line 5455: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

5451: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
5452: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5453: END IF;
5454:
5455: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
5456: FND_MSG_PUB.initialize;
5457: END IF;
5458:
5459: IF p_task_version_id is NULL OR p_task_version_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 5493: when FND_API.G_EXC_ERROR then

5489: PA_PERCENT_COMPLETES_PKG.DELETE_ROW( l_ppc_row_id );
5490: PA_PROGRESS_ROLLUP_PKG.DELETE_ROW( l_rollup_row_id );
5491:
5492: EXCEPTION
5493: when FND_API.G_EXC_ERROR then
5494: if p_commit = FND_API.G_TRUE then
5495: rollback to delete_progress_record;
5496: end if;
5497: x_return_status := FND_API.G_RET_STS_ERROR;

Line 5494: if p_commit = FND_API.G_TRUE then

5490: PA_PROGRESS_ROLLUP_PKG.DELETE_ROW( l_rollup_row_id );
5491:
5492: EXCEPTION
5493: when FND_API.G_EXC_ERROR then
5494: if p_commit = FND_API.G_TRUE then
5495: rollback to delete_progress_record;
5496: end if;
5497: x_return_status := FND_API.G_RET_STS_ERROR;
5498: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 5497: x_return_status := FND_API.G_RET_STS_ERROR;

5493: when FND_API.G_EXC_ERROR then
5494: if p_commit = FND_API.G_TRUE then
5495: rollback to delete_progress_record;
5496: end if;
5497: x_return_status := FND_API.G_RET_STS_ERROR;
5498: when FND_API.G_EXC_UNEXPECTED_ERROR then
5499: if p_commit = FND_API.G_TRUE then
5500: rollback to delete_progress_record;
5501: end if;

Line 5498: when FND_API.G_EXC_UNEXPECTED_ERROR then

5494: if p_commit = FND_API.G_TRUE then
5495: rollback to delete_progress_record;
5496: end if;
5497: x_return_status := FND_API.G_RET_STS_ERROR;
5498: when FND_API.G_EXC_UNEXPECTED_ERROR then
5499: if p_commit = FND_API.G_TRUE then
5500: rollback to delete_progress_record;
5501: end if;
5502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5499: if p_commit = FND_API.G_TRUE then

5495: rollback to delete_progress_record;
5496: end if;
5497: x_return_status := FND_API.G_RET_STS_ERROR;
5498: when FND_API.G_EXC_UNEXPECTED_ERROR then
5499: if p_commit = FND_API.G_TRUE then
5500: rollback to delete_progress_record;
5501: end if;
5502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5503: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 5502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5498: when FND_API.G_EXC_UNEXPECTED_ERROR then
5499: if p_commit = FND_API.G_TRUE then
5500: rollback to delete_progress_record;
5501: end if;
5502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5503: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
5504: p_procedure_name => 'delete_progress_record',
5505: p_error_text => SUBSTRB(SQLERRM,1,120));
5506: when OTHERS then

Line 5507: if p_commit = FND_API.G_TRUE then

5503: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
5504: p_procedure_name => 'delete_progress_record',
5505: p_error_text => SUBSTRB(SQLERRM,1,120));
5506: when OTHERS then
5507: if p_commit = FND_API.G_TRUE then
5508: rollback to delete_progress_record;
5509: end if;
5510: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5511: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 5510: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5506: when OTHERS then
5507: if p_commit = FND_API.G_TRUE then
5508: rollback to delete_progress_record;
5509: end if;
5510: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5511: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
5512: p_procedure_name => 'delete_progress_record',
5513: p_error_text => SUBSTRB(SQLERRM,1,120));
5514: raise;

Line 5520: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

5516:
5517:
5518: PROCEDURE push_down_task_status(
5519: p_api_version IN NUMBER :=1.0
5520: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5521: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5522: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5523: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5524: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 5521: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

5517:
5518: PROCEDURE push_down_task_status(
5519: p_api_version IN NUMBER :=1.0
5520: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5521: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5522: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5523: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5524: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5525: ,p_debug_mode IN VARCHAR2 :='N'

Line 5522: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

5518: PROCEDURE push_down_task_status(
5519: p_api_version IN NUMBER :=1.0
5520: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5521: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5522: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5523: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5524: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5525: ,p_debug_mode IN VARCHAR2 :='N'
5526: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 5523: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

5519: p_api_version IN NUMBER :=1.0
5520: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
5521: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5522: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5523: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5524: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5525: ,p_debug_mode IN VARCHAR2 :='N'
5526: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
5527: ,p_task_status IN VARCHAR2

Line 5742: x_return_status := FND_API.G_RET_STS_SUCCESS;

5738: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.PUSH_DOWN_TASK_STATUS', x_Msg => 'l_structure_version_id='||l_structure_version_id, x_Log_Level=> 3);
5739: END IF;
5740:
5741: -- Initialize OUT params : 5209741
5742: x_return_status := FND_API.G_RET_STS_SUCCESS;
5743: x_msg_data := NULL ;
5744: x_msg_count := 0 ;
5745: -- End : 5209741
5746:

Line 5747: IF (p_commit = FND_API.G_TRUE) THEN

5743: x_msg_data := NULL ;
5744: x_msg_count := 0 ;
5745: -- End : 5209741
5746:
5747: IF (p_commit = FND_API.G_TRUE) THEN
5748: savepoint push_down_task_status;
5749: END IF;
5750:
5751: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 5751: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

5747: IF (p_commit = FND_API.G_TRUE) THEN
5748: savepoint push_down_task_status;
5749: END IF;
5750:
5751: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
5752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5753: END IF;
5754:
5755: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 5752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5748: savepoint push_down_task_status;
5749: END IF;
5750:
5751: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
5752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5753: END IF;
5754:
5755: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
5756: FND_MSG_PUB.initialize;

Line 5755: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

5751: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
5752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5753: END IF;
5754:
5755: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
5756: FND_MSG_PUB.initialize;
5757: END IF;
5758:
5759: -- Bug 3878024 : Begin

Line 5770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

5766: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
5767: p_procedure_name => 'PUSH_DOWN_TASK_STATUS',
5768: p_error_text => 'Unexpected Error : Structure Version Id can not be found. Please contact System Administrator.');
5769:
5770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
5771: END;
5772: -- Bug 3878024 : End;
5773: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.PUSH_DOWN_TASK_STATUS', x_Msg => 'l_structure_version_id='||l_structure_version_id, x_Log_Level=> 3);
5774:

Line 6118: RAISE FND_API.G_EXC_ERROR;

6114: ,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => null
6115: );
6116:
6117: IF Fnd_Msg_Pub.count_msg > 0 THEN
6118: RAISE FND_API.G_EXC_ERROR;
6119: END IF;
6120: END IF; -- cur_task_assignments_rec.current_flag = 'Y' THEN
6121:
6122: IF cur_task_assignments_rec.current_flag = 'Y' OR cur_task_assignments_rec.current_flag = 'X' THEN

Line 6439: RAISE FND_API.G_EXC_ERROR;

6435: ,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => null
6436: );
6437:
6438: IF Fnd_Msg_Pub.count_msg > 0 THEN
6439: RAISE FND_API.G_EXC_ERROR;
6440: END IF;
6441:
6442: -- Bug 3922325 : Hidden Assignment record also shd get created
6443:

Line 6573: RAISE FND_API.G_EXC_ERROR;

6569: ,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => null
6570: );
6571:
6572: IF Fnd_Msg_Pub.count_msg > 0 THEN
6573: RAISE FND_API.G_EXC_ERROR;
6574: END IF;
6575:
6576: END IF; -- cur_task_assignments_rec.current_flag = 'Y' THEN
6577:

Line 6873: RAISE FND_API.G_EXC_ERROR;

6869: ,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => null
6870: );
6871:
6872: IF Fnd_Msg_Pub.count_msg > 0 THEN
6873: RAISE FND_API.G_EXC_ERROR;
6874: END IF;
6875:
6876: IF g1_debug_mode = 'Y' THEN
6877: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_TASK_PROGRESS', x_Msg => 'Inserted Tasks Record in PA_PROGRESS_ROLLUP ', x_Log_Level=> 3);

Line 6892: RAISE FND_API.G_EXC_ERROR;

6888: WHEN OTHERS THEN
6889: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
6890: p_procedure_name => 'PUSH_DOWN_TASK_STATUS',
6891: p_error_text => SUBSTRB('Call PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE:'||SQLERRM,1,120));
6892: RAISE FND_API.G_EXC_ERROR;
6893: END;
6894:
6895: IF x_return_status <> 'S' THEN
6896: RAISE FND_API.G_EXC_ERROR;

Line 6896: RAISE FND_API.G_EXC_ERROR;

6892: RAISE FND_API.G_EXC_ERROR;
6893: END;
6894:
6895: IF x_return_status <> 'S' THEN
6896: RAISE FND_API.G_EXC_ERROR;
6897: END IF;
6898:
6899: l_base_struct_ver_id := pa_project_structure_utils.get_baseline_struct_ver(p_project_id);
6900:

Line 6918: RAISE FND_API.G_EXC_ERROR;

6914: WHEN OTHERS THEN
6915: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
6916: p_procedure_name => 'PUSH_DOWN_TASK_STATUS',
6917: p_error_text => SUBSTRB('Call PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data:'||SQLERRM,1,120));
6918: RAISE FND_API.G_EXC_ERROR;
6919: END;
6920:
6921: IF x_return_status <> 'S' THEN
6922: RAISE FND_API.G_EXC_ERROR;

Line 6922: RAISE FND_API.G_EXC_ERROR;

6918: RAISE FND_API.G_EXC_ERROR;
6919: END;
6920:
6921: IF x_return_status <> 'S' THEN
6922: RAISE FND_API.G_EXC_ERROR;
6923: END IF;
6924: -- Bug 3878024 : End
6925: */
6926: END IF;

Line 6950: if x_return_status <> FND_API.g_ret_sts_success then

6946: ,x_msg_data => x_msg_data
6947: ,x_return_status => x_return_status
6948: ) ;
6949:
6950: if x_return_status <> FND_API.g_ret_sts_success then
6951: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
6952: end if ;
6953: end if ;
6954:

Line 6951: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

6947: ,x_return_status => x_return_status
6948: ) ;
6949:
6950: if x_return_status <> FND_API.g_ret_sts_success then
6951: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
6952: end if ;
6953: end if ;
6954:
6955: -- FP M : 3491609 : Project Execution Workflow

Line 6996: if x_return_status <> FND_API.g_ret_sts_success then

6992: ,x_msg_data => x_msg_data
6993: ,x_return_status => x_return_status
6994: ) ;
6995:
6996: if x_return_status <> FND_API.g_ret_sts_success then
6997: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
6998: end if ;
6999:
7000: end if ;

Line 6997: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

6993: ,x_return_status => x_return_status
6994: ) ;
6995:
6996: if x_return_status <> FND_API.g_ret_sts_success then
6997: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
6998: end if ;
6999:
7000: end if ;
7001: -- FP M : 3491609 : Project Execution Workflow

Line 7077: when FND_API.G_EXC_ERROR then

7073: END IF;
7074: END IF;
7075:
7076: EXCEPTION
7077: when FND_API.G_EXC_ERROR then
7078: if p_commit = FND_API.G_TRUE then
7079: rollback to push_down_task_status;
7080: end if;
7081: x_return_status := FND_API.G_RET_STS_ERROR;

Line 7078: if p_commit = FND_API.G_TRUE then

7074: END IF;
7075:
7076: EXCEPTION
7077: when FND_API.G_EXC_ERROR then
7078: if p_commit = FND_API.G_TRUE then
7079: rollback to push_down_task_status;
7080: end if;
7081: x_return_status := FND_API.G_RET_STS_ERROR;
7082: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 7081: x_return_status := FND_API.G_RET_STS_ERROR;

7077: when FND_API.G_EXC_ERROR then
7078: if p_commit = FND_API.G_TRUE then
7079: rollback to push_down_task_status;
7080: end if;
7081: x_return_status := FND_API.G_RET_STS_ERROR;
7082: when FND_API.G_EXC_UNEXPECTED_ERROR then
7083: if p_commit = FND_API.G_TRUE then
7084: rollback to push_down_task_status;
7085: end if;

Line 7082: when FND_API.G_EXC_UNEXPECTED_ERROR then

7078: if p_commit = FND_API.G_TRUE then
7079: rollback to push_down_task_status;
7080: end if;
7081: x_return_status := FND_API.G_RET_STS_ERROR;
7082: when FND_API.G_EXC_UNEXPECTED_ERROR then
7083: if p_commit = FND_API.G_TRUE then
7084: rollback to push_down_task_status;
7085: end if;
7086: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 7083: if p_commit = FND_API.G_TRUE then

7079: rollback to push_down_task_status;
7080: end if;
7081: x_return_status := FND_API.G_RET_STS_ERROR;
7082: when FND_API.G_EXC_UNEXPECTED_ERROR then
7083: if p_commit = FND_API.G_TRUE then
7084: rollback to push_down_task_status;
7085: end if;
7086: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7087: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 7086: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7082: when FND_API.G_EXC_UNEXPECTED_ERROR then
7083: if p_commit = FND_API.G_TRUE then
7084: rollback to push_down_task_status;
7085: end if;
7086: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7087: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
7088: p_procedure_name => 'push_down_task_status',
7089: p_error_text => SUBSTRB(SQLERRM,1,120));
7090: when OTHERS then

Line 7091: if p_commit = FND_API.G_TRUE then

7087: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
7088: p_procedure_name => 'push_down_task_status',
7089: p_error_text => SUBSTRB(SQLERRM,1,120));
7090: when OTHERS then
7091: if p_commit = FND_API.G_TRUE then
7092: rollback to push_down_task_status;
7093: end if;
7094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7095: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 7094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7090: when OTHERS then
7091: if p_commit = FND_API.G_TRUE then
7092: rollback to push_down_task_status;
7093: end if;
7094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7095: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
7096: p_procedure_name => 'push_down_task_status',
7097: p_error_text => SUBSTRB(SQLERRM,1,120));
7098: raise;

Line 7167: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7163: ,x_return_status => l_return_status
7164: ,x_msg_count => l_msg_count
7165: ,x_msg_data => l_msg_data);
7166:
7167: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7168: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
7169: p_msg_name => l_msg_data);
7170: x_msg_data := l_msg_data;
7171: x_return_status := 'E';

Line 7173: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7169: p_msg_name => l_msg_data);
7170: x_msg_data := l_msg_data;
7171: x_return_status := 'E';
7172: x_msg_count := l_msg_count;
7173: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7174: END IF;
7175:
7176:
7177: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 7177: x_return_status := FND_API.G_RET_STS_SUCCESS;

7173: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7174: END IF;
7175:
7176:
7177: x_return_status := FND_API.G_RET_STS_SUCCESS;
7178:
7179: IF g1_debug_mode = 'Y' THEN
7180: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.ROLLUP_FUTURE_PROGRESS_PVT', x_Msg => 'End ', x_Log_Level=> 3);
7181: END IF;

Line 7184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7180: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.ROLLUP_FUTURE_PROGRESS_PVT', x_Msg => 'End ', x_Log_Level=> 3);
7181: END IF;
7182: EXCEPTION
7183: WHEN OTHERS THEN
7184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7185: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
7186: p_procedure_name => 'ROLLUP_FUTURE_PROGRESS_PVT',
7187: p_error_text => SUBSTRB(SQLERRM,1,120));
7188: raise;

Line 7210: p_return_status := FND_API.G_RET_STS_SUCCESS;

7206: p_batch_id in number,
7207: p_batch_party_id in number,
7208: p_return_status in out nocopy varchar2) is
7209: begin
7210: p_return_status := FND_API.G_RET_STS_SUCCESS;
7211:
7212: if (p_from_fk_id <> p_to_fk_id) then
7213:
7214: update pa_percent_completes

Line 7231: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

7227: -- Progress Management Changes. Bug # 3420093.
7228:
7229: PROCEDURE APPLY_LP_PROG_ON_CWV(
7230: p_api_version IN NUMBER :=1.0
7231: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
7232: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
7233: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
7234: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
7235: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 7232: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

7228:
7229: PROCEDURE APPLY_LP_PROG_ON_CWV(
7230: p_api_version IN NUMBER :=1.0
7231: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
7232: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
7233: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
7234: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
7235: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
7236: ,p_debug_mode IN VARCHAR2 :='N'

Line 7233: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

7229: PROCEDURE APPLY_LP_PROG_ON_CWV(
7230: p_api_version IN NUMBER :=1.0
7231: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
7232: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
7233: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
7234: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
7235: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
7236: ,p_debug_mode IN VARCHAR2 :='N'
7237: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 7234: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

7230: p_api_version IN NUMBER :=1.0
7231: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
7232: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
7233: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
7234: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
7235: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
7236: ,p_debug_mode IN VARCHAR2 :='N'
7237: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
7238: ,p_project_id IN NUMBER

Line 7562: IF (p_commit = FND_API.G_TRUE) THEN

7558: END IF;
7559: END IF;
7560:
7561:
7562: IF (p_commit = FND_API.G_TRUE) THEN
7563: savepoint APPLY_LP_PROG_ON_CWV;
7564: END IF;
7565:
7566: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 7566: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

7562: IF (p_commit = FND_API.G_TRUE) THEN
7563: savepoint APPLY_LP_PROG_ON_CWV;
7564: END IF;
7565:
7566: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
7567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7568: END IF;
7569:
7570: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 7567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7563: savepoint APPLY_LP_PROG_ON_CWV;
7564: END IF;
7565:
7566: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
7567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7568: END IF;
7569:
7570: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
7571: FND_MSG_PUB.initialize;

Line 7570: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

7566: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
7567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7568: END IF;
7569:
7570: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
7571: FND_MSG_PUB.initialize;
7572: END IF;
7573:
7574: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 7574: x_return_status := FND_API.G_RET_STS_SUCCESS;

7570: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
7571: FND_MSG_PUB.initialize;
7572: END IF;
7573:
7574: x_return_status := FND_API.G_RET_STS_SUCCESS;
7575:
7576: g1_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',fnd_global.user_id,fnd_global.login_id,275,null,null), 'N');
7577:
7578: IF g1_debug_mode = 'Y' THEN

Line 7592: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7588: p_context => 'APPLY_PROGRESS',
7589: x_return_status => x_return_status
7590: );
7591:
7592: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7593: RAISE FND_API.G_EXC_ERROR;
7594: END IF;
7595:
7596: l_version_enabled_flag := PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(p_project_id);

Line 7593: RAISE FND_API.G_EXC_ERROR;

7589: x_return_status => x_return_status
7590: );
7591:
7592: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7593: RAISE FND_API.G_EXC_ERROR;
7594: END IF;
7595:
7596: l_version_enabled_flag := PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(p_project_id);
7597: --- setting this global var for PJI. In case of VD struct they won't touch ETC

Line 7978: raise fnd_api.g_exc_error;

7974: WHEN OTHERS THEN
7975: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
7976: p_procedure_name => 'APPLY_LP_PROG_ON_CWV',
7977: p_error_text => SUBSTRB('PA_TASK_ASSIGNMENTS_PUB.DERIVE_TASK_ASSIGNMENTS:'||SQLERRM,1,120));
7978: raise fnd_api.g_exc_error;
7979: END;
7980:
7981: -- BEGIN: Adding code to fix Bug # 3815741.
7982:

Line 7983: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7979: END;
7980:
7981: -- BEGIN: Adding code to fix Bug # 3815741.
7982:
7983: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7984: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
7985: p_msg_name => l_msg_data);
7986: x_msg_data := l_msg_data;
7987: x_return_status := 'E';

Line 7989: RAISE FND_API.G_EXC_ERROR;

7985: p_msg_name => l_msg_data);
7986: x_msg_data := l_msg_data;
7987: x_return_status := 'E';
7988: x_msg_count := l_msg_count;
7989: RAISE FND_API.G_EXC_ERROR;
7990: END IF;
7991:
7992: -- END: Adding code to fix Bug # 3815741.
7993: --maansari6/26

Line 8500: RAISE FND_API.G_EXC_ERROR;

8496: WHEN OTHERS THEN
8497: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
8498: p_procedure_name => 'APPLY_LP_PROG_ON_CWV',
8499: p_error_text => SUBSTRB('PA_PROGRESS_PVT.COPY_ACTUALS_FOR_WORKPLAN:'||SQLERRM,1,120));
8500: RAISE FND_API.G_EXC_ERROR;
8501: END;
8502:
8503: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8504: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 8503: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8499: p_error_text => SUBSTRB('PA_PROGRESS_PVT.COPY_ACTUALS_FOR_WORKPLAN:'||SQLERRM,1,120));
8500: RAISE FND_API.G_EXC_ERROR;
8501: END;
8502:
8503: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8504: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8505: p_msg_name => l_msg_data);
8506: x_msg_data := l_msg_data;
8507: x_return_status := 'E';

Line 8509: RAISE FND_API.G_EXC_ERROR;

8505: p_msg_name => l_msg_data);
8506: x_msg_data := l_msg_data;
8507: x_return_status := 'E';
8508: x_msg_count := l_msg_count;
8509: RAISE FND_API.G_EXC_ERROR;
8510: END IF;
8511:
8512:
8513: -- end if; -- If workplan versioning is enabled: 2

Line 8618: RAISE FND_API.G_EXC_ERROR;

8614: WHEN OTHERS THEN
8615: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
8616: p_procedure_name => 'APPLY_LP_PROG_ON_CWV',
8617: p_error_text => SUBSTRB('Call of PA_FP_CALC_PLAN_PKG.calculate Failed:'||SQLERRM,1,120));
8618: RAISE FND_API.G_EXC_ERROR;
8619: END;
8620:
8621: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8622: x_return_status := 'E';

Line 8621: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8617: p_error_text => SUBSTRB('Call of PA_FP_CALC_PLAN_PKG.calculate Failed:'||SQLERRM,1,120));
8618: RAISE FND_API.G_EXC_ERROR;
8619: END;
8620:
8621: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8622: x_return_status := 'E';
8623: RAISE FND_API.G_EXC_ERROR;
8624: END IF;
8625: END IF;

Line 8623: RAISE FND_API.G_EXC_ERROR;

8619: END;
8620:
8621: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8622: x_return_status := 'E';
8623: RAISE FND_API.G_EXC_ERROR;
8624: END IF;
8625: END IF;
8626:
8627: pa_progress_pub.g_wbs_apply_prog := null; --- resetting the var back to null

Line 8651: RAISE FND_API.G_EXC_ERROR;

8647: WHEN OTHERS THEN
8648: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
8649: p_procedure_name => 'APPLY_LP_PROG_ON_CWV',
8650: p_error_text => SUBSTRB('PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE:'||SQLERRM,1,120));
8651: RAISE FND_API.G_EXC_ERROR;
8652: END;
8653:
8654: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8655: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 8654: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8650: p_error_text => SUBSTRB('PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE:'||SQLERRM,1,120));
8651: RAISE FND_API.G_EXC_ERROR;
8652: END;
8653:
8654: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8655: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8656: p_msg_name => l_msg_code);
8657: x_msg_data := l_msg_code;
8658: x_return_status := 'E';

Line 8659: RAISE FND_API.G_EXC_ERROR;

8655: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8656: p_msg_name => l_msg_code);
8657: x_msg_data := l_msg_code;
8658: x_return_status := 'E';
8659: RAISE FND_API.G_EXC_ERROR;
8660: END IF;
8661:
8662: -- 3.2). Calling PJI API: PJI_FM_XBS_ACCUM_UTILS.POPULATE_WORKPLAN_DATA() to populate
8663: -- the temporary table: PJI_FM_XBS_ACCUM_TMP1.This is done once here instead of, for each of the lowest tasks by calling

Line 8738: RAISE FND_API.G_EXC_ERROR;

8734: WHEN OTHERS THEN
8735: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
8736: p_procedure_name => 'APPLY_LP_PROG_ON_CWV',
8737: p_error_text => SUBSTRB('PA_PROGRESS_PUB.POPULATE_PJI_TAB_FOR_PLAN:'||SQLERRM,1,120));
8738: RAISE FND_API.G_EXC_ERROR;
8739: END;
8740:
8741: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8742: x_msg_data := l_msg_data;

Line 8741: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8737: p_error_text => SUBSTRB('PA_PROGRESS_PUB.POPULATE_PJI_TAB_FOR_PLAN:'||SQLERRM,1,120));
8738: RAISE FND_API.G_EXC_ERROR;
8739: END;
8740:
8741: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8742: x_msg_data := l_msg_data;
8743: x_return_status := 'E';
8744: x_msg_count := l_msg_count;
8745: RAISE FND_API.G_EXC_ERROR;

Line 8745: RAISE FND_API.G_EXC_ERROR;

8741: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8742: x_msg_data := l_msg_data;
8743: x_return_status := 'E';
8744: x_msg_count := l_msg_count;
8745: RAISE FND_API.G_EXC_ERROR;
8746: END IF;
8747:
8748: -- 3.3). Update table: pa_proj_element_ver_structure
8749: -- 3.4). Call Rollup API for the whole structure, Pass working structure version_id.

Line 8769: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8765: ,x_return_status => l_return_status
8766: ,x_msg_count => l_msg_count
8767: ,x_msg_data => l_msg_data);
8768:
8769: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8770: x_msg_data := l_msg_data;
8771: x_return_status := 'E';
8772: x_msg_count := l_msg_count;
8773: RAISE FND_API.G_EXC_ERROR;

Line 8773: RAISE FND_API.G_EXC_ERROR;

8769: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8770: x_msg_data := l_msg_data;
8771: x_return_status := 'E';
8772: x_msg_count := l_msg_count;
8773: RAISE FND_API.G_EXC_ERROR;
8774: END IF;
8775:
8776: -- Call of rollup future is not needed here as there will be only one record per object in working version
8777:

Line 8787: IF (p_commit = FND_API.G_TRUE) THEN

8783: 'Y', 'Y', schedule_dirty_flag ) --set this flag to indicate re-scheduling is required.
8784: WHERE project_id = p_project_id
8785: AND element_version_id = p_working_str_version_id;
8786:
8787: IF (p_commit = FND_API.G_TRUE) THEN
8788: COMMIT;
8789: END IF;
8790:
8791: EXCEPTION

Line 8792: when FND_API.G_EXC_ERROR then

8788: COMMIT;
8789: END IF;
8790:
8791: EXCEPTION
8792: when FND_API.G_EXC_ERROR then
8793: if p_commit = FND_API.G_TRUE then
8794: rollback to APPLY_LP_PROG_ON_CWV;
8795: end if;
8796: x_return_status := FND_API.G_RET_STS_ERROR;

Line 8793: if p_commit = FND_API.G_TRUE then

8789: END IF;
8790:
8791: EXCEPTION
8792: when FND_API.G_EXC_ERROR then
8793: if p_commit = FND_API.G_TRUE then
8794: rollback to APPLY_LP_PROG_ON_CWV;
8795: end if;
8796: x_return_status := FND_API.G_RET_STS_ERROR;
8797: x_msg_count := fnd_msg_pub.count_msg;

Line 8796: x_return_status := FND_API.G_RET_STS_ERROR;

8792: when FND_API.G_EXC_ERROR then
8793: if p_commit = FND_API.G_TRUE then
8794: rollback to APPLY_LP_PROG_ON_CWV;
8795: end if;
8796: x_return_status := FND_API.G_RET_STS_ERROR;
8797: x_msg_count := fnd_msg_pub.count_msg;
8798:
8799: -- BEGIN: Commenting this code out to fix Bug # 3956275.
8800: /*

Line 8814: when FND_API.G_EXC_UNEXPECTED_ERROR then

8810: */
8811:
8812: -- END: Commenting this code out to fix Bug # 3956275.
8813:
8814: when FND_API.G_EXC_UNEXPECTED_ERROR then
8815: if p_commit = FND_API.G_TRUE then
8816: rollback to APPLY_LP_PROG_ON_CWV;
8817: end if;
8818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 8815: if p_commit = FND_API.G_TRUE then

8811:
8812: -- END: Commenting this code out to fix Bug # 3956275.
8813:
8814: when FND_API.G_EXC_UNEXPECTED_ERROR then
8815: if p_commit = FND_API.G_TRUE then
8816: rollback to APPLY_LP_PROG_ON_CWV;
8817: end if;
8818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8819: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 8818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8814: when FND_API.G_EXC_UNEXPECTED_ERROR then
8815: if p_commit = FND_API.G_TRUE then
8816: rollback to APPLY_LP_PROG_ON_CWV;
8817: end if;
8818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8819: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
8820: p_procedure_name => 'APPLY_LP_PROG_ON_CWV',
8821: p_error_text => SUBSTRB(SQLERRM,1,120));
8822: x_msg_count := fnd_msg_pub.count_msg;

Line 8824: if p_commit = FND_API.G_TRUE then

8820: p_procedure_name => 'APPLY_LP_PROG_ON_CWV',
8821: p_error_text => SUBSTRB(SQLERRM,1,120));
8822: x_msg_count := fnd_msg_pub.count_msg;
8823: when OTHERS then
8824: if p_commit = FND_API.G_TRUE then
8825: rollback to APPLY_LP_PROG_ON_CWV;
8826: end if;
8827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8828: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 8827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8823: when OTHERS then
8824: if p_commit = FND_API.G_TRUE then
8825: rollback to APPLY_LP_PROG_ON_CWV;
8826: end if;
8827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8828: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
8829: p_procedure_name => 'APPLY_LP_PROG_ON_CWV',
8830: p_error_text => SUBSTRB(SQLERRM,1,120));
8831: x_msg_count := fnd_msg_pub.count_msg;

Line 8839: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

8835: -- Progress Management Changes. Bug # 3420093.
8836:
8837: PROCEDURE delete_working_wp_progress(
8838: p_api_version IN NUMBER :=1.0
8839: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
8840: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8841: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8842: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8843: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 8840: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

8836:
8837: PROCEDURE delete_working_wp_progress(
8838: p_api_version IN NUMBER :=1.0
8839: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
8840: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8841: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8842: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8843: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
8844: ,p_debug_mode IN VARCHAR2 :='N'

Line 8841: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

8837: PROCEDURE delete_working_wp_progress(
8838: p_api_version IN NUMBER :=1.0
8839: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
8840: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8841: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8842: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8843: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
8844: ,p_debug_mode IN VARCHAR2 :='N'
8845: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 8842: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

8838: p_api_version IN NUMBER :=1.0
8839: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
8840: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8841: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8842: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8843: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
8844: ,p_debug_mode IN VARCHAR2 :='N'
8845: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
8846: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 8873: IF (p_commit = FND_API.G_TRUE) THEN

8869: IF g1_debug_mode = 'Y' THEN
8870: pa_debug.debug('PA_PROGRESS_PUB.DELETE_WORKING_WP_PROGRESS');
8871: END IF;
8872: END IF;
8873: IF (p_commit = FND_API.G_TRUE) THEN
8874: savepoint DELETE_WORKING_WP_PROGRESS;
8875: END IF;
8876:
8877: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 8877: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

8873: IF (p_commit = FND_API.G_TRUE) THEN
8874: savepoint DELETE_WORKING_WP_PROGRESS;
8875: END IF;
8876:
8877: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
8878: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8879: END IF;
8880:
8881: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 8878: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

8874: savepoint DELETE_WORKING_WP_PROGRESS;
8875: END IF;
8876:
8877: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
8878: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8879: END IF;
8880:
8881: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
8882: FND_MSG_PUB.initialize;

Line 8881: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

8877: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
8878: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8879: END IF;
8880:
8881: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
8882: FND_MSG_PUB.initialize;
8883: END IF;
8884:
8885: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 8885: x_return_status := FND_API.G_RET_STS_SUCCESS;

8881: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
8882: FND_MSG_PUB.initialize;
8883: END IF;
8884:
8885: x_return_status := FND_API.G_RET_STS_SUCCESS;
8886:
8887: if (p_calling_context = 'STRUCTURE_VERSION') then
8888:
8889: delete from pa_progress_rollup

Line 8920: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8916: and object_version_id = p_task_version_id(i);
8917:
8918: end if;
8919:
8920: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8921: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8922: p_msg_name => l_msg_data);
8923: x_msg_data := l_msg_data;
8924: x_return_status := 'E';

Line 8926: RAISE FND_API.G_EXC_ERROR;

8922: p_msg_name => l_msg_data);
8923: x_msg_data := l_msg_data;
8924: x_return_status := 'E';
8925: x_msg_count := l_msg_count;
8926: RAISE FND_API.G_EXC_ERROR;
8927: END IF;
8928:
8929: IF (p_commit = FND_API.G_TRUE) THEN
8930: COMMIT;

Line 8929: IF (p_commit = FND_API.G_TRUE) THEN

8925: x_msg_count := l_msg_count;
8926: RAISE FND_API.G_EXC_ERROR;
8927: END IF;
8928:
8929: IF (p_commit = FND_API.G_TRUE) THEN
8930: COMMIT;
8931: END IF;
8932: EXCEPTION
8933: when FND_API.G_EXC_ERROR then

Line 8933: when FND_API.G_EXC_ERROR then

8929: IF (p_commit = FND_API.G_TRUE) THEN
8930: COMMIT;
8931: END IF;
8932: EXCEPTION
8933: when FND_API.G_EXC_ERROR then
8934: if p_commit = FND_API.G_TRUE then
8935: rollback to DELETE_WORKING_WP_PROGRESS;
8936: end if;
8937: x_return_status := FND_API.G_RET_STS_ERROR;

Line 8934: if p_commit = FND_API.G_TRUE then

8930: COMMIT;
8931: END IF;
8932: EXCEPTION
8933: when FND_API.G_EXC_ERROR then
8934: if p_commit = FND_API.G_TRUE then
8935: rollback to DELETE_WORKING_WP_PROGRESS;
8936: end if;
8937: x_return_status := FND_API.G_RET_STS_ERROR;
8938: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 8937: x_return_status := FND_API.G_RET_STS_ERROR;

8933: when FND_API.G_EXC_ERROR then
8934: if p_commit = FND_API.G_TRUE then
8935: rollback to DELETE_WORKING_WP_PROGRESS;
8936: end if;
8937: x_return_status := FND_API.G_RET_STS_ERROR;
8938: when FND_API.G_EXC_UNEXPECTED_ERROR then
8939: if p_commit = FND_API.G_TRUE then
8940: rollback to DELETE_WORKING_WP_PROGRESS;
8941: end if;

Line 8938: when FND_API.G_EXC_UNEXPECTED_ERROR then

8934: if p_commit = FND_API.G_TRUE then
8935: rollback to DELETE_WORKING_WP_PROGRESS;
8936: end if;
8937: x_return_status := FND_API.G_RET_STS_ERROR;
8938: when FND_API.G_EXC_UNEXPECTED_ERROR then
8939: if p_commit = FND_API.G_TRUE then
8940: rollback to DELETE_WORKING_WP_PROGRESS;
8941: end if;
8942: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 8939: if p_commit = FND_API.G_TRUE then

8935: rollback to DELETE_WORKING_WP_PROGRESS;
8936: end if;
8937: x_return_status := FND_API.G_RET_STS_ERROR;
8938: when FND_API.G_EXC_UNEXPECTED_ERROR then
8939: if p_commit = FND_API.G_TRUE then
8940: rollback to DELETE_WORKING_WP_PROGRESS;
8941: end if;
8942: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8943: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 8942: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8938: when FND_API.G_EXC_UNEXPECTED_ERROR then
8939: if p_commit = FND_API.G_TRUE then
8940: rollback to DELETE_WORKING_WP_PROGRESS;
8941: end if;
8942: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8943: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
8944: p_procedure_name => 'DELETE_WORKING_WP_PROGRESS',
8945: p_error_text => SUBSTRB(SQLERRM,1,120));
8946: when OTHERS then

Line 8947: if p_commit = FND_API.G_TRUE then

8943: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
8944: p_procedure_name => 'DELETE_WORKING_WP_PROGRESS',
8945: p_error_text => SUBSTRB(SQLERRM,1,120));
8946: when OTHERS then
8947: if p_commit = FND_API.G_TRUE then
8948: rollback to DELETE_WORKING_WP_PROGRESS;
8949: end if;
8950: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8951: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 8950: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8946: when OTHERS then
8947: if p_commit = FND_API.G_TRUE then
8948: rollback to DELETE_WORKING_WP_PROGRESS;
8949: end if;
8950: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8951: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
8952: p_procedure_name => 'DELETE_WORKING_WP_PROGRESS',
8953: p_error_text => SUBSTRB(SQLERRM,1,120));
8954: raise;

Line 8961: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

8957: -- Progress Management Changes. Bug # 3420093.
8958:
8959: Procedure PULL_SUMMARIZED_ACTUALS (
8960: p_api_version IN NUMBER :=1.0
8961: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
8962: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8963: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8964: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8965: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 8962: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

8958:
8959: Procedure PULL_SUMMARIZED_ACTUALS (
8960: p_api_version IN NUMBER :=1.0
8961: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
8962: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8963: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8964: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8965: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
8966: ,p_debug_mode IN VARCHAR2 :='N'

Line 8963: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

8959: Procedure PULL_SUMMARIZED_ACTUALS (
8960: p_api_version IN NUMBER :=1.0
8961: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
8962: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8963: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8964: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8965: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
8966: ,p_debug_mode IN VARCHAR2 :='N'
8967: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 8964: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

8960: p_api_version IN NUMBER :=1.0
8961: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
8962: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8963: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8964: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8965: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
8966: ,p_debug_mode IN VARCHAR2 :='N'
8967: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
8968: ,P_Project_ID IN NUMBER

Line 9037: IF (p_commit = FND_API.G_TRUE) THEN

9033: IF g1_debug_mode = 'Y' THEN
9034: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.PULL_SUMMARIZED_ACTUALS', x_Msg => 'PA_PROGRESS_PUB.PULL_SUMMARIZED_ACTUALS Start : P_Project_ID='||P_Project_ID||', P_Calling_Mode='||P_Calling_Mode, x_Log_Level=> 3);
9035: END IF;
9036:
9037: IF (p_commit = FND_API.G_TRUE) THEN
9038: savepoint PULL_SUMMARIZED_ACTUALS;
9039: END IF;
9040:
9041: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 9041: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

9037: IF (p_commit = FND_API.G_TRUE) THEN
9038: savepoint PULL_SUMMARIZED_ACTUALS;
9039: END IF;
9040:
9041: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9043: END IF;
9044:
9045: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 9042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

9038: savepoint PULL_SUMMARIZED_ACTUALS;
9039: END IF;
9040:
9041: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9043: END IF;
9044:
9045: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
9046: FND_MSG_PUB.initialize;

Line 9045: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

9041: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9043: END IF;
9044:
9045: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
9046: FND_MSG_PUB.initialize;
9047: END IF;
9048:
9049: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 9049: x_return_status := FND_API.G_RET_STS_SUCCESS;

9045: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
9046: FND_MSG_PUB.initialize;
9047: END IF;
9048:
9049: x_return_status := FND_API.G_RET_STS_SUCCESS;
9050:
9051: --bug 4573340
9052: IF NOT NVL(PA_PROJECT_STRUCTURE_UTILS.get_Structure_sharing_code(P_Project_ID),'X') = 'SHARE_FULL'
9053: THEN

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

9087: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.PULL_SUMMARIZED_ACTUALS', x_Msg => 'After Call x_return_status='||x_return_status, x_Log_Level=> 3);
9088: END IF;
9089:
9090: -- Added the if block for Bug#5659575
9091: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9092: RAISE FND_API.G_EXC_ERROR;
9093: END IF;
9094:
9095: begin

Line 9092: RAISE FND_API.G_EXC_ERROR;

9088: END IF;
9089:
9090: -- Added the if block for Bug#5659575
9091: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9092: RAISE FND_API.G_EXC_ERROR;
9093: END IF;
9094:
9095: begin
9096: PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE_ACT_ETC (

Line 9106: RAISE FND_API.G_EXC_ERROR;

9102: WHEN OTHERS THEN
9103: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
9104: p_procedure_name => 'PULL_SUMMARIZED_ACTUALS',
9105: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE failed: sqlerrm='||SQLERRM,1,120));
9106: RAISE FND_API.G_EXC_ERROR;
9107: END;
9108:
9109: -- Added the if block for Bug#5659575
9110: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

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

9106: RAISE FND_API.G_EXC_ERROR;
9107: END;
9108:
9109: -- Added the if block for Bug#5659575
9110: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9111: RAISE FND_API.G_EXC_ERROR;
9112: END IF;
9113:
9114: -- Bug 4600547 Begin

Line 9111: RAISE FND_API.G_EXC_ERROR;

9107: END;
9108:
9109: -- Added the if block for Bug#5659575
9110: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9111: RAISE FND_API.G_EXC_ERROR;
9112: END IF;
9113:
9114: -- Bug 4600547 Begin
9115: -- Added thew following cursor call to avoid unnecessary creating rollup records

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

9151: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.PULL_SUMMARIZED_ACTUALS', x_Msg => 'After Call x_return_status='||x_return_status, x_Log_Level=> 3);
9152: END IF;
9153:
9154: -- Bug 5659575
9155: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9156: RAISE FND_API.G_EXC_ERROR;
9157: END IF;
9158:
9159: END IF;

Line 9156: RAISE FND_API.G_EXC_ERROR;

9152: END IF;
9153:
9154: -- Bug 5659575
9155: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9156: RAISE FND_API.G_EXC_ERROR;
9157: END IF;
9158:
9159: END IF;
9160: End If;

Line 9165: when FND_API.G_EXC_ERROR then

9161: end if;
9162: CLOSE cur_Summerized_Actuals;
9163:
9164: EXCEPTION
9165: when FND_API.G_EXC_ERROR then
9166: if p_commit = FND_API.G_TRUE then
9167: rollback to PULL_SUMMARIZED_ACTUALS;
9168: end if;
9169: x_return_status := FND_API.G_RET_STS_ERROR;

Line 9166: if p_commit = FND_API.G_TRUE then

9162: CLOSE cur_Summerized_Actuals;
9163:
9164: EXCEPTION
9165: when FND_API.G_EXC_ERROR then
9166: if p_commit = FND_API.G_TRUE then
9167: rollback to PULL_SUMMARIZED_ACTUALS;
9168: end if;
9169: x_return_status := FND_API.G_RET_STS_ERROR;
9170: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 9169: x_return_status := FND_API.G_RET_STS_ERROR;

9165: when FND_API.G_EXC_ERROR then
9166: if p_commit = FND_API.G_TRUE then
9167: rollback to PULL_SUMMARIZED_ACTUALS;
9168: end if;
9169: x_return_status := FND_API.G_RET_STS_ERROR;
9170: when FND_API.G_EXC_UNEXPECTED_ERROR then
9171: if p_commit = FND_API.G_TRUE then
9172: rollback to PULL_SUMMARIZED_ACTUALS;
9173: end if;

Line 9170: when FND_API.G_EXC_UNEXPECTED_ERROR then

9166: if p_commit = FND_API.G_TRUE then
9167: rollback to PULL_SUMMARIZED_ACTUALS;
9168: end if;
9169: x_return_status := FND_API.G_RET_STS_ERROR;
9170: when FND_API.G_EXC_UNEXPECTED_ERROR then
9171: if p_commit = FND_API.G_TRUE then
9172: rollback to PULL_SUMMARIZED_ACTUALS;
9173: end if;
9174: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 9171: if p_commit = FND_API.G_TRUE then

9167: rollback to PULL_SUMMARIZED_ACTUALS;
9168: end if;
9169: x_return_status := FND_API.G_RET_STS_ERROR;
9170: when FND_API.G_EXC_UNEXPECTED_ERROR then
9171: if p_commit = FND_API.G_TRUE then
9172: rollback to PULL_SUMMARIZED_ACTUALS;
9173: end if;
9174: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9175: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 9174: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9170: when FND_API.G_EXC_UNEXPECTED_ERROR then
9171: if p_commit = FND_API.G_TRUE then
9172: rollback to PULL_SUMMARIZED_ACTUALS;
9173: end if;
9174: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9175: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
9176: p_procedure_name => 'PULL_SUMMARIZED_ACTUALS',
9177: p_error_text => SUBSTRB(SQLERRM,1,120));
9178: when OTHERS then

Line 9179: if p_commit = FND_API.G_TRUE then

9175: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
9176: p_procedure_name => 'PULL_SUMMARIZED_ACTUALS',
9177: p_error_text => SUBSTRB(SQLERRM,1,120));
9178: when OTHERS then
9179: if p_commit = FND_API.G_TRUE then
9180: rollback to DELETE_WORKING_WP_PROGRESS;
9181: end if;
9182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9183: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 9182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9178: when OTHERS then
9179: if p_commit = FND_API.G_TRUE then
9180: rollback to DELETE_WORKING_WP_PROGRESS;
9181: end if;
9182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9183: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
9184: p_procedure_name => 'PULL_SUMMARIZED_ACTUALS',
9185: p_error_text => SUBSTRB(SQLERRM,1,120));
9186: raise;

Line 9193: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

9189: -- Progress Management Changes. Bug # 3420093.
9190:
9191: PROCEDURE UPDATE_PROGRESS(
9192: p_api_version IN NUMBER :=1.0
9193: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
9194: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
9195: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
9196: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
9197: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 9194: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

9190:
9191: PROCEDURE UPDATE_PROGRESS(
9192: p_api_version IN NUMBER :=1.0
9193: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
9194: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
9195: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
9196: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
9197: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
9198: ,p_debug_mode IN VARCHAR2 :='N'

Line 9195: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

9191: PROCEDURE UPDATE_PROGRESS(
9192: p_api_version IN NUMBER :=1.0
9193: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
9194: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
9195: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
9196: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
9197: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
9198: ,p_debug_mode IN VARCHAR2 :='N'
9199: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 9196: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

9192: p_api_version IN NUMBER :=1.0
9193: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
9194: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
9195: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
9196: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
9197: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
9198: ,p_debug_mode IN VARCHAR2 :='N'
9199: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
9200: ,p_action IN VARCHAR2 :='SAVE'

Line 9432: IF (p_commit = FND_API.G_TRUE) THEN

9428: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS', x_Msg => 'p_rbs_element_id='||p_rbs_element_id, x_Log_Level=> 3);
9429: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS', x_Msg => 'p_resource_assignment_id='||p_resource_assignment_id, x_Log_Level=> 3);
9430: END IF;
9431:
9432: IF (p_commit = FND_API.G_TRUE) THEN
9433: savepoint UPDATE_PROGRESS;
9434: END IF;
9435:
9436: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 9436: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

9432: IF (p_commit = FND_API.G_TRUE) THEN
9433: savepoint UPDATE_PROGRESS;
9434: END IF;
9435:
9436: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9437: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9438: END IF;
9439:
9440: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 9437: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

9433: savepoint UPDATE_PROGRESS;
9434: END IF;
9435:
9436: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9437: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9438: END IF;
9439:
9440: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
9441: FND_MSG_PUB.initialize;

Line 9440: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

9436: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9437: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9438: END IF;
9439:
9440: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
9441: FND_MSG_PUB.initialize;
9442: END IF;
9443:
9444: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 9444: x_return_status := FND_API.G_RET_STS_SUCCESS;

9440: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
9441: FND_MSG_PUB.initialize;
9442: END IF;
9443:
9444: x_return_status := FND_API.G_RET_STS_SUCCESS;
9445:
9446: -- Begin fix for Bug # 4524977.
9447:
9448: PA_PROJECT_STRUCTURE_UTILS.GET_CONC_REQUEST_DETAILS

Line 9459: if l_return_status <> FND_API.G_RET_STS_SUCCESS then

9455: ,x_msg_count => l_msg_count
9456: ,x_msg_data => l_msg_data);
9457:
9458:
9459: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
9460:
9461: x_msg_data := l_msg_data;
9462: x_return_status := 'E';
9463: x_msg_count := l_msg_count;

Line 9465: raise FND_API.G_EXC_ERROR;

9461: x_msg_data := l_msg_data;
9462: x_return_status := 'E';
9463: x_msg_count := l_msg_count;
9464:
9465: raise FND_API.G_EXC_ERROR;
9466:
9467: end if;
9468:
9469: open l_cur_publish(l_request_id);

Line 9484: x_return_status := FND_API.G_RET_STS_ERROR;

9480: ,p_msg_name => 'PA_PS_PUBLISH_NO_PROG');
9481:
9482: x_msg_data := 'PA_PS_PUBLISH_NO_PROG';
9483:
9484: x_return_status := FND_API.G_RET_STS_ERROR;
9485:
9486: raise FND_API.G_EXC_ERROR;
9487:
9488: elsif ((l_rec_publish.process = 'CONC_UPDATE')

Line 9486: raise FND_API.G_EXC_ERROR;

9482: x_msg_data := 'PA_PS_PUBLISH_NO_PROG';
9483:
9484: x_return_status := FND_API.G_RET_STS_ERROR;
9485:
9486: raise FND_API.G_EXC_ERROR;
9487:
9488: elsif ((l_rec_publish.process = 'CONC_UPDATE')
9489: and (l_process_code = 'WUP')
9490: and (l_wp_ver_enabled_flag = 'N')) then

Line 9497: x_return_status := FND_API.G_RET_STS_ERROR;

9493: ,p_msg_name => 'PA_PS_UPDATE_NO_PROG');
9494:
9495: x_msg_data := 'PA_PS_UPDATE_NO_PROG';
9496:
9497: x_return_status := FND_API.G_RET_STS_ERROR;
9498:
9499: raise FND_API.G_EXC_ERROR;
9500:
9501: elsif ((l_rec_publish.process = 'APPLY_PROGRESS')

Line 9499: raise FND_API.G_EXC_ERROR;

9495: x_msg_data := 'PA_PS_UPDATE_NO_PROG';
9496:
9497: x_return_status := FND_API.G_RET_STS_ERROR;
9498:
9499: raise FND_API.G_EXC_ERROR;
9500:
9501: elsif ((l_rec_publish.process = 'APPLY_PROGRESS')
9502: and (l_process_code = 'WUP')
9503: and (l_wp_ver_enabled_flag = 'N')) then

Line 9510: x_return_status := FND_API.G_RET_STS_ERROR;

9506: ,p_msg_name => 'PA_PS_APLPRG_NO_PROG');
9507:
9508: x_msg_data := 'PA_PS_APLPRG_NO_PROG';
9509:
9510: x_return_status := FND_API.G_RET_STS_ERROR;
9511:
9512: raise FND_API.G_EXC_ERROR;
9513:
9514: end if;

Line 9512: raise FND_API.G_EXC_ERROR;

9508: x_msg_data := 'PA_PS_APLPRG_NO_PROG';
9509:
9510: x_return_status := FND_API.G_RET_STS_ERROR;
9511:
9512: raise FND_API.G_EXC_ERROR;
9513:
9514: end if;
9515:
9516: -- End fix for Bug # 4524977.

Line 9560: x_return_status := FND_API.G_RET_STS_ERROR;

9556: --Raise Error
9557: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
9558: ,p_msg_name => 'PA_TEMPL_PROGRESS_NOT_ALLOWED');
9559: x_msg_data := 'PA_TEMPL_PROGRESS_NOT_ALLOWED';
9560: x_return_status := FND_API.G_RET_STS_ERROR;
9561: RAISE FND_API.G_EXC_ERROR;
9562: END IF;
9563: END IF;
9564:

Line 9561: RAISE FND_API.G_EXC_ERROR;

9557: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
9558: ,p_msg_name => 'PA_TEMPL_PROGRESS_NOT_ALLOWED');
9559: x_msg_data := 'PA_TEMPL_PROGRESS_NOT_ALLOWED';
9560: x_return_status := FND_API.G_RET_STS_ERROR;
9561: RAISE FND_API.G_EXC_ERROR;
9562: END IF;
9563: END IF;
9564:
9565: -- Begin code fix for bug # 3974859.

Line 9787: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

9783: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS', x_Msg => 'After Calling UPDATE_TASK_PROGRESS l_return_status='||l_return_status, x_Log_Level=> 3);
9784: END IF;
9785: END IF;
9786:
9787: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9788: x_msg_data := l_msg_data;
9789: x_return_status := 'E';
9790: x_msg_count := l_msg_count;
9791: RAISE FND_API.G_EXC_ERROR;

Line 9791: RAISE FND_API.G_EXC_ERROR;

9787: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9788: x_msg_data := l_msg_data;
9789: x_return_status := 'E';
9790: x_msg_count := l_msg_count;
9791: RAISE FND_API.G_EXC_ERROR;
9792: END IF;
9793:
9794: -- Bug 3614828 : Moved the code to get local variables for object type, task version id, structure type etc..
9795: -- here, so that it is also accessible to ASGN_DLV_TO_TASK_ROLLUP_PVT

Line 9869: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

9865: x_msg_count => l_msg_count,
9866: x_msg_data => l_msg_data);
9867:
9868:
9869: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9870: x_msg_data := l_msg_data;
9871: x_return_status := 'E';
9872: x_msg_count := l_msg_count;
9873: RAISE FND_API.G_EXC_ERROR;

Line 9873: RAISE FND_API.G_EXC_ERROR;

9869: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9870: x_msg_data := l_msg_data;
9871: x_return_status := 'E';
9872: x_msg_count := l_msg_count;
9873: RAISE FND_API.G_EXC_ERROR;
9874: END IF;
9875: END IF;
9876:
9877:

Line 9931: RAISE FND_API.G_EXC_ERROR;

9927: WHEN OTHERS THEN
9928: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
9929: p_procedure_name => 'update_progress',
9930: p_error_text => SUBSTRB('PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP:'||SQLERRM,1,120));
9931: RAISE FND_API.G_EXC_ERROR;
9932: END;
9933:
9934: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9935: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 9934: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

9930: p_error_text => SUBSTRB('PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP:'||SQLERRM,1,120));
9931: RAISE FND_API.G_EXC_ERROR;
9932: END;
9933:
9934: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9935: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
9936: p_msg_name => l_msg_data);
9937: x_msg_data := l_msg_data;
9938: x_return_status := 'E';

Line 9940: RAISE FND_API.G_EXC_ERROR;

9936: p_msg_name => l_msg_data);
9937: x_msg_data := l_msg_data;
9938: x_return_status := 'E';
9939: x_msg_count := l_msg_count;
9940: RAISE FND_API.G_EXC_ERROR;
9941: END IF;
9942:
9943: END IF; -- l_split_workplan = 'Y' THEN
9944:

Line 9961: RAISE FND_API.G_EXC_ERROR;

9957: WHEN OTHERS THEN
9958: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
9959: p_procedure_name => 'update_progress',
9960: p_error_text => SUBSTRB('Call PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE:'||SQLERRM,1,120));
9961: RAISE FND_API.G_EXC_ERROR;
9962: END;
9963: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9964: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
9965: p_msg_name => l_msg_code);

Line 9963: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

9959: p_procedure_name => 'update_progress',
9960: p_error_text => SUBSTRB('Call PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE:'||SQLERRM,1,120));
9961: RAISE FND_API.G_EXC_ERROR;
9962: END;
9963: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9964: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
9965: p_msg_name => l_msg_code);
9966: x_return_status := 'E';
9967: RAISE FND_API.G_EXC_ERROR;

Line 9967: RAISE FND_API.G_EXC_ERROR;

9963: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9964: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
9965: p_msg_name => l_msg_code);
9966: x_return_status := 'E';
9967: RAISE FND_API.G_EXC_ERROR;
9968: END IF;
9969:
9970:
9971: l_base_struct_ver_id := pa_project_structure_utils.get_baseline_struct_ver(p_project_id);

Line 9989: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

9985: ,x_return_status => l_return_status
9986: ,x_msg_count => l_msg_count
9987: ,x_msg_data => l_msg_data
9988: );
9989: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9990: x_msg_data := l_msg_data;
9991: x_return_status := 'E';
9992: x_msg_count := l_msg_count;
9993: RAISE FND_API.G_EXC_ERROR;

Line 9993: RAISE FND_API.G_EXC_ERROR;

9989: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9990: x_msg_data := l_msg_data;
9991: x_return_status := 'E';
9992: x_msg_count := l_msg_count;
9993: RAISE FND_API.G_EXC_ERROR;
9994: END IF;
9995:
9996: /*
9997: BEGIN

Line 10011: RAISE FND_API.G_EXC_ERROR;

10007: WHEN OTHERS THEN
10008: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10009: p_procedure_name => 'update_progress',
10010: p_error_text => SUBSTRB('Call PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data:'||SQLERRM,1,120));
10011: RAISE FND_API.G_EXC_ERROR;
10012: END;
10013: */
10014: END IF;-- p_structure_type = 'WORKPLAN' THEN
10015:

Line 10043: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

10039: IF g1_debug_mode = 'Y' THEN
10040: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS', x_Msg => 'After Calling ROLLUP_PROGRESS_PVT l_return_status='||l_return_status, x_Log_Level=> 3);
10041: END IF;
10042:
10043: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10044: x_msg_data := l_msg_data;
10045: x_return_status := 'E';
10046: x_msg_count := l_msg_count;
10047: RAISE FND_API.G_EXC_ERROR;

Line 10047: RAISE FND_API.G_EXC_ERROR;

10043: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10044: x_msg_data := l_msg_data;
10045: x_return_status := 'E';
10046: x_msg_count := l_msg_count;
10047: RAISE FND_API.G_EXC_ERROR;
10048: END IF;
10049:
10050: -----5466645
10051: IF p_progress_mode <> 'BACKDATED' AND p_object_type = 'PA_TASKS'

Line 10061: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

10057: ,p_element_version_id => l_task_version_id
10058: ,x_return_status => l_return_status
10059: ,x_msg_count => l_msg_count
10060: ,x_msg_data => l_msg_data );
10061: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
10062: THEN
10063: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
10064: p_msg_name => l_msg_data);
10065: x_msg_data := l_msg_data;

Line 10067: RAISE FND_API.G_EXC_ERROR;

10063: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
10064: p_msg_name => l_msg_data);
10065: x_msg_data := l_msg_data;
10066: x_return_status := 'E';
10067: RAISE FND_API.G_EXC_ERROR;
10068: END IF;
10069:
10070: BEGIN
10071: Select ppev1.proj_element_id

Line 10089: p_validate_only => FND_API.G_FALSE

10085: (PA_PROJECT_STRUCTURE_UTILS.CHECK_SHARING_ENABLED(p_project_id) = 'Y'))
10086: THEN
10087: --copy to transaction dates
10088: PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES(
10089: p_validate_only => FND_API.G_FALSE
10090: ,p_project_id => p_project_id
10091: ,x_return_status => x_return_status
10092: ,x_msg_count => x_msg_count
10093: ,x_msg_data => x_msg_data);

Line 10133: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

10129:
10130: IF g1_debug_mode = 'Y' THEN
10131: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS', x_Msg => 'After Calling ROLLUP_FUTURE_PROGRESS_PVT l_return_status='||l_return_status, x_Log_Level=> 3);
10132: END IF;
10133: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10134: x_msg_data := l_msg_data;
10135: x_return_status := 'E';
10136: x_msg_count := l_msg_count;
10137: RAISE FND_API.G_EXC_ERROR;

Line 10137: RAISE FND_API.G_EXC_ERROR;

10133: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10134: x_msg_data := l_msg_data;
10135: x_return_status := 'E';
10136: x_msg_count := l_msg_count;
10137: RAISE FND_API.G_EXC_ERROR;
10138: END IF;
10139: END IF; -- IF p_progress_mode <> 'BACKDATED'
10140: END IF; -- ( p_rollup_entire_wbs_flag = 'N' AND l_object_type = 'PA_TASKS' AND l_task_version_id IS NOT NULL)
10141: END IF; -- p_action='PUBLISH'

Line 10174: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

10170: END IF;
10171: END IF;
10172:
10173:
10174: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10175: x_msg_data := l_msg_data;
10176: x_return_status := 'E';
10177: x_msg_count := l_msg_count;
10178: RAISE FND_API.G_EXC_ERROR;

Line 10178: RAISE FND_API.G_EXC_ERROR;

10174: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10175: x_msg_data := l_msg_data;
10176: x_return_status := 'E';
10177: x_msg_count := l_msg_count;
10178: RAISE FND_API.G_EXC_ERROR;
10179: END IF;
10180:
10181:
10182: -- Bug 3807299 Calling new API update_link_proj_rollup_dates

Line 10209: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

10205: ,x_msg_data => l_msg_data
10206: );
10207: END IF;
10208:
10209: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10210: x_msg_data := l_msg_data;
10211: x_return_status := 'E';
10212: x_msg_count := l_msg_count;
10213: RAISE FND_API.G_EXC_ERROR;

Line 10213: RAISE FND_API.G_EXC_ERROR;

10209: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10210: x_msg_data := l_msg_data;
10211: x_return_status := 'E';
10212: x_msg_count := l_msg_count;
10213: RAISE FND_API.G_EXC_ERROR;
10214: END IF;
10215:
10216: END IF;
10217:

Line 10219: IF (p_commit = FND_API.G_TRUE) THEN

10215:
10216: END IF;
10217:
10218:
10219: IF (p_commit = FND_API.G_TRUE) THEN
10220: COMMIT;
10221: END IF;
10222: EXCEPTION
10223: when FND_API.G_EXC_ERROR then

Line 10223: when FND_API.G_EXC_ERROR then

10219: IF (p_commit = FND_API.G_TRUE) THEN
10220: COMMIT;
10221: END IF;
10222: EXCEPTION
10223: when FND_API.G_EXC_ERROR then
10224: if p_commit = FND_API.G_TRUE then
10225: rollback to UPDATE_PROGRESS;
10226: end if;
10227: x_return_status := FND_API.G_RET_STS_ERROR;

Line 10224: if p_commit = FND_API.G_TRUE then

10220: COMMIT;
10221: END IF;
10222: EXCEPTION
10223: when FND_API.G_EXC_ERROR then
10224: if p_commit = FND_API.G_TRUE then
10225: rollback to UPDATE_PROGRESS;
10226: end if;
10227: x_return_status := FND_API.G_RET_STS_ERROR;
10228: x_msg_count := fnd_msg_pub.count_msg;

Line 10227: x_return_status := FND_API.G_RET_STS_ERROR;

10223: when FND_API.G_EXC_ERROR then
10224: if p_commit = FND_API.G_TRUE then
10225: rollback to UPDATE_PROGRESS;
10226: end if;
10227: x_return_status := FND_API.G_RET_STS_ERROR;
10228: x_msg_count := fnd_msg_pub.count_msg;
10229: when FND_API.G_EXC_UNEXPECTED_ERROR then
10230: if p_commit = FND_API.G_TRUE then
10231: rollback to UPDATE_PROGRESS;

Line 10229: when FND_API.G_EXC_UNEXPECTED_ERROR then

10225: rollback to UPDATE_PROGRESS;
10226: end if;
10227: x_return_status := FND_API.G_RET_STS_ERROR;
10228: x_msg_count := fnd_msg_pub.count_msg;
10229: when FND_API.G_EXC_UNEXPECTED_ERROR then
10230: if p_commit = FND_API.G_TRUE then
10231: rollback to UPDATE_PROGRESS;
10232: end if;
10233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 10230: if p_commit = FND_API.G_TRUE then

10226: end if;
10227: x_return_status := FND_API.G_RET_STS_ERROR;
10228: x_msg_count := fnd_msg_pub.count_msg;
10229: when FND_API.G_EXC_UNEXPECTED_ERROR then
10230: if p_commit = FND_API.G_TRUE then
10231: rollback to UPDATE_PROGRESS;
10232: end if;
10233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10234: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 10233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10229: when FND_API.G_EXC_UNEXPECTED_ERROR then
10230: if p_commit = FND_API.G_TRUE then
10231: rollback to UPDATE_PROGRESS;
10232: end if;
10233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10234: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10235: p_procedure_name => 'UPDATE_PROGRESS',
10236: p_error_text => SUBSTRB(SQLERRM,1,120));
10237: x_msg_count := fnd_msg_pub.count_msg;

Line 10239: if p_commit = FND_API.G_TRUE then

10235: p_procedure_name => 'UPDATE_PROGRESS',
10236: p_error_text => SUBSTRB(SQLERRM,1,120));
10237: x_msg_count := fnd_msg_pub.count_msg;
10238: when OTHERS then
10239: if p_commit = FND_API.G_TRUE then
10240: rollback to UPDATE_PROGRESS;
10241: end if;
10242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10243: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 10242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10238: when OTHERS then
10239: if p_commit = FND_API.G_TRUE then
10240: rollback to UPDATE_PROGRESS;
10241: end if;
10242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10243: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10244: p_procedure_name => 'UPDATE_PROGRESS',
10245: p_error_text => SUBSTRB(SQLERRM,1,120));
10246: x_msg_count := fnd_msg_pub.count_msg;

Line 10254: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

10250: -- Progress Management Changes. Bug # 3420093.
10251:
10252: PROCEDURE populate_pji_tab_for_plan(
10253: p_api_version IN NUMBER :=1.0
10254: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10255: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10256: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10257: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10258: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 10255: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

10251:
10252: PROCEDURE populate_pji_tab_for_plan(
10253: p_api_version IN NUMBER :=1.0
10254: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10255: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10256: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10257: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10258: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10259: ,p_debug_mode IN VARCHAR2 :='N'

Line 10256: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

10252: PROCEDURE populate_pji_tab_for_plan(
10253: p_api_version IN NUMBER :=1.0
10254: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10255: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10256: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10257: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10258: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10259: ,p_debug_mode IN VARCHAR2 :='N'
10260: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 10257: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

10253: p_api_version IN NUMBER :=1.0
10254: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10255: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10256: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10257: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10258: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10259: ,p_debug_mode IN VARCHAR2 :='N'
10260: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
10261: ,p_project_id IN NUMBER

Line 10299: IF (p_commit = FND_API.G_TRUE) THEN

10295: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.POPULATE_PJI_TAB_FOR_PLAN', x_Msg => 'p_program_rollup_flag='||p_program_rollup_flag, x_Log_Level=> 3);
10296: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.POPULATE_PJI_TAB_FOR_PLAN', x_Msg => 'p_calling_context='||p_calling_context, x_Log_Level=> 3);
10297: END IF;
10298:
10299: IF (p_commit = FND_API.G_TRUE) THEN
10300: savepoint plan_qtys;
10301: END IF;
10302:
10303: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 10303: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

10299: IF (p_commit = FND_API.G_TRUE) THEN
10300: savepoint plan_qtys;
10301: END IF;
10302:
10303: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10304: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10305: END IF;
10306:
10307: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 10304: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

10300: savepoint plan_qtys;
10301: END IF;
10302:
10303: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10304: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10305: END IF;
10306:
10307: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10308: FND_MSG_PUB.initialize;

Line 10307: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

10303: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10304: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10305: END IF;
10306:
10307: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10308: FND_MSG_PUB.initialize;
10309: END IF;
10310:
10311: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 10311: x_return_status := FND_API.G_RET_STS_SUCCESS;

10307: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10308: FND_MSG_PUB.initialize;
10309: END IF;
10310:
10311: x_return_status := FND_API.G_RET_STS_SUCCESS;
10312:
10313: --bug 4290593
10314: IF p_populate_tmp_tab_flag = 'N' AND PA_PROJ_STRUCTURE_UTILS.CHECK_PJI_TEMP_TAB_POPULATED(p_project_id) = 'Y'
10315: THEN

Line 10375: RAISE FND_API.G_EXC_ERROR;

10371: WHEN OTHERS THEN
10372: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10373: p_procedure_name => 'POPULATE_PJI_TAB_FOR_PLAN',
10374: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data Failed. SQLERRM='||SQLERRM,1,120));
10375: RAISE FND_API.G_EXC_ERROR;
10376: END;
10377:
10378: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10379: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 10378: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

10374: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data Failed. SQLERRM='||SQLERRM,1,120));
10375: RAISE FND_API.G_EXC_ERROR;
10376: END;
10377:
10378: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10379: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
10380: p_msg_name => l_msg_data);
10381: x_msg_data := l_msg_data;
10382: x_return_status := 'E';

Line 10384: RAISE FND_API.G_EXC_ERROR;

10380: p_msg_name => l_msg_data);
10381: x_msg_data := l_msg_data;
10382: x_return_status := 'E';
10383: x_msg_count := l_msg_count;
10384: RAISE FND_API.G_EXC_ERROR;
10385: END IF;
10386:
10387:
10388: EXCEPTION

Line 10389: when FND_API.G_EXC_ERROR then

10385: END IF;
10386:
10387:
10388: EXCEPTION
10389: when FND_API.G_EXC_ERROR then
10390: if p_commit = FND_API.G_TRUE then
10391: rollback to plan_qtys;
10392: end if;
10393: x_return_status := FND_API.G_RET_STS_ERROR;

Line 10390: if p_commit = FND_API.G_TRUE then

10386:
10387:
10388: EXCEPTION
10389: when FND_API.G_EXC_ERROR then
10390: if p_commit = FND_API.G_TRUE then
10391: rollback to plan_qtys;
10392: end if;
10393: x_return_status := FND_API.G_RET_STS_ERROR;
10394: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 10393: x_return_status := FND_API.G_RET_STS_ERROR;

10389: when FND_API.G_EXC_ERROR then
10390: if p_commit = FND_API.G_TRUE then
10391: rollback to plan_qtys;
10392: end if;
10393: x_return_status := FND_API.G_RET_STS_ERROR;
10394: when FND_API.G_EXC_UNEXPECTED_ERROR then
10395: if p_commit = FND_API.G_TRUE then
10396: rollback to plan_qtys;
10397: end if;

Line 10394: when FND_API.G_EXC_UNEXPECTED_ERROR then

10390: if p_commit = FND_API.G_TRUE then
10391: rollback to plan_qtys;
10392: end if;
10393: x_return_status := FND_API.G_RET_STS_ERROR;
10394: when FND_API.G_EXC_UNEXPECTED_ERROR then
10395: if p_commit = FND_API.G_TRUE then
10396: rollback to plan_qtys;
10397: end if;
10398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 10395: if p_commit = FND_API.G_TRUE then

10391: rollback to plan_qtys;
10392: end if;
10393: x_return_status := FND_API.G_RET_STS_ERROR;
10394: when FND_API.G_EXC_UNEXPECTED_ERROR then
10395: if p_commit = FND_API.G_TRUE then
10396: rollback to plan_qtys;
10397: end if;
10398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10399: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 10398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10394: when FND_API.G_EXC_UNEXPECTED_ERROR then
10395: if p_commit = FND_API.G_TRUE then
10396: rollback to plan_qtys;
10397: end if;
10398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10399: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10400: p_procedure_name => 'populate_pji_tab_for_plan',
10401: p_error_text => SUBSTRB(SQLERRM,1,120));
10402: when OTHERS then

Line 10403: if p_commit = FND_API.G_TRUE then

10399: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10400: p_procedure_name => 'populate_pji_tab_for_plan',
10401: p_error_text => SUBSTRB(SQLERRM,1,120));
10402: when OTHERS then
10403: if p_commit = FND_API.G_TRUE then
10404: rollback to plan_qtys;
10405: end if;
10406: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10407: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 10406: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10402: when OTHERS then
10403: if p_commit = FND_API.G_TRUE then
10404: rollback to plan_qtys;
10405: end if;
10406: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10407: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10408: p_procedure_name => 'populate_pji_tab_for_plan',
10409: p_error_text => SUBSTRB(SQLERRM,1,120));
10410: raise;

Line 10417: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

10413: -- This API takes Actual and ETC incrmental amounts to update in PJI data model
10414:
10415: PROCEDURE push_workplan_actuals(
10416: p_api_version IN NUMBER :=1.0
10417: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10418: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10419: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10420: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10421: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 10418: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

10414:
10415: PROCEDURE push_workplan_actuals(
10416: p_api_version IN NUMBER :=1.0
10417: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10418: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10419: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10420: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10421: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10422: ,p_debug_mode IN VARCHAR2 :='N'

Line 10419: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

10415: PROCEDURE push_workplan_actuals(
10416: p_api_version IN NUMBER :=1.0
10417: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10418: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10419: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10420: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10421: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10422: ,p_debug_mode IN VARCHAR2 :='N'
10423: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 10420: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

10416: p_api_version IN NUMBER :=1.0
10417: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10418: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10419: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10420: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10421: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10422: ,p_debug_mode IN VARCHAR2 :='N'
10423: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
10424: ,p_project_Id NUMBER

Line 10554: IF (p_commit = FND_API.G_TRUE) THEN

10550: pa_debug.debug('PA_PROGRESS_PUB.push_workplan_actuals');
10551: END IF;
10552: END IF;
10553:
10554: IF (p_commit = FND_API.G_TRUE) THEN
10555: savepoint push_actuals;
10556: END IF;
10557:
10558: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 10558: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

10554: IF (p_commit = FND_API.G_TRUE) THEN
10555: savepoint push_actuals;
10556: END IF;
10557:
10558: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10560: END IF;
10561:
10562: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 10559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

10555: savepoint push_actuals;
10556: END IF;
10557:
10558: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10560: END IF;
10561:
10562: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10563: FND_MSG_PUB.initialize;

Line 10562: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

10558: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10560: END IF;
10561:
10562: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10563: FND_MSG_PUB.initialize;
10564: END IF;
10565:
10566: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 10566: x_return_status := FND_API.G_RET_STS_SUCCESS;

10562: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10563: FND_MSG_PUB.initialize;
10564: END IF;
10565:
10566: x_return_status := FND_API.G_RET_STS_SUCCESS;
10567: l_track_wp_cost_flag := pa_fp_wp_gen_amt_utils.get_wp_track_cost_amt_flag(p_project_id); --Bug 3801745
10568:
10569: IF NVL(p_structure_version_id,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM --bug 3625085
10570: THEN

Line 10664: RAISE FND_API.G_EXC_ERROR;

10660: WHEN OTHERS THEN
10661: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10662: p_procedure_name => 'push_workplan_actuals',
10663: p_error_text => SUBSTRB('PA_FIN_PLAN_UTILS.Get_wp_bv_time_phase:'||SQLERRM,1,120));
10664: RAISE FND_API.G_EXC_ERROR;
10665: END;
10666:
10667:
10668: IF l_period_type = 'P' AND p_pa_period_name IS NOT NULL

Line 10693: RAISE FND_API.G_EXC_ERROR;

10689: WHEN OTHERS THEN
10690: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10691: p_procedure_name => 'PUSH_WORKPLAN_ACTUALS',
10692: p_error_text => SUBSTRB('Call Pa_Fp_wp_gen_amt_utils.get_wp_ptype_id:'||SQLERRM,1,120));
10693: RAISE FND_API.G_EXC_ERROR;
10694: END;
10695:
10696: BEGIN
10697: l_plan_version_id := Pa_Fp_wp_gen_amt_utils.get_wp_version_id(

Line 10706: RAISE FND_API.G_EXC_ERROR;

10702: WHEN OTHERS THEN
10703: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10704: p_procedure_name => 'PUSH_WORKPLAN_ACTUALS',
10705: p_error_text => SUBSTRB('Call Pa_Fp_wp_gen_amt_utils.get_wp_version_id:'||SQLERRM,1,120));
10706: RAISE FND_API.G_EXC_ERROR;
10707: END;
10708:
10709: BEGIN
10710:

Line 10871: RAISE FND_API.G_EXC_ERROR;

10867: WHEN OTHERS THEN
10868: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10869: p_procedure_name => 'push_workplan_actuals',
10870: p_error_text => SUBSTRB('INSERT INTO PJI_FM_EXTR_PLAN_LINES:'||SQLERRM,1,120));
10871: RAISE FND_API.G_EXC_ERROR;
10872: END;
10873:
10874: -- Bug 4186007 Begin
10875: -- Now we will not use POPULATE_PRG_ACT_TBL_SINGLE to poulate the PA_PROG_ACT_BY_PERIOD_TEMP

Line 10960: RAISE FND_API.G_EXC_ERROR;

10956: -- NO NEED TO CALL PLAN_UPDATE HERE. IT IS CALLED IN UPDATE_PROGRESS ONLY
10957:
10958:
10959: IF x_return_status <> 'S' THEN
10960: RAISE FND_API.G_EXC_ERROR;
10961: END IF;
10962:
10963: EXCEPTION
10964: when FND_API.G_EXC_ERROR then

Line 10964: when FND_API.G_EXC_ERROR then

10960: RAISE FND_API.G_EXC_ERROR;
10961: END IF;
10962:
10963: EXCEPTION
10964: when FND_API.G_EXC_ERROR then
10965: if p_commit = FND_API.G_TRUE then
10966: rollback to push_actuals;
10967: end if;
10968: x_return_status := FND_API.G_RET_STS_ERROR;

Line 10965: if p_commit = FND_API.G_TRUE then

10961: END IF;
10962:
10963: EXCEPTION
10964: when FND_API.G_EXC_ERROR then
10965: if p_commit = FND_API.G_TRUE then
10966: rollback to push_actuals;
10967: end if;
10968: x_return_status := FND_API.G_RET_STS_ERROR;
10969: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 10968: x_return_status := FND_API.G_RET_STS_ERROR;

10964: when FND_API.G_EXC_ERROR then
10965: if p_commit = FND_API.G_TRUE then
10966: rollback to push_actuals;
10967: end if;
10968: x_return_status := FND_API.G_RET_STS_ERROR;
10969: when FND_API.G_EXC_UNEXPECTED_ERROR then
10970: if p_commit = FND_API.G_TRUE then
10971: rollback to push_actuals;
10972: end if;

Line 10969: when FND_API.G_EXC_UNEXPECTED_ERROR then

10965: if p_commit = FND_API.G_TRUE then
10966: rollback to push_actuals;
10967: end if;
10968: x_return_status := FND_API.G_RET_STS_ERROR;
10969: when FND_API.G_EXC_UNEXPECTED_ERROR then
10970: if p_commit = FND_API.G_TRUE then
10971: rollback to push_actuals;
10972: end if;
10973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 10970: if p_commit = FND_API.G_TRUE then

10966: rollback to push_actuals;
10967: end if;
10968: x_return_status := FND_API.G_RET_STS_ERROR;
10969: when FND_API.G_EXC_UNEXPECTED_ERROR then
10970: if p_commit = FND_API.G_TRUE then
10971: rollback to push_actuals;
10972: end if;
10973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10974: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 10973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10969: when FND_API.G_EXC_UNEXPECTED_ERROR then
10970: if p_commit = FND_API.G_TRUE then
10971: rollback to push_actuals;
10972: end if;
10973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10974: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10975: p_procedure_name => 'push_workplan_actuals',
10976: p_error_text => SUBSTRB(SQLERRM,1,120));
10977: when OTHERS then

Line 10978: if p_commit = FND_API.G_TRUE then

10974: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10975: p_procedure_name => 'push_workplan_actuals',
10976: p_error_text => SUBSTRB(SQLERRM,1,120));
10977: when OTHERS then
10978: if p_commit = FND_API.G_TRUE then
10979: rollback to push_actuals;
10980: end if;
10981: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10982: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 10981: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10977: when OTHERS then
10978: if p_commit = FND_API.G_TRUE then
10979: rollback to push_actuals;
10980: end if;
10981: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10982: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
10983: p_procedure_name => 'push_workplan_actuals',
10984: p_error_text => SUBSTRB(SQLERRM,1,120));
10985: raise;

Line 10992: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

10988: -- Progress Management Change for bug # 3420093.
10989:
10990: PROCEDURE program_rollup_pvt(
10991: p_api_version IN NUMBER :=1.0
10992: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10993: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10994: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10995: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10996: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 10993: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

10989:
10990: PROCEDURE program_rollup_pvt(
10991: p_api_version IN NUMBER :=1.0
10992: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10993: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10994: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10995: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10996: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10997: ,p_debug_mode IN VARCHAR2 :='N'

Line 10994: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

10990: PROCEDURE program_rollup_pvt(
10991: p_api_version IN NUMBER :=1.0
10992: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10993: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10994: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10995: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10996: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10997: ,p_debug_mode IN VARCHAR2 :='N'
10998: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 10995: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

10991: p_api_version IN NUMBER :=1.0
10992: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10993: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10994: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10995: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10996: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10997: ,p_debug_mode IN VARCHAR2 :='N'
10998: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
10999: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 11041: IF (p_commit = FND_API.G_TRUE) THEN

11037: IF g1_debug_mode = 'Y' THEN
11038: pa_debug.init_err_stack ('PA_PROGRESS_PUB.PROGRAM_ROLLUP_PVT');
11039: END IF;
11040:
11041: IF (p_commit = FND_API.G_TRUE) THEN
11042: savepoint PROGRAM_ROLLUP_PVT;
11043: END IF;
11044:
11045: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 11045: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

11041: IF (p_commit = FND_API.G_TRUE) THEN
11042: savepoint PROGRAM_ROLLUP_PVT;
11043: END IF;
11044:
11045: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
11046: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11047: END IF;
11048:
11049: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 11046: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

11042: savepoint PROGRAM_ROLLUP_PVT;
11043: END IF;
11044:
11045: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
11046: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11047: END IF;
11048:
11049: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
11050: FND_MSG_PUB.initialize;

Line 11049: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

11045: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
11046: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11047: END IF;
11048:
11049: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
11050: FND_MSG_PUB.initialize;
11051: END IF;
11052:
11053: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 11053: x_return_status := FND_API.G_RET_STS_SUCCESS;

11049: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
11050: FND_MSG_PUB.initialize;
11051: END IF;
11052:
11053: x_return_status := FND_API.G_RET_STS_SUCCESS;
11054:
11055: -- Bug # 3879910. Call corresponding API in package: PA_PROGRESS_PVT.
11056:
11057: PA_PROGRESS_PVT.program_rollup_pvt(

Line 11074: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11070: ,x_return_status => l_return_status
11071: ,x_msg_count => l_msg_count
11072: ,x_msg_data => l_msg_data);
11073:
11074: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11075: x_msg_data := l_msg_data;
11076: x_return_status := 'E';
11077: x_msg_count := l_msg_count;
11078: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 11078: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

11074: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11075: x_msg_data := l_msg_data;
11076: x_return_status := 'E';
11077: x_msg_count := l_msg_count;
11078: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11079: END IF;
11080:
11081: IF (p_commit = FND_API.G_TRUE) THEN
11082: COMMIT;

Line 11081: IF (p_commit = FND_API.G_TRUE) THEN

11077: x_msg_count := l_msg_count;
11078: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11079: END IF;
11080:
11081: IF (p_commit = FND_API.G_TRUE) THEN
11082: COMMIT;
11083: END IF;
11084:
11085: EXCEPTION

Line 11086: when FND_API.G_EXC_ERROR then

11082: COMMIT;
11083: END IF;
11084:
11085: EXCEPTION
11086: when FND_API.G_EXC_ERROR then
11087: if p_commit = FND_API.G_TRUE then
11088: rollback to PROGRAM_ROLLUP_PVT;
11089: end if;
11090: x_return_status := FND_API.G_RET_STS_ERROR;

Line 11087: if p_commit = FND_API.G_TRUE then

11083: END IF;
11084:
11085: EXCEPTION
11086: when FND_API.G_EXC_ERROR then
11087: if p_commit = FND_API.G_TRUE then
11088: rollback to PROGRAM_ROLLUP_PVT;
11089: end if;
11090: x_return_status := FND_API.G_RET_STS_ERROR;
11091: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 11090: x_return_status := FND_API.G_RET_STS_ERROR;

11086: when FND_API.G_EXC_ERROR then
11087: if p_commit = FND_API.G_TRUE then
11088: rollback to PROGRAM_ROLLUP_PVT;
11089: end if;
11090: x_return_status := FND_API.G_RET_STS_ERROR;
11091: when FND_API.G_EXC_UNEXPECTED_ERROR then
11092: if p_commit = FND_API.G_TRUE then
11093: rollback to PROGRAM_ROLLUP_PVT;
11094: end if;

Line 11091: when FND_API.G_EXC_UNEXPECTED_ERROR then

11087: if p_commit = FND_API.G_TRUE then
11088: rollback to PROGRAM_ROLLUP_PVT;
11089: end if;
11090: x_return_status := FND_API.G_RET_STS_ERROR;
11091: when FND_API.G_EXC_UNEXPECTED_ERROR then
11092: if p_commit = FND_API.G_TRUE then
11093: rollback to PROGRAM_ROLLUP_PVT;
11094: end if;
11095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 11092: if p_commit = FND_API.G_TRUE then

11088: rollback to PROGRAM_ROLLUP_PVT;
11089: end if;
11090: x_return_status := FND_API.G_RET_STS_ERROR;
11091: when FND_API.G_EXC_UNEXPECTED_ERROR then
11092: if p_commit = FND_API.G_TRUE then
11093: rollback to PROGRAM_ROLLUP_PVT;
11094: end if;
11095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11096: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 11095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

11091: when FND_API.G_EXC_UNEXPECTED_ERROR then
11092: if p_commit = FND_API.G_TRUE then
11093: rollback to PROGRAM_ROLLUP_PVT;
11094: end if;
11095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11096: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
11097: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
11098: p_error_text => SUBSTRB(SQLERRM,1,120));
11099: when OTHERS then

Line 11100: if p_commit = FND_API.G_TRUE then

11096: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
11097: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
11098: p_error_text => SUBSTRB(SQLERRM,1,120));
11099: when OTHERS then
11100: if p_commit = FND_API.G_TRUE then
11101: rollback to PROGRAM_ROLLUP_PVT;
11102: end if;
11103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11104: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 11103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

11099: when OTHERS then
11100: if p_commit = FND_API.G_TRUE then
11101: rollback to PROGRAM_ROLLUP_PVT;
11102: end if;
11103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11104: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
11105: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
11106: p_error_text => SUBSTRB(SQLERRM,1,120));
11107: raise;

Line 11112: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

11108: END program_rollup_pvt;
11109:
11110: PROCEDURE transfer_wp_percent_to_fin(
11111: p_api_version IN NUMBER :=1.0
11112: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
11113: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
11114: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
11115: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
11116: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 11113: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

11109:
11110: PROCEDURE transfer_wp_percent_to_fin(
11111: p_api_version IN NUMBER :=1.0
11112: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
11113: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
11114: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
11115: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
11116: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
11117: ,p_debug_mode IN VARCHAR2 :='N'

Line 11114: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

11110: PROCEDURE transfer_wp_percent_to_fin(
11111: p_api_version IN NUMBER :=1.0
11112: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
11113: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
11114: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
11115: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
11116: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
11117: ,p_debug_mode IN VARCHAR2 :='N'
11118: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 11115: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

11111: p_api_version IN NUMBER :=1.0
11112: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
11113: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
11114: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
11115: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
11116: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
11117: ,p_debug_mode IN VARCHAR2 :='N'
11118: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
11119: ,p_project_id IN NUMBER

Line 11237: IF (p_commit = FND_API.G_TRUE) THEN

11233: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.TRANSFER_WP_PERCENT_TO_FIN', x_Msg => 'p_project_id : '||p_project_id, x_Log_Level=> 3);
11234: END IF;
11235:
11236:
11237: IF (p_commit = FND_API.G_TRUE) THEN
11238: SAVEPOINT TRANSFER_WP_PERCENT_TO_FIN;
11239: END IF;
11240:
11241: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN

Line 11241: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN

11237: IF (p_commit = FND_API.G_TRUE) THEN
11238: SAVEPOINT TRANSFER_WP_PERCENT_TO_FIN;
11239: END IF;
11240:
11241: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
11242: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11243: END IF;
11244:
11245: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 11242: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

11238: SAVEPOINT TRANSFER_WP_PERCENT_TO_FIN;
11239: END IF;
11240:
11241: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
11242: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11243: END IF;
11244:
11245: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
11246: FND_MSG_PUB.initialize;

Line 11245: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

11241: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
11242: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11243: END IF;
11244:
11245: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
11246: FND_MSG_PUB.initialize;
11247: END IF;
11248:
11249:

Line 11250: x_return_status := FND_API.G_RET_STS_SUCCESS;

11246: FND_MSG_PUB.initialize;
11247: END IF;
11248:
11249:
11250: x_return_status := FND_API.G_RET_STS_SUCCESS;
11251:
11252: IF g1_debug_mode = 'Y' THEN
11253: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.TRANSFER_WP_PERCENT_TO_FIN', x_Msg => 'getting the structure sharing code', x_Log_Level=> 3);
11254: END IF;

Line 11271: RAISE FND_API.G_EXC_ERROR;

11267: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
11268: ,p_msg_name => 'PA_PS_WORKPLAN_DISABLED');
11269: x_msg_data := 'PA_PS_WORKPLAN_DISABLED';
11270: x_return_status := 'E';
11271: RAISE FND_API.G_EXC_ERROR;
11272: END IF;
11273:
11274:
11275: IF ((l_structure_sharing_code = 'SPLIT_NO_MAPPING') or l_structure_sharing_code is null) -- Added OR condition for Bug no 4767821.

Line 11281: RAISE FND_API.G_EXC_ERROR;

11277: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
11278: ,p_msg_name => 'PA_TRAN_SHCODE_INV');
11279: x_msg_data := 'PA_TRAN_SHCODE_INV';
11280: x_return_status := 'E';
11281: RAISE FND_API.G_EXC_ERROR;
11282: END IF;
11283:
11284: OPEN c_max_date;
11285: FETCH c_max_date INTO l_as_of_date;

Line 11352: RAISE FND_API.G_EXC_ERROR;

11348: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
11349: ,p_msg_name => 'PA_NO_PUBLISHED_VERSION');
11350: x_msg_data := 'PA_NO_PUBLISHED_VERSION';
11351: x_return_status := 'E';
11352: RAISE FND_API.G_EXC_ERROR;
11353: END IF;
11354: -- Bug 3696820 : begin
11355: BEGIN
11356: l_baselined_str_ver_id := PA_PROJECT_STRUCTURE_UTILS.Get_Baseline_Struct_Ver(p_project_id);

Line 11363: p_init_msg_list => FND_API.G_FALSE,

11359: l_baselined_str_ver_id := null;
11360: END;
11361:
11362: pa_progress_pub.populate_pji_tab_for_plan(
11363: p_init_msg_list => FND_API.G_FALSE,
11364: p_calling_module => p_calling_module,
11365: p_project_id => p_project_id,
11366: p_structure_version_id => l_structure_version_id,
11367: p_baselined_str_ver_id => l_baselined_str_ver_id,

Line 11374: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11370: x_msg_count => l_msg_count,
11371: x_msg_data => l_msg_data
11372: );
11373:
11374: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11375: x_msg_data := l_msg_data;
11376: x_return_status := 'E';
11377: x_msg_count := l_msg_count;
11378: RAISE FND_API.G_EXC_ERROR;

Line 11378: RAISE FND_API.G_EXC_ERROR;

11374: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11375: x_msg_data := l_msg_data;
11376: x_return_status := 'E';
11377: x_msg_count := l_msg_count;
11378: RAISE FND_API.G_EXC_ERROR;
11379: END IF;
11380: -- Bug 3696820 : end
11381:
11382: -- Bug 3952006 : Begin

Line 11461: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11457: END IF;
11458: END LOOP;
11459: END IF;
11460:
11461: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11462: x_msg_data := l_msg_data;
11463: x_return_status := 'E';
11464: x_msg_count := l_msg_count;
11465: RAISE FND_API.G_EXC_ERROR;

Line 11465: RAISE FND_API.G_EXC_ERROR;

11461: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11462: x_msg_data := l_msg_data;
11463: x_return_status := 'E';
11464: x_msg_count := l_msg_count;
11465: RAISE FND_API.G_EXC_ERROR;
11466: END IF;
11467: -- Bug 3603636 : Added call of Rollup API
11468:
11469: IF l_call_rollup = 'Y' THEN -- Bug 4136239

Line 11482: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11478: x_msg_count => l_msg_count,
11479: x_msg_data => l_msg_data
11480: );
11481:
11482: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11483: x_msg_data := l_msg_data;
11484: x_return_status := 'E';
11485: x_msg_count := l_msg_count;
11486: RAISE FND_API.G_EXC_ERROR;

Line 11486: RAISE FND_API.G_EXC_ERROR;

11482: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11483: x_msg_data := l_msg_data;
11484: x_return_status := 'E';
11485: x_msg_count := l_msg_count;
11486: RAISE FND_API.G_EXC_ERROR;
11487: END IF;
11488:
11489: OPEN c_get_task_weight_method(p_project_id, 'FINANCIAL');
11490: FETCH c_get_task_weight_method INTO l_rollup_method;

Line 11513: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11509: ,x_msg_count => l_msg_count
11510: ,x_msg_data => l_msg_data);
11511:
11512:
11513: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11514: x_msg_data := l_msg_data;
11515: x_return_status := 'E';
11516: x_msg_count := l_msg_count;
11517: RAISE FND_API.G_EXC_ERROR;

Line 11517: RAISE FND_API.G_EXC_ERROR;

11513: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11514: x_msg_data := l_msg_data;
11515: x_return_status := 'E';
11516: x_msg_count := l_msg_count;
11517: RAISE FND_API.G_EXC_ERROR;
11518: END IF;
11519: END IF; --IF l_call_rollup = 'Y'
11520:
11521: IF (p_commit = FND_API.G_TRUE) THEN

Line 11521: IF (p_commit = FND_API.G_TRUE) THEN

11517: RAISE FND_API.G_EXC_ERROR;
11518: END IF;
11519: END IF; --IF l_call_rollup = 'Y'
11520:
11521: IF (p_commit = FND_API.G_TRUE) THEN
11522: COMMIT;
11523: END IF;
11524: EXCEPTION
11525: when FND_API.G_EXC_ERROR then

Line 11525: when FND_API.G_EXC_ERROR then

11521: IF (p_commit = FND_API.G_TRUE) THEN
11522: COMMIT;
11523: END IF;
11524: EXCEPTION
11525: when FND_API.G_EXC_ERROR then
11526: if p_commit = FND_API.G_TRUE then
11527: rollback to TRANSFER_WP_PERCENT_TO_FIN;
11528: end if;
11529: x_return_status := FND_API.G_RET_STS_ERROR;

Line 11526: if p_commit = FND_API.G_TRUE then

11522: COMMIT;
11523: END IF;
11524: EXCEPTION
11525: when FND_API.G_EXC_ERROR then
11526: if p_commit = FND_API.G_TRUE then
11527: rollback to TRANSFER_WP_PERCENT_TO_FIN;
11528: end if;
11529: x_return_status := FND_API.G_RET_STS_ERROR;
11530: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 11529: x_return_status := FND_API.G_RET_STS_ERROR;

11525: when FND_API.G_EXC_ERROR then
11526: if p_commit = FND_API.G_TRUE then
11527: rollback to TRANSFER_WP_PERCENT_TO_FIN;
11528: end if;
11529: x_return_status := FND_API.G_RET_STS_ERROR;
11530: when FND_API.G_EXC_UNEXPECTED_ERROR then
11531: if p_commit = FND_API.G_TRUE then
11532: rollback to TRANSFER_WP_PERCENT_TO_FIN;
11533: end if;

Line 11530: when FND_API.G_EXC_UNEXPECTED_ERROR then

11526: if p_commit = FND_API.G_TRUE then
11527: rollback to TRANSFER_WP_PERCENT_TO_FIN;
11528: end if;
11529: x_return_status := FND_API.G_RET_STS_ERROR;
11530: when FND_API.G_EXC_UNEXPECTED_ERROR then
11531: if p_commit = FND_API.G_TRUE then
11532: rollback to TRANSFER_WP_PERCENT_TO_FIN;
11533: end if;
11534: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 11531: if p_commit = FND_API.G_TRUE then

11527: rollback to TRANSFER_WP_PERCENT_TO_FIN;
11528: end if;
11529: x_return_status := FND_API.G_RET_STS_ERROR;
11530: when FND_API.G_EXC_UNEXPECTED_ERROR then
11531: if p_commit = FND_API.G_TRUE then
11532: rollback to TRANSFER_WP_PERCENT_TO_FIN;
11533: end if;
11534: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11535: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 11534: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

11530: when FND_API.G_EXC_UNEXPECTED_ERROR then
11531: if p_commit = FND_API.G_TRUE then
11532: rollback to TRANSFER_WP_PERCENT_TO_FIN;
11533: end if;
11534: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11535: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
11536: p_procedure_name => 'TRANSFER_WP_PERCENT_TO_FIN',
11537: p_error_text => SUBSTRB(SQLERRM,1,120));
11538: when OTHERS then

Line 11539: if p_commit = FND_API.G_TRUE then

11535: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
11536: p_procedure_name => 'TRANSFER_WP_PERCENT_TO_FIN',
11537: p_error_text => SUBSTRB(SQLERRM,1,120));
11538: when OTHERS then
11539: if p_commit = FND_API.G_TRUE then
11540: rollback to TRANSFER_WP_PERCENT_TO_FIN;
11541: end if;
11542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11543: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 11542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

11538: when OTHERS then
11539: if p_commit = FND_API.G_TRUE then
11540: rollback to TRANSFER_WP_PERCENT_TO_FIN;
11541: end if;
11542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11543: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
11544: p_procedure_name => 'TRANSFER_WP_PERCENT_TO_FIN',
11545: p_error_text => SUBSTRB(SQLERRM,1,120));
11546: raise;

Line 11554: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

11550: --Bug 5027965. Made sure that the ETC cost is copied from current working version
11551: --if the latest progress is already applied
11552: PROCEDURE publish_progress(
11553: p_api_version IN NUMBER :=1.0
11554: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
11555: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
11556: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
11557: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
11558: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 11555: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

11551: --if the latest progress is already applied
11552: PROCEDURE publish_progress(
11553: p_api_version IN NUMBER :=1.0
11554: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
11555: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
11556: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
11557: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
11558: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
11559: ,p_debug_mode IN VARCHAR2 :='N'

Line 11556: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

11552: PROCEDURE publish_progress(
11553: p_api_version IN NUMBER :=1.0
11554: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
11555: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
11556: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
11557: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
11558: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
11559: ,p_debug_mode IN VARCHAR2 :='N'
11560: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 11557: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

11553: p_api_version IN NUMBER :=1.0
11554: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
11555: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
11556: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
11557: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
11558: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
11559: ,p_debug_mode IN VARCHAR2 :='N'
11560: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
11561: ,p_project_id IN NUMBER

Line 12091: IF (p_commit = FND_API.G_TRUE) THEN

12087: IF g1_debug_mode = 'Y' THEN
12088: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.PUBLISH_PROGRESS', x_Msg => 'p_project_id : '||p_project_id, x_Log_Level=> 3);
12089: END IF;
12090:
12091: IF (p_commit = FND_API.G_TRUE) THEN
12092: SAVEPOINT PUBLISH_PROGRESS;
12093: END IF;
12094:
12095: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN

Line 12095: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN

12091: IF (p_commit = FND_API.G_TRUE) THEN
12092: SAVEPOINT PUBLISH_PROGRESS;
12093: END IF;
12094:
12095: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
12096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12097: END IF;
12098:
12099: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 12096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

12092: SAVEPOINT PUBLISH_PROGRESS;
12093: END IF;
12094:
12095: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
12096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12097: END IF;
12098:
12099: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
12100: FND_MSG_PUB.initialize;

Line 12099: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

12095: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
12096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12097: END IF;
12098:
12099: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
12100: FND_MSG_PUB.initialize;
12101: END IF;
12102:
12103: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 12103: x_return_status := FND_API.G_RET_STS_SUCCESS;

12099: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
12100: FND_MSG_PUB.initialize;
12101: END IF;
12102:
12103: x_return_status := FND_API.G_RET_STS_SUCCESS;
12104:
12105: -- Bug 4111107
12106: -- Now it will create Progress records for all objects
12107: -- for which they have progress records for working wp version

Line 12663: raise FND_API.G_EXC_ERROR;

12659: ,x_msg_count => x_msg_count
12660: ,x_msg_data => x_msg_data
12661: );
12662: IF x_return_status <> 'S' THEN
12663: raise FND_API.G_EXC_ERROR;
12664: END IF;
12665: END IF;
12666: ELSIF l_estimated_remaining_effort IS NOT NULL THEN
12667: IF l_estimated_remaining_effort = 0 THEN

Line 12704: raise FND_API.G_EXC_ERROR;

12700: ,x_msg_count => x_msg_count
12701: ,x_msg_data => x_msg_data
12702: );
12703: IF x_return_status <> 'S' THEN
12704: raise FND_API.G_EXC_ERROR;
12705: END IF;
12706: END IF;
12707: ELSIF l_eqpmt_etc_effort IS NOT NULL THEN
12708: IF l_eqpmt_etc_effort = 0 THEN

Line 12745: raise FND_API.G_EXC_ERROR;

12741: ,x_msg_count => x_msg_count
12742: ,x_msg_data => x_msg_data
12743: );
12744: IF x_return_status <> 'S' THEN
12745: raise FND_API.G_EXC_ERROR;
12746: END IF;
12747: END IF;
12748: END IF;
12749: END IF;

Line 13223: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

13219: x_task_weight_basis_code := l_task_weight_basis_code;
13220: --rtarway, BUG 3951024
13221: x_upd_new_elem_ver_id_flag := l_upd_new_elem_ver_id_flag;
13222:
13223: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13224: x_return_status := 'E';
13225: x_msg_count := x_msg_count;
13226: RAISE FND_API.G_EXC_ERROR;
13227: END IF;

Line 13226: RAISE FND_API.G_EXC_ERROR;

13222:
13223: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13224: x_return_status := 'E';
13225: x_msg_count := x_msg_count;
13226: RAISE FND_API.G_EXC_ERROR;
13227: END IF;
13228:
13229:
13230: IF (p_commit = FND_API.G_TRUE) THEN

Line 13230: IF (p_commit = FND_API.G_TRUE) THEN

13226: RAISE FND_API.G_EXC_ERROR;
13227: END IF;
13228:
13229:
13230: IF (p_commit = FND_API.G_TRUE) THEN
13231: COMMIT;
13232: END IF;
13233: EXCEPTION
13234: when FND_API.G_EXC_ERROR then

Line 13234: when FND_API.G_EXC_ERROR then

13230: IF (p_commit = FND_API.G_TRUE) THEN
13231: COMMIT;
13232: END IF;
13233: EXCEPTION
13234: when FND_API.G_EXC_ERROR then
13235: if p_commit = FND_API.G_TRUE then
13236: rollback to PUBLISH_PROGRESS;
13237: end if;
13238: x_return_status := FND_API.G_RET_STS_ERROR;

Line 13235: if p_commit = FND_API.G_TRUE then

13231: COMMIT;
13232: END IF;
13233: EXCEPTION
13234: when FND_API.G_EXC_ERROR then
13235: if p_commit = FND_API.G_TRUE then
13236: rollback to PUBLISH_PROGRESS;
13237: end if;
13238: x_return_status := FND_API.G_RET_STS_ERROR;
13239: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 13238: x_return_status := FND_API.G_RET_STS_ERROR;

13234: when FND_API.G_EXC_ERROR then
13235: if p_commit = FND_API.G_TRUE then
13236: rollback to PUBLISH_PROGRESS;
13237: end if;
13238: x_return_status := FND_API.G_RET_STS_ERROR;
13239: when FND_API.G_EXC_UNEXPECTED_ERROR then
13240: if p_commit = FND_API.G_TRUE then
13241: rollback to PUBLISH_PROGRESS;
13242: end if;

Line 13239: when FND_API.G_EXC_UNEXPECTED_ERROR then

13235: if p_commit = FND_API.G_TRUE then
13236: rollback to PUBLISH_PROGRESS;
13237: end if;
13238: x_return_status := FND_API.G_RET_STS_ERROR;
13239: when FND_API.G_EXC_UNEXPECTED_ERROR then
13240: if p_commit = FND_API.G_TRUE then
13241: rollback to PUBLISH_PROGRESS;
13242: end if;
13243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 13240: if p_commit = FND_API.G_TRUE then

13236: rollback to PUBLISH_PROGRESS;
13237: end if;
13238: x_return_status := FND_API.G_RET_STS_ERROR;
13239: when FND_API.G_EXC_UNEXPECTED_ERROR then
13240: if p_commit = FND_API.G_TRUE then
13241: rollback to PUBLISH_PROGRESS;
13242: end if;
13243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13244: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 13243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

13239: when FND_API.G_EXC_UNEXPECTED_ERROR then
13240: if p_commit = FND_API.G_TRUE then
13241: rollback to PUBLISH_PROGRESS;
13242: end if;
13243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13244: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
13245: p_procedure_name => 'PUBLISH_PROGRESS',
13246: p_error_text => SUBSTRB(SQLERRM,1,120));
13247: when OTHERS then

Line 13248: if p_commit = FND_API.G_TRUE then

13244: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
13245: p_procedure_name => 'PUBLISH_PROGRESS',
13246: p_error_text => SUBSTRB(SQLERRM,1,120));
13247: when OTHERS then
13248: if p_commit = FND_API.G_TRUE then
13249: rollback to PUBLISH_PROGRESS;
13250: end if;
13251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13252: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 13251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

13247: when OTHERS then
13248: if p_commit = FND_API.G_TRUE then
13249: rollback to PUBLISH_PROGRESS;
13250: end if;
13251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13252: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
13253: p_procedure_name => 'PUBLISH_PROGRESS',
13254: p_error_text => SUBSTRB(SQLERRM,1,120));
13255: raise;

Line 14576: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS and p_extraction_type <> 'PUBLISH') then

14572: x_msg_code => x_msg_code);
14573:
14574: /* Begin: Added for bug 5526638*/
14575: /* Added and condition for bug#5659575*/
14576: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS and p_extraction_type <> 'PUBLISH') then
14577: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
14578: p_msg_name => x_msg_code);
14579: x_msg_data := x_msg_code;
14580: x_return_status := 'E';

Line 14631: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS and p_extraction_type <> 'PUBLISH') THEN

14627: x_return_status => x_return_status,
14628: x_msg_code => x_msg_code );
14629: /* Begin: Added for bug 5526638*/
14630: /* Added and condition for bug#5659575*/
14631: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS and p_extraction_type <> 'PUBLISH') THEN
14632: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
14633: p_msg_name => x_msg_code);
14634: x_msg_data := x_msg_code;
14635: x_return_status := 'E';

Line 18064: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

18060:
18061: pa_task_assignment_utils.g_require_progress_rollup := 'N';
18062: END IF;
18063:
18064: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
18065: pa_debug.log_message('PA_PROGRESS_PUB.GET_SUMMARIZED_ACTUALS: Error in PA_PROJ_TASK_STRUC_PUB.PROCESS_WBS_UPDATES_WRP', 1);
18066: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
18067: p_msg_name => x_msg_data);
18068: x_msg_data := x_msg_data;

Line 18071: RAISE FND_API.G_EXC_ERROR;

18067: p_msg_name => x_msg_data);
18068: x_msg_data := x_msg_data;
18069: x_return_status := 'E';
18070:
18071: RAISE FND_API.G_EXC_ERROR;
18072: END IF;
18073: /* Bug 13419867 ends */
18074:
18075: IF g1_debug_mode = 'Y' THEN

Line 18564: raise FND_API.G_EXC_ERROR;

18560: IF x_return_status <> 'S' THEN
18561: pa_debug.log_message('GET_SUMM_ACT: For Insert GET_TASK_RES_OVERRIDE_INFO returned error for object_id='||OBJECT_ID(l_index1), 1);
18562: -- Added for bug 5526638
18563: l_err_msg := 'Progress Client extension returned error for object_id='||OBJECT_ID(l_index1);
18564: raise FND_API.G_EXC_ERROR;
18565: END IF;
18566:
18567: IF nvl(ESTIMATED_START_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
18568: OR nvl(ESTIMATED_FINISH_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)

Line 18567: IF nvl(ESTIMATED_START_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)

18563: l_err_msg := 'Progress Client extension returned error for object_id='||OBJECT_ID(l_index1);
18564: raise FND_API.G_EXC_ERROR;
18565: END IF;
18566:
18567: IF nvl(ESTIMATED_START_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
18568: OR nvl(ESTIMATED_FINISH_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
18569: OR nvl(ACTUAL_START_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
18570: OR nvl(ACTUAL_FINISH_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
18571: THEN

Line 18568: OR nvl(ESTIMATED_FINISH_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)

18564: raise FND_API.G_EXC_ERROR;
18565: END IF;
18566:
18567: IF nvl(ESTIMATED_START_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
18568: OR nvl(ESTIMATED_FINISH_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
18569: OR nvl(ACTUAL_START_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
18570: OR nvl(ACTUAL_FINISH_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
18571: THEN
18572: l_date_override_flag := 'Y';

Line 18569: OR nvl(ACTUAL_START_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)

18565: END IF;
18566:
18567: IF nvl(ESTIMATED_START_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
18568: OR nvl(ESTIMATED_FINISH_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
18569: OR nvl(ACTUAL_START_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
18570: OR nvl(ACTUAL_FINISH_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
18571: THEN
18572: l_date_override_flag := 'Y';
18573: ESTIMATED_START_DATE(l_index1) := l_clex_estimated_start_date;

Line 18570: OR nvl(ACTUAL_FINISH_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)

18566:
18567: IF nvl(ESTIMATED_START_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
18568: OR nvl(ESTIMATED_FINISH_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
18569: OR nvl(ACTUAL_START_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
18570: OR nvl(ACTUAL_FINISH_DATE(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
18571: THEN
18572: l_date_override_flag := 'Y';
18573: ESTIMATED_START_DATE(l_index1) := l_clex_estimated_start_date;
18574: ESTIMATED_FINISH_DATE(l_index1) := l_clex_estimated_finish_date;

Line 18712: raise FND_API.G_EXC_ERROR;

18708: IF x_return_status <> 'S' THEN
18709: pa_debug.log_message('GET_SUMM_ACT: For Update GET_TASK_RES_OVERRIDE_INFO returned error for object_id='||OBJECT_ID(l_index1), 1);
18710: -- Added for bug 5526638
18711: l_err_msg := 'Progress client extension returned error for object_id='||OBJECT_ID(l_index1);
18712: raise FND_API.G_EXC_ERROR;
18713: END IF;
18714:
18715: IF nvl(u_estimated_start_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
18716: OR nvl(u_estimated_finish_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)

Line 18715: IF nvl(u_estimated_start_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)

18711: l_err_msg := 'Progress client extension returned error for object_id='||OBJECT_ID(l_index1);
18712: raise FND_API.G_EXC_ERROR;
18713: END IF;
18714:
18715: IF nvl(u_estimated_start_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
18716: OR nvl(u_estimated_finish_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
18717: OR nvl(u_actual_start_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
18718: OR nvl(u_actual_finish_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
18719: THEN

Line 18716: OR nvl(u_estimated_finish_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)

18712: raise FND_API.G_EXC_ERROR;
18713: END IF;
18714:
18715: IF nvl(u_estimated_start_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
18716: OR nvl(u_estimated_finish_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
18717: OR nvl(u_actual_start_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
18718: OR nvl(u_actual_finish_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
18719: THEN
18720: l_date_override_flag := 'Y';

Line 18717: OR nvl(u_actual_start_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)

18713: END IF;
18714:
18715: IF nvl(u_estimated_start_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
18716: OR nvl(u_estimated_finish_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
18717: OR nvl(u_actual_start_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
18718: OR nvl(u_actual_finish_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
18719: THEN
18720: l_date_override_flag := 'Y';
18721: u_estimated_start_date(l_index1) := l_clex_estimated_start_date;

Line 18718: OR nvl(u_actual_finish_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)

18714:
18715: IF nvl(u_estimated_start_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_start_date,FND_API.g_miss_date)
18716: OR nvl(u_estimated_finish_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_estimated_finish_date,FND_API.g_miss_date)
18717: OR nvl(u_actual_start_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_start_date,FND_API.g_miss_date)
18718: OR nvl(u_actual_finish_date(l_index1),FND_API.g_miss_date) <> nvl(l_clex_actual_finish_date,FND_API.g_miss_date)
18719: THEN
18720: l_date_override_flag := 'Y';
18721: u_estimated_start_date(l_index1) := l_clex_estimated_start_date;
18722: u_estimated_finish_date(l_index1) := l_clex_estimated_finish_date;

Line 19396: pa_progress_pub.rollup_progress_pvt(P_INIT_MSG_LIST => FND_API.G_FALSE,

19392: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.get_summarized_actuals',
19393: x_Msg => 'Calling rollup_progress_pvt l_project_id='||l_project_id||', str ver id='||latest_wp_struct_ver_ids_tbl(l_index)||',l_temp_as_of_date='||l_temp_as_of_date ,
19394: x_Log_Level=> 3);
19395:
19396: pa_progress_pub.rollup_progress_pvt(P_INIT_MSG_LIST => FND_API.G_FALSE,
19397: P_VALIDATE_ONLY => FND_API.G_FALSE,
19398: P_PROGRESS_MODE => 'FUTURE',
19399: P_PROJECT_ID => l_project_id,
19400: P_OBJECT_TYPE => 'PA_STRUCTURES',

Line 19397: P_VALIDATE_ONLY => FND_API.G_FALSE,

19393: x_Msg => 'Calling rollup_progress_pvt l_project_id='||l_project_id||', str ver id='||latest_wp_struct_ver_ids_tbl(l_index)||',l_temp_as_of_date='||l_temp_as_of_date ,
19394: x_Log_Level=> 3);
19395:
19396: pa_progress_pub.rollup_progress_pvt(P_INIT_MSG_LIST => FND_API.G_FALSE,
19397: P_VALIDATE_ONLY => FND_API.G_FALSE,
19398: P_PROGRESS_MODE => 'FUTURE',
19399: P_PROJECT_ID => l_project_id,
19400: P_OBJECT_TYPE => 'PA_STRUCTURES',
19401: P_AS_OF_DATE => l_temp_as_of_date,

Line 19415: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

19411: x_Msg => 'After call x_return_status='||x_return_status ,
19412: x_Log_Level=> 3);
19413:
19414:
19415: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
19416: pa_debug.log_message('GET_SUMM_ACT: Rollup_Progress_Pvt returned error.', 1);
19417: -- Added for bug 5526638
19418: l_err_msg := 'Error in rollup of progress attributes';
19419: RAISE FND_API.G_EXC_ERROR;

Line 19419: RAISE FND_API.G_EXC_ERROR;

19415: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
19416: pa_debug.log_message('GET_SUMM_ACT: Rollup_Progress_Pvt returned error.', 1);
19417: -- Added for bug 5526638
19418: l_err_msg := 'Error in rollup of progress attributes';
19419: RAISE FND_API.G_EXC_ERROR;
19420: END IF;
19421:
19422: IF g1_debug_mode = 'Y' THEN
19423: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.get_summarized_actuals',

Line 19462: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

19458: IF g1_debug_mode = 'Y' THEN
19459: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.GET_SUMMMARIZED_ACTUALS',
19460: x_Msg => 'After Calling program_rollup_pvt return_status='||x_return_status, x_Log_Level=> 3);
19461: END IF;
19462: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
19463: pa_debug.log_message('GET_SUMM_ACT: Program_Rollup_Pvt returned error.', 1);
19464: -- Added for bug 5526638
19465: l_err_msg := 'Error in program rollup';
19466: RAISE FND_API.G_EXC_ERROR;

Line 19466: RAISE FND_API.G_EXC_ERROR;

19462: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
19463: pa_debug.log_message('GET_SUMM_ACT: Program_Rollup_Pvt returned error.', 1);
19464: -- Added for bug 5526638
19465: l_err_msg := 'Error in program rollup';
19466: RAISE FND_API.G_EXC_ERROR;
19467: END IF;
19468: EXCEPTION when others then
19469: x_return_status := 'E';
19470: pa_debug.log_message('GET_SUMM_ACT: Exception in program rollup.', 1);

Line 19841: p_encoded => Fnd_Api.G_FALSE

19837: p_error_text => SUBSTRB('pa_progress_pub.get_summarized_actuals:'||SQLERRM,1,120));
19838: -- 4746476 : Priniting stack
19839: FOR i in 1..fnd_msg_pub.count_msg LOOP
19840: pa_interface_utils_pub.get_messages (
19841: p_encoded => Fnd_Api.G_FALSE
19842: ,p_data => l_data
19843: ,p_msg_index => i
19844: ,p_msg_index_out => l_msg_index_out );
19845: pa_debug.log_message('GET_SUMM_ACT: Error '||i||' ='||substr(l_data,1,200), 1);

Line 19876: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

19872: --FPM Dev CR 1 : Added following procedure
19873:
19874: PROCEDURE UPDATE_FINANCIAL_TASK_PROGRESS(
19875: p_api_version IN NUMBER :=1.0
19876: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
19877: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
19878: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
19879: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
19880: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 19877: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

19873:
19874: PROCEDURE UPDATE_FINANCIAL_TASK_PROGRESS(
19875: p_api_version IN NUMBER :=1.0
19876: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
19877: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
19878: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
19879: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
19880: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
19881: ,p_debug_mode IN VARCHAR2 :='N'

Line 19878: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

19874: PROCEDURE UPDATE_FINANCIAL_TASK_PROGRESS(
19875: p_api_version IN NUMBER :=1.0
19876: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
19877: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
19878: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
19879: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
19880: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
19881: ,p_debug_mode IN VARCHAR2 :='N'
19882: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 19879: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

19875: p_api_version IN NUMBER :=1.0
19876: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
19877: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
19878: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
19879: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
19880: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
19881: ,p_debug_mode IN VARCHAR2 :='N'
19882: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
19883: ,p_action IN VARCHAR2 :='SAVE'

Line 19998: IF (p_commit = FND_API.G_TRUE) THEN

19994: IF g1_debug_mode = 'Y' THEN
19995: pa_debug.init_err_stack ('PA_PROGRESS_PUB.UPDATE_FINANCIAL_TASK_PROGRESS');
19996: END IF;
19997:
19998: IF (p_commit = FND_API.G_TRUE) THEN
19999: savepoint UPDATE_FINANCIAL_TASK_PROGRESS;
20000: END IF;
20001:
20002: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 20002: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

19998: IF (p_commit = FND_API.G_TRUE) THEN
19999: savepoint UPDATE_FINANCIAL_TASK_PROGRESS;
20000: END IF;
20001:
20002: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
20003: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
20004: END IF;
20005:
20006: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 20003: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

19999: savepoint UPDATE_FINANCIAL_TASK_PROGRESS;
20000: END IF;
20001:
20002: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
20003: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
20004: END IF;
20005:
20006: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
20007: FND_MSG_PUB.initialize;

Line 20006: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

20002: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
20003: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
20004: END IF;
20005:
20006: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
20007: FND_MSG_PUB.initialize;
20008: END IF;
20009:
20010: IF g1_debug_mode = 'Y' THEN

Line 20024: x_return_status := FND_API.G_RET_STS_SUCCESS;

20020: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_FINANCIAL_TASK_PROGRESS', x_Msg => 'p_structure_version_id: '||p_structure_version_id, x_Log_Level=> 3);
20021: END IF;
20022:
20023:
20024: x_return_status := FND_API.G_RET_STS_SUCCESS;
20025:
20026:
20027: IF p_task_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
20028: THEN

Line 20114: RAISE FND_API.G_EXC_ERROR;

20110: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
20111: ,p_msg_name => 'PA_FIN_PERCENT_INVALID');
20112: x_msg_data := 'PA_FIN_PERCENT_INVALID';
20113: x_return_status := 'E';
20114: RAISE FND_API.G_EXC_ERROR;
20115: END IF;
20116:
20117:
20118: ---- if status is CANCELLED

Line 20131: RAISE FND_API.G_EXC_ERROR;

20127: ,p_token2 => 'TASK_NUMBER'
20128: ,p_value2 => PA_TASK_UTILS.get_task_number(l_task_id));
20129: x_msg_data := 'PA_TP_CANT_NTER_PRG_CANCEL';
20130: x_return_status := 'E';
20131: RAISE FND_API.G_EXC_ERROR;
20132: ELSE
20133: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
20134: ,p_msg_name => 'PA_TP_CANT_NTER_PRG_CANCEL_AMG'
20135: ,p_token1 => 'TASK_ID'

Line 20140: RAISE FND_API.G_EXC_ERROR;

20136: ,p_value1 => p_object_id
20137: );
20138: x_msg_data := 'PA_TP_CANT_NTER_PRG_CANCEL';
20139: x_return_status := 'E';
20140: RAISE FND_API.G_EXC_ERROR;
20141: END IF;
20142: END IF;
20143: ---- if status is CANCELLED
20144:

Line 20154: RAISE FND_API.G_EXC_ERROR;

20150: ,p_token1 => 'AS_OF_DATE'
20151: ,p_value1 => p_as_of_date);
20152: x_msg_data := 'PA_TP_INV_AOD';
20153: x_return_status := 'E';
20154: RAISE FND_API.G_EXC_ERROR;
20155: END IF;
20156: ----- Wrong DATE
20157:
20158:

Line 20568: RAISE FND_API.G_EXC_ERROR;

20564: ,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => null);
20565:
20566: -- FPM Dev CR 6
20567: IF Fnd_Msg_Pub.count_msg > 0 THEN
20568: RAISE FND_API.G_EXC_ERROR;
20569: END IF;
20570:
20571:
20572: END IF;

Line 20656: RAISE FND_API.G_EXC_ERROR;

20652:
20653: );
20654: -- FPM Dev CR 6
20655: IF Fnd_Msg_Pub.count_msg > 0 THEN
20656: RAISE FND_API.G_EXC_ERROR;
20657: END IF;
20658:
20659:
20660:

Line 20805: RAISE FND_API.G_EXC_ERROR;

20801: ,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => null
20802: );
20803: -- FPM Dev CR 6
20804: IF Fnd_Msg_Pub.count_msg > 0 THEN
20805: RAISE FND_API.G_EXC_ERROR;
20806: END IF;
20807:
20808: IF g1_debug_mode = 'Y' THEN
20809: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_FINANCIAL_TASK_PROGRESS', x_Msg => 'COMPLETED ', x_Log_Level=> 3);

Line 20820: when FND_API.G_EXC_ERROR then

20816: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_FINANCIAL_TASK_PROGRESS', x_Msg => 'EXITING ', x_Log_Level=> 3);
20817: END IF;
20818:
20819: EXCEPTION
20820: when FND_API.G_EXC_ERROR then
20821: x_return_status := FND_API.G_RET_STS_ERROR;
20822: l_msg_count := Fnd_Msg_Pub.count_msg;
20823:
20824: if p_commit = FND_API.G_TRUE then

Line 20821: x_return_status := FND_API.G_RET_STS_ERROR;

20817: END IF;
20818:
20819: EXCEPTION
20820: when FND_API.G_EXC_ERROR then
20821: x_return_status := FND_API.G_RET_STS_ERROR;
20822: l_msg_count := Fnd_Msg_Pub.count_msg;
20823:
20824: if p_commit = FND_API.G_TRUE then
20825: rollback to UPDATE_FINANCIAL_TASK_PROGRESS;

Line 20824: if p_commit = FND_API.G_TRUE then

20820: when FND_API.G_EXC_ERROR then
20821: x_return_status := FND_API.G_RET_STS_ERROR;
20822: l_msg_count := Fnd_Msg_Pub.count_msg;
20823:
20824: if p_commit = FND_API.G_TRUE then
20825: rollback to UPDATE_FINANCIAL_TASK_PROGRESS;
20826: end if;
20827:
20828: IF l_msg_count = 1 AND x_msg_data IS NULL

Line 20831: ( p_encoded => Fnd_Api.G_TRUE

20827:
20828: IF l_msg_count = 1 AND x_msg_data IS NULL
20829: THEN
20830: Pa_Interface_Utils_Pub.get_messages
20831: ( p_encoded => Fnd_Api.G_TRUE
20832: , p_msg_index => 1
20833: , p_msg_count => l_msg_count
20834: , p_msg_data => l_msg_data
20835: , p_data => l_data

Line 20843: when FND_API.G_EXC_UNEXPECTED_ERROR then

20839: ELSE
20840: x_msg_count := l_msg_count;
20841: END IF;
20842:
20843: when FND_API.G_EXC_UNEXPECTED_ERROR then
20844: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
20845: x_msg_count := 1;
20846: x_msg_data := SQLERRM;
20847:

Line 20844: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

20840: x_msg_count := l_msg_count;
20841: END IF;
20842:
20843: when FND_API.G_EXC_UNEXPECTED_ERROR then
20844: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
20845: x_msg_count := 1;
20846: x_msg_data := SQLERRM;
20847:
20848: if p_commit = FND_API.G_TRUE then

Line 20848: if p_commit = FND_API.G_TRUE then

20844: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
20845: x_msg_count := 1;
20846: x_msg_data := SQLERRM;
20847:
20848: if p_commit = FND_API.G_TRUE then
20849: rollback to UPDATE_FINANCIAL_TASK_PROGRESS;
20850: end if;
20851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
20852: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 20851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

20847:
20848: if p_commit = FND_API.G_TRUE then
20849: rollback to UPDATE_FINANCIAL_TASK_PROGRESS;
20850: end if;
20851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
20852: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
20853: p_procedure_name => 'UPDATE_FINANCIAL_TASK_PROGRESS',
20854: p_error_text => SUBSTRB(SQLERRM,1,120));
20855: when OTHERS then

Line 20856: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

20852: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
20853: p_procedure_name => 'UPDATE_FINANCIAL_TASK_PROGRESS',
20854: p_error_text => SUBSTRB(SQLERRM,1,120));
20855: when OTHERS then
20856: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
20857: x_msg_count := 1;
20858: x_msg_data := SUBSTRB(SQLERRM,1,120);
20859: if p_commit = FND_API.G_TRUE then
20860: rollback to UPDATE_DELIVERABLE_PROGRESS;

Line 20859: if p_commit = FND_API.G_TRUE then

20855: when OTHERS then
20856: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
20857: x_msg_count := 1;
20858: x_msg_data := SUBSTRB(SQLERRM,1,120);
20859: if p_commit = FND_API.G_TRUE then
20860: rollback to UPDATE_DELIVERABLE_PROGRESS;
20861: end if;
20862:
20863: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 20875: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

20871: -- Progress Management Changes. Bug # 3420093.
20872:
20873: PROCEDURE re_rollup_progress(
20874: p_api_version IN NUMBER :=1.0
20875: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
20876: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
20877: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
20878: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
20879: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 20876: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

20872:
20873: PROCEDURE re_rollup_progress(
20874: p_api_version IN NUMBER :=1.0
20875: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
20876: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
20877: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
20878: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
20879: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
20880: ,p_debug_mode IN VARCHAR2 :='N'

Line 20877: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

20873: PROCEDURE re_rollup_progress(
20874: p_api_version IN NUMBER :=1.0
20875: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
20876: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
20877: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
20878: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
20879: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
20880: ,p_debug_mode IN VARCHAR2 :='N'
20881: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 20878: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

20874: p_api_version IN NUMBER :=1.0
20875: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
20876: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
20877: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
20878: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
20879: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
20880: ,p_debug_mode IN VARCHAR2 :='N'
20881: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
20882: ,p_project_id IN NUMBER

Line 20957: IF (p_commit = FND_API.G_TRUE) THEN

20953: IF g1_debug_mode = 'Y' THEN
20954: pa_debug.debug('PA_PROGRESS_PUB.RE_ROLLUP_PROGRESS');
20955: END IF;
20956: END IF;
20957: IF (p_commit = FND_API.G_TRUE) THEN
20958: savepoint RE_ROLLUP_PROGRESS;
20959: END IF;
20960:
20961: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 20961: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

20957: IF (p_commit = FND_API.G_TRUE) THEN
20958: savepoint RE_ROLLUP_PROGRESS;
20959: END IF;
20960:
20961: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
20962: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
20963: END IF;
20964:
20965: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 20962: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

20958: savepoint RE_ROLLUP_PROGRESS;
20959: END IF;
20960:
20961: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
20962: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
20963: END IF;
20964:
20965: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
20966: FND_MSG_PUB.initialize;

Line 20965: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

20961: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
20962: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
20963: END IF;
20964:
20965: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
20966: FND_MSG_PUB.initialize;
20967: END IF;
20968:
20969: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 20969: x_return_status := FND_API.G_RET_STS_SUCCESS;

20965: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
20966: FND_MSG_PUB.initialize;
20967: END IF;
20968:
20969: x_return_status := FND_API.G_RET_STS_SUCCESS;
20970:
20971: -- Get as_of_date and task_wt_basis_code for the project.
20972:
20973: /* replacing with cur_task_weight

Line 21014: p_init_msg_list => FND_API.G_FALSE,

21010: -- Bug 3693757 : 13-Jul-04 PJI tmp1 table shd be populated so that rollup API can access actuals values in RE_ROLLUP_PROGRESS
21011: BEGIN
21012: l_base_struct_ver_id := pa_project_structure_utils.get_baseline_struct_ver(p_project_id);
21013: pa_progress_pub.populate_pji_tab_for_plan(
21014: p_init_msg_list => FND_API.G_FALSE,
21015: p_project_id => p_project_id,
21016: p_structure_version_id => p_structure_version_id,
21017: p_baselined_str_ver_id => l_base_struct_ver_id,
21018: p_structure_type => 'WORKPLAN',

Line 21029: RAISE FND_API.G_EXC_ERROR;

21025: WHEN OTHERS THEN
21026: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
21027: p_procedure_name => 'RE_ROLLUP_PROGRESS',
21028: p_error_text => SUBSTRB('PA_PROGRESS_PUB.populate_pji_tab_for_plan:'||SQLERRM,1,240));
21029: RAISE FND_API.G_EXC_ERROR;
21030: END;
21031:
21032:
21033: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

Line 21033: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

21029: RAISE FND_API.G_EXC_ERROR;
21030: END;
21031:
21032:
21033: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
21034: Raise FND_API.G_EXC_ERROR;
21035: END IF;
21036:
21037:

Line 21034: Raise FND_API.G_EXC_ERROR;

21030: END;
21031:
21032:
21033: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
21034: Raise FND_API.G_EXC_ERROR;
21035: END IF;
21036:
21037:
21038: OPEN cur_task_weight;

Line 21057: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

21053: ,x_return_status => l_return_status
21054: ,x_msg_count => l_msg_count
21055: ,x_msg_data => l_msg_data);
21056:
21057: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
21058: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
21059: p_msg_name => l_msg_data);
21060: x_msg_data := l_msg_data;
21061: x_return_status := 'E';

Line 21063: RAISE FND_API.G_EXC_ERROR;

21059: p_msg_name => l_msg_data);
21060: x_msg_data := l_msg_data;
21061: x_return_status := 'E';
21062: x_msg_count := l_msg_count;
21063: RAISE FND_API.G_EXC_ERROR;
21064: END IF;
21065: end if;
21066:
21067: IF (p_commit = FND_API.G_TRUE) THEN

Line 21067: IF (p_commit = FND_API.G_TRUE) THEN

21063: RAISE FND_API.G_EXC_ERROR;
21064: END IF;
21065: end if;
21066:
21067: IF (p_commit = FND_API.G_TRUE) THEN
21068: COMMIT;
21069: END IF;
21070: EXCEPTION
21071: when FND_API.G_EXC_ERROR then

Line 21071: when FND_API.G_EXC_ERROR then

21067: IF (p_commit = FND_API.G_TRUE) THEN
21068: COMMIT;
21069: END IF;
21070: EXCEPTION
21071: when FND_API.G_EXC_ERROR then
21072: if p_commit = FND_API.G_TRUE then
21073: rollback to RE_ROLLUP_PROGRESS;
21074: end if;
21075: x_return_status := FND_API.G_RET_STS_ERROR;

Line 21072: if p_commit = FND_API.G_TRUE then

21068: COMMIT;
21069: END IF;
21070: EXCEPTION
21071: when FND_API.G_EXC_ERROR then
21072: if p_commit = FND_API.G_TRUE then
21073: rollback to RE_ROLLUP_PROGRESS;
21074: end if;
21075: x_return_status := FND_API.G_RET_STS_ERROR;
21076: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 21075: x_return_status := FND_API.G_RET_STS_ERROR;

21071: when FND_API.G_EXC_ERROR then
21072: if p_commit = FND_API.G_TRUE then
21073: rollback to RE_ROLLUP_PROGRESS;
21074: end if;
21075: x_return_status := FND_API.G_RET_STS_ERROR;
21076: when FND_API.G_EXC_UNEXPECTED_ERROR then
21077: if p_commit = FND_API.G_TRUE then
21078: rollback to RE_ROLLUP_PROGRESS;
21079: end if;

Line 21076: when FND_API.G_EXC_UNEXPECTED_ERROR then

21072: if p_commit = FND_API.G_TRUE then
21073: rollback to RE_ROLLUP_PROGRESS;
21074: end if;
21075: x_return_status := FND_API.G_RET_STS_ERROR;
21076: when FND_API.G_EXC_UNEXPECTED_ERROR then
21077: if p_commit = FND_API.G_TRUE then
21078: rollback to RE_ROLLUP_PROGRESS;
21079: end if;
21080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 21077: if p_commit = FND_API.G_TRUE then

21073: rollback to RE_ROLLUP_PROGRESS;
21074: end if;
21075: x_return_status := FND_API.G_RET_STS_ERROR;
21076: when FND_API.G_EXC_UNEXPECTED_ERROR then
21077: if p_commit = FND_API.G_TRUE then
21078: rollback to RE_ROLLUP_PROGRESS;
21079: end if;
21080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21081: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 21080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

21076: when FND_API.G_EXC_UNEXPECTED_ERROR then
21077: if p_commit = FND_API.G_TRUE then
21078: rollback to RE_ROLLUP_PROGRESS;
21079: end if;
21080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21081: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
21082: p_procedure_name => 'RE_ROLLUP_PROGRESS',
21083: p_error_text => SUBSTRB(SQLERRM,1,120));
21084: when OTHERS then

Line 21085: if p_commit = FND_API.G_TRUE then

21081: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
21082: p_procedure_name => 'RE_ROLLUP_PROGRESS',
21083: p_error_text => SUBSTRB(SQLERRM,1,120));
21084: when OTHERS then
21085: if p_commit = FND_API.G_TRUE then
21086: rollback to RE_ROLLUP_PROGRESS;
21087: end if;
21088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21089: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 21088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

21084: when OTHERS then
21085: if p_commit = FND_API.G_TRUE then
21086: rollback to RE_ROLLUP_PROGRESS;
21087: end if;
21088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21089: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
21090: p_procedure_name => 'RE_ROLLUP_PROGRESS',
21091: p_error_text => SUBSTRB(SQLERRM,1,120));
21092: raise;

Line 21098: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

21094:
21095: -- Bug 3633293 : Added populate_bulk_pji_tab_for_plan
21096: PROCEDURE populate_bulk_pji_tab_for_plan(
21097: p_api_version IN NUMBER :=1.0
21098: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
21099: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21100: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21101: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21102: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 21099: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

21095: -- Bug 3633293 : Added populate_bulk_pji_tab_for_plan
21096: PROCEDURE populate_bulk_pji_tab_for_plan(
21097: p_api_version IN NUMBER :=1.0
21098: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
21099: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21100: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21101: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21102: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
21103: ,p_debug_mode IN VARCHAR2 :='N'

Line 21100: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

21096: PROCEDURE populate_bulk_pji_tab_for_plan(
21097: p_api_version IN NUMBER :=1.0
21098: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
21099: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21100: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21101: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21102: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
21103: ,p_debug_mode IN VARCHAR2 :='N'
21104: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 21101: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

21097: p_api_version IN NUMBER :=1.0
21098: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
21099: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21100: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21101: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21102: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
21103: ,p_debug_mode IN VARCHAR2 :='N'
21104: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
21105: ,p_person_id NUMBER

Line 21159: IF (p_commit = FND_API.G_TRUE) THEN

21155: pa_debug.debug('PA_PROGRESS_PUB.POPULATE_BULK_PJI_TAB_FOR_PLAN');
21156: END IF;
21157: END IF;
21158:
21159: IF (p_commit = FND_API.G_TRUE) THEN
21160: savepoint populate_bulk_pji_tab_for_plan;
21161: END IF;
21162:
21163: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 21163: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

21159: IF (p_commit = FND_API.G_TRUE) THEN
21160: savepoint populate_bulk_pji_tab_for_plan;
21161: END IF;
21162:
21163: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
21164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21165: END IF;
21166:
21167: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 21164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

21160: savepoint populate_bulk_pji_tab_for_plan;
21161: END IF;
21162:
21163: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
21164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21165: END IF;
21166:
21167: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
21168: FND_MSG_PUB.initialize;

Line 21167: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

21163: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
21164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21165: END IF;
21166:
21167: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
21168: FND_MSG_PUB.initialize;
21169: END IF;
21170:
21171: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 21171: x_return_status := FND_API.G_RET_STS_SUCCESS;

21167: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
21168: FND_MSG_PUB.initialize;
21169: END IF;
21170:
21171: x_return_status := FND_API.G_RET_STS_SUCCESS;
21172:
21173: FOR rec IN c_get_distinct_str_ver_id LOOP
21174: l_baseline_version_id := null;
21175: l_baseline_version_id := PA_PROJECT_STRUCTURE_UTILS.Get_Baseline_Struct_Ver(rec.project_id);

Line 21201: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

21197: p_base_struct_ver_id => l_baseline_version_id,
21198: x_return_status => l_return_status,
21199: x_msg_code => l_msg_data );
21200: */
21201: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
21202: x_msg_data := l_msg_data;
21203: x_return_status := 'E';
21204: x_msg_count := l_msg_count;
21205: RAISE FND_API.G_EXC_ERROR;

Line 21205: RAISE FND_API.G_EXC_ERROR;

21201: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
21202: x_msg_data := l_msg_data;
21203: x_return_status := 'E';
21204: x_msg_count := l_msg_count;
21205: RAISE FND_API.G_EXC_ERROR;
21206: END IF;
21207: END LOOP;
21208:
21209:

Line 21211: when FND_API.G_EXC_ERROR then

21207: END LOOP;
21208:
21209:
21210: EXCEPTION
21211: when FND_API.G_EXC_ERROR then
21212: if p_commit = FND_API.G_TRUE then
21213: rollback to populate_bulk_pji_tab_for_plan;
21214: end if;
21215: x_return_status := FND_API.G_RET_STS_ERROR;

Line 21212: if p_commit = FND_API.G_TRUE then

21208:
21209:
21210: EXCEPTION
21211: when FND_API.G_EXC_ERROR then
21212: if p_commit = FND_API.G_TRUE then
21213: rollback to populate_bulk_pji_tab_for_plan;
21214: end if;
21215: x_return_status := FND_API.G_RET_STS_ERROR;
21216: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 21215: x_return_status := FND_API.G_RET_STS_ERROR;

21211: when FND_API.G_EXC_ERROR then
21212: if p_commit = FND_API.G_TRUE then
21213: rollback to populate_bulk_pji_tab_for_plan;
21214: end if;
21215: x_return_status := FND_API.G_RET_STS_ERROR;
21216: when FND_API.G_EXC_UNEXPECTED_ERROR then
21217: if p_commit = FND_API.G_TRUE then
21218: rollback to populate_bulk_pji_tab_for_plan;
21219: end if;

Line 21216: when FND_API.G_EXC_UNEXPECTED_ERROR then

21212: if p_commit = FND_API.G_TRUE then
21213: rollback to populate_bulk_pji_tab_for_plan;
21214: end if;
21215: x_return_status := FND_API.G_RET_STS_ERROR;
21216: when FND_API.G_EXC_UNEXPECTED_ERROR then
21217: if p_commit = FND_API.G_TRUE then
21218: rollback to populate_bulk_pji_tab_for_plan;
21219: end if;
21220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 21217: if p_commit = FND_API.G_TRUE then

21213: rollback to populate_bulk_pji_tab_for_plan;
21214: end if;
21215: x_return_status := FND_API.G_RET_STS_ERROR;
21216: when FND_API.G_EXC_UNEXPECTED_ERROR then
21217: if p_commit = FND_API.G_TRUE then
21218: rollback to populate_bulk_pji_tab_for_plan;
21219: end if;
21220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21221: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 21220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

21216: when FND_API.G_EXC_UNEXPECTED_ERROR then
21217: if p_commit = FND_API.G_TRUE then
21218: rollback to populate_bulk_pji_tab_for_plan;
21219: end if;
21220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21221: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
21222: p_procedure_name => 'POPULATE_BULK_PJI_TAB_FOR_PLAN',
21223: p_error_text => SUBSTRB(SQLERRM,1,120));
21224: when OTHERS then

Line 21225: if p_commit = FND_API.G_TRUE then

21221: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
21222: p_procedure_name => 'POPULATE_BULK_PJI_TAB_FOR_PLAN',
21223: p_error_text => SUBSTRB(SQLERRM,1,120));
21224: when OTHERS then
21225: if p_commit = FND_API.G_TRUE then
21226: rollback to populate_bulk_pji_tab_for_plan;
21227: end if;
21228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21229: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 21228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

21224: when OTHERS then
21225: if p_commit = FND_API.G_TRUE then
21226: rollback to populate_bulk_pji_tab_for_plan;
21227: end if;
21228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21229: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
21230: p_procedure_name => 'POPULATE_BULK_PJI_TAB_FOR_PLAN',
21231: p_error_text => SUBSTRB(SQLERRM,1,120));
21232: raise;

Line 21250: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false

21246: -- End of comments
21247:
21248: PROCEDURE ASGN_DLV_TO_TASK_ROLLUP_PVT(
21249: p_api_version IN NUMBER :=1.0
21250: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
21251: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21252: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21253: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21254: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 21251: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

21247:
21248: PROCEDURE ASGN_DLV_TO_TASK_ROLLUP_PVT(
21249: p_api_version IN NUMBER :=1.0
21250: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
21251: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21252: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21253: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21254: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
21255: ,p_debug_mode IN VARCHAR2 :='N'

Line 21252: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

21248: PROCEDURE ASGN_DLV_TO_TASK_ROLLUP_PVT(
21249: p_api_version IN NUMBER :=1.0
21250: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
21251: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21252: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21253: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21254: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
21255: ,p_debug_mode IN VARCHAR2 :='N'
21256: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 21253: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

21249: p_api_version IN NUMBER :=1.0
21250: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
21251: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21252: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21253: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21254: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
21255: ,p_debug_mode IN VARCHAR2 :='N'
21256: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
21257: ,p_project_id IN NUMBER

Line 21310: IF (p_commit = FND_API.G_TRUE) THEN

21306: IF p_structure_version_id IS NULL THEN
21307: return;
21308: END IF;
21309:
21310: IF (p_commit = FND_API.G_TRUE) THEN
21311: savepoint ASGN_DLV_TO_TASK_ROLLUP_PVT;
21312: END IF;
21313:
21314: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 21314: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

21310: IF (p_commit = FND_API.G_TRUE) THEN
21311: savepoint ASGN_DLV_TO_TASK_ROLLUP_PVT;
21312: END IF;
21313:
21314: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
21315: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21316: END IF;
21317:
21318: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 21315: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

21311: savepoint ASGN_DLV_TO_TASK_ROLLUP_PVT;
21312: END IF;
21313:
21314: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
21315: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21316: END IF;
21317:
21318: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
21319: FND_MSG_PUB.initialize;

Line 21318: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

21314: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
21315: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21316: END IF;
21317:
21318: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
21319: FND_MSG_PUB.initialize;
21320: END IF;
21321:
21322: -- Bug # 3879910. Call corresponding API in package: PA_PROGRESS_PVT.

Line 21343: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

21339: ,x_return_status => l_return_status
21340: ,x_msg_count => l_msg_count
21341: ,x_msg_data => l_msg_data);
21342:
21343: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
21344: x_msg_data := l_msg_data;
21345: x_return_status := 'E';
21346: x_msg_count := l_msg_count;
21347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 21347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

21343: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
21344: x_msg_data := l_msg_data;
21345: x_return_status := 'E';
21346: x_msg_count := l_msg_count;
21347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21348: END IF;
21349:
21350: x_return_status := FND_API.G_RET_STS_SUCCESS;
21351:

Line 21350: x_return_status := FND_API.G_RET_STS_SUCCESS;

21346: x_msg_count := l_msg_count;
21347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21348: END IF;
21349:
21350: x_return_status := FND_API.G_RET_STS_SUCCESS;
21351:
21352: IF (p_commit = FND_API.G_TRUE) THEN
21353: COMMIT;
21354: END IF;

Line 21352: IF (p_commit = FND_API.G_TRUE) THEN

21348: END IF;
21349:
21350: x_return_status := FND_API.G_RET_STS_SUCCESS;
21351:
21352: IF (p_commit = FND_API.G_TRUE) THEN
21353: COMMIT;
21354: END IF;
21355:
21356:

Line 21362: WHEN FND_API.G_EXC_ERROR THEN

21358: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.ASGN_DLV_TO_TASK_ROLLUP_PVT', x_Msg => 'PA_PROGRESS_PUB.ASGN_DLV_TO_TASK_ROLLUP_PVT END', x_Log_Level=> 3);
21359: END IF;
21360:
21361: EXCEPTION
21362: WHEN FND_API.G_EXC_ERROR THEN
21363: IF p_commit = FND_API.G_TRUE THEN
21364: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT;
21365: END IF;
21366: x_return_status := FND_API.G_RET_STS_ERROR;

Line 21363: IF p_commit = FND_API.G_TRUE THEN

21359: END IF;
21360:
21361: EXCEPTION
21362: WHEN FND_API.G_EXC_ERROR THEN
21363: IF p_commit = FND_API.G_TRUE THEN
21364: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT;
21365: END IF;
21366: x_return_status := FND_API.G_RET_STS_ERROR;
21367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 21366: x_return_status := FND_API.G_RET_STS_ERROR;

21362: WHEN FND_API.G_EXC_ERROR THEN
21363: IF p_commit = FND_API.G_TRUE THEN
21364: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT;
21365: END IF;
21366: x_return_status := FND_API.G_RET_STS_ERROR;
21367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
21368: IF p_commit = FND_API.G_TRUE THEN
21369: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT;
21370: END IF;

Line 21367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

21363: IF p_commit = FND_API.G_TRUE THEN
21364: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT;
21365: END IF;
21366: x_return_status := FND_API.G_RET_STS_ERROR;
21367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
21368: IF p_commit = FND_API.G_TRUE THEN
21369: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT;
21370: END IF;
21371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 21368: IF p_commit = FND_API.G_TRUE THEN

21364: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT;
21365: END IF;
21366: x_return_status := FND_API.G_RET_STS_ERROR;
21367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
21368: IF p_commit = FND_API.G_TRUE THEN
21369: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT;
21370: END IF;
21371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21372: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 21371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

21367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
21368: IF p_commit = FND_API.G_TRUE THEN
21369: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT;
21370: END IF;
21371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21372: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
21373: p_procedure_name => 'ASGN_DLV_TO_TASK_ROLLUP_PVT',
21374: p_error_text => SUBSTRB(SQLERRM,1,120));
21375: WHEN OTHERS THEN

Line 21376: IF p_commit = FND_API.G_TRUE THEN

21372: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
21373: p_procedure_name => 'ASGN_DLV_TO_TASK_ROLLUP_PVT',
21374: p_error_text => SUBSTRB(SQLERRM,1,120));
21375: WHEN OTHERS THEN
21376: IF p_commit = FND_API.G_TRUE THEN
21377: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT;
21378: END IF;
21379: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21380: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 21379: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

21375: WHEN OTHERS THEN
21376: IF p_commit = FND_API.G_TRUE THEN
21377: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT;
21378: END IF;
21379: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
21380: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
21381: p_procedure_name => 'ASGN_DLV_TO_TASK_ROLLUP_PVT',
21382: p_error_text => SUBSTRB(SQLERRM,1,120));
21383: raise;

Line 21400: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- FALSE for private API.

21396: -- End of comments
21397:
21398: PROCEDURE COPY_PROGRESS_ACT_ETC(
21399: p_api_version IN NUMBER :=1.0
21400: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- FALSE for private API.
21401: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21402: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21403: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21404: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 21401: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

21397:
21398: PROCEDURE COPY_PROGRESS_ACT_ETC(
21399: p_api_version IN NUMBER :=1.0
21400: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- FALSE for private API.
21401: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21402: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21403: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21404: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
21405: ,p_debug_mode IN VARCHAR2 :='N'

Line 21402: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

21398: PROCEDURE COPY_PROGRESS_ACT_ETC(
21399: p_api_version IN NUMBER :=1.0
21400: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- FALSE for private API.
21401: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21402: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21403: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21404: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
21405: ,p_debug_mode IN VARCHAR2 :='N'
21406: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 21403: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

21399: p_api_version IN NUMBER :=1.0
21400: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- FALSE for private API.
21401: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
21402: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
21403: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
21404: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
21405: ,p_debug_mode IN VARCHAR2 :='N'
21406: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
21407: ,p_project_id IN NUMBER

Line 21608: IF (p_commit = FND_API.G_TRUE) THEN

21604: IF g1_debug_mode = 'Y' THEN
21605: pa_debug.init_err_stack ('PA_PROGRESS_PUB.COPY_PROGRESS_ACT_ETC');
21606: END IF;
21607:
21608: IF (p_commit = FND_API.G_TRUE) THEN
21609: savepoint COPY_PROGRESS_ACT_ETC;
21610: END IF;
21611:
21612: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 21612: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

21608: IF (p_commit = FND_API.G_TRUE) THEN
21609: savepoint COPY_PROGRESS_ACT_ETC;
21610: END IF;
21611:
21612: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
21613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21614: END IF;
21615:
21616: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 21613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

21609: savepoint COPY_PROGRESS_ACT_ETC;
21610: END IF;
21611:
21612: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
21613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21614: END IF;
21615:
21616: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
21617: FND_MSG_PUB.initialize;

Line 21616: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

21612: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
21613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21614: END IF;
21615:
21616: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
21617: FND_MSG_PUB.initialize;
21618: END IF;
21619:
21620: IF g1_debug_mode = 'Y' THEN

Line 21633: x_return_status := FND_API.G_RET_STS_SUCCESS;

21629: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.COPY_PROGRESS_ACT_ETC', x_Msg => 'p_copy_ETC_flag='||p_copy_ETC_flag, x_Log_Level=> 3);
21630: END IF;
21631:
21632:
21633: x_return_status := FND_API.G_RET_STS_SUCCESS;
21634: l_calling_context := p_calling_context;
21635: -- code to make sure don't execute this procedure for first time publish structure
21636: if (l_calling_context = 'PUBLISH') then
21637: OPEN cur_Summerized_Actuals;

Line 22296: RAISE FND_API.G_EXC_ERROR;

22292: WHEN OTHERS THEN
22293: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
22294: p_procedure_name => 'COPY_PROGRESS_ACT_ETC',
22295: p_error_text => SUBSTRB('Call PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE:'||SQLERRM,1,120));
22296: RAISE FND_API.G_EXC_ERROR;
22297: END;
22298:
22299: -- populate_workplan_data is not called as it is called from page itself.
22300: end if;

Line 22303: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

22299: -- populate_workplan_data is not called as it is called from page itself.
22300: end if;
22301:
22302:
22303: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
22304: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
22305: p_msg_name => l_msg_data);
22306: x_msg_data := l_msg_data;
22307: x_return_status := 'E';

Line 22309: RAISE FND_API.G_EXC_ERROR;

22305: p_msg_name => l_msg_data);
22306: x_msg_data := l_msg_data;
22307: x_return_status := 'E';
22308: x_msg_count := l_msg_count;
22309: RAISE FND_API.G_EXC_ERROR;
22310: END IF;
22311: /***********
22312: -- here we need to make ETC as null on assignment records
22313: if (l_calling_context = 'PUBLISH') then

Line 22344: IF (p_commit = FND_API.G_TRUE) THEN

22340: and structure_type = 'WORKPLAN'
22341: and current_flag = 'Y';
22342: end if;
22343: ************/
22344: IF (p_commit = FND_API.G_TRUE) THEN
22345: COMMIT;
22346: END IF;
22347:
22348: EXCEPTION

Line 22350: when FND_API.G_EXC_ERROR then

22346: END IF;
22347:
22348: EXCEPTION
22349:
22350: when FND_API.G_EXC_ERROR then
22351: if p_commit = FND_API.G_TRUE then
22352: rollback to COPY_PROGRESS_ACT_ETC;
22353: end if;
22354: x_return_status := FND_API.G_RET_STS_ERROR;

Line 22351: if p_commit = FND_API.G_TRUE then

22347:
22348: EXCEPTION
22349:
22350: when FND_API.G_EXC_ERROR then
22351: if p_commit = FND_API.G_TRUE then
22352: rollback to COPY_PROGRESS_ACT_ETC;
22353: end if;
22354: x_return_status := FND_API.G_RET_STS_ERROR;
22355:

Line 22354: x_return_status := FND_API.G_RET_STS_ERROR;

22350: when FND_API.G_EXC_ERROR then
22351: if p_commit = FND_API.G_TRUE then
22352: rollback to COPY_PROGRESS_ACT_ETC;
22353: end if;
22354: x_return_status := FND_API.G_RET_STS_ERROR;
22355:
22356: when FND_API.G_EXC_UNEXPECTED_ERROR then
22357: if p_commit = FND_API.G_TRUE then
22358: rollback to COPY_PROGRESS_ACT_ETC;

Line 22356: when FND_API.G_EXC_UNEXPECTED_ERROR then

22352: rollback to COPY_PROGRESS_ACT_ETC;
22353: end if;
22354: x_return_status := FND_API.G_RET_STS_ERROR;
22355:
22356: when FND_API.G_EXC_UNEXPECTED_ERROR then
22357: if p_commit = FND_API.G_TRUE then
22358: rollback to COPY_PROGRESS_ACT_ETC;
22359: end if;
22360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 22357: if p_commit = FND_API.G_TRUE then

22353: end if;
22354: x_return_status := FND_API.G_RET_STS_ERROR;
22355:
22356: when FND_API.G_EXC_UNEXPECTED_ERROR then
22357: if p_commit = FND_API.G_TRUE then
22358: rollback to COPY_PROGRESS_ACT_ETC;
22359: end if;
22360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
22361: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 22360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

22356: when FND_API.G_EXC_UNEXPECTED_ERROR then
22357: if p_commit = FND_API.G_TRUE then
22358: rollback to COPY_PROGRESS_ACT_ETC;
22359: end if;
22360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
22361: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
22362: p_procedure_name => 'COPY_PROGRESS_ACT_ETC',
22363: p_error_text => SUBSTRB(SQLERRM,1,120));
22364: when OTHERS then

Line 22365: if p_commit = FND_API.G_TRUE then

22361: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
22362: p_procedure_name => 'COPY_PROGRESS_ACT_ETC',
22363: p_error_text => SUBSTRB(SQLERRM,1,120));
22364: when OTHERS then
22365: if p_commit = FND_API.G_TRUE then
22366: rollback to COPY_PROGRESS_ACT_ETC;
22367: end if;
22368: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
22369: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 22368: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

22364: when OTHERS then
22365: if p_commit = FND_API.G_TRUE then
22366: rollback to COPY_PROGRESS_ACT_ETC;
22367: end if;
22368: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
22369: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
22370: p_procedure_name => 'COPY_PROGRESS_ACT_ETC',
22371: p_error_text => SUBSTRB(SQLERRM,1,120));
22372: raise;

Line 22381: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

22377:
22378: -- Bug 3807299 : new API which will be called from update_progress and AMG pa_status_pub.update_progress
22379: PROCEDURE update_link_proj_rollup_dates(
22380: p_api_version IN NUMBER :=1.0
22381: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
22382: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
22383: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
22384: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
22385: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 22382: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

22378: -- Bug 3807299 : new API which will be called from update_progress and AMG pa_status_pub.update_progress
22379: PROCEDURE update_link_proj_rollup_dates(
22380: p_api_version IN NUMBER :=1.0
22381: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
22382: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
22383: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
22384: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
22385: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
22386: ,p_project_id IN NUMBER

Line 22383: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

22379: PROCEDURE update_link_proj_rollup_dates(
22380: p_api_version IN NUMBER :=1.0
22381: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
22382: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
22383: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
22384: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
22385: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
22386: ,p_project_id IN NUMBER
22387: ,p_task_id IN NUMBER

Line 22384: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

22380: p_api_version IN NUMBER :=1.0
22381: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
22382: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
22383: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
22384: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
22385: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
22386: ,p_project_id IN NUMBER
22387: ,p_task_id IN NUMBER
22388: ,p_task_version_id IN NUMBER

Line 22473: IF (p_commit = FND_API.G_TRUE) THEN

22469: IF g1_debug_mode = 'Y' THEN
22470: pa_debug.init_err_stack ('PA_PROGRESS_PUB.UPDATE_LINK_PROJ_ROLLUP_DATES');
22471: END IF;
22472:
22473: IF (p_commit = FND_API.G_TRUE) THEN
22474: savepoint UPDATE_LINK_PROJ_ROLLUP_DATES;
22475: END IF;
22476:
22477: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 22477: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

22473: IF (p_commit = FND_API.G_TRUE) THEN
22474: savepoint UPDATE_LINK_PROJ_ROLLUP_DATES;
22475: END IF;
22476:
22477: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
22478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
22479: END IF;
22480:
22481: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 22478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

22474: savepoint UPDATE_LINK_PROJ_ROLLUP_DATES;
22475: END IF;
22476:
22477: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
22478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
22479: END IF;
22480:
22481: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
22482: FND_MSG_PUB.initialize;

Line 22481: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

22477: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
22478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
22479: END IF;
22480:
22481: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
22482: FND_MSG_PUB.initialize;
22483: END IF;
22484:
22485: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 22485: x_return_status := FND_API.G_RET_STS_SUCCESS;

22481: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
22482: FND_MSG_PUB.initialize;
22483: END IF;
22484:
22485: x_return_status := FND_API.G_RET_STS_SUCCESS;
22486:
22487: OPEN c_get_min_max_dates(p_project_id, p_task_id, p_task_version_id, p_structure_version_id, p_as_of_date);
22488: FETCH c_get_min_max_dates INTO l_min_act_st_date, l_max_act_fin_date, l_min_est_st_date, l_max_est_fin_date;
22489: CLOSE c_get_min_max_dates;

Line 22526: IF (p_commit = FND_API.G_TRUE) THEN

22522: and element_version_id = p_task_version_id
22523: and proj_element_id = p_task_id;
22524: END IF;
22525:
22526: IF (p_commit = FND_API.G_TRUE) THEN
22527: COMMIT;
22528: END IF;
22529:
22530:

Line 22532: when FND_API.G_EXC_ERROR then

22528: END IF;
22529:
22530:
22531: EXCEPTION
22532: when FND_API.G_EXC_ERROR then
22533: if p_commit = FND_API.G_TRUE then
22534: rollback to UPDATE_LINK_PROJ_ROLLUP_DATES;
22535: end if;
22536: x_return_status := FND_API.G_RET_STS_ERROR;

Line 22533: if p_commit = FND_API.G_TRUE then

22529:
22530:
22531: EXCEPTION
22532: when FND_API.G_EXC_ERROR then
22533: if p_commit = FND_API.G_TRUE then
22534: rollback to UPDATE_LINK_PROJ_ROLLUP_DATES;
22535: end if;
22536: x_return_status := FND_API.G_RET_STS_ERROR;
22537: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 22536: x_return_status := FND_API.G_RET_STS_ERROR;

22532: when FND_API.G_EXC_ERROR then
22533: if p_commit = FND_API.G_TRUE then
22534: rollback to UPDATE_LINK_PROJ_ROLLUP_DATES;
22535: end if;
22536: x_return_status := FND_API.G_RET_STS_ERROR;
22537: when FND_API.G_EXC_UNEXPECTED_ERROR then
22538: if p_commit = FND_API.G_TRUE then
22539: rollback to UPDATE_LINK_PROJ_ROLLUP_DATES;
22540: end if;

Line 22537: when FND_API.G_EXC_UNEXPECTED_ERROR then

22533: if p_commit = FND_API.G_TRUE then
22534: rollback to UPDATE_LINK_PROJ_ROLLUP_DATES;
22535: end if;
22536: x_return_status := FND_API.G_RET_STS_ERROR;
22537: when FND_API.G_EXC_UNEXPECTED_ERROR then
22538: if p_commit = FND_API.G_TRUE then
22539: rollback to UPDATE_LINK_PROJ_ROLLUP_DATES;
22540: end if;
22541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 22538: if p_commit = FND_API.G_TRUE then

22534: rollback to UPDATE_LINK_PROJ_ROLLUP_DATES;
22535: end if;
22536: x_return_status := FND_API.G_RET_STS_ERROR;
22537: when FND_API.G_EXC_UNEXPECTED_ERROR then
22538: if p_commit = FND_API.G_TRUE then
22539: rollback to UPDATE_LINK_PROJ_ROLLUP_DATES;
22540: end if;
22541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
22542: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 22541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

22537: when FND_API.G_EXC_UNEXPECTED_ERROR then
22538: if p_commit = FND_API.G_TRUE then
22539: rollback to UPDATE_LINK_PROJ_ROLLUP_DATES;
22540: end if;
22541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
22542: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
22543: p_procedure_name => 'UPDATE_LINK_PROJ_ROLLUP_DATES',
22544: p_error_text => SUBSTRB(SQLERRM,1,120));
22545: when OTHERS then

Line 22546: if p_commit = FND_API.G_TRUE then

22542: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
22543: p_procedure_name => 'UPDATE_LINK_PROJ_ROLLUP_DATES',
22544: p_error_text => SUBSTRB(SQLERRM,1,120));
22545: when OTHERS then
22546: if p_commit = FND_API.G_TRUE then
22547: rollback to UPDATE_LINK_PROJ_ROLLUP_DATES;
22548: end if;
22549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
22550: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 22549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

22545: when OTHERS then
22546: if p_commit = FND_API.G_TRUE then
22547: rollback to UPDATE_LINK_PROJ_ROLLUP_DATES;
22548: end if;
22549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
22550: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
22551: p_procedure_name => 'UPDATE_LINK_PROJ_ROLLUP_DATES',
22552: p_error_text => SUBSTRB(SQLERRM,1,120));
22553: raise;

Line 22558: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

22554: END update_link_proj_rollup_dates;
22555:
22556: PROCEDURE UPDATE_PROGRESS_BULK(
22557: p_api_version IN NUMBER :=1.0
22558: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
22559: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
22560: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
22561: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
22562: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 22559: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

22555:
22556: PROCEDURE UPDATE_PROGRESS_BULK(
22557: p_api_version IN NUMBER :=1.0
22558: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
22559: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
22560: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
22561: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
22562: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
22563: ,p_calling_mode IN VARCHAR2 := null

Line 22560: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

22556: PROCEDURE UPDATE_PROGRESS_BULK(
22557: p_api_version IN NUMBER :=1.0
22558: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
22559: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
22560: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
22561: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
22562: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
22563: ,p_calling_mode IN VARCHAR2 := null
22564: ,p_debug_mode IN VARCHAR2 :='N'

Line 22561: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

22557: p_api_version IN NUMBER :=1.0
22558: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
22559: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
22560: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
22561: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
22562: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
22563: ,p_calling_mode IN VARCHAR2 := null
22564: ,p_debug_mode IN VARCHAR2 :='N'
22565: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 22739: --IF (p_commit = FND_API.G_TRUE) THEN

22735: IF g1_debug_mode = 'Y' THEN
22736: pa_debug.init_err_stack ('PA_PROGRESS_PUB.UPDATE_PROGRESS_BULK');
22737: END IF;
22738:
22739: --IF (p_commit = FND_API.G_TRUE) THEN
22740: savepoint UPDATE_PROGRESS_BULK;
22741: --END IF;
22742:
22743: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 22743: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

22739: --IF (p_commit = FND_API.G_TRUE) THEN
22740: savepoint UPDATE_PROGRESS_BULK;
22741: --END IF;
22742:
22743: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
22744: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
22745: END IF;
22746:
22747: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 22744: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

22740: savepoint UPDATE_PROGRESS_BULK;
22741: --END IF;
22742:
22743: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
22744: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
22745: END IF;
22746:
22747: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
22748: FND_MSG_PUB.initialize;

Line 22747: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

22743: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
22744: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
22745: END IF;
22746:
22747: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
22748: FND_MSG_PUB.initialize;
22749: END IF;
22750:
22751: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 22751: x_return_status := FND_API.G_RET_STS_SUCCESS;

22747: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
22748: FND_MSG_PUB.initialize;
22749: END IF;
22750:
22751: x_return_status := FND_API.G_RET_STS_SUCCESS;
22752:
22753: l_record_count := p_project_id_tbl.COUNT;
22754:
22755: IF g1_debug_mode = 'Y' THEN

Line 22836: x_return_status := FND_API.G_RET_STS_ERROR;

22832:
22833: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
22834: ,p_msg_name => 'PA_INV_PARAM_PASSED');
22835: x_msg_data := 'PA_INV_PARAM_PASSED';
22836: x_return_status := FND_API.G_RET_STS_ERROR;
22837: RAISE FND_API.G_EXC_ERROR;
22838: END IF;
22839:
22840:

Line 22837: RAISE FND_API.G_EXC_ERROR;

22833: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
22834: ,p_msg_name => 'PA_INV_PARAM_PASSED');
22835: x_msg_data := 'PA_INV_PARAM_PASSED';
22836: x_return_status := FND_API.G_RET_STS_ERROR;
22837: RAISE FND_API.G_EXC_ERROR;
22838: END IF;
22839:
22840:
22841: l_action := p_action;

Line 22899: if l_return_status <> FND_API.G_RET_STS_SUCCESS then

22895: ,x_msg_count => l_msg_count
22896: ,x_msg_data => l_msg_data);
22897:
22898:
22899: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
22900:
22901: x_msg_data := l_msg_data;
22902: x_return_status := 'E';
22903: x_msg_count := l_msg_count;

Line 22905: raise FND_API.G_EXC_ERROR;

22901: x_msg_data := l_msg_data;
22902: x_return_status := 'E';
22903: x_msg_count := l_msg_count;
22904:
22905: raise FND_API.G_EXC_ERROR;
22906:
22907: end if;
22908:
22909: open l_cur_publish(l_request_id);

Line 22925: x_return_status := FND_API.G_RET_STS_ERROR;

22921: ,p_msg_name => 'PA_PS_PUBLISH_NO_PROG');
22922:
22923: x_msg_data := 'PA_PS_PUBLISH_NO_PROG';
22924:
22925: x_return_status := FND_API.G_RET_STS_ERROR;
22926:
22927: raise FND_API.G_EXC_ERROR;
22928:
22929: elsif ((l_rec_publish.process = 'CONC_UPDATE')

Line 22927: raise FND_API.G_EXC_ERROR;

22923: x_msg_data := 'PA_PS_PUBLISH_NO_PROG';
22924:
22925: x_return_status := FND_API.G_RET_STS_ERROR;
22926:
22927: raise FND_API.G_EXC_ERROR;
22928:
22929: elsif ((l_rec_publish.process = 'CONC_UPDATE')
22930: and (l_process_code = 'WUP')
22931: and (l_wp_ver_enabled_flag = 'N')) then

Line 22938: x_return_status := FND_API.G_RET_STS_ERROR;

22934: ,p_msg_name => 'PA_PS_UPDATE_NO_PROG');
22935:
22936: x_msg_data := 'PA_PS_UPDATE_NO_PROG';
22937:
22938: x_return_status := FND_API.G_RET_STS_ERROR;
22939:
22940: raise FND_API.G_EXC_ERROR;
22941:
22942: elsif ((l_rec_publish.process = 'APPLY_PROGRESS')

Line 22940: raise FND_API.G_EXC_ERROR;

22936: x_msg_data := 'PA_PS_UPDATE_NO_PROG';
22937:
22938: x_return_status := FND_API.G_RET_STS_ERROR;
22939:
22940: raise FND_API.G_EXC_ERROR;
22941:
22942: elsif ((l_rec_publish.process = 'APPLY_PROGRESS')
22943: and (l_process_code = 'WUP')
22944: and (l_wp_ver_enabled_flag = 'N')) then

Line 22951: x_return_status := FND_API.G_RET_STS_ERROR;

22947: ,p_msg_name => 'PA_PS_APLPRG_NO_PROG');
22948:
22949: x_msg_data := 'PA_PS_APLPRG_NO_PROG';
22950:
22951: x_return_status := FND_API.G_RET_STS_ERROR;
22952:
22953: raise FND_API.G_EXC_ERROR;
22954:
22955: end if;

Line 22953: raise FND_API.G_EXC_ERROR;

22949: x_msg_data := 'PA_PS_APLPRG_NO_PROG';
22950:
22951: x_return_status := FND_API.G_RET_STS_ERROR;
22952:
22953: raise FND_API.G_EXC_ERROR;
22954:
22955: end if;
22956:
22957: -- End fix for Bug # 4524977.

Line 22964: x_return_status := FND_API.G_RET_STS_ERROR;

22960: IF (p_object_type_tbl(i) IS NULL OR p_object_id_tbl(i) IS NULL OR p_as_of_date_tbl(i) IS NULL ) THEN
22961: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
22962: ,p_msg_name => 'PA_INV_PARAM_PASSED');
22963: x_msg_data := 'PA_INV_PARAM_PASSED';
22964: x_return_status := FND_API.G_RET_STS_ERROR;
22965: RAISE FND_API.G_EXC_ERROR;
22966: END IF;
22967:
22968: IF l_last_project_id <> p_project_id_tbl(i) THEN

Line 22965: RAISE FND_API.G_EXC_ERROR;

22961: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
22962: ,p_msg_name => 'PA_INV_PARAM_PASSED');
22963: x_msg_data := 'PA_INV_PARAM_PASSED';
22964: x_return_status := FND_API.G_RET_STS_ERROR;
22965: RAISE FND_API.G_EXC_ERROR;
22966: END IF;
22967:
22968: IF l_last_project_id <> p_project_id_tbl(i) THEN
22969: l_last_project_id := p_project_id_tbl(i);

Line 23015: x_return_status := FND_API.G_RET_STS_ERROR;

23011: IF (l_flag = 'Y') THEN
23012: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
23013: ,p_msg_name => 'PA_TEMPL_PROGRESS_NOT_ALLOWED');
23014: x_msg_data := 'PA_TEMPL_PROGRESS_NOT_ALLOWED';
23015: x_return_status := FND_API.G_RET_STS_ERROR;
23016: RAISE FND_API.G_EXC_ERROR;
23017: END IF;
23018: END IF;
23019:

Line 23016: RAISE FND_API.G_EXC_ERROR;

23012: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
23013: ,p_msg_name => 'PA_TEMPL_PROGRESS_NOT_ALLOWED');
23014: x_msg_data := 'PA_TEMPL_PROGRESS_NOT_ALLOWED';
23015: x_return_status := FND_API.G_RET_STS_ERROR;
23016: RAISE FND_API.G_EXC_ERROR;
23017: END IF;
23018: END IF;
23019:
23020: IF p_structure_type = 'WORKPLAN' THEN -- bug 7225884

Line 23225: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

23221: IF g1_debug_mode = 'Y' THEN
23222: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS_BULK', x_Msg => 'After individual APIs are called l_return_status='||l_return_status, x_Log_Level=> 3);
23223: END IF;
23224:
23225: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23226: x_msg_data := l_msg_data;
23227: x_return_status := 'E';
23228: x_msg_count := l_msg_count;
23229: RAISE FND_API.G_EXC_ERROR;

Line 23229: RAISE FND_API.G_EXC_ERROR;

23225: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23226: x_msg_data := l_msg_data;
23227: x_return_status := 'E';
23228: x_msg_count := l_msg_count;
23229: RAISE FND_API.G_EXC_ERROR;
23230: END IF;
23231:
23232: l_task_version_id_tbl.extend(1);
23233: l_object_type_tbl.extend(1);

Line 23372: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

23368: IF g1_debug_mode = 'Y' THEN
23369: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS_BULK', x_Msg => 'After Calling ASGN_DLV_TO_TASK_ROLLUP_PVT l_return_status='||l_return_status, x_Log_Level=> 3);
23370: END IF;
23371:
23372: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23373: x_msg_data := l_msg_data;
23374: x_return_status := 'E';
23375: x_msg_count := l_msg_count;
23376: RAISE FND_API.G_EXC_ERROR;

Line 23376: RAISE FND_API.G_EXC_ERROR;

23372: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23373: x_msg_data := l_msg_data;
23374: x_return_status := 'E';
23375: x_msg_count := l_msg_count;
23376: RAISE FND_API.G_EXC_ERROR;
23377: END IF;
23378: END IF;
23379: IF l_action = 'PUBLISH' AND l_split_workplan = 'Y' AND l_budget_call_required_tbl(i) = 'Y' AND p_structure_type = 'WORKPLAN'
23380: -- Removed for Bug 4416432 Issue 11 : AND p_object_type_tbl(i) <> 'PA_DELIVERABLES' -- Bug 4370820 : Added <> DELIVERABLES

Line 23440: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

23436: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS_BULK', x_Msg => 'After Calling MAINTAIN_ACTUAL_AMT_WRP l_return_status='||l_return_status, x_Log_Level=> 3);
23437: END IF;
23438:
23439:
23440: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23441: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
23442: p_msg_name => l_msg_data);
23443: x_msg_data := l_msg_data;
23444: x_return_status := 'E';

Line 23446: RAISE FND_API.G_EXC_ERROR;

23442: p_msg_name => l_msg_data);
23443: x_msg_data := l_msg_data;
23444: x_return_status := 'E';
23445: x_msg_count := l_msg_count;
23446: RAISE FND_API.G_EXC_ERROR;
23447: END IF;
23448: Pa_Task_Pub1.G_CALL_PJI_ROLLUP := null ;
23449: delete from PA_PROG_ACT_BY_PERIOD_TEMP where project_id = p_project_id_tbl(i) AND structure_version_id = l_structure_version_id_tbl(i);
23450: EXCEPTION

Line 23455: RAISE FND_API.G_EXC_ERROR;

23451: WHEN OTHERS THEN
23452: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
23453: p_procedure_name => 'UPDATE_PROGRESS_BULK',
23454: p_error_text => SUBSTRB('PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP:'||SQLERRM,1,120));
23455: RAISE FND_API.G_EXC_ERROR;
23456: END;
23457: END IF; --l_check
23458: END IF;
23459: IF l_action = 'PUBLISH' AND l_budget_call_required_tbl(i) = 'Y' AND p_structure_type = 'WORKPLAN' THEN

Line 23487: RAISE FND_API.G_EXC_ERROR;

23483: WHEN OTHERS THEN
23484: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
23485: p_procedure_name => 'UPDATE_PROGRESS_BULK',
23486: p_error_text => SUBSTRB('Call PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE:'||SQLERRM,1,120));
23487: RAISE FND_API.G_EXC_ERROR;
23488: END;
23489: END IF;
23490:
23491: l_base_struct_ver_id := pa_project_structure_utils.get_baseline_struct_ver(p_project_id_tbl(i));

Line 23513: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

23509: ,x_return_status => x_return_status
23510: ,x_msg_count => x_msg_count
23511: ,x_msg_data => x_msg_data
23512: );
23513: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23514: RAISE FND_API.G_EXC_ERROR;
23515: END IF;
23516: END IF;
23517:

Line 23514: RAISE FND_API.G_EXC_ERROR;

23510: ,x_msg_count => x_msg_count
23511: ,x_msg_data => x_msg_data
23512: );
23513: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23514: RAISE FND_API.G_EXC_ERROR;
23515: END IF;
23516: END IF;
23517:
23518: END IF;

Line 23576: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

23572: IF g1_debug_mode = 'Y' THEN
23573: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS_BULK', x_Msg => 'After Calling Mass ROLLUP_PROGRESS_PVT x_return_status='||x_return_status, x_Log_Level=> 3);
23574: END IF;
23575:
23576: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23577: RAISE FND_API.G_EXC_ERROR;
23578: END IF;
23579: END IF;
23580: ELSIF l_action = 'PUBLISH' AND l_rollup_call_required_tbl(i) = 'Y'

Line 23577: RAISE FND_API.G_EXC_ERROR;

23573: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS_BULK', x_Msg => 'After Calling Mass ROLLUP_PROGRESS_PVT x_return_status='||x_return_status, x_Log_Level=> 3);
23574: END IF;
23575:
23576: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23577: RAISE FND_API.G_EXC_ERROR;
23578: END IF;
23579: END IF;
23580: ELSIF l_action = 'PUBLISH' AND l_rollup_call_required_tbl(i) = 'Y'
23581: THEN

Line 23617: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

23613: IF g1_debug_mode = 'Y' THEN
23614: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS_BULK', x_Msg => 'After Calling Singular ROLLUP_PROGRESS_PVT l_return_status='||l_return_status, x_Log_Level=> 3);
23615: END IF;
23616:
23617: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23618: x_msg_data := l_msg_data;
23619: x_return_status := 'E';
23620: x_msg_count := l_msg_count;
23621: RAISE FND_API.G_EXC_ERROR;

Line 23621: RAISE FND_API.G_EXC_ERROR;

23617: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23618: x_msg_data := l_msg_data;
23619: x_return_status := 'E';
23620: x_msg_count := l_msg_count;
23621: RAISE FND_API.G_EXC_ERROR;
23622: END IF;
23623: END IF;
23624:
23625: IF p_progress_mode <> 'BACKDATED' THEN

Line 23660: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

23656: IF g1_debug_mode = 'Y' THEN
23657: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS_BULK', x_Msg => 'After Calling ROLLUP_FUTURE_PROGRESS_PVT l_return_status='||l_return_status, x_Log_Level=> 3);
23658: END IF;
23659:
23660: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23661: x_msg_data := l_msg_data;
23662: x_return_status := 'E';
23663: x_msg_count := l_msg_count;
23664: RAISE FND_API.G_EXC_ERROR;

Line 23664: RAISE FND_API.G_EXC_ERROR;

23660: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23661: x_msg_data := l_msg_data;
23662: x_return_status := 'E';
23663: x_msg_count := l_msg_count;
23664: RAISE FND_API.G_EXC_ERROR;
23665: END IF;
23666: END IF;
23667: END IF;
23668: END IF;

Line 23686: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

23682: ,p_element_version_id => l_task_version_id_tbl(i)
23683: ,x_return_status => l_return_status
23684: ,x_msg_count => l_msg_count
23685: ,x_msg_data => l_msg_data );
23686: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
23687: THEN
23688: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
23689: p_msg_name => l_msg_data);
23690: x_msg_data := l_msg_data;

Line 23692: RAISE FND_API.G_EXC_ERROR;

23688: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
23689: p_msg_name => l_msg_data);
23690: x_msg_data := l_msg_data;
23691: x_return_status := 'E';
23692: RAISE FND_API.G_EXC_ERROR;
23693: END IF;
23694: end if; --Huawei Bug 13923366
23695:
23696: BEGIN

Line 23726: p_validate_only => FND_API.G_FALSE

23722: (PA_PROJECT_STRUCTURE_UTILS.CHECK_SHARING_ENABLED(p_project_id_tbl(i)) = 'Y'))
23723: THEN
23724: --copy to transaction dates
23725: PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES(
23726: p_validate_only => FND_API.G_FALSE
23727: ,p_project_id => p_project_id_tbl(i)
23728: ,x_return_status => x_return_status
23729: ,x_msg_count => x_msg_count
23730: ,x_msg_data => x_msg_data);

Line 23760: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

23756:
23757: IF g1_debug_mode = 'Y' THEN
23758: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS_BULK', x_Msg => 'After Calling program_rollup_pvt l_return_status='||l_return_status, x_Log_Level=> 3);
23759: END IF;
23760: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23761: x_msg_data := l_msg_data;
23762: x_return_status := 'E';
23763: x_msg_count := l_msg_count;
23764: RAISE FND_API.G_EXC_ERROR;

Line 23764: RAISE FND_API.G_EXC_ERROR;

23760: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23761: x_msg_data := l_msg_data;
23762: x_return_status := 'E';
23763: x_msg_count := l_msg_count;
23764: RAISE FND_API.G_EXC_ERROR;
23765: END IF;
23766:
23767: END IF;
23768:

Line 23794: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

23790: IF g1_debug_mode = 'Y' THEN
23791: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS_BULK', x_Msg => 'After Calling update_link_proj_rollup_dates l_return_status='||l_return_status, x_Log_Level=> 3);
23792: END IF;
23793:
23794: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23795: x_msg_data := l_msg_data;
23796: x_return_status := 'E';
23797: x_msg_count := l_msg_count;
23798: RAISE FND_API.G_EXC_ERROR;

Line 23798: RAISE FND_API.G_EXC_ERROR;

23794: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23795: x_msg_data := l_msg_data;
23796: x_return_status := 'E';
23797: x_msg_count := l_msg_count;
23798: RAISE FND_API.G_EXC_ERROR;
23799: END IF;
23800: END IF;
23801: END LOOP;
23802:

Line 23803: IF (p_commit = FND_API.G_TRUE) THEN

23799: END IF;
23800: END IF;
23801: END LOOP;
23802:
23803: IF (p_commit = FND_API.G_TRUE) THEN
23804: COMMIT;
23805: END IF;
23806:
23807: EXCEPTION

Line 23808: when FND_API.G_EXC_ERROR then

23804: COMMIT;
23805: END IF;
23806:
23807: EXCEPTION
23808: when FND_API.G_EXC_ERROR then
23809: -- if p_commit = FND_API.G_TRUE then
23810: rollback to UPDATE_PROGRESS_BULK;
23811: -- end if;
23812: x_return_status := FND_API.G_RET_STS_ERROR;

Line 23809: -- if p_commit = FND_API.G_TRUE then

23805: END IF;
23806:
23807: EXCEPTION
23808: when FND_API.G_EXC_ERROR then
23809: -- if p_commit = FND_API.G_TRUE then
23810: rollback to UPDATE_PROGRESS_BULK;
23811: -- end if;
23812: x_return_status := FND_API.G_RET_STS_ERROR;
23813: x_msg_count := fnd_msg_pub.count_msg;

Line 23812: x_return_status := FND_API.G_RET_STS_ERROR;

23808: when FND_API.G_EXC_ERROR then
23809: -- if p_commit = FND_API.G_TRUE then
23810: rollback to UPDATE_PROGRESS_BULK;
23811: -- end if;
23812: x_return_status := FND_API.G_RET_STS_ERROR;
23813: x_msg_count := fnd_msg_pub.count_msg;
23814: when FND_API.G_EXC_UNEXPECTED_ERROR then
23815: -- if p_commit = FND_API.G_TRUE then
23816: rollback to UPDATE_PROGRESS_BULK;

Line 23814: when FND_API.G_EXC_UNEXPECTED_ERROR then

23810: rollback to UPDATE_PROGRESS_BULK;
23811: -- end if;
23812: x_return_status := FND_API.G_RET_STS_ERROR;
23813: x_msg_count := fnd_msg_pub.count_msg;
23814: when FND_API.G_EXC_UNEXPECTED_ERROR then
23815: -- if p_commit = FND_API.G_TRUE then
23816: rollback to UPDATE_PROGRESS_BULK;
23817: -- end if;
23818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 23815: -- if p_commit = FND_API.G_TRUE then

23811: -- end if;
23812: x_return_status := FND_API.G_RET_STS_ERROR;
23813: x_msg_count := fnd_msg_pub.count_msg;
23814: when FND_API.G_EXC_UNEXPECTED_ERROR then
23815: -- if p_commit = FND_API.G_TRUE then
23816: rollback to UPDATE_PROGRESS_BULK;
23817: -- end if;
23818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
23819: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 23818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

23814: when FND_API.G_EXC_UNEXPECTED_ERROR then
23815: -- if p_commit = FND_API.G_TRUE then
23816: rollback to UPDATE_PROGRESS_BULK;
23817: -- end if;
23818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
23819: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
23820: p_procedure_name => 'UPDATE_PROGRESS_BULK',
23821: p_error_text => SUBSTRB(SQLERRM,1,120));
23822: x_msg_count := fnd_msg_pub.count_msg;

Line 23824: -- if p_commit = FND_API.G_TRUE then

23820: p_procedure_name => 'UPDATE_PROGRESS_BULK',
23821: p_error_text => SUBSTRB(SQLERRM,1,120));
23822: x_msg_count := fnd_msg_pub.count_msg;
23823: when OTHERS then
23824: -- if p_commit = FND_API.G_TRUE then
23825: rollback to UPDATE_PROGRESS_BULK;
23826: -- end if;
23827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
23828: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 23827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

23823: when OTHERS then
23824: -- if p_commit = FND_API.G_TRUE then
23825: rollback to UPDATE_PROGRESS_BULK;
23826: -- end if;
23827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
23828: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
23829: p_procedure_name => 'UPDATE_PROGRESS_BULK',
23830: p_error_text => SUBSTRB(SQLERRM,1,120));
23831: x_msg_count := fnd_msg_pub.count_msg;

Line 23842: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

23838: -- Begin fix for Bug # 4262985.
23839:
23840: PROCEDURE apply_lp_prog_on_cwv_wrp(
23841: p_api_version IN NUMBER :=1.0
23842: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
23843: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
23844: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
23845: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
23846: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 23843: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

23839:
23840: PROCEDURE apply_lp_prog_on_cwv_wrp(
23841: p_api_version IN NUMBER :=1.0
23842: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
23843: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
23844: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
23845: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
23846: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
23847: ,p_debug_mode IN VARCHAR2 :='N'

Line 23844: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

23840: PROCEDURE apply_lp_prog_on_cwv_wrp(
23841: p_api_version IN NUMBER :=1.0
23842: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
23843: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
23844: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
23845: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
23846: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
23847: ,p_debug_mode IN VARCHAR2 :='N'
23848: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 23845: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

23841: p_api_version IN NUMBER :=1.0
23842: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
23843: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
23844: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
23845: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
23846: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
23847: ,p_debug_mode IN VARCHAR2 :='N'
23848: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
23849: ,p_project_id IN NUMBER

Line 23875: IF (p_commit = FND_API.G_TRUE) THEN

23871: IF g1_debug_mode = 'Y' THEN
23872: pa_debug.debug('PA_PROGRESS_PUB.APPLY_LP_PROG_ON_CWV_WRP');
23873: END IF;
23874: END IF;
23875: IF (p_commit = FND_API.G_TRUE) THEN
23876: savepoint APPLY_LP_PROG_ON_CWV_WRP;
23877: END IF;
23878:
23879: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 23879: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

23875: IF (p_commit = FND_API.G_TRUE) THEN
23876: savepoint APPLY_LP_PROG_ON_CWV_WRP;
23877: END IF;
23878:
23879: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
23880: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
23881: END IF;
23882:
23883: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 23880: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

23876: savepoint APPLY_LP_PROG_ON_CWV_WRP;
23877: END IF;
23878:
23879: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
23880: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
23881: END IF;
23882:
23883: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
23884: FND_MSG_PUB.initialize;

Line 23883: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

23879: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
23880: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
23881: END IF;
23882:
23883: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
23884: FND_MSG_PUB.initialize;
23885: END IF;
23886:
23887: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 23887: x_return_status := FND_API.G_RET_STS_SUCCESS;

23883: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
23884: FND_MSG_PUB.initialize;
23885: END IF;
23886:
23887: x_return_status := FND_API.G_RET_STS_SUCCESS;
23888:
23889: g1_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',fnd_global.user_id,fnd_global.login_id,275,null,null), 'N');
23890:
23891: IF g1_debug_mode = 'Y' THEN

Line 23916: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

23912: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.APPLY_LP_PROG_ON_CWV_WRP', x_Msg => 'Done with PA_PROJ_TASK_STRUC_PUB.SET_UPDATE_WBS_FLAG l_return_status='||l_return_status, x_Log_Level=> 3);
23913: END IF;
23914:
23915:
23916: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23917: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
23918: p_msg_name => l_msg_data);
23919: x_msg_data := l_msg_data;
23920: x_return_status := 'E';

Line 23922: RAISE FND_API.G_EXC_ERROR;

23918: p_msg_name => l_msg_data);
23919: x_msg_data := l_msg_data;
23920: x_return_status := 'E';
23921: x_msg_count := l_msg_count;
23922: RAISE FND_API.G_EXC_ERROR;
23923: END IF;
23924:
23925: IF g1_debug_mode = 'Y' THEN
23926: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.APPLY_LP_PROG_ON_CWV_WRP', x_Msg => 'Before calling PA_PROJ_TASK_STRUC_PUB.PROCESS_WBS_UPDATES_WRP', x_Log_Level=> 3);

Line 23941: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

23937: IF g1_debug_mode = 'Y' THEN
23938: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.APPLY_LP_PROG_ON_CWV_WRP', x_Msg => 'Done with PA_PROJ_TASK_STRUC_PUB.PROCESS_WBS_UPDATES_WRP l_return_status='||l_return_status, x_Log_Level=> 3);
23939: END IF;
23940:
23941: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
23942: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
23943: p_msg_name => l_msg_data);
23944: x_msg_data := l_msg_data;
23945: x_return_status := 'E';

Line 23947: RAISE FND_API.G_EXC_ERROR;

23943: p_msg_name => l_msg_data);
23944: x_msg_data := l_msg_data;
23945: x_return_status := 'E';
23946: x_msg_count := l_msg_count;
23947: RAISE FND_API.G_EXC_ERROR;
23948: END IF;
23949:
23950:
23951: EXCEPTION

Line 23952: when FND_API.G_EXC_ERROR then

23948: END IF;
23949:
23950:
23951: EXCEPTION
23952: when FND_API.G_EXC_ERROR then
23953: if p_commit = FND_API.G_TRUE then
23954: rollback to APPLY_LP_PROG_ON_CWV_WRP;
23955: end if;
23956: x_return_status := FND_API.G_RET_STS_ERROR;

Line 23953: if p_commit = FND_API.G_TRUE then

23949:
23950:
23951: EXCEPTION
23952: when FND_API.G_EXC_ERROR then
23953: if p_commit = FND_API.G_TRUE then
23954: rollback to APPLY_LP_PROG_ON_CWV_WRP;
23955: end if;
23956: x_return_status := FND_API.G_RET_STS_ERROR;
23957:

Line 23956: x_return_status := FND_API.G_RET_STS_ERROR;

23952: when FND_API.G_EXC_ERROR then
23953: if p_commit = FND_API.G_TRUE then
23954: rollback to APPLY_LP_PROG_ON_CWV_WRP;
23955: end if;
23956: x_return_status := FND_API.G_RET_STS_ERROR;
23957:
23958: when FND_API.G_EXC_UNEXPECTED_ERROR then
23959: if p_commit = FND_API.G_TRUE then
23960: rollback to APPLY_LP_PROG_ON_CWV_WRP;

Line 23958: when FND_API.G_EXC_UNEXPECTED_ERROR then

23954: rollback to APPLY_LP_PROG_ON_CWV_WRP;
23955: end if;
23956: x_return_status := FND_API.G_RET_STS_ERROR;
23957:
23958: when FND_API.G_EXC_UNEXPECTED_ERROR then
23959: if p_commit = FND_API.G_TRUE then
23960: rollback to APPLY_LP_PROG_ON_CWV_WRP;
23961: end if;
23962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 23959: if p_commit = FND_API.G_TRUE then

23955: end if;
23956: x_return_status := FND_API.G_RET_STS_ERROR;
23957:
23958: when FND_API.G_EXC_UNEXPECTED_ERROR then
23959: if p_commit = FND_API.G_TRUE then
23960: rollback to APPLY_LP_PROG_ON_CWV_WRP;
23961: end if;
23962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
23963: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 23962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

23958: when FND_API.G_EXC_UNEXPECTED_ERROR then
23959: if p_commit = FND_API.G_TRUE then
23960: rollback to APPLY_LP_PROG_ON_CWV_WRP;
23961: end if;
23962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
23963: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
23964: p_procedure_name => 'APPLY_LP_PROG_ON_CWV_WRP',
23965: p_error_text => SUBSTRB(SQLERRM,1,120));
23966: when OTHERS then

Line 23967: if p_commit = FND_API.G_TRUE then

23963: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
23964: p_procedure_name => 'APPLY_LP_PROG_ON_CWV_WRP',
23965: p_error_text => SUBSTRB(SQLERRM,1,120));
23966: when OTHERS then
23967: if p_commit = FND_API.G_TRUE then
23968: rollback to APPLY_LP_PROG_ON_CWV;
23969: end if;
23970: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
23971: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',

Line 23970: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

23966: when OTHERS then
23967: if p_commit = FND_API.G_TRUE then
23968: rollback to APPLY_LP_PROG_ON_CWV;
23969: end if;
23970: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
23971: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
23972: p_procedure_name => 'APPLY_LP_PROG_ON_CWV_WRP',
23973: p_error_text => SUBSTRB(SQLERRM,1,120));
23974: raise;