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 669: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 673: raise FND_API.G_EXC_ERROR;

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

Line 678: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 682: raise FND_API.G_EXC_ERROR;

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

Line 688: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 692: raise FND_API.G_EXC_ERROR;

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

Line 699: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 703: raise FND_API.G_EXC_ERROR;

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

Line 711: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 715: raise FND_API.G_EXC_ERROR;

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

Line 724: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 728: raise FND_API.G_EXC_ERROR;

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

Line 735: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 739: raise FND_API.G_EXC_ERROR;

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

Line 747: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 751: raise FND_API.G_EXC_ERROR;

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

Line 760: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 764: raise FND_API.G_EXC_ERROR;

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

Line 783: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 787: raise FND_API.G_EXC_ERROR;

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

Line 815: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 819: raise FND_API.G_EXC_ERROR;

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

Line 827: when FND_API.G_EXC_ERROR then

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

Line 828: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 945: x_return_status := FND_API.G_RET_STS_SUCCESS;

941: -- End fix for Bug # Bug # 4256435.
942:
943: BEGIN
944:
945: x_return_status := FND_API.G_RET_STS_SUCCESS;
946:
947: --check valid for null parameters
948: IF p_pre_project_id IS NULL OR
949: p_pre_task_ver_id IS NULL OR

Line 953: x_return_status := FND_API.G_RET_STS_ERROR;

949: p_pre_task_ver_id IS NULL OR
950: p_project_id IS NULL OR
951: p_task_ver_id IS NULL
952: THEN
953: x_return_status := FND_API.G_RET_STS_ERROR;
954: x_msg_count := FND_MSG_PUB.count_msg;
955: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
956: ,p_msg_name => 'PA_PS_PARAMS_NULL');
957: raise FND_API.G_EXC_ERROR;

Line 957: raise FND_API.G_EXC_ERROR;

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

Line 963: x_return_status := FND_API.G_RET_STS_ERROR;

959:
960: --check for inter projects. The successor project and predecssor projects should be different.
961: IF p_pre_project_id = p_project_id
962: THEN
963: x_return_status := FND_API.G_RET_STS_ERROR;
964: x_msg_count := FND_MSG_PUB.count_msg;
965: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
966: ,p_msg_name => 'PA_PS_NOT_INTER_DEPND');
967: raise FND_API.G_EXC_ERROR;

Line 967: raise FND_API.G_EXC_ERROR;

963: x_return_status := FND_API.G_RET_STS_ERROR;
964: x_msg_count := FND_MSG_PUB.count_msg;
965: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
966: ,p_msg_name => 'PA_PS_NOT_INTER_DEPND');
967: raise FND_API.G_EXC_ERROR;
968: END IF;
969:
970: -- Begin fix for Bug # Bug # 4256435.
971:

Line 983: x_return_status := FND_API.G_RET_STS_ERROR;

979: close cur_linking_task;
980:
981: if (l_link_exists = 'Y') then
982:
983: x_return_status := FND_API.G_RET_STS_ERROR;
984: x_msg_count := FND_MSG_PUB.count_msg;
985:
986: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA'
987: , p_msg_name => 'PA_WP_PRGM_EXISTS_NO_DEP');

Line 989: raise FND_API.G_EXC_ERROR;

985:
986: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA'
987: , p_msg_name => 'PA_WP_PRGM_EXISTS_NO_DEP');
988:
989: raise FND_API.G_EXC_ERROR;
990:
991: end if;
992: end if;
993:

Line 1004: x_return_status := FND_API.G_RET_STS_ERROR;

1000: OPEN cur_valid_sucsr_proj_task;
1001: FETCH cur_valid_sucsr_proj_task INTO l_dummy;
1002: IF cur_valid_sucsr_proj_task%NOTFOUND
1003: THEN
1004: x_return_status := FND_API.G_RET_STS_ERROR;
1005: x_msg_count := FND_MSG_PUB.count_msg;
1006: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1007: ,p_msg_name => 'PA_PS_INV_SUCSR_PRJ_TSK');
1008: raise FND_API.G_EXC_ERROR;

Line 1008: raise FND_API.G_EXC_ERROR;

1004: x_return_status := FND_API.G_RET_STS_ERROR;
1005: x_msg_count := FND_MSG_PUB.count_msg;
1006: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1007: ,p_msg_name => 'PA_PS_INV_SUCSR_PRJ_TSK');
1008: raise FND_API.G_EXC_ERROR;
1009: END IF;
1010: CLOSE cur_valid_sucsr_proj_task;
1011:
1012: --validate predecessor project id and task ver id combination.

Line 1017: x_return_status := FND_API.G_RET_STS_ERROR;

1013: OPEN cur_valid_pred_proj_task;
1014: FETCH cur_valid_pred_proj_task INTO l_dummy;
1015: IF cur_valid_pred_proj_task%NOTFOUND
1016: THEN
1017: x_return_status := FND_API.G_RET_STS_ERROR;
1018: x_msg_count := FND_MSG_PUB.count_msg;
1019: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1020: ,p_msg_name => 'PA_PS_INV_PRED_PRJ_TSK');
1021: raise FND_API.G_EXC_ERROR;

Line 1021: raise FND_API.G_EXC_ERROR;

1017: x_return_status := FND_API.G_RET_STS_ERROR;
1018: x_msg_count := FND_MSG_PUB.count_msg;
1019: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1020: ,p_msg_name => 'PA_PS_INV_PRED_PRJ_TSK');
1021: raise FND_API.G_EXC_ERROR;
1022: END IF;
1023: CLOSE cur_valid_pred_proj_task;
1024: */
1025:

Line 1031: x_return_status := FND_API.G_RET_STS_ERROR;

1027: OPEN cur_a;
1028: FETCH cur_a INTO l_dummy_char;
1029: IF cur_a%FOUND
1030: THEN
1031: x_return_status := FND_API.G_RET_STS_ERROR;
1032: x_msg_count := FND_MSG_PUB.count_msg;
1033: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1034: ,p_msg_name => 'PA_PS_DEPND_EXISTS');
1035: raise FND_API.G_EXC_ERROR;

Line 1035: raise FND_API.G_EXC_ERROR;

1031: x_return_status := FND_API.G_RET_STS_ERROR;
1032: x_msg_count := FND_MSG_PUB.count_msg;
1033: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
1034: ,p_msg_name => 'PA_PS_DEPND_EXISTS');
1035: raise FND_API.G_EXC_ERROR;
1036: END IF;
1037: CLOSE cur_a;
1038:
1039: EXCEPTION

Line 1040: when FND_API.G_EXC_ERROR then

1036: END IF;
1037: CLOSE cur_a;
1038:
1039: EXCEPTION
1040: when FND_API.G_EXC_ERROR then
1041: x_return_status := FND_API.G_RET_STS_ERROR;
1042: x_msg_count := FND_MSG_PUB.count_msg;
1043: when OTHERS then
1044: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1041: x_return_status := FND_API.G_RET_STS_ERROR;

1037: CLOSE cur_a;
1038:
1039: EXCEPTION
1040: when FND_API.G_EXC_ERROR then
1041: x_return_status := FND_API.G_RET_STS_ERROR;
1042: x_msg_count := FND_MSG_PUB.count_msg;
1043: when OTHERS then
1044: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1045: x_msg_count := 1; -- 4537865 : RESET OUT param

Line 1044: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1040: when FND_API.G_EXC_ERROR then
1041: x_return_status := FND_API.G_RET_STS_ERROR;
1042: x_msg_count := FND_MSG_PUB.count_msg;
1043: when OTHERS then
1044: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1045: x_msg_count := 1; -- 4537865 : RESET OUT param
1046: x_msg_data := SUBSTRB(SQLERRM,1,240); -- 4537865 : RESET OUT PARAM
1047: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIOP_UTILS',
1048: p_procedure_name => 'check_create_inter_dep_ok',