[Home] [Help]
17523: IF l_debug_mode = 'Y' THEN
17524: Pa_Debug.WRITE(G_PKG_NAME,'Create Task Context',l_debug_level3);
17525: END IF;
17526: IF PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(px_tasks_out_tbl(l_i).task_version_id) = 'Y'
17527: AND pa_task_assignment_utils.check_asgmt_exists_in_task(px_tasks_out_tbl(l_i).task_version_id) = 'N'
17528: THEN
17529: IF l_debug_mode = 'Y' THEN
17530: Pa_Debug.WRITE(G_PKG_NAME,'Lowest Task With No Assignments',l_debug_level3);
17531: END IF;
17571:
17572: -- Bug 4078307: Changes start
17573: -- In update task flow we should be deleting all task assignments for summary-level tasks
17574: IF PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(px_tasks_out_tbl(l_i).task_version_id) = 'N'
17575: AND pa_task_assignment_utils.check_asgmt_exists_in_task(px_tasks_out_tbl(l_i).task_version_id) = 'Y'
17576: THEN
17577: IF l_debug_mode = 'Y' THEN
17578: Pa_Debug.WRITE(G_PKG_NAME,'Preparing Tables to call FP delete_plan_txn for summary task in update flow',l_debug_level3);
17579: END IF;
17583: END IF;
17584:
17585:
17586: IF PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(px_tasks_out_tbl(l_i).task_version_id) = 'Y'
17587: AND pa_task_assignment_utils.check_asgmt_exists_in_task(px_tasks_out_tbl(l_i).task_version_id) = 'N'
17588: THEN
17589: -- We do not have to call update_planning_transaction here bcoz
17590: -- update_schedule_version is already calling it.
17591: null;
17612: CLOSE check_hidden_assgn_exists;
17613: --rtarway, 4132590, end add
17614:
17615: IF (PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(px_tasks_out_tbl(l_i).task_version_id) = 'N'
17616: --AND pa_task_assignment_utils.check_asgmt_exists_in_task(px_tasks_out_tbl(l_i).task_version_id) = 'Y')
17617: AND l_hidden_assgn = 'Y')--modified by rtarway for BUG 4132590
17618: THEN
17619: IF l_debug_mode = 'Y' THEN
17620: Pa_Debug.WRITE(G_PKG_NAME,'Preparing Tables to call FP delete_plan_txn for summary task in update flow',l_debug_level3);
19992: IF l_debug_mode = 'Y' THEN
19993: pa_debug.write(G_PKG_NAME, 'Calling copy_wp_budget_versions', 3);
19994: END IF;
19995:
19996: PA_TASK_ASSIGNMENT_UTILS.g_process_flow := 'PUBLISH'; -- 4646016
19997:
19998: PA_FP_COPY_FROM_PKG.copy_wp_budget_versions(
19999: p_source_project_id => l_project_id
20000: ,p_target_project_id => l_project_id
20007: ,x_msg_count => x_msg_count
20008: ,x_Msg_data => x_msg_data
20009: );
20010:
20011: PA_TASK_ASSIGNMENT_UTILS.g_process_flow := null; -- 4646016
20012:
20013: IF l_debug_mode = 'Y' THEN
20014: pa_debug.write(G_PKG_NAME, 'After copy_wp_budget_versions X_Return_Status='||X_Return_Status, 3);
20015: END IF;
20015: END IF;
20016:
20017: EXCEPTION
20018: WHEN OTHERS THEN
20019: PA_TASK_ASSIGNMENT_UTILS.g_process_flow := null; -- 4646016
20020: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_TASK_STRUC_PUB',
20021: p_procedure_name => 'PROCESS_WBS_UDPATES',
20022: p_error_text => SUBSTRB('Call of PA_FP_COPY_FROM_PKG.copy_wp_budget_versions failed: SQLERRM='||SQLERRM,1,240));
20023: RAISE Invalid_Arg_Exc_WP;
20147: --this rollup call is require to rollup from a published structure of sub-project to this project
20148: --if the link is created but process updates is not run.
20149: --The global variable g_apply_progress_flag is used to by pass the check in
20150: --pa_task_assingment_utils.check_edit_task_ok api for any process is running. The api
20151: --pa_task_assignment_utils_adjust_assgnmt_dates is failing for the working verison bcoz there is
20152: --a process(PUB) currently in process and therefore edit_task_ok api will return 'N' to
20153: --adjust_asgnmt api.
20154:
20155: PA_TASK_ASSIGNMENT_UTILS.g_apply_progress_flag := 'Y'; --although th
20151: --pa_task_assignment_utils_adjust_assgnmt_dates is failing for the working verison bcoz there is
20152: --a process(PUB) currently in process and therefore edit_task_ok api will return 'N' to
20153: --adjust_asgnmt api.
20154:
20155: PA_TASK_ASSIGNMENT_UTILS.g_apply_progress_flag := 'Y'; --although th
20156: --IF PA_PROJECT_STRUCTURE_UTILS.Check_Subproject_Exists(l_project_id,p_structure_version_id, 'WORKPLAN') = 'Y' THEN
20157: IF PA_RELATIONSHIP_UTILS.Check_link_exists( p_project_id => p_project_id
20158: ,p_link_type => 'WORKPLAN' ) = 'Y'
20159: THEN
20218: END IF;
20219:
20220: END IF;
20221: */
20222: PA_TASK_ASSIGNMENT_UTILS.g_apply_progress_flag := 'N';
20223: --end bug 4287813
20224: --end bug 4541039
20225:
20226: IF l_debug_mode = 'Y' THEN
20917: IF l_debug_mode = 'Y' THEN
20918: pa_debug.write(G_PKG_NAME, 'Before calling PA_STRUCT_TASK_ROLLUP_PUB.Program_Schedule_dates_rollup for entire grid in UPDATE mode', 3);
20919: END IF;
20920:
20921: PA_TASK_ASSIGNMENT_UTILS.g_apply_progress_flag := 'Y'; --although th
20922: PA_STRUCT_TASK_ROLLUP_PUB.Program_Schedule_dates_rollup(
20923: p_project_id => p_project_id,
20924: x_return_status => x_return_status,
20925: x_msg_count => x_msg_count,