[Home] [Help]
PACKAGE BODY: APPS.PA_ACCUM_SRW
Source
1 PACKAGE BODY PA_ACCUM_SRW AS
2 /* $Header: PAACSRWB.pls 120.1 2005/08/19 16:14:25 mwasowic noship $ */
3
4 -- Initialize PROCEDURE
5
6 PROCEDURE initialize IS
7 BEGIN
8 NULL;
9
10 EXCEPTION
11 WHEN OTHERS THEN
12 RAISE;
13 END initialize;
14
15 FUNCTION get_number_of_projects RETURN NUMBER IS
16 BEGIN
17 RETURN number_of_projects;
18 END get_number_of_projects;
19
20 FUNCTION get_number_of_budgets_pst RETURN NUMBER IS
21 BEGIN
22 RETURN number_of_budgets_pst;
23 END get_number_of_budgets_pst;
24
25 FUNCTION get_number_of_budgets_pre RETURN NUMBER IS
26 BEGIN
27 RETURN number_of_budgets_pre;
28 END get_number_of_budgets_pre;
29
30 -- This procedure gets the summary number from the fixed table and
31 -- puts them into PL/SQL table
32
33 PROCEDURE get_project_summary_numbers
34 (X_PROJECT_ACCUM_ID IN NUMBER,
35 X_PRE_POST_FLAG IN VARCHAR2,
36 X_TABLE_INDEX IN NUMBER,
37 X_ERR_STACK IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
38 X_ERR_STAGE IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
39 X_ERR_CODE IN OUT NOCOPY NUMBER) --File.Sql.39 bug 4440895
40 IS
41
42 CURSOR selsummary IS
43 SELECT
44 PROJECT_ID,
45 ACCUM_PERIOD,
46 RAW_COST_ITD,
47 RAW_COST_YTD,
48 RAW_COST_PP,
49 RAW_COST_PTD,
50 BILLABLE_RAW_COST_ITD,
51 BILLABLE_RAW_COST_YTD,
52 BILLABLE_RAW_COST_PP,
53 BILLABLE_RAW_COST_PTD,
54 BURDENED_COST_ITD,
55 BURDENED_COST_YTD,
56 BURDENED_COST_PP,
57 BURDENED_COST_PTD,
58 BILLABLE_BURDENED_COST_ITD,
59 BILLABLE_BURDENED_COST_YTD,
60 BILLABLE_BURDENED_COST_PP,
61 BILLABLE_BURDENED_COST_PTD,
62 QUANTITY_ITD,
63 QUANTITY_YTD,
64 QUANTITY_PP,
65 QUANTITY_PTD,
66 LABOR_HOURS_ITD,
67 LABOR_HOURS_YTD,
68 LABOR_HOURS_PP,
69 LABOR_HOURS_PTD,
70 BILLABLE_QUANTITY_ITD,
71 BILLABLE_QUANTITY_YTD,
72 BILLABLE_QUANTITY_PP,
73 BILLABLE_QUANTITY_PTD,
74 BILLABLE_LABOR_HOURS_ITD,
75 BILLABLE_LABOR_HOURS_YTD,
76 BILLABLE_LABOR_HOURS_PP,
77 BILLABLE_LABOR_HOURS_PTD,
78 REVENUE_ITD,
79 REVENUE_YTD,
80 REVENUE_PP,
81 REVENUE_PTD,
82 CMT_RAW_COST_ITD,
83 CMT_RAW_COST_YTD,
84 CMT_RAW_COST_PP,
85 CMT_RAW_COST_PTD,
86 CMT_BURDENED_COST_ITD,
87 CMT_BURDENED_COST_YTD,
88 CMT_BURDENED_COST_PP,
89 CMT_BURDENED_COST_PTD,
90 CMT_QUANTITY_ITD,
91 CMT_QUANTITY_YTD,
92 CMT_QUANTITY_PP,
93 CMT_QUANTITY_PTD
94 FROM
95 PA_PROJECT_ACCUM_HEADERS PAH,
96 PA_PROJECT_ACCUM_ACTUALS PAA,
97 PA_PROJECT_ACCUM_COMMITMENTS PAC
98 WHERE
99 PAH.PROJECT_ACCUM_ID = PAA.PROJECT_ACCUM_ID(+)
100 AND PAH.PROJECT_ACCUM_ID = PAC.PROJECT_ACCUM_ID(+)
101 AND PAH.PROJECT_ACCUM_ID = X_PROJECT_ACCUM_ID;
102
103 srec selsummary%ROWTYPE;
104 x_old_stack varchar2(1000);
105
106 BEGIN
107
108 x_old_stack := x_err_stack;
109 x_err_stack := x_err_stack|| '->get_project_summary_numbers';
110
111 pa_debug.debug(x_err_stack);
112
113 FOR srec IN selsummary LOOP
114
115 IF ( X_PRE_POST_FLAG = 'PRE' ) THEN
116
117 -- initialize the numbers before processing
118 PROJECT_ID(X_TABLE_INDEX) := SREC.PROJECT_ID;
119
120 ACCUM_PERIOD_PRE(X_TABLE_INDEX) := SREC.ACCUM_PERIOD;
121 RAW_COST_ITD_PRE(X_TABLE_INDEX) := SREC.RAW_COST_ITD;
122 RAW_COST_YTD_PRE(X_TABLE_INDEX) := SREC.RAW_COST_YTD;
123 RAW_COST_PP_PRE(X_TABLE_INDEX) := SREC.RAW_COST_PP;
124 RAW_COST_PTD_PRE(X_TABLE_INDEX) := SREC.RAW_COST_PTD;
125 BILLABLE_RAW_COST_ITD_PRE(X_TABLE_INDEX)
126 := SREC.BILLABLE_RAW_COST_ITD;
127 BILLABLE_RAW_COST_YTD_PRE(X_TABLE_INDEX)
128 := SREC.BILLABLE_RAW_COST_YTD;
129 BILLABLE_RAW_COST_PP_PRE(X_TABLE_INDEX)
130 := SREC.BILLABLE_RAW_COST_PP;
131 BILLABLE_RAW_COST_PTD_PRE(X_TABLE_INDEX)
132 := SREC.BILLABLE_RAW_COST_PTD;
133 BURDENED_COST_ITD_PRE(X_TABLE_INDEX) := SREC.BURDENED_COST_ITD;
134 BURDENED_COST_YTD_PRE(X_TABLE_INDEX) := SREC.BURDENED_COST_YTD;
135 BURDENED_COST_PP_PRE(X_TABLE_INDEX) := SREC.BURDENED_COST_PP;
136 BURDENED_COST_PTD_PRE(X_TABLE_INDEX) := SREC.BURDENED_COST_PTD;
137 BILLABLE_BURDENED_COST_ITD_PRE(X_TABLE_INDEX)
138 := SREC.BILLABLE_BURDENED_COST_ITD;
139 BILLABLE_BURDENED_COST_YTD_PRE(X_TABLE_INDEX)
140 := SREC.BILLABLE_BURDENED_COST_YTD;
141 BILLABLE_BURDENED_COST_PP_PRE(X_TABLE_INDEX)
142 := SREC.BILLABLE_BURDENED_COST_PP;
143 BILLABLE_BURDENED_COST_PTD_PRE(X_TABLE_INDEX)
144 := SREC.BILLABLE_BURDENED_COST_PTD;
145 QUANTITY_ITD_PRE(X_TABLE_INDEX) := SREC.QUANTITY_ITD;
146 QUANTITY_YTD_PRE(X_TABLE_INDEX) := SREC.QUANTITY_YTD;
147 QUANTITY_PP_PRE(X_TABLE_INDEX) := SREC. QUANTITY_PP;
148 QUANTITY_PTD_PRE(X_TABLE_INDEX) := SREC.QUANTITY_PTD;
149 LABOR_HOURS_ITD_PRE(X_TABLE_INDEX) := SREC.LABOR_HOURS_ITD;
150 LABOR_HOURS_YTD_PRE(X_TABLE_INDEX) := SREC.LABOR_HOURS_YTD;
151 LABOR_HOURS_PP_PRE(X_TABLE_INDEX) := SREC.LABOR_HOURS_PP;
152 LABOR_HOURS_PTD_PRE(X_TABLE_INDEX) := SREC.LABOR_HOURS_PTD;
153 BILLABLE_QUANTITY_ITD_PRE(X_TABLE_INDEX)
154 := SREC.BILLABLE_QUANTITY_ITD;
155 BILLABLE_QUANTITY_YTD_PRE(X_TABLE_INDEX)
156 := SREC.BILLABLE_QUANTITY_YTD;
157 BILLABLE_QUANTITY_PP_PRE(X_TABLE_INDEX)
158 := SREC.BILLABLE_QUANTITY_PP;
159 BILLABLE_QUANTITY_PTD_PRE(X_TABLE_INDEX)
160 := SREC.BILLABLE_QUANTITY_PTD;
161 BILLABLE_LABOR_HOURS_ITD_PRE(X_TABLE_INDEX)
162 := SREC.BILLABLE_LABOR_HOURS_ITD;
163 BILLABLE_LABOR_HOURS_YTD_PRE(X_TABLE_INDEX)
164 := SREC.BILLABLE_LABOR_HOURS_YTD;
165 BILLABLE_LABOR_HOURS_PP_PRE(X_TABLE_INDEX)
166 := SREC.BILLABLE_LABOR_HOURS_PP;
167 BILLABLE_LABOR_HOURS_PTD_PRE(X_TABLE_INDEX)
168 := SREC.BILLABLE_LABOR_HOURS_PTD;
169 REVENUE_ITD_PRE(X_TABLE_INDEX) := SREC.REVENUE_ITD;
170 REVENUE_YTD_PRE(X_TABLE_INDEX) := SREC.REVENUE_YTD;
171 REVENUE_PP_PRE(X_TABLE_INDEX) := SREC.REVENUE_PP;
172 REVENUE_PTD_PRE(X_TABLE_INDEX) := SREC.REVENUE_PTD;
173
174 -- Commitment figures
175
176 CMT_RAW_COST_ITD_PRE(X_TABLE_INDEX) := SREC.CMT_RAW_COST_ITD;
177 CMT_RAW_COST_YTD_PRE(X_TABLE_INDEX) := SREC.CMT_RAW_COST_YTD;
178 CMT_RAW_COST_PP_PRE(X_TABLE_INDEX) := SREC.CMT_RAW_COST_PP;
179 CMT_RAW_COST_PTD_PRE(X_TABLE_INDEX) := SREC.CMT_RAW_COST_PTD;
180 CMT_BURDENED_COST_ITD_PRE(X_TABLE_INDEX)
181 := SREC.CMT_BURDENED_COST_ITD;
182 CMT_BURDENED_COST_YTD_PRE(X_TABLE_INDEX)
183 := SREC.CMT_BURDENED_COST_YTD;
184 CMT_BURDENED_COST_PP_PRE(X_TABLE_INDEX)
185 := SREC.CMT_BURDENED_COST_PP;
186 CMT_BURDENED_COST_PTD_PRE(X_TABLE_INDEX)
187 := SREC.CMT_BURDENED_COST_PTD;
188 CMT_QUANTITY_ITD_PRE(X_TABLE_INDEX) := SREC.CMT_QUANTITY_ITD;
189 CMT_QUANTITY_YTD_PRE(X_TABLE_INDEX) := SREC.CMT_QUANTITY_YTD;
190 CMT_QUANTITY_PP_PRE(X_TABLE_INDEX) := SREC.CMT_QUANTITY_PP;
191 CMT_QUANTITY_PTD_PRE(X_TABLE_INDEX) := SREC.CMT_QUANTITY_PTD;
192
193 ELSE
194
195 ACCUM_PERIOD_PST(X_TABLE_INDEX) := SREC.ACCUM_PERIOD;
196 RAW_COST_ITD_PST(X_TABLE_INDEX) := SREC.RAW_COST_ITD;
197 RAW_COST_YTD_PST(X_TABLE_INDEX) := SREC.RAW_COST_YTD;
198 RAW_COST_PP_PST(X_TABLE_INDEX) := SREC.RAW_COST_PP;
199 RAW_COST_PTD_PST(X_TABLE_INDEX) := SREC.RAW_COST_PTD;
200 BILLABLE_RAW_COST_ITD_PST(X_TABLE_INDEX)
201 := SREC.BILLABLE_RAW_COST_ITD;
202 BILLABLE_RAW_COST_YTD_PST(X_TABLE_INDEX)
203 := SREC.BILLABLE_RAW_COST_YTD;
204 BILLABLE_RAW_COST_PP_PST(X_TABLE_INDEX)
205 := SREC.BILLABLE_RAW_COST_PP;
206 BILLABLE_RAW_COST_PTD_PST(X_TABLE_INDEX)
207 := SREC.BILLABLE_RAW_COST_PTD;
208 BURDENED_COST_ITD_PST(X_TABLE_INDEX) := SREC.BURDENED_COST_ITD;
209 BURDENED_COST_YTD_PST(X_TABLE_INDEX) := SREC.BURDENED_COST_YTD;
210 BURDENED_COST_PP_PST(X_TABLE_INDEX) := SREC.BURDENED_COST_PP;
211 BURDENED_COST_PTD_PST(X_TABLE_INDEX) := SREC.BURDENED_COST_PTD;
212 BILLABLE_BURDENED_COST_ITD_PST(X_TABLE_INDEX)
213 := SREC.BILLABLE_BURDENED_COST_ITD;
214 BILLABLE_BURDENED_COST_YTD_PST(X_TABLE_INDEX)
215 := SREC.BILLABLE_BURDENED_COST_YTD;
216 BILLABLE_BURDENED_COST_PP_PST(X_TABLE_INDEX)
217 := SREC.BILLABLE_BURDENED_COST_PP;
218 BILLABLE_BURDENED_COST_PTD_PST(X_TABLE_INDEX)
219 := SREC.BILLABLE_BURDENED_COST_PTD;
220 QUANTITY_ITD_PST(X_TABLE_INDEX) := SREC.QUANTITY_ITD;
221 QUANTITY_YTD_PST(X_TABLE_INDEX) := SREC.QUANTITY_YTD;
222 QUANTITY_PP_PST(X_TABLE_INDEX) := SREC.QUANTITY_PP;
223 QUANTITY_PTD_PST(X_TABLE_INDEX) := SREC.QUANTITY_PTD;
224 LABOR_HOURS_ITD_PST(X_TABLE_INDEX) := SREC.LABOR_HOURS_ITD;
225 LABOR_HOURS_YTD_PST(X_TABLE_INDEX) := SREC.LABOR_HOURS_YTD;
226 LABOR_HOURS_PP_PST(X_TABLE_INDEX) := SREC.LABOR_HOURS_PP;
227 LABOR_HOURS_PTD_PST(X_TABLE_INDEX) := SREC.LABOR_HOURS_PTD;
228 BILLABLE_QUANTITY_ITD_PST(X_TABLE_INDEX)
229 := SREC.BILLABLE_QUANTITY_ITD;
230 BILLABLE_QUANTITY_YTD_PST(X_TABLE_INDEX)
231 := SREC.BILLABLE_QUANTITY_YTD;
232 BILLABLE_QUANTITY_PP_PST(X_TABLE_INDEX)
233 := SREC.BILLABLE_QUANTITY_PP;
234 BILLABLE_QUANTITY_PTD_PST(X_TABLE_INDEX)
235 := SREC.BILLABLE_QUANTITY_PTD;
236 BILLABLE_LABOR_HOURS_ITD_PST(X_TABLE_INDEX)
237 := SREC.BILLABLE_LABOR_HOURS_ITD;
238 BILLABLE_LABOR_HOURS_YTD_PST(X_TABLE_INDEX)
239 := SREC.BILLABLE_LABOR_HOURS_YTD;
240 BILLABLE_LABOR_HOURS_PP_PST(X_TABLE_INDEX)
241 := SREC.BILLABLE_LABOR_HOURS_PP;
242 BILLABLE_LABOR_HOURS_PTD_PST(X_TABLE_INDEX)
243 := SREC.BILLABLE_LABOR_HOURS_PTD;
244 REVENUE_ITD_PST(X_TABLE_INDEX) := SREC.REVENUE_ITD;
245 REVENUE_YTD_PST(X_TABLE_INDEX) := SREC.REVENUE_YTD;
246 REVENUE_PP_PST(X_TABLE_INDEX) := SREC.REVENUE_PP;
247 REVENUE_PTD_PST(X_TABLE_INDEX) := SREC.REVENUE_PTD;
248
249 -- Commitment figures
250
251 CMT_RAW_COST_ITD_PST(X_TABLE_INDEX) := SREC.CMT_RAW_COST_ITD;
252 CMT_RAW_COST_YTD_PST(X_TABLE_INDEX) := SREC.CMT_RAW_COST_YTD;
253 CMT_RAW_COST_PP_PST(X_TABLE_INDEX) := SREC.CMT_RAW_COST_PP;
254 CMT_RAW_COST_PTD_PST(X_TABLE_INDEX) := SREC.CMT_RAW_COST_PTD;
255 CMT_BURDENED_COST_ITD_PST(X_TABLE_INDEX)
256 := SREC.CMT_BURDENED_COST_ITD;
257 CMT_BURDENED_COST_YTD_PST(X_TABLE_INDEX)
258 := SREC.CMT_BURDENED_COST_YTD;
259 CMT_BURDENED_COST_PP_PST(X_TABLE_INDEX)
260 := SREC.CMT_BURDENED_COST_PP;
261 CMT_BURDENED_COST_PTD_PST(X_TABLE_INDEX)
262 := SREC.CMT_BURDENED_COST_PTD;
263 CMT_QUANTITY_ITD_PST(X_TABLE_INDEX) := SREC.CMT_QUANTITY_ITD;
264 CMT_QUANTITY_YTD_PST(X_TABLE_INDEX) := SREC.CMT_QUANTITY_YTD;
265 CMT_QUANTITY_PP_PST(X_TABLE_INDEX) := SREC.CMT_QUANTITY_PP;
266 CMT_QUANTITY_PTD_PST(X_TABLE_INDEX) := SREC.CMT_QUANTITY_PTD;
267
268 END IF;
269
270 END LOOP;
271
272 x_err_stack := x_old_stack;
273
274 EXCEPTION
275
276 WHEN OTHERS THEN
277 RAISE;
278 END get_project_summary_numbers;
279
280 PROCEDURE report_project_summary_numbers
281 (X_TABLE_INDEX IN NUMBER,
282 X_PROJECT_ID OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
283 X_ACCUM_PERIOD_B OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
284 X_RAW_COST_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
285 X_RAW_COST_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
286 X_RAW_COST_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
287 X_RAW_COST_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
288 X_BILLABLE_RAW_COST_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
289 X_BILLABLE_RAW_COST_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
290 X_BILLABLE_RAW_COST_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
291 X_BILLABLE_RAW_COST_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
292 X_BURDENED_COST_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
293 X_BURDENED_COST_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
294 X_BURDENED_COST_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
295 X_BURDENED_COST_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
296 X_BILLABLE_BURDENED_COST_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
297 X_BILLABLE_BURDENED_COST_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
298 X_BILLABLE_BURDENED_COST_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
299 X_BILLABLE_BURDENED_COST_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
300 X_QUANTITY_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
301 X_QUANTITY_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
302 X_QUANTITY_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
306 X_LABOR_HOURS_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
303 X_QUANTITY_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
304 X_LABOR_HOURS_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
305 X_LABOR_HOURS_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
307 X_LABOR_HOURS_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
308 X_BILLABLE_QUANTITY_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
309 X_BILLABLE_QUANTITY_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
310 X_BILLABLE_QUANTITY_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
311 X_BILLABLE_QUANTITY_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
312 X_BILLABLE_LABOR_HOURS_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
313 X_BILLABLE_LABOR_HOURS_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
314 X_BILLABLE_LABOR_HOURS_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
315 X_BILLABLE_LABOR_HOURS_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
316 X_REVENUE_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
317 X_REVENUE_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
318 X_REVENUE_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
319 X_REVENUE_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
320 X_CMT_RAW_COST_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
321 X_CMT_RAW_COST_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
322 X_CMT_RAW_COST_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
323 X_CMT_RAW_COST_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
324 X_CMT_BURDENED_COST_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
325 X_CMT_BURDENED_COST_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
326 X_CMT_BURDENED_COST_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
327 X_CMT_BURDENED_COST_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
328 X_CMT_QUANTITY_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
329 X_CMT_QUANTITY_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
330 X_CMT_QUANTITY_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
331 X_CMT_QUANTITY_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
332 X_ACCUM_PERIOD_A OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
333 X_RAW_COST_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
334 X_RAW_COST_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
335 X_RAW_COST_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
336 X_RAW_COST_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
337 X_BILLABLE_RAW_COST_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
338 X_BILLABLE_RAW_COST_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
339 X_BILLABLE_RAW_COST_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
340 X_BILLABLE_RAW_COST_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
341 X_BURDENED_COST_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
342 X_BURDENED_COST_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
343 X_BURDENED_COST_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
344 X_BURDENED_COST_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
345 X_BILLABLE_BURDENED_COST_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
346 X_BILLABLE_BURDENED_COST_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
347 X_BILLABLE_BURDENED_COST_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
348 X_BILLABLE_BURDENED_COST_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
349 X_QUANTITY_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
350 X_QUANTITY_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
351 X_QUANTITY_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
352 X_QUANTITY_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
353 X_LABOR_HOURS_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
354 X_LABOR_HOURS_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
355 X_LABOR_HOURS_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
356 X_LABOR_HOURS_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
357 X_BILLABLE_QUANTITY_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
358 X_BILLABLE_QUANTITY_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
359 X_BILLABLE_QUANTITY_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
360 X_BILLABLE_QUANTITY_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
361 X_BILLABLE_LABOR_HOURS_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
362 X_BILLABLE_LABOR_HOURS_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
363 X_BILLABLE_LABOR_HOURS_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
364 X_BILLABLE_LABOR_HOURS_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
365 X_REVENUE_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
366 X_REVENUE_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
367 X_REVENUE_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
371 X_CMT_RAW_COST_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
368 X_REVENUE_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
369 X_CMT_RAW_COST_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
370 X_CMT_RAW_COST_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
372 X_CMT_RAW_COST_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
373 X_CMT_BURDENED_COST_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
374 X_CMT_BURDENED_COST_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
375 X_CMT_BURDENED_COST_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
376 X_CMT_BURDENED_COST_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
377 X_CMT_QUANTITY_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
378 X_CMT_QUANTITY_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
379 X_CMT_QUANTITY_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
380 X_CMT_QUANTITY_PTD_A OUT NOCOPY NUMBER) --File.Sql.39 bug 4440895
381 IS
382 BEGIN
383 X_PROJECT_ID := PROJECT_ID(X_TABLE_INDEX);
384 X_ACCUM_PERIOD_B := ACCUM_PERIOD_PRE(X_TABLE_INDEX);
385 X_RAW_COST_ITD_B := RAW_COST_ITD_PRE(X_TABLE_INDEX);
386 X_RAW_COST_YTD_B := RAW_COST_YTD_PRE(X_TABLE_INDEX);
387 X_RAW_COST_PP_B := RAW_COST_PP_PRE(X_TABLE_INDEX);
388 X_RAW_COST_PTD_B := RAW_COST_PTD_PRE(X_TABLE_INDEX);
389 X_BILLABLE_RAW_COST_ITD_B := BILLABLE_RAW_COST_ITD_PRE(X_TABLE_INDEX);
390 X_BILLABLE_RAW_COST_YTD_B := BILLABLE_RAW_COST_YTD_PRE(X_TABLE_INDEX);
391 X_BILLABLE_RAW_COST_PP_B := BILLABLE_RAW_COST_PP_PRE(X_TABLE_INDEX);
392 X_BILLABLE_RAW_COST_PTD_B := BILLABLE_RAW_COST_PTD_PRE(X_TABLE_INDEX);
393 X_BURDENED_COST_ITD_B := BURDENED_COST_ITD_PRE(X_TABLE_INDEX);
394 X_BURDENED_COST_YTD_B := BURDENED_COST_YTD_PRE(X_TABLE_INDEX);
395 X_BURDENED_COST_PP_B := BURDENED_COST_PP_PRE(X_TABLE_INDEX);
396 X_BURDENED_COST_PTD_B := BURDENED_COST_PTD_PRE(X_TABLE_INDEX);
397 X_BILLABLE_BURDENED_COST_ITD_B := BILLABLE_BURDENED_COST_ITD_PRE(X_TABLE_INDEX);
398 X_BILLABLE_BURDENED_COST_YTD_B := BILLABLE_BURDENED_COST_YTD_PRE(X_TABLE_INDEX);
399 X_BILLABLE_BURDENED_COST_PP_B := BILLABLE_BURDENED_COST_PP_PRE(X_TABLE_INDEX);
400 X_BILLABLE_BURDENED_COST_PTD_B := BILLABLE_BURDENED_COST_PTD_PRE(X_TABLE_INDEX);
401 X_QUANTITY_ITD_B := QUANTITY_ITD_PRE(X_TABLE_INDEX);
402 X_QUANTITY_YTD_B := QUANTITY_YTD_PRE(X_TABLE_INDEX);
403 X_QUANTITY_PP_B := QUANTITY_PP_PRE(X_TABLE_INDEX);
404 X_QUANTITY_PTD_B := QUANTITY_PTD_PRE(X_TABLE_INDEX);
405 X_LABOR_HOURS_ITD_B := LABOR_HOURS_ITD_PRE(X_TABLE_INDEX);
406 X_LABOR_HOURS_YTD_B := LABOR_HOURS_YTD_PRE(X_TABLE_INDEX);
407 X_LABOR_HOURS_PP_B := LABOR_HOURS_PP_PRE(X_TABLE_INDEX);
408 X_LABOR_HOURS_PTD_B := LABOR_HOURS_PTD_PRE(X_TABLE_INDEX);
409 X_BILLABLE_QUANTITY_ITD_B := BILLABLE_QUANTITY_ITD_PRE(X_TABLE_INDEX);
410 X_BILLABLE_QUANTITY_YTD_B := BILLABLE_QUANTITY_YTD_PRE(X_TABLE_INDEX);
411 X_BILLABLE_QUANTITY_PP_B := BILLABLE_QUANTITY_PP_PRE(X_TABLE_INDEX);
412 X_BILLABLE_QUANTITY_PTD_B := BILLABLE_QUANTITY_PTD_PRE(X_TABLE_INDEX);
413 X_BILLABLE_LABOR_HOURS_ITD_B := BILLABLE_LABOR_HOURS_ITD_PRE(X_TABLE_INDEX);
414 X_BILLABLE_LABOR_HOURS_YTD_B := BILLABLE_LABOR_HOURS_YTD_PRE(X_TABLE_INDEX);
415 X_BILLABLE_LABOR_HOURS_PP_B := BILLABLE_LABOR_HOURS_PP_PRE(X_TABLE_INDEX);
416 X_BILLABLE_LABOR_HOURS_PTD_B := BILLABLE_LABOR_HOURS_PTD_PRE(X_TABLE_INDEX);
417 X_REVENUE_ITD_B := REVENUE_ITD_PRE(X_TABLE_INDEX);
418 X_REVENUE_YTD_B := REVENUE_YTD_PRE(X_TABLE_INDEX);
419 X_REVENUE_PP_B := REVENUE_PP_PRE(X_TABLE_INDEX);
420 X_REVENUE_PTD_B := REVENUE_PTD_PRE(X_TABLE_INDEX);
421 X_CMT_RAW_COST_ITD_B := CMT_RAW_COST_ITD_PRE(X_TABLE_INDEX);
422 X_CMT_RAW_COST_YTD_B := CMT_RAW_COST_YTD_PRE(X_TABLE_INDEX);
423 X_CMT_RAW_COST_PP_B := CMT_RAW_COST_PP_PRE(X_TABLE_INDEX);
424 X_CMT_RAW_COST_PTD_B := CMT_RAW_COST_PTD_PRE(X_TABLE_INDEX);
425 X_CMT_BURDENED_COST_ITD_B := CMT_BURDENED_COST_ITD_PRE(X_TABLE_INDEX);
426 X_CMT_BURDENED_COST_YTD_B := CMT_BURDENED_COST_YTD_PRE(X_TABLE_INDEX);
427 X_CMT_BURDENED_COST_PP_B := CMT_BURDENED_COST_PP_PRE(X_TABLE_INDEX);
428 X_CMT_BURDENED_COST_PTD_B := CMT_BURDENED_COST_PTD_PRE(X_TABLE_INDEX);
429 X_CMT_QUANTITY_ITD_B := CMT_QUANTITY_ITD_PRE(X_TABLE_INDEX);
430 X_CMT_QUANTITY_YTD_B := CMT_QUANTITY_YTD_PRE(X_TABLE_INDEX);
431 X_CMT_QUANTITY_PP_B := CMT_QUANTITY_PP_PRE(X_TABLE_INDEX);
432 X_CMT_QUANTITY_PTD_B := CMT_QUANTITY_PTD_PRE(X_TABLE_INDEX);
433 X_ACCUM_PERIOD_A := ACCUM_PERIOD_PST(X_TABLE_INDEX);
434 X_RAW_COST_ITD_A := RAW_COST_ITD_PST(X_TABLE_INDEX);
435 X_RAW_COST_YTD_A := RAW_COST_YTD_PST(X_TABLE_INDEX);
436 X_RAW_COST_PP_A := RAW_COST_PP_PST(X_TABLE_INDEX);
437 X_RAW_COST_PTD_A := RAW_COST_PTD_PST(X_TABLE_INDEX);
438 X_BILLABLE_RAW_COST_ITD_A := BILLABLE_RAW_COST_ITD_PST(X_TABLE_INDEX);
439 X_BILLABLE_RAW_COST_YTD_A := BILLABLE_RAW_COST_YTD_PST(X_TABLE_INDEX);
440 X_BILLABLE_RAW_COST_PP_A := BILLABLE_RAW_COST_PP_PST(X_TABLE_INDEX);
441 X_BILLABLE_RAW_COST_PTD_A := BILLABLE_RAW_COST_PTD_PST(X_TABLE_INDEX);
442 X_BURDENED_COST_ITD_A := BURDENED_COST_ITD_PST(X_TABLE_INDEX);
443 X_BURDENED_COST_YTD_A := BURDENED_COST_YTD_PST(X_TABLE_INDEX);
444 X_BURDENED_COST_PP_A := BURDENED_COST_PP_PST(X_TABLE_INDEX);
445 X_BURDENED_COST_PTD_A := BURDENED_COST_PTD_PST(X_TABLE_INDEX);
449 X_BILLABLE_BURDENED_COST_PTD_A := BILLABLE_BURDENED_COST_PTD_PST(X_TABLE_INDEX);
446 X_BILLABLE_BURDENED_COST_ITD_A := BILLABLE_BURDENED_COST_ITD_PST(X_TABLE_INDEX);
447 X_BILLABLE_BURDENED_COST_YTD_A := BILLABLE_BURDENED_COST_YTD_PST(X_TABLE_INDEX);
448 X_BILLABLE_BURDENED_COST_PP_A := BILLABLE_BURDENED_COST_PP_PST(X_TABLE_INDEX);
450 X_QUANTITY_ITD_A := QUANTITY_ITD_PST(X_TABLE_INDEX);
451 X_QUANTITY_YTD_A := QUANTITY_YTD_PST(X_TABLE_INDEX);
452 X_QUANTITY_PP_A := QUANTITY_PP_PST(X_TABLE_INDEX);
453 X_QUANTITY_PTD_A := QUANTITY_PTD_PST(X_TABLE_INDEX);
454 X_LABOR_HOURS_ITD_A := LABOR_HOURS_ITD_PST(X_TABLE_INDEX);
455 X_LABOR_HOURS_YTD_A := LABOR_HOURS_YTD_PST(X_TABLE_INDEX);
456 X_LABOR_HOURS_PP_A := LABOR_HOURS_PP_PST(X_TABLE_INDEX);
457 X_LABOR_HOURS_PTD_A := LABOR_HOURS_PTD_PST(X_TABLE_INDEX);
458 X_BILLABLE_QUANTITY_ITD_A := BILLABLE_QUANTITY_ITD_PST(X_TABLE_INDEX);
459 X_BILLABLE_QUANTITY_YTD_A := BILLABLE_QUANTITY_YTD_PST(X_TABLE_INDEX);
460 X_BILLABLE_QUANTITY_PP_A := BILLABLE_QUANTITY_PP_PST(X_TABLE_INDEX);
461 X_BILLABLE_QUANTITY_PTD_A := BILLABLE_QUANTITY_PTD_PST(X_TABLE_INDEX);
462 X_BILLABLE_LABOR_HOURS_ITD_A := BILLABLE_LABOR_HOURS_ITD_PST(X_TABLE_INDEX);
463 X_BILLABLE_LABOR_HOURS_YTD_A := BILLABLE_LABOR_HOURS_YTD_PST(X_TABLE_INDEX);
464 X_BILLABLE_LABOR_HOURS_PP_A := BILLABLE_LABOR_HOURS_PP_PST(X_TABLE_INDEX);
465 X_BILLABLE_LABOR_HOURS_PTD_A := BILLABLE_LABOR_HOURS_PTD_PST(X_TABLE_INDEX);
466 X_REVENUE_ITD_A := REVENUE_ITD_PST(X_TABLE_INDEX);
467 X_REVENUE_YTD_A := REVENUE_YTD_PST(X_TABLE_INDEX);
468 X_REVENUE_PP_A := REVENUE_PP_PST(X_TABLE_INDEX);
469 X_REVENUE_PTD_A := REVENUE_PTD_PST(X_TABLE_INDEX);
470 X_CMT_RAW_COST_ITD_A := CMT_RAW_COST_ITD_PST(X_TABLE_INDEX);
471 X_CMT_RAW_COST_YTD_A := CMT_RAW_COST_YTD_PST(X_TABLE_INDEX);
472 X_CMT_RAW_COST_PP_A := CMT_RAW_COST_PP_PST(X_TABLE_INDEX);
473 X_CMT_RAW_COST_PTD_A := CMT_RAW_COST_PTD_PST(X_TABLE_INDEX);
474 X_CMT_BURDENED_COST_ITD_A := CMT_BURDENED_COST_ITD_PST(X_TABLE_INDEX);
475 X_CMT_BURDENED_COST_YTD_A := CMT_BURDENED_COST_YTD_PST(X_TABLE_INDEX);
476 X_CMT_BURDENED_COST_PP_A := CMT_BURDENED_COST_PP_PST(X_TABLE_INDEX);
477 X_CMT_BURDENED_COST_PTD_A := CMT_BURDENED_COST_PTD_PST(X_TABLE_INDEX);
478 X_CMT_QUANTITY_ITD_A := CMT_QUANTITY_ITD_PST(X_TABLE_INDEX);
479 X_CMT_QUANTITY_YTD_A := CMT_QUANTITY_YTD_PST(X_TABLE_INDEX);
480 X_CMT_QUANTITY_PP_A := CMT_QUANTITY_PP_PST(X_TABLE_INDEX);
481 X_CMT_QUANTITY_PTD_A := CMT_QUANTITY_PTD_PST(X_TABLE_INDEX);
482
483 EXCEPTION
484 WHEN OTHERS THEN
485 RAISE;
486 END report_project_summary_numbers;
487
488 -- Get budgets figures accumulation
489
490 PROCEDURE get_project_budget_numbers
491 (X_PROJECT_ACCUM_ID IN NUMBER,
492 X_PRE_POST_FLAG IN VARCHAR2,
493 X_ERR_STACK IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
494 X_ERR_STAGE IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
495 X_ERR_CODE IN OUT NOCOPY NUMBER) --File.Sql.39 bug 4440895
496 IS
497 CURSOR selbudgets IS
498 SELECT
499 PROJECT_ID,
500 BUDGET_TYPE_CODE,
501 BASE_RAW_COST_ITD,
502 BASE_RAW_COST_YTD,
503 BASE_RAW_COST_PP,
504 BASE_RAW_COST_PTD,
505 BASE_BURDENED_COST_ITD,
506 BASE_BURDENED_COST_YTD,
507 BASE_BURDENED_COST_PP,
508 BASE_BURDENED_COST_PTD,
509 ORIG_RAW_COST_ITD,
510 ORIG_RAW_COST_YTD,
511 ORIG_RAW_COST_PP,
512 ORIG_RAW_COST_PTD,
513 ORIG_BURDENED_COST_ITD,
514 ORIG_BURDENED_COST_YTD,
515 ORIG_BURDENED_COST_PP,
516 ORIG_BURDENED_COST_PTD,
517 BASE_REVENUE_ITD,
518 BASE_REVENUE_YTD,
519 BASE_REVENUE_PP,
520 BASE_REVENUE_PTD,
521 ORIG_REVENUE_ITD,
522 ORIG_REVENUE_YTD,
523 ORIG_REVENUE_PP,
524 ORIG_REVENUE_PTD,
525 ORIG_LABOR_HOURS_ITD,
526 ORIG_LABOR_HOURS_YTD,
527 ORIG_LABOR_HOURS_PP,
528 ORIG_LABOR_HOURS_PTD,
529 BASE_LABOR_HOURS_ITD,
530 BASE_LABOR_HOURS_YTD,
531 BASE_LABOR_HOURS_PP,
532 BASE_LABOR_HOURS_PTD,
533 ORIG_QUANTITY_YTD,
534 ORIG_QUANTITY_ITD,
535 ORIG_QUANTITY_PP,
536 ORIG_QUANTITY_PTD,
537 BASE_QUANTITY_YTD,
538 BASE_QUANTITY_ITD,
539 BASE_QUANTITY_PP,
540 BASE_QUANTITY_PTD,
541 ORIG_LABOR_HOURS_TOT,
542 BASE_LABOR_HOURS_TOT,
543 ORIG_QUANTITY_TOT,
544 BASE_QUANTITY_TOT,
545 BASE_RAW_COST_TOT,
546 BASE_BURDENED_COST_TOT,
547 ORIG_RAW_COST_TOT,
548 ORIG_BURDENED_COST_TOT,
549 BASE_REVENUE_TOT,
550 ORIG_REVENUE_TOT
551 FROM
552 PA_PROJECT_ACCUM_HEADERS PAH,
553 PA_PROJECT_ACCUM_BUDGETS PAB
554 WHERE
555 PAH.PROJECT_ACCUM_ID = PAB.PROJECT_ACCUM_ID -- No outer Join
556 and pab.fin_plan_type_id is null
557 AND PAH.PROJECT_ACCUM_ID = X_PROJECT_ACCUM_ID;
558
559 srec selbudgets%ROWTYPE;
560 x_old_stack varchar2(1000);
561
562 BEGIN
563
564 x_old_stack := x_err_stack;
568
565 x_err_stack := x_err_stack|| '->get_project_budget_numbers';
566
567 pa_debug.debug(x_err_stack);
569 FOR srec IN selbudgets LOOP
570 IF ( X_PRE_POST_FLAG = 'PRE' ) THEN
571
572 NUMBER_OF_BUDGETS_PRE := NUMBER_OF_BUDGETS_PRE + 1;
573
574 PROJECT_ID_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.PROJECT_ID;
575 BUDGET_TYPE_CODE_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BUDGET_TYPE_CODE;
576 BASE_RAW_COST_ITD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_RAW_COST_ITD;
577 BASE_RAW_COST_YTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_RAW_COST_YTD;
578 BASE_RAW_COST_PP_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_RAW_COST_PP;
579 BASE_RAW_COST_PTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_RAW_COST_PTD;
580 BASE_BURDENED_COST_ITD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_BURDENED_COST_ITD;
581 BASE_BURDENED_COST_YTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_BURDENED_COST_YTD;
582 BASE_BURDENED_COST_PP_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_BURDENED_COST_PP;
583 BASE_BURDENED_COST_PTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_BURDENED_COST_PTD;
584 ORIG_RAW_COST_ITD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_RAW_COST_ITD;
585 ORIG_RAW_COST_YTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_RAW_COST_YTD;
586 ORIG_RAW_COST_PP_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_RAW_COST_PP;
587 ORIG_RAW_COST_PTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_RAW_COST_PTD;
588 ORIG_BURDENED_COST_ITD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_BURDENED_COST_ITD;
589 ORIG_BURDENED_COST_YTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_BURDENED_COST_YTD;
590 ORIG_BURDENED_COST_PP_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_BURDENED_COST_PP;
591 ORIG_BURDENED_COST_PTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_BURDENED_COST_PTD;
592 BASE_REVENUE_ITD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_REVENUE_ITD;
593 BASE_REVENUE_YTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_REVENUE_YTD;
594 BASE_REVENUE_PP_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_REVENUE_PP;
595 BASE_REVENUE_PTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_REVENUE_PTD;
596 ORIG_REVENUE_ITD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_REVENUE_ITD;
597 ORIG_REVENUE_YTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_REVENUE_YTD;
598 ORIG_REVENUE_PP_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_REVENUE_PP;
599 ORIG_REVENUE_PTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_REVENUE_PTD;
600 ORIG_LABOR_HOURS_ITD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_LABOR_HOURS_ITD;
601 ORIG_LABOR_HOURS_YTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_LABOR_HOURS_YTD;
602 ORIG_LABOR_HOURS_PP_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_LABOR_HOURS_PP;
603 ORIG_LABOR_HOURS_PTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_LABOR_HOURS_PTD;
604 BASE_LABOR_HOURS_ITD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_LABOR_HOURS_ITD;
605 BASE_LABOR_HOURS_YTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_LABOR_HOURS_YTD;
606 BASE_LABOR_HOURS_PP_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_LABOR_HOURS_PP;
607 BASE_LABOR_HOURS_PTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_LABOR_HOURS_PTD;
608 ORIG_QUANTITY_YTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_QUANTITY_YTD;
609 ORIG_QUANTITY_ITD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_QUANTITY_ITD;
610 ORIG_QUANTITY_PP_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_QUANTITY_PP;
611 ORIG_QUANTITY_PTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_QUANTITY_PTD;
612 BASE_QUANTITY_YTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_QUANTITY_YTD;
613 BASE_QUANTITY_ITD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_QUANTITY_ITD;
614 BASE_QUANTITY_PP_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_QUANTITY_PP;
615 BASE_QUANTITY_PTD_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_QUANTITY_PTD;
616 ORIG_LABOR_HOURS_TOT_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_LABOR_HOURS_TOT;
617 BASE_LABOR_HOURS_TOT_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_LABOR_HOURS_TOT;
618 ORIG_QUANTITY_TOT_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_QUANTITY_TOT;
619 BASE_QUANTITY_TOT_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_QUANTITY_TOT;
620 BASE_RAW_COST_TOT_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_RAW_COST_TOT;
621 BASE_BURDENED_COST_TOT_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_BURDENED_COST_TOT;
622 ORIG_RAW_COST_TOT_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_RAW_COST_TOT;
623 ORIG_BURDENED_COST_TOT_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_BURDENED_COST_TOT;
624 BASE_REVENUE_TOT_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.BASE_REVENUE_TOT;
625 ORIG_REVENUE_TOT_PRE(NUMBER_OF_BUDGETS_PRE) := SREC.ORIG_REVENUE_TOT;
626
627 ELSE
628 NUMBER_OF_BUDGETS_PST := NUMBER_OF_BUDGETS_PST + 1;
629
630 PROJECT_ID_PST(NUMBER_OF_BUDGETS_PST) := SREC.PROJECT_ID;
631 BUDGET_TYPE_CODE_PST(NUMBER_OF_BUDGETS_PST) := SREC.BUDGET_TYPE_CODE;
632 BASE_RAW_COST_ITD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_RAW_COST_ITD;
633 BASE_RAW_COST_YTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_RAW_COST_YTD;
634 BASE_RAW_COST_PP_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_RAW_COST_PP;
635 BASE_RAW_COST_PTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_RAW_COST_PTD;
636 BASE_BURDENED_COST_ITD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_BURDENED_COST_ITD;
637 BASE_BURDENED_COST_YTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_BURDENED_COST_YTD;
638 BASE_BURDENED_COST_PP_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_BURDENED_COST_PP;
639 BASE_BURDENED_COST_PTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_BURDENED_COST_PTD;
643 ORIG_RAW_COST_PTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_RAW_COST_PTD;
640 ORIG_RAW_COST_ITD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_RAW_COST_ITD;
641 ORIG_RAW_COST_YTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_RAW_COST_YTD;
642 ORIG_RAW_COST_PP_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_RAW_COST_PP;
644 ORIG_BURDENED_COST_ITD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_BURDENED_COST_ITD;
645 ORIG_BURDENED_COST_YTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_BURDENED_COST_YTD;
646 ORIG_BURDENED_COST_PP_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_BURDENED_COST_PP;
647 ORIG_BURDENED_COST_PTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_BURDENED_COST_PTD;
648 BASE_REVENUE_ITD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_REVENUE_ITD;
649 BASE_REVENUE_YTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_REVENUE_YTD;
650 BASE_REVENUE_PP_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_REVENUE_PP;
651 BASE_REVENUE_PTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_REVENUE_PTD;
652 ORIG_REVENUE_ITD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_REVENUE_ITD;
653 ORIG_REVENUE_YTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_REVENUE_YTD;
654 ORIG_REVENUE_PP_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_REVENUE_PP;
655 ORIG_REVENUE_PTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_REVENUE_PTD;
656 ORIG_LABOR_HOURS_ITD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_LABOR_HOURS_ITD;
657 ORIG_LABOR_HOURS_YTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_LABOR_HOURS_YTD;
658 ORIG_LABOR_HOURS_PP_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_LABOR_HOURS_PP;
659 ORIG_LABOR_HOURS_PTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_LABOR_HOURS_PTD;
660 BASE_LABOR_HOURS_ITD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_LABOR_HOURS_ITD;
661 BASE_LABOR_HOURS_YTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_LABOR_HOURS_YTD;
662 BASE_LABOR_HOURS_PP_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_LABOR_HOURS_PP;
663 BASE_LABOR_HOURS_PTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_LABOR_HOURS_PTD;
664 ORIG_QUANTITY_YTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_QUANTITY_YTD;
665 ORIG_QUANTITY_ITD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_QUANTITY_ITD;
666 ORIG_QUANTITY_PP_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_QUANTITY_PP;
667 ORIG_QUANTITY_PTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_QUANTITY_PTD;
668 BASE_QUANTITY_YTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_QUANTITY_YTD;
669 BASE_QUANTITY_ITD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_QUANTITY_ITD;
670 BASE_QUANTITY_PP_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_QUANTITY_PP;
671 BASE_QUANTITY_PTD_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_QUANTITY_PTD;
672 ORIG_LABOR_HOURS_TOT_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_LABOR_HOURS_TOT;
673 BASE_LABOR_HOURS_TOT_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_LABOR_HOURS_TOT;
674 ORIG_QUANTITY_TOT_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_QUANTITY_TOT;
675 BASE_QUANTITY_TOT_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_QUANTITY_TOT;
676 BASE_RAW_COST_TOT_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_RAW_COST_TOT;
677 BASE_BURDENED_COST_TOT_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_BURDENED_COST_TOT;
678 ORIG_RAW_COST_TOT_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_RAW_COST_TOT;
679 ORIG_BURDENED_COST_TOT_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_BURDENED_COST_TOT;
680 BASE_REVENUE_TOT_PST(NUMBER_OF_BUDGETS_PST) := SREC.BASE_REVENUE_TOT;
681 ORIG_REVENUE_TOT_PST(NUMBER_OF_BUDGETS_PST) := SREC.ORIG_REVENUE_TOT;
682
683 END IF;
684
685 END LOOP;
686
687 x_err_stack := x_old_stack;
688
689 EXCEPTION
690 WHEN OTHERS THEN
691 RAISE;
692 END get_project_budget_numbers;
693
694 -- procedure for reporting the budget numbers from the PL/SQL table
695
696 PROCEDURE report_project_budget_numbers
697 (X_TABLE_INDEX IN NUMBER,
698 X_PROJECT_ID OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
699 X_BUDGET_TYPE_CODE OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
700 X_BASE_RAW_COST_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
701 X_BASE_RAW_COST_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
702 X_BASE_RAW_COST_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
703 X_BASE_RAW_COST_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
704 X_BASE_BURDENED_COST_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
705 X_BASE_BURDENED_COST_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
706 X_BASE_BURDENED_COST_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
707 X_BASE_BURDENED_COST_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
708 X_ORIG_RAW_COST_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
709 X_ORIG_RAW_COST_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
710 X_ORIG_RAW_COST_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
711 X_ORIG_RAW_COST_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
712 X_ORIG_BURDENED_COST_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
713 X_ORIG_BURDENED_COST_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
714 X_ORIG_BURDENED_COST_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
715 X_ORIG_BURDENED_COST_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
716 X_BASE_REVENUE_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
717 X_BASE_REVENUE_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
718 X_BASE_REVENUE_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
719 X_BASE_REVENUE_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
720 X_ORIG_REVENUE_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
724 X_ORIG_LABOR_HOURS_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
721 X_ORIG_REVENUE_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
722 X_ORIG_REVENUE_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
723 X_ORIG_REVENUE_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
725 X_ORIG_LABOR_HOURS_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
726 X_ORIG_LABOR_HOURS_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
727 X_ORIG_LABOR_HOURS_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
728 X_BASE_LABOR_HOURS_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
729 X_BASE_LABOR_HOURS_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
730 X_BASE_LABOR_HOURS_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
731 X_BASE_LABOR_HOURS_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
732 X_ORIG_QUANTITY_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
733 X_ORIG_QUANTITY_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
734 X_ORIG_QUANTITY_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
735 X_ORIG_QUANTITY_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
736 X_BASE_QUANTITY_YTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
737 X_BASE_QUANTITY_ITD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
738 X_BASE_QUANTITY_PP_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
739 X_BASE_QUANTITY_PTD_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
740 X_ORIG_LABOR_HOURS_TOT_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
741 X_BASE_LABOR_HOURS_TOT_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
742 X_ORIG_QUANTITY_TOT_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
743 X_BASE_QUANTITY_TOT_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
744 X_BASE_RAW_COST_TOT_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
745 X_BASE_BURDENED_COST_TOT_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
746 X_ORIG_RAW_COST_TOT_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
747 X_ORIG_BURDENED_COST_TOT_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
748 X_BASE_REVENUE_TOT_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
749 X_ORIG_REVENUE_TOT_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
750 X_BASE_RAW_COST_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
751 X_BASE_RAW_COST_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
752 X_BASE_RAW_COST_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
753 X_BASE_RAW_COST_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
754 X_BASE_BURDENED_COST_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
755 X_BASE_BURDENED_COST_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
756 X_BASE_BURDENED_COST_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
757 X_BASE_BURDENED_COST_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
758 X_ORIG_RAW_COST_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
759 X_ORIG_RAW_COST_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
760 X_ORIG_RAW_COST_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
761 X_ORIG_RAW_COST_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
762 X_ORIG_BURDENED_COST_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
763 X_ORIG_BURDENED_COST_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
764 X_ORIG_BURDENED_COST_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
765 X_ORIG_BURDENED_COST_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
766 X_BASE_REVENUE_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
767 X_BASE_REVENUE_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
768 X_BASE_REVENUE_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
769 X_BASE_REVENUE_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
770 X_ORIG_REVENUE_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
771 X_ORIG_REVENUE_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
772 X_ORIG_REVENUE_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
773 X_ORIG_REVENUE_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
774 X_ORIG_LABOR_HOURS_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
775 X_ORIG_LABOR_HOURS_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
776 X_ORIG_LABOR_HOURS_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
777 X_ORIG_LABOR_HOURS_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
778 X_BASE_LABOR_HOURS_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
779 X_BASE_LABOR_HOURS_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
780 X_BASE_LABOR_HOURS_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
781 X_BASE_LABOR_HOURS_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
782 X_ORIG_QUANTITY_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
783 X_ORIG_QUANTITY_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
784 X_ORIG_QUANTITY_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
785 X_ORIG_QUANTITY_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
786 X_BASE_QUANTITY_YTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
787 X_BASE_QUANTITY_ITD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
788 X_BASE_QUANTITY_PP_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
789 X_BASE_QUANTITY_PTD_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
790 X_ORIG_LABOR_HOURS_TOT_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
791 X_BASE_LABOR_HOURS_TOT_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
792 X_ORIG_QUANTITY_TOT_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
793 X_BASE_QUANTITY_TOT_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
794 X_BASE_RAW_COST_TOT_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
798 X_BASE_REVENUE_TOT_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
795 X_BASE_BURDENED_COST_TOT_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
796 X_ORIG_RAW_COST_TOT_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
797 X_ORIG_BURDENED_COST_TOT_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
799 X_ORIG_REVENUE_TOT_A OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
800 )
801 IS
802 BEGIN
803
804 -- First Populate the post processing Numbers;
805 X_PROJECT_ID := PROJECT_ID_PST(X_TABLE_INDEX);
806 X_BUDGET_TYPE_CODE := BUDGET_TYPE_CODE_PST(X_TABLE_INDEX);
807 X_BASE_RAW_COST_ITD_A := BASE_RAW_COST_ITD_PST(X_TABLE_INDEX);
808 X_BASE_RAW_COST_YTD_A := BASE_RAW_COST_YTD_PST(X_TABLE_INDEX);
809 X_BASE_RAW_COST_PP_A := BASE_RAW_COST_PP_PST(X_TABLE_INDEX);
810 X_BASE_RAW_COST_PTD_A := BASE_RAW_COST_PTD_PST(X_TABLE_INDEX);
811 X_BASE_BURDENED_COST_ITD_A := BASE_BURDENED_COST_ITD_PST(X_TABLE_INDEX);
812 X_BASE_BURDENED_COST_YTD_A := BASE_BURDENED_COST_YTD_PST(X_TABLE_INDEX);
813 X_BASE_BURDENED_COST_PP_A := BASE_BURDENED_COST_PP_PST(X_TABLE_INDEX);
814 X_BASE_BURDENED_COST_PTD_A := BASE_BURDENED_COST_PTD_PST(X_TABLE_INDEX);
815 X_ORIG_RAW_COST_ITD_A := ORIG_RAW_COST_ITD_PST(X_TABLE_INDEX);
816 X_ORIG_RAW_COST_YTD_A := ORIG_RAW_COST_YTD_PST(X_TABLE_INDEX);
817 X_ORIG_RAW_COST_PP_A := ORIG_RAW_COST_PP_PST(X_TABLE_INDEX);
818 X_ORIG_RAW_COST_PTD_A := ORIG_RAW_COST_PTD_PST(X_TABLE_INDEX);
819 X_ORIG_BURDENED_COST_ITD_A := ORIG_BURDENED_COST_ITD_PST(X_TABLE_INDEX);
820 X_ORIG_BURDENED_COST_YTD_A := ORIG_BURDENED_COST_YTD_PST(X_TABLE_INDEX);
821 X_ORIG_BURDENED_COST_PP_A := ORIG_BURDENED_COST_PP_PST(X_TABLE_INDEX);
822 X_ORIG_BURDENED_COST_PTD_A := ORIG_BURDENED_COST_PTD_PST(X_TABLE_INDEX);
823 X_BASE_REVENUE_ITD_A := BASE_REVENUE_ITD_PST(X_TABLE_INDEX);
824 X_BASE_REVENUE_YTD_A := BASE_REVENUE_YTD_PST(X_TABLE_INDEX);
825 X_BASE_REVENUE_PP_A := BASE_REVENUE_PP_PST(X_TABLE_INDEX);
826 X_BASE_REVENUE_PTD_A := BASE_REVENUE_PTD_PST(X_TABLE_INDEX);
827 X_ORIG_REVENUE_ITD_A := ORIG_REVENUE_ITD_PST(X_TABLE_INDEX);
828 X_ORIG_REVENUE_YTD_A := ORIG_REVENUE_YTD_PST(X_TABLE_INDEX);
829 X_ORIG_REVENUE_PP_A := ORIG_REVENUE_PP_PST(X_TABLE_INDEX);
830 X_ORIG_REVENUE_PTD_A := ORIG_REVENUE_PTD_PST(X_TABLE_INDEX);
831 X_ORIG_LABOR_HOURS_ITD_A := ORIG_LABOR_HOURS_ITD_PST(X_TABLE_INDEX);
832 X_ORIG_LABOR_HOURS_YTD_A := ORIG_LABOR_HOURS_YTD_PST(X_TABLE_INDEX);
833 X_ORIG_LABOR_HOURS_PP_A := ORIG_LABOR_HOURS_PP_PST(X_TABLE_INDEX);
834 X_ORIG_LABOR_HOURS_PTD_A := ORIG_LABOR_HOURS_PTD_PST(X_TABLE_INDEX);
835 X_BASE_LABOR_HOURS_ITD_A := BASE_LABOR_HOURS_ITD_PST(X_TABLE_INDEX);
836 X_BASE_LABOR_HOURS_YTD_A := BASE_LABOR_HOURS_YTD_PST(X_TABLE_INDEX);
837 X_BASE_LABOR_HOURS_PP_A := BASE_LABOR_HOURS_PP_PST(X_TABLE_INDEX);
838 X_BASE_LABOR_HOURS_PTD_A := BASE_LABOR_HOURS_PTD_PST(X_TABLE_INDEX);
839 X_ORIG_QUANTITY_YTD_A := ORIG_QUANTITY_YTD_PST(X_TABLE_INDEX);
840 X_ORIG_QUANTITY_ITD_A := ORIG_QUANTITY_ITD_PST(X_TABLE_INDEX);
841 X_ORIG_QUANTITY_PP_A := ORIG_QUANTITY_PP_PST(X_TABLE_INDEX);
842 X_ORIG_QUANTITY_PTD_A := ORIG_QUANTITY_PTD_PST(X_TABLE_INDEX);
843 X_BASE_QUANTITY_YTD_A := BASE_QUANTITY_YTD_PST(X_TABLE_INDEX);
844 X_BASE_QUANTITY_ITD_A := BASE_QUANTITY_ITD_PST(X_TABLE_INDEX);
845 X_BASE_QUANTITY_PP_A := BASE_QUANTITY_PP_PST(X_TABLE_INDEX);
846 X_BASE_QUANTITY_PTD_A := BASE_QUANTITY_PTD_PST(X_TABLE_INDEX);
847 X_ORIG_LABOR_HOURS_TOT_A := ORIG_LABOR_HOURS_TOT_PST(X_TABLE_INDEX);
848 X_BASE_LABOR_HOURS_TOT_A := BASE_LABOR_HOURS_TOT_PST(X_TABLE_INDEX);
849 X_ORIG_QUANTITY_TOT_A := ORIG_QUANTITY_TOT_PST(X_TABLE_INDEX);
850 X_BASE_QUANTITY_TOT_A := BASE_QUANTITY_TOT_PST(X_TABLE_INDEX);
851 X_BASE_RAW_COST_TOT_A := BASE_RAW_COST_TOT_PST(X_TABLE_INDEX);
852 X_BASE_BURDENED_COST_TOT_A := BASE_BURDENED_COST_TOT_PST(X_TABLE_INDEX);
853 X_ORIG_RAW_COST_TOT_A := ORIG_RAW_COST_TOT_PST(X_TABLE_INDEX);
854 X_ORIG_BURDENED_COST_TOT_A := ORIG_BURDENED_COST_TOT_PST(X_TABLE_INDEX);
855 X_BASE_REVENUE_TOT_A := BASE_REVENUE_TOT_PST(X_TABLE_INDEX);
856 X_ORIG_REVENUE_TOT_A := ORIG_REVENUE_TOT_PST(X_TABLE_INDEX);
857
858 -- Determine the PL/SQL table index for this project_id and buget_type_code
859 -- in the pl/sql which was created before processing
860 -- It may be possible that the index is not found
861 -- When the index is not found than it means the budget has been
862 -- accumulated for the first time
863
864 FOR i IN 1..number_of_budgets_pre LOOP
865
866 IF( PROJECT_ID_PRE(i) = PROJECT_ID_PST(X_TABLE_INDEX)
867 AND BUDGET_TYPE_CODE_PRE(i) = BUDGET_TYPE_CODE_PST(X_TABLE_INDEX) ) THEN
868
869 -- Numbers were available for this project and budget_type_code before processing
870 X_BASE_RAW_COST_ITD_B := BASE_RAW_COST_ITD_PRE(i);
871 X_BASE_RAW_COST_YTD_B := BASE_RAW_COST_YTD_PRE(i);
872 X_BASE_RAW_COST_PP_B := BASE_RAW_COST_PP_PRE(i);
873 X_BASE_RAW_COST_PTD_B := BASE_RAW_COST_PTD_PRE(i);
874 X_BASE_BURDENED_COST_ITD_B := BASE_BURDENED_COST_ITD_PRE(i);
875 X_BASE_BURDENED_COST_YTD_B := BASE_BURDENED_COST_YTD_PRE(i);
876 X_BASE_BURDENED_COST_PP_B := BASE_BURDENED_COST_PP_PRE(i);
877 X_BASE_BURDENED_COST_PTD_B := BASE_BURDENED_COST_PTD_PRE(i);
878 X_ORIG_RAW_COST_ITD_B := ORIG_RAW_COST_ITD_PRE(i);
879 X_ORIG_RAW_COST_YTD_B := ORIG_RAW_COST_YTD_PRE(i);
880 X_ORIG_RAW_COST_PP_B := ORIG_RAW_COST_PP_PRE(i);
884 X_ORIG_BURDENED_COST_PP_B := ORIG_BURDENED_COST_PP_PRE(i);
881 X_ORIG_RAW_COST_PTD_B := ORIG_RAW_COST_PTD_PRE(i);
882 X_ORIG_BURDENED_COST_ITD_B := ORIG_BURDENED_COST_ITD_PRE(i);
883 X_ORIG_BURDENED_COST_YTD_B := ORIG_BURDENED_COST_YTD_PRE(i);
885 X_ORIG_BURDENED_COST_PTD_B := ORIG_BURDENED_COST_PTD_PRE(i);
886 X_BASE_REVENUE_ITD_B := BASE_REVENUE_ITD_PRE(i);
887 X_BASE_REVENUE_YTD_B := BASE_REVENUE_YTD_PRE(i);
888 X_BASE_REVENUE_PP_B := BASE_REVENUE_PP_PRE(i);
889 X_BASE_REVENUE_PTD_B := BASE_REVENUE_PTD_PRE(i);
890 X_ORIG_REVENUE_ITD_B := ORIG_REVENUE_ITD_PRE(i);
891 X_ORIG_REVENUE_YTD_B := ORIG_REVENUE_YTD_PRE(i);
892 X_ORIG_REVENUE_PP_B := ORIG_REVENUE_PP_PRE(i);
893 X_ORIG_REVENUE_PTD_B := ORIG_REVENUE_PTD_PRE(i);
894 X_ORIG_LABOR_HOURS_ITD_B := ORIG_LABOR_HOURS_ITD_PRE(i);
895 X_ORIG_LABOR_HOURS_YTD_B := ORIG_LABOR_HOURS_YTD_PRE(i);
896 X_ORIG_LABOR_HOURS_PP_B := ORIG_LABOR_HOURS_PP_PRE(i);
897 X_ORIG_LABOR_HOURS_PTD_B := ORIG_LABOR_HOURS_PTD_PRE(i);
898 X_BASE_LABOR_HOURS_ITD_B := BASE_LABOR_HOURS_ITD_PRE(i);
899 X_BASE_LABOR_HOURS_YTD_B := BASE_LABOR_HOURS_YTD_PRE(i);
900 X_BASE_LABOR_HOURS_PP_B := BASE_LABOR_HOURS_PP_PRE(i);
901 X_BASE_LABOR_HOURS_PTD_B := BASE_LABOR_HOURS_PTD_PRE(i);
902 X_ORIG_QUANTITY_YTD_B := ORIG_QUANTITY_YTD_PRE(i);
903 X_ORIG_QUANTITY_ITD_B := ORIG_QUANTITY_ITD_PRE(i);
904 X_ORIG_QUANTITY_PP_B := ORIG_QUANTITY_PP_PRE(i);
905 X_ORIG_QUANTITY_PTD_B := ORIG_QUANTITY_PTD_PRE(i);
906 X_BASE_QUANTITY_YTD_B := BASE_QUANTITY_YTD_PRE(i);
907 X_BASE_QUANTITY_ITD_B := BASE_QUANTITY_ITD_PRE(i);
908 X_BASE_QUANTITY_PP_B := BASE_QUANTITY_PP_PRE(i);
909 X_BASE_QUANTITY_PTD_B := BASE_QUANTITY_PTD_PRE(i);
910 X_ORIG_LABOR_HOURS_TOT_B := ORIG_LABOR_HOURS_TOT_PRE(i);
911 X_BASE_LABOR_HOURS_TOT_B := BASE_LABOR_HOURS_TOT_PRE(i);
912 X_ORIG_QUANTITY_TOT_B := ORIG_QUANTITY_TOT_PRE(i);
913 X_BASE_QUANTITY_TOT_B := BASE_QUANTITY_TOT_PRE(i);
914 X_BASE_RAW_COST_TOT_B := BASE_RAW_COST_TOT_PRE(i);
915 X_BASE_BURDENED_COST_TOT_B := BASE_BURDENED_COST_TOT_PRE(i);
916 X_ORIG_RAW_COST_TOT_B := ORIG_RAW_COST_TOT_PRE(i);
917 X_ORIG_BURDENED_COST_TOT_B := ORIG_BURDENED_COST_TOT_PRE(i);
918 X_BASE_REVENUE_TOT_B := BASE_REVENUE_TOT_PRE(i);
919 X_ORIG_REVENUE_TOT_B := ORIG_REVENUE_TOT_PRE(i);
920
921 END IF;
922 END LOOP;
923
924 EXCEPTION
925 WHEN OTHERS THEN
926 RAISE;
927 END report_project_budget_numbers;
928
929 PROCEDURE get_project_txn_numbers
930 (X_PROJECT_ID IN NUMBER,
931 X_PRE_POST_FLAG IN VARCHAR2,
932 X_TABLE_INDEX IN NUMBER,
933 X_ERR_STACK IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
934 X_ERR_STAGE IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
935 X_ERR_CODE IN OUT NOCOPY NUMBER) --File.Sql.39 bug 4440895
936 IS
937
938 CURSOR selsumtxns IS
939 SELECT
940 PROJECT_ID,
941 NVL(SUM(TOT_REVENUE),0) + NVL(SUM(I_TOT_REVENUE),0) TXN_REVENUE,
942 NVL(SUM(TOT_RAW_COST),0)+ NVL(SUM(I_TOT_RAW_COST),0) TXN_RAW_COST,
943 NVL(SUM(TOT_BURDENED_COST),0)+ NVL(SUM(I_TOT_BURDENED_COST),0) TXN_BURDENED_COST,
947 + NVL(SUM(I_TOT_BILLABLE_RAW_COST),0) TXN_BILLABLE_RAW_COST,
944 NVL(SUM(TOT_QUANTITY),0)+ NVL(SUM(I_TOT_QUANTITY),0) TXN_QUANTITY,
945 NVL(SUM(TOT_LABOR_HOURS),0) + NVL(SUM(I_TOT_LABOR_HOURS),0) TXN_LABOR_HOURS,
946 NVL(SUM(TOT_BILLABLE_RAW_COST),0)
948 NVL(SUM(TOT_BILLABLE_BURDENED_COST),0)
949 + NVL(SUM(I_TOT_BILLABLE_BURDENED_COST),0) TXN_BILLABLE_BURDENED_COST,
950 NVL(SUM(TOT_BILLABLE_QUANTITY),0)
951 + NVL(SUM(I_TOT_BILLABLE_QUANTITY),0) TXN_BILLABLE_QUANTITY,
952 NVL(SUM(TOT_BILLABLE_LABOR_HOURS),0)
953 + NVL(SUM(I_TOT_BILLABLE_LABOR_HOURS),0) TXN_BILLABLE_LABOR_HOURS
954 FROM
955 PA_TXN_ACCUM PTA
956 WHERE
957 PROJECT_ID = X_PROJECT_ID
958 AND exists
959 ( SELECT 'Yes'
960 FROM pa_txn_accum_details ptad
961 WHERE pta.txn_accum_id = ptad.txn_accum_id
962 AND ptad.line_type IN ('C','R','E')
963 )
964 GROUP BY PROJECT_ID;
965
966 srec selsumtxns%ROWTYPE;
967 x_old_stack varchar2(1000);
968
969 BEGIN
970
971 x_old_stack := x_err_stack;
972 x_err_stack := x_err_stack|| '->get_project_txn_numbers';
973
974 pa_debug.debug(x_err_stack);
975
976 -- initialize the numbers to zero in case the cursor does not return any row
977
978 IF ( X_PRE_POST_FLAG = 'PRE' ) THEN
979 PROJECT_ID(X_TABLE_INDEX) := SREC.PROJECT_ID;
980
981 TXN_RAW_COST_PRE(X_TABLE_INDEX) := 0;
982 TXN_BILLABLE_RAW_COST_PRE(X_TABLE_INDEX) := 0;
983 TXN_BURDENED_COST_PRE(X_TABLE_INDEX) := 0;
984 TXN_BILLABLE_BURDENED_COST_PRE(X_TABLE_INDEX) := 0;
985 TXN_QUANTITY_PRE(X_TABLE_INDEX) := 0;
986 TXN_LABOR_HOURS_PRE(X_TABLE_INDEX) := 0;
987 TXN_BILLABLE_QUANTITY_PRE(X_TABLE_INDEX) := 0;
988 TXN_BILLABLE_LABOR_HOURS_PRE(X_TABLE_INDEX) := 0;
989 TXN_REVENUE_PRE(X_TABLE_INDEX) := 0;
990 ELSE
991
992 TXN_RAW_COST_PST(X_TABLE_INDEX) := 0;
993 TXN_BILLABLE_RAW_COST_PST(X_TABLE_INDEX) := 0;
994 TXN_BURDENED_COST_PST(X_TABLE_INDEX) := 0;
995 TXN_BILLABLE_BURDENED_COST_PST(X_TABLE_INDEX) := 0;
996 TXN_QUANTITY_PST(X_TABLE_INDEX) := 0;
997 TXN_LABOR_HOURS_PST(X_TABLE_INDEX) := 0;
998 TXN_BILLABLE_QUANTITY_PST(X_TABLE_INDEX) := 0;
999 TXN_BILLABLE_LABOR_HOURS_PST(X_TABLE_INDEX) := 0;
1000 TXN_REVENUE_PST(X_TABLE_INDEX) := 0;
1001 END IF;
1002
1003 FOR srec IN selsumtxns LOOP
1004
1005 IF ( X_PRE_POST_FLAG = 'PRE' ) THEN
1006
1007 -- initialize the numbers before processing
1008 PROJECT_ID(X_TABLE_INDEX) := SREC.PROJECT_ID;
1009
1010 TXN_RAW_COST_PRE(X_TABLE_INDEX) := SREC.TXN_RAW_COST;
1011 TXN_BILLABLE_RAW_COST_PRE(X_TABLE_INDEX)
1012 := SREC.TXN_BILLABLE_RAW_COST;
1013 TXN_BURDENED_COST_PRE(X_TABLE_INDEX) := SREC.TXN_BURDENED_COST;
1017 TXN_LABOR_HOURS_PRE(X_TABLE_INDEX) := SREC.TXN_LABOR_HOURS;
1014 TXN_BILLABLE_BURDENED_COST_PRE(X_TABLE_INDEX)
1015 := SREC.TXN_BILLABLE_BURDENED_COST;
1016 TXN_QUANTITY_PRE(X_TABLE_INDEX) := SREC.TXN_QUANTITY;
1018 TXN_BILLABLE_QUANTITY_PRE(X_TABLE_INDEX)
1019 := SREC.TXN_BILLABLE_QUANTITY;
1020 TXN_BILLABLE_LABOR_HOURS_PRE(X_TABLE_INDEX)
1021 := SREC.TXN_BILLABLE_LABOR_HOURS;
1022 TXN_REVENUE_PRE(X_TABLE_INDEX) := SREC.TXN_REVENUE;
1023
1024 ELSE
1025
1026 TXN_RAW_COST_PST(X_TABLE_INDEX) := SREC.TXN_RAW_COST;
1027 TXN_BILLABLE_RAW_COST_PST(X_TABLE_INDEX)
1028 := SREC.TXN_BILLABLE_RAW_COST;
1029 TXN_BURDENED_COST_PST(X_TABLE_INDEX) := SREC.TXN_BURDENED_COST;
1030 TXN_BILLABLE_BURDENED_COST_PST(X_TABLE_INDEX)
1031 := SREC.TXN_BILLABLE_BURDENED_COST;
1032 TXN_QUANTITY_PST(X_TABLE_INDEX) := SREC.TXN_QUANTITY;
1033 TXN_LABOR_HOURS_PST(X_TABLE_INDEX) := SREC.TXN_LABOR_HOURS;
1034 TXN_BILLABLE_QUANTITY_PST(X_TABLE_INDEX)
1035 := SREC.TXN_BILLABLE_QUANTITY;
1036 TXN_BILLABLE_LABOR_HOURS_PST(X_TABLE_INDEX)
1037 := SREC.TXN_BILLABLE_LABOR_HOURS;
1038 TXN_REVENUE_PST(X_TABLE_INDEX) := SREC.TXN_REVENUE;
1039
1040 END IF;
1041
1042 END LOOP;
1043
1044 x_err_stack := x_old_stack;
1045
1046 EXCEPTION
1047
1048 WHEN OTHERS THEN
1049 RAISE;
1050 END get_project_txn_numbers;
1051
1052 PROCEDURE report_project_txn_numbers
1053 (X_TABLE_INDEX IN NUMBER,
1054 X_PROJECT_ID OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1055 X_RAW_COST_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1056 X_BILLABLE_RAW_COST_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1057 X_BURDENED_COST_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1058 X_BILLABLE_BURDENED_COST_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1059 X_QUANTITY_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1060 X_LABOR_HOURS_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1061 X_BILLABLE_QUANTITY_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1062 X_BILLABLE_LABOR_HOURS_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1063 X_REVENUE_B OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1064 X_RAW_COST_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1065 X_BILLABLE_RAW_COST_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1066 X_BURDENED_COST_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1067 X_BILLABLE_BURDENED_COST_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1068 X_QUANTITY_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1069 X_LABOR_HOURS_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1070 X_BILLABLE_QUANTITY_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1071 X_BILLABLE_LABOR_HOURS_A OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1072 X_REVENUE_A OUT NOCOPY NUMBER) --File.Sql.39 bug 4440895
1073 IS
1074 BEGIN
1075 X_PROJECT_ID := PROJECT_ID(X_TABLE_INDEX);
1076
1077 X_RAW_COST_B := TXN_RAW_COST_PRE(X_TABLE_INDEX);
1078 X_BILLABLE_RAW_COST_B := TXN_BILLABLE_RAW_COST_PRE(X_TABLE_INDEX);
1079 X_BURDENED_COST_B := TXN_BURDENED_COST_PRE(X_TABLE_INDEX);
1080 X_BILLABLE_BURDENED_COST_B := TXN_BILLABLE_BURDENED_COST_PRE(X_TABLE_INDEX);
1081 X_QUANTITY_B := TXN_QUANTITY_PRE(X_TABLE_INDEX);
1082 X_LABOR_HOURS_B := TXN_LABOR_HOURS_PRE(X_TABLE_INDEX);
1083 X_BILLABLE_QUANTITY_B := TXN_BILLABLE_QUANTITY_PRE(X_TABLE_INDEX);
1084 X_BILLABLE_LABOR_HOURS_B := TXN_BILLABLE_LABOR_HOURS_PRE(X_TABLE_INDEX);
1085 X_REVENUE_B := TXN_REVENUE_PRE(X_TABLE_INDEX);
1086
1087 X_RAW_COST_A := TXN_RAW_COST_PST(X_TABLE_INDEX);
1088 X_BILLABLE_RAW_COST_A := TXN_BILLABLE_RAW_COST_PST(X_TABLE_INDEX);
1089 X_BURDENED_COST_A := TXN_BURDENED_COST_PST(X_TABLE_INDEX);
1090 X_BILLABLE_BURDENED_COST_A := TXN_BILLABLE_BURDENED_COST_PST(X_TABLE_INDEX);
1091 X_QUANTITY_A := TXN_QUANTITY_PST(X_TABLE_INDEX);
1092 X_LABOR_HOURS_A := TXN_LABOR_HOURS_PST(X_TABLE_INDEX);
1093 X_BILLABLE_QUANTITY_A := TXN_BILLABLE_QUANTITY_PST(X_TABLE_INDEX);
1094 X_BILLABLE_LABOR_HOURS_A := TXN_BILLABLE_LABOR_HOURS_PST(X_TABLE_INDEX);
1095 X_REVENUE_A := TXN_REVENUE_PST(X_TABLE_INDEX);
1096
1097 EXCEPTION
1098 WHEN OTHERS THEN
1099 RAISE;
1100 END report_project_txn_numbers;
1101
1102 END PA_ACCUM_SRW;