[Home] [Help]
858: IS
859: SELECT trunc(p_as_of_date) FROM DUAL
860: MINUS
861: SELECT PA_PROGRESS_UTILS.AS_OF_DATE(ppe.project_id, ppe.resource_list_member_id, ppp.progress_cycle_id, 'PA_ASSIGNMENTS', 'WORKPLAN', p_proj_element_id/* Amit : Modified for IB4 Progress CR. */) as_of_date
862: from pa_resource_types po, pa_proj_progress_attr ppp, PA_TASK_ASSIGNMENTS_V ppe
863: where ppe.project_id = ppp.project_id(+)
864: AND ppp.structure_type (+) = 'WORKPLAN'
865: and ppe.project_id= p_project_id
866: and ppe.resource_list_member_id = p_object_id /* Modified for IB4 Progress CR. */
8467: l_cost_ind_compiled_set_id number;
8468: l_raw_cost_rejection_code varchar2(1000);
8469: l_burden_cost_rejection_code varchar2(1000);
8470: l_insufficient_paramters EXCEPTION; -- Added to raised exception if any required paramter is missing for PA_COST1 api
8471: l_resource_alias pa_task_assignments_v.resource_alias%TYPE; -- Added if any required paramter is missing for PA_COST1 api
8472:
8473: l_null_above VARCHAR2(1) := 'N'; -- Added if any required paramter is miss ing for PA_COST1 api
8474:
8475: l_incur_by_res_type SYSTEM.PA_VARCHAR2_30_TBL_TYPE; -- Bug # 3473324.
8521: --bug 3821299
8522: CURSOR get_assignment_id( c_structure_version_id NUMBER, c_task_id NUMBER, c_resource_list_member_id NUMBER )
8523: IS
8524: SELECT resource_assignment_id
8525: FROM pa_task_assignments_v
8526: WHERE structure_version_id = c_structure_version_id
8527: AND task_id = c_task_id
8528: AND resource_list_member_id = c_resource_list_member_id
8529: ;
8572: pra.unit_of_measure,
8573: pra.rate_based_flag,
8574: pra.resource_assignment_id,
8575: rlm.alias
8576: FROM pa_resource_assignments pra, ----pa_task_assignments_v 4871809
8577: pa_budget_versions pbv,
8578: pa_resource_list_members rlm
8579: WHERE pbv.project_structure_version_id = c_structure_version_id
8580: AND pbv.budget_version_id = pra.budget_version_id
8645: l_resource_assignment_id := l_assgn_rec.resource_assignment_id;
8646: l_resource_alias := l_assgn_rec.alias;
8647:
8648: IF g1_debug_mode = 'Y' THEN
8649: pa_debug.write(x_Module=>'PA_PROGRESS_UTILS.Get_Res_Rate_Burden_Multiplier', x_Msg => 'Values retrived from pa_task_assignments_v', x_Log_Level=> 3);
8650: pa_debug.write(x_Module=>'PA_PROGRESS_UTILS.Get_Res_Rate_Burden_Multiplier', x_Msg => 'l_person_id='||l_person_id, x_Log_Level=> 3);
8651: pa_debug.write(x_Module=>'PA_PROGRESS_UTILS.Get_Res_Rate_Burden_Multiplier', x_Msg => 'l_resource_class_code='||l_resource_class_code, x_Log_Level=> 3);
8652: pa_debug.write(x_Module=>'PA_PROGRESS_UTILS.Get_Res_Rate_Burden_Multiplier', x_Msg => 'l_expenditure_type='||l_expenditure_type, x_Log_Level=> 3);
8653: pa_debug.write(x_Module=>'PA_PROGRESS_UTILS.Get_Res_Rate_Burden_Multiplier', x_Msg => 'l_expenditure_ou='||l_expenditure_ou, x_Log_Level=> 3);
8936: /* Select the resource name TO BE CHECKED
8937: BEGIN
8938: SELECT resource_alias
8939: INTO l_resource_alias
8940: FROM pa_task_assignments_v
8941: WHERE resource_list_member_id = l_BOM_resource_id
8942: AND project_id = p_project_id; -- Modifications for Bug # 3688902.
8943: EXCEPTION
8944: WHEN NO_DATA_FOUND THEN
8951: /*-- FPM Dev CR 5 Begin
8952: BEGIN
8953: SELECT task_id
8954: INTO l_task_id
8955: FROM pa_task_assignments_v
8956: WHERE resource_list_member_id = l_res_list_memb_id_tbl(i)
8957: AND project_id = p_project_id ;
8958: EXCEPTION
8959: WHEN NO_DATA_FOUND THEN
10639: -- 1). Get the input act_brdncost_pc into the corresponding local variable.
10640:
10641: l_act_brdncost_pc := nvl(p_act_brdncost_pc,0);
10642:
10643: -- 2). Get the planned_brdncost_pc from pa_task_assignments_v;
10644:
10645: open cur_ptav;
10646: fetch cur_ptav into l_cur_ptav, l_resource_assignment_id,l_budget_version_id ; -- Bug 4372462 : Added l_resource_assignment_id and l_budget_version_id
10647: close cur_ptav;