PACKAGE: APPS.PA_FP_AUTO_BASELINE_PKG

Source

1 PACKAGE PA_FP_AUTO_BASELINE_PKG AUTHID CURRENT_USER 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;