DBA Data[Home] [Help]

APPS.PA_STRUCT_TASK_ROLLUP_PUB dependencies on FND_API

Line 10: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

6: -- Pre-reqs : None
7: -- Return Value : N/A
8: -- Prameters
9: -- p_api_version IN NUMBER := 1.0
10: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
11: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
12: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
13: -- p_validation_level IN VARCHAR2 := 100
14: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 11: -- p_commit IN VARCHAR2 := FND_API.G_FALSE

7: -- Return Value : N/A
8: -- Prameters
9: -- p_api_version IN NUMBER := 1.0
10: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
11: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
12: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
13: -- p_validation_level IN VARCHAR2 := 100
14: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
15: -- p_debug_mode IN VARCHAR2 := 'N'

Line 12: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE

8: -- Prameters
9: -- p_api_version IN NUMBER := 1.0
10: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
11: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
12: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
13: -- p_validation_level IN VARCHAR2 := 100
14: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
15: -- p_debug_mode IN VARCHAR2 := 'N'
16: -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 31: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

27: */
28:
29: PROCEDURE Rollup_From_Subproject_Unltd(
30: p_api_version IN NUMBER := 1.0
31: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
32: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
33: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
34: ,p_validation_level IN VARCHAR2 := 100
35: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 32: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

28:
29: PROCEDURE Rollup_From_Subproject_Unltd(
30: p_api_version IN NUMBER := 1.0
31: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
32: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
33: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
34: ,p_validation_level IN VARCHAR2 := 100
35: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
36: ,p_debug_mode IN VARCHAR2 := 'N'

Line 33: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

29: PROCEDURE Rollup_From_Subproject_Unltd(
30: p_api_version IN NUMBER := 1.0
31: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
32: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
33: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
34: ,p_validation_level IN VARCHAR2 := 100
35: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
36: ,p_debug_mode IN VARCHAR2 := 'N'
37: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 299: IF (p_commit = FND_API.G_TRUE) THEN

295: IF (l_debug_mode = 'Y') THEN
296: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Entered...', 3);
297: END IF;
298:
299: IF (p_commit = FND_API.G_TRUE) THEN
300: savepoint Rollup_From_Subproject_PVT;
301: END IF;
302:
303: IF (l_debug_mode = 'Y') THEN

Line 308: x_return_status := FND_API.G_RET_STS_SUCCESS;

304: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Performing validations...', 3);
305: END IF;
306:
307: IF (p_element_versions.count = 0) THEN
308: x_return_status := FND_API.G_RET_STS_SUCCESS;
309: return;
310: END IF;
311:
312: i:=1;

Line 373: RAISE FND_API.G_EXC_ERROR;

369: get_lnk_task_rel_det_rec.lnk_proj_id_to); --Bug 3634389
370:
371: FETCH get_lnk_task_start_dt INTO get_lnk_task_start_dt_rec;
372: IF get_lnk_task_start_dt%NOTFOUND THEN
373: RAISE FND_API.G_EXC_ERROR;
374: END IF;
375: CLOSE get_lnk_task_start_dt;
376: --
377: --Getting the finish date for the linking task

Line 383: RAISE FND_API.G_EXC_ERROR;

379: get_lnk_task_rel_det_rec.lnk_proj_id_from, --Bug 3634389
380: get_lnk_task_rel_det_rec.lnk_proj_id_to); --Bug 3634389
381: FETCH get_lnk_task_finish_dt INTO get_lnk_task_finish_dt_rec;
382: IF get_lnk_task_finish_dt%NOTFOUND THEN
383: RAISE FND_API.G_EXC_ERROR;
384: END IF;
385: CLOSE get_lnk_task_finish_dt;
386: --
387: --bug 4238036

Line 423: RAISE FND_API.G_EXC_ERROR;

419: WHERE element_version_id = get_lnk_task_rec.lnk_task_ver_id
420: AND project_id = l_lnk_task_project_id --Bug 3634389
421: ;
422: IF SQL%NOTFOUND THEN
423: RAISE FND_API.G_EXC_ERROR;
424: END IF;
425:
426: if l_predicate_cnt+l_tot_predicate_cnt = 1000 then
427: dont_close_cursor:='Y';

Line 466: x_return_status := FND_API.G_RET_STS_SUCCESS;

462: -- 5660584, pqe base bug 5638103
463: /* bug 5638103
464: --bug: 3696446
465: IF (length(l_predicate) IS NULL) THEN
466: x_return_status := FND_API.G_RET_STS_SUCCESS;
467: return;
468: END IF;
469: --end bug 3696446
470: */

Line 619: x_return_status := FND_API.G_RET_STS_SUCCESS;

615: end loop; -- by kchaitan end loop1
616: */
617: --Moved for final fix
618: IF (l_rollup_table.count = 0) THEN
619: x_return_status := FND_API.G_RET_STS_SUCCESS;
620: return;
621: END IF;
622: -- end changes for bug 5638103
623:

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

634: p_partial_effort_flag1 => 'Y',
635: p_process_rollup_flag1 => 'Y',
636: p_process_effort_flag1 => 'Y');
637: --
638: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
639: RAISE FND_API.G_EXC_ERROR;
640: ELSE
641: IF ((PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(l_lnk_task_project_id) ='N') AND
642: (PA_RELATIONSHIP_UTILS.IS_AUTO_ROLLUP(l_lnk_task_project_id) = 'Y')) OR

Line 639: RAISE FND_API.G_EXC_ERROR;

635: p_process_rollup_flag1 => 'Y',
636: p_process_effort_flag1 => 'Y');
637: --
638: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
639: RAISE FND_API.G_EXC_ERROR;
640: ELSE
641: IF ((PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(l_lnk_task_project_id) ='N') AND
642: (PA_RELATIONSHIP_UTILS.IS_AUTO_ROLLUP(l_lnk_task_project_id) = 'Y')) OR
643: ((PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(l_lnk_task_project_id) ='Y') AND

Line 707: IF x_return_status = FND_API.G_RET_STS_ERROR then

703: IF (l_debug_mode = 'Y') THEN
704: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates x_return_status='||x_return_status, 3);
705: END IF;
706:
707: IF x_return_status = FND_API.G_RET_STS_ERROR then
708: RAISE FND_API.G_EXC_ERROR;
709: END IF;
710: END LOOP;
711: ELSE

Line 708: RAISE FND_API.G_EXC_ERROR;

704: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates x_return_status='||x_return_status, 3);
705: END IF;
706:
707: IF x_return_status = FND_API.G_RET_STS_ERROR then
708: RAISE FND_API.G_EXC_ERROR;
709: END IF;
710: END LOOP;
711: ELSE
712: FOR i IN l_rollup_table.FIRST..l_rollup_table.LAST LOOP

Line 755: p_validate_only => FND_API.G_FALSE

751: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Before calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES', 3);
752: END IF;
753:
754: PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES (
755: p_validate_only => FND_API.G_FALSE
756: ,p_project_id => l_proj_id_tbl(i)
757: ,p_date_type => 'SCHEDULED'
758: ,p_start_date => l_get_sch_dates_cur.scheduled_start_date
759: ,p_finish_date => l_get_sch_dates_cur.scheduled_finish_date

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

765: IF (l_debug_mode = 'Y') THEN
766: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES x_return_status='||x_return_status, 3);
767: END IF;
768:
769: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
770: RAISE FND_API.G_EXC_ERROR;
771: END IF;
772: END IF;
773:

Line 770: RAISE FND_API.G_EXC_ERROR;

766: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES x_return_status='||x_return_status, 3);
767: END IF;
768:
769: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
770: RAISE FND_API.G_EXC_ERROR;
771: END IF;
772: END IF;
773:
774: IF (l_versioning = 'N') THEN

Line 781: p_commit => FND_API.G_FALSE,

777: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Before calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION', 3);
778: END IF;
779:
780: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(
781: p_commit => FND_API.G_FALSE,
782: p_structure_version_id => l_rollup_table(i).object_id,
783: x_return_status => x_return_status,
784: x_msg_count => x_msg_count,
785: x_msg_data => x_msg_data);

Line 792: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

788: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION x_return_status='||x_return_status, 3);
789: END IF;
790:
791:
792: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
793: x_msg_count := FND_MSG_PUB.count_msg;
794: if x_msg_count = 1 then
795: x_msg_data := x_msg_data;
796: end if;

Line 797: raise FND_API.G_EXC_ERROR;

793: x_msg_count := FND_MSG_PUB.count_msg;
794: if x_msg_count = 1 then
795: x_msg_data := x_msg_data;
796: end if;
797: raise FND_API.G_EXC_ERROR;
798: end if;
799: END IF;
800: --end baseline changes
801:

Line 817: p_validate_only => FND_API.G_FALSE

813: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Before calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES', 3);
814: END IF;
815:
816: PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES(
817: p_validate_only => FND_API.G_FALSE
818: ,p_project_id => l_struc_project_id
819: ,x_return_status => x_return_status
820: ,x_msg_count => x_msg_count
821: ,x_msg_data => x_msg_data

Line 828: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

824: IF (l_debug_mode = 'Y') THEN
825: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATESx_return_status='||x_return_status, 3);
826: END IF;
827:
828: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
829: x_msg_count := FND_MSG_PUB.count_msg;
830: if x_msg_count = 1 then
831: x_msg_data := x_msg_data;
832: end if;

Line 833: raise FND_API.G_EXC_ERROR;

829: x_msg_count := FND_MSG_PUB.count_msg;
830: if x_msg_count = 1 then
831: x_msg_data := x_msg_data;
832: end if;
833: raise FND_API.G_EXC_ERROR;
834: end if;
835: END IF;
836: END IF; --<>
837: END LOOP;

Line 842: -- x_return_status := FND_API.G_RET_STS_SUCCESS;

838: --end bug 4416432 issue # 5 and 6
839:
840: END IF; --end if for return status after calling pa_schedule_objects_pvt.generate_schedule
841: --
842: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
843: --
844: EXCEPTION
845: WHEN FND_API.G_EXC_ERROR THEN
846: IF (p_commit = FND_API.G_TRUE) THEN

Line 845: WHEN FND_API.G_EXC_ERROR THEN

841: --
842: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
843: --
844: EXCEPTION
845: WHEN FND_API.G_EXC_ERROR THEN
846: IF (p_commit = FND_API.G_TRUE) THEN
847: ROLLBACK to Rollup_From_Subproject_PVT;
848: END IF;
849: x_msg_count := FND_MSG_PUB.count_msg;

Line 846: IF (p_commit = FND_API.G_TRUE) THEN

842: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
843: --
844: EXCEPTION
845: WHEN FND_API.G_EXC_ERROR THEN
846: IF (p_commit = FND_API.G_TRUE) THEN
847: ROLLBACK to Rollup_From_Subproject_PVT;
848: END IF;
849: x_msg_count := FND_MSG_PUB.count_msg;
850: x_return_status := FND_API.G_RET_STS_ERROR;

Line 850: x_return_status := FND_API.G_RET_STS_ERROR;

846: IF (p_commit = FND_API.G_TRUE) THEN
847: ROLLBACK to Rollup_From_Subproject_PVT;
848: END IF;
849: x_msg_count := FND_MSG_PUB.count_msg;
850: x_return_status := FND_API.G_RET_STS_ERROR;
851: WHEN OTHERS THEN
852: IF (p_commit = FND_API.G_TRUE) THEN
853: ROLLBACK to Rollup_From_Subproject_PVT;
854: END IF;

Line 852: IF (p_commit = FND_API.G_TRUE) THEN

848: END IF;
849: x_msg_count := FND_MSG_PUB.count_msg;
850: x_return_status := FND_API.G_RET_STS_ERROR;
851: WHEN OTHERS THEN
852: IF (p_commit = FND_API.G_TRUE) THEN
853: ROLLBACK to Rollup_From_Subproject_PVT;
854: END IF;
855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
856: x_msg_count := FND_MSG_PUB.count_msg;

Line 855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

851: WHEN OTHERS THEN
852: IF (p_commit = FND_API.G_TRUE) THEN
853: ROLLBACK to Rollup_From_Subproject_PVT;
854: END IF;
855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
856: x_msg_count := FND_MSG_PUB.count_msg;
857: --put message
858: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_STRUCT_TASK_ROLLUP_PUB',
859: p_procedure_name => 'Rollup_From_Subproject_Unltd',

Line 871: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

867: * This procedure should be there to maintain compatibility with calls from online flow
868: */
869: PROCEDURE Rollup_From_Subproject(
870: p_api_version IN NUMBER := 1.0
871: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
872: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
873: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
874: ,p_validation_level IN VARCHAR2 := 100
875: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 872: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

868: */
869: PROCEDURE Rollup_From_Subproject(
870: p_api_version IN NUMBER := 1.0
871: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
872: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
873: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
874: ,p_validation_level IN VARCHAR2 := 100
875: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
876: ,p_debug_mode IN VARCHAR2 := 'N'

Line 873: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

869: PROCEDURE Rollup_From_Subproject(
870: p_api_version IN NUMBER := 1.0
871: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
872: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
873: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
874: ,p_validation_level IN VARCHAR2 := 100
875: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
876: ,p_debug_mode IN VARCHAR2 := 'N'
877: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 898: x_return_status := FND_API.G_RET_STS_SUCCESS;

894: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.ROLLUP_FROM_SUBPROJECT', 'BEGIN', 3);
895: END IF;
896:
897: IF (p_element_versions.count = 0) THEN
898: x_return_status := FND_API.G_RET_STS_SUCCESS;
899:
900: IF (l_debug_mode = 'Y') THEN
901: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.ROLLUP_FROM_SUBPROJECT', 'p_element_versions.COUNT is 0', 3);
902: END IF;

Line 938: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

934: -- Pre-reqs : None
935: -- Return Value : N/A
936: -- Prameters
937: -- p_api_version IN NUMBER := 1.0
938: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
939: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
940: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
941: -- p_validation_level IN VARCHAR2 := 100
942: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 939: -- p_commit IN VARCHAR2 := FND_API.G_FALSE

935: -- Return Value : N/A
936: -- Prameters
937: -- p_api_version IN NUMBER := 1.0
938: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
939: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
940: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
941: -- p_validation_level IN VARCHAR2 := 100
942: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
943: -- p_debug_mode IN VARCHAR2 := 'N'

Line 940: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE

936: -- Prameters
937: -- p_api_version IN NUMBER := 1.0
938: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
939: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
940: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
941: -- p_validation_level IN VARCHAR2 := 100
942: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
943: -- p_debug_mode IN VARCHAR2 := 'N'
944: -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 959: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

955: -- cannot use PL/SQL table as an input/output parameter
956:
957: PROCEDURE TASKS_ROLLUP_UNLIMITED(
958: p_api_version IN NUMBER := 1.0
959: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
960: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
961: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
962: ,p_validation_level IN VARCHAR2 := 100
963: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 960: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

956:
957: PROCEDURE TASKS_ROLLUP_UNLIMITED(
958: p_api_version IN NUMBER := 1.0
959: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
960: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
961: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
962: ,p_validation_level IN VARCHAR2 := 100
963: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
964: ,p_debug_mode IN VARCHAR2 := 'N'

Line 961: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

957: PROCEDURE TASKS_ROLLUP_UNLIMITED(
958: p_api_version IN NUMBER := 1.0
959: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
960: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
961: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
962: ,p_validation_level IN VARCHAR2 := 100
963: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
964: ,p_debug_mode IN VARCHAR2 := 'N'
965: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 980: IF (p_commit = FND_API.G_TRUE) THEN

976: IF (p_debug_mode = 'Y') THEN
977: pa_debug.debug('PA_STRUCT_TASK_ROLLUP_PUB.Tasks_Rollup_Unlimited BEGIN');
978: END IF;
979:
980: IF (p_commit = FND_API.G_TRUE) THEN
981: savepoint TASKS_ROLLUP_UNLIMITED_PUB;
982: END IF;
983:
984: If (p_element_versions.count = 0) THEN

Line 985: x_return_status := FND_API.G_RET_STS_SUCCESS;

981: savepoint TASKS_ROLLUP_UNLIMITED_PUB;
982: END IF;
983:
984: If (p_element_versions.count = 0) THEN
985: x_return_status := FND_API.G_RET_STS_SUCCESS;
986: return;
987: END IF;
988:
989: FOR i in 1..p_element_versions.count LOOP

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

1009: ,x_msg_count => x_msg_count
1010: ,x_msg_data => x_msg_data
1011: );
1012: --Added by rtarway for BUG 4349474
1013: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1014: RAISE FND_API.G_EXC_ERROR;
1015: END IF;
1016: -- delete the array 100 records are reached
1017: l_element_ver_ids.delete;

Line 1014: RAISE FND_API.G_EXC_ERROR;

1010: ,x_msg_data => x_msg_data
1011: );
1012: --Added by rtarway for BUG 4349474
1013: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1014: RAISE FND_API.G_EXC_ERROR;
1015: END IF;
1016: -- delete the array 100 records are reached
1017: l_element_ver_ids.delete;
1018: ELSE

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

1037: ,x_msg_count => x_msg_count
1038: ,x_msg_data => x_msg_data
1039: );
1040: --Added by rtarway for BUG 4349474
1041: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1042: RAISE FND_API.G_EXC_ERROR;
1043: END IF;
1044: END IF;
1045:

Line 1042: RAISE FND_API.G_EXC_ERROR;

1038: ,x_msg_data => x_msg_data
1039: );
1040: --Added by rtarway for BUG 4349474
1041: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1042: RAISE FND_API.G_EXC_ERROR;
1043: END IF;
1044: END IF;
1045:
1046:

Line 1047: IF (p_commit = FND_API.G_TRUE) THEN

1043: END IF;
1044: END IF;
1045:
1046:
1047: IF (p_commit = FND_API.G_TRUE) THEN
1048: commit;
1049: END IF;
1050:
1051: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1051: x_return_status := FND_API.G_RET_STS_SUCCESS;

1047: IF (p_commit = FND_API.G_TRUE) THEN
1048: commit;
1049: END IF;
1050:
1051: x_return_status := FND_API.G_RET_STS_SUCCESS;
1052:
1053: EXCEPTION
1054: WHEN FND_API.G_EXC_ERROR THEN
1055: IF (p_commit = FND_API.G_TRUE) THEN

Line 1054: WHEN FND_API.G_EXC_ERROR THEN

1050:
1051: x_return_status := FND_API.G_RET_STS_SUCCESS;
1052:
1053: EXCEPTION
1054: WHEN FND_API.G_EXC_ERROR THEN
1055: IF (p_commit = FND_API.G_TRUE) THEN
1056: ROLLBACK to TASKS_ROLLUP_UNLIMITED_PUB;
1057: END IF;
1058: x_msg_count := FND_MSG_PUB.count_msg;

Line 1055: IF (p_commit = FND_API.G_TRUE) THEN

1051: x_return_status := FND_API.G_RET_STS_SUCCESS;
1052:
1053: EXCEPTION
1054: WHEN FND_API.G_EXC_ERROR THEN
1055: IF (p_commit = FND_API.G_TRUE) THEN
1056: ROLLBACK to TASKS_ROLLUP_UNLIMITED_PUB;
1057: END IF;
1058: x_msg_count := FND_MSG_PUB.count_msg;
1059: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1059: x_return_status := FND_API.G_RET_STS_ERROR;

1055: IF (p_commit = FND_API.G_TRUE) THEN
1056: ROLLBACK to TASKS_ROLLUP_UNLIMITED_PUB;
1057: END IF;
1058: x_msg_count := FND_MSG_PUB.count_msg;
1059: x_return_status := FND_API.G_RET_STS_ERROR;
1060: WHEN OTHERS THEN
1061: IF (p_commit = FND_API.G_TRUE) THEN
1062: ROLLBACK to TASKS_ROLLUP_UNLIMITED_PUB;
1063: END IF;

Line 1061: IF (p_commit = FND_API.G_TRUE) THEN

1057: END IF;
1058: x_msg_count := FND_MSG_PUB.count_msg;
1059: x_return_status := FND_API.G_RET_STS_ERROR;
1060: WHEN OTHERS THEN
1061: IF (p_commit = FND_API.G_TRUE) THEN
1062: ROLLBACK to TASKS_ROLLUP_UNLIMITED_PUB;
1063: END IF;
1064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1065: x_msg_count := FND_MSG_PUB.count_msg;

Line 1064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1060: WHEN OTHERS THEN
1061: IF (p_commit = FND_API.G_TRUE) THEN
1062: ROLLBACK to TASKS_ROLLUP_UNLIMITED_PUB;
1063: END IF;
1064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1065: x_msg_count := FND_MSG_PUB.count_msg;
1066: --put message
1067: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_STRUCT_TASK_ROLLUP_PUB',
1068: p_procedure_name => 'Tasks_Rollup_Unlimited',

Line 1081: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

1077: -- Pre-reqs : None
1078: -- Return Value : N/A
1079: -- Prameters
1080: -- p_api_version IN NUMBER := 1.0
1081: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1082: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
1083: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1084: -- p_validation_level IN VARCHAR2 := 100
1085: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 1082: -- p_commit IN VARCHAR2 := FND_API.G_FALSE

1078: -- Return Value : N/A
1079: -- Prameters
1080: -- p_api_version IN NUMBER := 1.0
1081: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1082: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
1083: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1084: -- p_validation_level IN VARCHAR2 := 100
1085: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
1086: -- p_debug_mode IN VARCHAR2 := 'N'

Line 1083: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE

1079: -- Prameters
1080: -- p_api_version IN NUMBER := 1.0
1081: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1082: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
1083: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1084: -- p_validation_level IN VARCHAR2 := 100
1085: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
1086: -- p_debug_mode IN VARCHAR2 := 'N'
1087: -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 1096: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

1092:
1093:
1094: Procedure Tasks_Rollup(
1095: p_api_version IN NUMBER := 1.0
1096: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1097: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1098: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1099: ,p_validation_level IN VARCHAR2 := 100
1100: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 1097: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

1093:
1094: Procedure Tasks_Rollup(
1095: p_api_version IN NUMBER := 1.0
1096: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1097: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1098: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1099: ,p_validation_level IN VARCHAR2 := 100
1100: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
1101: ,p_debug_mode IN VARCHAR2 := 'N'

Line 1098: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

1094: Procedure Tasks_Rollup(
1095: p_api_version IN NUMBER := 1.0
1096: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1097: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1098: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1099: ,p_validation_level IN VARCHAR2 := 100
1100: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
1101: ,p_debug_mode IN VARCHAR2 := 'N'
1102: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 1329: IF (p_commit = FND_API.G_TRUE) THEN

1325: IF (l_debug_mode = 'Y') THEN
1326: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP', 'Entered...', 3);
1327: END IF;
1328:
1329: IF (p_commit = FND_API.G_TRUE) THEN
1330: savepoint TASKS_ROLLUP_PVT;
1331: END IF;
1332:
1333: IF (l_debug_mode = 'Y') THEN

Line 1338: x_return_status := FND_API.G_RET_STS_SUCCESS;

1334: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP', 'Performing validations',3);
1335: END IF;
1336:
1337: If (p_element_versions.count = 0) THEN
1338: x_return_status := FND_API.G_RET_STS_SUCCESS;
1339: return;
1340: END IF;
1341:
1342: l_index := 1;

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

1527: p_process_rollup_flag1 => 'Y',
1528: p_process_effort_flag1 => 'Y');
1529: end if;
1530:
1531: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1532: RAISE FND_API.G_EXC_ERROR;
1533: ELSE
1534: /* BEGIN
1535: --Update the tasks

Line 1532: RAISE FND_API.G_EXC_ERROR;

1528: p_process_effort_flag1 => 'Y');
1529: end if;
1530:
1531: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1532: RAISE FND_API.G_EXC_ERROR;
1533: ELSE
1534: /* BEGIN
1535: --Update the tasks
1536: l_CursorId := DBMS_SQL.OPEN_CURSOR;

Line 1565: x_return_status := FND_API.G_RET_STS_ERROR;

1561: -- hyau call API to get duration in hours to store to db
1562: OPEN get_calendar_id_csr(l_project_id, l_element_version_id);
1563: FETCH get_calendar_id_csr INTO l_calendar_id;
1564: IF get_calendar_id_csr%NOTFOUND then
1565: x_return_status := FND_API.G_RET_STS_ERROR;
1566: x_msg_count := 1;
1567: x_msg_data := 'PA_PS_NO_SCHEDULE_RECORD';
1568: RAISE FND_API.G_EXC_ERROR;
1569: end if;

Line 1568: RAISE FND_API.G_EXC_ERROR;

1564: IF get_calendar_id_csr%NOTFOUND then
1565: x_return_status := FND_API.G_RET_STS_ERROR;
1566: x_msg_count := 1;
1567: x_msg_data := 'PA_PS_NO_SCHEDULE_RECORD';
1568: RAISE FND_API.G_EXC_ERROR;
1569: end if;
1570: CLOSE get_calendar_id_csr;
1571:
1572: pa_duration_utils.get_duration(

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

1578: ,x_return_status => x_return_status
1579: ,x_msg_count => x_msg_count
1580: ,x_msg_data => x_msg_data);
1581:
1582: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1583: RAISE FND_API.G_EXC_ERROR;
1584: END IF;
1585:
1586: --Bind variables

Line 1583: RAISE FND_API.G_EXC_ERROR;

1579: ,x_msg_count => x_msg_count
1580: ,x_msg_data => x_msg_data);
1581:
1582: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1583: RAISE FND_API.G_EXC_ERROR;
1584: END IF;
1585:
1586: --Bind variables
1587: DBMS_SQL.BIND_VARIABLE(l_CursorId, ':sd', l_rollup_table(l_index).start_date1);

Line 1609: p_validate_only => FND_API.G_FALSE

1605: if l_template_flag = 'Y' OR
1606: PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(l_proj_id_tbl(l_index)) = 'N' then
1607: if l_rollup_table(l_index).object_type = 'PA_STRUCTURES' then
1608: PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES (
1609: p_validate_only => FND_API.G_FALSE
1610: ,p_project_id => l_proj_id_tbl(l_index)
1611: ,p_date_type => 'SCHEDULED'
1612: ,p_start_date => l_rollup_table(l_index).start_date1
1613: ,p_finish_date => l_rollup_table(l_index).finish_date1

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

1615: ,x_return_status => x_return_status
1616: ,x_msg_count => x_msg_count
1617: ,x_msg_data => x_msg_data );
1618:
1619: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1620: RAISE FND_API.G_EXC_ERROR;
1621: END IF;
1622: END IF;
1623: END IF;

Line 1620: RAISE FND_API.G_EXC_ERROR;

1616: ,x_msg_count => x_msg_count
1617: ,x_msg_data => x_msg_data );
1618:
1619: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1620: RAISE FND_API.G_EXC_ERROR;
1621: END IF;
1622: END IF;
1623: END IF;
1624: -- End of changes

Line 1796: RAISE FND_API.G_EXC_ERROR;

1792: WHEN OTHERS THEN
1793: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_STRUCT_TASK_ROLLUP_PUB',
1794: p_procedure_name => 'Tasks_Rollup',
1795: p_error_text => SUBSTRB('PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates:'||SQLERRM,1,240));
1796: RAISE FND_API.G_EXC_ERROR;
1797: END;
1798:
1799: IF x_return_status = FND_API.G_RET_STS_ERROR then
1800: RAISE FND_API.G_EXC_ERROR;

Line 1799: IF x_return_status = FND_API.G_RET_STS_ERROR then

1795: p_error_text => SUBSTRB('PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates:'||SQLERRM,1,240));
1796: RAISE FND_API.G_EXC_ERROR;
1797: END;
1798:
1799: IF x_return_status = FND_API.G_RET_STS_ERROR then
1800: RAISE FND_API.G_EXC_ERROR;
1801: End If;
1802: END LOOP;
1803: -- till here by skannoji

Line 1800: RAISE FND_API.G_EXC_ERROR;

1796: RAISE FND_API.G_EXC_ERROR;
1797: END;
1798:
1799: IF x_return_status = FND_API.G_RET_STS_ERROR then
1800: RAISE FND_API.G_EXC_ERROR;
1801: End If;
1802: END LOOP;
1803: -- till here by skannoji
1804:

Line 1822: p_validate_only => FND_API.G_FALSE

1818: END IF;
1819:
1820:
1821: PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES (
1822: p_validate_only => FND_API.G_FALSE
1823: ,p_project_id => l_baseline_proj_id
1824: ,p_date_type => 'SCHEDULED'
1825: ,p_start_date => l_get_sch_dates_cur.scheduled_start_date
1826: ,p_finish_date => l_get_sch_dates_cur.scheduled_finish_date

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

1833: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES x_return_status='||x_return_status,3);
1834: END IF;
1835:
1836:
1837: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1838: RAISE FND_API.G_EXC_ERROR;
1839: END IF;
1840: END IF;
1841:

Line 1838: RAISE FND_API.G_EXC_ERROR;

1834: END IF;
1835:
1836:
1837: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1838: RAISE FND_API.G_EXC_ERROR;
1839: END IF;
1840: END IF;
1841:
1842:

Line 1850: p_commit => FND_API.G_FALSE,

1846: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION l_structure_version_id='||l_structure_version_id,3);
1847: END IF;
1848:
1849: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(
1850: p_commit => FND_API.G_FALSE,
1851: p_structure_version_id => l_structure_version_id,
1852: x_return_status => x_return_status,
1853: x_msg_count => x_msg_count,
1854: x_msg_data => x_msg_data);

Line 1861: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

1857: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION x_return_status='||x_return_status,3);
1858: END IF;
1859:
1860:
1861: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1862: x_msg_count := FND_MSG_PUB.count_msg;
1863: if x_msg_count = 1 then
1864: x_msg_data := x_msg_data;
1865: end if;

Line 1866: raise FND_API.G_EXC_ERROR;

1862: x_msg_count := FND_MSG_PUB.count_msg;
1863: if x_msg_count = 1 then
1864: x_msg_data := x_msg_data;
1865: end if;
1866: raise FND_API.G_EXC_ERROR;
1867: end if;
1868: END IF;
1869: --end baseline changes
1870:

Line 1893: p_validate_only => FND_API.G_FALSE

1889: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES',3);
1890: END IF;
1891:
1892: PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES(
1893: p_validate_only => FND_API.G_FALSE
1894: ,p_project_id => l_struc_project_id
1895: ,x_return_status => x_return_status
1896: ,x_msg_count => x_msg_count
1897: ,x_msg_data => x_msg_data

Line 1905: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

1901: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES x_return_status='||x_return_status,3);
1902: END IF;
1903:
1904:
1905: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1906: x_msg_count := FND_MSG_PUB.count_msg;
1907: if x_msg_count = 1 then
1908: x_msg_data := x_msg_data;
1909: end if;

Line 1910: raise FND_API.G_EXC_ERROR;

1906: x_msg_count := FND_MSG_PUB.count_msg;
1907: if x_msg_count = 1 then
1908: x_msg_data := x_msg_data;
1909: end if;
1910: raise FND_API.G_EXC_ERROR;
1911: end if;
1912:
1913: --copy to project level
1914:

Line 1964: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

1960: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling Rollup_From_Subproject to rollup from the current project''s sub-project x_return_status='||x_return_status,3);
1961: END IF;
1962:
1963: --
1964: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1965: x_msg_count := FND_MSG_PUB.count_msg;
1966: if x_msg_count = 1 then
1967: x_msg_data := x_msg_data;
1968: end if;

Line 1969: raise FND_API.G_EXC_ERROR;

1965: x_msg_count := FND_MSG_PUB.count_msg;
1966: if x_msg_count = 1 then
1967: x_msg_data := x_msg_data;
1968: end if;
1969: raise FND_API.G_EXC_ERROR;
1970: end if;
1971: /* bug 4541039
1972: --bug 4296915
1973: END IF;

Line 2080: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

2076: IF (l_debug_mode = 'Y') THEN
2077: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling Rollup_From_Subproject to rollup from the current project id='||
2078: cur_select_hier_rec.object_id_to2||' to its parent project id='||get_str_ver_ic_lnk_tasks_rec.parent_proj_id||' x_return_status='||x_return_status,3);
2079: END If;
2080: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
2081: x_msg_count := FND_MSG_PUB.count_msg;
2082: if x_msg_count = 1 then
2083: x_msg_data := x_msg_data;
2084: end if;

Line 2085: raise FND_API.G_EXC_ERROR;

2081: x_msg_count := FND_MSG_PUB.count_msg;
2082: if x_msg_count = 1 then
2083: x_msg_data := x_msg_data;
2084: end if;
2085: raise FND_API.G_EXC_ERROR;
2086: end if;
2087: END IF; ----check_pub_str bug 4296915
2088: CLOSE check_pub_str;
2089: CLOSE chk_str_working_ver; --this shold be inside ELSE otherwise its giving invalid cursor. --maansari 4293726

Line 2121: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

2117: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling Rollup_From_Subproject to rollup from the current project id='||
2118: cur_select_hier_rec.object_id_to2||' to its parent project id='||get_str_ver_ic_lnk_tasks_rec.parent_proj_id||' x_return_status='||x_return_status,3);
2119: END IF;
2120:
2121: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
2122: x_msg_count := FND_MSG_PUB.count_msg;
2123: if x_msg_count = 1 then
2124: x_msg_data := x_msg_data;
2125: end if;

Line 2126: raise FND_API.G_EXC_ERROR;

2122: x_msg_count := FND_MSG_PUB.count_msg;
2123: if x_msg_count = 1 then
2124: x_msg_data := x_msg_data;
2125: end if;
2126: raise FND_API.G_EXC_ERROR;
2127: end if;
2128:
2129: -- END IF;--end if for checking published ver exists or not
2130: END IF;--end if for checking veriosning enabled or not

Line 2138: x_return_status := FND_API.G_RET_STS_SUCCESS;

2134: END IF; --l_rollup_from_sub_project = 'Y'
2135: END LOOP;
2136: ----bug 4541039
2137:
2138: x_return_status := FND_API.G_RET_STS_SUCCESS;
2139: --
2140: EXCEPTION
2141: WHEN FND_API.G_EXC_ERROR THEN
2142: IF (p_commit = FND_API.G_TRUE) THEN

Line 2141: WHEN FND_API.G_EXC_ERROR THEN

2137:
2138: x_return_status := FND_API.G_RET_STS_SUCCESS;
2139: --
2140: EXCEPTION
2141: WHEN FND_API.G_EXC_ERROR THEN
2142: IF (p_commit = FND_API.G_TRUE) THEN
2143: ROLLBACK to TASKS_ROLLUP_PVT;
2144: END IF;
2145: x_msg_count := FND_MSG_PUB.count_msg;

Line 2142: IF (p_commit = FND_API.G_TRUE) THEN

2138: x_return_status := FND_API.G_RET_STS_SUCCESS;
2139: --
2140: EXCEPTION
2141: WHEN FND_API.G_EXC_ERROR THEN
2142: IF (p_commit = FND_API.G_TRUE) THEN
2143: ROLLBACK to TASKS_ROLLUP_PVT;
2144: END IF;
2145: x_msg_count := FND_MSG_PUB.count_msg;
2146: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2146: x_return_status := FND_API.G_RET_STS_ERROR;

2142: IF (p_commit = FND_API.G_TRUE) THEN
2143: ROLLBACK to TASKS_ROLLUP_PVT;
2144: END IF;
2145: x_msg_count := FND_MSG_PUB.count_msg;
2146: x_return_status := FND_API.G_RET_STS_ERROR;
2147: WHEN OTHERS THEN
2148: IF (p_commit = FND_API.G_TRUE) THEN
2149: ROLLBACK to TASKS_ROLLUP_PVT;
2150: END IF;

Line 2148: IF (p_commit = FND_API.G_TRUE) THEN

2144: END IF;
2145: x_msg_count := FND_MSG_PUB.count_msg;
2146: x_return_status := FND_API.G_RET_STS_ERROR;
2147: WHEN OTHERS THEN
2148: IF (p_commit = FND_API.G_TRUE) THEN
2149: ROLLBACK to TASKS_ROLLUP_PVT;
2150: END IF;
2151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2152: x_msg_count := FND_MSG_PUB.count_msg;

Line 2151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2147: WHEN OTHERS THEN
2148: IF (p_commit = FND_API.G_TRUE) THEN
2149: ROLLBACK to TASKS_ROLLUP_PVT;
2150: END IF;
2151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2152: x_msg_count := FND_MSG_PUB.count_msg;
2153: --put message
2154: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_STRUCT_TASK_ROLLUP_PUB',
2155: p_procedure_name => 'Tasks_Rollup',

Line 2163: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

2159: end Tasks_Rollup;
2160:
2161: Procedure Task_Status_Rollup(
2162: p_api_version IN NUMBER := 1.0
2163: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2164: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2165: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2166: ,p_validation_level IN VARCHAR2 := 100
2167: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 2164: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

2160:
2161: Procedure Task_Status_Rollup(
2162: p_api_version IN NUMBER := 1.0
2163: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2164: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2165: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2166: ,p_validation_level IN VARCHAR2 := 100
2167: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
2168: ,p_debug_mode IN VARCHAR2 := 'N'

Line 2165: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

2161: Procedure Task_Status_Rollup(
2162: p_api_version IN NUMBER := 1.0
2163: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2164: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2165: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2166: ,p_validation_level IN VARCHAR2 := 100
2167: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
2168: ,p_debug_mode IN VARCHAR2 := 'N'
2169: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 2272: IF (p_commit = FND_API.G_TRUE) THEN

2268: IF (p_debug_mode = 'Y') THEN
2269: pa_debug.debug('PVT.TASK_STATUS_ROLLUP BEGIN');
2270: END IF;
2271:
2272: IF (p_commit = FND_API.G_TRUE) THEN
2273: savepoint TASK_STATUS_ROLLUP_PUB;
2274: END IF;
2275:
2276: IF (p_debug_mode = 'Y') THEN

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

2335: p_process_flag2 => 'N',
2336: p_process_rollup_flag2 => 'N',
2337: p_process_progress_flag2 => 'N');
2338:
2339: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2340: RAISE FND_API.G_EXC_ERROR;
2341: END IF;
2342:
2343: --getting task status

Line 2340: RAISE FND_API.G_EXC_ERROR;

2336: p_process_rollup_flag2 => 'N',
2337: p_process_progress_flag2 => 'N');
2338:
2339: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2340: RAISE FND_API.G_EXC_ERROR;
2341: END IF;
2342:
2343: --getting task status
2344: OPEN get_task_status;

Line 2394: x_return_status := FND_API.G_RET_STS_SUCCESS;

2390:
2391: END LOOP;
2392: END IF;
2393:
2394: x_return_status := FND_API.G_RET_STS_SUCCESS;
2395: EXCEPTION
2396: WHEN FND_API.G_EXC_ERROR THEN
2397: IF (p_commit = FND_API.G_TRUE) THEN
2398: ROLLBACK to TASK_STATUS_ROLLUP_PUB;

Line 2396: WHEN FND_API.G_EXC_ERROR THEN

2392: END IF;
2393:
2394: x_return_status := FND_API.G_RET_STS_SUCCESS;
2395: EXCEPTION
2396: WHEN FND_API.G_EXC_ERROR THEN
2397: IF (p_commit = FND_API.G_TRUE) THEN
2398: ROLLBACK to TASK_STATUS_ROLLUP_PUB;
2399: END IF;
2400: x_msg_count := FND_MSG_PUB.count_msg;

Line 2397: IF (p_commit = FND_API.G_TRUE) THEN

2393:
2394: x_return_status := FND_API.G_RET_STS_SUCCESS;
2395: EXCEPTION
2396: WHEN FND_API.G_EXC_ERROR THEN
2397: IF (p_commit = FND_API.G_TRUE) THEN
2398: ROLLBACK to TASK_STATUS_ROLLUP_PUB;
2399: END IF;
2400: x_msg_count := FND_MSG_PUB.count_msg;
2401: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2401: x_return_status := FND_API.G_RET_STS_ERROR;

2397: IF (p_commit = FND_API.G_TRUE) THEN
2398: ROLLBACK to TASK_STATUS_ROLLUP_PUB;
2399: END IF;
2400: x_msg_count := FND_MSG_PUB.count_msg;
2401: x_return_status := FND_API.G_RET_STS_ERROR;
2402: WHEN OTHERS THEN
2403: IF (p_commit = FND_API.G_TRUE) THEN
2404: ROLLBACK to TASK_STATUS_ROLLUP_PUB;
2405: END IF;

Line 2403: IF (p_commit = FND_API.G_TRUE) THEN

2399: END IF;
2400: x_msg_count := FND_MSG_PUB.count_msg;
2401: x_return_status := FND_API.G_RET_STS_ERROR;
2402: WHEN OTHERS THEN
2403: IF (p_commit = FND_API.G_TRUE) THEN
2404: ROLLBACK to TASK_STATUS_ROLLUP_PUB;
2405: END IF;
2406: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2407: x_msg_count := FND_MSG_PUB.count_msg;

Line 2406: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2402: WHEN OTHERS THEN
2403: IF (p_commit = FND_API.G_TRUE) THEN
2404: ROLLBACK to TASK_STATUS_ROLLUP_PUB;
2405: END IF;
2406: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2407: x_msg_count := FND_MSG_PUB.count_msg;
2408: --put message
2409: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_STRUCT_TASK_ROLLUP_PUB',
2410: p_procedure_name => 'Task_Status_Rollup',

Line 2418: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

2414:
2415:
2416: Procedure Task_Stat_Pushdown_Rollup(
2417: p_api_version IN NUMBER := 1.0
2418: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2419: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2420: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2421: ,p_validation_level IN VARCHAR2 := 100
2422: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 2419: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

2415:
2416: Procedure Task_Stat_Pushdown_Rollup(
2417: p_api_version IN NUMBER := 1.0
2418: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2419: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2420: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2421: ,p_validation_level IN VARCHAR2 := 100
2422: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
2423: ,p_debug_mode IN VARCHAR2 := 'N'

Line 2420: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

2416: Procedure Task_Stat_Pushdown_Rollup(
2417: p_api_version IN NUMBER := 1.0
2418: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2419: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2420: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2421: ,p_validation_level IN VARCHAR2 := 100
2422: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
2423: ,p_debug_mode IN VARCHAR2 := 'N'
2424: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 2449: IF (p_commit = FND_API.G_TRUE) THEN

2445: IF (p_debug_mode = 'Y') THEN
2446: pa_debug.debug('PVT.TASK_STATUS_ROLLUP BEGIN');
2447: END IF;
2448:
2449: IF (p_commit = FND_API.G_TRUE) THEN
2450: savepoint TASK_STAT_PUSHDOWN_ROLLUP;
2451: END IF;
2452:
2453: IF (p_debug_mode = 'Y') THEN

Line 2464: p_validate_only => FND_API.G_FALSE

2460: FETCH get_zero_weight_status into l_zero_weight_rec;
2461: EXIT WHEN get_zero_weight_status%NOTFOUND;
2462:
2463: PA_PROGRESS_PUB.PUSH_DOWN_TASK_STATUS(
2464: p_validate_only => FND_API.G_FALSE
2465: ,p_task_status => l_zero_weight_rec.status_code
2466: ,p_project_id => l_zero_weight_rec.project_id
2467: ,p_object_id => l_zero_weight_rec.proj_element_id
2468: ,p_object_version_id => l_zero_weight_rec.element_version_id

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

2471: ,x_msg_count => x_msg_count
2472: ,x_msg_data => x_msg_data
2473: );
2474:
2475: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2476: RAISE FND_API.G_EXC_ERROR;
2477: END IF;
2478:
2479: END LOOP;

Line 2476: RAISE FND_API.G_EXC_ERROR;

2472: ,x_msg_data => x_msg_data
2473: );
2474:
2475: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2476: RAISE FND_API.G_EXC_ERROR;
2477: END IF;
2478:
2479: END LOOP;
2480: CLOSE get_zero_weight_status;

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

2485: ,x_return_status => x_return_status
2486: ,x_msg_count => x_msg_count
2487: ,x_msg_data => x_msg_data);
2488:
2489: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2490: RAISE FND_API.G_EXC_ERROR;
2491: END IF;
2492:
2493: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2490: RAISE FND_API.G_EXC_ERROR;

2486: ,x_msg_count => x_msg_count
2487: ,x_msg_data => x_msg_data);
2488:
2489: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2490: RAISE FND_API.G_EXC_ERROR;
2491: END IF;
2492:
2493: x_return_status := FND_API.G_RET_STS_SUCCESS;
2494: EXCEPTION

Line 2493: x_return_status := FND_API.G_RET_STS_SUCCESS;

2489: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2490: RAISE FND_API.G_EXC_ERROR;
2491: END IF;
2492:
2493: x_return_status := FND_API.G_RET_STS_SUCCESS;
2494: EXCEPTION
2495: WHEN FND_API.G_EXC_ERROR THEN
2496: IF (p_commit = FND_API.G_TRUE) THEN
2497: ROLLBACK to TASK_STAT_PUSHDOWN_ROLLUP;

Line 2495: WHEN FND_API.G_EXC_ERROR THEN

2491: END IF;
2492:
2493: x_return_status := FND_API.G_RET_STS_SUCCESS;
2494: EXCEPTION
2495: WHEN FND_API.G_EXC_ERROR THEN
2496: IF (p_commit = FND_API.G_TRUE) THEN
2497: ROLLBACK to TASK_STAT_PUSHDOWN_ROLLUP;
2498: END IF;
2499: x_msg_count := FND_MSG_PUB.count_msg;

Line 2496: IF (p_commit = FND_API.G_TRUE) THEN

2492:
2493: x_return_status := FND_API.G_RET_STS_SUCCESS;
2494: EXCEPTION
2495: WHEN FND_API.G_EXC_ERROR THEN
2496: IF (p_commit = FND_API.G_TRUE) THEN
2497: ROLLBACK to TASK_STAT_PUSHDOWN_ROLLUP;
2498: END IF;
2499: x_msg_count := FND_MSG_PUB.count_msg;
2500: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2500: x_return_status := FND_API.G_RET_STS_ERROR;

2496: IF (p_commit = FND_API.G_TRUE) THEN
2497: ROLLBACK to TASK_STAT_PUSHDOWN_ROLLUP;
2498: END IF;
2499: x_msg_count := FND_MSG_PUB.count_msg;
2500: x_return_status := FND_API.G_RET_STS_ERROR;
2501: WHEN OTHERS THEN
2502: IF (p_commit = FND_API.G_TRUE) THEN
2503: ROLLBACK to TASK_STAT_PUSHDOWN_ROLLUP;
2504: END IF;

Line 2502: IF (p_commit = FND_API.G_TRUE) THEN

2498: END IF;
2499: x_msg_count := FND_MSG_PUB.count_msg;
2500: x_return_status := FND_API.G_RET_STS_ERROR;
2501: WHEN OTHERS THEN
2502: IF (p_commit = FND_API.G_TRUE) THEN
2503: ROLLBACK to TASK_STAT_PUSHDOWN_ROLLUP;
2504: END IF;
2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2506: x_msg_count := FND_MSG_PUB.count_msg;

Line 2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2501: WHEN OTHERS THEN
2502: IF (p_commit = FND_API.G_TRUE) THEN
2503: ROLLBACK to TASK_STAT_PUSHDOWN_ROLLUP;
2504: END IF;
2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2506: x_msg_count := FND_MSG_PUB.count_msg;
2507: --put message
2508: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_STRUCT_TASK_ROLLUP_PUB',
2509: p_procedure_name => 'Task_Stat_Pushdown_Rollup',

Line 2521: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

2517: -- Pre-reqs : None
2518: -- Return Value : N/A
2519: -- Prameters
2520: -- p_api_version IN NUMBER := 1.0
2521: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2522: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
2523: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2524: -- p_validation_level IN VARCHAR2 := 100
2525: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 2522: -- p_commit IN VARCHAR2 := FND_API.G_FALSE

2518: -- Return Value : N/A
2519: -- Prameters
2520: -- p_api_version IN NUMBER := 1.0
2521: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2522: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
2523: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2524: -- p_validation_level IN VARCHAR2 := 100
2525: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
2526: -- p_debug_mode IN VARCHAR2 := 'N'

Line 2523: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE

2519: -- Prameters
2520: -- p_api_version IN NUMBER := 1.0
2521: -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2522: -- p_commit IN VARCHAR2 := FND_API.G_FALSE
2523: -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2524: -- p_validation_level IN VARCHAR2 := 100
2525: -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
2526: -- p_debug_mode IN VARCHAR2 := 'N'
2527: -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 2545: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

2541: -- Bug 4541039
2542:
2543: PROCEDURE Program_Schedule_dates_rollup(
2544: p_api_version IN NUMBER := 1.0
2545: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2546: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2547: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2548: ,p_validation_level IN VARCHAR2 := 100
2549: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 2546: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

2542:
2543: PROCEDURE Program_Schedule_dates_rollup(
2544: p_api_version IN NUMBER := 1.0
2545: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2546: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2547: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2548: ,p_validation_level IN VARCHAR2 := 100
2549: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
2550: ,p_debug_mode IN VARCHAR2 := 'N'

Line 2547: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

2543: PROCEDURE Program_Schedule_dates_rollup(
2544: p_api_version IN NUMBER := 1.0
2545: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2546: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2547: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2548: ,p_validation_level IN VARCHAR2 := 100
2549: ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
2550: ,p_debug_mode IN VARCHAR2 := 'N'
2551: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 2618: x_return_status := FND_API.G_RET_STS_SUCCESS;

2614:
2615: BEGIN
2616:
2617: x_msg_count := 0;
2618: x_return_status := FND_API.G_RET_STS_SUCCESS;
2619: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
2620:
2621: IF (p_debug_mode = 'Y') THEN
2622: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDULE_DATES_ROLLUP','Entered in PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP p_structure_version_id='||p_structure_version_id, 3);

Line 2626: IF (p_commit = FND_API.G_TRUE) THEN

2622: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDULE_DATES_ROLLUP','Entered in PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP p_structure_version_id='||p_structure_version_id, 3);
2623: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDULE_DATES_ROLLUP','Entered in PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP p_project_id='||p_project_id, 3);
2624: END IF;
2625:
2626: IF (p_commit = FND_API.G_TRUE) THEN
2627: savepoint Program_Schedule_dates_rollup;
2628: END IF;
2629:
2630: IF (p_structure_version_id IS NULL OR p_structure_version_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM )

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

2653: x_return_status => x_return_status,
2654: x_msg_count => x_msg_count,
2655: x_msg_data => x_msg_data);
2656:
2657: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2658: RAISE FND_API.G_EXC_ERROR;
2659: END IF;
2660:
2661:

Line 2658: RAISE FND_API.G_EXC_ERROR;

2654: x_msg_count => x_msg_count,
2655: x_msg_data => x_msg_data);
2656:
2657: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2658: RAISE FND_API.G_EXC_ERROR;
2659: END IF;
2660:
2661:
2662: IF l_debug_mode = 'Y' THEN

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

2696: IF l_debug_mode = 'Y' THEN
2697: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'After calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd x_return_status='||x_return_status, 3);
2698: END IF;
2699:
2700: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2701: RAISE FND_API.G_EXC_ERROR;
2702: END IF;
2703: END IF;
2704: END LOOP;

Line 2701: RAISE FND_API.G_EXC_ERROR;

2697: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'After calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd x_return_status='||x_return_status, 3);
2698: END IF;
2699:
2700: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2701: RAISE FND_API.G_EXC_ERROR;
2702: END IF;
2703: END IF;
2704: END LOOP;
2705: ELSIF (p_structure_version_id IS NOT NULL AND p_structure_version_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ) --bug5861729

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

2735: IF l_debug_mode = 'Y' THEN
2736: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'After calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd x_return_status='||x_return_status, 3);
2737: END IF;
2738:
2739: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2740: RAISE FND_API.G_EXC_ERROR;
2741: END IF;
2742: END IF;
2743:

Line 2740: RAISE FND_API.G_EXC_ERROR;

2736: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'After calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd x_return_status='||x_return_status, 3);
2737: END IF;
2738:
2739: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2740: RAISE FND_API.G_EXC_ERROR;
2741: END IF;
2742: END IF;
2743:
2744: END IF; --if p_structure_verison is not null

Line 2746: x_return_status := FND_API.G_RET_STS_SUCCESS;

2742: END IF;
2743:
2744: END IF; --if p_structure_verison is not null
2745:
2746: x_return_status := FND_API.G_RET_STS_SUCCESS;
2747: EXCEPTION
2748: WHEN FND_API.G_EXC_ERROR THEN
2749: IF (p_commit = FND_API.G_TRUE) THEN
2750: ROLLBACK to Program_Schedule_dates_rollup;

Line 2748: WHEN FND_API.G_EXC_ERROR THEN

2744: END IF; --if p_structure_verison is not null
2745:
2746: x_return_status := FND_API.G_RET_STS_SUCCESS;
2747: EXCEPTION
2748: WHEN FND_API.G_EXC_ERROR THEN
2749: IF (p_commit = FND_API.G_TRUE) THEN
2750: ROLLBACK to Program_Schedule_dates_rollup;
2751: END IF;
2752: x_msg_count := FND_MSG_PUB.count_msg;

Line 2749: IF (p_commit = FND_API.G_TRUE) THEN

2745:
2746: x_return_status := FND_API.G_RET_STS_SUCCESS;
2747: EXCEPTION
2748: WHEN FND_API.G_EXC_ERROR THEN
2749: IF (p_commit = FND_API.G_TRUE) THEN
2750: ROLLBACK to Program_Schedule_dates_rollup;
2751: END IF;
2752: x_msg_count := FND_MSG_PUB.count_msg;
2753: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2753: x_return_status := FND_API.G_RET_STS_ERROR;

2749: IF (p_commit = FND_API.G_TRUE) THEN
2750: ROLLBACK to Program_Schedule_dates_rollup;
2751: END IF;
2752: x_msg_count := FND_MSG_PUB.count_msg;
2753: x_return_status := FND_API.G_RET_STS_ERROR;
2754: WHEN OTHERS THEN
2755: IF (p_commit = FND_API.G_TRUE) THEN
2756: ROLLBACK to Program_Schedule_dates_rollup;
2757: END IF;

Line 2755: IF (p_commit = FND_API.G_TRUE) THEN

2751: END IF;
2752: x_msg_count := FND_MSG_PUB.count_msg;
2753: x_return_status := FND_API.G_RET_STS_ERROR;
2754: WHEN OTHERS THEN
2755: IF (p_commit = FND_API.G_TRUE) THEN
2756: ROLLBACK to Program_Schedule_dates_rollup;
2757: END IF;
2758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2759: x_msg_count := FND_MSG_PUB.count_msg;

Line 2758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2754: WHEN OTHERS THEN
2755: IF (p_commit = FND_API.G_TRUE) THEN
2756: ROLLBACK to Program_Schedule_dates_rollup;
2757: END IF;
2758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2759: x_msg_count := FND_MSG_PUB.count_msg;
2760: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_STRUCT_TASK_ROLLUP_PUB',
2761: p_procedure_name => 'Program_Schedule_dates_rollup',
2762: p_error_text => SUBSTRB(SQLERRM,1,240));