[Home] [Help]
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
280: AND RA.Resource_Assignment_ID = BL.Resource_Assignment_ID
281: AND BCBL.Start_Date = BL.Start_Date
328: END IF;
329:
330: -----------------------------------------------------------------------------------+
331: -- Invoke the Sweeper process to sweep all the encumbrance etries
332: -- from PA_BC_PACKETS to PA_BC_BALANCES
333: -----------------------------------------------------------------------------------+
334: PA_Sweeper.Update_Act_Enc_Balance (
335: X_Return_Status => l_Return_Status,
336: X_Error_Message_Code => l_Msg_Data
2093: P_Lock_Name => l_Lock_Name );
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,
2112: l_user := FND_GLOBAL.LOGIN_ID;
2113: l_request_id := FND_GLOBAL.conc_request_id;
2114:
2115: IF P_DEBUG_MODE = 'Y' THEN
2116: log_message('Create_bc_balances: Create pa_bc_balances - BGT');
2117: END IF;
2118:
2119: -- Budget lines from pa_budget_lines
2120: insert into pa_bc_balances(
2116: log_message('Create_bc_balances: Create pa_bc_balances - BGT');
2117: END IF;
2118:
2119: -- Budget lines from pa_budget_lines
2120: insert into pa_bc_balances(
2121: PROJECT_ID,
2122: TASK_ID,
2123: TOP_TASK_ID,
2124: RESOURCE_LIST_MEMBER_ID,
2169: and pa.budget_version_id = pbv.budget_version_id
2170: and rm.resource_list_member_id = pa.resource_list_member_id;
2171:
2172: IF P_DEBUG_MODE = 'Y' THEN
2173: log_message('Create_bc_balances: Create pa_bc_balances - Transaction data');
2174: END IF;
2175:
2176: -- Transaction data from the last baselined version ..
2177: INSERT INTO
2174: END IF;
2175:
2176: -- Transaction data from the last baselined version ..
2177: INSERT INTO
2178: PA_BC_Balances (
2179: Project_ID,
2180: Task_ID,
2181: Resource_List_Member_ID,
2182: Set_Of_Books_ID,
2224: Actual_Period_To_Date,
2225: Budget_period_To_Date,
2226: Encumb_Period_To_Date
2227: FROM
2228: PA_BC_BALANCES
2229: WHERE
2230: Budget_Version_ID = p_last_baselined_version_id
2231: AND Balance_Type <> 'BGT' ;
2232: