[Home] [Help]
16871: IF l_debug_mode = 'Y' THEN
16872: Pa_Debug.WRITE(G_PKG_NAME,'Create Task Context',l_debug_level3);
16873: END IF;
16874: IF PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(px_tasks_out_tbl(l_i).task_version_id) = 'Y'
16875: AND pa_task_assignment_utils.check_asgmt_exists_in_task(px_tasks_out_tbl(l_i).task_version_id) = 'N'
16876: THEN
16877: IF l_debug_mode = 'Y' THEN
16878: Pa_Debug.WRITE(G_PKG_NAME,'Lowest Task With No Assignments',l_debug_level3);
16879: END IF;
16919:
16920: -- Bug 4078307: Changes start
16921: -- In update task flow we should be deleting all task assignments for summary-level tasks
16922: IF PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(px_tasks_out_tbl(l_i).task_version_id) = 'N'
16923: AND pa_task_assignment_utils.check_asgmt_exists_in_task(px_tasks_out_tbl(l_i).task_version_id) = 'Y'
16924: THEN
16925: IF l_debug_mode = 'Y' THEN
16926: Pa_Debug.WRITE(G_PKG_NAME,'Preparing Tables to call FP delete_plan_txn for summary task in update flow',l_debug_level3);
16927: END IF;
16931: END IF;
16932:
16933:
16934: IF PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(px_tasks_out_tbl(l_i).task_version_id) = 'Y'
16935: AND pa_task_assignment_utils.check_asgmt_exists_in_task(px_tasks_out_tbl(l_i).task_version_id) = 'N'
16936: THEN
16937: -- We do not have to call update_planning_transaction here bcoz
16938: -- update_schedule_version is already calling it.
16939: null;
16960: CLOSE check_hidden_assgn_exists;
16961: --rtarway, 4132590, end add
16962:
16963: IF (PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_TASK(px_tasks_out_tbl(l_i).task_version_id) = 'N'
16964: --AND pa_task_assignment_utils.check_asgmt_exists_in_task(px_tasks_out_tbl(l_i).task_version_id) = 'Y')
16965: AND l_hidden_assgn = 'Y')--modified by rtarway for BUG 4132590
16966: THEN
16967: IF l_debug_mode = 'Y' THEN
16968: Pa_Debug.WRITE(G_PKG_NAME,'Preparing Tables to call FP delete_plan_txn for summary task in update flow',l_debug_level3);
19199: IF l_debug_mode = 'Y' THEN
19200: pa_debug.write(G_PKG_NAME, 'Calling copy_wp_budget_versions', 3);
19201: END IF;
19202:
19203: PA_TASK_ASSIGNMENT_UTILS.g_process_flow := 'PUBLISH'; -- 4646016
19204:
19205: PA_FP_COPY_FROM_PKG.copy_wp_budget_versions(
19206: p_source_project_id => l_project_id
19207: ,p_target_project_id => l_project_id
19214: ,x_msg_count => x_msg_count
19215: ,x_Msg_data => x_msg_data
19216: );
19217:
19218: PA_TASK_ASSIGNMENT_UTILS.g_process_flow := null; -- 4646016
19219:
19220: IF l_debug_mode = 'Y' THEN
19221: pa_debug.write(G_PKG_NAME, 'After copy_wp_budget_versions X_Return_Status='||X_Return_Status, 3);
19222: END IF;
19222: END IF;
19223:
19224: EXCEPTION
19225: WHEN OTHERS THEN
19226: PA_TASK_ASSIGNMENT_UTILS.g_process_flow := null; -- 4646016
19227: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_TASK_STRUC_PUB',
19228: p_procedure_name => 'PROCESS_WBS_UDPATES',
19229: p_error_text => SUBSTRB('Call of PA_FP_COPY_FROM_PKG.copy_wp_budget_versions failed: SQLERRM='||SQLERRM,1,240));
19230: RAISE Invalid_Arg_Exc_WP;
19364: --this rollup call is require to rollup from a published structure of sub-project to this project
19365: --if the link is created but process updates is not run.
19366: --The global variable g_apply_progress_flag is used to by pass the check in
19367: --pa_task_assingment_utils.check_edit_task_ok api for any process is running. The api
19368: --pa_task_assignment_utils_adjust_assgnmt_dates is failing for the working verison bcoz there is
19369: --a process(PUB) currently in process and therefore edit_task_ok api will return 'N' to
19370: --adjust_asgnmt api.
19371:
19372: PA_TASK_ASSIGNMENT_UTILS.g_apply_progress_flag := 'Y'; --although th
19368: --pa_task_assignment_utils_adjust_assgnmt_dates is failing for the working verison bcoz there is
19369: --a process(PUB) currently in process and therefore edit_task_ok api will return 'N' to
19370: --adjust_asgnmt api.
19371:
19372: PA_TASK_ASSIGNMENT_UTILS.g_apply_progress_flag := 'Y'; --although th
19373: --IF PA_PROJECT_STRUCTURE_UTILS.Check_Subproject_Exists(l_project_id,p_structure_version_id, 'WORKPLAN') = 'Y' THEN
19374: IF PA_RELATIONSHIP_UTILS.Check_link_exists( p_project_id => p_project_id
19375: ,p_link_type => 'WORKPLAN' ) = 'Y'
19376: THEN
19423: END IF;
19424:
19425: END IF;
19426: */
19427: PA_TASK_ASSIGNMENT_UTILS.g_apply_progress_flag := 'N';
19428: --end bug 4287813
19429: --end bug 4541039
19430:
19431: IF l_debug_mode = 'Y' THEN
20122: IF l_debug_mode = 'Y' THEN
20123: pa_debug.write(G_PKG_NAME, 'Before calling PA_STRUCT_TASK_ROLLUP_PUB.Program_Schedule_dates_rollup for entire grid in UPDATE mode', 3);
20124: END IF;
20125:
20126: PA_TASK_ASSIGNMENT_UTILS.g_apply_progress_flag := 'Y'; --although th
20127: PA_STRUCT_TASK_ROLLUP_PUB.Program_Schedule_dates_rollup(
20128: p_project_id => p_project_id,
20129: x_return_status => x_return_status,
20130: x_msg_count => x_msg_count,