[Home] [Help]
80: where
81: budget_version_id = p_budget_version_id;
82: select pt.fin_plan_type_code
83: into l_fin_plan_type_code
84: from pa_proj_fp_options po,
85: pa_fin_plan_types_b pt /* Bug# 2661650 - _vl to _b/_tl for performance changes */
86: where po.project_id = p_project_id and
87: po.fin_plan_version_id = p_budget_version_id and
88: po.fin_plan_option_level_code = 'PLAN_VERSION' and
1204:
1205: l_wp_fin_plan_type_id:=NULL;
1206:
1207: END IF;
1208: /* call Delete_Version_Helper to delete everything but the entry in PA_BUDGET_VERSIONS and PA_PROJ_FP_OPTIONS */
1209: pa_fin_plan_pub.Delete_Version_Helper
1210: (p_project_id => p_project_id,
1211: p_context => p_context,
1212: p_budget_version_id => p_budget_version_id,
1223: IF p_budget_version_id IS NOT NULL THEN
1224:
1225: delete
1226: from
1227: pa_proj_fp_options
1228: where
1229: fin_plan_version_id= p_budget_version_id AND
1230: project_id=nvl(p_project_id,project_id) AND
1231: fin_plan_type_id = nvl(l_wp_fin_plan_type_id,fin_plan_type_id);
1232:
1233: ELSIF p_project_id IS NOT NULL THEN
1234: delete
1235: from
1236: pa_proj_fp_options
1237: where
1238: fin_plan_version_id=nvl(p_budget_version_id,fin_plan_version_id) AND
1239: project_id=p_project_id AND
1240: (fin_plan_type_id IS NULL OR
1571: fin_plan_version_id
1572: BULK COLLECT INTO
1573: l_proj_fp_options_id_tbl,
1574: l_budget_Version_id_tbl
1575: FROM pa_proj_fp_options
1576: WHERE fin_plan_version_id=p_budget_version_id
1577: AND fin_plan_type_id = nvl(l_wp_fin_plan_type_id,fin_plan_type_id);
1578:
1579: ELSE
1582: fin_plan_version_id
1583: BULK COLLECT INTO
1584: l_proj_fp_options_id_tbl,
1585: l_budget_Version_id_tbl
1586: FROM pa_proj_fp_options
1587: WHERE project_id=p_project_id
1588: AND (fin_plan_type_id = nvl(l_wp_fin_plan_type_id,fin_plan_type_id) OR
1589: fin_plan_type_id IS NULL);
1590:
1771: IF p_budget_version_id IS NOT NULL THEN
1772: -- Bug 3572548 Update all the budget versions that have the input budget version id
1773: -- gen source version id with null for that column as this is being deleted
1774:
1775: UPDATE pa_proj_fp_options
1776: SET gen_src_cost_plan_version_id = DECODE(gen_src_cost_plan_version_id
1777: ,p_budget_version_id,NULL,gen_src_cost_plan_version_id)
1778: ,gen_src_rev_plan_version_id = DECODE(gen_src_rev_plan_version_id
1779: ,p_budget_version_id,NULL,gen_src_rev_plan_version_id)
1967:
1968: l_adj_percentage NUMBER := NVL(p_adj_percentage,0);
1969: --Make adjustment percentage zero if passed as null
1970:
1971: l_source_proj_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
1972: l_source_fp_preference_code pa_proj_fp_options.fin_plan_preference_code%TYPE;
1973: l_source_element_type pa_fp_elements.element_type%TYPE;
1974: l_source_profile_id pa_budget_versions.period_profile_id%TYPE;
1975: l_source_fin_plan_type_id pa_proj_fp_options.fin_plan_type_id%TYPE;
1968: l_adj_percentage NUMBER := NVL(p_adj_percentage,0);
1969: --Make adjustment percentage zero if passed as null
1970:
1971: l_source_proj_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
1972: l_source_fp_preference_code pa_proj_fp_options.fin_plan_preference_code%TYPE;
1973: l_source_element_type pa_fp_elements.element_type%TYPE;
1974: l_source_profile_id pa_budget_versions.period_profile_id%TYPE;
1975: l_source_fin_plan_type_id pa_proj_fp_options.fin_plan_type_id%TYPE;
1976:
1971: l_source_proj_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
1972: l_source_fp_preference_code pa_proj_fp_options.fin_plan_preference_code%TYPE;
1973: l_source_element_type pa_fp_elements.element_type%TYPE;
1974: l_source_profile_id pa_budget_versions.period_profile_id%TYPE;
1975: l_source_fin_plan_type_id pa_proj_fp_options.fin_plan_type_id%TYPE;
1976:
1977:
1978: l_target_proj_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
1979: l_target_fin_plan_type_id pa_proj_fp_options.fin_plan_type_id%TYPE;
1974: l_source_profile_id pa_budget_versions.period_profile_id%TYPE;
1975: l_source_fin_plan_type_id pa_proj_fp_options.fin_plan_type_id%TYPE;
1976:
1977:
1978: l_target_proj_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
1979: l_target_fin_plan_type_id pa_proj_fp_options.fin_plan_type_id%TYPE;
1980: l_target_fp_preference_code pa_proj_fp_options.fin_plan_preference_code%TYPE;
1981: l_plan_in_multi_curr_flag pa_proj_fp_options.plan_in_multi_curr_flag%TYPE;
1982:
1975: l_source_fin_plan_type_id pa_proj_fp_options.fin_plan_type_id%TYPE;
1976:
1977:
1978: l_target_proj_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
1979: l_target_fin_plan_type_id pa_proj_fp_options.fin_plan_type_id%TYPE;
1980: l_target_fp_preference_code pa_proj_fp_options.fin_plan_preference_code%TYPE;
1981: l_plan_in_multi_curr_flag pa_proj_fp_options.plan_in_multi_curr_flag%TYPE;
1982:
1983: l_target_element_type pa_fp_elements.element_type%TYPE;
1976:
1977:
1978: l_target_proj_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
1979: l_target_fin_plan_type_id pa_proj_fp_options.fin_plan_type_id%TYPE;
1980: l_target_fp_preference_code pa_proj_fp_options.fin_plan_preference_code%TYPE;
1981: l_plan_in_multi_curr_flag pa_proj_fp_options.plan_in_multi_curr_flag%TYPE;
1982:
1983: l_target_element_type pa_fp_elements.element_type%TYPE;
1984:
1977:
1978: l_target_proj_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
1979: l_target_fin_plan_type_id pa_proj_fp_options.fin_plan_type_id%TYPE;
1980: l_target_fp_preference_code pa_proj_fp_options.fin_plan_preference_code%TYPE;
1981: l_plan_in_multi_curr_flag pa_proj_fp_options.plan_in_multi_curr_flag%TYPE;
1982:
1983: l_target_element_type pa_fp_elements.element_type%TYPE;
1984:
1985: l_budget_version_id pa_budget_versions.budget_version_id%TYPE;
2006: -- Local variables for 3156057
2007:
2008: l_target_appr_rev_plan_flag pa_budget_versions.approved_rev_plan_type_flag%TYPE;
2009: l_source_appr_rev_plan_flag pa_budget_versions.approved_rev_plan_type_flag%TYPE;
2010: l_source_plan_in_mc_flag pa_proj_fp_options.plan_in_multi_curr_flag%TYPE;
2011: l_source_ver_rbs_version_id pa_proj_fp_options.rbs_version_id%TYPE;-- Bug 3731925
2012: l_target_pt_lvl_rbs_version_id pa_proj_fp_options.rbs_version_id%TYPE;-- Bug 3731925
2013:
2014: --Declared for Bug 4290043
2007:
2008: l_target_appr_rev_plan_flag pa_budget_versions.approved_rev_plan_type_flag%TYPE;
2009: l_source_appr_rev_plan_flag pa_budget_versions.approved_rev_plan_type_flag%TYPE;
2010: l_source_plan_in_mc_flag pa_proj_fp_options.plan_in_multi_curr_flag%TYPE;
2011: l_source_ver_rbs_version_id pa_proj_fp_options.rbs_version_id%TYPE;-- Bug 3731925
2012: l_target_pt_lvl_rbs_version_id pa_proj_fp_options.rbs_version_id%TYPE;-- Bug 3731925
2013:
2014: --Declared for Bug 4290043
2015: l_source_plan_class_code pa_fin_plan_types_b.plan_class_code%TYPE;
2008: l_target_appr_rev_plan_flag pa_budget_versions.approved_rev_plan_type_flag%TYPE;
2009: l_source_appr_rev_plan_flag pa_budget_versions.approved_rev_plan_type_flag%TYPE;
2010: l_source_plan_in_mc_flag pa_proj_fp_options.plan_in_multi_curr_flag%TYPE;
2011: l_source_ver_rbs_version_id pa_proj_fp_options.rbs_version_id%TYPE;-- Bug 3731925
2012: l_target_pt_lvl_rbs_version_id pa_proj_fp_options.rbs_version_id%TYPE;-- Bug 3731925
2013:
2014: --Declared for Bug 4290043
2015: l_source_plan_class_code pa_fin_plan_types_b.plan_class_code%TYPE;
2016: l_target_plan_class_code pa_fin_plan_types_b.plan_class_code%TYPE;
2138: ,l_source_plan_in_mc_flag
2139: ,l_source_appr_rev_plan_flag
2140: ,l_source_ver_rbs_version_id -- Bug 3731925
2141: ,l_source_plan_class_code
2142: FROM pa_proj_fp_options pfo,
2143: pa_fin_plan_types_b fin
2144: WHERE pfo.fin_plan_version_id = p_source_version_id
2145: AND fin.fin_plan_type_id=pfo.fin_plan_type_id;
2146:
2162: ,l_target_fin_plan_type_id
2163: ,l_target_element_type
2164: ,l_target_appr_rev_plan_flag
2165: ,l_target_plan_class_code
2166: FROM pa_proj_fp_options pfo,
2167: pa_fin_plan_types_b fin
2168: WHERE pfo.fin_plan_version_id = l_budget_version_id
2169: AND pfo.fin_plan_type_id = fin.fin_plan_type_id;
2170:
2264: END IF;
2265:
2266: -- End of changes for BUG :- 2634900
2267:
2268: --Calling create fp option api to insert or update pa_proj_fp_options.
2269: --In case of create working copy, it will insert into pa_proj_fp_options.
2270: --In case of target version is passed in copy plan, we update pa_proj_fp_options.
2271:
2272:
2265:
2266: -- End of changes for BUG :- 2634900
2267:
2268: --Calling create fp option api to insert or update pa_proj_fp_options.
2269: --In case of create working copy, it will insert into pa_proj_fp_options.
2270: --In case of target version is passed in copy plan, we update pa_proj_fp_options.
2271:
2272:
2273: --Calling create fp option api
2266: -- End of changes for BUG :- 2634900
2267:
2268: --Calling create fp option api to insert or update pa_proj_fp_options.
2269: --In case of create working copy, it will insert into pa_proj_fp_options.
2270: --In case of target version is passed in copy plan, we update pa_proj_fp_options.
2271:
2272:
2273: --Calling create fp option api
2274:
2276: pa_debug.g_err_stage := 'Calling create_fp_option api';
2277: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2278: END IF;
2279:
2280: PA_PROJ_FP_OPTIONS_PUB.create_fp_option (
2281: px_target_proj_fp_option_id => l_target_proj_fp_options_id
2282: ,p_source_proj_fp_option_id => l_source_proj_fp_options_id
2283: ,p_target_fp_option_level_code => PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PLAN_VERSION
2284: ,p_target_fp_preference_code => l_target_fp_preference_code
2305: END IF;
2306:
2307: SELECT pfo.plan_in_multi_curr_flag
2308: INTO l_plan_in_multi_curr_flag
2309: FROM pa_proj_fp_options pfo
2310: WHERE pfo.fin_plan_version_id = l_budget_version_id;
2311:
2312: /* IF l_plan_in_multi_curr_flag = 'Y' THEN Commented for bug 2706430 */
2313:
2954: -- bug 3731925 Check if rbs version id for the target version needs to be
2955: -- updated with plan type level value
2956: Select rbs_version_id
2957: into l_target_pt_lvl_rbs_version_id
2958: from pa_proj_fp_options opt
2959: where opt.project_id = p_project_id
2960: and opt.fin_plan_type_id = l_target_fin_plan_type_id
2961: and opt.fin_plan_option_level_code = 'PLAN_TYPE';
2962:
3567:
3568: procedure Create_Version_OrgFcst
3569: (p_project_id IN pa_budget_versions.project_id%TYPE,
3570: p_fin_plan_type_id IN pa_budget_versions.fin_plan_type_id%TYPE,
3571: p_fin_plan_options_id IN pa_proj_fp_options.proj_fp_options_id%TYPE,
3572: p_version_name IN pa_budget_versions.version_name%TYPE,
3573: p_description IN pa_budget_versions.description%TYPE,
3574: p_resource_list_id IN pa_budget_versions.resource_list_id%TYPE,
3575: x_budget_version_id OUT NOCOPY pa_budget_versions.budget_version_id%TYPE, --File.Sql.39 bug 4440895
3592: l_max_version pa_budget_versions.version_number%TYPE;
3593: l_current_working_flag pa_budget_versions.current_working_flag%TYPE;
3594:
3595: l_budget_version_id pa_budget_versions.budget_version_id%TYPE; /* newly-created budget_version_id */
3596: l_proj_fin_plan_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
3597: l_row_id ROWID;
3598: l_resource_list_id pa_budget_versions.resource_list_id%TYPE;
3599: l_org_fcst_period_type pa_forecasting_options_all.org_fcst_period_type%TYPE;
3600: l_org_time_phased_code pa_proj_fp_options.all_time_phased_code%TYPE;
3596: l_proj_fin_plan_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
3597: l_row_id ROWID;
3598: l_resource_list_id pa_budget_versions.resource_list_id%TYPE;
3599: l_org_fcst_period_type pa_forecasting_options_all.org_fcst_period_type%TYPE;
3600: l_org_time_phased_code pa_proj_fp_options.all_time_phased_code%TYPE;
3601: l_org_amount_set_id pa_fin_plan_amount_sets.fin_plan_amount_set_id%TYPE;
3602: l_org_structure_version_id pa_implementations_all.org_structure_version_id%TYPE;
3603: l_period_set_name pa_implementations_all.period_set_name%TYPE;
3604: l_act_period_type gl_periods.period_type%TYPE;
3605: l_org_projfunc_currency_code gl_sets_of_books.currency_code%TYPE;
3606: l_number_of_periods pa_forecasting_options_all.number_of_periods%TYPE;
3607: l_request_id pa_budget_versions.request_id%TYPE;
3608: l_weighted_or_full_code pa_forecasting_options_all.weighted_or_full_code%TYPE;
3609: l_fcst_start_date pa_proj_fp_options.fin_plan_start_date%TYPE;
3610: l_fcst_end_date pa_proj_fp_options.fin_plan_end_date%TYPE;
3611: l_org_project_template_id pa_forecasting_options_all.org_fcst_project_template_id%TYPE;
3612: l_org_id pa_forecasting_options_all.org_id%TYPE;
3613: l_period_profile_id pa_proj_period_profiles.period_profile_id%TYPE;
3606: l_number_of_periods pa_forecasting_options_all.number_of_periods%TYPE;
3607: l_request_id pa_budget_versions.request_id%TYPE;
3608: l_weighted_or_full_code pa_forecasting_options_all.weighted_or_full_code%TYPE;
3609: l_fcst_start_date pa_proj_fp_options.fin_plan_start_date%TYPE;
3610: l_fcst_end_date pa_proj_fp_options.fin_plan_end_date%TYPE;
3611: l_org_project_template_id pa_forecasting_options_all.org_fcst_project_template_id%TYPE;
3612: l_org_id pa_forecasting_options_all.org_id%TYPE;
3613: l_period_profile_id pa_proj_period_profiles.period_profile_id%TYPE;
3614: l_ppp_start_date DATE;
3627: cursor plan_options_csr is
3628: select
3629: proj_fp_options_id
3630: from
3631: pa_proj_fp_options
3632: where
3633: project_id=p_project_id and
3634: fin_plan_type_id=p_fin_plan_type_id and
3635: fin_plan_option_level_code = 'PLAN_TYPE';
3981: IF P_PA_DEBUG_MODE = 'Y' THEN
3982: pa_debug.write_file('Create_Version_OrgFcst: ' || 'no planning options for plan_type level: creating one now');
3983: END IF;
3984: /* call table handler to create planning options for plan_type */
3985: select pa_proj_fp_options_s.nextVal into l_proj_fin_plan_options_id from dual;
3986: pa_proj_fp_options_pkg.Insert_Row
3987: (px_proj_fp_options_id => l_proj_fin_plan_options_id,
3988: p_project_id => p_project_id,
3989: p_fin_plan_option_level_code => 'PLAN_TYPE',
3982: pa_debug.write_file('Create_Version_OrgFcst: ' || 'no planning options for plan_type level: creating one now');
3983: END IF;
3984: /* call table handler to create planning options for plan_type */
3985: select pa_proj_fp_options_s.nextVal into l_proj_fin_plan_options_id from dual;
3986: pa_proj_fp_options_pkg.Insert_Row
3987: (px_proj_fp_options_id => l_proj_fin_plan_options_id,
3988: p_project_id => p_project_id,
3989: p_fin_plan_option_level_code => 'PLAN_TYPE',
3990: p_fin_plan_type_id => p_fin_plan_type_id,
4018: /* create planning option for plan VERSION */
4019: IF P_PA_DEBUG_MODE = 'Y' THEN
4020: pa_debug.write_file('Create_Version_OrgFcst: ' || 'creating planning options for PLAN_VERSION level');
4021: END IF;
4022: select pa_proj_fp_options_s.nextVal into l_proj_fin_plan_options_id from dual;
4023: pa_proj_fp_options_pkg.Insert_Row
4024: (px_proj_fp_options_id => l_proj_fin_plan_options_id,
4025: p_project_id => p_project_id,
4026: p_fin_plan_option_level_code => 'PLAN_VERSION',
4019: IF P_PA_DEBUG_MODE = 'Y' THEN
4020: pa_debug.write_file('Create_Version_OrgFcst: ' || 'creating planning options for PLAN_VERSION level');
4021: END IF;
4022: select pa_proj_fp_options_s.nextVal into l_proj_fin_plan_options_id from dual;
4023: pa_proj_fp_options_pkg.Insert_Row
4024: (px_proj_fp_options_id => l_proj_fin_plan_options_id,
4025: p_project_id => p_project_id,
4026: p_fin_plan_option_level_code => 'PLAN_VERSION',
4027: p_fin_plan_type_id => p_fin_plan_type_id,
5115: /*=====================================================================
5116: Bug No. 2331201 For finplan this api has been added
5117: This api Creates a working fin plan version.The version inherits its
5118: properties from plan type.This api creates records in
5119: pa_proj_fp_options , pa_resource_assignments,
5120: pa_fp_txn_currencies and pa_budget_versions.
5121: If px_budget_version_id is passed it is assumed that new version
5122: id is created and passed to the api, else new value is created.
5123:
5182: ,p_calling_context IN VARCHAR2 --:= NULL
5183: -- End of additional columns for Bug :- 2634900
5184: -- Start of additional columns for Bug :- 2649474
5185: ,p_resource_list_id IN pa_budget_versions.resource_list_id%TYPE --:= NULL
5186: ,p_time_phased_code IN pa_proj_fp_options.cost_time_phased_code%TYPE --:= NULL
5187: ,p_fin_plan_level_code IN pa_proj_fp_options.cost_fin_plan_level_code%TYPE --:= NULL
5188: ,p_plan_in_multi_curr_flag IN pa_proj_fp_options.plan_in_multi_curr_flag%TYPE --:= NULL
5189: ,p_amount_set_id IN pa_proj_fp_options.cost_amount_set_id%TYPE --:= NULL
5190: -- End of additional columns for Bug :- 2649474
5183: -- End of additional columns for Bug :- 2634900
5184: -- Start of additional columns for Bug :- 2649474
5185: ,p_resource_list_id IN pa_budget_versions.resource_list_id%TYPE --:= NULL
5186: ,p_time_phased_code IN pa_proj_fp_options.cost_time_phased_code%TYPE --:= NULL
5187: ,p_fin_plan_level_code IN pa_proj_fp_options.cost_fin_plan_level_code%TYPE --:= NULL
5188: ,p_plan_in_multi_curr_flag IN pa_proj_fp_options.plan_in_multi_curr_flag%TYPE --:= NULL
5189: ,p_amount_set_id IN pa_proj_fp_options.cost_amount_set_id%TYPE --:= NULL
5190: -- End of additional columns for Bug :- 2649474
5191: -- Start of additional columns for Bug :- 3088010
5184: -- Start of additional columns for Bug :- 2649474
5185: ,p_resource_list_id IN pa_budget_versions.resource_list_id%TYPE --:= NULL
5186: ,p_time_phased_code IN pa_proj_fp_options.cost_time_phased_code%TYPE --:= NULL
5187: ,p_fin_plan_level_code IN pa_proj_fp_options.cost_fin_plan_level_code%TYPE --:= NULL
5188: ,p_plan_in_multi_curr_flag IN pa_proj_fp_options.plan_in_multi_curr_flag%TYPE --:= NULL
5189: ,p_amount_set_id IN pa_proj_fp_options.cost_amount_set_id%TYPE --:= NULL
5190: -- End of additional columns for Bug :- 2649474
5191: -- Start of additional columns for Bug :- 3088010
5192: ,p_attribute_category IN pa_budget_versions.attribute_category%TYPE
5185: ,p_resource_list_id IN pa_budget_versions.resource_list_id%TYPE --:= NULL
5186: ,p_time_phased_code IN pa_proj_fp_options.cost_time_phased_code%TYPE --:= NULL
5187: ,p_fin_plan_level_code IN pa_proj_fp_options.cost_fin_plan_level_code%TYPE --:= NULL
5188: ,p_plan_in_multi_curr_flag IN pa_proj_fp_options.plan_in_multi_curr_flag%TYPE --:= NULL
5189: ,p_amount_set_id IN pa_proj_fp_options.cost_amount_set_id%TYPE --:= NULL
5190: -- End of additional columns for Bug :- 2649474
5191: -- Start of additional columns for Bug :- 3088010
5192: ,p_attribute_category IN pa_budget_versions.attribute_category%TYPE
5193: ,p_attribute1 IN pa_budget_versions.attribute1%TYPE
5235: l_max_version_number pa_budget_versions.version_number%TYPE;
5236: l_new_budget_version_id pa_budget_versions.budget_version_id%TYPE;
5237: l_current_working_flag pa_budget_versions.current_working_flag%TYPE;
5238: l_dummy_version_id pa_budget_versions.budget_version_id%TYPE;
5239: l_new_proj_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
5240: l_project_currency_code pa_projects_all.project_currency_code%TYPE;
5241: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE;
5242: l_dummy_currency_code pa_projects_all.projfunc_currency_code%TYPE;
5243: l_est_projfunc_raw_cost pa_budget_versions.est_projfunc_raw_cost%TYPE;
5251: l_agreement_currency_code pa_agreements_all.agreement_currency_code%TYPE;
5252:
5253: --l_mixed_resource_planned_flag VARCHAR2(1); --Added for Bug:-2625872
5254:
5255: l_plan_type_mc_flag pa_proj_fp_options.plan_in_multi_curr_flag%TYPE; --Bug 2661237
5256:
5257: /* Project level conversion attributes var for bug 2661237 */
5258:
5259: l_multi_currency_billing_flag pa_projects_all.multi_currency_billing_flag%TYPE;
5328: ,primary_cost_forecast_flag
5329: ,primary_rev_forecast_flag
5330: ,rev_current_planning_period
5331: ,rev_period_mask_id
5332: FROM pa_proj_fp_options
5333: WHERE project_id = c_project_id
5334: AND fin_plan_type_id = c_fin_plan_type_id
5335: AND fin_plan_option_level_code = PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PLAN_TYPE;
5336:
5372: , pfo.primary_cost_forecast_flag
5373: , pfo.primary_rev_forecast_flag
5374: , bv.actual_amts_thru_period
5375: , bv.project_structure_version_id
5376: FROM pa_proj_fp_options pfo, pa_budget_versions bv
5377: WHERE pfo.project_id = c_project_id
5378: AND pfo.fin_plan_type_id = c_fin_plan_type_id
5379: AND pfo.fin_plan_version_id = c_fin_plan_version_id
5380: AND bv.budget_version_id = c_fin_plan_version_id
5382:
5383: plan_version_info_rec plan_version_info_cur%ROWTYPE;
5384:
5385: TYPE new_version_rec_type IS RECORD (
5386: fin_plan_option_level_code PA_PROJ_FP_OPTIONS.fin_plan_option_level_code%TYPE
5387: ,fin_plan_preference_code PA_PROJ_FP_OPTIONS.fin_plan_preference_code%TYPE
5388: ,fin_plan_level_code PA_PROJ_FP_OPTIONS.cost_fin_plan_level_code%TYPE
5389: ,time_phased_code PA_PROJ_FP_OPTIONS.cost_time_phased_code%TYPE
5390: ,resource_list_id PA_PROJ_FP_OPTIONS.cost_resource_list_id%TYPE
5383: plan_version_info_rec plan_version_info_cur%ROWTYPE;
5384:
5385: TYPE new_version_rec_type IS RECORD (
5386: fin_plan_option_level_code PA_PROJ_FP_OPTIONS.fin_plan_option_level_code%TYPE
5387: ,fin_plan_preference_code PA_PROJ_FP_OPTIONS.fin_plan_preference_code%TYPE
5388: ,fin_plan_level_code PA_PROJ_FP_OPTIONS.cost_fin_plan_level_code%TYPE
5389: ,time_phased_code PA_PROJ_FP_OPTIONS.cost_time_phased_code%TYPE
5390: ,resource_list_id PA_PROJ_FP_OPTIONS.cost_resource_list_id%TYPE
5391: ,amount_set_id PA_PROJ_FP_OPTIONS.cost_amount_set_id%TYPE
5384:
5385: TYPE new_version_rec_type IS RECORD (
5386: fin_plan_option_level_code PA_PROJ_FP_OPTIONS.fin_plan_option_level_code%TYPE
5387: ,fin_plan_preference_code PA_PROJ_FP_OPTIONS.fin_plan_preference_code%TYPE
5388: ,fin_plan_level_code PA_PROJ_FP_OPTIONS.cost_fin_plan_level_code%TYPE
5389: ,time_phased_code PA_PROJ_FP_OPTIONS.cost_time_phased_code%TYPE
5390: ,resource_list_id PA_PROJ_FP_OPTIONS.cost_resource_list_id%TYPE
5391: ,amount_set_id PA_PROJ_FP_OPTIONS.cost_amount_set_id%TYPE
5392: ,current_planning_period PA_PROJ_FP_OPTIONS.cost_CURRENT_PLANNING_PERIOD%TYPE
5385: TYPE new_version_rec_type IS RECORD (
5386: fin_plan_option_level_code PA_PROJ_FP_OPTIONS.fin_plan_option_level_code%TYPE
5387: ,fin_plan_preference_code PA_PROJ_FP_OPTIONS.fin_plan_preference_code%TYPE
5388: ,fin_plan_level_code PA_PROJ_FP_OPTIONS.cost_fin_plan_level_code%TYPE
5389: ,time_phased_code PA_PROJ_FP_OPTIONS.cost_time_phased_code%TYPE
5390: ,resource_list_id PA_PROJ_FP_OPTIONS.cost_resource_list_id%TYPE
5391: ,amount_set_id PA_PROJ_FP_OPTIONS.cost_amount_set_id%TYPE
5392: ,current_planning_period PA_PROJ_FP_OPTIONS.cost_CURRENT_PLANNING_PERIOD%TYPE
5393: ,period_mask_id PA_PROJ_FP_OPTIONS.cost_PERIOD_MASK_ID%TYPE
5386: fin_plan_option_level_code PA_PROJ_FP_OPTIONS.fin_plan_option_level_code%TYPE
5387: ,fin_plan_preference_code PA_PROJ_FP_OPTIONS.fin_plan_preference_code%TYPE
5388: ,fin_plan_level_code PA_PROJ_FP_OPTIONS.cost_fin_plan_level_code%TYPE
5389: ,time_phased_code PA_PROJ_FP_OPTIONS.cost_time_phased_code%TYPE
5390: ,resource_list_id PA_PROJ_FP_OPTIONS.cost_resource_list_id%TYPE
5391: ,amount_set_id PA_PROJ_FP_OPTIONS.cost_amount_set_id%TYPE
5392: ,current_planning_period PA_PROJ_FP_OPTIONS.cost_CURRENT_PLANNING_PERIOD%TYPE
5393: ,period_mask_id PA_PROJ_FP_OPTIONS.cost_PERIOD_MASK_ID%TYPE
5394: ,plan_in_multi_curr_flag PA_PROJ_FP_OPTIONS.plan_in_multi_curr_flag%TYPE
5387: ,fin_plan_preference_code PA_PROJ_FP_OPTIONS.fin_plan_preference_code%TYPE
5388: ,fin_plan_level_code PA_PROJ_FP_OPTIONS.cost_fin_plan_level_code%TYPE
5389: ,time_phased_code PA_PROJ_FP_OPTIONS.cost_time_phased_code%TYPE
5390: ,resource_list_id PA_PROJ_FP_OPTIONS.cost_resource_list_id%TYPE
5391: ,amount_set_id PA_PROJ_FP_OPTIONS.cost_amount_set_id%TYPE
5392: ,current_planning_period PA_PROJ_FP_OPTIONS.cost_CURRENT_PLANNING_PERIOD%TYPE
5393: ,period_mask_id PA_PROJ_FP_OPTIONS.cost_PERIOD_MASK_ID%TYPE
5394: ,plan_in_multi_curr_flag PA_PROJ_FP_OPTIONS.plan_in_multi_curr_flag%TYPE
5395: ,approved_cost_plan_type_flag PA_PROJ_FP_OPTIONS.approved_cost_plan_type_flag%TYPE
5388: ,fin_plan_level_code PA_PROJ_FP_OPTIONS.cost_fin_plan_level_code%TYPE
5389: ,time_phased_code PA_PROJ_FP_OPTIONS.cost_time_phased_code%TYPE
5390: ,resource_list_id PA_PROJ_FP_OPTIONS.cost_resource_list_id%TYPE
5391: ,amount_set_id PA_PROJ_FP_OPTIONS.cost_amount_set_id%TYPE
5392: ,current_planning_period PA_PROJ_FP_OPTIONS.cost_CURRENT_PLANNING_PERIOD%TYPE
5393: ,period_mask_id PA_PROJ_FP_OPTIONS.cost_PERIOD_MASK_ID%TYPE
5394: ,plan_in_multi_curr_flag PA_PROJ_FP_OPTIONS.plan_in_multi_curr_flag%TYPE
5395: ,approved_cost_plan_type_flag PA_PROJ_FP_OPTIONS.approved_cost_plan_type_flag%TYPE
5396: ,approved_rev_plan_type_flag PA_PROJ_FP_OPTIONS.approved_rev_plan_type_flag%TYPE
5389: ,time_phased_code PA_PROJ_FP_OPTIONS.cost_time_phased_code%TYPE
5390: ,resource_list_id PA_PROJ_FP_OPTIONS.cost_resource_list_id%TYPE
5391: ,amount_set_id PA_PROJ_FP_OPTIONS.cost_amount_set_id%TYPE
5392: ,current_planning_period PA_PROJ_FP_OPTIONS.cost_CURRENT_PLANNING_PERIOD%TYPE
5393: ,period_mask_id PA_PROJ_FP_OPTIONS.cost_PERIOD_MASK_ID%TYPE
5394: ,plan_in_multi_curr_flag PA_PROJ_FP_OPTIONS.plan_in_multi_curr_flag%TYPE
5395: ,approved_cost_plan_type_flag PA_PROJ_FP_OPTIONS.approved_cost_plan_type_flag%TYPE
5396: ,approved_rev_plan_type_flag PA_PROJ_FP_OPTIONS.approved_rev_plan_type_flag%TYPE
5397: ,select_res_auto_flag PA_PROJ_FP_OPTIONS.select_cost_res_auto_flag%TYPE
5390: ,resource_list_id PA_PROJ_FP_OPTIONS.cost_resource_list_id%TYPE
5391: ,amount_set_id PA_PROJ_FP_OPTIONS.cost_amount_set_id%TYPE
5392: ,current_planning_period PA_PROJ_FP_OPTIONS.cost_CURRENT_PLANNING_PERIOD%TYPE
5393: ,period_mask_id PA_PROJ_FP_OPTIONS.cost_PERIOD_MASK_ID%TYPE
5394: ,plan_in_multi_curr_flag PA_PROJ_FP_OPTIONS.plan_in_multi_curr_flag%TYPE
5395: ,approved_cost_plan_type_flag PA_PROJ_FP_OPTIONS.approved_cost_plan_type_flag%TYPE
5396: ,approved_rev_plan_type_flag PA_PROJ_FP_OPTIONS.approved_rev_plan_type_flag%TYPE
5397: ,select_res_auto_flag PA_PROJ_FP_OPTIONS.select_cost_res_auto_flag%TYPE
5398: ,source_fp_options_id PA_PROJ_FP_OPTIONS.PROJ_FP_OPTIONS_ID%TYPE
5391: ,amount_set_id PA_PROJ_FP_OPTIONS.cost_amount_set_id%TYPE
5392: ,current_planning_period PA_PROJ_FP_OPTIONS.cost_CURRENT_PLANNING_PERIOD%TYPE
5393: ,period_mask_id PA_PROJ_FP_OPTIONS.cost_PERIOD_MASK_ID%TYPE
5394: ,plan_in_multi_curr_flag PA_PROJ_FP_OPTIONS.plan_in_multi_curr_flag%TYPE
5395: ,approved_cost_plan_type_flag PA_PROJ_FP_OPTIONS.approved_cost_plan_type_flag%TYPE
5396: ,approved_rev_plan_type_flag PA_PROJ_FP_OPTIONS.approved_rev_plan_type_flag%TYPE
5397: ,select_res_auto_flag PA_PROJ_FP_OPTIONS.select_cost_res_auto_flag%TYPE
5398: ,source_fp_options_id PA_PROJ_FP_OPTIONS.PROJ_FP_OPTIONS_ID%TYPE
5399: ,version_type PA_BUDGET_VERSIONS.version_type%TYPE
5392: ,current_planning_period PA_PROJ_FP_OPTIONS.cost_CURRENT_PLANNING_PERIOD%TYPE
5393: ,period_mask_id PA_PROJ_FP_OPTIONS.cost_PERIOD_MASK_ID%TYPE
5394: ,plan_in_multi_curr_flag PA_PROJ_FP_OPTIONS.plan_in_multi_curr_flag%TYPE
5395: ,approved_cost_plan_type_flag PA_PROJ_FP_OPTIONS.approved_cost_plan_type_flag%TYPE
5396: ,approved_rev_plan_type_flag PA_PROJ_FP_OPTIONS.approved_rev_plan_type_flag%TYPE
5397: ,select_res_auto_flag PA_PROJ_FP_OPTIONS.select_cost_res_auto_flag%TYPE
5398: ,source_fp_options_id PA_PROJ_FP_OPTIONS.PROJ_FP_OPTIONS_ID%TYPE
5399: ,version_type PA_BUDGET_VERSIONS.version_type%TYPE
5400: ,project_structure_version_id PA_BUDGET_VERSIONS.project_structure_version_id%TYPE
5393: ,period_mask_id PA_PROJ_FP_OPTIONS.cost_PERIOD_MASK_ID%TYPE
5394: ,plan_in_multi_curr_flag PA_PROJ_FP_OPTIONS.plan_in_multi_curr_flag%TYPE
5395: ,approved_cost_plan_type_flag PA_PROJ_FP_OPTIONS.approved_cost_plan_type_flag%TYPE
5396: ,approved_rev_plan_type_flag PA_PROJ_FP_OPTIONS.approved_rev_plan_type_flag%TYPE
5397: ,select_res_auto_flag PA_PROJ_FP_OPTIONS.select_cost_res_auto_flag%TYPE
5398: ,source_fp_options_id PA_PROJ_FP_OPTIONS.PROJ_FP_OPTIONS_ID%TYPE
5399: ,version_type PA_BUDGET_VERSIONS.version_type%TYPE
5400: ,project_structure_version_id PA_BUDGET_VERSIONS.project_structure_version_id%TYPE
5401: ,rbs_version_id PA_PROJ_FP_OPTIONS.rbs_version_id%TYPE
5394: ,plan_in_multi_curr_flag PA_PROJ_FP_OPTIONS.plan_in_multi_curr_flag%TYPE
5395: ,approved_cost_plan_type_flag PA_PROJ_FP_OPTIONS.approved_cost_plan_type_flag%TYPE
5396: ,approved_rev_plan_type_flag PA_PROJ_FP_OPTIONS.approved_rev_plan_type_flag%TYPE
5397: ,select_res_auto_flag PA_PROJ_FP_OPTIONS.select_cost_res_auto_flag%TYPE
5398: ,source_fp_options_id PA_PROJ_FP_OPTIONS.PROJ_FP_OPTIONS_ID%TYPE
5399: ,version_type PA_BUDGET_VERSIONS.version_type%TYPE
5400: ,project_structure_version_id PA_BUDGET_VERSIONS.project_structure_version_id%TYPE
5401: ,rbs_version_id PA_PROJ_FP_OPTIONS.rbs_version_id%TYPE
5402: ,primary_cost_forecast_flag PA_BUDGET_VERSIONS.primary_cost_forecast_flag%TYPE
5397: ,select_res_auto_flag PA_PROJ_FP_OPTIONS.select_cost_res_auto_flag%TYPE
5398: ,source_fp_options_id PA_PROJ_FP_OPTIONS.PROJ_FP_OPTIONS_ID%TYPE
5399: ,version_type PA_BUDGET_VERSIONS.version_type%TYPE
5400: ,project_structure_version_id PA_BUDGET_VERSIONS.project_structure_version_id%TYPE
5401: ,rbs_version_id PA_PROJ_FP_OPTIONS.rbs_version_id%TYPE
5402: ,primary_cost_forecast_flag PA_BUDGET_VERSIONS.primary_cost_forecast_flag%TYPE
5403: ,primary_rev_forecast_flag PA_BUDGET_VERSIONS.primary_rev_forecast_flag%TYPE
5404: ,actual_amts_thru_period PA_BUDGET_VERSIONS.actual_amts_thru_period%TYPE := NULL
5405: );
5406:
5407: new_version_info_rec new_version_rec_type;
5408:
5409: l_curr_work_ver_exists_flag VARCHAR2(1);
5410: l_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
5411: l_fin_plan_version_id pa_proj_fp_options.fin_plan_version_id%TYPE;
5412: l_cw_fin_plan_level_code VARCHAR2(30);
5413: l_cw_ver_res_list_id NUMBER;
5414: l_row_id rowid;
5407: new_version_info_rec new_version_rec_type;
5408:
5409: l_curr_work_ver_exists_flag VARCHAR2(1);
5410: l_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
5411: l_fin_plan_version_id pa_proj_fp_options.fin_plan_version_id%TYPE;
5412: l_cw_fin_plan_level_code VARCHAR2(30);
5413: l_cw_ver_res_list_id NUMBER;
5414: l_row_id rowid;
5415: l_copy_res_assmt_from_cwv_flag VARCHAR2(1);
6208: END IF;
6209: END IF;
6210: -- end of changes for Bug :- 2634900
6211:
6212: -- Create record in PA_PROJ_FP_OPTIONS
6213: -- Calling create_fp_options api to create new record for the created plan version
6214:
6215:
6216: IF P_PA_DEBUG_MODE = 'Y' THEN
6217: pa_debug.g_err_stage:='Calling create_fp_option api';
6218: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6219: END IF;
6220:
6221: PA_PROJ_FP_OPTIONS_PUB.create_fp_option (
6222: px_target_proj_fp_option_id => l_new_proj_fp_options_id
6223: ,p_source_proj_fp_option_id => new_version_info_rec.source_fp_options_id
6224: ,p_target_fp_option_level_code => PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PLAN_VERSION
6225: ,p_target_fp_preference_code => new_version_info_rec.fin_plan_preference_code
6236:
6237: --Update the fp option created for plan version with the passed i/p parameters if they are not null
6238:
6239: IF new_version_info_rec.version_type = PA_FP_CONSTANTS_PKG.G_ELEMENT_TYPE_COST THEN
6240: UPDATE pa_proj_fp_options
6241: SET cost_amount_set_id = NVL(p_amount_set_id,new_version_info_rec.amount_set_id),
6242: plan_in_multi_curr_flag = new_version_info_rec.plan_in_multi_curr_flag,
6243: cost_fin_plan_level_code = new_version_info_rec.fin_plan_level_code,
6244: cost_time_phased_code = new_version_info_rec.time_phased_code,
6248: cost_period_mask_id = new_version_info_rec.period_mask_id,
6249: rbs_version_id = Decode(p_ci_id, null, rbs_version_id, null) -- bug 3867302
6250: WHERE proj_fp_options_id = l_new_proj_fp_options_id;
6251: ELSIF new_version_info_rec.version_type = PA_FP_CONSTANTS_PKG.G_ELEMENT_TYPE_REVENUE THEN
6252: UPDATE pa_proj_fp_options
6253: SET revenue_amount_set_id = NVL(p_amount_set_id,new_version_info_rec.amount_set_id),
6254: plan_in_multi_curr_flag = new_version_info_rec.plan_in_multi_curr_flag,
6255: revenue_fin_plan_level_code = new_version_info_rec.fin_plan_level_code,
6256: revenue_time_phased_code = new_version_info_rec.time_phased_code,
6260: rev_period_mask_id = new_version_info_rec.period_mask_id,
6261: rbs_version_id = Decode(p_ci_id, null, rbs_version_id, null) -- bug 3867302
6262: WHERE proj_fp_options_id = l_new_proj_fp_options_id;
6263: ELSIF new_version_info_rec.version_type = PA_FP_CONSTANTS_PKG.G_ELEMENT_TYPE_ALL THEN
6264: UPDATE pa_proj_fp_options
6265: SET all_amount_set_id = NVL(p_amount_set_id,new_version_info_rec.amount_set_id),
6266: plan_in_multi_curr_flag = new_version_info_rec.plan_in_multi_curr_flag,
6267: all_fin_plan_level_code = new_version_info_rec.fin_plan_level_code,
6268: all_time_phased_code = new_version_info_rec.time_phased_code,
6433: and txn_currency_code = l_agreement_currency_code;
6434:
6435: END IF;
6436:
6437: UPDATE pa_proj_fp_options
6438: SET PROJECT_REV_RATE_TYPE = l_project_bil_rate_type
6439: ,PROJECT_REV_RATE_DATE_TYPE = l_project_bil_rate_date_code
6440: ,PROJECT_REV_RATE_DATE = l_project_bil_rate_date
6441: ,PROJFUNC_REV_RATE_TYPE = l_projfunc_bil_rate_type
7650:
7651: l_project_id pa_budget_versions.PROJECT_ID%TYPE;
7652: l_period_profile_id pa_budget_versions.PERIOD_PROFILE_ID%TYPE;
7653: l_budget_version_type pa_budget_versions.VERSION_TYPE%TYPE;
7654: l_fp_preference_code pa_proj_fp_options.FIN_PLAN_PREFERENCE_CODE%TYPE;
7655: l_margin_derived_from_code pa_proj_fp_options.MARGIN_DERIVED_FROM_CODE%TYPE;
7656:
7657: l_plsql_max_array_size NUMBER := 200;
7658: l_tbl_index NUMBER := 1;
7651: l_project_id pa_budget_versions.PROJECT_ID%TYPE;
7652: l_period_profile_id pa_budget_versions.PERIOD_PROFILE_ID%TYPE;
7653: l_budget_version_type pa_budget_versions.VERSION_TYPE%TYPE;
7654: l_fp_preference_code pa_proj_fp_options.FIN_PLAN_PREFERENCE_CODE%TYPE;
7655: l_margin_derived_from_code pa_proj_fp_options.MARGIN_DERIVED_FROM_CODE%TYPE;
7656:
7657: l_plsql_max_array_size NUMBER := 200;
7658: l_tbl_index NUMBER := 1;
7659:
7878:
7879:
7880: SELECT fin_plan_preference_code, margin_derived_from_code
7881: INTO l_fp_preference_code, l_margin_derived_from_code
7882: FROM pa_proj_fp_options
7883: WHERE fin_plan_version_id = p_budget_version_id;
7884:
7885:
7886: IF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_BUDGET_LINE) THEN