[Home] [Help]
170:
171: l_Accounted_Period_Type GL_Sets_Of_Books.Accounted_Period_Type%TYPE;
172: l_New_Budget_Version_ID PA_Budget_Versions.Budget_Version_ID%TYPE;
173: l_Work_Budget_Version_ID PA_Budget_Versions.Budget_Version_ID%TYPE;
174: l_Work_Resource_Assign_ID PA_Resource_Assignments.Resource_Assignment_ID%TYPE;
175: l_Bslnd_Budget_Version_ID PA_Budget_Versions.Budget_Version_ID%TYPE;
176: l_Project_ID PA_Projects_all.Project_ID%TYPE;
177: l_Project_Completion_Date DATE;
178: l_Task_ID PA_Tasks.Task_ID%TYPE;
271: SUM(BCBL.Budget_Period_To_Date -
272: ( BCBL.Actual_Period_To_Date + BCBL.Encumb_Period_To_Date) ) Transfer_Amount,
273: MAX(BL.START_DATE) Budget_period_start_date
274: FROM
275: PA_Resource_Assignments RA,
276: PA_Budget_Lines BL,
277: PA_BC_Balances BCBL
278: WHERE
279: RA.Budget_Version_ID = l_Bslnd_Budget_Version_ID
688: INTO
689: l_Work_Resource_Assign_ID
690: FROM
691: PA_Budget_Versions BV,
692: PA_Resource_Assignments RA
693: WHERE
694: RA.resource_list_member_id = l_Resource_List_Member_ID
695: AND RA.Budget_Version_ID = l_Work_Budget_Version_ID
696: AND RA.Project_ID = l_Project_ID
1543: -------------------------------------------------------------------------------------
1544: PROCEDURE Upd_Ins_Budget_Line (
1545: P_Budget_Version_ID IN PA_Budget_Versions.Budget_Version_ID%TYPE,
1546: P_Budget_Type_Code IN PA_Budget_Types.Budget_Type_Code%TYPE,
1547: P_Resource_Assignment_ID IN OUT NOCOPY PA_Resource_Assignments.Resource_Assignment_ID%TYPE,
1548: P_Period_Name IN GL_Periods.Period_Name%TYPE,
1549: P_Period_Start_Date IN GL_Periods.Start_Date%TYPE,
1550: P_Period_End_Date IN GL_Periods.End_Date%TYPE,
1551: P_Transfer_Amount IN NUMBER,
1615:
1616: BEGIN
1617: SELECT Projfunc_Currency_Code
1618: INTO l_Txn_Curr_Code
1619: FROM PA_Projects_All a, PA_Budget_Versions b, PA_Resource_Assignments c
1620: WHERE a.Project_Id = b.Project_Id
1621: AND b.Budget_Version_Id = c.Budget_Version_Id
1622: AND c.Resource_Assignment_Id = P_Resource_Assignment_Id;
1623: EXCEPTION
1960: RA.Project_ID,
1961: RA.Task_ID,
1962: BL.Code_Combination_ID,
1963: BL.Start_Date
1964: FROM PA_Resource_Assignments RA,
1965: PA_Budget_Lines BL
1966: WHERE RA.Resource_Assignment_ID = BL.Resource_Assignment_ID
1967: AND RA.Budget_Version_ID = P_Budget_Version_ID )
1968: LOOP
1978: WHERE
1979: BL.Start_Date = i.Start_Date
1980: AND BL.Resource_Assignment_ID = (
1981: SELECT RA.Resource_Assignment_ID
1982: FROM PA_Resource_Assignments RA
1983: WHERE RA.Budget_Version_ID = l_Work_Budget_Version_ID
1984: AND RA.Resource_List_Member_ID = i.Resource_List_Member_ID
1985: AND RA.Project_ID = i.Project_ID
1986: AND RA.Task_ID = i.Task_ID );
2094: END Create_Working_Budget;
2095:
2096: -- -------------------------------------------------------------------+
2097: -- This procedure will create budget data in pa_bc_balances (from
2098: -- pa_budget_lines, pa_resource_assignments)
2099: -- -------------------------------------------------------------------+
2100:
2101: PROCEDURE Create_bc_balances(p_budget_version_id IN NUMBER,
2102: p_last_baselined_version_id IN NUMBER,
2158: 0,
2159: 0,
2160: l_request_id
2161: from pa_budget_lines pb,
2162: pa_resource_assignments pa,
2163: pa_tasks pt,
2164: pa_resource_list_members rm,
2165: pa_budget_versions pbv
2166: where pbv.budget_version_id = p_budget_version_id