354: pa_debug.write(x_Module=>'PA_STATUS_PUB.UPDATE_PROGRESS', x_Msg => 'Case 3 : object_type is passed', x_Log_Level=> 3);
355: END IF;
356:
357: IF p_object_type <> 'PA_ASSIGNMENTS' AND p_object_type <> 'PA_DELIVERABLES' AND p_object_type <> 'PA_TASKS' AND p_object_type <> 'PA_STRUCTURES' THEN
358: FND_MESSAGE.SET_NAME('PA','PA_PROG_WRONG_OBJ_TYPE');
359: FND_MSG_PUB.add;
360: p_return_status := FND_API.G_RET_STS_ERROR;
361: RAISE FND_API.G_EXC_ERROR;
362: ELSE
363: l_object_type := p_object_type;
364: END IF;
365:
366: IF ((l_object_type = 'PA_ASSIGNMENTS' OR l_object_type = 'PA_DELIVERABLES') AND p_structure_type = 'FINANCIAL') THEN
367: FND_MESSAGE.SET_NAME('PA','PA_PROG_ASGN_DEL_NOT_ALLOW_STR');
368: FND_MSG_PUB.add;
369: p_return_status := FND_API.G_RET_STS_ERROR;
370: RAISE FND_API.G_EXC_ERROR;
371: END IF;
560: --or ( l_object_version_id is null AND l_object_type <> 'PA_DELIVERABLES')--BUG 3746647
561: or ( l_object_version_id is null)
562: or ( l_structure_version_id is null AND l_object_type <> 'PA_DELIVERABLES' )
563: ) THEN
564: FND_MESSAGE.SET_NAME('PA','PA_TP_INV_PROJ_STRUC_INFO');
565: FND_MSG_PUB.add;
566: p_return_status := FND_API.G_RET_STS_ERROR;
567: RAISE FND_API.G_EXC_ERROR;
568: END IF;
932:
933: p_return_status := FND_API.G_RET_STS_ERROR ;
934: IF FND_MSG_PUB.Check_Msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
935: THEN
936: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED');
937: FND_MESSAGE.SET_TOKEN('ENTITY', 'PERCENT_COMPLETE');
938: FND_MSG_PUB.Add;
939: END IF;
940: ROLLBACK TO Update_Progress_Pub;
933: p_return_status := FND_API.G_RET_STS_ERROR ;
934: IF FND_MSG_PUB.Check_Msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
935: THEN
936: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED');
937: FND_MESSAGE.SET_TOKEN('ENTITY', 'PERCENT_COMPLETE');
938: FND_MSG_PUB.Add;
939: END IF;
940: ROLLBACK TO Update_Progress_Pub;
941: FND_MSG_PUB.Count_And_Get
1131: THEN
1132: RAISE FND_API.G_EXC_ERROR;
1133: END IF;
1134: IF l_function_allowed = 'N' THEN
1135: FND_MESSAGE.SET_NAME('PA','PA_FUNCTION_SECURITY_ENFORCED');
1136: FND_MSG_PUB.add;
1137: p_return_status := FND_API.G_RET_STS_ERROR;
1138: RAISE FND_API.G_EXC_ERROR;
1139: END IF;
1166:
1167: -- The user does not have query privileges on this project
1168: -- Hence, cannot update the project.Raise error
1169:
1170: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
1171: FND_MSG_PUB.add;
1172: p_return_status := FND_API.G_RET_STS_ERROR;
1173: RAISE FND_API.G_EXC_ERROR;
1174: ELSE
1179:
1180: -- The user does not have update privileges on this project
1181: -- Hence , raise error
1182:
1183: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
1184: FND_MSG_PUB.add;
1185: p_return_status := FND_API.G_RET_STS_ERROR;
1186: RAISE FND_API.G_EXC_ERROR;
1187: END IF;
1414: IF (SQL%ROWCOUNT = 0)
1415: THEN
1416: IF FND_MSG_PUB.Check_Msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1417: THEN
1418: FND_MESSAGE.SET_NAME('PA','PA_EV_INSERT_ERROR');
1419: FND_MSG_PUB.Add;
1420: END IF;
1421: RAISE FND_API.G_EXC_ERROR;
1422: END IF;
1451: p_return_status := FND_API.G_RET_STS_ERROR ;
1452:
1453: IF FND_MSG_PUB.Check_Msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1454: THEN
1455: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED');
1456: FND_MESSAGE.SET_TOKEN('ENTITY', 'EARNED_VALUE');
1457: FND_MSG_PUB.Add;
1458: END IF;
1459:
1452:
1453: IF FND_MSG_PUB.Check_Msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1454: THEN
1455: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED');
1456: FND_MESSAGE.SET_TOKEN('ENTITY', 'EARNED_VALUE');
1457: FND_MSG_PUB.Add;
1458: END IF;
1459:
1460: ROLLBACK TO Update_Progress_Pub;
2162: G_PROJECT_ID := l_project_id_out;
2163:
2164:
2165: IF(G_TASK_PROGRESS_tbl_count = 0) THEN
2166: FND_MESSAGE.SET_NAME('PA','PA_NO_TASK_PROGRESS_UPDATE');
2167: FND_MSG_PUB.add;
2168: p_return_status := FND_API.G_RET_STS_ERROR;
2169: RAISE FND_API.G_EXC_ERROR;
2170: -- Bug 3606627 : Changed the following if condition to >=1 from =1
3069: THEN
3070: RAISE FND_API.G_EXC_ERROR;
3071: END IF;
3072: IF l_function_allowed = 'N' THEN
3073: FND_MESSAGE.SET_NAME('PA','PA_FUNCTION_SECURITY_ENFORCED');
3074: FND_MSG_PUB.add;
3075: p_return_status := FND_API.G_RET_STS_ERROR;
3076: RAISE FND_API.G_EXC_ERROR;
3077: END IF;
3086:
3087: -- The user does not have query privileges on this project
3088: -- Hence, cannot update the project.Raise error
3089:
3090: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
3091: FND_MSG_PUB.add;
3092: p_return_status := FND_API.G_RET_STS_ERROR;
3093: RAISE FND_API.G_EXC_ERROR;
3094: ELSE
3099:
3100: -- The user does not have update privileges on this project
3101: -- Hence , raise error
3102:
3103: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
3104: FND_MSG_PUB.add;
3105: p_return_status := FND_API.G_RET_STS_ERROR;
3106: RAISE FND_API.G_EXC_ERROR;
3107: END IF;