DBA Data[Home] [Help]

APPS.PA_PROJ_ELEMENTS_UTILS dependencies on FND_API

Line 164: <> FND_API.G_TRUE) THEN

160:
161: --check if user can edit
162: IF (PA_SECURITY_PVT.check_user_privilege('PA_PAXPREPR_OPT_WORKPLAN_STR', 'PA_PROJECTS', p_project_id
163: , 'N') -- Fix for Bug # 4319137.
164: <> FND_API.G_TRUE) THEN
165: IF p_element_id is NOT NULL THEN
166: IF (l_is_task_manager_flag = 'Y') THEN --bug 4239490 replaced the is_task_manager api call with the variable.
167: IF (PA_SECURITY_PVT.check_user_privilege('PA_TASKS_UPDATE_DETAILS', 'PA_PROJECTS', p_project_id
168: , 'N') -- Fix for Bug # 4319137.

Line 169: <> FND_API.G_TRUE) THEN

165: IF p_element_id is NOT NULL THEN
166: IF (l_is_task_manager_flag = 'Y') THEN --bug 4239490 replaced the is_task_manager api call with the variable.
167: IF (PA_SECURITY_PVT.check_user_privilege('PA_TASKS_UPDATE_DETAILS', 'PA_PROJECTS', p_project_id
168: , 'N') -- Fix for Bug # 4319137.
169: <> FND_API.G_TRUE) THEN
170: -- Bug 4533152
171: IF p_add_error_flag = 'Y' THEN
172: PA_UTILS.ADD_MESSAGE
173: (p_app_short_name => 'PA',

Line 449: x_return_status := FND_API.G_RET_STS_SUCCESS;

445: AND ppevs.element_version_id = c_struc_ver_id;*/
446: BEGIN
447:
448: x_msg_count := 0;
449: x_return_status := FND_API.G_RET_STS_SUCCESS;
450: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
451:
452:
453: IF l_debug_mode = 'Y' THEN

Line 551: x_return_status := FND_API.G_RET_STS_ERROR;

547: EXCEPTION
548:
549: WHEN Invalid_Arg_Exc_WP THEN
550:
551: x_return_status := FND_API.G_RET_STS_ERROR;
552: x_msg_count := FND_MSG_PUB.count_msg;
553:
554: -- 4537865 RESET OUT PARAMS
555: x_pev_structure_id := NULL ;

Line 562: (p_encoded => FND_API.G_TRUE

558: x_record_version_number := NULL ;
559:
560: IF x_msg_count = 1 and x_msg_data IS NULL THEN
561: PA_INTERFACE_UTILS_PUB.get_messages
562: (p_encoded => FND_API.G_TRUE
563: ,p_msg_index => 1
564: ,p_msg_count => x_msg_count
565: ,p_msg_data => x_msg_data
566: ,p_data => l_data, -- 4537865

Line 580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

576:
577: RETURN;
578:
579: WHEN others THEN
580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
581: x_msg_count := 1;
582: x_msg_data := SQLERRM;
583:
584: -- 4537865 RESET OUT PARAMS

Line 895: -- x_return_status := FND_API.G_RET_STS_ERROR;

891: -- fetch get_lock_user into l_dummy;
892: -- if get_lock_user%NOTFOUND then
893: -- --the structure version is locked by another user.
894: -- close get_lock_user;
895: -- x_return_status := FND_API.G_RET_STS_ERROR;
896: -- x_error_message_code := 'PA_PS_STRUC_VER_LOCKED';
897: -- --return;
898: -- raise FND_API.G_EXC_ERROR;
899: --

Line 898: -- raise FND_API.G_EXC_ERROR;

894: -- close get_lock_user;
895: -- x_return_status := FND_API.G_RET_STS_ERROR;
896: -- x_error_message_code := 'PA_PS_STRUC_VER_LOCKED';
897: -- --return;
898: -- raise FND_API.G_EXC_ERROR;
899: --
900: -- end if;
901: -- close get_lock_user;
902:

Line 911: -- x_return_status := FND_API.G_RET_STS_ERROR;

907: --versioning changes
908: --
909: -- If (PA_PROJECT_STRUCTURE_UTILS.Check_Struc_Ver_Published(p_project_id, p_parent_structure_ver_id) = 'Y') THEN
910: --version is published. Error.
911: -- x_return_status := FND_API.G_RET_STS_ERROR;
912: -- x_error_message_code := 'PA_PS_STRUC_VER_LOCKED';
913: -- return;
914: -- END IF;
915:

Line 933: x_return_status := FND_API.G_RET_STS_ERROR;

929: CLOSE cur_wp_proj_elem_ver;
930:
931:
932: IF (1 = PA_CONTROL_ITEMS_UTILS.CHECK_CONTROL_ITEM_EXISTS(p_project_id, l_proj_element_id) ) THEN
933: x_return_status := FND_API.G_RET_STS_ERROR;
934: --use this error message according to mthai: PA_CI_ITEMS_EXIST
935: --changed to PA_CI_PROJ_TASK_IN_USE, according to Margaret
936: x_error_message_code := 'PA_CI_PROJ_TASK_IN_USE';
937: return;

Line 954: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

950: x_errorcode => l_err_code ,
951: x_msg_count => l_msg_count ,
952: x_msg_data => l_msg_data );
953:
954: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
955: x_return_status := l_return_status;
956: return;
957: END IF;
958: -- anlee end of changes

Line 976: x_return_status := FND_API.G_RET_STS_ERROR;

972: -- 4201927 commented below code as check_task_progress_exist is deriving project id and then
973: -- calling check_object_has_prog api
974: /*
975: IF pa_project_structure_utils.check_task_progress_exist(l_proj_element_id) = 'Y' THEN
976: x_return_status := FND_API.G_RET_STS_ERROR;
977: x_error_message_code := 'PA_PS_TASK_HAS_PROG';
978: raise FND_API.G_EXC_ERROR;
979: END IF;
980: */

Line 978: raise FND_API.G_EXC_ERROR;

974: /*
975: IF pa_project_structure_utils.check_task_progress_exist(l_proj_element_id) = 'Y' THEN
976: x_return_status := FND_API.G_RET_STS_ERROR;
977: x_error_message_code := 'PA_PS_TASK_HAS_PROG';
978: raise FND_API.G_EXC_ERROR;
979: END IF;
980: */
981:
982: -- using the direct api check_object_has_prog

Line 985: x_return_status := FND_API.G_RET_STS_ERROR;

981:
982: -- using the direct api check_object_has_prog
983:
984: IF pa_progress_utils.check_object_has_prog(p_project_id => p_project_id, p_object_id => l_proj_element_id) = 'Y' THEN
985: x_return_status := FND_API.G_RET_STS_ERROR;
986: x_error_message_code := 'PA_PS_TASK_HAS_PROG';
987: raise FND_API.G_EXC_ERROR;
988: END IF;
989: -- 4201927 end

Line 987: raise FND_API.G_EXC_ERROR;

983:
984: IF pa_progress_utils.check_object_has_prog(p_project_id => p_project_id, p_object_id => l_proj_element_id) = 'Y' THEN
985: x_return_status := FND_API.G_RET_STS_ERROR;
986: x_error_message_code := 'PA_PS_TASK_HAS_PROG';
987: raise FND_API.G_EXC_ERROR;
988: END IF;
989: -- 4201927 end
990:
991: -- 4201927 , delete dlvr to task association api should get called for

Line 1006: IF l_return_status = FND_API.G_RET_STS_ERROR then

1002: ,x_msg_data => l_msg_data
1003: );
1004:
1005: -- 4537865 Changed from x_return_status to l_return_status
1006: IF l_return_status = FND_API.G_RET_STS_ERROR then
1007: RAISE FND_API.G_EXC_ERROR;
1008: End If;
1009:
1010: -- 4201927 end

Line 1007: RAISE FND_API.G_EXC_ERROR;

1003: );
1004:
1005: -- 4537865 Changed from x_return_status to l_return_status
1006: IF l_return_status = FND_API.G_RET_STS_ERROR then
1007: RAISE FND_API.G_EXC_ERROR;
1008: End If;
1009:
1010: -- 4201927 end
1011:

Line 1014: x_return_status := FND_API.G_RET_STS_ERROR;

1010: -- 4201927 end
1011:
1012: /*
1013: IF pa_progress_utils.PROJ_TASK_PROG_EXISTS(p_project_id, l_proj_element_id) = 'Y' THEN
1014: x_return_status := FND_API.G_RET_STS_ERROR;
1015: x_error_message_code := 'PA_PS_TASK_HAS_PROG';
1016: raise FND_API.G_EXC_ERROR;
1017: END IF;
1018:

Line 1016: raise FND_API.G_EXC_ERROR;

1012: /*
1013: IF pa_progress_utils.PROJ_TASK_PROG_EXISTS(p_project_id, l_proj_element_id) = 'Y' THEN
1014: x_return_status := FND_API.G_RET_STS_ERROR;
1015: x_error_message_code := 'PA_PS_TASK_HAS_PROG';
1016: raise FND_API.G_EXC_ERROR;
1017: END IF;
1018:
1019: IF pa_progress_utils.progress_record_exists( p_task_version_id, 'PA_TASKS'
1020: ,p_project_id) = 'Y' -- Fixed bug # 3688901.

Line 1022: x_return_status := FND_API.G_RET_STS_ERROR;

1018:
1019: IF pa_progress_utils.progress_record_exists( p_task_version_id, 'PA_TASKS'
1020: ,p_project_id) = 'Y' -- Fixed bug # 3688901.
1021: THEN
1022: x_return_status := FND_API.G_RET_STS_ERROR;
1023: x_error_message_code := 'PA_PS_CANT_DELETE_TASK_VER';
1024: PA_UTILS.ADD_MESSAGE('PA', 'PA_PS_CANT_DELETE_TASK_VER');
1025: raise FND_API.G_EXC_ERROR;
1026: END IF;

Line 1025: raise FND_API.G_EXC_ERROR;

1021: THEN
1022: x_return_status := FND_API.G_RET_STS_ERROR;
1023: x_error_message_code := 'PA_PS_CANT_DELETE_TASK_VER';
1024: PA_UTILS.ADD_MESSAGE('PA', 'PA_PS_CANT_DELETE_TASK_VER');
1025: raise FND_API.G_EXC_ERROR;
1026: END IF;
1027: */
1028: END IF;
1029:

Line 1057: x_return_status := FND_API.G_RET_STS_ERROR;

1053: x_err_stage => l_err_stage,
1054: x_err_stack => l_err_stack);
1055:
1056: IF (l_err_code <> 0) THEN
1057: x_return_status := FND_API.G_RET_STS_ERROR;
1058: x_error_message_code := l_err_stage;
1059: raise FND_API.G_EXC_ERROR;
1060: END IF;
1061: END IF;

Line 1059: raise FND_API.G_EXC_ERROR;

1055:
1056: IF (l_err_code <> 0) THEN
1057: x_return_status := FND_API.G_RET_STS_ERROR;
1058: x_error_message_code := l_err_stage;
1059: raise FND_API.G_EXC_ERROR;
1060: END IF;
1061: END IF;
1062:
1063: -- END IF;

Line 1074: -- x_return_status := FND_API.G_RET_STS_ERROR;

1070: -- fetch get_link into l_dummy;
1071: -- if get_link%FOUND then
1072: -- --a link exists
1073: -- close get_link;
1074: -- x_return_status := FND_API.G_RET_STS_ERROR;
1075: -- x_error_message_code := 'PA_PS_LINK_EXISTS';
1076: -- return;
1077: -- end if;
1078: -- close get_link;

Line 1080: x_return_status := FND_API.G_RET_STS_SUCCESS;

1076: -- return;
1077: -- end if;
1078: -- close get_link;
1079:
1080: x_return_status := FND_API.G_RET_STS_SUCCESS;
1081:
1082: EXCEPTION
1083: WHEN FND_API.G_EXC_ERROR THEN
1084: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1083: WHEN FND_API.G_EXC_ERROR THEN

1079:
1080: x_return_status := FND_API.G_RET_STS_SUCCESS;
1081:
1082: EXCEPTION
1083: WHEN FND_API.G_EXC_ERROR THEN
1084: x_return_status := FND_API.G_RET_STS_ERROR;
1085:
1086: -- 4537865
1087: -- Not Resetting x_error_message_code unconditionally as after its population only

Line 1084: x_return_status := FND_API.G_RET_STS_ERROR;

1080: x_return_status := FND_API.G_RET_STS_SUCCESS;
1081:
1082: EXCEPTION
1083: WHEN FND_API.G_EXC_ERROR THEN
1084: x_return_status := FND_API.G_RET_STS_ERROR;
1085:
1086: -- 4537865
1087: -- Not Resetting x_error_message_code unconditionally as after its population only
1088: -- it will reach here. In case if its not populated then,populate the generic msg

Line 1095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1091: x_error_message_code := 'PA_CHECK_DELETE_TASK_FAILED';
1092: END IF;
1093:
1094: WHEN OTHERS THEN
1095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1096:
1097: -- 4537865
1098: x_error_message_code := SQLCODE;
1099: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',

Line 1229: x_return_status := FND_API.G_RET_STS_SUCCESS;

1225: ,x_error_message_code OUT NOCOPY VARCHAR2 -- 4537865
1226: ) IS
1227:
1228: begin
1229: x_return_status := FND_API.G_RET_STS_SUCCESS;
1230:
1231: IF p_scheduled_start_date IS NOT NULL AND p_scheduled_end_date IS NOT NULL
1232: THEN
1233: IF p_scheduled_start_date > p_scheduled_end_date

Line 1235: x_return_status := FND_API.G_RET_STS_ERROR;

1231: IF p_scheduled_start_date IS NOT NULL AND p_scheduled_end_date IS NOT NULL
1232: THEN
1233: IF p_scheduled_start_date > p_scheduled_end_date
1234: THEN
1235: x_return_status := FND_API.G_RET_STS_ERROR;
1236: x_error_message_code := 'PA_PS_SCH_ST_DT_GT_EN_DT';
1237: return;
1238: END IF;
1239: END IF;

Line 1245: x_return_status := FND_API.G_RET_STS_ERROR;

1241: IF p_obligation_start_date IS NOT NULL AND p_obligation_end_date IS NOT NULL
1242: THEN
1243: IF p_obligation_start_date > p_obligation_end_date
1244: THEN
1245: x_return_status := FND_API.G_RET_STS_ERROR;
1246: x_error_message_code := 'PA_PS_OBL_ST_DT_GT_EN_DT';
1247: return;
1248: END IF;
1249: END IF;

Line 1255: x_return_status := FND_API.G_RET_STS_ERROR;

1251: IF p_actual_start_date IS NOT NULL AND p_actual_finish_date IS NOT NULL
1252: THEN
1253: IF p_actual_start_date > p_actual_finish_date
1254: THEN
1255: x_return_status := FND_API.G_RET_STS_ERROR;
1256: x_error_message_code := 'PA_PS_ACT_ST_DT_GT_EN_DT';
1257: return;
1258: END IF;
1259: END IF;

Line 1265: x_return_status := FND_API.G_RET_STS_ERROR;

1261: IF p_estimate_start_date IS NOT NULL AND p_estimate_finish_date IS NOT NULL
1262: THEN
1263: IF p_estimate_start_date > p_estimate_finish_date
1264: THEN
1265: x_return_status := FND_API.G_RET_STS_ERROR;
1266: x_error_message_code := 'PA_PS_EST_ST_DT_GT_EN_DT';
1267: return;
1268: END IF;
1269: END IF;

Line 1275: x_return_status := FND_API.G_RET_STS_ERROR;

1271: IF p_early_start_date IS NOT NULL AND p_early_end_date IS NOT NULL
1272: THEN
1273: IF p_early_start_date > p_early_end_date
1274: THEN
1275: x_return_status := FND_API.G_RET_STS_ERROR;
1276: x_error_message_code := 'PA_PS_ERL_ST_DT_GT_EN_DT';
1277: return;
1278: END IF;
1279: END IF;

Line 1285: x_return_status := FND_API.G_RET_STS_ERROR;

1281: IF p_late_start_date IS NOT NULL AND p_late_end_date IS NOT NULL
1282: THEN
1283: IF p_late_start_date > p_late_end_date
1284: THEN
1285: x_return_status := FND_API.G_RET_STS_ERROR;
1286: x_error_message_code := 'PA_PS_LAT_ST_DT_GT_EN_DT';
1287: return;
1288: END IF;
1289: END IF;

Line 1293: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1289: END IF;
1290: -- 4537865
1291: EXCEPTION
1292: WHEN OTHERS THEN
1293: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1294: x_error_message_code := SQLCODE ;
1295: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
1296: p_procedure_name => 'Check_Date_range',
1297: p_error_text => SUBSTRB(SQLERRM,1,240));

Line 1327: x_return_status := FND_API.G_RET_STS_SUCCESS;

1323: into x_project_id
1324: from pa_projects_all
1325: where segment1 = p_project_name;
1326: END IF;
1327: x_return_status := FND_API.G_RET_STS_SUCCESS;
1328: EXCEPTION
1329: WHEN no_data_found THEN
1330: x_return_status:= FND_API.G_RET_STS_ERROR;
1331: x_error_msg_code:= 'PA_PS_INVALID_PRJ_NAME';

Line 1330: x_return_status:= FND_API.G_RET_STS_ERROR;

1326: END IF;
1327: x_return_status := FND_API.G_RET_STS_SUCCESS;
1328: EXCEPTION
1329: WHEN no_data_found THEN
1330: x_return_status:= FND_API.G_RET_STS_ERROR;
1331: x_error_msg_code:= 'PA_PS_INVALID_PRJ_NAME';
1332: x_project_id := NULL ; -- 4537865
1333:
1334: WHEN too_many_rows THEN

Line 1335: x_return_status:= FND_API.G_RET_STS_ERROR;

1331: x_error_msg_code:= 'PA_PS_INVALID_PRJ_NAME';
1332: x_project_id := NULL ; -- 4537865
1333:
1334: WHEN too_many_rows THEN
1335: x_return_status:= FND_API.G_RET_STS_ERROR;
1336: x_error_msg_code:= 'PA_PS_PRJ_NAME_NOT_UNIQUE';
1337: x_project_id := NULL ; -- 4537865
1338: WHEN OTHERS THEN
1339: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;

Line 1339: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;

1335: x_return_status:= FND_API.G_RET_STS_ERROR;
1336: x_error_msg_code:= 'PA_PS_PRJ_NAME_NOT_UNIQUE';
1337: x_project_id := NULL ; -- 4537865
1338: WHEN OTHERS THEN
1339: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1340: x_project_id := NULL ; -- 4537865
1341: RAISE;
1342: END Project_Name_Or_Id;
1343:

Line 1374: x_return_status := FND_API.G_RET_STS_SUCCESS;

1370: AND ppe.name = p_task_name
1371: AND ppev.parent_structure_version_id = p_structure_version_id;
1372: null;
1373: END IF;
1374: x_return_status := FND_API.G_RET_STS_SUCCESS;
1375: EXCEPTION
1376: WHEN no_data_found THEN
1377: x_return_status:= FND_API.G_RET_STS_ERROR;
1378: x_error_msg_code:= 'PA_PS_INVALID_TSK_NAME';

Line 1377: x_return_status:= FND_API.G_RET_STS_ERROR;

1373: END IF;
1374: x_return_status := FND_API.G_RET_STS_SUCCESS;
1375: EXCEPTION
1376: WHEN no_data_found THEN
1377: x_return_status:= FND_API.G_RET_STS_ERROR;
1378: x_error_msg_code:= 'PA_PS_INVALID_TSK_NAME';
1379: -- 4537865
1380: x_task_version_id := NULL ;
1381:

Line 1383: x_return_status:= FND_API.G_RET_STS_ERROR;

1379: -- 4537865
1380: x_task_version_id := NULL ;
1381:
1382: WHEN too_many_rows THEN
1383: x_return_status:= FND_API.G_RET_STS_ERROR;
1384: x_error_msg_code:= 'PA_PS_TSK_NAME_NOT_UNIQUE';
1385: -- 4537865
1386: x_task_version_id := NULL ;
1387:

Line 1389: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;

1385: -- 4537865
1386: x_task_version_id := NULL ;
1387:
1388: WHEN OTHERS THEN
1389: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1390: -- 4537865
1391: x_task_version_id := NULL ;
1392: x_error_msg_code:= SQLCODE ;
1393:

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

2738: ,p_parent_structure_ver_id => p_parent_structure_ver_id
2739: ,x_return_status => x_return_status
2740: ,x_error_message_code => x_error_message_code
2741: );
2742: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2743: raise FND_API.G_EXC_ERROR;
2744: END IF;
2745:
2746:

Line 2743: raise FND_API.G_EXC_ERROR;

2739: ,x_return_status => x_return_status
2740: ,x_error_message_code => x_error_message_code
2741: );
2742: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2743: raise FND_API.G_EXC_ERROR;
2744: END IF;
2745:
2746:
2747: -- 4201927 commented below code for performance issue

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

2756: ,p_parent_structure_ver_id => p_parent_structure_ver_id
2757: ,x_return_status => x_return_status
2758: ,x_error_message_code => x_error_message_code
2759: );
2760: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2761: raise FND_API.G_EXC_ERROR;
2762: END IF;
2763: END LOOP;
2764: CLOSE c1;

Line 2761: raise FND_API.G_EXC_ERROR;

2757: ,x_return_status => x_return_status
2758: ,x_error_message_code => x_error_message_code
2759: );
2760: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2761: raise FND_API.G_EXC_ERROR;
2762: END IF;
2763: END LOOP;
2764: CLOSE c1;
2765: */

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

2779: ,p_parent_structure_ver_id => p_parent_structure_ver_id
2780: ,x_return_status => x_return_status
2781: ,x_error_message_code => x_error_message_code
2782: );
2783: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2784: raise FND_API.G_EXC_ERROR;
2785: END IF;
2786:
2787: END LOOP;

Line 2784: raise FND_API.G_EXC_ERROR;

2780: ,x_return_status => x_return_status
2781: ,x_error_message_code => x_error_message_code
2782: );
2783: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2784: raise FND_API.G_EXC_ERROR;
2785: END IF;
2786:
2787: END LOOP;
2788: END IF;

Line 2792: x_return_status := FND_API.G_RET_STS_SUCCESS;

2788: END IF;
2789:
2790: -- 4201927 end
2791:
2792: x_return_status := FND_API.G_RET_STS_SUCCESS;
2793:
2794: EXCEPTION
2795: WHEN FND_API.G_EXC_ERROR THEN
2796: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2795: WHEN FND_API.G_EXC_ERROR THEN

2791:
2792: x_return_status := FND_API.G_RET_STS_SUCCESS;
2793:
2794: EXCEPTION
2795: WHEN FND_API.G_EXC_ERROR THEN
2796: x_return_status := FND_API.G_RET_STS_ERROR;
2797: -- 4537865 NOT RESETTING x_error_message_code AS IT WILL reach this point only after x_error_message_code is set
2798: WHEN OTHERS THEN
2799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2796: x_return_status := FND_API.G_RET_STS_ERROR;

2792: x_return_status := FND_API.G_RET_STS_SUCCESS;
2793:
2794: EXCEPTION
2795: WHEN FND_API.G_EXC_ERROR THEN
2796: x_return_status := FND_API.G_RET_STS_ERROR;
2797: -- 4537865 NOT RESETTING x_error_message_code AS IT WILL reach this point only after x_error_message_code is set
2798: WHEN OTHERS THEN
2799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2800: -- 4537865

Line 2799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2795: WHEN FND_API.G_EXC_ERROR THEN
2796: x_return_status := FND_API.G_RET_STS_ERROR;
2797: -- 4537865 NOT RESETTING x_error_message_code AS IT WILL reach this point only after x_error_message_code is set
2798: WHEN OTHERS THEN
2799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2800: -- 4537865
2801: x_error_message_code := SQLCODE ;
2802: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
2803: p_procedure_name => 'Check_Del_all_task_Ver_Ok

Line 3350: raise FND_API.G_EXC_ERROR;

3346: FETCH c3 INTO l_xtra_task_ver_id, l_task_ver_status;
3347: EXIT WHEN c3%NOTFOUND;
3348: IF (l_task_ver_status = 'PUBLISHED') THEN
3349: x_error_message_code:= 'PA_PS_TK_STAT_CNL_ERR';
3350: raise FND_API.G_EXC_ERROR;
3351: END IF;
3352: END LOOP;
3353: CLOSE c3;
3354: END LOOP;

Line 3358: x_return_status := FND_API.G_RET_STS_SUCCESS;

3354: END LOOP;
3355: CLOSE c2;
3356: END IF;
3357:
3358: x_return_status := FND_API.G_RET_STS_SUCCESS;
3359: EXCEPTION
3360: WHEN FND_API.G_EXC_ERROR THEN
3361: x_return_status := FND_API.G_RET_STS_ERROR;
3362: -- 4537865

Line 3360: WHEN FND_API.G_EXC_ERROR THEN

3356: END IF;
3357:
3358: x_return_status := FND_API.G_RET_STS_SUCCESS;
3359: EXCEPTION
3360: WHEN FND_API.G_EXC_ERROR THEN
3361: x_return_status := FND_API.G_RET_STS_ERROR;
3362: -- 4537865
3363: -- Not resetting x_error_message_code as at this point it would have been already populated.
3364: WHEN OTHERS THEN

Line 3361: x_return_status := FND_API.G_RET_STS_ERROR;

3357:
3358: x_return_status := FND_API.G_RET_STS_SUCCESS;
3359: EXCEPTION
3360: WHEN FND_API.G_EXC_ERROR THEN
3361: x_return_status := FND_API.G_RET_STS_ERROR;
3362: -- 4537865
3363: -- Not resetting x_error_message_code as at this point it would have been already populated.
3364: WHEN OTHERS THEN
3365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3361: x_return_status := FND_API.G_RET_STS_ERROR;
3362: -- 4537865
3363: -- Not resetting x_error_message_code as at this point it would have been already populated.
3364: WHEN OTHERS THEN
3365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3366: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
3367: p_procedure_name => 'Check_chg_stat_cancel_ok');
3368:
3369: -- 4537865

Line 3623: x_return_status := FND_API.G_RET_STS_SUCCESS;

3619: l_debug_level2);
3620: END IF;
3621:
3622: x_msg_count := 0;
3623: x_return_status := FND_API.G_RET_STS_SUCCESS;
3624: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3625:
3626: IF l_debug_mode = 'Y' THEN --For bug 4252182
3627:

Line 3727: x_return_status := FND_API.G_RET_STS_ERROR;

3723: EXCEPTION
3724:
3725: WHEN Invalid_Arg_Exc_WP THEN
3726:
3727: x_return_status := FND_API.G_RET_STS_ERROR;
3728: l_msg_count := FND_MSG_PUB.count_msg;
3729:
3730: IF cur_struc_ver_wp%ISOPEN THEN
3731: CLOSE cur_struc_ver_wp;

Line 3745: (p_encoded => FND_API.G_TRUE

3741: END IF;
3742:
3743: IF l_msg_count = 1 and x_msg_data IS NULL THEN
3744: PA_INTERFACE_UTILS_PUB.get_messages
3745: (p_encoded => FND_API.G_TRUE
3746: ,p_msg_index => 1
3747: ,p_msg_count => l_msg_count
3748: ,p_msg_data => l_msg_data
3749: ,p_data => l_data

Line 3764: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3760: RETURN;
3761:
3762: WHEN others THEN
3763:
3764: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3765: x_msg_count := 1;
3766: x_msg_data := SQLERRM;
3767:
3768: IF cur_struc_ver_wp%ISOPEN THEN

Line 3857: x_return_status := FND_API.G_RET_STS_SUCCESS;

3853: l_login_id NUMBER;
3854:
3855: BEGIN
3856: x_msg_count := 0;
3857: x_return_status := FND_API.G_RET_STS_SUCCESS;
3858: --Bug 3735089 - instead of fnd_profile.value use fnd_profile.value_specific
3859: --l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3860: l_user_id := fnd_global.user_id;
3861: l_login_id := fnd_global.login_id;

Line 4133: FND_API.G_RET_STS_SUCCESS) THEN

4129: l_debug_level3);
4130: END IF;
4131:
4132: IF (PA_PROJ_STRUCTURE_PUB.CHECK_TASK_CONTRACT_ASSO(p_task_id) <>
4133: FND_API.G_RET_STS_SUCCESS) THEN
4134: x_error_code := 190;
4135: x_error_msg_code := 'PA_STRUCT_TK_HAS_CONTRACT';
4136: return;
4137: END IF;

Line 4214: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

4210: EXCEPTION
4211:
4212: WHEN OTHERS THEN
4213:
4214: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4215: x_msg_count := 1;
4216: x_msg_data := substrb(SQLERRM,1,120);-- Bug 3735089 Added substr -- 4537865 Changed substr to substrb
4217:
4218: -- 4537865