1 PACKAGE PA_FP_ROLLUP_PKG AUTHID CURRENT_USER AS
2 /* $Header: PAFPRLPS.pls 120.1 2005/08/19 16:29:44 mwasowic noship $ */
3
4 /* PL/SQL Table Types. */
5
6 TYPE l_ra_id_tbl_typ IS TABLE OF
7 pa_resource_assignments.RESOURCE_ASSIGNMENT_ID%TYPE INDEX BY BINARY_INTEGER;
8 TYPE l_par_id_tbl_typ IS TABLE OF
9 pa_resource_assignments.PARENT_ASSIGNMENT_ID%TYPE INDEX BY BINARY_INTEGER;
10 TYPE l_task_id_tbl_typ IS TABLE OF
11 pa_tasks.TASK_ID%TYPE INDEX BY BINARY_INTEGER;
12 TYPE l_top_task_id_tbl_typ IS TABLE OF
13 pa_tasks.TOP_TASK_ID%TYPE INDEX BY BINARY_INTEGER;
14 TYPE l_res_list_mem_id_tbl_typ IS TABLE OF
15 pa_resource_assignments.RESOURCE_LIST_MEMBER_ID%TYPE INDEX BY BINARY_INTEGER;
16 TYPE l_track_as_labor_flag_tbl_typ IS TABLE OF
17 pa_resource_assignments.TRACK_AS_LABOR_FLAG%TYPE INDEX BY BINARY_INTEGER;
18 TYPE l_plannable_flag_tbl_typ IS TABLE OF
19 pa_proj_fp_options.ALL_FIN_PLAN_LEVEL_CODE%TYPE INDEX BY BINARY_INTEGER;
20 TYPE l_unit_of_measure_tbl_typ IS TABLE OF
21 pa_resource_assignments.UNIT_OF_MEASURE%TYPE INDEX BY BINARY_INTEGER;
22 TYPE l_proj_raw_cost_tbl_typ IS TABLE OF
23 pa_resource_assignments.TOTAL_PROJECT_RAW_COST%TYPE INDEX BY BINARY_INTEGER;
24 TYPE l_proj_burd_cost_tbl_typ IS TABLE OF
25 pa_resource_assignments.TOTAL_PROJECT_BURDENED_COST%TYPE INDEX BY BINARY_INTEGER;
26 TYPE l_proj_revenue_tbl_typ IS TABLE OF
27 pa_resource_assignments.TOTAL_PROJECT_REVENUE%TYPE INDEX BY BINARY_INTEGER;
28 TYPE l_projfunc_raw_cost_tbl_typ IS TABLE OF
29 pa_resource_assignments.TOTAL_PLAN_RAW_COST%TYPE INDEX BY BINARY_INTEGER;
30 TYPE l_projfunc_burd_cost_tbl_typ IS TABLE OF
31 pa_resource_assignments.TOTAL_PLAN_BURDENED_COST%TYPE INDEX BY BINARY_INTEGER;
32 TYPE l_projfunc_revenue_tbl_typ IS TABLE OF
33 pa_resource_assignments.TOTAL_PLAN_REVENUE%TYPE INDEX BY BINARY_INTEGER;
34 TYPE l_quantity_tbl_typ IS TABLE OF
35 pa_resource_assignments.TOTAL_PLAN_QUANTITY%TYPE INDEX BY BINARY_INTEGER;
36
37 TYPE l_obj_typ_code_tbl_typ IS TABLE OF
38 pa_proj_periods_denorm.object_type_code%TYPE INDEX BY BINARY_INTEGER;
39 TYPE l_object_id_tbl_typ IS TABLE OF
40 pa_proj_periods_denorm.object_id%TYPE;
41 TYPE l_period_profile_id_typ IS TABLE OF
42 pa_budget_versions.period_profile_id%TYPE;
43 TYPE l_amount_type_code_tbl_typ IS TABLE OF
44 pa_proj_periods_denorm.amount_type_code%TYPE;
45 TYPE l_amount_subtype_code_tbl_typ IS TABLE OF
46 pa_proj_periods_denorm.amount_subtype_code%TYPE;
47 TYPE l_amount_type_id_tbl_typ IS TABLE OF
48 pa_proj_periods_denorm.amount_type_id%TYPE;
49 TYPE l_amount_subtype_id_tbl_typ IS TABLE OF
50 pa_proj_periods_denorm.amount_subtype_id%TYPE;
51 TYPE l_currency_type_tbl_typ IS TABLE OF
52 pa_proj_periods_denorm.currency_type%TYPE;
53 TYPE l_currency_code_tbl_typ IS TABLE OF
54 pa_proj_periods_denorm.currency_code%TYPE;
55
56
57
58
59
60
61
62
63
64
65
66 /* Exception to be used for Invalid Parameters. */
67 Invalid_Arg_Exc EXCEPTION;
68
69 /* Global variables */
70 p_first_ra_id pa_resource_assignments.RESOURCE_ASSIGNMENT_ID%TYPE;
71
72
73 PROCEDURE POPULATE_LOCAL_VARS(
74 p_budget_version_id IN NUMBER
75 ,x_project_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
76 ,x_resource_list_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
77 ,x_uncat_flag OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
78 ,x_uncat_rlm_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
79 ,x_rl_group_type_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
80 ,x_planning_level OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
81 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
82 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
83 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
84
85 PROCEDURE ROLLUP_BUDGET_VERSION(
86 p_budget_version_id IN NUMBER
87 ,p_entire_version IN VARCHAR2
88 ,p_context IN VARCHAR2 DEFAULT NULL --Added for bug 4160258
89 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
90 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
91 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
92
93 PROCEDURE REFRESH_RESOURCE_ASSIGNMENTS(
94 p_budget_version_id IN NUMBER
95 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
96 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
97 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
98
99 PROCEDURE UPDATE_RES_PARENT_ASSIGN_ID(
100 p_budget_version_id IN NUMBER
101 ,p_proj_ra_id IN NUMBER
102 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
103 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
104 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
105
106 PROCEDURE UPDATE_DENORM_PARENT_ASSIGN_ID(
107 p_budget_version_id IN NUMBER
108 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
109 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
110 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
111
112 PROCEDURE INSERT_BULK_ROWS_RES (
113 p_project_id IN NUMBER
114 ,p_plan_version_id IN NUMBER
115 ,p_task_id_tbl IN l_task_id_tbl_typ
116 ,p_res_list_mem_id_tbl IN l_res_list_mem_id_tbl_typ
117 ,p_proj_raw_cost_tbl IN l_proj_raw_cost_tbl_typ
118 ,p_proj_burdened_cost_tbl IN l_proj_burd_cost_tbl_typ
119 ,p_proj_revenue_tbl IN l_proj_revenue_tbl_typ
120 ,p_projfunc_raw_cost_tbl IN l_projfunc_raw_cost_tbl_typ
121 ,p_projfunc_burd_cost_tbl IN l_projfunc_burd_cost_tbl_typ
122 ,p_projfunc_revenue_tbl IN l_projfunc_revenue_tbl_typ
123 ,p_quantity_tbl IN l_quantity_tbl_typ
124 ,p_unit_of_measure_tbl IN l_unit_of_measure_tbl_typ
125 ,p_track_as_labor_flag_tbl IN l_track_as_labor_flag_tbl_typ
126 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
127 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
128 ,x_msg_data OUT NOCOPY VARCHAR2 ); --File.Sql.39 bug 4440895
129
130 PROCEDURE REFRESH_PERIOD_DENORM(
131 p_budget_version_id IN NUMBER
132 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
133 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
134 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
135
136 PROCEDURE INSERT_MISSING_RES_PARENTS(
137 p_budget_version_id IN NUMBER
138 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
139 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
140 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
141
142 PROCEDURE ROLLUP_RES_ASSIGNMENT_AMOUNTS(
143 p_budget_version_id IN NUMBER
144 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
145 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
146 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
147
148 PROCEDURE INSERT_MISSING_PARENT_DENORM(
149 p_budget_version_id IN NUMBER
150 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
151 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
152 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
153
154 PROCEDURE ROLLUP_DENORM_AMOUNTS(
155 p_budget_version_id IN NUMBER
156 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
157 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
158 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
159
160 PROCEDURE DELETE_ELEMENT(
161 p_budget_version_id IN NUMBER
162 ,p_resource_assignment_id IN NUMBER
163 ,p_txn_currency_code IN VARCHAR2
164 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
165 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
166 ,x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
167
168 END PA_FP_ROLLUP_PKG;
169