95: c_project_id IN pa_projects.project_id%TYPE
96: ,c_budget_types IN VARCHAR2 ) IS
97: SELECT pt.fin_plan_type_id fin_plan_type_id
98: ,bt.budget_Type_code budget_Type_code
99: FROM pa_fin_plan_types_b pt /* Bug# 2661650 - Replaced _vl by _b for performance reasons */
100: ,pa_budget_types bt
101: WHERE DECODE(c_budget_types,'ALL','Y', bt.upgrade_budget_type_flag) = 'Y'
102: AND bt.budget_type_code = pt.migrated_frm_bdgt_typ_code
103: AND NVL(bt.plan_type,'BUDGET') = 'BUDGET'
149: AND c_budget_statuses = 'CWB')
150: AND (c_mode = 'PRE_UPGRADE' OR EXISTS (
151: SELECT 1
152: FROM pa_proj_fp_options pfo,
153: pa_fin_plan_types_b pt /* Bug# 2661650 - Replaced _vl by _b for performance reasons */
154: WHERE pfo.project_id = c_project_id
155: AND pfo.fin_plan_option_level_code = PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PLAN_TYPE
156: AND pt.fin_plan_type_id = pfo.fin_plan_type_id
157: AND pt.migrated_frm_bdgt_typ_code = bv.budget_type_code));
494: --Fetch plan type id using budget_type_code
495:
496: SELECT fin_plan_type_id
497: INTO x_upgrade_elements_rec.curr_option_plan_type_id
498: FROM pa_fin_plan_types_b /* Bug# 2661650 - Replaced _vl by _b for performance reasons */
499: WHERE migrated_frm_bdgt_typ_code = p_budget_type_code;
500:
501: --Fetch preference code using budget amount code
502:
634: --Fetch plan type id using budget_type_code
635:
636: SELECT fin_plan_type_id
637: INTO x_upgrade_elements_rec.curr_option_plan_type_id
638: FROM pa_fin_plan_types_b /* Bug# 2661650 - Replaced _vl by _b for performance reasons */
639: WHERE migrated_frm_bdgt_typ_code = p_budget_type_code;
640:
641: --Fetch preference code using budget amount code
642:
1342: l_data VARCHAR2(2000);
1343: l_msg_index_out NUMBER;
1344: l_debug_mode VARCHAR2(30);
1345: /* Bug# 2661650 - Replaced _vl by _b for performance reasons */
1346: l_plan_class_code pa_fin_plan_types_b.plan_class_code%TYPE;
1347: l_approved_cost_plan_type_flag pa_fin_plan_types_b.approved_cost_plan_type_flag%TYPE;
1348: l_approved_rev_plan_type_flag pa_fin_plan_types_b.approved_rev_plan_type_flag%TYPE;
1349:
1350: l_rowid ROWID := NULL;
1343: l_msg_index_out NUMBER;
1344: l_debug_mode VARCHAR2(30);
1345: /* Bug# 2661650 - Replaced _vl by _b for performance reasons */
1346: l_plan_class_code pa_fin_plan_types_b.plan_class_code%TYPE;
1347: l_approved_cost_plan_type_flag pa_fin_plan_types_b.approved_cost_plan_type_flag%TYPE;
1348: l_approved_rev_plan_type_flag pa_fin_plan_types_b.approved_rev_plan_type_flag%TYPE;
1349:
1350: l_rowid ROWID := NULL;
1351:
1344: l_debug_mode VARCHAR2(30);
1345: /* Bug# 2661650 - Replaced _vl by _b for performance reasons */
1346: l_plan_class_code pa_fin_plan_types_b.plan_class_code%TYPE;
1347: l_approved_cost_plan_type_flag pa_fin_plan_types_b.approved_cost_plan_type_flag%TYPE;
1348: l_approved_rev_plan_type_flag pa_fin_plan_types_b.approved_rev_plan_type_flag%TYPE;
1349:
1350: l_rowid ROWID := NULL;
1351:
1352: CURSOR budget_types_for_upgrade_cur (
1377: FROM pa_budget_types bt
1378: WHERE DECODE(c_budget_types, 'ALL' ,'Y', upgrade_budget_type_flag) = 'Y'
1379: AND not exists
1380: (SELECT 1
1381: FROM pa_fin_plan_types_b pt /* Bug# 2661650 - Replaced _vl by _b for performance reasons */
1382: WHERE pt.migrated_frm_bdgt_typ_code = bt.budget_type_code);
1383:
1384: budget_types_for_upgrade_rec budget_types_for_upgrade_cur%ROWTYPE;
1385:
2925: AND NVL(bt.plan_type,'BUDGET') = 'BUDGET'
2926: AND NOT EXISTS
2927: (SELECT 1
2928: FROM pa_proj_fp_options ppfo
2929: ,pa_fin_plan_types_b pt
2930: WHERE pt.migrated_frm_bdgt_typ_code = bt.budget_type_code
2931: AND ppfo.project_id = c_project_id
2932: AND ppfo.fin_plan_type_id = pt.fin_plan_type_id
2933: AND ppfo.fin_plan_option_level_code = PA_FP_CONSTANTS_PKG.G_OPTION_LEVEL_PLAN_TYPE)
4384: op.proj_fp_options_id,
4385: ci.status_code
4386: FROM pa_projects prj,
4387: pa_budget_versions bv,
4388: pa_fin_plan_types_b fp,
4389: pa_control_items ci,
4390: pa_proj_fp_options op
4391: WHERE segment1 BETWEEN NVL(c_from_project_number,segment1) AND NVL(c_to_project_number,segment1)
4392: AND DECODE(c_project_statuses,'ALL','ACTIVE',prj.project_status_code) = 'ACTIVE'