[Home] [Help]
171:
172: l_Accounted_Period_Type GL_Sets_Of_Books.Accounted_Period_Type%TYPE;
173: l_New_Budget_Version_ID PA_Budget_Versions.Budget_Version_ID%TYPE;
174: l_Work_Budget_Version_ID PA_Budget_Versions.Budget_Version_ID%TYPE;
175: l_Work_Resource_Assign_ID PA_Resource_Assignments.Resource_Assignment_ID%TYPE;
176: l_Bslnd_Budget_Version_ID PA_Budget_Versions.Budget_Version_ID%TYPE;
177: l_Project_ID PA_Projects_all.Project_ID%TYPE;
178: l_Project_Completion_Date DATE;
179: l_Task_ID PA_Tasks.Task_ID%TYPE;
272: SUM(nvl(BCBL.Budget_Period_To_Date, 0) -
273: ( nvl(BCBL.Actual_Period_To_Date, 0) + nvl(BCBL.Encumb_Period_To_Date, 0)) ) Transfer_Amount, /* Bug#13598400: Added nvls */
274: MAX(BL.START_DATE) Budget_period_start_date
275: FROM
276: PA_Resource_Assignments RA,
277: PA_Budget_Lines BL,
278: PA_BC_Balances BCBL
279: WHERE
280: RA.Budget_Version_ID = l_Bslnd_Budget_Version_ID
710: AND bcbl.Resource_List_Member_ID = l_Resource_List_Member_ID
711: AND BCBL.Start_Date BETWEEN l_Cur_Yr_First_Prd_Start_Dt
712: AND l_Cur_Yr_Last_Prd_Start_Dt
713: AND NOT EXISTS (select 1 from pa_budget_lines bl,
714: pa_resource_assignments ra
715: where bl.resource_assignment_id = ra.resource_assignment_id
716: and ra.resource_list_member_id = bcbl.resource_list_member_id
717: and ra.project_id = bcbl.project_id
718: and ra.task_id = l_Task_ID
745: INTO
746: l_Work_Resource_Assign_ID
747: FROM
748: PA_Budget_Versions BV,
749: PA_Resource_Assignments RA
750: WHERE
751: RA.resource_list_member_id = l_Resource_List_Member_ID
752: AND RA.Budget_Version_ID = l_Work_Budget_Version_ID
753: AND RA.Project_ID = l_Project_ID
1600: -------------------------------------------------------------------------------------
1601: PROCEDURE Upd_Ins_Budget_Line (
1602: P_Budget_Version_ID IN PA_Budget_Versions.Budget_Version_ID%TYPE,
1603: P_Budget_Type_Code IN PA_Budget_Types.Budget_Type_Code%TYPE,
1604: P_Resource_Assignment_ID IN OUT NOCOPY PA_Resource_Assignments.Resource_Assignment_ID%TYPE,
1605: P_Period_Name IN GL_Periods.Period_Name%TYPE,
1606: P_Period_Start_Date IN GL_Periods.Start_Date%TYPE,
1607: P_Period_End_Date IN GL_Periods.End_Date%TYPE,
1608: P_Transfer_Amount IN NUMBER,
1672:
1673: BEGIN
1674: SELECT Projfunc_Currency_Code
1675: INTO l_Txn_Curr_Code
1676: FROM PA_Projects_All a, PA_Budget_Versions b, PA_Resource_Assignments c
1677: WHERE a.Project_Id = b.Project_Id
1678: AND b.Budget_Version_Id = c.Budget_Version_Id
1679: AND c.Resource_Assignment_Id = P_Resource_Assignment_Id;
1680: EXCEPTION
2017: RA.Project_ID,
2018: RA.Task_ID,
2019: BL.Code_Combination_ID,
2020: BL.Start_Date
2021: FROM PA_Resource_Assignments RA,
2022: PA_Budget_Lines BL
2023: WHERE RA.Resource_Assignment_ID = BL.Resource_Assignment_ID
2024: AND RA.Budget_Version_ID = P_Budget_Version_ID )
2025: LOOP
2035: WHERE
2036: BL.Start_Date = i.Start_Date
2037: AND BL.Resource_Assignment_ID = (
2038: SELECT RA.Resource_Assignment_ID
2039: FROM PA_Resource_Assignments RA
2040: WHERE RA.Budget_Version_ID = l_Work_Budget_Version_ID
2041: AND RA.Resource_List_Member_ID = i.Resource_List_Member_ID
2042: AND RA.Project_ID = i.Project_ID
2043: AND RA.Task_ID = i.Task_ID );
2151: END Create_Working_Budget;
2152:
2153: -- -------------------------------------------------------------------+
2154: -- This procedure will create budget data in pa_bc_balances (from
2155: -- pa_budget_lines, pa_resource_assignments)
2156: -- -------------------------------------------------------------------+
2157:
2158: PROCEDURE Create_bc_balances(p_budget_version_id IN NUMBER,
2159: p_last_baselined_version_id IN NUMBER,
2215: 0,
2216: 0,
2217: l_request_id
2218: from pa_budget_lines pb,
2219: pa_resource_assignments pa,
2220: pa_tasks pt,
2221: pa_resource_list_members rm,
2222: pa_budget_versions pbv
2223: where pbv.budget_version_id = p_budget_version_id