DBA Data[Home] [Help]

APPS.PA_TASK_ASSIGNMENT_UTILS dependencies on FND_API

Line 491: l_x_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

487: l_resource_rec_tbl l_resource_rec_tbl_type;
488: l_task_rec task_rec_type;
489: l_msg_data VARCHAR2(4000);
490: l_msg_count NUMBER;
491: l_x_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
492: l_new_task_sch_start SYSTEM.pa_date_tbl_type := SYSTEM.pa_date_tbl_type();
493: l_new_task_sch_finish SYSTEM.pa_date_tbl_type := SYSTEM.pa_date_tbl_type();
494: l_use_task_new_sch_start SYSTEM.pa_date_tbl_type := SYSTEM.pa_date_tbl_type();
495: l_use_task_new_sch_end SYSTEM.pa_date_tbl_type := SYSTEM.pa_date_tbl_type();

Line 775: WHEN FND_API.G_EXC_ERROR THEN

771: END IF; -- IF p_context = 'UPDATE' OR p_context = 'COPY' THEN
772:
773: EXCEPTION
774:
775: WHEN FND_API.G_EXC_ERROR THEN
776:
777: -- 4537865
778: x_res_assignment_id_tbl := NULL ;
779: x_planning_start_tbl := NULL ;

Line 783: x_return_status := FND_API.G_RET_STS_ERROR;

779: x_planning_start_tbl := NULL ;
780: x_planning_end_tbl := NULL ;
781: -- 4537865
782:
783: x_return_status := FND_API.G_RET_STS_ERROR;
784: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 5) THEN
785: PA_DEBUG.write_log (x_module => L_Module,
786: x_msg => 'Error:' || L_FuncProc || SQLERRM,
787: x_log_level => 5);

Line 790: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

786: x_msg => 'Error:' || L_FuncProc || SQLERRM,
787: x_log_level => 5);
788: END IF;
789:
790: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
791:
792: -- 4537865
793: x_res_assignment_id_tbl := NULL ;
794: x_planning_start_tbl := NULL ;

Line 800: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

796: -- 4537865
797: -- Bug 4153366 - clear the temp table
798: DELETE pa_copy_asgmts_temp;
799:
800: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
801: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
802: PA_DEBUG.write_log (x_module => L_Module,
803: x_msg => 'Unexpected Error:' || L_FuncProc || SQLERRM,
804: x_log_level => 6);

Line 817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

813: -- 4537865
814: -- Bug 4153366 - clear the temp table
815: DELETE pa_copy_asgmts_temp;
816:
817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
818: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
819: PA_DEBUG.write_log (x_module => L_Module,
820: x_msg => 'Unexpected Error:' || L_FuncProc || SQLERRM,
821: x_log_level => 6);

Line 910: x_return_status := FND_API.G_RET_STS_SUCCESS;

906:
907: BEGIN
908:
909: L_FuncProc := 'Validate_Create_Assignment';
910: x_return_status := FND_API.G_RET_STS_SUCCESS;
911: g_require_progress_rollup := 'N'; -- End of Bug 4492493
912:
913: --Loop through each task record in p_task_rec_tbl
914: --Get default Planning Dates:

Line 960: p_task_rec_tbl(k).start_date <> FND_API.G_MISS_DATE AND

956: FETCH C1_Task_Info INTO l_task_sch_start, l_task_sch_end, l_task_name, l_task_number, l_task_proj_element_id;
957: CLOSE C1_Task_Info;
958:
959: IF (p_task_rec_tbl(k).start_date is not null AND
960: p_task_rec_tbl(k).start_date <> FND_API.G_MISS_DATE AND
961: p_task_rec_tbl(k).end_date is not null AND
962: p_task_rec_tbl(k).end_date <> FND_API.G_MISS_DATE) THEN
963:
964: l_task_sch_start := p_task_rec_tbl(k).start_date;

Line 962: p_task_rec_tbl(k).end_date <> FND_API.G_MISS_DATE) THEN

958:
959: IF (p_task_rec_tbl(k).start_date is not null AND
960: p_task_rec_tbl(k).start_date <> FND_API.G_MISS_DATE AND
961: p_task_rec_tbl(k).end_date is not null AND
962: p_task_rec_tbl(k).end_date <> FND_API.G_MISS_DATE) THEN
963:
964: l_task_sch_start := p_task_rec_tbl(k).start_date;
965: l_task_sch_end := p_task_rec_tbl(k).end_date;
966:

Line 977: IF p_task_assignment_tbl.COUNT > 0 AND x_return_status = FND_API.G_RET_STS_SUCCESS THEN

973: l_task_equip_effort := 0;
974: l_people_index := 1;
975: l_equip_index := 1;
976:
977: IF p_task_assignment_tbl.COUNT > 0 AND x_return_status = FND_API.G_RET_STS_SUCCESS THEN
978:
979: IF p_one_to_one_mapping_flag <> 'Y' THEN
980:
981: FOR i in 1..p_task_assignment_tbl.COUNT LOOP

Line 987: p_task_assignment_tbl(i).total_quantity <> FND_API.G_MISS_NUM THEN

983: --0. Bug 4492493: Check if Progress Rollup is required on CREATION
984: IF g_require_progress_rollup = 'N' AND
985: l_progress_rollup_required = 'Y' AND
986: p_task_assignment_tbl(i).total_quantity IS NOT NULL AND
987: p_task_assignment_tbl(i).total_quantity <> FND_API.G_MISS_NUM THEN
988: g_require_progress_rollup := 'Y';
989: END IF;
990: -- End of Bug 4492493
991:

Line 1012: p_task_assignment_tbl(i).schedule_start_date <> FND_API.G_MISS_DATE THEN

1008: -- Should honor Scheduled Dates provided by user before
1009: -- defaulting to task scheduled dates
1010: -- Should also honor Planning Dates
1011: IF p_task_assignment_tbl(i).schedule_start_date IS NOT NULL AND
1012: p_task_assignment_tbl(i).schedule_start_date <> FND_API.G_MISS_DATE THEN
1013:
1014: p_task_assignment_tbl(i).planning_start_date := p_task_assignment_tbl(i).schedule_start_date;
1015:
1016: ELSIF p_task_assignment_tbl(i).planning_start_date IS NOT NULL AND

Line 1017: p_task_assignment_tbl(i).planning_start_date <> FND_API.G_MISS_DATE THEN

1013:
1014: p_task_assignment_tbl(i).planning_start_date := p_task_assignment_tbl(i).schedule_start_date;
1015:
1016: ELSIF p_task_assignment_tbl(i).planning_start_date IS NOT NULL AND
1017: p_task_assignment_tbl(i).planning_start_date <> FND_API.G_MISS_DATE THEN
1018:
1019: p_task_assignment_tbl(i).schedule_start_date := p_task_assignment_tbl(i).planning_start_date;
1020:
1021: ELSE

Line 1029: p_task_assignment_tbl(i).schedule_end_date <> FND_API.G_MISS_DATE THEN

1025:
1026: END IF;
1027:
1028: IF p_task_assignment_tbl(i).schedule_end_date IS NOT NULL AND
1029: p_task_assignment_tbl(i).schedule_end_date <> FND_API.G_MISS_DATE THEN
1030:
1031: p_task_assignment_tbl(i).planning_end_date := p_task_assignment_tbl(i).schedule_end_date;
1032:
1033: ELSIF p_task_assignment_tbl(i).planning_end_date IS NOT NULL AND

Line 1034: p_task_assignment_tbl(i).planning_end_date <> FND_API.G_MISS_DATE THEN

1030:
1031: p_task_assignment_tbl(i).planning_end_date := p_task_assignment_tbl(i).schedule_end_date;
1032:
1033: ELSIF p_task_assignment_tbl(i).planning_end_date IS NOT NULL AND
1034: p_task_assignment_tbl(i).planning_end_date <> FND_API.G_MISS_DATE THEN
1035:
1036: p_task_assignment_tbl(i).schedule_end_date := p_task_assignment_tbl(i).planning_end_date;
1037:
1038: ELSE

Line 1075: x_return_status := FND_API.G_RET_STS_ERROR;

1071: p_token2 => 'TASK_NUMBER',
1072: p_value2 => l_task_number,
1073: p_token3 => 'PL_RES_ALIAS',
1074: p_value3 => p_task_assignment_tbl(i).planning_resource_alias);
1075: x_return_status := FND_API.G_RET_STS_ERROR;
1076: END IF;
1077: -- End of fix: Bug 3793623
1078:
1079: -- scheduled_delay must be positive or null

Line 1087: x_return_status := FND_API.G_RET_STS_ERROR;

1083: (
1084: p_app_short_name => 'PA',
1085: p_msg_name => 'PA_SCHED_DELAY_ERR'
1086: );
1087: x_return_status := FND_API.G_RET_STS_ERROR;
1088: END IF;
1089:
1090: -- Bug 3818133: Copy the assignment name in the named_role cell
1091: IF (p_task_assignment_tbl(i).project_assignment_id IS NOT NULL) AND

Line 1092: (p_task_assignment_tbl(i).project_assignment_id <> FND_API.G_MISS_NUM) AND

1088: END IF;
1089:
1090: -- Bug 3818133: Copy the assignment name in the named_role cell
1091: IF (p_task_assignment_tbl(i).project_assignment_id IS NOT NULL) AND
1092: (p_task_assignment_tbl(i).project_assignment_id <> FND_API.G_MISS_NUM) AND
1093: (p_task_assignment_tbl(i).project_assignment_id <> -1) THEN
1094:
1095: OPEN C_Named_Role(p_task_assignment_tbl(i).project_assignment_id);
1096: FETCH C_Named_Role INTO p_task_assignment_tbl(i).named_role, p_task_assignment_tbl(i).project_role_id;

Line 1142: p_task_assignment_tbl(k).schedule_start_date <> FND_API.G_MISS_DATE THEN

1138: -- Should honor Scheduled Dates provided by user before
1139: -- defaulting to task scheduled dates
1140: -- Should also honor Planning Dates
1141: IF p_task_assignment_tbl(k).schedule_start_date IS NOT NULL AND
1142: p_task_assignment_tbl(k).schedule_start_date <> FND_API.G_MISS_DATE THEN
1143:
1144: p_task_assignment_tbl(k).planning_start_date := p_task_assignment_tbl(k).schedule_start_date;
1145:
1146: ELSIF p_task_assignment_tbl(k).planning_start_date IS NOT NULL AND

Line 1147: p_task_assignment_tbl(k).planning_start_date <> FND_API.G_MISS_DATE THEN

1143:
1144: p_task_assignment_tbl(k).planning_start_date := p_task_assignment_tbl(k).schedule_start_date;
1145:
1146: ELSIF p_task_assignment_tbl(k).planning_start_date IS NOT NULL AND
1147: p_task_assignment_tbl(k).planning_start_date <> FND_API.G_MISS_DATE THEN
1148:
1149: p_task_assignment_tbl(k).schedule_start_date := p_task_assignment_tbl(k).planning_start_date;
1150:
1151: ELSE

Line 1159: p_task_assignment_tbl(k).schedule_end_date <> FND_API.G_MISS_DATE THEN

1155:
1156: END IF;
1157:
1158: IF p_task_assignment_tbl(k).schedule_end_date IS NOT NULL AND
1159: p_task_assignment_tbl(k).schedule_end_date <> FND_API.G_MISS_DATE THEN
1160:
1161: p_task_assignment_tbl(k).planning_end_date := p_task_assignment_tbl(k).schedule_end_date;
1162:
1163: ELSIF p_task_assignment_tbl(k).planning_end_date IS NOT NULL AND

Line 1164: p_task_assignment_tbl(k).planning_end_date <> FND_API.G_MISS_DATE THEN

1160:
1161: p_task_assignment_tbl(k).planning_end_date := p_task_assignment_tbl(k).schedule_end_date;
1162:
1163: ELSIF p_task_assignment_tbl(k).planning_end_date IS NOT NULL AND
1164: p_task_assignment_tbl(k).planning_end_date <> FND_API.G_MISS_DATE THEN
1165:
1166: p_task_assignment_tbl(k).schedule_end_date := p_task_assignment_tbl(k).planning_end_date;
1167:
1168: ELSE

Line 1205: x_return_status := FND_API.G_RET_STS_ERROR;

1201: p_token2 => 'TASK_NUMBER',
1202: p_value2 => l_task_number,
1203: p_token3 => 'PL_RES_ALIAS',
1204: p_value3 => p_task_assignment_tbl(k).planning_resource_alias);
1205: x_return_status := FND_API.G_RET_STS_ERROR;
1206: END IF;
1207: -- End of fix: Bug 3793623
1208:
1209: IF nvl(p_task_assignment_tbl(k).scheduled_delay, 0) < 0 THEN

Line 1215: x_return_status := FND_API.G_RET_STS_ERROR;

1211: PA_UTILS.ADD_MESSAGE
1212: ( p_app_short_name => 'PA',
1213: p_msg_name => 'PA_SCHED_DELAY_ERR'
1214: );
1215: x_return_status := FND_API.G_RET_STS_ERROR;
1216:
1217: END IF;
1218:
1219: -- Bug 3818133: Copy the assignment name in the named_role cell

Line 1221: (p_task_assignment_tbl(k).project_assignment_id <> FND_API.G_MISS_NUM) AND

1217: END IF;
1218:
1219: -- Bug 3818133: Copy the assignment name in the named_role cell
1220: IF (p_task_assignment_tbl(k).project_assignment_id IS NOT NULL) AND
1221: (p_task_assignment_tbl(k).project_assignment_id <> FND_API.G_MISS_NUM) AND
1222: (p_task_assignment_tbl(k).project_assignment_id <> -1) THEN
1223:
1224: OPEN C_Named_Role(p_task_assignment_tbl(k).project_assignment_id);
1225: FETCH C_Named_Role INTO p_task_assignment_tbl(k).named_role, p_task_assignment_tbl(k).project_role_id;

Line 1256: END IF; -- p_task_assignment_tbl.COUNT > 0 AND x_return_status = FND_API.G_RET_STS_SUCCESS

1252: END IF;
1253:
1254: END IF; -- p_one_to_one_mapping_flag = 'N'
1255:
1256: END IF; -- p_task_assignment_tbl.COUNT > 0 AND x_return_status = FND_API.G_RET_STS_SUCCESS
1257:
1258:
1259: ELSE -- check task edit ok
1260:

Line 1265: x_return_status := FND_API.G_RET_STS_ERROR;

1261: -- Bug 4533152
1262: --PA_UTILS.ADD_MESSAGE
1263: -- (p_app_short_name => 'PA',
1264: -- p_msg_name => 'PA_UPDATE_PUB_VER_ERR');
1265: x_return_status := FND_API.G_RET_STS_ERROR;
1266:
1267: END IF;
1268:
1269: -- Bug 3640647

Line 1299: -- p_task_assignment_tbl(1).unplanned_flag = FND_API.G_MISS_CHAR OR

1295: -- upon creation of unplanned assignment. Due to bug 4354041.
1296:
1297: IF l_task_rec_project_id_tbl.COUNT > 0 THEN
1298: -- (p_task_assignment_tbl(1).unplanned_flag IS NULL OR
1299: -- p_task_assignment_tbl(1).unplanned_flag = FND_API.G_MISS_CHAR OR
1300: -- p_task_assignment_tbl(1).unplanned_flag <> 'Y') THEN
1301:
1302: FORALL k IN l_task_rec_project_id_tbl.FIRST .. l_task_rec_project_id_tbl.LAST
1303: UPDATE pa_resource_assignments

Line 1333: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1329: x_return_status => l_return_status,
1330: x_msg_count => l_msg_count,
1331: x_msg_data => l_msg_data
1332: );
1333: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1334: x_return_status := l_return_status;
1335: END IF;
1336:
1337: END LOOP;

Line 1354: WHEN FND_API.G_EXC_ERROR THEN

1350: END IF;
1351:
1352: EXCEPTION
1353:
1354: WHEN FND_API.G_EXC_ERROR THEN
1355: x_return_status := FND_API.G_RET_STS_ERROR;
1356: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 5) THEN
1357: PA_DEBUG.write_log (x_module => L_Module,
1358: x_msg => 'Error:' || L_FuncProc || SQLERRM,

Line 1355: x_return_status := FND_API.G_RET_STS_ERROR;

1351:
1352: EXCEPTION
1353:
1354: WHEN FND_API.G_EXC_ERROR THEN
1355: x_return_status := FND_API.G_RET_STS_ERROR;
1356: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 5) THEN
1357: PA_DEBUG.write_log (x_module => L_Module,
1358: x_msg => 'Error:' || L_FuncProc || SQLERRM,
1359: x_log_level => 5);

Line 1362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1358: x_msg => 'Error:' || L_FuncProc || SQLERRM,
1359: x_log_level => 5);
1360: END IF;
1361:
1362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1364: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
1365: PA_DEBUG.write_log (x_module => L_Module,
1366: x_msg => 'Unexpected Error:' || L_FuncProc || SQLERRM,

Line 1363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1359: x_log_level => 5);
1360: END IF;
1361:
1362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1364: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
1365: PA_DEBUG.write_log (x_module => L_Module,
1366: x_msg => 'Unexpected Error:' || L_FuncProc || SQLERRM,
1367: x_log_level => 6);

Line 1372: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1368: END IF;
1369: RAISE;
1370:
1371: WHEN OTHERS THEN
1372: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1373: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
1374: PA_DEBUG.write_log (x_module => L_Module,
1375: x_msg => 'Unexpected Error:' || L_FuncProc || SQLERRM,
1376: x_log_level => 6);

Line 1550: x_return_status := FND_API.G_RET_STS_SUCCESS;

1546:
1547: BEGIN
1548:
1549: L_FuncProc := 'Validate_Update_Assignment';
1550: x_return_status := FND_API.G_RET_STS_SUCCESS;
1551: g_require_progress_rollup := 'N'; -- End of Bug 4492493
1552:
1553: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN
1554: pa_debug.g_err_stage:='Beginning of TA:Validate_Update_Assignment';

Line 1672: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1668: EXCEPTION
1669: WHEN NO_DATA_FOUND THEN
1670: NULL;
1671: WHEN OTHERS THEN
1672: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1673: END;
1674:
1675: -- Bug 6856934
1676: if nvl(p_calling_context,'X') = 'PA_PROJECT_ASSIGNMENT' then

Line 1725: (p_task_assignment_tbl(i).resource_list_member_id <> FND_API.G_MISS_NUM OR

1721: IF (p_task_assignment_tbl(i).resource_list_member_id IS NOT NULL OR
1722: p_task_assignment_tbl(i).planning_resource_alias IS NOT NULL) AND
1723: (p_task_assignment_tbl(i).resource_list_member_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM OR
1724: p_task_assignment_tbl(i).planning_resource_alias <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR) AND
1725: (p_task_assignment_tbl(i).resource_list_member_id <> FND_API.G_MISS_NUM OR
1726: p_task_assignment_tbl(i).planning_resource_alias <> FND_API.G_MISS_CHAR) AND
1727: nvl(p_task_assignment_tbl(i).resource_list_member_id, -99) <> nvl(R_Res_Assignment_Rec.resource_list_member_id, -99) THEN
1728:
1729: -- Added by clevesqu on 2004/09/03 for bug 3861936

Line 1726: p_task_assignment_tbl(i).planning_resource_alias <> FND_API.G_MISS_CHAR) AND

1722: p_task_assignment_tbl(i).planning_resource_alias IS NOT NULL) AND
1723: (p_task_assignment_tbl(i).resource_list_member_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM OR
1724: p_task_assignment_tbl(i).planning_resource_alias <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR) AND
1725: (p_task_assignment_tbl(i).resource_list_member_id <> FND_API.G_MISS_NUM OR
1726: p_task_assignment_tbl(i).planning_resource_alias <> FND_API.G_MISS_CHAR) AND
1727: nvl(p_task_assignment_tbl(i).resource_list_member_id, -99) <> nvl(R_Res_Assignment_Rec.resource_list_member_id, -99) THEN
1728:
1729: -- Added by clevesqu on 2004/09/03 for bug 3861936
1730: PA_PLANNING_RESOURCE_UTILS.check_list_member_on_list(

Line 1741: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

1737: x_valid_member_flag => l_valid_member_flag,
1738: x_return_status => x_return_status,
1739: x_msg_count => x_msg_count,
1740: x_msg_data => x_msg_data);
1741: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1742:
1743: p_task_assignment_tbl(i).resource_list_member_id := l_new_resource_list_member_id ; -- 4537865
1744: END IF ;
1745:

Line 1746: IF(x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1742:
1743: p_task_assignment_tbl(i).resource_list_member_id := l_new_resource_list_member_id ; -- 4537865
1744: END IF ;
1745:
1746: IF(x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1747: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1748: ELSIF(x_return_status = FND_API.G_RET_STS_ERROR) THEN
1749: RAISE FND_API.G_EXC_ERROR;
1750: END IF;

Line 1747: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1743: p_task_assignment_tbl(i).resource_list_member_id := l_new_resource_list_member_id ; -- 4537865
1744: END IF ;
1745:
1746: IF(x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1747: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1748: ELSIF(x_return_status = FND_API.G_RET_STS_ERROR) THEN
1749: RAISE FND_API.G_EXC_ERROR;
1750: END IF;
1751: -- End added by clevesqu on 2004/09/03 for bug 3861936

Line 1748: ELSIF(x_return_status = FND_API.G_RET_STS_ERROR) THEN

1744: END IF ;
1745:
1746: IF(x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1747: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1748: ELSIF(x_return_status = FND_API.G_RET_STS_ERROR) THEN
1749: RAISE FND_API.G_EXC_ERROR;
1750: END IF;
1751: -- End added by clevesqu on 2004/09/03 for bug 3861936
1752:

Line 1749: RAISE FND_API.G_EXC_ERROR;

1745:
1746: IF(x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1747: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1748: ELSIF(x_return_status = FND_API.G_RET_STS_ERROR) THEN
1749: RAISE FND_API.G_EXC_ERROR;
1750: END IF;
1751: -- End added by clevesqu on 2004/09/03 for bug 3861936
1752:
1753: Lr_eligible_rlm_id_tbl.extend(1);

Line 1870: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1866:
1867: -- DHI Fix: override currency
1868: R_Res_Assignment_Rec.rate_based_flag := lr_rate_based_flag_tbl(1);
1869:
1870: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1871: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1872: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1873: RAISE FND_API.G_EXC_ERROR;
1874: END IF;

Line 1871: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1867: -- DHI Fix: override currency
1868: R_Res_Assignment_Rec.rate_based_flag := lr_rate_based_flag_tbl(1);
1869:
1870: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1871: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1872: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1873: RAISE FND_API.G_EXC_ERROR;
1874: END IF;
1875:

Line 1872: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1868: R_Res_Assignment_Rec.rate_based_flag := lr_rate_based_flag_tbl(1);
1869:
1870: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1871: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1872: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1873: RAISE FND_API.G_EXC_ERROR;
1874: END IF;
1875:
1876: P_task_assignment_tbl(i).resource_class_flag := gchar(lr_resource_class_flag_tbl(1), 'B');

Line 1873: RAISE FND_API.G_EXC_ERROR;

1869:
1870: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1871: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1872: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1873: RAISE FND_API.G_EXC_ERROR;
1874: END IF;
1875:
1876: P_task_assignment_tbl(i).resource_class_flag := gchar(lr_resource_class_flag_tbl(1), 'B');
1877: P_task_assignment_tbl(i).resource_class_code := gchar(lr_resource_class_code_tbl(1), 'B');

Line 1913: p_task_assignment_tbl(i).incur_by_resource_code <> FND_API.G_MISS_CHAR)

1909: ELSIF p_task_assignment_tbl(i).resource_list_member_id is not Null Then
1910:
1911: --1. Resource Information
1912: IF (p_task_assignment_tbl(i).incur_by_resource_code IS NOT NULL AND
1913: p_task_assignment_tbl(i).incur_by_resource_code <> FND_API.G_MISS_CHAR)
1914: OR
1915: (p_task_assignment_tbl(i).incur_by_resource_name IS NOT NULL AND
1916: p_task_assignment_tbl(i).incur_by_resource_name <> FND_API.G_MISS_CHAR) THEN
1917:

Line 1916: p_task_assignment_tbl(i).incur_by_resource_name <> FND_API.G_MISS_CHAR) THEN

1912: IF (p_task_assignment_tbl(i).incur_by_resource_code IS NOT NULL AND
1913: p_task_assignment_tbl(i).incur_by_resource_code <> FND_API.G_MISS_CHAR)
1914: OR
1915: (p_task_assignment_tbl(i).incur_by_resource_name IS NOT NULL AND
1916: p_task_assignment_tbl(i).incur_by_resource_name <> FND_API.G_MISS_CHAR) THEN
1917:
1918: L_Incur_By_Resource_Type := gchar(p_task_assignment_tbl(i).res_type_code);
1919:
1920: END IF;

Line 1984: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1980: pa_debug.g_err_stage:='After validate_planning_resource, return status='||x_return_status;
1981: pa_debug.write('PA_TASK_ASSIGNMENT_UTILS',pa_debug.g_err_stage,3);
1982: END IF;
1983:
1984: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1985: RAISE FND_API.G_EXC_ERROR;
1986: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1988: END IF;

Line 1985: RAISE FND_API.G_EXC_ERROR;

1981: pa_debug.write('PA_TASK_ASSIGNMENT_UTILS',pa_debug.g_err_stage,3);
1982: END IF;
1983:
1984: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1985: RAISE FND_API.G_EXC_ERROR;
1986: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1988: END IF;
1989:

Line 1986: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1982: END IF;
1983:
1984: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1985: RAISE FND_API.G_EXC_ERROR;
1986: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1988: END IF;
1989:
1990: P_task_assignment_tbl(i).expenditure_type := NULL; --nvl(P_task_assignment_tbl(i).expenditure_type, FND_API.G_MISS_CHAR);

Line 1987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1983:
1984: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1985: RAISE FND_API.G_EXC_ERROR;
1986: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1988: END IF;
1989:
1990: P_task_assignment_tbl(i).expenditure_type := NULL; --nvl(P_task_assignment_tbl(i).expenditure_type, FND_API.G_MISS_CHAR);
1991: P_task_assignment_tbl(i).expenditure_category := NULL; --nvl(P_task_assignment_tbl(i).expenditure_category,FND_API.G_MISS_CHAR);

Line 1990: P_task_assignment_tbl(i).expenditure_type := NULL; --nvl(P_task_assignment_tbl(i).expenditure_type, FND_API.G_MISS_CHAR);

1986: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1988: END IF;
1989:
1990: P_task_assignment_tbl(i).expenditure_type := NULL; --nvl(P_task_assignment_tbl(i).expenditure_type, FND_API.G_MISS_CHAR);
1991: P_task_assignment_tbl(i).expenditure_category := NULL; --nvl(P_task_assignment_tbl(i).expenditure_category,FND_API.G_MISS_CHAR);
1992: P_task_assignment_tbl(i).event_type := NULL; --nvl(P_task_assignment_tbl(i).event_type, FND_API.G_MISS_CHAR);
1993: P_task_assignment_tbl(i).revenue_category_code := NULL; --nvl(P_task_assignment_tbl(i).revenue_category_code, FND_API.G_MISS_CHAR);
1994: P_task_assignment_tbl(i).fc_res_type_code := NULL; --nvl(p_task_assignment_tbl(i).fc_res_type_code, FND_API.G_MISS_CHAR);

Line 1991: P_task_assignment_tbl(i).expenditure_category := NULL; --nvl(P_task_assignment_tbl(i).expenditure_category,FND_API.G_MISS_CHAR);

1987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1988: END IF;
1989:
1990: P_task_assignment_tbl(i).expenditure_type := NULL; --nvl(P_task_assignment_tbl(i).expenditure_type, FND_API.G_MISS_CHAR);
1991: P_task_assignment_tbl(i).expenditure_category := NULL; --nvl(P_task_assignment_tbl(i).expenditure_category,FND_API.G_MISS_CHAR);
1992: P_task_assignment_tbl(i).event_type := NULL; --nvl(P_task_assignment_tbl(i).event_type, FND_API.G_MISS_CHAR);
1993: P_task_assignment_tbl(i).revenue_category_code := NULL; --nvl(P_task_assignment_tbl(i).revenue_category_code, FND_API.G_MISS_CHAR);
1994: P_task_assignment_tbl(i).fc_res_type_code := NULL; --nvl(p_task_assignment_tbl(i).fc_res_type_code, FND_API.G_MISS_CHAR);
1995: P_task_assignment_tbl(i).incur_by_role_id := NULL; --nvl(P_task_assignment_tbl(i).incur_by_role_id, FND_API.G_MISS_NUM);

Line 1992: P_task_assignment_tbl(i).event_type := NULL; --nvl(P_task_assignment_tbl(i).event_type, FND_API.G_MISS_CHAR);

1988: END IF;
1989:
1990: P_task_assignment_tbl(i).expenditure_type := NULL; --nvl(P_task_assignment_tbl(i).expenditure_type, FND_API.G_MISS_CHAR);
1991: P_task_assignment_tbl(i).expenditure_category := NULL; --nvl(P_task_assignment_tbl(i).expenditure_category,FND_API.G_MISS_CHAR);
1992: P_task_assignment_tbl(i).event_type := NULL; --nvl(P_task_assignment_tbl(i).event_type, FND_API.G_MISS_CHAR);
1993: P_task_assignment_tbl(i).revenue_category_code := NULL; --nvl(P_task_assignment_tbl(i).revenue_category_code, FND_API.G_MISS_CHAR);
1994: P_task_assignment_tbl(i).fc_res_type_code := NULL; --nvl(p_task_assignment_tbl(i).fc_res_type_code, FND_API.G_MISS_CHAR);
1995: P_task_assignment_tbl(i).incur_by_role_id := NULL; --nvl(P_task_assignment_tbl(i).incur_by_role_id, FND_API.G_MISS_NUM);
1996: P_task_assignment_tbl(i).incur_by_res_class_code := NULL; --nvl(P_task_assignment_tbl(i).incur_by_res_class_code, FND_API.G_MISS_CHAR);

Line 1993: P_task_assignment_tbl(i).revenue_category_code := NULL; --nvl(P_task_assignment_tbl(i).revenue_category_code, FND_API.G_MISS_CHAR);

1989:
1990: P_task_assignment_tbl(i).expenditure_type := NULL; --nvl(P_task_assignment_tbl(i).expenditure_type, FND_API.G_MISS_CHAR);
1991: P_task_assignment_tbl(i).expenditure_category := NULL; --nvl(P_task_assignment_tbl(i).expenditure_category,FND_API.G_MISS_CHAR);
1992: P_task_assignment_tbl(i).event_type := NULL; --nvl(P_task_assignment_tbl(i).event_type, FND_API.G_MISS_CHAR);
1993: P_task_assignment_tbl(i).revenue_category_code := NULL; --nvl(P_task_assignment_tbl(i).revenue_category_code, FND_API.G_MISS_CHAR);
1994: P_task_assignment_tbl(i).fc_res_type_code := NULL; --nvl(p_task_assignment_tbl(i).fc_res_type_code, FND_API.G_MISS_CHAR);
1995: P_task_assignment_tbl(i).incur_by_role_id := NULL; --nvl(P_task_assignment_tbl(i).incur_by_role_id, FND_API.G_MISS_NUM);
1996: P_task_assignment_tbl(i).incur_by_res_class_code := NULL; --nvl(P_task_assignment_tbl(i).incur_by_res_class_code, FND_API.G_MISS_CHAR);
1997:

Line 1994: P_task_assignment_tbl(i).fc_res_type_code := NULL; --nvl(p_task_assignment_tbl(i).fc_res_type_code, FND_API.G_MISS_CHAR);

1990: P_task_assignment_tbl(i).expenditure_type := NULL; --nvl(P_task_assignment_tbl(i).expenditure_type, FND_API.G_MISS_CHAR);
1991: P_task_assignment_tbl(i).expenditure_category := NULL; --nvl(P_task_assignment_tbl(i).expenditure_category,FND_API.G_MISS_CHAR);
1992: P_task_assignment_tbl(i).event_type := NULL; --nvl(P_task_assignment_tbl(i).event_type, FND_API.G_MISS_CHAR);
1993: P_task_assignment_tbl(i).revenue_category_code := NULL; --nvl(P_task_assignment_tbl(i).revenue_category_code, FND_API.G_MISS_CHAR);
1994: P_task_assignment_tbl(i).fc_res_type_code := NULL; --nvl(p_task_assignment_tbl(i).fc_res_type_code, FND_API.G_MISS_CHAR);
1995: P_task_assignment_tbl(i).incur_by_role_id := NULL; --nvl(P_task_assignment_tbl(i).incur_by_role_id, FND_API.G_MISS_NUM);
1996: P_task_assignment_tbl(i).incur_by_res_class_code := NULL; --nvl(P_task_assignment_tbl(i).incur_by_res_class_code, FND_API.G_MISS_CHAR);
1997:
1998: -- Setting to null for bug 3664052

Line 1995: P_task_assignment_tbl(i).incur_by_role_id := NULL; --nvl(P_task_assignment_tbl(i).incur_by_role_id, FND_API.G_MISS_NUM);

1991: P_task_assignment_tbl(i).expenditure_category := NULL; --nvl(P_task_assignment_tbl(i).expenditure_category,FND_API.G_MISS_CHAR);
1992: P_task_assignment_tbl(i).event_type := NULL; --nvl(P_task_assignment_tbl(i).event_type, FND_API.G_MISS_CHAR);
1993: P_task_assignment_tbl(i).revenue_category_code := NULL; --nvl(P_task_assignment_tbl(i).revenue_category_code, FND_API.G_MISS_CHAR);
1994: P_task_assignment_tbl(i).fc_res_type_code := NULL; --nvl(p_task_assignment_tbl(i).fc_res_type_code, FND_API.G_MISS_CHAR);
1995: P_task_assignment_tbl(i).incur_by_role_id := NULL; --nvl(P_task_assignment_tbl(i).incur_by_role_id, FND_API.G_MISS_NUM);
1996: P_task_assignment_tbl(i).incur_by_res_class_code := NULL; --nvl(P_task_assignment_tbl(i).incur_by_res_class_code, FND_API.G_MISS_CHAR);
1997:
1998: -- Setting to null for bug 3664052
1999: P_task_assignment_tbl(i).Person_Id := NULL;

Line 1996: P_task_assignment_tbl(i).incur_by_res_class_code := NULL; --nvl(P_task_assignment_tbl(i).incur_by_res_class_code, FND_API.G_MISS_CHAR);

1992: P_task_assignment_tbl(i).event_type := NULL; --nvl(P_task_assignment_tbl(i).event_type, FND_API.G_MISS_CHAR);
1993: P_task_assignment_tbl(i).revenue_category_code := NULL; --nvl(P_task_assignment_tbl(i).revenue_category_code, FND_API.G_MISS_CHAR);
1994: P_task_assignment_tbl(i).fc_res_type_code := NULL; --nvl(p_task_assignment_tbl(i).fc_res_type_code, FND_API.G_MISS_CHAR);
1995: P_task_assignment_tbl(i).incur_by_role_id := NULL; --nvl(P_task_assignment_tbl(i).incur_by_role_id, FND_API.G_MISS_NUM);
1996: P_task_assignment_tbl(i).incur_by_res_class_code := NULL; --nvl(P_task_assignment_tbl(i).incur_by_res_class_code, FND_API.G_MISS_CHAR);
1997:
1998: -- Setting to null for bug 3664052
1999: P_task_assignment_tbl(i).Person_Id := NULL;
2000: P_task_assignment_tbl(i).Bom_Resource_Id := NULL;

Line 2072: x_return_status := FND_API.G_RET_STS_ERROR;

2068: pa_debug.write('PA_TASK_ASSIGNMENT_UTILS',pa_debug.g_err_stage,3);
2069: END IF;
2070:
2071: IF Validate_Fin_Cat_For_WP(p_task_assignment_tbl(i).fc_res_type_code ) <> 'Y' THEN
2072: x_return_status := FND_API.G_RET_STS_ERROR;
2073: END IF;
2074:
2075: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN
2076: pa_debug.g_err_stage:='B4 Validate Pl_Res_For_WP: ' || L_FuncProc || ':return_status:' || x_return_status;

Line 2081: x_return_status := FND_API.G_RET_STS_ERROR;

2077: pa_debug.write('PA_TASK_ASSIGNMENT_UTILS',pa_debug.g_err_stage,3);
2078: END IF;
2079:
2080: IF Validate_Pl_Res_For_WP(p_task_assignment_tbl(i).resource_list_member_id) <> 'Y' THEN
2081: x_return_status := FND_API.G_RET_STS_ERROR;
2082: END IF;
2083:
2084: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN
2085: pa_debug.g_err_stage:='After Validate Pl_Res_For_WP: ' || L_FuncProc || ':return_status:' || x_return_status;

Line 2124: x_return_status := FND_API.G_RET_STS_ERROR;

2120: p_value2 => l_task_number,
2121: p_token3 => 'PL_RES_ALIAS',
2122: p_value3 => p_task_assignment_tbl(i).planning_resource_alias
2123: );
2124: x_return_status := FND_API.G_RET_STS_ERROR;
2125:
2126: -- CASE 1: If use_task_schedule_flag is set, make sure task and ta schedule
2127: -- dates are the same
2128: -- rbruno modified for bug 9468665 - start

Line 2155: x_return_status := FND_API.G_RET_STS_ERROR;

2151: p_value2 => l_task_number,
2152: p_token3 => 'PL_RES_ALIAS',
2153: p_value3 => p_task_assignment_tbl(i).planning_resource_alias
2154: );
2155: x_return_status := FND_API.G_RET_STS_ERROR;
2156:
2157: END IF;
2158:
2159: -- scheduled_delay must be positive or null

Line 2167: x_return_status := FND_API.G_RET_STS_ERROR;

2163: (
2164: p_app_short_name => 'PA',
2165: p_msg_name => 'PA_SCHED_DELAY_ERR'
2166: );
2167: x_return_status := FND_API.G_RET_STS_ERROR;
2168: END IF;
2169:
2170: -- CASE3: IB2 Unplanned Actual changes
2171: -- Set planning dates to schedule dates

Line 2187: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2183: x_return_status => l_return_status,
2184: x_error_msg_code => l_error_msg_code
2185: );
2186:
2187: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2188: x_return_status := l_return_status;
2189: END IF;
2190:
2191: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN

Line 2223: l_sp_fixed_date = FND_API.G_MISS_DATE) THEN

2219: -- the flow.
2220: l_sp_fixed_date := p_task_assignment_tbl(i).sp_fixed_date;
2221:
2222: IF (l_sp_fixed_date is NULL OR
2223: l_sp_fixed_date = FND_API.G_MISS_DATE) THEN
2224: l_sp_fixed_date := R_Res_Assignment_Rec.sp_fixed_date;
2225: END IF;
2226:
2227: IF l_sp_fixed_date is not NULL AND

Line 2228: l_sp_fixed_date <> FND_API.G_MISS_DATE AND

2224: l_sp_fixed_date := R_Res_Assignment_Rec.sp_fixed_date;
2225: END IF;
2226:
2227: IF l_sp_fixed_date is not NULL AND
2228: l_sp_fixed_date <> FND_API.G_MISS_DATE AND
2229: (l_sp_fixed_date > p_task_assignment_tbl(i).planning_end_date OR
2230: l_sp_fixed_date < p_task_assignment_tbl(i).planning_start_date) THEN
2231:
2232: p_task_assignment_tbl(i).sp_fixed_date := R_Res_Assignment_Rec.sp_fixed_date +

Line 2252: p_task_assignment_tbl(i).override_currency_code <> FND_API.G_MISS_CHAR AND

2248: -- DHI Fix
2249: -- If no progress and no published version exists, override currency is only allowed
2250: -- if override rate also exists for rate based assignments
2251: IF (R_Res_Assignment_Rec.rate_based_flag = 'Y' AND
2252: p_task_assignment_tbl(i).override_currency_code <> FND_API.G_MISS_CHAR AND
2253: p_task_assignment_tbl(i).override_currency_code IS NOT NULL AND
2254: (p_task_assignment_tbl(i).cost_rate_override = FND_API.G_MISS_NUM OR
2255: p_task_assignment_tbl(i).cost_rate_override IS NULL)) THEN
2256:

Line 2254: (p_task_assignment_tbl(i).cost_rate_override = FND_API.G_MISS_NUM OR

2250: -- if override rate also exists for rate based assignments
2251: IF (R_Res_Assignment_Rec.rate_based_flag = 'Y' AND
2252: p_task_assignment_tbl(i).override_currency_code <> FND_API.G_MISS_CHAR AND
2253: p_task_assignment_tbl(i).override_currency_code IS NOT NULL AND
2254: (p_task_assignment_tbl(i).cost_rate_override = FND_API.G_MISS_NUM OR
2255: p_task_assignment_tbl(i).cost_rate_override IS NULL)) THEN
2256:
2257: l_viol_indicator := 8.7;
2258:

Line 2274: x_return_status := FND_API.G_RET_STS_ERROR;

2270: (
2271: p_app_short_name => 'PA',
2272: p_msg_name => 'PA_UP_TA_OVR_CUR_ERR'
2273: );
2274: x_return_status := FND_API.G_RET_STS_ERROR;
2275: END IF;
2276: END IF;
2277:
2278: --4. Financial Summary Validation handled by generic update planning transaction API

Line 2287: x_return_status := FND_API.G_RET_STS_ERROR;

2283: --(
2284: -- p_app_short_name => 'PA',
2285: -- p_msg_name => 'PA_UPDATE_PUB_VER_ERR'
2286: --);
2287: x_return_status := FND_API.G_RET_STS_ERROR;
2288: END IF;
2289:
2290: -- Begin fix for Bug # 4319137.
2291:

Line 2292: if (x_return_status = FND_API.G_RET_STS_ERROR) then

2288: END IF;
2289:
2290: -- Begin fix for Bug # 4319137.
2291:
2292: if (x_return_status = FND_API.G_RET_STS_ERROR) then
2293:
2294: l_msg_added_flag := 'Y';
2295:
2296: end if;

Line 2307: x_return_status := FND_API.G_RET_STS_ERROR;

2303: -- Begin fix for Bug # 4319137.
2304:
2305: if (l_msg_added_flag = 'Y') then
2306:
2307: x_return_status := FND_API.G_RET_STS_ERROR;
2308: end if;
2309:
2310: -- End fix for Bug # 4319137.
2311:

Line 2313: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

2309:
2310: -- End fix for Bug # 4319137.
2311:
2312: -- Finally, check the progress business rules.
2313: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
2314: PA_PROGRESS_UTILS.check_prog_for_update_asgmts
2315: (
2316: p_task_assignment_tbl => p_task_assignment_tbl,
2317: x_return_status => x_return_status

Line 2328: WHEN FND_API.G_EXC_ERROR THEN

2324: END IF;
2325:
2326: EXCEPTION
2327:
2328: WHEN FND_API.G_EXC_ERROR THEN
2329: x_return_status := FND_API.G_RET_STS_ERROR;
2330: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 5) THEN
2331: PA_DEBUG.write_log (x_module => L_Module,
2332: x_msg => 'Error:' || L_FuncProc || SQLERRM,

Line 2329: x_return_status := FND_API.G_RET_STS_ERROR;

2325:
2326: EXCEPTION
2327:
2328: WHEN FND_API.G_EXC_ERROR THEN
2329: x_return_status := FND_API.G_RET_STS_ERROR;
2330: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 5) THEN
2331: PA_DEBUG.write_log (x_module => L_Module,
2332: x_msg => 'Error:' || L_FuncProc || SQLERRM,
2333: x_log_level => 5);

Line 2337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2333: x_log_level => 5);
2334:
2335: END IF;
2336:
2337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2338: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2339: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
2340: PA_DEBUG.write_log (x_module => L_Module,
2341: x_msg => 'Unexpected Error:' || L_FuncProc || SQLERRM,

Line 2338: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2334:
2335: END IF;
2336:
2337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2338: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2339: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
2340: PA_DEBUG.write_log (x_module => L_Module,
2341: x_msg => 'Unexpected Error:' || L_FuncProc || SQLERRM,
2342: x_log_level => 6);

Line 2347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2343: END IF;
2344: RAISE;
2345:
2346: WHEN OTHERS THEN
2347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2348: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
2349: PA_DEBUG.write_log (x_module => L_Module,
2350: x_msg => 'Unexpected Error:' || L_FuncProc || SQLERRM,
2351: x_log_level => 6);

Line 2483: x_return_status := FND_API.G_RET_STS_SUCCESS;

2479: l_edit_task_ok varchar2(1) := 'N'; -- Bug 6856934
2480:
2481: BEGIN
2482:
2483: x_return_status := FND_API.G_RET_STS_SUCCESS;
2484: g_require_progress_rollup := 'N'; -- End of Bug 4492493
2485: L_FuncProc := 'Validate_Delete_Assignment';
2486:
2487: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN

Line 2565: x_return_status := FND_API.G_RET_STS_ERROR;

2561: p_value2 => l_task_number,
2562: p_token3 => 'PL_RES_ALIAS',
2563: p_value3 => l_alias
2564: );
2565: x_return_status := FND_API.G_RET_STS_ERROR;
2566:
2567: ELSE
2568:
2569: x_delete_task_flag_tbl(i) := 'Y';

Line 2592: p_init_msg_list => FND_API.G_FALSE,

2588: x_task_assmt_ids_tbl(x_task_assmt_ids_tbl.COUNT) := l_task_asgmts_tbl(j);
2589:
2590: pa_deliverable_pub.delete_dlv_task_asscn_in_bulk
2591: (
2592: p_init_msg_list => FND_API.G_FALSE,
2593: p_calling_context => 'PA_ASSIGNMENTS',
2594: p_task_element_id => l_task_asgmts_tbl(j),
2595: p_task_version_id => NULL,
2596: p_project_id => l_project_id,

Line 2603: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2599: x_msg_data => l_msg_data
2600: );
2601:
2602: -- Bug 4317547: Should check the return status
2603: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2604: x_return_status := FND_API.G_RET_STS_ERROR;
2605: END IF;
2606:
2607: END LOOP;

Line 2604: x_return_status := FND_API.G_RET_STS_ERROR;

2600: );
2601:
2602: -- Bug 4317547: Should check the return status
2603: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2604: x_return_status := FND_API.G_RET_STS_ERROR;
2605: END IF;
2606:
2607: END LOOP;
2608:

Line 2716: x_return_status := FND_API.G_RET_STS_ERROR;

2712: (
2713: p_app_short_name => 'PA',
2714: p_msg_name => 'PA_DL_TA_PROG_ERR'
2715: );
2716: x_return_status := FND_API.G_RET_STS_ERROR;
2717: ELSE
2718: x_delete_asgmt_flag_tbl(i) := 'Y';
2719: pa_deliverable_pub.delete_dlv_task_asscn_in_bulk
2720: (

Line 2721: p_init_msg_list => FND_API.G_FALSE,

2717: ELSE
2718: x_delete_asgmt_flag_tbl(i) := 'Y';
2719: pa_deliverable_pub.delete_dlv_task_asscn_in_bulk
2720: (
2721: p_init_msg_list => FND_API.G_FALSE,
2722: p_calling_context => 'PA_ASSIGNMENTS',
2723: p_task_element_id => p_resource_assignment_id_tbl(i),
2724: p_task_version_id => l_wbs_element_version_id,
2725: p_project_id => l_project_id,

Line 2732: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2728: x_msg_data => l_msg_data
2729: );
2730:
2731: -- Bug 4317547: Should check the return status
2732: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2733: x_return_status := FND_API.G_RET_STS_ERROR;
2734: END IF;
2735:
2736: END IF;

Line 2733: x_return_status := FND_API.G_RET_STS_ERROR;

2729: );
2730:
2731: -- Bug 4317547: Should check the return status
2732: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2733: x_return_status := FND_API.G_RET_STS_ERROR;
2734: END IF;
2735:
2736: END IF;
2737:

Line 2746: x_return_status := FND_API.G_RET_STS_ERROR;

2742: --(
2743: -- p_app_short_name => 'PA',
2744: -- p_msg_name => 'PA_UPDATE_PUB_VER_ERR'
2745: --);
2746: x_return_status := FND_API.G_RET_STS_ERROR;
2747:
2748: END IF; -- check task edit ok
2749:
2750: END LOOP;

Line 2763: WHEN FND_API.G_EXC_ERROR THEN

2759: END IF;
2760:
2761: EXCEPTION
2762:
2763: WHEN FND_API.G_EXC_ERROR THEN
2764: x_return_status := FND_API.G_RET_STS_ERROR;
2765: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 5) THEN
2766: PA_DEBUG.write_log (x_module => L_Module,
2767: x_msg => 'Error:' || L_FuncProc || SQLERRM,

Line 2764: x_return_status := FND_API.G_RET_STS_ERROR;

2760:
2761: EXCEPTION
2762:
2763: WHEN FND_API.G_EXC_ERROR THEN
2764: x_return_status := FND_API.G_RET_STS_ERROR;
2765: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 5) THEN
2766: PA_DEBUG.write_log (x_module => L_Module,
2767: x_msg => 'Error:' || L_FuncProc || SQLERRM,
2768: x_log_level => 5);

Line 2771: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2767: x_msg => 'Error:' || L_FuncProc || SQLERRM,
2768: x_log_level => 5);
2769: END IF;
2770:
2771: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2772: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2773: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
2774: PA_DEBUG.write_log (x_module => L_Module,
2775: x_msg => 'Unexpected Error:' || L_FuncProc || SQLERRM,

Line 2772: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2768: x_log_level => 5);
2769: END IF;
2770:
2771: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2772: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2773: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
2774: PA_DEBUG.write_log (x_module => L_Module,
2775: x_msg => 'Unexpected Error:' || L_FuncProc || SQLERRM,
2776: x_log_level => 6);

Line 2781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2777: END IF;
2778: RAISE;
2779:
2780: WHEN OTHERS THEN
2781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2782: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
2783: PA_DEBUG.write_log (x_module => L_Module,
2784: x_msg =>'Unexpected Error:' || L_FuncProc || SQLERRM,
2785: x_log_level => 6);

Line 3381: x_return_status := FND_API.G_RET_STS_SUCCESS;

3377: l_progress_rollup_required VARCHAR2(1) := 'N';
3378:
3379: BEGIN
3380:
3381: x_return_status := FND_API.G_RET_STS_SUCCESS;
3382: g_require_progress_rollup := 'N'; -- End of Bug 4492493
3383: L_FuncProc := 'Validate_Copy_Assignment';
3384: x_calculate_flag := 'N';
3385: x_rbs_diff_flag := 'N';

Line 3452: x_return_status := FND_API.G_RET_STS_ERROR;

3448: PA_UTILS.ADD_MESSAGE
3449: (p_app_short_name => 'PA',
3450: p_msg_name => 'PA_RES_LIST_NONE_ERR'
3451: );
3452: x_return_status := FND_API.G_RET_STS_ERROR;
3453: RAISE FND_API.G_EXC_ERROR;
3454: END IF;
3455:
3456: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN

Line 3453: RAISE FND_API.G_EXC_ERROR;

3449: (p_app_short_name => 'PA',
3450: p_msg_name => 'PA_RES_LIST_NONE_ERR'
3451: );
3452: x_return_status := FND_API.G_RET_STS_ERROR;
3453: RAISE FND_API.G_EXC_ERROR;
3454: END IF;
3455:
3456: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN
3457: PA_DEBUG.write(x_module => L_Module, x_msg => 'l_src_resource_list_id: ' || l_src_resource_list_id, x_log_level => 3);

Line 3867: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

3863: x_return_status => x_return_status,
3864: x_msg_count => l_msg_count,
3865: x_msg_data => l_msg_data);
3866:
3867: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3868: RAISE FND_API.G_EXC_ERROR;
3869: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3870: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3871: END IF;

Line 3868: RAISE FND_API.G_EXC_ERROR;

3864: x_msg_count => l_msg_count,
3865: x_msg_data => l_msg_data);
3866:
3867: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3868: RAISE FND_API.G_EXC_ERROR;
3869: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3870: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3871: END IF;
3872:

Line 3869: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

3865: x_msg_data => l_msg_data);
3866:
3867: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3868: RAISE FND_API.G_EXC_ERROR;
3869: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3870: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3871: END IF;
3872:
3873: IF l_txn_curr_code = l_projfunc_curr_code THEN

Line 3870: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3866:
3867: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3868: RAISE FND_API.G_EXC_ERROR;
3869: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3870: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3871: END IF;
3872:
3873: IF l_txn_curr_code = l_projfunc_curr_code THEN
3874: l_projfunc_cost_exch_rate := 1;

Line 3942: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

3938: x_return_status => x_return_status,
3939: x_msg_count => l_msg_count,
3940: x_msg_data => l_msg_data);
3941:
3942: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3943: RAISE FND_API.G_EXC_ERROR;
3944: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3945: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3946: END IF;

Line 3943: RAISE FND_API.G_EXC_ERROR;

3939: x_msg_count => l_msg_count,
3940: x_msg_data => l_msg_data);
3941:
3942: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3943: RAISE FND_API.G_EXC_ERROR;
3944: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3945: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3946: END IF;
3947:

Line 3944: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

3940: x_msg_data => l_msg_data);
3941:
3942: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3943: RAISE FND_API.G_EXC_ERROR;
3944: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3945: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3946: END IF;
3947:
3948: -- Bug 3951947 Should compare the source and target

Line 3945: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3941:
3942: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3943: RAISE FND_API.G_EXC_ERROR;
3944: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3945: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3946: END IF;
3947:
3948: -- Bug 3951947 Should compare the source and target
3949: -- projects' project currencies

Line 4028: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

4024: x_return_status => x_return_status,
4025: x_msg_count => l_msg_count,
4026: x_msg_data => l_msg_data);
4027:
4028: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4029: RAISE FND_API.G_EXC_ERROR;
4030: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4032: END IF;

Line 4029: RAISE FND_API.G_EXC_ERROR;

4025: x_msg_count => l_msg_count,
4026: x_msg_data => l_msg_data);
4027:
4028: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4029: RAISE FND_API.G_EXC_ERROR;
4030: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4032: END IF;
4033:

Line 4030: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

4026: x_msg_data => l_msg_data);
4027:
4028: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4029: RAISE FND_API.G_EXC_ERROR;
4030: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4032: END IF;
4033:
4034: IF l_txn_curr_code = l_projfunc_curr_code THEN

Line 4031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4027:
4028: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4029: RAISE FND_API.G_EXC_ERROR;
4030: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4032: END IF;
4033:
4034: IF l_txn_curr_code = l_projfunc_curr_code THEN
4035: l_projfunc_cost_exch_rate := 1;

Line 4103: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

4099: x_return_status => x_return_status,
4100: x_msg_count => l_msg_count,
4101: x_msg_data => l_msg_data);
4102:
4103: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4104: RAISE FND_API.G_EXC_ERROR;
4105: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4106: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4107: END IF;

Line 4104: RAISE FND_API.G_EXC_ERROR;

4100: x_msg_count => l_msg_count,
4101: x_msg_data => l_msg_data);
4102:
4103: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4104: RAISE FND_API.G_EXC_ERROR;
4105: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4106: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4107: END IF;
4108:

Line 4105: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

4101: x_msg_data => l_msg_data);
4102:
4103: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4104: RAISE FND_API.G_EXC_ERROR;
4105: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4106: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4107: END IF;
4108:
4109: -- Bug 3951947 Should compare the source and target

Line 4106: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4102:
4103: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4104: RAISE FND_API.G_EXC_ERROR;
4105: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4106: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4107: END IF;
4108:
4109: -- Bug 3951947 Should compare the source and target
4110: -- projects' project currencies

Line 4444: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

4440: x_planning_start_tbl => l_c_schedule_start_tbl,
4441: x_planning_end_tbl => l_c_schedule_end_tbl,
4442: x_return_status => x_return_status);
4443:
4444: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4445: RAISE FND_API.G_EXC_ERROR;
4446: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4448: END IF;

Line 4445: RAISE FND_API.G_EXC_ERROR;

4441: x_planning_end_tbl => l_c_schedule_end_tbl,
4442: x_return_status => x_return_status);
4443:
4444: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4445: RAISE FND_API.G_EXC_ERROR;
4446: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4448: END IF;
4449:

Line 4446: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

4442: x_return_status => x_return_status);
4443:
4444: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4445: RAISE FND_API.G_EXC_ERROR;
4446: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4448: END IF;
4449:
4450: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN

Line 4447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4443:
4444: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4445: RAISE FND_API.G_EXC_ERROR;
4446: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4448: END IF;
4449:
4450: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN
4451: pa_debug.g_err_stage:= 'TA: ' || L_FuncProc || ' Returned count on adjust: ' || l_c_resource_assgt_tbl.COUNT ;

Line 4607: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

4603: x_msg_data => l_msg_data);
4604:
4605: PA_TASK_PUB1.G_CALL_PJI_ROLLUP := null;
4606:
4607: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4608: RAISE FND_API.G_EXC_ERROR;
4609: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4610: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4611: END IF;

Line 4608: RAISE FND_API.G_EXC_ERROR;

4604:
4605: PA_TASK_PUB1.G_CALL_PJI_ROLLUP := null;
4606:
4607: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4608: RAISE FND_API.G_EXC_ERROR;
4609: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4610: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4611: END IF;
4612:

Line 4609: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

4605: PA_TASK_PUB1.G_CALL_PJI_ROLLUP := null;
4606:
4607: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4608: RAISE FND_API.G_EXC_ERROR;
4609: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4610: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4611: END IF;
4612:
4613: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN

Line 4610: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4606:
4607: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4608: RAISE FND_API.G_EXC_ERROR;
4609: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4610: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4611: END IF;
4612:
4613: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN
4614: pa_debug.g_err_stage:='TA: ' || L_FuncProc || 'Add_Planning_Transactions return status: ' || x_return_status;

Line 4662: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

4658: x_return_status => x_return_status,
4659: x_msg_count => l_msg_count,
4660: x_msg_data => l_msg_data);
4661:
4662: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4663: RAISE FND_API.G_EXC_ERROR;
4664: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4665: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4666: END IF;

Line 4663: RAISE FND_API.G_EXC_ERROR;

4659: x_msg_count => l_msg_count,
4660: x_msg_data => l_msg_data);
4661:
4662: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4663: RAISE FND_API.G_EXC_ERROR;
4664: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4665: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4666: END IF;
4667:

Line 4664: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

4660: x_msg_data => l_msg_data);
4661:
4662: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4663: RAISE FND_API.G_EXC_ERROR;
4664: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4665: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4666: END IF;
4667:
4668: END IF;

Line 4665: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4661:
4662: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
4663: RAISE FND_API.G_EXC_ERROR;
4664: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4665: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4666: END IF;
4667:
4668: END IF;
4669: -- \Bug 3974569.

Line 4722: WHEN FND_API.G_EXC_ERROR THEN

4718: DELETE pa_copy_asgmts_temp;
4719:
4720: EXCEPTION
4721:
4722: WHEN FND_API.G_EXC_ERROR THEN
4723: x_return_status := FND_API.G_RET_STS_ERROR;
4724: DELETE pa_copy_asgmts_temp;
4725: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 5) THEN
4726: PA_DEBUG.write_log (x_module => L_Module,

Line 4723: x_return_status := FND_API.G_RET_STS_ERROR;

4719:
4720: EXCEPTION
4721:
4722: WHEN FND_API.G_EXC_ERROR THEN
4723: x_return_status := FND_API.G_RET_STS_ERROR;
4724: DELETE pa_copy_asgmts_temp;
4725: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 5) THEN
4726: PA_DEBUG.write_log (x_module => L_Module,
4727: x_msg => 'Error:' || L_FuncProc || SQLERRM,

Line 4731: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4727: x_msg => 'Error:' || L_FuncProc || SQLERRM,
4728: x_log_level => 5);
4729: END IF;
4730:
4731: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4732: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4733: DELETE pa_copy_asgmts_temp;
4734: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
4735: PA_DEBUG.write_log (x_module => L_Module,

Line 4732: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4728: x_log_level => 5);
4729: END IF;
4730:
4731: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4732: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4733: DELETE pa_copy_asgmts_temp;
4734: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
4735: PA_DEBUG.write_log (x_module => L_Module,
4736: x_msg => 'Unexpected Error:' || L_FuncProc || SQLERRM,

Line 4742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4738: END IF;
4739: RAISE;
4740:
4741: WHEN OTHERS THEN
4742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4743: DELETE pa_copy_asgmts_temp;
4744: PA_TASK_PUB1.G_CALL_PJI_ROLLUP := null;
4745: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 6) THEN
4746: PA_DEBUG.write_log (x_module => L_Module,

Line 4795: p_resource_list_member_id <> FND_API.G_MISS_NUM THEN

4791: END IF;
4792:
4793:
4794: IF p_resource_list_member_id is NOT NULL AND
4795: p_resource_list_member_id <> FND_API.G_MISS_NUM THEN
4796:
4797:
4798: IF P_DEBUG_MODE = 'Y' AND (li_curr_level <= 3) THEN
4799: pa_debug.g_err_stage:='B4 query : ' || L_FuncProc;

Line 4936: p_fc_res_type_code <> FND_API.G_MISS_CHAR THEN

4932:
4933:
4934: IF p_fc_res_type_code is NOT NULL AND
4935:
4936: p_fc_res_type_code <> FND_API.G_MISS_CHAR THEN
4937:
4938:
4939:
4940: OPEN C_Fc_Check(p_fc_res_type_code);

Line 5741: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

5737: x_return_status => l_return_status,
5738: x_msg_count => l_msg_count,
5739: x_msg_data => l_msg_data );
5740:
5741: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
5742: -- 4537865
5743: l_baselined_version_id := l_new_baselined_version_id ; -- Though not used further ,assigning back to l_baselined_version_id to
5744: -- retain the older meaning
5745: END IF;

Line 5926: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

5922: x_msg_data => l_msg_data );
5923:
5924: -- 4537865
5925: -- Though not used further ,assigning l_new_baselined_version_id back to l_baselined_version_id to retain the older meaning
5926: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
5927: l_baselined_version_id := l_new_baselined_version_id ;
5928: END IF;
5929: --g_resource_assignment_id := p_resource_assignment_id;
5930: --END IF;

Line 6219: (p_char is NULL OR p_char = fnd_api.g_miss_char) THEN

6215:
6216:
6217: if p_mode = 'F' and
6218:
6219: (p_char is NULL OR p_char = fnd_api.g_miss_char) THEN
6220:
6221:
6222:
6223: return to_char(NULL);

Line 6229: (p_char is NULL OR p_char = fnd_api.g_miss_char) THEN

6225:
6226:
6227: elsif p_mode = 'B' and
6228:
6229: (p_char is NULL OR p_char = fnd_api.g_miss_char) THEN
6230:
6231:
6232:
6233: return fnd_api.g_miss_char;

Line 6233: return fnd_api.g_miss_char;

6229: (p_char is NULL OR p_char = fnd_api.g_miss_char) THEN
6230:
6231:
6232:
6233: return fnd_api.g_miss_char;
6234:
6235:
6236:
6237: elsif p_char is NOT NULL THEN

Line 6269: ( p_num is NULL OR p_num = fnd_api.g_miss_num ) THEN

6265:
6266:
6267: if p_mode = 'F' and
6268:
6269: ( p_num is NULL OR p_num = fnd_api.g_miss_num ) THEN
6270:
6271:
6272:
6273: return to_number(NULL);

Line 6279: ( p_num is NULL OR p_num = fnd_api.g_miss_num ) THEN

6275:
6276:
6277: elsif p_mode = 'B' and
6278:
6279: ( p_num is NULL OR p_num = fnd_api.g_miss_num ) THEN
6280:
6281:
6282:
6283: return fnd_api.g_miss_num;

Line 6283: return fnd_api.g_miss_num;

6279: ( p_num is NULL OR p_num = fnd_api.g_miss_num ) THEN
6280:
6281:
6282:
6283: return fnd_api.g_miss_num;
6284:
6285: elsif p_num is NOT NULL THEN
6286:
6287:

Line 6315: (p_date is NULL OR p_date = fnd_api.g_miss_date ) THEN

6311:
6312:
6313: if p_mode = 'F' and
6314:
6315: (p_date is NULL OR p_date = fnd_api.g_miss_date ) THEN
6316:
6317:
6318:
6319: return to_date(NULL);

Line 6327: (p_date is NULL OR p_date = fnd_api.g_miss_date ) THEN

6323:
6324:
6325: elsif p_mode = 'B' and
6326:
6327: (p_date is NULL OR p_date = fnd_api.g_miss_date ) THEN
6328:
6329:
6330:
6331: return fnd_api.g_miss_date;

Line 6331: return fnd_api.g_miss_date;

6327: (p_date is NULL OR p_date = fnd_api.g_miss_date ) THEN
6328:
6329:
6330:
6331: return fnd_api.g_miss_date;
6332:
6333: elsif p_date is NOT NULL THEN
6334:
6335:

Line 6396: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

6392:
6393:
6394: PROCEDURE CHECK_EDIT_OK(
6395: p_api_version_number IN NUMBER := 1.0
6396: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
6397: , p_commit IN VARCHAR2 := FND_API.G_FALSE
6398: , p_project_id IN NUMBER
6399: , p_pa_structure_version_id IN NUMBER
6400: , px_budget_version_id IN OUT NOCOPY NUMBER

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

6393:
6394: PROCEDURE CHECK_EDIT_OK(
6395: p_api_version_number IN NUMBER := 1.0
6396: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
6397: , p_commit IN VARCHAR2 := FND_API.G_FALSE
6398: , p_project_id IN NUMBER
6399: , p_pa_structure_version_id IN NUMBER
6400: , px_budget_version_id IN OUT NOCOPY NUMBER
6401: , x_return_status OUT NOCOPY VARCHAR2 -- 4537865

Line 6472: x_return_status := FND_API.G_RET_STS_SUCCESS;

6468:
6469: BEGIN
6470:
6471: x_msg_count := 0;
6472: x_return_status := FND_API.G_RET_STS_SUCCESS;
6473:
6474: l_user_id := fnd_global.user_id;
6475: l_login_id := fnd_global.login_id;
6476: l_resp_id := FND_GLOBAL.Resp_id;

Line 6484: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN

6480: PA_DEBUG.set_curr_function( p_function => 'CHECK_EDIT_OK',
6481: p_debug_mode => l_debug_mode );
6482: END IF;
6483:
6484: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
6485: FND_MSG_PUB.initialize;
6486: END IF;
6487:
6488: --Print All Input Params

Line 6531: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

6527: p_msg_data => l_msg_data,
6528: p_return_status => l_return_status,
6529: p_function_allowed => l_function_allowed);
6530:
6531: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
6532: THEN
6533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6534: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
6535: THEN

Line 6533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6529: p_function_allowed => l_function_allowed);
6530:
6531: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
6532: THEN
6533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6534: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
6535: THEN
6536: RAISE FND_API.G_EXC_ERROR;
6537: END IF;

Line 6534: ELSIF l_return_status = FND_API.G_RET_STS_ERROR

6530:
6531: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
6532: THEN
6533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6534: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
6535: THEN
6536: RAISE FND_API.G_EXC_ERROR;
6537: END IF;
6538:

Line 6536: RAISE FND_API.G_EXC_ERROR;

6532: THEN
6533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6534: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
6535: THEN
6536: RAISE FND_API.G_EXC_ERROR;
6537: END IF;
6538:
6539: IF l_function_allowed = 'N' THEN
6540: pa_interface_utils_pub.map_new_amg_msg

Line 6550: x_return_status := FND_API.G_RET_STS_ERROR;

6546: ,p_attribute2 => ''
6547: ,p_attribute3 => ''
6548: ,p_attribute4 => ''
6549: ,p_attribute5 => '');
6550: x_return_status := FND_API.G_RET_STS_ERROR;
6551: RAISE FND_API.G_EXC_ERROR;
6552: END IF;
6553: IF l_debug_mode = 'Y' THEN
6554: Pa_Debug.g_err_stage:= 'PA_TASK_ASSIGNMENT_UTILS :CHECK_EDIT_OK: Checking Security: UPDATE_TASK_ASSIGNMENT: Suceess';

Line 6551: RAISE FND_API.G_EXC_ERROR;

6547: ,p_attribute3 => ''
6548: ,p_attribute4 => ''
6549: ,p_attribute5 => '');
6550: x_return_status := FND_API.G_RET_STS_ERROR;
6551: RAISE FND_API.G_EXC_ERROR;
6552: END IF;
6553: IF l_debug_mode = 'Y' THEN
6554: Pa_Debug.g_err_stage:= 'PA_TASK_ASSIGNMENT_UTILS :CHECK_EDIT_OK: Checking Security: UPDATE_TASK_ASSIGNMENT: Suceess';
6555: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,l_debug_level3);

Line 6583: x_return_status := FND_API.G_RET_STS_ERROR;

6579: ,p_attribute2 => ''
6580: ,p_attribute3 => ''
6581: ,p_attribute4 => ''
6582: ,p_attribute5 => '');
6583: x_return_status := FND_API.G_RET_STS_ERROR;
6584: RAISE FND_API.G_EXC_ERROR;
6585: END IF;
6586: IF l_debug_mode = 'Y' THEN
6587: Pa_Debug.g_err_stage:= 'PA_TASK_ASSIGNMENT_UTILS :CHECK_EDIT_OK: Checking Security: Update/Query Project: Success';

Line 6584: RAISE FND_API.G_EXC_ERROR;

6580: ,p_attribute3 => ''
6581: ,p_attribute4 => ''
6582: ,p_attribute5 => '');
6583: x_return_status := FND_API.G_RET_STS_ERROR;
6584: RAISE FND_API.G_EXC_ERROR;
6585: END IF;
6586: IF l_debug_mode = 'Y' THEN
6587: Pa_Debug.g_err_stage:= 'PA_TASK_ASSIGNMENT_UTILS :CHECK_EDIT_OK: Checking Security: Update/Query Project: Success';
6588: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,l_debug_level3);

Line 6607: RAISE FND_API.G_EXC_ERROR;

6603: ,p_attribute3 => ''
6604: ,p_attribute4 => ''
6605: ,p_attribute5 => '');
6606: END IF;
6607: RAISE FND_API.G_EXC_ERROR;
6608: END IF;
6609:
6610: IF (px_budget_version_id is not null and px_budget_version_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) THEN
6611: OPEN C_validate_Budget_Version_Id(px_budget_version_id,p_project_id);

Line 6620: raise FND_API.G_EXC_ERROR;

6616: ,p_msg_name => 'PA_FP_INVALID_VERSION_ID'
6617: ,p_token1 => 'BUDGET_VERSION_ID'
6618: ,p_value1 => px_budget_version_id);
6619: CLOSE C_validate_Budget_Version_Id ;
6620: raise FND_API.G_EXC_ERROR;
6621: END IF;
6622: CLOSE C_validate_Budget_Version_Id ;
6623: ELSIF ( p_pa_structure_version_id IS NOT NULL AND
6624: ( p_pa_structure_version_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) )THEN

Line 6634: RAISE FND_API.G_EXC_ERROR;

6630: ( p_app_short_name => 'PA',
6631: p_msg_name => 'PA_INVALID_STR_VERSION_ID'
6632: );
6633: CLOSE c_validate_str_version_id;
6634: RAISE FND_API.G_EXC_ERROR;
6635: END IF;
6636: CLOSE c_validate_str_version_id;
6637: --Get the budget version_id
6638: OPEN C_Get_Budget_Version_Id(l_struct_elem_version_id);

Line 6663: x_return_status := FND_API.G_RET_STS_ERROR;

6659: -- PA_UTILS.ADD_MESSAGE
6660: --( p_app_short_name => 'PA',
6661: -- p_msg_name => 'PA_UPDATE_PUB_VER_ERR'
6662: --);
6663: x_return_status := FND_API.G_RET_STS_ERROR;
6664: RAISE FND_API.G_EXC_ERROR;
6665: END IF;
6666: IF l_debug_mode = 'Y' THEN
6667: Pa_Debug.g_err_stage:= 'PA_TASK_ASSIGNMENT_UTILS :CHECK_EDIT_OK: Calling Check_edit_ok: Success';

Line 6664: RAISE FND_API.G_EXC_ERROR;

6660: --( p_app_short_name => 'PA',
6661: -- p_msg_name => 'PA_UPDATE_PUB_VER_ERR'
6662: --);
6663: x_return_status := FND_API.G_RET_STS_ERROR;
6664: RAISE FND_API.G_EXC_ERROR;
6665: END IF;
6666: IF l_debug_mode = 'Y' THEN
6667: Pa_Debug.g_err_stage:= 'PA_TASK_ASSIGNMENT_UTILS :CHECK_EDIT_OK: Calling Check_edit_ok: Success';
6668: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,l_debug_level3);

Line 6680: x_return_status := FND_API.G_RET_STS_ERROR;

6676: (p_app_short_name => 'PA',
6677: p_msg_name => 'PA_FP_PROJ_VERSION_MISMATCH'
6678: );
6679: END IF;
6680: x_return_status := FND_API.G_RET_STS_ERROR;
6681: px_budget_version_id := null;
6682: RAISE FND_API.G_EXC_ERROR;
6683: ELSE
6684: px_budget_version_id := l_budget_version_id;

Line 6682: RAISE FND_API.G_EXC_ERROR;

6678: );
6679: END IF;
6680: x_return_status := FND_API.G_RET_STS_ERROR;
6681: px_budget_version_id := null;
6682: RAISE FND_API.G_EXC_ERROR;
6683: ELSE
6684: px_budget_version_id := l_budget_version_id;
6685: END IF;
6686: IF l_debug_mode = 'Y' THEN

Line 6696: WHEN FND_API.G_EXC_ERROR THEN

6692: END IF;
6693:
6694: EXCEPTION
6695:
6696: WHEN FND_API.G_EXC_ERROR THEN
6697:
6698: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6699: l_msg_count := Fnd_Msg_Pub.count_msg;
6700:

Line 6698: x_return_status := Fnd_Api.G_RET_STS_ERROR;

6694: EXCEPTION
6695:
6696: WHEN FND_API.G_EXC_ERROR THEN
6697:
6698: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6699: l_msg_count := Fnd_Msg_Pub.count_msg;
6700:
6701: -- 4537865
6702: px_budget_version_id := NULL ;

Line 6719: ( p_encoded => Fnd_Api.G_TRUE

6715:
6716: IF l_msg_count = 1 AND x_msg_data IS NULL
6717: THEN
6718: Pa_Interface_Utils_Pub.get_messages
6719: ( p_encoded => Fnd_Api.G_TRUE
6720: , p_msg_index => 1
6721: , p_msg_count => l_msg_count
6722: , p_msg_data => l_msg_data
6723: , p_data => l_data

Line 6736: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

6732: END IF;
6733:
6734: WHEN OTHERS THEN
6735:
6736: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6737: x_msg_count := 1;
6738: x_msg_data := SQLERRM;
6739: -- 4537865
6740: px_budget_version_id := NULL ;