DBA Data[Home] [Help]

APPS.PA_RELATIONSHIP_UTILS dependencies on FND_API

Line 232: x_return_status := FND_API.G_RET_STS_SUCCESS;

228: l_workplan_to VARCHAR2(1);
229: l_financial_from VARCHAR2(1);
230: l_financial_to VARCHAR2(1);
231: BEGIN
232: x_return_status := FND_API.G_RET_STS_SUCCESS;
233:
234: --1 Check if need to create new task.
235:
236: --1a. check if link exist for this task

Line 238: -- If (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

234: --1 Check if need to create new task.
235:
236: --1a. check if link exist for this task
237: -- if yes, error.
238: -- If (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
239: OPEN Is_linked(p_element_version_id_from);
240: FETCH Is_linked into l_dummy;
241: IF Is_linked%FOUND THEN
242: x_return_status := FND_API.G_RET_STS_ERROR;

Line 242: x_return_status := FND_API.G_RET_STS_ERROR;

238: -- If (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
239: OPEN Is_linked(p_element_version_id_from);
240: FETCH Is_linked into l_dummy;
241: IF Is_linked%FOUND THEN
242: x_return_status := FND_API.G_RET_STS_ERROR;
243: x_error_message_code := 'PA_PS_LINK_EXISTS';
244: CLOSE Is_linked;
245: return;
246: END IF;

Line 253: -- IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

249:
250: --Removed, since subtask is always created now.
251: --1b. check if the from element version is a structure
252: -- if yes, create new task.
253: -- IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
254: -- OPEN Is_structure(p_element_version_id_from);
255: -- FETCH Is_structure into l_dummy;
256: -- IF Is_structure%FOUND THEN
257: -- x_return_status := 'T';

Line 262: -- IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

258: -- END IF;
259: -- CLOSE Is_structure;
260: -- END IF;
261:
262: -- IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
263: --1c. check if from object is lowest task.
264: -- if no, create new task.
265:
266: -- IF (PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(p_element_version_id_from) = 'N') THEN

Line 299: x_return_status := FND_API.G_RET_STS_ERROR;

295: FETCH Check_PA_TASKS_Exists into l_dummy;
296: IF Check_PA_TASKS_Exists%NOTFOUND THEN
297: CLOSE Check_PA_TASKS_Exists;
298: x_error_message_code := 'PA_PS_PA_TASKS_NOT_EXISTS';
299: x_return_status := FND_API.G_RET_STS_ERROR;
300: return;
301: ELSE
302: --Task exists
303: CLOSE Check_PA_TASKS_Exists;

Line 313: x_return_status := FND_API.G_RET_STS_ERROR;

309: IF (l_err_code <> 0) THEN
310:
311: --There is transaction, error.
312: x_error_message_code := substrb(l_err_stage,0,30); -- 4537865 : Changed substr usage to substrb
313: x_return_status := FND_API.G_RET_STS_ERROR;
314: return;
315: END IF;
316: END IF;
317: END IF;

Line 349: x_return_status := FND_API.G_RET_STS_ERROR;

345: If (l_workplan_from = 'Y') and
346: (l_financial_from = 'N') and
347: (l_workplan_to = 'N') and
348: (l_financial_to = 'Y') THEN
349: x_return_status := FND_API.G_RET_STS_ERROR;
350: x_error_message_code := 'PA_PS_LINK_WP_TO_FIN_ERR';
351: return;
352: END IF;
353:

Line 359: x_return_status := FND_API.G_RET_STS_ERROR;

355: (l_workplan_to = 'Y') and
356: (l_financial_to = 'N') THEN
357: If (l_workplan_from = 'N') THEN
358: IF (l_project_id_from <> l_project_id_to) THEN
359: x_return_status := FND_API.G_RET_STS_ERROR;
360: x_error_message_code := 'PA_PS_LINK_FIN_TO_WP_ERR';
361: return;
362: END IF;
363: ELSE

Line 364: x_return_status := FND_API.G_RET_STS_ERROR;

360: x_error_message_code := 'PA_PS_LINK_FIN_TO_WP_ERR';
361: return;
362: END IF;
363: ELSE
364: x_return_status := FND_API.G_RET_STS_ERROR;
365: x_error_message_code := 'PA_PS_LINK_FIN_TO_WP_ERR';
366: return;
367: END IF;
368: END IF;

Line 376: x_return_status := FND_API.G_RET_STS_ERROR;

372: OPEN Is_Same_Struc(p_element_version_id_from, p_element_version_id_to);
373: FETCH Is_Same_Struc into l_dummy;
374: If Is_Same_Struc%FOUND THEN
375: CLOSE Is_Same_Struc;
376: x_return_status := FND_API.G_RET_STS_ERROR;
377: x_error_message_code := 'PA_PS_LINK_WITHIN_STRUCTURE';
378: return;
379: END IF;
380: CLOSE Is_Same_Struc;

Line 390: x_return_status := FND_API.G_RET_STS_ERROR;

386: OPEN Is_Diff_Version_Linked(p_element_version_id_from, p_element_version_id_to);
387: FETCH Is_Diff_Version_Linked into l_dummy;
388: IF Is_Diff_Version_Linked%FOUND THEN
389: CLOSE Is_Diff_Version_Linked;
390: x_return_status := FND_API.G_RET_STS_ERROR;
391: x_error_message_code := 'PA_PS_DIFF_VER_LINKED';
392: return;
393: END IF;
394: CLOSE Is_Diff_Version_Linked;

Line 400: x_return_status := FND_API.G_RET_STS_ERROR;

396: OPEN Is_Circular_Link(p_element_version_id_from, p_element_version_id_to);
397: FETCH Is_Circular_Link into l_dummy;
398: IF Is_Circular_Link%FOUND THEN
399: CLOSE Is_Circular_Link;
400: x_return_status := FND_API.G_RET_STS_ERROR;
401: x_error_message_code := 'PA_PS_DIFF_VER_LINKED';
402: return;
403: END IF;
404: CLOSE Is_Circular_Link;

Line 422: x_return_status := FND_API.G_RET_STS_ERROR;

418: FETCH Is_Version_Exist into l_existing_elem_ver_id;
419: IF Is_Version_Exist%FOUND THEN
420: CLOSE Is_Version_Exist;
421: CLOSE Get_Top_Nodes;
422: x_return_status := FND_API.G_RET_STS_ERROR;
423: x_error_message_code := 'PA_PS_LINK_ELEM_EX_IN_HIER';
424: return;
425: END IF;
426: CLOSE Is_Version_Exist;

Line 434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

430:
431: -- 4537865
432: EXCEPTION
433: WHEN OTHERS THEN
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
435: x_error_message_code := SQLCODE ;
436:
437: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_UTILS',
438: p_procedure_name => 'CHECK_CREATE_LINK_OK',

Line 470: x_return_status := FND_API.G_RET_STS_SUCCESS;

466: ,x_error_message_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
467: )
468: IS
469: BEGIN
470: x_return_status := FND_API.G_RET_STS_SUCCESS;
471: END CHECK_CREATE_DEPENDENCY_OK;
472:
473:
474: -- API name : Check_Create_Association_Ok

Line 501: x_return_status := FND_API.G_RET_STS_SUCCESS;

497: ,x_error_message_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
498: )
499: IS
500: BEGIN
501: x_return_status := FND_API.G_RET_STS_SUCCESS;
502: END CHECK_CREATE_ASSOCIATION_OK;
503:
504:
505: -- API name : parent_LP_link_exists

Line 667: x_return_status := FND_API.G_RET_STS_ERROR;

663: p_pre_task_ver_id IS NULL OR
664: p_project_id IS NULL OR
665: p_task_ver_id IS NULL
666: THEN
667: x_return_status := FND_API.G_RET_STS_ERROR;
668: x_msg_count := FND_MSG_PUB.count_msg;
669: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
670: ,p_msg_name => 'PA_PS_PARAMS_NULL');
671: raise FND_API.G_EXC_ERROR;

Line 671: raise FND_API.G_EXC_ERROR;

667: x_return_status := FND_API.G_RET_STS_ERROR;
668: x_msg_count := FND_MSG_PUB.count_msg;
669: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
670: ,p_msg_name => 'PA_PS_PARAMS_NULL');
671: raise FND_API.G_EXC_ERROR;
672: END IF;
673:
674: IF p_pre_project_id <> p_project_id
675: THEN

Line 676: x_return_status := FND_API.G_RET_STS_ERROR;

672: END IF;
673:
674: IF p_pre_project_id <> p_project_id
675: THEN
676: x_return_status := FND_API.G_RET_STS_ERROR;
677: x_msg_count := FND_MSG_PUB.count_msg;
678: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
679: ,p_msg_name => 'PA_PS_NOT_INTRA_DEPND');
680: raise FND_API.G_EXC_ERROR;

Line 680: raise FND_API.G_EXC_ERROR;

676: x_return_status := FND_API.G_RET_STS_ERROR;
677: x_msg_count := FND_MSG_PUB.count_msg;
678: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
679: ,p_msg_name => 'PA_PS_NOT_INTRA_DEPND');
680: raise FND_API.G_EXC_ERROR;
681: END IF;
682:
683: --c) a task cannot depend on it-self
684: IF p_pre_task_ver_id = p_task_ver_id

Line 686: x_return_status := FND_API.G_RET_STS_ERROR;

682:
683: --c) a task cannot depend on it-self
684: IF p_pre_task_ver_id = p_task_ver_id
685: THEN
686: x_return_status := FND_API.G_RET_STS_ERROR;
687: x_msg_count := FND_MSG_PUB.count_msg;
688: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
689: ,p_msg_name => 'PA_PS_NO_SELF_DEPDN');
690: raise FND_API.G_EXC_ERROR;

Line 690: raise FND_API.G_EXC_ERROR;

686: x_return_status := FND_API.G_RET_STS_ERROR;
687: x_msg_count := FND_MSG_PUB.count_msg;
688: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
689: ,p_msg_name => 'PA_PS_NO_SELF_DEPDN');
690: raise FND_API.G_EXC_ERROR;
691: END IF;
692:
693: OPEN cur_a;
694: FETCH cur_a INTO l_dummy_char;

Line 697: x_return_status := FND_API.G_RET_STS_ERROR;

693: OPEN cur_a;
694: FETCH cur_a INTO l_dummy_char;
695: IF cur_a%FOUND
696: THEN
697: x_return_status := FND_API.G_RET_STS_ERROR;
698: x_msg_count := FND_MSG_PUB.count_msg;
699: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
700: ,p_msg_name => 'PA_PS_DEPND_EXISTS');
701: raise FND_API.G_EXC_ERROR;

Line 701: raise FND_API.G_EXC_ERROR;

697: x_return_status := FND_API.G_RET_STS_ERROR;
698: x_msg_count := FND_MSG_PUB.count_msg;
699: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
700: ,p_msg_name => 'PA_PS_DEPND_EXISTS');
701: raise FND_API.G_EXC_ERROR;
702: END IF;
703: CLOSE cur_a;
704:
705: OPEN cur_b;

Line 709: x_return_status := FND_API.G_RET_STS_ERROR;

705: OPEN cur_b;
706: FETCH cur_b INTO l_dummy_char;
707: IF cur_b%FOUND
708: THEN
709: x_return_status := FND_API.G_RET_STS_ERROR;
710: x_msg_count := FND_MSG_PUB.count_msg;
711: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
712: ,p_msg_name => 'PA_PS_CIRCLR_DEPND_EXISTS');
713: raise FND_API.G_EXC_ERROR;

Line 713: raise FND_API.G_EXC_ERROR;

709: x_return_status := FND_API.G_RET_STS_ERROR;
710: x_msg_count := FND_MSG_PUB.count_msg;
711: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
712: ,p_msg_name => 'PA_PS_CIRCLR_DEPND_EXISTS');
713: raise FND_API.G_EXC_ERROR;
714: END IF;
715: CLOSE cur_b;
716:
717: /* Following code commented out for bug 3629024

Line 722: x_return_status := FND_API.G_RET_STS_ERROR;

718: OPEN cur_d;
719: FETCH cur_d INTO l_dummy_char;
720: IF cur_d%FOUND
721: THEN
722: x_return_status := FND_API.G_RET_STS_ERROR;
723: x_msg_count := FND_MSG_PUB.count_msg;
724: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
725: ,p_msg_name => 'PA_PS_SUBTASKS_DEPND_EXISTS');
726: raise FND_API.G_EXC_ERROR;

Line 726: raise FND_API.G_EXC_ERROR;

722: x_return_status := FND_API.G_RET_STS_ERROR;
723: x_msg_count := FND_MSG_PUB.count_msg;
724: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
725: ,p_msg_name => 'PA_PS_SUBTASKS_DEPND_EXISTS');
726: raise FND_API.G_EXC_ERROR;
727: END IF;
728: CLOSE cur_d;
729: */
730: --Bug 3629024 : Check for the existence of a closed path

Line 733: x_return_status := FND_API.G_RET_STS_ERROR;

729: */
730: --Bug 3629024 : Check for the existence of a closed path
731: --This bug fix is for rule D
732: IF get_parents_childs(p_pre_task_ver_id, p_task_ver_id) = TRUE THEN
733: x_return_status := FND_API.G_RET_STS_ERROR;
734: x_msg_count := FND_MSG_PUB.count_msg;
735: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
736: ,p_msg_name => 'PA_PS_SUBTASKS_DEPND_EXISTS');
737: raise FND_API.G_EXC_ERROR;

Line 737: raise FND_API.G_EXC_ERROR;

733: x_return_status := FND_API.G_RET_STS_ERROR;
734: x_msg_count := FND_MSG_PUB.count_msg;
735: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
736: ,p_msg_name => 'PA_PS_SUBTASKS_DEPND_EXISTS');
737: raise FND_API.G_EXC_ERROR;
738: END IF;
739:
740: /* --check if predecessor is parent in the same line of hierarchy.
741: OPEN cur_e1;

Line 745: x_return_status := FND_API.G_RET_STS_ERROR;

741: OPEN cur_e1;
742: FETCH cur_e1 INTO l_dummy_char;
743: IF cur_e1%FOUND
744: THEN
745: x_return_status := FND_API.G_RET_STS_ERROR;
746: x_msg_count := FND_MSG_PUB.count_msg;
747: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
748: ,p_msg_name => 'PA_PS_NO_PARENT_PRED');
749: raise FND_API.G_EXC_ERROR;

Line 749: raise FND_API.G_EXC_ERROR;

745: x_return_status := FND_API.G_RET_STS_ERROR;
746: x_msg_count := FND_MSG_PUB.count_msg;
747: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
748: ,p_msg_name => 'PA_PS_NO_PARENT_PRED');
749: raise FND_API.G_EXC_ERROR;
750: END IF;
751: CLOSE cur_e1;
752:
753: --check if predecessor is child in the same line of hierarchy.

Line 758: x_return_status := FND_API.G_RET_STS_ERROR;

754: OPEN cur_e2;
755: FETCH cur_e2 INTO l_dummy_char;
756: IF cur_e2%FOUND
757: THEN
758: x_return_status := FND_API.G_RET_STS_ERROR;
759: x_msg_count := FND_MSG_PUB.count_msg;
760: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
761: ,p_msg_name => 'PA_PS_NO_CHILD_PRED');
762: raise FND_API.G_EXC_ERROR;

Line 762: raise FND_API.G_EXC_ERROR;

758: x_return_status := FND_API.G_RET_STS_ERROR;
759: x_msg_count := FND_MSG_PUB.count_msg;
760: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
761: ,p_msg_name => 'PA_PS_NO_CHILD_PRED');
762: raise FND_API.G_EXC_ERROR;
763: END IF;
764: CLOSE cur_e2;
765: */
766:

Line 781: x_return_status := FND_API.G_RET_STS_ERROR;

777:
778: IF l_parent_task_ver_id IS NOT NULL AND
779: l_parent_task_ver_id = p_pre_task_ver_id
780: THEN
781: x_return_status := FND_API.G_RET_STS_ERROR;
782: x_msg_count := FND_MSG_PUB.count_msg;
783: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
784: ,p_msg_name => 'PA_PS_NO_PARENT_PRED');
785: raise FND_API.G_EXC_ERROR;

Line 785: raise FND_API.G_EXC_ERROR;

781: x_return_status := FND_API.G_RET_STS_ERROR;
782: x_msg_count := FND_MSG_PUB.count_msg;
783: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
784: ,p_msg_name => 'PA_PS_NO_PARENT_PRED');
785: raise FND_API.G_EXC_ERROR;
786: ELSE
787: l_child_task_ver_id := l_parent_task_ver_id;
788: END IF;
789: END LOOP;

Line 813: x_return_status := FND_API.G_RET_STS_ERROR;

809:
810: IF l_parent_task_ver_id IS NOT NULL AND
811: l_parent_task_ver_id = p_task_ver_id /* is succssor a parent in the same line of hierarcgy*/
812: THEN
813: x_return_status := FND_API.G_RET_STS_ERROR;
814: x_msg_count := FND_MSG_PUB.count_msg;
815: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
816: ,p_msg_name => 'PA_PS_NO_CHILD_PRED');
817: raise FND_API.G_EXC_ERROR;

Line 817: raise FND_API.G_EXC_ERROR;

813: x_return_status := FND_API.G_RET_STS_ERROR;
814: x_msg_count := FND_MSG_PUB.count_msg;
815: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
816: ,p_msg_name => 'PA_PS_NO_CHILD_PRED');
817: raise FND_API.G_EXC_ERROR;
818: ELSE
819: l_child_task_ver_id := l_parent_task_ver_id;
820: END IF;
821: END LOOP;

Line 825: when FND_API.G_EXC_ERROR then

821: END LOOP;
822:
823:
824: EXCEPTION
825: when FND_API.G_EXC_ERROR then
826: x_return_status := FND_API.G_RET_STS_ERROR;
827: x_msg_count := FND_MSG_PUB.count_msg;
828: when OTHERS then
829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 826: x_return_status := FND_API.G_RET_STS_ERROR;

822:
823:
824: EXCEPTION
825: when FND_API.G_EXC_ERROR then
826: x_return_status := FND_API.G_RET_STS_ERROR;
827: x_msg_count := FND_MSG_PUB.count_msg;
828: when OTHERS then
829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
830: x_msg_count := 1; -- 4537865 : RESET OUT param

Line 829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

825: when FND_API.G_EXC_ERROR then
826: x_return_status := FND_API.G_RET_STS_ERROR;
827: x_msg_count := FND_MSG_PUB.count_msg;
828: when OTHERS then
829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
830: x_msg_count := 1; -- 4537865 : RESET OUT param
831: x_msg_data := SUBSTRB(SQLERRM,1,240); -- 4537865 : RESET OUT PARAM
832: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIOP_UTILS',
833: p_procedure_name => 'check_create_intra_dep_ok',

Line 938: x_return_status := FND_API.G_RET_STS_SUCCESS;

934: -- End fix for Bug # Bug # 4256435.
935:
936: BEGIN
937:
938: x_return_status := FND_API.G_RET_STS_SUCCESS;
939:
940: --check valid for null parameters
941: IF p_pre_project_id IS NULL OR
942: p_pre_task_ver_id IS NULL OR

Line 946: x_return_status := FND_API.G_RET_STS_ERROR;

942: p_pre_task_ver_id IS NULL OR
943: p_project_id IS NULL OR
944: p_task_ver_id IS NULL
945: THEN
946: x_return_status := FND_API.G_RET_STS_ERROR;
947: x_msg_count := FND_MSG_PUB.count_msg;
948: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
949: ,p_msg_name => 'PA_PS_PARAMS_NULL');
950: raise FND_API.G_EXC_ERROR;

Line 950: raise FND_API.G_EXC_ERROR;

946: x_return_status := FND_API.G_RET_STS_ERROR;
947: x_msg_count := FND_MSG_PUB.count_msg;
948: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
949: ,p_msg_name => 'PA_PS_PARAMS_NULL');
950: raise FND_API.G_EXC_ERROR;
951: END IF;
952:
953: --check for inter projects. The successor project and predecssor projects should be different.
954: IF p_pre_project_id = p_project_id

Line 956: x_return_status := FND_API.G_RET_STS_ERROR;

952:
953: --check for inter projects. The successor project and predecssor projects should be different.
954: IF p_pre_project_id = p_project_id
955: THEN
956: x_return_status := FND_API.G_RET_STS_ERROR;
957: x_msg_count := FND_MSG_PUB.count_msg;
958: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
959: ,p_msg_name => 'PA_PS_NOT_INTER_DEPND');
960: raise FND_API.G_EXC_ERROR;

Line 960: raise FND_API.G_EXC_ERROR;

956: x_return_status := FND_API.G_RET_STS_ERROR;
957: x_msg_count := FND_MSG_PUB.count_msg;
958: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
959: ,p_msg_name => 'PA_PS_NOT_INTER_DEPND');
960: raise FND_API.G_EXC_ERROR;
961: END IF;
962:
963: -- Begin fix for Bug # Bug # 4256435.
964:

Line 976: x_return_status := FND_API.G_RET_STS_ERROR;

972: close cur_linking_task;
973:
974: if (l_link_exists = 'Y') then
975:
976: x_return_status := FND_API.G_RET_STS_ERROR;
977: x_msg_count := FND_MSG_PUB.count_msg;
978:
979: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA'
980: , p_msg_name => 'PA_WP_PRGM_EXISTS_NO_DEP');

Line 982: raise FND_API.G_EXC_ERROR;

978:
979: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA'
980: , p_msg_name => 'PA_WP_PRGM_EXISTS_NO_DEP');
981:
982: raise FND_API.G_EXC_ERROR;
983:
984: end if;
985: end if;
986:

Line 997: x_return_status := FND_API.G_RET_STS_ERROR;

993: OPEN cur_valid_sucsr_proj_task;
994: FETCH cur_valid_sucsr_proj_task INTO l_dummy;
995: IF cur_valid_sucsr_proj_task%NOTFOUND
996: THEN
997: x_return_status := FND_API.G_RET_STS_ERROR;
998: x_msg_count := FND_MSG_PUB.count_msg;
999: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1000: ,p_msg_name => 'PA_PS_INV_SUCSR_PRJ_TSK');
1001: raise FND_API.G_EXC_ERROR;

Line 1001: raise FND_API.G_EXC_ERROR;

997: x_return_status := FND_API.G_RET_STS_ERROR;
998: x_msg_count := FND_MSG_PUB.count_msg;
999: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1000: ,p_msg_name => 'PA_PS_INV_SUCSR_PRJ_TSK');
1001: raise FND_API.G_EXC_ERROR;
1002: END IF;
1003: CLOSE cur_valid_sucsr_proj_task;
1004:
1005: --validate predecessor project id and task ver id combination.

Line 1010: x_return_status := FND_API.G_RET_STS_ERROR;

1006: OPEN cur_valid_pred_proj_task;
1007: FETCH cur_valid_pred_proj_task INTO l_dummy;
1008: IF cur_valid_pred_proj_task%NOTFOUND
1009: THEN
1010: x_return_status := FND_API.G_RET_STS_ERROR;
1011: x_msg_count := FND_MSG_PUB.count_msg;
1012: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1013: ,p_msg_name => 'PA_PS_INV_PRED_PRJ_TSK');
1014: raise FND_API.G_EXC_ERROR;

Line 1014: raise FND_API.G_EXC_ERROR;

1010: x_return_status := FND_API.G_RET_STS_ERROR;
1011: x_msg_count := FND_MSG_PUB.count_msg;
1012: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1013: ,p_msg_name => 'PA_PS_INV_PRED_PRJ_TSK');
1014: raise FND_API.G_EXC_ERROR;
1015: END IF;
1016: CLOSE cur_valid_pred_proj_task;
1017: */
1018:

Line 1024: x_return_status := FND_API.G_RET_STS_ERROR;

1020: OPEN cur_a;
1021: FETCH cur_a INTO l_dummy_char;
1022: IF cur_a%FOUND
1023: THEN
1024: x_return_status := FND_API.G_RET_STS_ERROR;
1025: x_msg_count := FND_MSG_PUB.count_msg;
1026: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1027: ,p_msg_name => 'PA_PS_DEPND_EXISTS');
1028: raise FND_API.G_EXC_ERROR;

Line 1028: raise FND_API.G_EXC_ERROR;

1024: x_return_status := FND_API.G_RET_STS_ERROR;
1025: x_msg_count := FND_MSG_PUB.count_msg;
1026: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1027: ,p_msg_name => 'PA_PS_DEPND_EXISTS');
1028: raise FND_API.G_EXC_ERROR;
1029: END IF;
1030: CLOSE cur_a;
1031:
1032: EXCEPTION

Line 1033: when FND_API.G_EXC_ERROR then

1029: END IF;
1030: CLOSE cur_a;
1031:
1032: EXCEPTION
1033: when FND_API.G_EXC_ERROR then
1034: x_return_status := FND_API.G_RET_STS_ERROR;
1035: x_msg_count := FND_MSG_PUB.count_msg;
1036: when OTHERS then
1037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1034: x_return_status := FND_API.G_RET_STS_ERROR;

1030: CLOSE cur_a;
1031:
1032: EXCEPTION
1033: when FND_API.G_EXC_ERROR then
1034: x_return_status := FND_API.G_RET_STS_ERROR;
1035: x_msg_count := FND_MSG_PUB.count_msg;
1036: when OTHERS then
1037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1038: x_msg_count := 1; -- 4537865 : RESET OUT param

Line 1037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1033: when FND_API.G_EXC_ERROR then
1034: x_return_status := FND_API.G_RET_STS_ERROR;
1035: x_msg_count := FND_MSG_PUB.count_msg;
1036: when OTHERS then
1037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1038: x_msg_count := 1; -- 4537865 : RESET OUT param
1039: x_msg_data := SUBSTRB(SQLERRM,1,240); -- 4537865 : RESET OUT PARAM
1040: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIOP_UTILS',
1041: p_procedure_name => 'check_create_inter_dep_ok',