[Home] [Help]
4515: IF g_debug_mode='Y' THEN
4516: Pji_Utils.write2log( 'calling APPLY_LP_PROG_ON_CWV :p_calling_Context: '||p_calling_Context||'p_deffered_mode:'||p_deffered_mode||'l_new_wbs_version_id:'||l_new_wbs_version_id ,null,3);
4517: end if;
4518: IF p_calling_Context='APPLY_PROGRESS' and p_deffered_mode='Y' THEN
4519: PA_PROGRESS_PUB.APPLY_LP_PROG_ON_CWV(
4520: p_project_id => l_project_id,
4521: p_working_str_version_id => l_new_wbs_version_id,
4522: x_return_status => l_return_status,
4523: x_msg_count => l_msg_count ,
7144:
7145: -----------------------------------------------------------------
7146: --This API inserts rows for handling ETC calculations in apply
7147: --progress flow for version disabled workplan structures
7148: --If the global variable PA_PROGRESS_PUB.G_WBS_APPLY_PROG
7149: --is set, it means plan_update API is being called in apply
7150: --flow for version disabled workplan structure
7151: -----------------------------------------------------------------
7152: PROCEDURE INSERT_APPLY_PROG_VD IS
7151: -----------------------------------------------------------------
7152: PROCEDURE INSERT_APPLY_PROG_VD IS
7153: BEGIN
7154:
7155: IF PA_PROGRESS_PUB.G_WBS_APPLY_PROG IS NOT NULL THEN
7156:
7157: --------------------------------------------------------
7158: --If the ETC column is null and the PLAN column has some
7159: --value, we copy the plan value to the ETC columns
7180: 0, 0, 0, 0
7181: FROM
7182: pji_fm_extr_plan_lines
7183: WHERE
7184: STRUCT_VER_ID = PA_PROGRESS_PUB.G_WBS_APPLY_PROG
7185: GROUP BY
7186: PROJECT_ID, PROJECT_ORG_ID, PROJECT_ELEMENT_ID, STRUCT_VER_ID,
7187: PERIOD_NAME, CALENDAR_TYPE, START_DATE, END_DATE, RBS_ELEMENT_ID,
7188: RBS_VERSION_ID, PLAN_VERSION_ID, PLAN_TYPE_ID, WP_VERSION_FLAG,