[Home] [Help]
855: IS
856: SELECT trunc(p_as_of_date) FROM DUAL
857: MINUS
858: 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
859: from pa_resource_types po, pa_proj_progress_attr ppp, PA_TASK_ASSIGNMENTS_V ppe
860: where ppe.project_id = ppp.project_id(+)
861: AND ppp.structure_type (+) = 'WORKPLAN'
862: and ppe.project_id= p_project_id
863: and ppe.resource_list_member_id = p_object_id /* Modified for IB4 Progress CR. */
8421: l_cost_ind_compiled_set_id number;
8422: l_raw_cost_rejection_code varchar2(1000);
8423: l_burden_cost_rejection_code varchar2(1000);
8424: l_insufficient_paramters EXCEPTION; -- Added to raised exception if any required paramter is missing for PA_COST1 api
8425: l_resource_alias pa_task_assignments_v.resource_alias%TYPE; -- Added if any required paramter is missing for PA_COST1 api
8426:
8427: l_null_above VARCHAR2(1) := 'N'; -- Added if any required paramter is miss ing for PA_COST1 api
8428:
8429: l_incur_by_res_type SYSTEM.PA_VARCHAR2_30_TBL_TYPE; -- Bug # 3473324.
8475: --bug 3821299
8476: CURSOR get_assignment_id( c_structure_version_id NUMBER, c_task_id NUMBER, c_resource_list_member_id NUMBER )
8477: IS
8478: SELECT resource_assignment_id
8479: FROM pa_task_assignments_v
8480: WHERE structure_version_id = c_structure_version_id
8481: AND task_id = c_task_id
8482: AND resource_list_member_id = c_resource_list_member_id
8483: ;
8526: pra.unit_of_measure,
8527: pra.rate_based_flag,
8528: pra.resource_assignment_id,
8529: rlm.alias
8530: FROM pa_resource_assignments pra, ----pa_task_assignments_v 4871809
8531: pa_budget_versions pbv,
8532: pa_resource_list_members rlm
8533: WHERE pbv.project_structure_version_id = c_structure_version_id
8534: AND pbv.budget_version_id = pra.budget_version_id
8589: l_resource_assignment_id := l_assgn_rec.resource_assignment_id;
8590: l_resource_alias := l_assgn_rec.alias;
8591:
8592: IF g1_debug_mode = 'Y' THEN
8593: 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);
8594: 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);
8595: 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);
8596: 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);
8597: 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);
8880: /* Select the resource name TO BE CHECKED
8881: BEGIN
8882: SELECT resource_alias
8883: INTO l_resource_alias
8884: FROM pa_task_assignments_v
8885: WHERE resource_list_member_id = l_BOM_resource_id
8886: AND project_id = p_project_id; -- Modifications for Bug # 3688902.
8887: EXCEPTION
8888: WHEN NO_DATA_FOUND THEN
8895: /*-- FPM Dev CR 5 Begin
8896: BEGIN
8897: SELECT task_id
8898: INTO l_task_id
8899: FROM pa_task_assignments_v
8900: WHERE resource_list_member_id = l_res_list_memb_id_tbl(i)
8901: AND project_id = p_project_id ;
8902: EXCEPTION
8903: WHEN NO_DATA_FOUND THEN
10564: -- 1). Get the input act_brdncost_pc into the corresponding local variable.
10565:
10566: l_act_brdncost_pc := nvl(p_act_brdncost_pc,0);
10567:
10568: -- 2). Get the planned_brdncost_pc from pa_task_assignments_v;
10569:
10570: open cur_ptav;
10571: 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
10572: close cur_ptav;