[Home] [Help]
PACKAGE: APPS.PA_FP_AUTO_BASELINE_PKG
Source
1 PACKAGE PA_FP_AUTO_BASELINE_PKG AS
2 /* $Header: PAFPABPS.pls 120.1 2005/08/19 16:23:35 mwasowic noship $ */
3
4
5 /* PLSQL Record Types */
6
7 TYPE funding_bl_rec IS RECORD (
8 task_id pa_tasks.task_id%TYPE,
9 description pa_budget_lines.description%TYPE,
10 start_date pa_budget_lines.start_date%TYPE,
11 end_date pa_budget_lines.end_date%TYPE,
12 projfunc_revenue pa_budget_lines.revenue%TYPE,
13 project_revenue pa_budget_lines.project_revenue%TYPE
14 );
15
16 /* PLSQL Record Types */
17
18
19 /* PLSQL Table Types */
20
21 TYPE funding_bl_tab is TABLE of funding_bl_rec INDEX BY BINARY_INTEGER;
22
23 /* PLSQL Table Types */
24
25
26 PROCEDURE CREATE_BASELINED_VERSION
27 ( p_project_id IN pa_budget_versions.project_id%TYPE
28 ,p_fin_plan_type_id IN pa_budget_versions.fin_plan_type_id%TYPE
29 ,p_funding_level_code IN pa_proj_fp_options.cost_fin_plan_level_code%TYPE
30 ,p_version_name IN pa_budget_versions.version_name%TYPE
31 ,p_description IN pa_budget_versions.description%TYPE
32 ,p_funding_bl_tab IN pa_fp_auto_baseline_pkg.funding_bl_tab
33 -- Start of additional columns for Bug :- 2634900
34 ,p_ci_id IN pa_budget_versions.ci_id%TYPE := NULL
35 ,p_est_proj_raw_cost IN pa_budget_versions.est_project_raw_cost%TYPE := NULL
36 ,p_est_proj_bd_cost IN pa_budget_versions.est_project_burdened_cost%TYPE:= NULL
37 ,p_est_proj_revenue IN pa_budget_versions.est_project_revenue%TYPE := NULL
38 ,p_est_qty IN pa_budget_versions.est_quantity%TYPE := NULL
39 ,p_est_equip_qty IN pa_budget_versions.est_equipment_quantity%TYPE := NULL -- FP.M
40 ,p_impacted_task_id IN pa_tasks.task_id%TYPE := NULL
41 ,p_agreement_id IN pa_budget_versions.agreement_id%TYPE := NULL
42 -- End of additional columns for Bug :- 2634900
43 ,x_budget_version_id OUT NOCOPY pa_budget_versions.budget_version_id%TYPE --File.Sql.39 bug 4440895
44 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
45 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
46 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
47
48
49 END PA_FP_AUTO_BASELINE_PKG;