[Home] [Help]
8964: l_struture_version_ids.extend(1);
8965: l_struture_version_ids(1) := p_structure_version_id;
8966: l_proj_thru_dates_tbl.extend(1);
8967: l_proj_thru_dates_tbl(1) := p_as_of_date;
8968: PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP
8969: (P_PROJECT_ID_TAB => l_project_ids,
8970: P_WP_STR_VERSION_ID_TAB => l_struture_version_ids,
8971: P_ACTUALS_THRU_DATE => l_proj_thru_dates_tbl,
8972: P_CALLING_CONTEXT => 'WP_PROGRESS',
8987: EXCEPTION
8988: WHEN OTHERS THEN
8989: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
8990: p_procedure_name => 'update_ASGN_DLV_TO_TASK_ROLLUP_PVT',
8991: p_error_text => SUBSTRB('PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP:'||SQLERRM,1,120));
8992: RAISE FND_API.G_EXC_ERROR;
8993: END;
8994: END IF;*/
8995:
9297: --Create records in percent completes and rollup table for new assignment.
9298:
9299:
9300: -- Added update code to set current_flag as N otherwise upon publishinh it will give error
9301: -- ORA-00001: unique constraint (PA.PA_BUDGET_LINES_U1) violated in Package PA_FP_MAINTAIN_ACTUAL_PUB Procedure MAINTAIN_ACTUAL_AMT_RA
9302: -- Patched thru Bug 4183307
9303: IF p_action = 'PUBLISH' THEN
9304: UPDATE pa_percent_completes
9305: SET current_flag = 'N'
10114: fetch cur_as_of_date into l_proj_thru_dates_tbl(1);
10115: close cur_as_of_date;
10116:
10117: /* End code to fix Bug # 4141850. */
10118: PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP
10119: (P_PROJECT_ID_TAB => l_project_ids,
10120: P_WP_STR_VERSION_ID_TAB => l_struture_version_ids,
10121: P_ACTUALS_THRU_DATE => l_proj_thru_dates_tbl,
10122: P_CALLING_CONTEXT => p_calling_context,