[Home] [Help]
51: select ppev1.element_version_id
52: into x_task_version_id
53: from pa_proj_element_versions ppev1,
54: pa_proj_element_versions ppev2,
55: pa_proj_elem_ver_structure ppevs,
56: pa_structure_types pst,
57: pa_proj_structure_types ppst
58: where ppevs.project_id = p_project_id
59: and ppevs.latest_eff_published_flag = 'Y'
94: x_structure_version_id NUMBER;
95: BEGIN
96: select ppevs.element_version_id
97: into x_structure_version_id
98: from pa_proj_elem_ver_structure ppevs,
99: pa_proj_element_versions ppev,
100: pa_structure_types pst,
101: pa_proj_structure_types ppst
102: where ppevs.project_id = p_project_id
1902: decode(ppe.object_type,'PA_TASKS',ptt.PROG_ENTRY_ENABLE_FLAG,'Y'),
1903: pppa.ALLOW_COLLAB_PROG_ENTRY,
1904: pppa.ALLOW_PHY_PRCNT_CMP_OVERRIDES,
1905: pppa.TASK_WEIGHT_BASIS_CODE
1906: FROM pa_proj_elements ppe, pa_task_types ptt, pa_proj_progress_attr pppa, pa_proj_elem_ver_structure ppvs, pa_proj_structure_types ppst
1907: WHERE ppe.project_id = p_project_id
1908: AND ppe.proj_element_id = p_object_id
1909: AND ppe.object_type = p_object_type
1910: AND ppe.type_id = ptt.task_type_id(+)
2120: AND rownum <= 1;
2121:
2122: Cursor c_proj_elem_ver_structure
2123: is
2124: select 'X' from pa_proj_elem_ver_structure
2125: where status_code = p_status_code
2126: AND rownum <= 1;
2127:
2128: Cursor c_task_types
2162: end if;
2163: close c_proj_elements;
2164: end if;
2165:
2166: -- Check referense in pa_proj_elem_ver_structure
2167: if(NOT l_return_value) then
2168: open c_proj_elem_ver_structure;
2169: fetch c_proj_elem_ver_structure into l_dummy;
2170: if(c_proj_elem_ver_structure%FOUND) then
2552:
2553: CURSOR l_get_latest_pub_structure_ver
2554: IS
2555: SELECT ppevs.element_version_id
2556: FROM pa_proj_elem_ver_structure ppevs
2557: WHERE ppevs.project_id = p_project_id
2558: AND ppevs.latest_eff_published_flag = 'Y';
2559:
2560: l_person_id NUMBER;
5449: IS
5450: /* Commented for bug 5665310
5451: CURSOR C1 is
5452: select 'N'
5453: from pa_proj_elem_ver_structure ppevs
5454: where ppevs.project_id = p_project_id
5455: and ppevs.element_version_id = p_structure_version_id
5456: and ppevs.date_prog_applied_on_wver < (select max(l_update_date)
5457: from (
5470: and published_flag = 'Y'));
5471:
5472: CURSOR C2 is
5473: select 'N'
5474: from pa_proj_elem_ver_structure ppevs
5475: where ppevs.project_id = p_project_id
5476: and ppevs.element_version_id = p_structure_version_id
5477: and ppevs.date_prog_applied_on_wver is null
5478: and exists (select '1'
5510: --Start of Addition for bug 5665310
5511:
5512: SELECT date_prog_applied_on_wver
5513: INTO l_date_prog_applied_on_wver
5514: FROM pa_proj_elem_ver_structure ppevs
5515: WHERE ppevs.project_id = p_project_id
5516: AND ppevs.element_version_id = p_structure_version_id;
5517:
5518: l_program_flag := PA_PROJECT_STRUCTURE_UTILS.check_program_flag_enable(p_project_id);
5532: else
5533: SELECT
5534: MAX(ppr.last_update_date)
5535: INTO l_last_update_date
5536: FROM pa_progress_rollup ppr, pa_proj_elem_ver_structure ppevs
5537: WHERE ppr.project_id = p_project_id
5538: AND ppr.object_id = ppevs.PROJ_ELEMENT_ID
5539: AND ppr.object_type ='PA_STRUCTURES'
5540: AND ppr.structure_type = 'WORKPLAN'
11707:
11708: CURSOR cur_check_published_version(c_structure_version_id NUMBER, c_project_id NUMBER)
11709: IS
11710: SELECT decode(status.project_system_status_code, 'STRUCTURE_PUBLISHED', 'Y', 'N')
11711: FROM pa_proj_elem_ver_structure str
11712: , pa_project_statuses status
11713: where str.element_version_id = c_structure_version_id
11714: AND str.project_id = c_project_id
11715: AND str.status_code = status.project_status_code;
12899: order by ppev1.wbs_level desc;
12900:
12901: cursor c1(p_structure_version_id number) is
12902: select 'Y'
12903: from pa_proj_elem_ver_structure
12904: where project_id = p_project_id
12905: and element_version_id = p_structure_version_id
12906: and status_code = 'STRUCTURE_PUBLISHED';
12907: