[Home] [Help]
8898: l_struture_version_ids.extend(1);
8899: l_struture_version_ids(1) := p_structure_version_id;
8900: l_proj_thru_dates_tbl.extend(1);
8901: l_proj_thru_dates_tbl(1) := p_as_of_date;
8902: PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP
8903: (P_PROJECT_ID_TAB => l_project_ids,
8904: P_WP_STR_VERSION_ID_TAB => l_struture_version_ids,
8905: P_ACTUALS_THRU_DATE => l_proj_thru_dates_tbl,
8906: P_CALLING_CONTEXT => 'WP_PROGRESS',
8921: EXCEPTION
8922: WHEN OTHERS THEN
8923: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
8924: p_procedure_name => 'update_ASGN_DLV_TO_TASK_ROLLUP_PVT',
8925: p_error_text => SUBSTRB('PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP:'||SQLERRM,1,120));
8926: RAISE FND_API.G_EXC_ERROR;
8927: END;
8928: END IF;*/
8929:
9231: --Create records in percent completes and rollup table for new assignment.
9232:
9233:
9234: -- Added update code to set current_flag as N otherwise upon publishinh it will give error
9235: -- ORA-00001: unique constraint (PA.PA_BUDGET_LINES_U1) violated in Package PA_FP_MAINTAIN_ACTUAL_PUB Procedure MAINTAIN_ACTUAL_AMT_RA
9236: -- Patched thru Bug 4183307
9237: IF p_action = 'PUBLISH' THEN
9238: UPDATE pa_percent_completes
9239: SET current_flag = 'N'
10046: fetch cur_as_of_date into l_proj_thru_dates_tbl(1);
10047: close cur_as_of_date;
10048:
10049: /* End code to fix Bug # 4141850. */
10050: PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP
10051: (P_PROJECT_ID_TAB => l_project_ids,
10052: P_WP_STR_VERSION_ID_TAB => l_struture_version_ids,
10053: P_ACTUALS_THRU_DATE => l_proj_thru_dates_tbl,
10054: P_CALLING_CONTEXT => p_calling_context,