[Home] [Help]
3459: l_msg_code VARCHAR2(2000);
3460:
3461: -- End of variables used for debugging purpose
3462:
3463: l_Projfunc_Currency_Code pa_projects_all.projfunc_currency_code%TYPE := NULL;
3464: l_Project_Currency_Code pa_projects_all.project_currency_code%TYPE := NULL;
3465: l_Txn_Currency_Code pa_projects_all.projfunc_currency_code%TYPE := NULL;
3466: l_baseline_funding_flag pa_projects_all.baseline_funding_flag%TYPE;
3467: l_cost_impl_flag VARCHAR2(1);
3460:
3461: -- End of variables used for debugging purpose
3462:
3463: l_Projfunc_Currency_Code pa_projects_all.projfunc_currency_code%TYPE := NULL;
3464: l_Project_Currency_Code pa_projects_all.project_currency_code%TYPE := NULL;
3465: l_Txn_Currency_Code pa_projects_all.projfunc_currency_code%TYPE := NULL;
3466: l_baseline_funding_flag pa_projects_all.baseline_funding_flag%TYPE;
3467: l_cost_impl_flag VARCHAR2(1);
3468: l_rev_impl_flag VARCHAR2(1);
3461: -- End of variables used for debugging purpose
3462:
3463: l_Projfunc_Currency_Code pa_projects_all.projfunc_currency_code%TYPE := NULL;
3464: l_Project_Currency_Code pa_projects_all.project_currency_code%TYPE := NULL;
3465: l_Txn_Currency_Code pa_projects_all.projfunc_currency_code%TYPE := NULL;
3466: l_baseline_funding_flag pa_projects_all.baseline_funding_flag%TYPE;
3467: l_cost_impl_flag VARCHAR2(1);
3468: l_rev_impl_flag VARCHAR2(1);
3469: l_cost_impact_impl_flag VARCHAR2(1);
3462:
3463: l_Projfunc_Currency_Code pa_projects_all.projfunc_currency_code%TYPE := NULL;
3464: l_Project_Currency_Code pa_projects_all.project_currency_code%TYPE := NULL;
3465: l_Txn_Currency_Code pa_projects_all.projfunc_currency_code%TYPE := NULL;
3466: l_baseline_funding_flag pa_projects_all.baseline_funding_flag%TYPE;
3467: l_cost_impl_flag VARCHAR2(1);
3468: l_rev_impl_flag VARCHAR2(1);
3469: l_cost_impact_impl_flag VARCHAR2(1);
3470: l_rev_impact_impl_flag VARCHAR2(1);
4073: pa_debug.g_err_stage:= 'Fetching l_project_structure_version_id :'||l_project_structure_version_id;
4074: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
4075: END IF;
4076:
4077: -- Select the details required from pa_projects_all so that they can be used in the later part of the code
4078: SELECT project_currency_code
4079: ,projfunc_currency_code
4080: ,nvl(baseline_funding_flag,'N')
4081: INTO l_project_currency_code
4080: ,nvl(baseline_funding_flag,'N')
4081: INTO l_project_currency_code
4082: ,l_projfunc_currency_code
4083: ,l_baseline_funding_flag
4084: FROM pa_projects_all
4085: WHERE project_id=l_project_id;
4086:
4087: IF P_PA_debug_mode = 'Y' THEN
4088: pa_debug.g_err_stage:= 'Fetching l_project_currency_code :'||l_project_currency_code;
11002: l_budget_status_code pa_budget_versions.budget_status_code%TYPE;
11003: l_ci_cost_version_id pa_budget_versions.budget_version_id%TYPE;
11004: l_ci_rev_version_id pa_budget_versions.budget_version_id%TYPE;
11005: l_ci_all_version_id pa_budget_versions.budget_version_id%TYPE;
11006: l_project_id pa_projects_all.project_id%TYPE;
11007: l_source_version_id_tbl SYSTEM.pa_num_tbl_type:=SYSTEM.pa_num_tbl_type();
11008: l_calling_mode_for_chk_api VARCHAR2(30);
11009: l_merge_possible_code_tbl SYSTEM.pa_varchar2_1_tbl_type :=SYSTEM.pa_varchar2_1_tbl_type();
11010: l_copy_ci_ver_flag VARCHAR2(1);
12286: l_impl_quantity_tbl SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.PA_NUM_TBL_TYPE();
12287: l_impl_equipment_quant_tbl SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.PA_NUM_TBL_TYPE();
12288: l_impl_agr_revenue_tbl SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.PA_NUM_TBL_TYPE();
12289:
12290: l_project_id pa_projects_all.project_id%TYPE;
12291:
12292: --Variable used for passing ci id to the change management baseline API.
12293: l_CI_ID_Tab PA_PLSQL_DATATYPES.IdTabTyp;
12294: X_Err_Code NUMBER;
12322: l_impl_pfc_rev_amt NUMBER;
12323: l_implemented_amt NUMBER := 0;
12324: l_implemented_pc_amt NUMBER;
12325: l_implemented_pfc_amt NUMBER;
12326: l_project_currency_code pa_projects_all.project_currency_code%TYPE;
12327: l_projfunc_currency_code pa_projects_all.project_currency_code%TYPE;
12328: l_ci_already_impl_flag VARCHAR2(1) := 'N';
12329:
12330: l_final_rev_par_impl_flag pa_budget_versions.rev_partially_impl_flag%TYPE;
12323: l_implemented_amt NUMBER := 0;
12324: l_implemented_pc_amt NUMBER;
12325: l_implemented_pfc_amt NUMBER;
12326: l_project_currency_code pa_projects_all.project_currency_code%TYPE;
12327: l_projfunc_currency_code pa_projects_all.project_currency_code%TYPE;
12328: l_ci_already_impl_flag VARCHAR2(1) := 'N';
12329:
12330: l_final_rev_par_impl_flag pa_budget_versions.rev_partially_impl_flag%TYPE;
12331: --Bug 4136238
12463: l_project_id,
12464: l_project_currency_code,
12465: l_projfunc_currency_code
12466: FROM pa_budget_versions pbv,
12467: pa_projects_all p
12468: WHERE pbv.project_id = p.project_id
12469: AND pbv.budget_version_id = p_budget_version_id;
12470:
12471: IF l_debug_mode = 'Y' THEN
13373: Nvl(pj.baseline_funding_flag, 'N')
13374: INTO l_targ_app_cost_flag,
13375: l_targ_app_rev_flag,
13376: l_baseline_funding_flag
13377: FROM pa_projects_all pj,
13378: pa_budget_versions bv
13379: WHERE bv.budget_version_id = l_budget_version_id_tbl(j)
13380: AND bv.project_id = pj.project_id;
13381: EXCEPTION