[Home] [Help]
6498: l_base_struct_ver_id := l_structure_version_id;
6499: END IF;
6500:
6501: BEGIN
6502: PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data(
6503: p_project_id => p_project_id,
6504: p_struct_ver_id => l_structure_version_id,
6505: p_base_struct_ver_id => l_base_struct_ver_id,
6506: x_return_status => x_return_status,
6509: EXCEPTION
6510: WHEN OTHERS THEN
6511: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
6512: p_procedure_name => 'PUSH_DOWN_TASK_STATUS',
6513: p_error_text => SUBSTRB('Call PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data:'||SQLERRM,1,120));
6514: RAISE FND_API.G_EXC_ERROR;
6515: END;
6516:
6517: IF x_return_status <> 'S' THEN
8240: x_return_status := 'E';
8241: RAISE FND_API.G_EXC_ERROR;
8242: END IF;
8243:
8244: -- 3.2). Calling PJI API: PJI_FM_XBS_ACCUM_UTILS.POPULATE_WORKPLAN_DATA() to populate
8245: -- the temporary table: PJI_FM_XBS_ACCUM_TMP1.This is done once here instead of, for each of the lowest tasks by calling
8246: -- PA_PROGRESS_PUB.push_workplan_actuals() with p_call_pji_apis_flag = 'Y'.
8247: -- Bug 3834339 : reducing the scope of IF so that populate_workplan_data gets called in version disabled case too
8248: END IF; -- IF (l_version_enabled_flag = 'Y') THEN
8276: ,x_msg_data => l_msg_data
8277: );
8278:
8279: /*
8280: PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data (
8281: p_project_id => p_project_id
8282: ,p_struct_ver_id => p_working_str_version_id
8283: ,p_base_struct_ver_id => l_baselined_str_ver_id
8284: ,x_return_status => l_return_status
9561: END IF;
9562:
9563: /*
9564: BEGIN
9565: PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data(
9566: p_project_id => p_project_id,
9567: p_struct_ver_id => l_structure_version_id,
9568: p_base_struct_ver_id => l_base_struct_ver_id,
9569: p_as_of_date => p_as_of_date, -- Fix for Bug # 4251406.
9573: EXCEPTION
9574: WHEN OTHERS THEN
9575: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
9576: p_procedure_name => 'update_progress',
9577: p_error_text => SUBSTRB('Call PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data:'||SQLERRM,1,120));
9578: RAISE FND_API.G_EXC_ERROR;
9579: END;
9580: */
9581: END IF;-- p_structure_type = 'WORKPLAN' THEN
9906:
9907: BEGIN
9908: -- Bug 3627315 : Added code to conditionally call PJI API with diff parameters
9909: IF p_structure_type = 'WORKPLAN' THEN
9910: PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data (
9911: p_project_id => p_project_id,
9912: p_struct_ver_id => p_structure_version_id,
9913: p_base_struct_ver_id => l_baselined_str_ver_id,
9914: p_project_element_id => p_project_element_id, ----bug 4183307
9921: ELSE --FINANCIAL
9922:
9923: IF (l_plan_version_id is not null) THEN -- Added to fix Bug # 3813130.
9924:
9925: PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data(
9926: p_project_id => p_project_id,
9927: p_struct_ver_id => l_structure_version_id,
9928: p_workplan_flag => 'N', --This will populate financial data in pji tmp1 table.
9929: p_plan_version_id => l_plan_version_id,
9937: EXCEPTION
9938: WHEN OTHERS THEN
9939: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
9940: p_procedure_name => 'POPULATE_PJI_TAB_FOR_PLAN',
9941: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data Failed. SQLERRM='||SQLERRM,1,120));
9942: RAISE FND_API.G_EXC_ERROR;
9943: END;
9944:
9945: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12915: proj_pgm_level_tbl SYSTEM.pa_num_tbl_type:= SYSTEM.pa_num_tbl_type();
12916:
12917: -- Added for bug 5464875
12918: base_struct_ver_ids_tbl SYSTEM.pa_num_tbl_type:= SYSTEM.pa_num_tbl_type();
12919: populate_in_tbl PJI_FM_XBS_ACCUM_UTILS.populate_in_tbl_type;
12920:
12921: /* Begin: Fix for Bug # 5526638. */
12922: l_act_err_flag SYSTEM.pa_num_tbl_type:= SYSTEM.pa_num_tbl_type();
12923: l_act_err_msg SYSTEM.pa_varchar2_240_tbl_type:= SYSTEM.pa_varchar2_240_tbl_type();
14037: and structure_type = 'WORKPLAN';
14038:
14039: begin
14040: if (p_plan_res_level = 'Y') then
14041: pa_debug.log_message('GET_SUMM_ACT: Calling pji_fm_xbs_accum_utils.get_summarized_data', 1);
14042: --- Call Reporting API to populate temp table with summarized actuals
14043: pji_fm_xbs_accum_utils.get_summarized_data(p_project_ids => proj_ids_tbl,
14044: p_resource_list_ids => res_list_ids_tbl,
14045: p_struct_ver_ids => latest_wp_struct_ver_ids_tbl,
14039: begin
14040: if (p_plan_res_level = 'Y') then
14041: pa_debug.log_message('GET_SUMM_ACT: Calling pji_fm_xbs_accum_utils.get_summarized_data', 1);
14042: --- Call Reporting API to populate temp table with summarized actuals
14043: pji_fm_xbs_accum_utils.get_summarized_data(p_project_ids => proj_ids_tbl,
14044: p_resource_list_ids => res_list_ids_tbl,
14045: p_struct_ver_ids => latest_wp_struct_ver_ids_tbl,
14046: p_end_Date => proj_thru_dates_tbl,
14047: p_calendar_type => calendar_type_tbl,
14059: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
14060: p_msg_name => x_msg_code);
14061: x_msg_data := x_msg_code;
14062: x_return_status := 'E';
14063: pa_debug.log_message('GET_SUMM_ACT: Error in pji_fm_xbs_accum_utils.get_summarized_data', 1);
14064: RAISE l_pji_wp_exception;
14065: END IF;
14066: /* End: Added for bug 5526638*/
14067:
14066: /* End: Added for bug 5526638*/
14067:
14068: IF g1_debug_mode = 'Y' THEN
14069: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.get_summarized_actuals',
14070: x_Msg => 'Done with pji_fm_xbs_accum_utils.get_summarized_data',
14071: x_Log_Level=> 3);
14072: END IF;
14073: end if;
14074: exception when others then
14074: exception when others then
14075: pa_debug.log_message('GET_SUMM_ACT: get_summarized_data failed with exception', 1);
14076: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
14077: p_procedure_name => 'GET_SUMMARIZED_ACTUALS',
14078: p_error_text => SUBSTRB('pji_fm_xbs_accum_utils.get_summarized_data:'||SQLERRM,1,120));
14079: raise;
14080: end;
14081:
14082: -- Added for bug 5464875. Used Bulk Processing
14100: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.POPULATE_PJI_TAB_FOR_PLAN', x_Msg => 'populate_in_tbl(i).project_element_id='||populate_in_tbl(i).project_element_id, x_Log_Level=> 3);
14101:
14102: end loop;
14103:
14104: pa_debug.log_message('GET_SUMM_ACT: Calling pji_fm_xbs_accum_utils.populate_workplan_data', 1);
14105: --- Call Reporting API to populate temp table with workplan data
14106: PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data(p_populate_in_tbl => populate_in_tbl,
14107: p_calling_context => 'SUMMARIZE',
14108: p_program_rollup_flag => 'Y',
14102: end loop;
14103:
14104: pa_debug.log_message('GET_SUMM_ACT: Calling pji_fm_xbs_accum_utils.populate_workplan_data', 1);
14105: --- Call Reporting API to populate temp table with workplan data
14106: PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data(p_populate_in_tbl => populate_in_tbl,
14107: p_calling_context => 'SUMMARIZE',
14108: p_program_rollup_flag => 'Y',
14109: x_return_status => x_return_status,
14110: x_msg_code => x_msg_code );
14114: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
14115: p_msg_name => x_msg_code);
14116: x_msg_data := x_msg_code;
14117: x_return_status := 'E';
14118: pa_debug.log_message('GET_SUMM_ACT: Error in pji_fm_xbs_accum_utils.populate_workplan_data', 1);
14119: RAISE l_pji_wp_exception;
14120: END IF;
14121: /* End: Added for bug 5526638*/
14122:
14121: /* End: Added for bug 5526638*/
14122:
14123: IF g1_debug_mode = 'Y' THEN
14124: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.get_summarized_actuals',
14125: x_Msg => 'Done with pji_fm_xbs_accum_utils.populate_workplan_data',
14126: x_Log_Level=> 3);
14127: END IF;
14128: exception when others then
14129: pa_debug.log_message('GET_SUMM_ACT: populate_workplan_data failed with exception', 1);
14128: exception when others then
14129: pa_debug.log_message('GET_SUMM_ACT: populate_workplan_data failed with exception', 1);
14130: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
14131: p_procedure_name => 'GET_SUMMARIZED_ACTUALS',
14132: p_error_text => SUBSTRB('PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data:'||SQLERRM,1,120));
14133: raise;
14134: end;
14135: end if;
14136:
14234: if (l_base_struct_ver_id = -1) then
14235: l_base_struct_ver_id := null;
14236: end if;
14237: begin
14238: PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data(p_project_id => l_project_id,
14239: p_struct_ver_id => l_latest_wp_struct_ver_id,
14240: p_base_struct_ver_id => l_base_struct_ver_id,
14241: p_as_of_date => l_temp_as_of_date,
14242: p_program_rollup_flag => 'Y',
14246: exception when others then
14247: pa_debug.log_message('GET_SUMM_ACT: populate_workplan_data failed with exception', 1);
14248: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PUB',
14249: p_procedure_name => 'GET_SUMMARIZED_ACTUALS',
14250: p_error_text => SUBSTRB('PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data:'||SQLERRM,1,120));
14251: raise;
14252: end;
14253: end if;
14254: ****/
18064:
18065: else
18066: pa_debug.log_message('GET_SUMM_ACT: Get_summarized_data returned error.', 1);
18067: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.get_summarized_actuals',
18068: x_Msg => 'pji_fm_xbs_accum_utils.get_summarized_data returned error',
18069: x_Log_Level=> 3);
18070: end if; -- if status is not success
18071:
18072: ---here call the budget lines api
18248: /* Commented an moved out of if block for bug#5659575
18249: if NVL(l_act_out_report,'N') = 'Y' then
18250: For l_index in 1..proj_ids_tbl.COUNT loop --- FOR each PROJECT
18251: if l_act_err_flag(l_index) = 1 then
18252: PJI_FM_XBS_ACCUM_UTILS.DELETE_FIN8 (p_project_id => proj_ids_tbl(l_index),
18253: p_err_flag => l_act_err_flag(l_index),
18254: p_err_msg => l_act_err_msg(l_index));
18255: DELETE PJI_FM_EXTR_PLAN_LINES where PROJECT_ID = proj_ids_tbl(l_index);
18256: DELETE PA_PROG_ACT_BY_PERIOD_TEMP where PROJECT_ID = proj_ids_tbl(l_index);
18255: DELETE PJI_FM_EXTR_PLAN_LINES where PROJECT_ID = proj_ids_tbl(l_index);
18256: DELETE PA_PROG_ACT_BY_PERIOD_TEMP where PROJECT_ID = proj_ids_tbl(l_index);
18257: else
18258: if (p_plan_res_level = 'Y') and l_get_summ_call_contxt in ('P', 'W') then
18259: PJI_FM_XBS_ACCUM_UTILS.DELETE_FIN8 (p_project_id => proj_ids_tbl(l_index),
18260: p_calendar_type => calendar_type_tbl(l_index),
18261: p_end_Date => proj_thru_dates_tbl(l_index));
18262: end if;
18263: end if;
18264: End Loop;
18265: else
18266: if (p_plan_res_level = 'Y') and l_get_summ_call_contxt in ('P', 'W')then
18267: For l_index in 1..proj_ids_tbl.COUNT loop
18268: PJI_FM_XBS_ACCUM_UTILS.DELETE_FIN8 (p_project_id => proj_ids_tbl(l_index),
18269: p_calendar_type => calendar_type_tbl(l_index),
18270: p_end_Date => proj_thru_dates_tbl(l_index));
18271: End Loop;
18272: end if;
18331: /* Added for bug #5659575 If block executes only in PJI flow*/
18332: if NVL(l_act_out_report,'N') = 'Y' then
18333: For l_index in 1..proj_ids_tbl.COUNT loop --- FOR each PROJECT
18334: if l_act_err_flag(l_index) = 1 then
18335: PJI_FM_XBS_ACCUM_UTILS.DELETE_FIN8 (p_project_id => proj_ids_tbl(l_index),
18336: p_err_flag => l_act_err_flag(l_index),
18337: p_err_msg => l_act_err_msg(l_index));
18338: DELETE PJI_FM_EXTR_PLAN_LINES where PROJECT_ID = proj_ids_tbl(l_index);
18339: DELETE PA_PROG_ACT_BY_PERIOD_TEMP where PROJECT_ID = proj_ids_tbl(l_index);
18344: l_return_status);
18345:
18346: else
18347: if (p_plan_res_level = 'Y') and l_get_summ_call_contxt in ('P', 'W')then
18348: PJI_FM_XBS_ACCUM_UTILS.DELETE_FIN8 (p_project_id => proj_ids_tbl(l_index),
18349: p_calendar_type => calendar_type_tbl(l_index),
18350: p_end_Date => proj_thru_dates_tbl(l_index));
18351: end if;
18352: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE(proj_ids_tbl(l_index),
18359: End Loop;
18360: else
18361: if (p_plan_res_level = 'Y') and l_get_summ_call_contxt in ('P', 'W') then
18362: For l_index in 1..proj_ids_tbl.COUNT loop
18363: PJI_FM_XBS_ACCUM_UTILS.DELETE_FIN8 (p_project_id => proj_ids_tbl(l_index),
18364: p_calendar_type => calendar_type_tbl(l_index),
18365: p_end_Date => proj_thru_dates_tbl(l_index));
18366: if p_extraction_type <> 'PUBLISH' then
18367: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE(proj_ids_tbl(l_index),
19727: ,x_msg_count => l_msg_count
19728: ,x_msg_data => l_msg_data
19729: );
19730: /*
19731: PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data (
19732: p_project_id => rec.project_id,
19733: p_struct_ver_id => rec.structure_version_id,
19734: p_base_struct_ver_id => l_baseline_version_id,
19735: x_return_status => l_return_status,