[Home] [Help]
2374: x_approved_rev_flag,
2375: x_fin_plan_type_id,
2376: x_plan_type_name,
2377: x_plan_class_code
2378: FROM pa_budget_versions bv, pa_fin_plan_types_tl patl,pa_fin_plan_types_b pftb
2379: WHERE bv.budget_version_id = p_budget_version_id
2380: and bv.project_id = p_project_id
2381: and bv.fin_plan_type_id = patl.fin_plan_type_id
2382: and patl.fin_plan_type_id = pftb.fin_plan_type_id
7793: /* Returns all the plan types attached to a project(excluding work plan and org forecast plan types)
7794: and other information including whether a change order can be implemented into it */
7795: -- Added New Params for Quantity in GET_PLAN_TYPES_FOR_IMPL - Bug 3902176
7796: PROCEDURE GET_PLAN_TYPES_FOR_IMPL
7797: (P_ci_id IN Pa_fin_plan_types_b.fin_plan_type_id%TYPE, -- Id of the Change Document
7798: P_project_id IN Pa_budget_versions.project_id%TYPE, -- Id of the Project
7799: X_pt_id_tbl OUT NOCOPY SYSTEM.pa_num_tbl_type, -- Plsql table for fin plan type ids --File.Sql.39 bug 4440895
7800: X_pt_name_tbl OUT NOCOPY SYSTEM.pa_varchar2_150_tbl_type, -- Plsql table for fin plan type names --File.Sql.39 bug 4440895
7801: x_cost_impact_impl_tbl OUT NOCOPY SYSTEM.pa_varchar2_1_tbl_type, --File.Sql.39 bug 4440895
7811: X_equipment_hrs_r_tbl OUT NOCOPY SYSTEM.pa_num_tbl_type, -- Plsql tabe for equipment hrs -Rev --File.Sql.39 bug 4440895
7812: X_margin_tbl OUT NOCOPY SYSTEM.pa_num_tbl_type, -- Plsql table for margin --File.Sql.39 bug 4440895
7813: X_margin_percent_tbl OUT NOCOPY SYSTEM.pa_num_tbl_type, -- Plsql table for margin percent --File.Sql.39 bug 4440895
7814: X_margin_derived_code_tbl OUT NOCOPY SYSTEM.pa_varchar2_30_tbl_type, -- Plsql table for Margin Derived From Code - Bug 3734840 --File.Sql.39 bug 4440895
7815: x_approved_fin_pt_id OUT NOCOPY Pa_fin_plan_types_b.fin_plan_type_id%TYPE, -- Contains the ID of the approved plan type --File.Sql.39 bug 4440895
7816: X_cost_bv_id_tbl OUT NOCOPY SYSTEM.pa_num_tbl_type, -- Plsql table for cost bv id --File.Sql.39 bug 4440895
7817: X_rev_bv_id_tbl OUT NOCOPY SYSTEM.pa_num_tbl_type, -- Plsql table for revenue bv id --File.Sql.39 bug 4440895
7818: X_all_bv_id_tbl OUT NOCOPY SYSTEM.pa_num_tbl_type, -- Plsql table for all bv id --File.Sql.39 bug 4440895
7819: X_select_flag_tbl OUT NOCOPY SYSTEM.pa_varchar2_1_tbl_type, -- The flag which indicates whether the select flag can be checked by default or not --File.Sql.39 bug 4440895
7880: l_ci_version_type pa_budget_versions.version_type%TYPE;
7881:
7882: l_budget_version_id Pa_budget_versions.budget_version_id%TYPE;
7883:
7884: l_approved_fin_pt_id Pa_fin_plan_types_b.fin_plan_type_id%TYPE;
7885:
7886: -- Version Type ref is not longer required as both Cost and Revenue Quantity Figures are Retrieved and used now -- 3902176
7887: -- l_version_type pa_budget_versions.version_type%TYPE;--Bug 3662077
7888:
8489: current working version of approved revenue plan type
8490:
8491: See comments for other OUT parameters to know what they indicate */
8492:
8493: PROCEDURE GET_IMPL_DETAILS(P_fin_plan_type_id IN Pa_fin_plan_types_b.fin_plan_type_id%TYPE -- Id of the plan type
8494: ,P_project_id IN Pa_budget_versions.project_id%TYPE -- Id of the Project
8495: ,P_app_rev_plan_type_flag IN pa_budget_versions.approved_rev_plan_type_flag%TYPE DEFAULT NULL -- Indicates whether the plan type passed is approved rev_plan_type or not. If the value is NULL the value will be derived
8496: ,P_ci_id IN Pa_budget_versions.ci_id%TYPE -- Id of the Change Order
8497: ,p_ci_type_id IN pa_control_items.ci_type_id%TYPE DEFAULT NULL
8505: ,X_cost_impact_impl_flag OUT NOCOPY VARCHAR2 -- Contains 'Y' if the cost impact is completely implemented --File.Sql.39 bug 4440895
8506: ,x_rev_impact_impl_flag OUT NOCOPY VARCHAR2 -- Contains 'Y' if the revenue impact is completely implemented --File.Sql.39 bug 4440895
8507: ,X_partially_impl_flag OUT NOCOPY VARCHAR2 -- Can be Y or N. Indicates whether a CI is partially implemented . --File.Sql.39 bug 4440895
8508: ,x_agreement_num OUT NOCOPY pa_agreements_all.agreement_num%TYPE -- Agreement Number. Has meaning only in the context of an approved revenue plan type. --File.Sql.39 bug 4440895
8509: ,x_approved_fin_pt_id OUT NOCOPY Pa_fin_plan_types_b.fin_plan_type_id%TYPE -- If p_fin_plan_type_id is an approved revenue plan type, this is equal to p_fin_plan_type_id --File.Sql.39 bug 4440895
8510: ,x_return_status OUT NOCOPY VARCHAR2 -- Indicates the exit status of the API --File.Sql.39 bug 4440895
8511: ,x_msg_data OUT NOCOPY VARCHAR2 -- Indicates the error occurred --File.Sql.39 bug 4440895
8512: ,X_msg_count OUT NOCOPY NUMBER) -- Indicates the number of error messages --File.Sql.39 bug 4440895
8513: IS
8983: ELSIF l_rev_impl_full = 'N' THEN
8984: BEGIN
8985: SELECT nvl(enable_partial_impl_flag,'N')
8986: INTO x_partially_impl_flag
8987: FROM PA_FIN_PLAN_TYPES_B
8988: WHERE fin_plan_type_id = p_fin_plan_type_id;
8989: EXCEPTION
8990: WHEN NO_DATA_FOUND THEN
8991: IF P_PA_debug_mode = 'Y' THEN
9371: l_targ_resource_list_id1 ,
9372: l_targ_resource_list_id2,
9373: x_plan_class_code
9374: FROM pa_budget_versions pbv,
9375: pa_fin_plan_types_b fin
9376: WHERE budget_version_id=p_budget_version_id
9377: AND fin.fin_plan_type_id=pbv.fin_plan_type_id;
9378:
9379: