[Home] [Help]
842: */
843: IF p_object_type = 'PA_TASKS'
844: THEN
845: -- 4490532 : Changed from IS_LOWEST_TASK to is_summary_task_or_structure
846: --l_lowest_level_task := PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(p_task_version_id => p_object_version_id );
847: --ELSE
848: --l_lowest_level_task := 'N';
849: IF PA_PROJ_ELEMENTS_UTILS.is_summary_task_or_structure(p_object_version_id) = 'Y' THEN
850: l_lowest_level_task := 'N';
845: -- 4490532 : Changed from IS_LOWEST_TASK to is_summary_task_or_structure
846: --l_lowest_level_task := PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(p_task_version_id => p_object_version_id );
847: --ELSE
848: --l_lowest_level_task := 'N';
849: IF PA_PROJ_ELEMENTS_UTILS.is_summary_task_or_structure(p_object_version_id) = 'Y' THEN
850: l_lowest_level_task := 'N';
851: ELSE
852: l_lowest_level_task := 'Y';
853: END IF;
1772: AND l_element_struc_type = 'WORKPLAN'
1773: AND l_assignment_exists = 'N'
1774: THEN
1775: --Update outdated flag back to 'Y'
1776: UPDATE pa_proj_elements
1777: SET progress_outdated_flag = 'Y'
1778: WHERE proj_element_id = p_object_id
1779: AND project_id = p_project_id
1780: AND object_type = p_object_type;
3908: --- call apis if the status is 'CANCELLED'
3909: IF PA_PROGRESS_UTILS.get_system_task_status( l_TASK_STATUS ) = 'CANCELLED'
3910: AND l_element_struc_type = 'WORKPLAN' --maansari: fpm changes
3911: THEN
3912: PA_PROJ_ELEMENTS_UTILS.Check_chg_stat_cancel_ok (
3913: p_task_id => p_object_id
3914: ,p_task_version_id => p_object_version_id
3915: ,p_new_task_status => l_task_status
3916: ,x_return_status => l_return_status
3988: task_status1 number;
3989:
3990: cursor cur_Task_Type is
3991: select type_id
3992: from pa_proj_elements
3993: where proj_element_id = p_object_id;
3994:
3995: cursor chk_task_type_ppc_enabled (p_task_type_id number)is
3996: select percent_comp_enable_flag
4023: close chk_structure_ppc_enabled;
4024:
4025: select status_code
4026: into task_status1
4027: from pa_proj_elements
4028: WHERE proj_element_id = p_object_id
4029: AND project_id = p_project_id
4030: AND object_type = p_object_type;
4031:
4069: /* -- Bug#8213897 >> Ends -- */
4070:
4071:
4072:
4073: --Update pa_proj_elements with the status
4074: UPDATE pa_proj_elements
4075: SET status_code = l_task_status
4076: ,last_update_date = decode(status_code,l_task_status,last_update_date,sysdate) --Bug 5978904
4077: ,last_update_login = decode(status_code,l_task_status,last_update_login,l_login_id) --Bug 5978904
4070:
4071:
4072:
4073: --Update pa_proj_elements with the status
4074: UPDATE pa_proj_elements
4075: SET status_code = l_task_status
4076: ,last_update_date = decode(status_code,l_task_status,last_update_date,sysdate) --Bug 5978904
4077: ,last_update_login = decode(status_code,l_task_status,last_update_login,l_login_id) --Bug 5978904
4078: ,last_updated_by = decode(status_code,l_task_status,last_updated_by,l_user_id) --Bug 5978904
4172: END;
4173:
4174: IF ((PA_WORKPLAN_ATTR_UTILS.CHECK_AUTO_DATE_SYNC_ENABLED(l_structure_id) = 'Y')
4175: AND
4176: (PA_Proj_Elements_Utils.CHECK_IS_FINANCIAL_TASK(p_object_id) = 'Y') --Bug 3784405 Satish
4177: AND
4178: (PA_PROJECT_STRUCTURE_UTILS.CHECK_SHARING_ENABLED(p_project_id) = 'Y'))
4179: THEN
4180: --copy to transaction dates
4885: --cursor to get structure version id of all non-published version
4886: CURSOR cur_get_wk_ver_struct_id IS
4887: select str.element_version_id
4888: from pa_proj_elem_ver_structure str,
4889: pa_proj_elements pe,
4890: pa_proj_structure_types pst
4891: where pe.project_id = p_project_id
4892: and pe.project_id = str.project_id
4893: and pe.proj_element_id = str.proj_element_id
4902: --cursor to get only structure version id (when version disabled)
4903: CURSOR cur_get_only_ver_struct_id IS
4904: select str.element_version_id
4905: from pa_proj_elem_ver_structure str,
4906: pa_proj_elements pe,
4907: pa_proj_structure_types pst
4908: where pe.project_id = p_project_id
4909: and pe.project_id = str.project_id
4910: and pe.proj_element_id = str.proj_element_id
5704: CURSOR cur_prog_enabled(c_proj_element_id NUMBER)
5705: IS
5706: SELECT nvl(ttype.PROG_ENTRY_ENABLE_FLAG, 'N')
5707: from pa_task_types ttype
5708: , pa_proj_elements elem
5709: where elem.project_id = p_project_id
5710: and elem.proj_element_id = c_proj_element_id
5711: and elem.object_type = 'PA_TASKS'
5712: and elem.type_id = ttype.task_type_id;
5781:
5782:
5783: -- Bug 3878024 : The following code is not needed. Now the passed task is taken in the cursosr itself.
5784: /*
5785: --Update pa_proj_elements
5786: UPDATE pa_proj_elements
5787: SET status_code = p_task_status
5788: WHERE proj_element_id = p_object_id
5789: AND project_id = p_project_id;
5782:
5783: -- Bug 3878024 : The following code is not needed. Now the passed task is taken in the cursosr itself.
5784: /*
5785: --Update pa_proj_elements
5786: UPDATE pa_proj_elements
5787: SET status_code = p_task_status
5788: WHERE proj_element_id = p_object_id
5789: AND project_id = p_project_id;
5790:
6226: END LOOP; -- cur_task_assignments_rec in cur_task_assignments(p_object_version_id, p_object_id) LOOP
6227:
6228: -- Now tasks processing starts
6229: -- 4490532 : changed from IS_LOWEST_TASK to is_summary_task_or_structure
6230: --l_lowest_level_task := PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(p_task_version_id => cur_tasks_rec.object_id_to1 );
6231: IF PA_PROJ_ELEMENTS_UTILS.is_summary_task_or_structure( cur_tasks_rec.object_id_to1) = 'Y' THEN
6232: l_lowest_level_task := 'N';
6233: ELSE
6234: l_lowest_level_task := 'Y';
6227:
6228: -- Now tasks processing starts
6229: -- 4490532 : changed from IS_LOWEST_TASK to is_summary_task_or_structure
6230: --l_lowest_level_task := PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(p_task_version_id => cur_tasks_rec.object_id_to1 );
6231: IF PA_PROJ_ELEMENTS_UTILS.is_summary_task_or_structure( cur_tasks_rec.object_id_to1) = 'Y' THEN
6232: l_lowest_level_task := 'N';
6233: ELSE
6234: l_lowest_level_task := 'Y';
6235: END IF;
6667: AND project_id = p_project_id;
6668: END LOOP; -- cur_task_assignments_rec in cur_system_assignment(p_object_version_id, p_object_id) LOOP
6669: END IF; -- IF NVL(l_lowest_level_task, 'N') = 'Y' AND NVL(l_assignment_exists,'Y') = 'N' THEN
6670:
6671: --Update pa_proj_elements
6672: UPDATE pa_proj_elements
6673: SET status_code = p_task_status
6674: ,last_update_date = decode(status_code,p_task_status,last_update_date,sysdate) --Bug 5978904
6675: ,last_update_login = decode(status_code,p_task_status,last_update_login,l_login_id) --Bug 5978904
6668: END LOOP; -- cur_task_assignments_rec in cur_system_assignment(p_object_version_id, p_object_id) LOOP
6669: END IF; -- IF NVL(l_lowest_level_task, 'N') = 'Y' AND NVL(l_assignment_exists,'Y') = 'N' THEN
6670:
6671: --Update pa_proj_elements
6672: UPDATE pa_proj_elements
6673: SET status_code = p_task_status
6674: ,last_update_date = decode(status_code,p_task_status,last_update_date,sysdate) --Bug 5978904
6675: ,last_update_login = decode(status_code,p_task_status,last_update_login,l_login_id) --Bug 5978904
6676: ,last_updated_by = decode(status_code,p_task_status,last_updated_by,l_user_id) --Bug 5978904
6929: IF PA_PROGRESS_UTILS.get_system_task_status( p_task_status ) in ( 'CANCELLED', 'ON_HOLD' )
6930: THEN
6931: -- Bug 3878024 : Commented the below code. Now cursor cur_tasks_rec will select the passed task too
6932: /*
6933: --Update pa_proj_elementso
6934: UPDATE pa_proj_elements
6935: SET status_code = p_task_status
6936: WHERE proj_element_id = p_object_id
6937: AND project_id = p_project_id;
6930: THEN
6931: -- Bug 3878024 : Commented the below code. Now cursor cur_tasks_rec will select the passed task too
6932: /*
6933: --Update pa_proj_elementso
6934: UPDATE pa_proj_elements
6935: SET status_code = p_task_status
6936: WHERE proj_element_id = p_object_id
6937: AND project_id = p_project_id;
6938:
6956: */
6957:
6958:
6959: FOR cur_tasks_rec in cur_tasks LOOP
6960: --Update pa_proj_elementso
6961: UPDATE pa_proj_elements
6962: SET status_code = p_task_status
6963: ,last_update_date = decode(status_code,p_task_status,last_update_date,sysdate) --Bug 5978904
6964: ,last_update_login = decode(status_code,p_task_status,last_update_login,l_login_id) --Bug 5978904
6957:
6958:
6959: FOR cur_tasks_rec in cur_tasks LOOP
6960: --Update pa_proj_elementso
6961: UPDATE pa_proj_elements
6962: SET status_code = p_task_status
6963: ,last_update_date = decode(status_code,p_task_status,last_update_date,sysdate) --Bug 5978904
6964: ,last_update_login = decode(status_code,p_task_status,last_update_login,l_login_id) --Bug 5978904
6965: ,last_updated_by = decode(status_code,p_task_status,last_updated_by,l_user_id) --Bug 5978904
7030: l_status_code := '127';
7031: ELSE
7032: l_status_code := '124'; --if p_as_of_date is g_miss_date
7033: END IF;
7034: --Update pa_proj_elementso
7035: if (nvl(get_task_pc_info_rec.published_flag,'X') <> 'N' and
7036: nvl(get_task_pc_info_rec.current_flag,'X') <> 'N') then
7037: UPDATE pa_proj_elements
7038: SET status_code = l_status_code
7033: END IF;
7034: --Update pa_proj_elementso
7035: if (nvl(get_task_pc_info_rec.published_flag,'X') <> 'N' and
7036: nvl(get_task_pc_info_rec.current_flag,'X') <> 'N') then
7037: UPDATE pa_proj_elements
7038: SET status_code = l_status_code
7039: ,last_update_date = decode(status_code,l_status_code,last_update_date,sysdate) --Bug 5978904
7040: ,last_update_login = decode(status_code,l_status_code,last_update_login,l_login_id) --Bug 5978904
7041: ,last_updated_by = decode(status_code,l_status_code,last_updated_by,l_user_id) --Bug 5978904
7259: from pa_progress_rollup ppr, pa_proj_element_versions ppev --4871809
7260: where ppr.project_id = p_project_id
7261: and ppr.structure_version_id is null
7262: and ppr.object_type in ('PA_STRUCTURES','PA_ASSIGNMENTS','PA_TASKS')
7263: --and pa_proj_elements_utils.is_lowest_task(ppr.object_version_id) = 'Y' --bug 4050532
7264: and structure_type = 'WORKPLAN' -- FPM Dev CR 3
7265: and current_flag = 'Y'
7266: and ppr.proj_element_id = ppev.proj_element_id
7267: and ppev.parent_structure_version_id = p_working_str_version_id
7312: CURSOR cur_proj_elements(c_proj_element_id NUMBER)
7313: IS
7314:
7315: SELECT decode( ppe.base_percent_comp_deriv_code, null, ptt.base_percent_comp_deriv_code, '^', ptt.base_percent_comp_deriv_code, ppe.base_percent_comp_deriv_code )
7316: from pa_proj_elements ppe
7317: ,pa_task_types ptt --added during the bugfix 3962823.
7318: where ppe.project_id = p_project_id
7319: and ppe.proj_element_id = c_proj_element_id
7320: and ppe.type_id = ptt.task_type_id
7371: -- and resource_assignment_id = p_object_id Bug 3764224
7372: and resource_list_member_id = p_object_id -- Bug 3764224 ---:::DJ
7373: and task_id = p_task_id
7374: --and task_version_id = p_task_version_id --bug 3911600
7375: and structure_version_id = pa_proj_elements_utils.latest_published_ver_id(p_project_id,'WORKPLAN')
7376: and NVL(cbs_element_id,-1) = NVL(c_cbs_element_id,-1);--added for cbs 16895485
7377:
7378: cursor cur_proj_prog_attr
7379: is
7650: -- Bug 3834339 : Using function to decide whether assignment exists on task or not
7651: l_assignment_exists := 'N';
7652: IF l_c1rec.object_type = 'PA_TASKS' THEN
7653: l_assignment_exists := NVL(PA_PROGRESS_UTILS.check_assignment_exists(p_project_id,l_c1rec.object_version_id,l_c1rec.object_type),'N');
7654: l_lowest_level_task := NVL(pa_proj_elements_utils.is_lowest_task(l_c1rec.object_version_id),'N'); --bug 4050532
7655: END IF;
7656:
7657:
7658: IF g1_debug_mode = 'Y' THEN
8481:
8482: pa_progress_pvt.copy_actuals_for_workplan(
8483: p_calling_context => 'WP_APPLY_PROGRESS_TO_WORKING'
8484: ,p_project_id => p_project_id
8485: ,p_source_struct_ver_id => PA_PROJ_ELEMENTS_UTILS.latest_published_ver_id(p_project_id)
8486: ,p_target_struct_ver_id => p_working_str_version_id
8487: ,x_return_status => l_return_status
8488: ,x_msg_count => l_msg_count
8489: ,x_msg_data => l_msg_data);
8984: Cursor cur_Summerized_Actuals
8985: IS
8986: Select ppevs.element_version_id
8987: FROM PA_Proj_Elem_Ver_Structure ppevs,
8988: PA_Proj_Elements ppe,
8989: PA_Proj_Structure_Types ppst,
8990: PA_Structure_types pst
8991: WHERE ppevs.Project_ID = P_Project_ID
8992: AND ppevs.status_code = 'STRUCTURE_PUBLISHED'
9812: OPEN c_get_task_version_id(p_task_id, p_project_id ,p_structure_version_id);
9813: FETCH c_get_task_version_id INTO l_task_version_id, l_structure_version_id;
9814: CLOSE c_get_task_version_id;
9815: END IF;
9816: l_lowest_level_task := PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(p_task_version_id => l_task_version_id );
9817: l_task_id := p_task_id; -- 3603636
9818: ELSE
9819: l_object_type := p_object_type;
9820: l_task_version_id := p_object_version_id;
9817: l_task_id := p_task_id; -- 3603636
9818: ELSE
9819: l_object_type := p_object_type;
9820: l_task_version_id := p_object_version_id;
9821: l_lowest_level_task := PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(p_task_version_id => l_task_version_id );
9822: l_structure_version_id := p_structure_version_id;
9823: l_task_id := p_object_id; -- 3603636
9824: END IF;
9825:
10079: END;
10080:
10081: IF ((PA_WORKPLAN_ATTR_UTILS.CHECK_AUTO_DATE_SYNC_ENABLED(l_structure_id) = 'Y')
10082: AND
10083: (PA_Proj_Elements_Utils.CHECK_IS_FINANCIAL_TASK(p_task_id) = 'Y') --Bug 3784405 Satish
10084: AND
10085: (PA_PROJECT_STRUCTURE_UTILS.CHECK_SHARING_ENABLED(p_project_id) = 'Y'))
10086: THEN
10087: --copy to transaction dates
11151: FROM pa_proj_element_versions ppv, pa_progress_rollup ppr
11152: WHERE ppv.project_id = p_project_id
11153: AND ppv.financial_task_flag = 'Y'
11154: AND ppv.parent_structure_version_id = c_structure_version_id -- Bug 3957457
11155: -- AND PA_PROJ_ELEMENTS_UTILS.check_child_element_exist(ppv.element_version_id) = 'N' bug 4086613
11156: AND ppv.project_id = ppr.project_id(+)
11157: -- AND ppv.element_version_id = ppc.object_version_id(+)
11158: AND ppv.proj_element_id = ppr.object_id(+) -- Bug 3696820
11159: AND ppr.current_flag(+) = 'Y'
11258: FROM pa_projects_all
11259: WHERE project_id = p_project_id;
11260:
11261:
11262: l_fin_structure_version_id := PA_PROJ_ELEMENTS_UTILS.latest_published_ver_id(p_project_id, 'FINANCIAL');
11263:
11264:
11265: IF PA_PROJECT_STRUCTURE_UTILS.check_workplan_enabled(p_project_id) = 'N'
11266: THEN
11340: END LOOP;
11341:
11342: ELSIF l_structure_sharing_code = 'SPLIT_MAPPING'
11343: THEN
11344: l_structure_version_id := PA_PROJ_ELEMENTS_UTILS.latest_published_ver_id(p_project_id);
11345:
11346: IF l_structure_version_id = -1
11347: THEN
11348: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
11728: OR c_object_type = 'PA_DELIVERABLES'); -- 4398411 : Added Deliverable condition
11729:
11730: CURSOR c_get_progress_status(c_proj_element_id NUMBER) IS
11731: select initial_progress_status_code
11732: from pa_proj_elements
11733: , pa_task_types
11734: where project_id = p_project_id
11735: and proj_element_id = c_proj_element_id
11736: and type_id = task_type_id;
11866: where ppr.project_id = p_project_id
11867: and ppr.structure_version_id is null
11868: and ppr.object_type = 'PA_TASKS'
11869: and structure_type = 'WORKPLAN'
11870: and pa_proj_elements_utils.is_lowest_task(ppr.object_version_id) = 'Y' -- Bug 3627315 issue 8 Added this condition
11871: and pa_progress_utils.check_assignment_exists(p_project_id,ppr.object_version_id,ppr.object_type) = 'N' -- Bug 3627315 issue 8 Added this condition
11872: and current_flag = 'Y'
11873: Union
11874: select *
11906:
11907: -- Bug 3865516 : Added c_get_task_status
11908: CURSOR c_get_task_status(c_project_id NUMBER, c_proj_element_id NUMBER) IS
11909: select status_code
11910: from pa_proj_elements
11911: where project_id = c_project_id
11912: and proj_element_id = c_proj_element_id;
11913:
11914:
11921:
11922: CURSOR cur_proj_elements(c_proj_element_id NUMBER)
11923: IS
11924: SELECT BASE_PERCENT_COMP_DERIV_CODE
11925: from pa_proj_elements
11926: where project_id = p_project_id
11927: and proj_element_id = c_proj_element_id;
11928:
11929: CURSOR cur_task_plan (c_proj_element_id NUMBER)
12045: CURSOR cur_prog_enabled(c_proj_element_id NUMBER)
12046: IS
12047: SELECT nvl(ttype.PROG_ENTRY_ENABLE_FLAG, 'N')
12048: from pa_task_types ttype
12049: , pa_proj_elements elem
12050: where elem.project_id = p_project_id
12051: and elem.proj_element_id = c_proj_element_id
12052: and elem.object_type = 'PA_TASKS'
12053: and elem.type_id = ttype.task_type_id;
12138:
12139: -- On this l_as_of_date, there can be working progress record which we will update
12140: -- with working wp version progress
12141:
12142: l_latest_pub_wp_version_id := p_pub_structure_version_id;--PA_PROJ_ELEMENTS_UTILS.latest_published_ver_id(p_project_id, 'WORKPLAN');
12143: l_track_wp_cost_flag := pa_fp_wp_gen_amt_utils.get_wp_track_cost_amt_flag(p_project_id); --Bug 3801745
12144:
12145: IF g1_debug_mode = 'Y' THEN
12146: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.PUBLISH_PROGRESS', x_Msg => 'l_as_of_date='||l_as_of_date, x_Log_Level=> 3);
12461: END IF;
12462: l_EFF_ROLLUP_PERCENT_COMP := l_rec.eff_rollup_percent_comp; --bug 3906362
12463: --bug 4191360, consider for lowest level task only
12464: --ELSIF l_rec.object_type = 'PA_TASKS' AND NVL(PA_PROGRESS_UTILS.check_assignment_exists(p_project_id,l_object_version_id,l_rec.object_type),'N') = 'N' THEN
12465: ELSIF l_rec.object_type = 'PA_TASKS' AND NVL(pa_proj_elements_utils.is_lowest_task(l_object_version_id),'N') = 'Y' THEN
12466: l_ptav_rec := null;
12467: --bug 4191360, added IF NVL(l_assignment_exists, 'N')
12468: l_assignment_exists := PA_PROGRESS_UTILS.check_assignment_exists(p_project_id,l_object_version_id,l_rec.object_type);
12469: IF NVL(l_assignment_exists, 'N') = 'N'
12871: END IF;
12872:
12873:
12874: FORALL i IN 1..l_index
12875: update pa_proj_elements
12876: set status_code = l_task_status_code_tbl(i)
12877: where project_id = l_project_id_tbl(i)
12878: and proj_element_id = l_task_id_tbl(i)
12879: and l_object_type_tbl(i) = 'PA_TASKS'
14210: decode(ppe.base_percent_comp_deriv_code,null,ptt.BASE_PERCENT_COMP_DERIV_CODE,'^',ptt.BASE_PERCENT_COMP_DERIV_CODE,ppe.base_percent_comp_deriv_code) base_percent_comp_deriv_code,
14211: ptt.initial_progress_status_code,
14212: ppevs.scheduled_start_date,
14213: ppevs.scheduled_finish_date
14214: from pa_proj_elements ppe,
14215: pa_proj_element_versions ppev,
14216: pa_proj_elem_ver_schedule ppevs,
14217: pa_task_types ptt
14218: where ppev.proj_element_id = l_obj
14269: CURSOR cur_prog_setup(c_proj_element_id NUMBER, c_project_id number)
14270: IS
14271: SELECT nvl(ttype.PROG_ENTRY_ENABLE_FLAG, 'N'),initial_progress_status_code
14272: from pa_task_types ttype
14273: , pa_proj_elements elem
14274: where elem.project_id = c_project_id
14275: and elem.proj_element_id = c_proj_element_id
14276: and elem.object_type = 'PA_TASKS'
14277: and elem.type_id = ttype.task_type_id;
14287: , ppr.proj_element_id
14288: , ppr.object_type
14289: , ppr.project_id
14290: FROM pa_progress_rollup ppr
14291: , pa_proj_elements ppe
14292: WHERE ppr.progress_rollup_id = c_progress_rollup_id
14293: AND ppr.proj_element_id = ppe.proj_element_id
14294: ;
14295:
14315: , ppr.actual_start_date
14316: , ppr.actual_finish_date
14317: , ppe.status_code
14318: FROM pa_progress_rollup ppr
14319: , pa_proj_elements ppe
14320: WHERE ppr.project_id = c_project_id
14321: AND ppr.object_id = c_object_id
14322: AND ppr.object_type = c_object_type
14323: AND ppr.structure_type = 'WORKPLAN'
14342: , ppr.as_of_date
14343: , ppr.project_id
14344: , ppr.current_flag
14345: FROM pa_progress_rollup ppr
14346: , pa_proj_elements ppe
14347: WHERE ppr.progress_rollup_id = c_progress_rollup_id
14348: AND ppr.proj_element_id = ppe.proj_element_id
14349: ;
14350:
14403: --added for the Bug 13640836
14404: CURSOR get_element_number (l_proj_element_id NUMBER)
14405: IS
14406: SELECT element_number
14407: FROM pa_proj_elements p
14408: WHERE proj_element_id=l_proj_element_id;
14409: CURSOR get_res_assignment_name (l_resource_assignment_id NUMBER)
14410: IS
14411: SELECT rlm.ALIAS
14417: IS
14418: SELECT version_name
14419: FROM pa_budget_versions
14420: WHERE budget_version_id=l_budget_version_id;
14421: l_element_number pa_proj_elements.element_number%type;
14422: l_res_assignment_name pa_resource_list_members.alias%type;
14423: l_plan_version_name pa_budget_versions.version_name%type;
14424: --added for the Bug 13640836
14425: BEGIN
15150: l_object_id := all_objects_in_temp_rec.project_element_id;
15151: l_object_type := 'PA_TASKS';
15152: --- here get the planned value if task is lowest level and PC deriv is EFFORT based and no assignments for the task
15153: if (l_base_pc_deriv_code = 'EFFORT' or l_base_pc_deriv_code = 'COST') and
15154: (PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(p_task_version_id => l_object_version_id ) = 'Y') and
15155: (PA_PROGRESS_UTILS.check_assignment_exists(l_project_id,l_object_version_id,'PA_TASKS') <> 'Y') then
15156: open get_planned_val_for_task;
15157: fetch get_planned_val_for_task into l_planned_eff, l_planned_cost;
15158: close get_planned_val_for_task;
18458: -- Bug 4533112 Begin
18459: pa_debug.log_message('GET_SUMM_ACT: Calling Progress Client Extension.', 1);
18460: FOR l_index1 IN 1..l_index2 LOOP
18461:
18462: IF OBJECT_TYPE(l_index1) = 'PA_ASSIGNMENTS' OR (OBJECT_TYPE(l_index1) = 'PA_TASKS' AND PA_PROJ_ELEMENTS_UTILS.is_summary_task_or_structure(OBJECT_VERSION_ID(l_index1))= 'N')
18463: THEN
18464:
18465: l_db_date_override_flag := 'N';
18466: l_db_estimated_start_date := null;
18649: u_actual_start_date(l_index1) := l_db_actual_start_date;
18650: u_base_progress_status_code(l_index1) := l_db_date_override_flag;
18651:
18652:
18653: IF (l_db_object_type = 'PA_ASSIGNMENTS' OR (l_db_object_type = 'PA_TASKS' AND PA_PROJ_ELEMENTS_UTILS.is_summary_task_or_structure(l_db_object_version_id)= 'N'))
18654: AND l_db_current_flag IN ('Y','N')
18655: THEN
18656:
18657: IF nvl(l_db_date_override_flag, 'N') = 'Y' THEN
21130: AND prog.structure_type = 'WORKPLAN'
21131: AND prog.allow_collab_prog_entry = 'Y'
21132: UNION
21133: SELECT distinct elem.project_id project_id, str.element_version_id structure_version_id
21134: FROM pa_proj_elements elem
21135: , pa_proj_elem_ver_structure str
21136: , pa_proj_progress_attr prog
21137: , pa_proj_structure_types pstype
21138: WHERE elem.manager_person_id = p_person_id
21545: --end bug 3968791
21546: Cursor cur_Summerized_Actuals IS
21547: Select count(1)
21548: FROM PA_Proj_Elem_Ver_Structure ppevs,
21549: PA_Proj_Elements ppe,
21550: PA_Proj_Structure_Types ppst,
21551: PA_Structure_types pst
21552: WHERE ppevs.Project_ID = P_Project_ID
21553: AND ppevs.status_code = 'STRUCTURE_PUBLISHED'
23265: OPEN c_get_task_version_id(p_task_id_tbl(i), p_project_id_tbl(i) ,p_structure_version_id_tbl(i));
23266: FETCH c_get_task_version_id INTO l_task_version_id_tbl(i), l_structure_version_id_tbl(i);
23267: CLOSE c_get_task_version_id;
23268: END IF;
23269: l_lowest_level_task_tbl(i) := PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(p_task_version_id => l_task_version_id_tbl(i) );
23270: l_task_id_tbl(i) := p_task_id_tbl(i);
23271: ELSE
23272: l_object_type_tbl(i) := p_object_type_tbl(i);
23273: l_task_version_id_tbl(i) := p_object_version_id_tbl(i);
23270: l_task_id_tbl(i) := p_task_id_tbl(i);
23271: ELSE
23272: l_object_type_tbl(i) := p_object_type_tbl(i);
23273: l_task_version_id_tbl(i) := p_object_version_id_tbl(i);
23274: l_lowest_level_task_tbl(i) := PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(p_task_version_id => l_task_version_id_tbl(i) );
23275: l_structure_version_id_tbl(i) := p_structure_version_id_tbl(i);
23276: l_task_id_tbl(i) := p_object_id_tbl(i);
23277: END IF;
23278:
23716: END;
23717:
23718: IF ((PA_WORKPLAN_ATTR_UTILS.CHECK_AUTO_DATE_SYNC_ENABLED(l_structure_id) = 'Y')
23719: AND
23720: (PA_Proj_Elements_Utils.CHECK_IS_FINANCIAL_TASK(p_task_id_tbl(i)) = 'Y') --Bug 3784405 Satish
23721: AND
23722: (PA_PROJECT_STRUCTURE_UTILS.CHECK_SHARING_ENABLED(p_project_id_tbl(i)) = 'Y'))
23723: THEN
23724: --copy to transaction dates