[Home] [Help]
228: *******************************************************************/
229: FUNCTION Get_resource_Code(p_resource_assignment_id IN NUMBER) return VARCHAR2
230: IS
231: -- Decl of local variables
232: l_resource_code pa_resource_assignments.res_type_code%TYPE := NULL;
233: BEGIN
234: /* The purpose of this function is to return the resource code for a given resource assignment.*/
235: IF p_resource_assignment_id IS NOT NULL THEN
236: Select DECODE(incurred_by_res_flag, 'Y','',
244: 'BOM_EQUIPMENT',to_char(bom_resource_id),
245: 'INVENTORY_ITEM',to_char(inventory_item_id),
246: 'ITEM_CATEGORY',to_char(item_category_id)))
247: INTO l_resource_code
248: FROM pa_resource_assignments
249: WHERE resource_assignment_id = p_resource_assignment_id;
250:
251: Return l_resource_code;
252: ELSE
279: nvl(to_char(person_id),nvl(to_char(job_id), nvl(person_type_code,
280: nvl(to_char(incur_by_role_id),
281: nvl(incur_by_res_class_code, NULL))))))
282: INTO l_incur_by_res_code
283: FROM pa_resource_assignments
284: WHERE resource_assignment_id = p_resource_assignment_id;
285:
286: Return l_incur_by_res_code;
287: ELSE
305: *******************************************************************/
306: FUNCTION Get_Fin_Category_Code(p_resource_assignment_id IN NUMBER) return
307: VARCHAR2
308: IS
309: l_fin_category_code pa_resource_assignments.FC_RES_TYPE_CODE%TYPE := NULL;
310: BEGIN
311: IF p_resource_assignment_id IS NOT NULL THEN
312: SELECT DECODE(fc_res_type_code,
313: 'EXPENDITURE_TYPE',expenditure_type,
314: 'EXPENDITURE_CATEGORY',expenditure_category,
315: 'EVENT_TYPE',event_type,
316: 'REVENUE_CATEGORY',revenue_category_code)
317: INTO l_fin_category_code
318: FROM pa_resource_assignments
319: WHERE resource_assignment_id = p_resource_assignment_id;
320:
321: Return l_fin_category_code;
322: ELSE
3027: a.Non_Labor_Resource Non_Labor_Resource,
3028: a.incurred_by_res_flag incurred_by_res_flag,
3029: c.Resource_Class_Id
3030: From
3031: Pa_Resource_Assignments a
3032: ,Pa_Resource_Classes_b c
3033: Where
3034: c.Resource_Class_Code = a.Resource_Class_Code
3035: And a.Resource_Assignment_Id = P_Res_Assignment_Id;
3543: Expenditure_Category,
3544: Event_Type,
3545: Revenue_Category_Code
3546: From
3547: Pa_Resource_Assignments
3548: Where
3549: Resource_Assignment_Id = P_Res_Assignment_Id;
3550:
3551: l_Res_Attributes c_Res_Attributes%RowType;
4276: Incur_By_Role_Id,
4277: Person_Type_Code,
4278: Incur_By_Res_Class_Code
4279: From
4280: Pa_Resource_Assignments
4281: Where
4282: Resource_Assignment_Id = P_Res_Assignment_Id;
4283:
4284: l_Res_Attributes c_Res_Attributes%RowType;
4286: Cursor Get_Inc_By_Flag Is
4287: Select
4288: Incurred_By_Res_Flag
4289: From
4290: Pa_Resource_Assignments
4291: Where
4292: Resource_Assignment_Id = P_Res_Assignment_Id;
4293:
4294: l_Person_Id Number;
5266: l_task_id pa_tasks.task_id%TYPE;
5267: l_top_task_id pa_tasks.task_id%TYPE;
5268: l_bill_job_group_id pa_projects_all.bill_job_group_id%TYPE;
5269: l_project_type pa_projects_all.project_type%TYPE;
5270: l_expenditure_type pa_resource_assignments.expenditure_type%TYPE;
5271: l_org_id pa_projects_all.org_id%TYPE;
5272: l_expenditure_OU pa_projects_all.org_id%TYPE;
5273: l_txn_currency_code_override pa_fp_res_assignments_tmp.txn_currency_code_override%TYPE;
5274: l_cost_rate_multiplier CONSTANT pa_labor_cost_multipliers.multiplier%TYPE := 1;
5277: l_cost_override_rate pa_fp_res_assignments_tmp.rw_cost_rate_override%TYPE;
5278: l_raw_cost pa_fp_res_assignments_tmp.txn_raw_cost%TYPE;
5279: l_raw_cost_rate pa_fp_res_assignments_tmp.raw_cost_rate%TYPE;
5280: l_burden_cost pa_fp_res_assignments_tmp.txn_burdened_cost%TYPE;
5281: l_mfc_cost_type_id pa_resource_assignments.mfc_cost_type_id%TYPE;
5282: l_mfc_cost_source CONSTANT NUMBER := 2;
5283:
5284: --Out variables
5285: l_txn_raw_cost number;