[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
1924: decode(ppe.object_type,'PA_TASKS',ptt.PROG_ENTRY_ENABLE_FLAG,'Y'),
1925: pppa.ALLOW_COLLAB_PROG_ENTRY,
1926: pppa.ALLOW_PHY_PRCNT_CMP_OVERRIDES,
1927: pppa.TASK_WEIGHT_BASIS_CODE
1928: 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
1929: WHERE ppe.project_id = p_project_id
1930: AND ppe.proj_element_id = p_object_id
1931: AND ppe.object_type = p_object_type
1932: AND ppe.type_id = ptt.task_type_id(+)
2144: AND rownum <= 1;
2145:
2146: Cursor c_proj_elem_ver_structure
2147: is
2148: select 'X' from pa_proj_elem_ver_structure
2149: where status_code = p_status_code
2150: AND rownum <= 1;
2151:
2152: Cursor c_task_types
2186: end if;
2187: close c_proj_elements;
2188: end if;
2189:
2190: -- Check referense in pa_proj_elem_ver_structure
2191: if(NOT l_return_value) then
2192: open c_proj_elem_ver_structure;
2193: fetch c_proj_elem_ver_structure into l_dummy;
2194: if(c_proj_elem_ver_structure%FOUND) then
2577:
2578: CURSOR l_get_latest_pub_structure_ver
2579: IS
2580: SELECT ppevs.element_version_id
2581: FROM pa_proj_elem_ver_structure ppevs
2582: WHERE ppevs.project_id = p_project_id
2583: AND ppevs.latest_eff_published_flag = 'Y';
2584:
2585: l_person_id NUMBER;
5482: IS
5483: /* Commented for bug 5665310
5484: CURSOR C1 is
5485: select 'N'
5486: from pa_proj_elem_ver_structure ppevs
5487: where ppevs.project_id = p_project_id
5488: and ppevs.element_version_id = p_structure_version_id
5489: and ppevs.date_prog_applied_on_wver < (select max(l_update_date)
5490: from (
5503: and published_flag = 'Y'));
5504:
5505: CURSOR C2 is
5506: select 'N'
5507: from pa_proj_elem_ver_structure ppevs
5508: where ppevs.project_id = p_project_id
5509: and ppevs.element_version_id = p_structure_version_id
5510: and ppevs.date_prog_applied_on_wver is null
5511: and exists (select '1'
5543: --Start of Addition for bug 5665310
5544:
5545: SELECT date_prog_applied_on_wver
5546: INTO l_date_prog_applied_on_wver
5547: FROM pa_proj_elem_ver_structure ppevs
5548: WHERE ppevs.project_id = p_project_id
5549: AND ppevs.element_version_id = p_structure_version_id;
5550:
5551: l_program_flag := PA_PROJECT_STRUCTURE_UTILS.check_program_flag_enable(p_project_id);
5565: else
5566: SELECT
5567: MAX(ppr.last_update_date)
5568: INTO l_last_update_date
5569: FROM pa_progress_rollup ppr, pa_proj_elem_ver_structure ppevs
5570: WHERE ppr.project_id = p_project_id
5571: AND ppr.object_id = ppevs.PROJ_ELEMENT_ID
5572: AND ppr.object_type ='PA_STRUCTURES'
5573: AND ppr.structure_type = 'WORKPLAN'
11787:
11788: CURSOR cur_check_published_version(c_structure_version_id NUMBER, c_project_id NUMBER)
11789: IS
11790: SELECT decode(status.project_system_status_code, 'STRUCTURE_PUBLISHED', 'Y', 'N')
11791: FROM pa_proj_elem_ver_structure str
11792: , pa_project_statuses status
11793: where str.element_version_id = c_structure_version_id
11794: AND str.project_id = c_project_id
11795: AND str.status_code = status.project_status_code;
12996: order by ppev1.wbs_level desc;
12997:
12998: cursor c1(p_structure_version_id number) is
12999: select 'Y'
13000: from pa_proj_elem_ver_structure
13001: where project_id = p_project_id
13002: and element_version_id = p_structure_version_id
13003: and status_code = 'STRUCTURE_PUBLISHED';
13004: