710: FETCH l_check_proj_struct_ver_id_csr INTO l_validate_flag;
711: if l_check_proj_struct_ver_id_csr%NOTFOUND then
712: x_msg_count := x_msg_count + 1;
713: x_msg_data.extend(1);
714: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_INVLD_PROJ_STRUCT_VER');
715: x_return_status := 'E';
716: -- dbms_output.put_line('IMP_PROJECT: Raising ERROR PA_INVLD_PROJ_STRUCT_VER');
717: raise API_ERROR;
718: end if;
723: FETCH l_check_proj_struct_id_csr INTO l_validate_flag;
724: if l_check_proj_struct_id_csr%NOTFOUND then
725: x_msg_count := x_msg_count + 1;
726: x_msg_data.extend(1);
727: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_INVLD_PROJ_STRUCT_PR');
728: x_return_status := 'E';
729: -- dbms_output.put_line('IMP_PROJECT: Raising ERROR PA_INVLD_PROJ_STRUCT_PR');
730: raise API_ERROR;
731: end if;
737: if (p_structure_version_id is not NULL and p_structure_version_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM and p_structure_version_id <>0) then
738: OPEN l_check_proj_ver_id_csr (p_project_id, p_structure_version_id);
739: FETCH l_check_proj_ver_id_csr INTO l_validate_flag;
740: if l_check_proj_ver_id_csr%NOTFOUND then
741: -- fnd_message.set_name('PA', 'PA_INVLD_PROJ_VER_PR');
742: x_msg_count := x_msg_count + 1;
743: x_msg_data.extend(1);
744: -- fnd_msg_pub.add;
745: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_INVLD_PROJ_VER_PR');
741: -- fnd_message.set_name('PA', 'PA_INVLD_PROJ_VER_PR');
742: x_msg_count := x_msg_count + 1;
743: x_msg_data.extend(1);
744: -- fnd_msg_pub.add;
745: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_INVLD_PROJ_VER_PR');
746: -- x_msg_data(x_msg_count) := fnd_message.get;
747: x_return_status := 'E';
748: raise API_ERROR;
749: end if;
742: x_msg_count := x_msg_count + 1;
743: x_msg_data.extend(1);
744: -- fnd_msg_pub.add;
745: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_INVLD_PROJ_VER_PR');
746: -- x_msg_data(x_msg_count) := fnd_message.get;
747: x_return_status := 'E';
748: raise API_ERROR;
749: end if;
750: CLOSE l_check_proj_ver_id_csr;
759: FETCH l_get_structure_count_csr INTO l_struct_count;
760:
761: if l_struct_count <> 1 then
762: CLOSE l_get_structure_count_csr;
763: -- fnd_message.set_name('PA', 'PA_NO_STRUCTURE_ID');
764: x_msg_count := x_msg_count + 1;
765: x_msg_data.extend(1);
766: -- fnd_msg_pub.add;
767: -- x_msg_data(x_msg_count) := fnd_message.get;
763: -- fnd_message.set_name('PA', 'PA_NO_STRUCTURE_ID');
764: x_msg_count := x_msg_count + 1;
765: x_msg_data.extend(1);
766: -- fnd_msg_pub.add;
767: -- x_msg_data(x_msg_count) := fnd_message.get;
768: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_NO_STRUCTURE_ID');
769: x_return_status := 'E';
770: raise API_ERROR;
771: else
764: x_msg_count := x_msg_count + 1;
765: x_msg_data.extend(1);
766: -- fnd_msg_pub.add;
767: -- x_msg_data(x_msg_count) := fnd_message.get;
768: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_NO_STRUCTURE_ID');
769: x_return_status := 'E';
770: raise API_ERROR;
771: else
772: OPEN l_get_structure_id_csr(p_project_id);
797: -- bug fix 2358590: If it does not exist throw an error
798: if l_get_working_version_csr%NOTFOUND then
799: x_msg_count := x_msg_count + 1;
800: x_msg_data.extend(1);
801: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_PS_WP_VERSION_NOT_EXIST');
802: x_return_status := 'E';
803: raise API_ERROR;
804: end if;
805: CLOSE l_get_working_version_csr;
807: OPEN l_get_working_version_csr(l_structure_id);
808: FETCH l_get_working_version_csr INTO l_structure_version_id;
809: CLOSE l_get_working_version_csr;
810: elsif l_workplan_purpose = 'Y' then
811: -- fnd_message.set_name('PA', 'PA_NO_STRUCTURE_VER_ID');
812: x_msg_count := x_msg_count + 1;
813: x_msg_data.extend(1);
814: -- fnd_msg_pub.add;
815: -- x_msg_data(x_msg_count) := fnd_message.get;
811: -- fnd_message.set_name('PA', 'PA_NO_STRUCTURE_VER_ID');
812: x_msg_count := x_msg_count + 1;
813: x_msg_data.extend(1);
814: -- fnd_msg_pub.add;
815: -- x_msg_data(x_msg_count) := fnd_message.get;
816: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_NO_STRUCTURE_VER_ID');
817: x_return_status := 'E';
818: raise API_ERROR;
819: end if;
812: x_msg_count := x_msg_count + 1;
813: x_msg_data.extend(1);
814: -- fnd_msg_pub.add;
815: -- x_msg_data(x_msg_count) := fnd_message.get;
816: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_NO_STRUCTURE_VER_ID');
817: x_return_status := 'E';
818: raise API_ERROR;
819: end if;
820: */
826: else
827: OPEN l_get_struct_id_csr (l_structure_version_id);
828: FETCH l_get_struct_id_csr INTO l_structure_id;
829: if l_get_struct_id_csr%NOTFOUND then
830: -- hyau fnd_message.set_name('PA', 'PA_NO_STRUCTURE_VER_ID');
831: x_msg_count := x_msg_count + 1;
832: x_msg_data.extend(1);
833: -- hyau fnd_msg_pub.add;
834: -- hyau x_msg_data(x_msg_count) := fnd_message.get;
830: -- hyau fnd_message.set_name('PA', 'PA_NO_STRUCTURE_VER_ID');
831: x_msg_count := x_msg_count + 1;
832: x_msg_data.extend(1);
833: -- hyau fnd_msg_pub.add;
834: -- hyau x_msg_data(x_msg_count) := fnd_message.get;
835: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_NO_STRUCTURE_VER_ID');
836: x_return_status := 'E';
837: raise API_ERROR;
838: end if;
831: x_msg_count := x_msg_count + 1;
832: x_msg_data.extend(1);
833: -- hyau fnd_msg_pub.add;
834: -- hyau x_msg_data(x_msg_count) := fnd_message.get;
835: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_NO_STRUCTURE_VER_ID');
836: x_return_status := 'E';
837: raise API_ERROR;
838: end if;
839: CLOSE l_get_struct_id_csr;
853: END IF;
854:
855: x_msg_count := x_msg_count + 1;
856: x_msg_data.extend(1);
857: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_FUNCTION_SECURITY_ENFORCED');
858: --added for bug 2192242
859: fnd_message.set_name('PA', 'PA_FUNCTION_SECURITY_ENFORCED'); -- Fix for Bug # 4513291. Uncommented and moved below.
860: fnd_msg_pub.add; -- Fix for Bug # 4513291. Uncommented and moved below.
861:
855: x_msg_count := x_msg_count + 1;
856: x_msg_data.extend(1);
857: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_FUNCTION_SECURITY_ENFORCED');
858: --added for bug 2192242
859: fnd_message.set_name('PA', 'PA_FUNCTION_SECURITY_ENFORCED'); -- Fix for Bug # 4513291. Uncommented and moved below.
860: fnd_msg_pub.add; -- Fix for Bug # 4513291. Uncommented and moved below.
861:
862: -- x_msg_data(x_msg_count) := fnd_message.get;
863: x_return_status := 'E';
858: --added for bug 2192242
859: fnd_message.set_name('PA', 'PA_FUNCTION_SECURITY_ENFORCED'); -- Fix for Bug # 4513291. Uncommented and moved below.
860: fnd_msg_pub.add; -- Fix for Bug # 4513291. Uncommented and moved below.
861:
862: -- x_msg_data(x_msg_count) := fnd_message.get;
863: x_return_status := 'E';
864: raise API_ERROR;
865: END IF;
866:
903: EXCEPTION
904: WHEN OTHERS THEN
905: x_msg_count := x_msg_count + 1;
906: x_msg_data.extend(1);
907: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_INVALID_PROJECT_ID');
908: --added for bug 2192242
909: fnd_message.set_name('PA', 'PA_INVALID_PROJECT_ID');-- Fix for Bug # 4513291. Uncommented and moved below.
910: fnd_msg_pub.add; -- Fix for Bug # 4513291. Uncommented and moved below.
911: -- x_msg_data(x_msg_count) := fnd_message.get;
905: x_msg_count := x_msg_count + 1;
906: x_msg_data.extend(1);
907: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_INVALID_PROJECT_ID');
908: --added for bug 2192242
909: fnd_message.set_name('PA', 'PA_INVALID_PROJECT_ID');-- Fix for Bug # 4513291. Uncommented and moved below.
910: fnd_msg_pub.add; -- Fix for Bug # 4513291. Uncommented and moved below.
911: -- x_msg_data(x_msg_count) := fnd_message.get;
912: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_INVALID_PROJECT_ID');
913: x_return_status := 'E';
907: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_INVALID_PROJECT_ID');
908: --added for bug 2192242
909: fnd_message.set_name('PA', 'PA_INVALID_PROJECT_ID');-- Fix for Bug # 4513291. Uncommented and moved below.
910: fnd_msg_pub.add; -- Fix for Bug # 4513291. Uncommented and moved below.
911: -- x_msg_data(x_msg_count) := fnd_message.get;
912: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_INVALID_PROJECT_ID');
913: x_return_status := 'E';
914: raise API_ERROR;
915: END;
908: --added for bug 2192242
909: fnd_message.set_name('PA', 'PA_INVALID_PROJECT_ID');-- Fix for Bug # 4513291. Uncommented and moved below.
910: fnd_msg_pub.add; -- Fix for Bug # 4513291. Uncommented and moved below.
911: -- x_msg_data(x_msg_count) := fnd_message.get;
912: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_INVALID_PROJECT_ID');
913: x_return_status := 'E';
914: raise API_ERROR;
915: END;
916: --Sakthi
929:
930: -- Check project id
931:
932: if (p_project_id is null or p_project_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) then
933: fnd_message.set_name('PA', 'PA_NO_PROJECT_ID');
934: x_msg_count := x_msg_count + 1;
935: x_msg_data.extend(1);
936: --added for bug 2192242
937: fnd_msg_pub.add;
934: x_msg_count := x_msg_count + 1;
935: x_msg_data.extend(1);
936: --added for bug 2192242
937: fnd_msg_pub.add;
938: -- x_msg_data(x_msg_count) := fnd_message.get;
939: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_NO_PROJECT_ID');
940: x_return_status := 'E';
941:
942: raise API_ERROR;
935: x_msg_data.extend(1);
936: --added for bug 2192242
937: fnd_msg_pub.add;
938: -- x_msg_data(x_msg_count) := fnd_message.get;
939: x_msg_data(x_msg_count) := fnd_message.get_string('PA', 'PA_NO_PROJECT_ID');
940: x_return_status := 'E';
941:
942: raise API_ERROR;
943: end if ;
952: pa_debug.debug('Update Project Detals : Error PA_XC_NO_DATA_FOUND');
953: end if;
954:
955: CLOSE lock_project_record;
956: fnd_message.set_name('PA', 'PA_XC_NO_DATA_FOUND');
957: FND_MESSAGE.Set_token('ENTITY', 'PA_PROJECTS_ALL');
958: FND_MESSAGE.Set_token('PROJECT',to_char(p_project_id));
959: FND_MESSAGE.Set_token('TASK',NULL);
960: x_msg_count := x_msg_count + 1;
953: end if;
954:
955: CLOSE lock_project_record;
956: fnd_message.set_name('PA', 'PA_XC_NO_DATA_FOUND');
957: FND_MESSAGE.Set_token('ENTITY', 'PA_PROJECTS_ALL');
958: FND_MESSAGE.Set_token('PROJECT',to_char(p_project_id));
959: FND_MESSAGE.Set_token('TASK',NULL);
960: x_msg_count := x_msg_count + 1;
961: x_msg_data.extend(1);
954:
955: CLOSE lock_project_record;
956: fnd_message.set_name('PA', 'PA_XC_NO_DATA_FOUND');
957: FND_MESSAGE.Set_token('ENTITY', 'PA_PROJECTS_ALL');
958: FND_MESSAGE.Set_token('PROJECT',to_char(p_project_id));
959: FND_MESSAGE.Set_token('TASK',NULL);
960: x_msg_count := x_msg_count + 1;
961: x_msg_data.extend(1);
962: --added for bug 2192242
955: CLOSE lock_project_record;
956: fnd_message.set_name('PA', 'PA_XC_NO_DATA_FOUND');
957: FND_MESSAGE.Set_token('ENTITY', 'PA_PROJECTS_ALL');
958: FND_MESSAGE.Set_token('PROJECT',to_char(p_project_id));
959: FND_MESSAGE.Set_token('TASK',NULL);
960: x_msg_count := x_msg_count + 1;
961: x_msg_data.extend(1);
962: --added for bug 2192242
963: fnd_msg_pub.add;
960: x_msg_count := x_msg_count + 1;
961: x_msg_data.extend(1);
962: --added for bug 2192242
963: fnd_msg_pub.add;
964: x_msg_data(x_msg_count) := fnd_message.get;
965: x_return_status := 'E';
966:
967: raise API_ERROR;
968: end if;
1050:
1051: --dbms_output.put_line(l_return_status);
1052:
1053: -- Sakthi
1054: fnd_message.set_name('PA', l_err_stage);
1055: x_msg_count := x_msg_count + 1;
1056: x_msg_data.extend(1);
1057: --added for bug 2192242
1058: fnd_msg_pub.add;
1055: x_msg_count := x_msg_count + 1;
1056: x_msg_data.extend(1);
1057: --added for bug 2192242
1058: fnd_msg_pub.add;
1059: x_msg_data(x_msg_count) := fnd_message.get;
1060: -- Sakthi
1061:
1062: raise API_ERROR;
1063: end if;
1242: if (p_debug_mode = 'Y') then
1243: pa_debug.debug('Import-Project : Inside No Data Found Exception ...');
1244: end if;
1245:
1246: fnd_message.set_name('PA', 'PA_XC_NO_DATA_FOUND');
1247: x_msg_count := x_msg_count + 1;
1248: x_msg_data.extend(1);
1249: --added for bug 2192242
1250: fnd_msg_pub.add;
1247: x_msg_count := x_msg_count + 1;
1248: x_msg_data.extend(1);
1249: --added for bug 2192242
1250: fnd_msg_pub.add;
1251: x_msg_data(x_msg_count) := fnd_message.get;
1252: x_return_status := 'E';
1253:
1254: WHEN ROW_ALREADY_LOCKED THEN
1255: x_return_status := FND_API.G_RET_STS_ERROR;
1258: pa_debug.debug('Import-Project : Inside Row Already Locked Exception ...');
1259: end if;
1260:
1261: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1262: FND_MESSAGE.Set_Name('PA', 'PA_XC_ROW_ALREADY_LOCKED');
1263: FND_MESSAGE.Set_token('ENTITY', 'PA_PROJECTS_ALL');
1264: FND_MESSAGE.Set_token('PROJECT',to_char(P_PROJECT_ID));
1265: FND_MESSAGE.Set_token('TASK',NULL);
1266: x_msg_count := x_msg_count + 1;
1259: end if;
1260:
1261: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1262: FND_MESSAGE.Set_Name('PA', 'PA_XC_ROW_ALREADY_LOCKED');
1263: FND_MESSAGE.Set_token('ENTITY', 'PA_PROJECTS_ALL');
1264: FND_MESSAGE.Set_token('PROJECT',to_char(P_PROJECT_ID));
1265: FND_MESSAGE.Set_token('TASK',NULL);
1266: x_msg_count := x_msg_count + 1;
1267: x_msg_data.extend(1);
1260:
1261: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1262: FND_MESSAGE.Set_Name('PA', 'PA_XC_ROW_ALREADY_LOCKED');
1263: FND_MESSAGE.Set_token('ENTITY', 'PA_PROJECTS_ALL');
1264: FND_MESSAGE.Set_token('PROJECT',to_char(P_PROJECT_ID));
1265: FND_MESSAGE.Set_token('TASK',NULL);
1266: x_msg_count := x_msg_count + 1;
1267: x_msg_data.extend(1);
1268: --added for bug 2192242
1261: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1262: FND_MESSAGE.Set_Name('PA', 'PA_XC_ROW_ALREADY_LOCKED');
1263: FND_MESSAGE.Set_token('ENTITY', 'PA_PROJECTS_ALL');
1264: FND_MESSAGE.Set_token('PROJECT',to_char(P_PROJECT_ID));
1265: FND_MESSAGE.Set_token('TASK',NULL);
1266: x_msg_count := x_msg_count + 1;
1267: x_msg_data.extend(1);
1268: --added for bug 2192242
1269: fnd_msg_pub.add;
1266: x_msg_count := x_msg_count + 1;
1267: x_msg_data.extend(1);
1268: --added for bug 2192242
1269: fnd_msg_pub.add;
1270: x_msg_data(x_msg_count) := FND_MESSAGE.get;
1271: x_return_status := 'E';
1272: END IF;
1273:
1274: WHEN OTHERS THEN