[Home] [Help]
90: -- Added for VALIDATE_SUPPORT_CASES API. Value not used by Concurrent Program.
91: l_warning_message VARCHAR2(2000);
92:
93: -- gboomina added for AAI requirement 8318932 - start
94: l_copy_etc_from_plan_flag PA_PROJ_FP_OPTIONS.COPY_ETC_FROM_PLAN_FLAG%TYPE;
95: l_gen_cost_etc_src_code PA_PROJ_FP_OPTIONS.GEN_COST_ETC_SRC_CODE%TYPE;
96: l_cost_time_phased_code PA_PROJ_FP_OPTIONS.COST_TIME_PHASED_CODE%TYPE;
97: l_plan_type_validated VARCHAR2(1) := 'Y';
98: -- gboomina added for AAI requirement 8318932 - end
91: l_warning_message VARCHAR2(2000);
92:
93: -- gboomina added for AAI requirement 8318932 - start
94: l_copy_etc_from_plan_flag PA_PROJ_FP_OPTIONS.COPY_ETC_FROM_PLAN_FLAG%TYPE;
95: l_gen_cost_etc_src_code PA_PROJ_FP_OPTIONS.GEN_COST_ETC_SRC_CODE%TYPE;
96: l_cost_time_phased_code PA_PROJ_FP_OPTIONS.COST_TIME_PHASED_CODE%TYPE;
97: l_plan_type_validated VARCHAR2(1) := 'Y';
98: -- gboomina added for AAI requirement 8318932 - end
99:
92:
93: -- gboomina added for AAI requirement 8318932 - start
94: l_copy_etc_from_plan_flag PA_PROJ_FP_OPTIONS.COPY_ETC_FROM_PLAN_FLAG%TYPE;
95: l_gen_cost_etc_src_code PA_PROJ_FP_OPTIONS.GEN_COST_ETC_SRC_CODE%TYPE;
96: l_cost_time_phased_code PA_PROJ_FP_OPTIONS.COST_TIME_PHASED_CODE%TYPE;
97: l_plan_type_validated VARCHAR2(1) := 'Y';
98: -- gboomina added for AAI requirement 8318932 - end
99:
100: --Bug 16181483 Start
97: l_plan_type_validated VARCHAR2(1) := 'Y';
98: -- gboomina added for AAI requirement 8318932 - end
99:
100: --Bug 16181483 Start
101: l_fp_preference_code pa_proj_fp_options.fin_plan_preference_code%TYPE;
102: l_version_type pa_budget_versions.version_type%TYPE;
103: --Bug 16181483 End
104:
105: BEGIN
135:
136: -- bug 5657334: Changed pa_projects_all to refer pa_projects as the concurrent
137: -- program has been modified to make it single org compliant.
138:
139: l_from_clause := ' FROM pa_projects pj, pa_proj_fp_options opt,' ||
140: ' pa_fin_plan_types_b pt, pa_project_types_all pta';
141: l_where_clause := ' WHERE 1 = 1 AND pj.project_id = opt.project_id' ||
142: ' AND nvl(pj.template_flag,''N'') <> ''Y''' ||
143: ' AND NVL(PA_PROJECT_STUS_UTILS.Is_Project_Status_Closed' ||
739: --hr_utility.trace('after calling fn etc wp fin ver id : '||
740: --l_etc_wp_fin_ver_id );
741: END IF; -- fp cols rec check
742: /*We need the strcut_ver_id for fcst_amt_gen,
743: wp_fin_plan_ver_id to update back to pa_proj_fp_options*/
744:
745: END IF; -- l_workplan_src_dtls_flag
746:
747: IF l_fin_plan_src_dtls_flag = 'Y' THEN
749: -- Bug 16181483 Start
750: -- Forecost Cost or Rev can only be generated from Cost Plan type source. For Cost and Rev Together Version type should be ALL.
751: SELECT fin_plan_preference_code
752: INTO l_fp_preference_code
753: FROM pa_proj_fp_options
754: WHERE project_id = l_proj_id
755: AND fin_plan_type_id = l_fp_cols_rec.X_GEN_SRC_PLAN_TYPE_ID
756: AND fin_plan_option_level_code =
757: PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PLAN_TYPE;
919: END IF;
920: -- gboomina added for AAI requirement 8318932 - end
921:
922: /*As of now, we have the l_etc_wp_struct_ver_id and l_etc_fp_ver_id*/
923: /*update the etc source version id back to pa_proj_fp_options*/
924: IF l_element_type_tab(i) = 'COST' THEN
925: UPDATE PA_PROJ_FP_OPTIONS
926: SET GEN_SRC_COST_PLAN_TYPE_ID = l_etc_fp_type_id,
927: GEN_SRC_COST_PLAN_VERSION_ID = l_etc_fp_ver_id,
921:
922: /*As of now, we have the l_etc_wp_struct_ver_id and l_etc_fp_ver_id*/
923: /*update the etc source version id back to pa_proj_fp_options*/
924: IF l_element_type_tab(i) = 'COST' THEN
925: UPDATE PA_PROJ_FP_OPTIONS
926: SET GEN_SRC_COST_PLAN_TYPE_ID = l_etc_fp_type_id,
927: GEN_SRC_COST_PLAN_VERSION_ID = l_etc_fp_ver_id,
928: GEN_SRC_COST_WP_VERSION_ID = l_etc_wp_fin_ver_id
929: WHERE fin_plan_version_id = lx_budget_version_id;
927: GEN_SRC_COST_PLAN_VERSION_ID = l_etc_fp_ver_id,
928: GEN_SRC_COST_WP_VERSION_ID = l_etc_wp_fin_ver_id
929: WHERE fin_plan_version_id = lx_budget_version_id;
930: ELSIF l_element_type_tab(i) = 'REVENUE' THEN
931: UPDATE PA_PROJ_FP_OPTIONS
932: SET GEN_SRC_REV_PLAN_TYPE_ID = l_etc_fp_type_id,
933: GEN_SRC_REV_PLAN_VERSION_ID = l_etc_fp_ver_id,
934: GEN_SRC_REV_WP_VERSION_ID = l_etc_wp_fin_ver_id
935: WHERE fin_plan_version_id = lx_budget_version_id;
933: GEN_SRC_REV_PLAN_VERSION_ID = l_etc_fp_ver_id,
934: GEN_SRC_REV_WP_VERSION_ID = l_etc_wp_fin_ver_id
935: WHERE fin_plan_version_id = lx_budget_version_id;
936: ELSIF l_element_type_tab(i) = 'ALL' THEN
937: UPDATE PA_PROJ_FP_OPTIONS
938: SET GEN_SRC_ALL_PLAN_TYPE_ID = l_etc_fp_type_id,
939: GEN_SRC_ALL_PLAN_VERSION_ID = l_etc_fp_ver_id,
940: GEN_SRC_ALL_WP_VERSION_ID = l_etc_wp_fin_ver_id
941: WHERE fin_plan_version_id = lx_budget_version_id;