[Home] [Help]
PACKAGE BODY: APPS.OZF_FUND_UTILIZED_PVT_W
Source
1 package body ozf_fund_utilized_pvt_w as
2 /* $Header: ozfwfutb.pls 120.7.12010000.2 2008/08/14 15:43:13 nirprasa ship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5 rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6 rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7
8 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
9 function rosetta_g_miss_date_in_map(d date) return date as
10 begin
11 if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
12 if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13 return d;
14 end;
15
16 procedure create_utilization(p_api_version NUMBER
17 , p_init_msg_list VARCHAR2
18 , p_commit VARCHAR2
19 , p_validation_level NUMBER
20 , x_return_status out nocopy VARCHAR2
21 , x_msg_count out nocopy NUMBER
22 , x_msg_data out nocopy VARCHAR2
23 , p_create_gl_entry VARCHAR2
24 , p8_a0 NUMBER
25 , p8_a1 DATE
26 , p8_a2 NUMBER
27 , p8_a3 NUMBER
28 , p8_a4 DATE
29 , p8_a5 NUMBER
30 , p8_a6 VARCHAR2
31 , p8_a7 NUMBER
32 , p8_a8 NUMBER
33 , p8_a9 NUMBER
34 , p8_a10 DATE
35 , p8_a11 VARCHAR2
36 , p8_a12 NUMBER
37 , p8_a13 VARCHAR2
38 , p8_a14 NUMBER
39 , p8_a15 VARCHAR2
40 , p8_a16 NUMBER
41 , p8_a17 VARCHAR2
42 , p8_a18 NUMBER
43 , p8_a19 NUMBER
44 , p8_a20 NUMBER
45 , p8_a21 NUMBER
46 , p8_a22 NUMBER
47 , p8_a23 VARCHAR2
48 , p8_a24 VARCHAR2
49 , p8_a25 DATE
50 , p8_a26 NUMBER
51 , p8_a27 VARCHAR2
52 , p8_a28 DATE
53 , p8_a29 NUMBER
54 , p8_a30 VARCHAR2
55 , p8_a31 VARCHAR2
56 , p8_a32 VARCHAR2
57 , p8_a33 VARCHAR2
58 , p8_a34 VARCHAR2
59 , p8_a35 VARCHAR2
60 , p8_a36 VARCHAR2
61 , p8_a37 VARCHAR2
62 , p8_a38 VARCHAR2
63 , p8_a39 VARCHAR2
64 , p8_a40 VARCHAR2
65 , p8_a41 VARCHAR2
66 , p8_a42 VARCHAR2
67 , p8_a43 VARCHAR2
68 , p8_a44 VARCHAR2
69 , p8_a45 VARCHAR2
70 , p8_a46 NUMBER
71 , p8_a47 VARCHAR2
72 , p8_a48 VARCHAR2
73 , p8_a49 VARCHAR2
74 , p8_a50 NUMBER
75 , p8_a51 NUMBER
76 , p8_a52 DATE
77 , p8_a53 VARCHAR2
78 , p8_a54 NUMBER
79 , p8_a55 NUMBER
80 , p8_a56 NUMBER
81 , p8_a57 NUMBER
82 , p8_a58 NUMBER
83 , p8_a59 NUMBER
84 , p8_a60 NUMBER
85 , p8_a61 NUMBER
86 , p8_a62 NUMBER
87 , p8_a63 NUMBER
88 , p8_a64 NUMBER
89 , p8_a65 NUMBER
90 , p8_a66 NUMBER
91 , p8_a67 VARCHAR2
92 , p8_a68 NUMBER
93 , p8_a69 VARCHAR2
94 , p8_a70 NUMBER
95 , p8_a71 NUMBER
96 , p8_a72 NUMBER
97 , p8_a73 NUMBER
98 , p8_a74 NUMBER
99 , p8_a75 NUMBER
100 , p8_a76 NUMBER
101 , p8_a77 NUMBER
102 , p8_a78 NUMBER
103 , p8_a79 NUMBER
104 , x_utilization_id out nocopy NUMBER
105 )
106
107 as
108 ddp_utilization_rec ozf_fund_utilized_pvt.utilization_rec_type;
109 ddindx binary_integer; indx binary_integer;
110 begin
111
112 -- copy data to the local IN or IN-OUT args, if any
113
114
115
116
117
118
119
120
121 ddp_utilization_rec.utilization_id := p8_a0;
122 ddp_utilization_rec.last_update_date := rosetta_g_miss_date_in_map(p8_a1);
123 ddp_utilization_rec.last_updated_by := p8_a2;
124 ddp_utilization_rec.last_update_login := p8_a3;
125 ddp_utilization_rec.creation_date := rosetta_g_miss_date_in_map(p8_a4);
126 ddp_utilization_rec.created_by := p8_a5;
127 ddp_utilization_rec.created_from := p8_a6;
128 ddp_utilization_rec.request_id := p8_a7;
129 ddp_utilization_rec.program_application_id := p8_a8;
130 ddp_utilization_rec.program_id := p8_a9;
131 ddp_utilization_rec.program_update_date := rosetta_g_miss_date_in_map(p8_a10);
132 ddp_utilization_rec.utilization_type := p8_a11;
133 ddp_utilization_rec.fund_id := p8_a12;
134 ddp_utilization_rec.plan_type := p8_a13;
135 ddp_utilization_rec.plan_id := p8_a14;
136 ddp_utilization_rec.component_type := p8_a15;
137 ddp_utilization_rec.component_id := p8_a16;
138 ddp_utilization_rec.object_type := p8_a17;
139 ddp_utilization_rec.object_id := p8_a18;
140 ddp_utilization_rec.order_id := p8_a19;
141 ddp_utilization_rec.invoice_id := p8_a20;
142 ddp_utilization_rec.amount := p8_a21;
143 ddp_utilization_rec.acctd_amount := p8_a22;
144 ddp_utilization_rec.currency_code := p8_a23;
145 ddp_utilization_rec.exchange_rate_type := p8_a24;
146 ddp_utilization_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p8_a25);
147 ddp_utilization_rec.exchange_rate := p8_a26;
148 ddp_utilization_rec.adjustment_type := p8_a27;
149 ddp_utilization_rec.adjustment_date := rosetta_g_miss_date_in_map(p8_a28);
150 ddp_utilization_rec.object_version_number := p8_a29;
151 ddp_utilization_rec.attribute_category := p8_a30;
152 ddp_utilization_rec.attribute1 := p8_a31;
153 ddp_utilization_rec.attribute2 := p8_a32;
154 ddp_utilization_rec.attribute3 := p8_a33;
155 ddp_utilization_rec.attribute4 := p8_a34;
156 ddp_utilization_rec.attribute5 := p8_a35;
157 ddp_utilization_rec.attribute6 := p8_a36;
158 ddp_utilization_rec.attribute7 := p8_a37;
159 ddp_utilization_rec.attribute8 := p8_a38;
160 ddp_utilization_rec.attribute9 := p8_a39;
161 ddp_utilization_rec.attribute10 := p8_a40;
162 ddp_utilization_rec.attribute11 := p8_a41;
163 ddp_utilization_rec.attribute12 := p8_a42;
164 ddp_utilization_rec.attribute13 := p8_a43;
165 ddp_utilization_rec.attribute14 := p8_a44;
166 ddp_utilization_rec.attribute15 := p8_a45;
167 ddp_utilization_rec.org_id := p8_a46;
168 ddp_utilization_rec.adjustment_desc := p8_a47;
169 ddp_utilization_rec.language := p8_a48;
170 ddp_utilization_rec.source_lang := p8_a49;
171 ddp_utilization_rec.camp_schedule_id := p8_a50;
172 ddp_utilization_rec.adjustment_type_id := p8_a51;
173 ddp_utilization_rec.gl_date := rosetta_g_miss_date_in_map(p8_a52);
174 ddp_utilization_rec.product_level_type := p8_a53;
175 ddp_utilization_rec.product_id := p8_a54;
176 ddp_utilization_rec.ams_activity_budget_id := p8_a55;
177 ddp_utilization_rec.amount_remaining := p8_a56;
178 ddp_utilization_rec.acctd_amount_remaining := p8_a57;
179 ddp_utilization_rec.cust_account_id := p8_a58;
180 ddp_utilization_rec.price_adjustment_id := p8_a59;
181 ddp_utilization_rec.plan_curr_amount := p8_a60;
182 ddp_utilization_rec.plan_curr_amount_remaining := p8_a61;
183 ddp_utilization_rec.scan_unit := p8_a62;
184 ddp_utilization_rec.scan_unit_remaining := p8_a63;
185 ddp_utilization_rec.activity_product_id := p8_a64;
186 ddp_utilization_rec.scan_data_id := p8_a65;
187 ddp_utilization_rec.volume_offer_tiers_id := p8_a66;
188 ddp_utilization_rec.gl_posted_flag := p8_a67;
189 ddp_utilization_rec.billto_cust_account_id := p8_a68;
190 ddp_utilization_rec.reference_type := p8_a69;
191 ddp_utilization_rec.reference_id := p8_a70;
192 ddp_utilization_rec.order_line_id := p8_a71;
193 ddp_utilization_rec.orig_utilization_id := p8_a72;
194 ddp_utilization_rec.bill_to_site_use_id := p8_a73;
195 ddp_utilization_rec.ship_to_site_use_id := p8_a74;
196 ddp_utilization_rec.univ_curr_amount := p8_a75;
197 ddp_utilization_rec.univ_curr_amount_remaining := p8_a76;
198 ddp_utilization_rec.gl_account_credit := p8_a77;
199 ddp_utilization_rec.gl_account_debit := p8_a78;
200 ddp_utilization_rec.site_use_id := p8_a79;
201
202
203 -- here's the delegated call to the old PL/SQL routine
204 ozf_fund_utilized_pvt.create_utilization(p_api_version,
205 p_init_msg_list,
206 p_commit,
207 p_validation_level,
208 x_return_status,
209 x_msg_count,
210 x_msg_data,
211 p_create_gl_entry,
212 ddp_utilization_rec,
213 x_utilization_id);
214
215 -- copy data back from the local variables to OUT or IN-OUT args, if any
216
217
218
219
220
221
222
223
224
225 end;
226
227 procedure update_utilization(p_api_version NUMBER
228 , p_init_msg_list VARCHAR2
229 , p_commit VARCHAR2
230 , p_validation_level NUMBER
231 , x_return_status out nocopy VARCHAR2
232 , x_msg_count out nocopy NUMBER
233 , x_msg_data out nocopy VARCHAR2
234 , p7_a0 NUMBER
235 , p7_a1 DATE
236 , p7_a2 NUMBER
237 , p7_a3 NUMBER
238 , p7_a4 DATE
239 , p7_a5 NUMBER
240 , p7_a6 VARCHAR2
241 , p7_a7 NUMBER
242 , p7_a8 NUMBER
243 , p7_a9 NUMBER
244 , p7_a10 DATE
245 , p7_a11 VARCHAR2
246 , p7_a12 NUMBER
247 , p7_a13 VARCHAR2
248 , p7_a14 NUMBER
249 , p7_a15 VARCHAR2
250 , p7_a16 NUMBER
251 , p7_a17 VARCHAR2
252 , p7_a18 NUMBER
253 , p7_a19 NUMBER
254 , p7_a20 NUMBER
255 , p7_a21 NUMBER
256 , p7_a22 NUMBER
257 , p7_a23 VARCHAR2
258 , p7_a24 VARCHAR2
259 , p7_a25 DATE
260 , p7_a26 NUMBER
261 , p7_a27 VARCHAR2
262 , p7_a28 DATE
263 , p7_a29 NUMBER
264 , p7_a30 VARCHAR2
265 , p7_a31 VARCHAR2
266 , p7_a32 VARCHAR2
267 , p7_a33 VARCHAR2
268 , p7_a34 VARCHAR2
269 , p7_a35 VARCHAR2
270 , p7_a36 VARCHAR2
271 , p7_a37 VARCHAR2
272 , p7_a38 VARCHAR2
273 , p7_a39 VARCHAR2
274 , p7_a40 VARCHAR2
275 , p7_a41 VARCHAR2
276 , p7_a42 VARCHAR2
277 , p7_a43 VARCHAR2
278 , p7_a44 VARCHAR2
279 , p7_a45 VARCHAR2
280 , p7_a46 NUMBER
281 , p7_a47 VARCHAR2
282 , p7_a48 VARCHAR2
283 , p7_a49 VARCHAR2
284 , p7_a50 NUMBER
285 , p7_a51 NUMBER
286 , p7_a52 DATE
287 , p7_a53 VARCHAR2
288 , p7_a54 NUMBER
289 , p7_a55 NUMBER
290 , p7_a56 NUMBER
291 , p7_a57 NUMBER
292 , p7_a58 NUMBER
293 , p7_a59 NUMBER
294 , p7_a60 NUMBER
295 , p7_a61 NUMBER
296 , p7_a62 NUMBER
297 , p7_a63 NUMBER
298 , p7_a64 NUMBER
299 , p7_a65 NUMBER
300 , p7_a66 NUMBER
301 , p7_a67 VARCHAR2
302 , p7_a68 NUMBER
303 , p7_a69 VARCHAR2
304 , p7_a70 NUMBER
305 , p7_a71 NUMBER
306 , p7_a72 NUMBER
307 , p7_a73 NUMBER
308 , p7_a74 NUMBER
309 , p7_a75 NUMBER
310 , p7_a76 NUMBER
311 , p7_a77 NUMBER
312 , p7_a78 NUMBER
313 , p7_a79 NUMBER
314 , p_mode VARCHAR2
315 )
316
317 as
318 ddp_utilization_rec ozf_fund_utilized_pvt.utilization_rec_type;
319 ddindx binary_integer; indx binary_integer;
320 begin
321
322 -- copy data to the local IN or IN-OUT args, if any
323
324
325
326
327
328
329
330 ddp_utilization_rec.utilization_id := p7_a0;
331 ddp_utilization_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
332 ddp_utilization_rec.last_updated_by := p7_a2;
333 ddp_utilization_rec.last_update_login := p7_a3;
334 ddp_utilization_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
335 ddp_utilization_rec.created_by := p7_a5;
336 ddp_utilization_rec.created_from := p7_a6;
337 ddp_utilization_rec.request_id := p7_a7;
338 ddp_utilization_rec.program_application_id := p7_a8;
339 ddp_utilization_rec.program_id := p7_a9;
340 ddp_utilization_rec.program_update_date := rosetta_g_miss_date_in_map(p7_a10);
341 ddp_utilization_rec.utilization_type := p7_a11;
342 ddp_utilization_rec.fund_id := p7_a12;
343 ddp_utilization_rec.plan_type := p7_a13;
344 ddp_utilization_rec.plan_id := p7_a14;
345 ddp_utilization_rec.component_type := p7_a15;
346 ddp_utilization_rec.component_id := p7_a16;
347 ddp_utilization_rec.object_type := p7_a17;
348 ddp_utilization_rec.object_id := p7_a18;
349 ddp_utilization_rec.order_id := p7_a19;
350 ddp_utilization_rec.invoice_id := p7_a20;
351 ddp_utilization_rec.amount := p7_a21;
352 ddp_utilization_rec.acctd_amount := p7_a22;
353 ddp_utilization_rec.currency_code := p7_a23;
354 ddp_utilization_rec.exchange_rate_type := p7_a24;
355 ddp_utilization_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p7_a25);
356 ddp_utilization_rec.exchange_rate := p7_a26;
357 ddp_utilization_rec.adjustment_type := p7_a27;
358 ddp_utilization_rec.adjustment_date := rosetta_g_miss_date_in_map(p7_a28);
359 ddp_utilization_rec.object_version_number := p7_a29;
360 ddp_utilization_rec.attribute_category := p7_a30;
361 ddp_utilization_rec.attribute1 := p7_a31;
362 ddp_utilization_rec.attribute2 := p7_a32;
363 ddp_utilization_rec.attribute3 := p7_a33;
364 ddp_utilization_rec.attribute4 := p7_a34;
365 ddp_utilization_rec.attribute5 := p7_a35;
366 ddp_utilization_rec.attribute6 := p7_a36;
367 ddp_utilization_rec.attribute7 := p7_a37;
368 ddp_utilization_rec.attribute8 := p7_a38;
369 ddp_utilization_rec.attribute9 := p7_a39;
370 ddp_utilization_rec.attribute10 := p7_a40;
371 ddp_utilization_rec.attribute11 := p7_a41;
372 ddp_utilization_rec.attribute12 := p7_a42;
373 ddp_utilization_rec.attribute13 := p7_a43;
374 ddp_utilization_rec.attribute14 := p7_a44;
375 ddp_utilization_rec.attribute15 := p7_a45;
376 ddp_utilization_rec.org_id := p7_a46;
377 ddp_utilization_rec.adjustment_desc := p7_a47;
378 ddp_utilization_rec.language := p7_a48;
379 ddp_utilization_rec.source_lang := p7_a49;
380 ddp_utilization_rec.camp_schedule_id := p7_a50;
381 ddp_utilization_rec.adjustment_type_id := p7_a51;
382 ddp_utilization_rec.gl_date := rosetta_g_miss_date_in_map(p7_a52);
383 ddp_utilization_rec.product_level_type := p7_a53;
384 ddp_utilization_rec.product_id := p7_a54;
385 ddp_utilization_rec.ams_activity_budget_id := p7_a55;
386 ddp_utilization_rec.amount_remaining := p7_a56;
387 ddp_utilization_rec.acctd_amount_remaining := p7_a57;
388 ddp_utilization_rec.cust_account_id := p7_a58;
389 ddp_utilization_rec.price_adjustment_id := p7_a59;
390 ddp_utilization_rec.plan_curr_amount := p7_a60;
391 ddp_utilization_rec.plan_curr_amount_remaining := p7_a61;
392 ddp_utilization_rec.scan_unit := p7_a62;
393 ddp_utilization_rec.scan_unit_remaining := p7_a63;
394 ddp_utilization_rec.activity_product_id := p7_a64;
395 ddp_utilization_rec.scan_data_id := p7_a65;
396 ddp_utilization_rec.volume_offer_tiers_id := p7_a66;
397 ddp_utilization_rec.gl_posted_flag := p7_a67;
398 ddp_utilization_rec.billto_cust_account_id := p7_a68;
399 ddp_utilization_rec.reference_type := p7_a69;
400 ddp_utilization_rec.reference_id := p7_a70;
401 ddp_utilization_rec.order_line_id := p7_a71;
402 ddp_utilization_rec.orig_utilization_id := p7_a72;
403 ddp_utilization_rec.bill_to_site_use_id := p7_a73;
404 ddp_utilization_rec.ship_to_site_use_id := p7_a74;
405 ddp_utilization_rec.univ_curr_amount := p7_a75;
406 ddp_utilization_rec.univ_curr_amount_remaining := p7_a76;
407 ddp_utilization_rec.gl_account_credit := p7_a77;
408 ddp_utilization_rec.gl_account_debit := p7_a78;
409 ddp_utilization_rec.site_use_id := p7_a79;
410
411
412 -- here's the delegated call to the old PL/SQL routine
413 ozf_fund_utilized_pvt.update_utilization(p_api_version,
414 p_init_msg_list,
415 p_commit,
416 p_validation_level,
417 x_return_status,
418 x_msg_count,
419 x_msg_data,
420 ddp_utilization_rec,
421 p_mode);
422
423 -- copy data back from the local variables to OUT or IN-OUT args, if any
424
425
426
427
428
429
430
431
432 end;
433
434 procedure validate_utilization(p_api_version NUMBER
435 , p_init_msg_list VARCHAR2
436 , p_validation_level NUMBER
437 , x_return_status out nocopy VARCHAR2
438 , x_msg_count out nocopy NUMBER
439 , x_msg_data out nocopy VARCHAR2
440 , p6_a0 NUMBER
441 , p6_a1 DATE
442 , p6_a2 NUMBER
443 , p6_a3 NUMBER
444 , p6_a4 DATE
445 , p6_a5 NUMBER
446 , p6_a6 VARCHAR2
447 , p6_a7 NUMBER
448 , p6_a8 NUMBER
449 , p6_a9 NUMBER
450 , p6_a10 DATE
451 , p6_a11 VARCHAR2
452 , p6_a12 NUMBER
453 , p6_a13 VARCHAR2
454 , p6_a14 NUMBER
455 , p6_a15 VARCHAR2
456 , p6_a16 NUMBER
457 , p6_a17 VARCHAR2
458 , p6_a18 NUMBER
459 , p6_a19 NUMBER
460 , p6_a20 NUMBER
461 , p6_a21 NUMBER
462 , p6_a22 NUMBER
463 , p6_a23 VARCHAR2
464 , p6_a24 VARCHAR2
465 , p6_a25 DATE
466 , p6_a26 NUMBER
467 , p6_a27 VARCHAR2
468 , p6_a28 DATE
469 , p6_a29 NUMBER
470 , p6_a30 VARCHAR2
471 , p6_a31 VARCHAR2
472 , p6_a32 VARCHAR2
473 , p6_a33 VARCHAR2
474 , p6_a34 VARCHAR2
475 , p6_a35 VARCHAR2
476 , p6_a36 VARCHAR2
477 , p6_a37 VARCHAR2
478 , p6_a38 VARCHAR2
479 , p6_a39 VARCHAR2
480 , p6_a40 VARCHAR2
481 , p6_a41 VARCHAR2
482 , p6_a42 VARCHAR2
483 , p6_a43 VARCHAR2
484 , p6_a44 VARCHAR2
485 , p6_a45 VARCHAR2
486 , p6_a46 NUMBER
487 , p6_a47 VARCHAR2
488 , p6_a48 VARCHAR2
489 , p6_a49 VARCHAR2
490 , p6_a50 NUMBER
491 , p6_a51 NUMBER
492 , p6_a52 DATE
493 , p6_a53 VARCHAR2
494 , p6_a54 NUMBER
495 , p6_a55 NUMBER
496 , p6_a56 NUMBER
497 , p6_a57 NUMBER
498 , p6_a58 NUMBER
499 , p6_a59 NUMBER
500 , p6_a60 NUMBER
501 , p6_a61 NUMBER
502 , p6_a62 NUMBER
503 , p6_a63 NUMBER
504 , p6_a64 NUMBER
505 , p6_a65 NUMBER
506 , p6_a66 NUMBER
507 , p6_a67 VARCHAR2
508 , p6_a68 NUMBER
509 , p6_a69 VARCHAR2
510 , p6_a70 NUMBER
511 , p6_a71 NUMBER
512 , p6_a72 NUMBER
513 , p6_a73 NUMBER
514 , p6_a74 NUMBER
515 , p6_a75 NUMBER
516 , p6_a76 NUMBER
517 , p6_a77 NUMBER
518 , p6_a78 NUMBER
519 , p6_a79 NUMBER
520 )
521
522 as
523 ddp_utilization_rec ozf_fund_utilized_pvt.utilization_rec_type;
524 ddindx binary_integer; indx binary_integer;
525 begin
526
527 -- copy data to the local IN or IN-OUT args, if any
528
529
530
531
532
533
534 ddp_utilization_rec.utilization_id := p6_a0;
535 ddp_utilization_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a1);
536 ddp_utilization_rec.last_updated_by := p6_a2;
537 ddp_utilization_rec.last_update_login := p6_a3;
538 ddp_utilization_rec.creation_date := rosetta_g_miss_date_in_map(p6_a4);
539 ddp_utilization_rec.created_by := p6_a5;
540 ddp_utilization_rec.created_from := p6_a6;
541 ddp_utilization_rec.request_id := p6_a7;
542 ddp_utilization_rec.program_application_id := p6_a8;
543 ddp_utilization_rec.program_id := p6_a9;
544 ddp_utilization_rec.program_update_date := rosetta_g_miss_date_in_map(p6_a10);
545 ddp_utilization_rec.utilization_type := p6_a11;
546 ddp_utilization_rec.fund_id := p6_a12;
547 ddp_utilization_rec.plan_type := p6_a13;
548 ddp_utilization_rec.plan_id := p6_a14;
549 ddp_utilization_rec.component_type := p6_a15;
550 ddp_utilization_rec.component_id := p6_a16;
551 ddp_utilization_rec.object_type := p6_a17;
552 ddp_utilization_rec.object_id := p6_a18;
553 ddp_utilization_rec.order_id := p6_a19;
554 ddp_utilization_rec.invoice_id := p6_a20;
555 ddp_utilization_rec.amount := p6_a21;
556 ddp_utilization_rec.acctd_amount := p6_a22;
557 ddp_utilization_rec.currency_code := p6_a23;
558 ddp_utilization_rec.exchange_rate_type := p6_a24;
559 ddp_utilization_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p6_a25);
560 ddp_utilization_rec.exchange_rate := p6_a26;
561 ddp_utilization_rec.adjustment_type := p6_a27;
562 ddp_utilization_rec.adjustment_date := rosetta_g_miss_date_in_map(p6_a28);
563 ddp_utilization_rec.object_version_number := p6_a29;
564 ddp_utilization_rec.attribute_category := p6_a30;
565 ddp_utilization_rec.attribute1 := p6_a31;
566 ddp_utilization_rec.attribute2 := p6_a32;
567 ddp_utilization_rec.attribute3 := p6_a33;
568 ddp_utilization_rec.attribute4 := p6_a34;
569 ddp_utilization_rec.attribute5 := p6_a35;
570 ddp_utilization_rec.attribute6 := p6_a36;
571 ddp_utilization_rec.attribute7 := p6_a37;
572 ddp_utilization_rec.attribute8 := p6_a38;
573 ddp_utilization_rec.attribute9 := p6_a39;
574 ddp_utilization_rec.attribute10 := p6_a40;
575 ddp_utilization_rec.attribute11 := p6_a41;
576 ddp_utilization_rec.attribute12 := p6_a42;
577 ddp_utilization_rec.attribute13 := p6_a43;
578 ddp_utilization_rec.attribute14 := p6_a44;
579 ddp_utilization_rec.attribute15 := p6_a45;
580 ddp_utilization_rec.org_id := p6_a46;
581 ddp_utilization_rec.adjustment_desc := p6_a47;
582 ddp_utilization_rec.language := p6_a48;
583 ddp_utilization_rec.source_lang := p6_a49;
584 ddp_utilization_rec.camp_schedule_id := p6_a50;
585 ddp_utilization_rec.adjustment_type_id := p6_a51;
586 ddp_utilization_rec.gl_date := rosetta_g_miss_date_in_map(p6_a52);
587 ddp_utilization_rec.product_level_type := p6_a53;
588 ddp_utilization_rec.product_id := p6_a54;
589 ddp_utilization_rec.ams_activity_budget_id := p6_a55;
590 ddp_utilization_rec.amount_remaining := p6_a56;
591 ddp_utilization_rec.acctd_amount_remaining := p6_a57;
592 ddp_utilization_rec.cust_account_id := p6_a58;
593 ddp_utilization_rec.price_adjustment_id := p6_a59;
594 ddp_utilization_rec.plan_curr_amount := p6_a60;
595 ddp_utilization_rec.plan_curr_amount_remaining := p6_a61;
596 ddp_utilization_rec.scan_unit := p6_a62;
597 ddp_utilization_rec.scan_unit_remaining := p6_a63;
598 ddp_utilization_rec.activity_product_id := p6_a64;
599 ddp_utilization_rec.scan_data_id := p6_a65;
600 ddp_utilization_rec.volume_offer_tiers_id := p6_a66;
601 ddp_utilization_rec.gl_posted_flag := p6_a67;
602 ddp_utilization_rec.billto_cust_account_id := p6_a68;
603 ddp_utilization_rec.reference_type := p6_a69;
604 ddp_utilization_rec.reference_id := p6_a70;
605 ddp_utilization_rec.order_line_id := p6_a71;
606 ddp_utilization_rec.orig_utilization_id := p6_a72;
607 ddp_utilization_rec.bill_to_site_use_id := p6_a73;
608 ddp_utilization_rec.ship_to_site_use_id := p6_a74;
609 ddp_utilization_rec.univ_curr_amount := p6_a75;
610 ddp_utilization_rec.univ_curr_amount_remaining := p6_a76;
611 ddp_utilization_rec.gl_account_credit := p6_a77;
612 ddp_utilization_rec.gl_account_debit := p6_a78;
613 ddp_utilization_rec.site_use_id := p6_a79;
614
615 -- here's the delegated call to the old PL/SQL routine
616 ozf_fund_utilized_pvt.validate_utilization(p_api_version,
617 p_init_msg_list,
618 p_validation_level,
619 x_return_status,
620 x_msg_count,
621 x_msg_data,
622 ddp_utilization_rec);
623
624 -- copy data back from the local variables to OUT or IN-OUT args, if any
625
626
627
628
629
630
631 end;
632
633 procedure check_utilization_items(p_validation_mode VARCHAR2
634 , x_return_status out nocopy VARCHAR2
635 , p2_a0 NUMBER
636 , p2_a1 DATE
637 , p2_a2 NUMBER
638 , p2_a3 NUMBER
639 , p2_a4 DATE
640 , p2_a5 NUMBER
641 , p2_a6 VARCHAR2
642 , p2_a7 NUMBER
643 , p2_a8 NUMBER
644 , p2_a9 NUMBER
645 , p2_a10 DATE
646 , p2_a11 VARCHAR2
647 , p2_a12 NUMBER
648 , p2_a13 VARCHAR2
649 , p2_a14 NUMBER
650 , p2_a15 VARCHAR2
651 , p2_a16 NUMBER
652 , p2_a17 VARCHAR2
653 , p2_a18 NUMBER
654 , p2_a19 NUMBER
655 , p2_a20 NUMBER
656 , p2_a21 NUMBER
657 , p2_a22 NUMBER
658 , p2_a23 VARCHAR2
659 , p2_a24 VARCHAR2
660 , p2_a25 DATE
661 , p2_a26 NUMBER
662 , p2_a27 VARCHAR2
663 , p2_a28 DATE
664 , p2_a29 NUMBER
665 , p2_a30 VARCHAR2
666 , p2_a31 VARCHAR2
667 , p2_a32 VARCHAR2
668 , p2_a33 VARCHAR2
669 , p2_a34 VARCHAR2
670 , p2_a35 VARCHAR2
671 , p2_a36 VARCHAR2
672 , p2_a37 VARCHAR2
673 , p2_a38 VARCHAR2
674 , p2_a39 VARCHAR2
675 , p2_a40 VARCHAR2
676 , p2_a41 VARCHAR2
677 , p2_a42 VARCHAR2
678 , p2_a43 VARCHAR2
679 , p2_a44 VARCHAR2
680 , p2_a45 VARCHAR2
681 , p2_a46 NUMBER
682 , p2_a47 VARCHAR2
683 , p2_a48 VARCHAR2
684 , p2_a49 VARCHAR2
685 , p2_a50 NUMBER
686 , p2_a51 NUMBER
687 , p2_a52 DATE
688 , p2_a53 VARCHAR2
689 , p2_a54 NUMBER
690 , p2_a55 NUMBER
691 , p2_a56 NUMBER
692 , p2_a57 NUMBER
693 , p2_a58 NUMBER
694 , p2_a59 NUMBER
695 , p2_a60 NUMBER
696 , p2_a61 NUMBER
697 , p2_a62 NUMBER
698 , p2_a63 NUMBER
699 , p2_a64 NUMBER
700 , p2_a65 NUMBER
701 , p2_a66 NUMBER
702 , p2_a67 VARCHAR2
703 , p2_a68 NUMBER
704 , p2_a69 VARCHAR2
705 , p2_a70 NUMBER
706 , p2_a71 NUMBER
707 , p2_a72 NUMBER
708 , p2_a73 NUMBER
709 , p2_a74 NUMBER
710 , p2_a75 NUMBER
711 , p2_a76 NUMBER
712 , p2_a77 NUMBER
713 , p2_a78 NUMBER
714 , p2_a79 NUMBER
715 )
716
717 as
718 ddp_utilization_rec ozf_fund_utilized_pvt.utilization_rec_type;
719 ddindx binary_integer; indx binary_integer;
720 begin
721
722 -- copy data to the local IN or IN-OUT args, if any
723
724
725 ddp_utilization_rec.utilization_id := p2_a0;
726 ddp_utilization_rec.last_update_date := rosetta_g_miss_date_in_map(p2_a1);
727 ddp_utilization_rec.last_updated_by := p2_a2;
728 ddp_utilization_rec.last_update_login := p2_a3;
729 ddp_utilization_rec.creation_date := rosetta_g_miss_date_in_map(p2_a4);
730 ddp_utilization_rec.created_by := p2_a5;
731 ddp_utilization_rec.created_from := p2_a6;
732 ddp_utilization_rec.request_id := p2_a7;
733 ddp_utilization_rec.program_application_id := p2_a8;
734 ddp_utilization_rec.program_id := p2_a9;
735 ddp_utilization_rec.program_update_date := rosetta_g_miss_date_in_map(p2_a10);
736 ddp_utilization_rec.utilization_type := p2_a11;
737 ddp_utilization_rec.fund_id := p2_a12;
738 ddp_utilization_rec.plan_type := p2_a13;
739 ddp_utilization_rec.plan_id := p2_a14;
740 ddp_utilization_rec.component_type := p2_a15;
741 ddp_utilization_rec.component_id := p2_a16;
742 ddp_utilization_rec.object_type := p2_a17;
743 ddp_utilization_rec.object_id := p2_a18;
744 ddp_utilization_rec.order_id := p2_a19;
745 ddp_utilization_rec.invoice_id := p2_a20;
746 ddp_utilization_rec.amount := p2_a21;
747 ddp_utilization_rec.acctd_amount := p2_a22;
748 ddp_utilization_rec.currency_code := p2_a23;
749 ddp_utilization_rec.exchange_rate_type := p2_a24;
750 ddp_utilization_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p2_a25);
751 ddp_utilization_rec.exchange_rate := p2_a26;
752 ddp_utilization_rec.adjustment_type := p2_a27;
753 ddp_utilization_rec.adjustment_date := rosetta_g_miss_date_in_map(p2_a28);
754 ddp_utilization_rec.object_version_number := p2_a29;
755 ddp_utilization_rec.attribute_category := p2_a30;
756 ddp_utilization_rec.attribute1 := p2_a31;
757 ddp_utilization_rec.attribute2 := p2_a32;
758 ddp_utilization_rec.attribute3 := p2_a33;
759 ddp_utilization_rec.attribute4 := p2_a34;
760 ddp_utilization_rec.attribute5 := p2_a35;
761 ddp_utilization_rec.attribute6 := p2_a36;
762 ddp_utilization_rec.attribute7 := p2_a37;
763 ddp_utilization_rec.attribute8 := p2_a38;
764 ddp_utilization_rec.attribute9 := p2_a39;
765 ddp_utilization_rec.attribute10 := p2_a40;
766 ddp_utilization_rec.attribute11 := p2_a41;
767 ddp_utilization_rec.attribute12 := p2_a42;
768 ddp_utilization_rec.attribute13 := p2_a43;
769 ddp_utilization_rec.attribute14 := p2_a44;
770 ddp_utilization_rec.attribute15 := p2_a45;
771 ddp_utilization_rec.org_id := p2_a46;
772 ddp_utilization_rec.adjustment_desc := p2_a47;
773 ddp_utilization_rec.language := p2_a48;
774 ddp_utilization_rec.source_lang := p2_a49;
775 ddp_utilization_rec.camp_schedule_id := p2_a50;
776 ddp_utilization_rec.adjustment_type_id := p2_a51;
777 ddp_utilization_rec.gl_date := rosetta_g_miss_date_in_map(p2_a52);
778 ddp_utilization_rec.product_level_type := p2_a53;
779 ddp_utilization_rec.product_id := p2_a54;
780 ddp_utilization_rec.ams_activity_budget_id := p2_a55;
781 ddp_utilization_rec.amount_remaining := p2_a56;
782 ddp_utilization_rec.acctd_amount_remaining := p2_a57;
783 ddp_utilization_rec.cust_account_id := p2_a58;
784 ddp_utilization_rec.price_adjustment_id := p2_a59;
785 ddp_utilization_rec.plan_curr_amount := p2_a60;
786 ddp_utilization_rec.plan_curr_amount_remaining := p2_a61;
787 ddp_utilization_rec.scan_unit := p2_a62;
788 ddp_utilization_rec.scan_unit_remaining := p2_a63;
789 ddp_utilization_rec.activity_product_id := p2_a64;
790 ddp_utilization_rec.scan_data_id := p2_a65;
791 ddp_utilization_rec.volume_offer_tiers_id := p2_a66;
792 ddp_utilization_rec.gl_posted_flag := p2_a67;
793 ddp_utilization_rec.billto_cust_account_id := p2_a68;
794 ddp_utilization_rec.reference_type := p2_a69;
795 ddp_utilization_rec.reference_id := p2_a70;
796 ddp_utilization_rec.order_line_id := p2_a71;
797 ddp_utilization_rec.orig_utilization_id := p2_a72;
798 ddp_utilization_rec.bill_to_site_use_id := p2_a73;
799 ddp_utilization_rec.ship_to_site_use_id := p2_a74;
800 ddp_utilization_rec.univ_curr_amount := p2_a75;
801 ddp_utilization_rec.univ_curr_amount_remaining := p2_a76;
802 ddp_utilization_rec.gl_account_credit := p2_a77;
803 ddp_utilization_rec.gl_account_debit := p2_a78;
804 ddp_utilization_rec.site_use_id := p2_a79;
805
806 -- here's the delegated call to the old PL/SQL routine
807 ozf_fund_utilized_pvt.check_utilization_items(p_validation_mode,
808 x_return_status,
809 ddp_utilization_rec);
810
811 -- copy data back from the local variables to OUT or IN-OUT args, if any
812
813
814 end;
815
816 procedure check_utilization_record(p0_a0 NUMBER
817 , p0_a1 DATE
818 , p0_a2 NUMBER
819 , p0_a3 NUMBER
820 , p0_a4 DATE
821 , p0_a5 NUMBER
822 , p0_a6 VARCHAR2
823 , p0_a7 NUMBER
824 , p0_a8 NUMBER
825 , p0_a9 NUMBER
826 , p0_a10 DATE
827 , p0_a11 VARCHAR2
828 , p0_a12 NUMBER
829 , p0_a13 VARCHAR2
830 , p0_a14 NUMBER
831 , p0_a15 VARCHAR2
832 , p0_a16 NUMBER
833 , p0_a17 VARCHAR2
834 , p0_a18 NUMBER
835 , p0_a19 NUMBER
836 , p0_a20 NUMBER
837 , p0_a21 NUMBER
838 , p0_a22 NUMBER
839 , p0_a23 VARCHAR2
840 , p0_a24 VARCHAR2
841 , p0_a25 DATE
842 , p0_a26 NUMBER
843 , p0_a27 VARCHAR2
844 , p0_a28 DATE
845 , p0_a29 NUMBER
846 , p0_a30 VARCHAR2
847 , p0_a31 VARCHAR2
848 , p0_a32 VARCHAR2
849 , p0_a33 VARCHAR2
850 , p0_a34 VARCHAR2
851 , p0_a35 VARCHAR2
852 , p0_a36 VARCHAR2
853 , p0_a37 VARCHAR2
854 , p0_a38 VARCHAR2
855 , p0_a39 VARCHAR2
856 , p0_a40 VARCHAR2
857 , p0_a41 VARCHAR2
858 , p0_a42 VARCHAR2
859 , p0_a43 VARCHAR2
860 , p0_a44 VARCHAR2
861 , p0_a45 VARCHAR2
862 , p0_a46 NUMBER
863 , p0_a47 VARCHAR2
864 , p0_a48 VARCHAR2
865 , p0_a49 VARCHAR2
866 , p0_a50 NUMBER
867 , p0_a51 NUMBER
868 , p0_a52 DATE
869 , p0_a53 VARCHAR2
870 , p0_a54 NUMBER
871 , p0_a55 NUMBER
872 , p0_a56 NUMBER
873 , p0_a57 NUMBER
874 , p0_a58 NUMBER
875 , p0_a59 NUMBER
876 , p0_a60 NUMBER
877 , p0_a61 NUMBER
878 , p0_a62 NUMBER
879 , p0_a63 NUMBER
880 , p0_a64 NUMBER
881 , p0_a65 NUMBER
882 , p0_a66 NUMBER
883 , p0_a67 VARCHAR2
884 , p0_a68 NUMBER
885 , p0_a69 VARCHAR2
886 , p0_a70 NUMBER
887 , p0_a71 NUMBER
888 , p0_a72 NUMBER
889 , p0_a73 NUMBER
890 , p0_a74 NUMBER
891 , p0_a75 NUMBER
892 , p0_a76 NUMBER
893 , p0_a77 NUMBER
894 , p0_a78 NUMBER
895 , p0_a79 NUMBER
896 , p1_a0 NUMBER
897 , p1_a1 DATE
898 , p1_a2 NUMBER
899 , p1_a3 NUMBER
900 , p1_a4 DATE
901 , p1_a5 NUMBER
902 , p1_a6 VARCHAR2
903 , p1_a7 NUMBER
904 , p1_a8 NUMBER
905 , p1_a9 NUMBER
906 , p1_a10 DATE
907 , p1_a11 VARCHAR2
908 , p1_a12 NUMBER
909 , p1_a13 VARCHAR2
910 , p1_a14 NUMBER
911 , p1_a15 VARCHAR2
912 , p1_a16 NUMBER
913 , p1_a17 VARCHAR2
914 , p1_a18 NUMBER
915 , p1_a19 NUMBER
916 , p1_a20 NUMBER
917 , p1_a21 NUMBER
918 , p1_a22 NUMBER
919 , p1_a23 VARCHAR2
920 , p1_a24 VARCHAR2
921 , p1_a25 DATE
922 , p1_a26 NUMBER
923 , p1_a27 VARCHAR2
924 , p1_a28 DATE
925 , p1_a29 NUMBER
926 , p1_a30 VARCHAR2
927 , p1_a31 VARCHAR2
928 , p1_a32 VARCHAR2
929 , p1_a33 VARCHAR2
930 , p1_a34 VARCHAR2
931 , p1_a35 VARCHAR2
932 , p1_a36 VARCHAR2
933 , p1_a37 VARCHAR2
934 , p1_a38 VARCHAR2
935 , p1_a39 VARCHAR2
936 , p1_a40 VARCHAR2
937 , p1_a41 VARCHAR2
938 , p1_a42 VARCHAR2
939 , p1_a43 VARCHAR2
940 , p1_a44 VARCHAR2
941 , p1_a45 VARCHAR2
942 , p1_a46 NUMBER
943 , p1_a47 VARCHAR2
944 , p1_a48 VARCHAR2
945 , p1_a49 VARCHAR2
946 , p1_a50 NUMBER
947 , p1_a51 NUMBER
948 , p1_a52 DATE
949 , p1_a53 VARCHAR2
950 , p1_a54 NUMBER
951 , p1_a55 NUMBER
952 , p1_a56 NUMBER
953 , p1_a57 NUMBER
954 , p1_a58 NUMBER
955 , p1_a59 NUMBER
956 , p1_a60 NUMBER
957 , p1_a61 NUMBER
958 , p1_a62 NUMBER
959 , p1_a63 NUMBER
960 , p1_a64 NUMBER
961 , p1_a65 NUMBER
962 , p1_a66 NUMBER
963 , p1_a67 VARCHAR2
964 , p1_a68 NUMBER
965 , p1_a69 VARCHAR2
966 , p1_a70 NUMBER
967 , p1_a71 NUMBER
968 , p1_a72 NUMBER
969 , p1_a73 NUMBER
970 , p1_a74 NUMBER
971 , p1_a75 NUMBER
972 , p1_a76 NUMBER
973 , p1_a77 NUMBER
974 , p1_a78 NUMBER
975 , p1_a79 NUMBER
976 , p_mode VARCHAR2
977 , x_return_status out nocopy VARCHAR2
978 )
979
980 as
981 ddp_utilization_rec ozf_fund_utilized_pvt.utilization_rec_type;
982 ddp_complete_rec ozf_fund_utilized_pvt.utilization_rec_type;
983 ddindx binary_integer; indx binary_integer;
984 begin
985
986 -- copy data to the local IN or IN-OUT args, if any
987 ddp_utilization_rec.utilization_id := p0_a0;
988 ddp_utilization_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
989 ddp_utilization_rec.last_updated_by := p0_a2;
990 ddp_utilization_rec.last_update_login := p0_a3;
991 ddp_utilization_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
992 ddp_utilization_rec.created_by := p0_a5;
993 ddp_utilization_rec.created_from := p0_a6;
994 ddp_utilization_rec.request_id := p0_a7;
995 ddp_utilization_rec.program_application_id := p0_a8;
996 ddp_utilization_rec.program_id := p0_a9;
997 ddp_utilization_rec.program_update_date := rosetta_g_miss_date_in_map(p0_a10);
998 ddp_utilization_rec.utilization_type := p0_a11;
999 ddp_utilization_rec.fund_id := p0_a12;
1000 ddp_utilization_rec.plan_type := p0_a13;
1001 ddp_utilization_rec.plan_id := p0_a14;
1002 ddp_utilization_rec.component_type := p0_a15;
1003 ddp_utilization_rec.component_id := p0_a16;
1004 ddp_utilization_rec.object_type := p0_a17;
1005 ddp_utilization_rec.object_id := p0_a18;
1006 ddp_utilization_rec.order_id := p0_a19;
1007 ddp_utilization_rec.invoice_id := p0_a20;
1008 ddp_utilization_rec.amount := p0_a21;
1009 ddp_utilization_rec.acctd_amount := p0_a22;
1010 ddp_utilization_rec.currency_code := p0_a23;
1011 ddp_utilization_rec.exchange_rate_type := p0_a24;
1012 ddp_utilization_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p0_a25);
1013 ddp_utilization_rec.exchange_rate := p0_a26;
1014 ddp_utilization_rec.adjustment_type := p0_a27;
1015 ddp_utilization_rec.adjustment_date := rosetta_g_miss_date_in_map(p0_a28);
1016 ddp_utilization_rec.object_version_number := p0_a29;
1017 ddp_utilization_rec.attribute_category := p0_a30;
1018 ddp_utilization_rec.attribute1 := p0_a31;
1019 ddp_utilization_rec.attribute2 := p0_a32;
1020 ddp_utilization_rec.attribute3 := p0_a33;
1021 ddp_utilization_rec.attribute4 := p0_a34;
1022 ddp_utilization_rec.attribute5 := p0_a35;
1023 ddp_utilization_rec.attribute6 := p0_a36;
1024 ddp_utilization_rec.attribute7 := p0_a37;
1025 ddp_utilization_rec.attribute8 := p0_a38;
1026 ddp_utilization_rec.attribute9 := p0_a39;
1027 ddp_utilization_rec.attribute10 := p0_a40;
1028 ddp_utilization_rec.attribute11 := p0_a41;
1029 ddp_utilization_rec.attribute12 := p0_a42;
1030 ddp_utilization_rec.attribute13 := p0_a43;
1031 ddp_utilization_rec.attribute14 := p0_a44;
1032 ddp_utilization_rec.attribute15 := p0_a45;
1033 ddp_utilization_rec.org_id := p0_a46;
1034 ddp_utilization_rec.adjustment_desc := p0_a47;
1035 ddp_utilization_rec.language := p0_a48;
1036 ddp_utilization_rec.source_lang := p0_a49;
1037 ddp_utilization_rec.camp_schedule_id := p0_a50;
1038 ddp_utilization_rec.adjustment_type_id := p0_a51;
1039 ddp_utilization_rec.gl_date := rosetta_g_miss_date_in_map(p0_a52);
1040 ddp_utilization_rec.product_level_type := p0_a53;
1041 ddp_utilization_rec.product_id := p0_a54;
1042 ddp_utilization_rec.ams_activity_budget_id := p0_a55;
1043 ddp_utilization_rec.amount_remaining := p0_a56;
1044 ddp_utilization_rec.acctd_amount_remaining := p0_a57;
1045 ddp_utilization_rec.cust_account_id := p0_a58;
1046 ddp_utilization_rec.price_adjustment_id := p0_a59;
1047 ddp_utilization_rec.plan_curr_amount := p0_a60;
1048 ddp_utilization_rec.plan_curr_amount_remaining := p0_a61;
1049 ddp_utilization_rec.scan_unit := p0_a62;
1050 ddp_utilization_rec.scan_unit_remaining := p0_a63;
1051 ddp_utilization_rec.activity_product_id := p0_a64;
1052 ddp_utilization_rec.scan_data_id := p0_a65;
1053 ddp_utilization_rec.volume_offer_tiers_id := p0_a66;
1054 ddp_utilization_rec.gl_posted_flag := p0_a67;
1055 ddp_utilization_rec.billto_cust_account_id := p0_a68;
1056 ddp_utilization_rec.reference_type := p0_a69;
1057 ddp_utilization_rec.reference_id := p0_a70;
1058 ddp_utilization_rec.order_line_id := p0_a71;
1059 ddp_utilization_rec.orig_utilization_id := p0_a72;
1060 ddp_utilization_rec.bill_to_site_use_id := p0_a73;
1061 ddp_utilization_rec.ship_to_site_use_id := p0_a74;
1062 ddp_utilization_rec.univ_curr_amount := p0_a75;
1063 ddp_utilization_rec.univ_curr_amount_remaining := p0_a76;
1064 ddp_utilization_rec.gl_account_credit := p0_a77;
1065 ddp_utilization_rec.gl_account_debit := p0_a78;
1066 ddp_utilization_rec.site_use_id := p0_a79;
1067
1068 ddp_complete_rec.utilization_id := p1_a0;
1069 ddp_complete_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
1070 ddp_complete_rec.last_updated_by := p1_a2;
1071 ddp_complete_rec.last_update_login := p1_a3;
1072 ddp_complete_rec.creation_date := rosetta_g_miss_date_in_map(p1_a4);
1073 ddp_complete_rec.created_by := p1_a5;
1074 ddp_complete_rec.created_from := p1_a6;
1075 ddp_complete_rec.request_id := p1_a7;
1076 ddp_complete_rec.program_application_id := p1_a8;
1077 ddp_complete_rec.program_id := p1_a9;
1078 ddp_complete_rec.program_update_date := rosetta_g_miss_date_in_map(p1_a10);
1079 ddp_complete_rec.utilization_type := p1_a11;
1080 ddp_complete_rec.fund_id := p1_a12;
1081 ddp_complete_rec.plan_type := p1_a13;
1082 ddp_complete_rec.plan_id := p1_a14;
1083 ddp_complete_rec.component_type := p1_a15;
1084 ddp_complete_rec.component_id := p1_a16;
1085 ddp_complete_rec.object_type := p1_a17;
1086 ddp_complete_rec.object_id := p1_a18;
1087 ddp_complete_rec.order_id := p1_a19;
1088 ddp_complete_rec.invoice_id := p1_a20;
1089 ddp_complete_rec.amount := p1_a21;
1090 ddp_complete_rec.acctd_amount := p1_a22;
1091 ddp_complete_rec.currency_code := p1_a23;
1092 ddp_complete_rec.exchange_rate_type := p1_a24;
1093 ddp_complete_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p1_a25);
1094 ddp_complete_rec.exchange_rate := p1_a26;
1095 ddp_complete_rec.adjustment_type := p1_a27;
1096 ddp_complete_rec.adjustment_date := rosetta_g_miss_date_in_map(p1_a28);
1097 ddp_complete_rec.object_version_number := p1_a29;
1098 ddp_complete_rec.attribute_category := p1_a30;
1099 ddp_complete_rec.attribute1 := p1_a31;
1100 ddp_complete_rec.attribute2 := p1_a32;
1101 ddp_complete_rec.attribute3 := p1_a33;
1102 ddp_complete_rec.attribute4 := p1_a34;
1103 ddp_complete_rec.attribute5 := p1_a35;
1104 ddp_complete_rec.attribute6 := p1_a36;
1105 ddp_complete_rec.attribute7 := p1_a37;
1106 ddp_complete_rec.attribute8 := p1_a38;
1107 ddp_complete_rec.attribute9 := p1_a39;
1108 ddp_complete_rec.attribute10 := p1_a40;
1109 ddp_complete_rec.attribute11 := p1_a41;
1110 ddp_complete_rec.attribute12 := p1_a42;
1111 ddp_complete_rec.attribute13 := p1_a43;
1112 ddp_complete_rec.attribute14 := p1_a44;
1113 ddp_complete_rec.attribute15 := p1_a45;
1114 ddp_complete_rec.org_id := p1_a46;
1115 ddp_complete_rec.adjustment_desc := p1_a47;
1116 ddp_complete_rec.language := p1_a48;
1117 ddp_complete_rec.source_lang := p1_a49;
1118 ddp_complete_rec.camp_schedule_id := p1_a50;
1119 ddp_complete_rec.adjustment_type_id := p1_a51;
1120 ddp_complete_rec.gl_date := rosetta_g_miss_date_in_map(p1_a52);
1121 ddp_complete_rec.product_level_type := p1_a53;
1122 ddp_complete_rec.product_id := p1_a54;
1123 ddp_complete_rec.ams_activity_budget_id := p1_a55;
1124 ddp_complete_rec.amount_remaining := p1_a56;
1125 ddp_complete_rec.acctd_amount_remaining := p1_a57;
1126 ddp_complete_rec.cust_account_id := p1_a58;
1127 ddp_complete_rec.price_adjustment_id := p1_a59;
1128 ddp_complete_rec.plan_curr_amount := p1_a60;
1129 ddp_complete_rec.plan_curr_amount_remaining := p1_a61;
1130 ddp_complete_rec.scan_unit := p1_a62;
1131 ddp_complete_rec.scan_unit_remaining := p1_a63;
1132 ddp_complete_rec.activity_product_id := p1_a64;
1133 ddp_complete_rec.scan_data_id := p1_a65;
1134 ddp_complete_rec.volume_offer_tiers_id := p1_a66;
1135 ddp_complete_rec.gl_posted_flag := p1_a67;
1136 ddp_complete_rec.billto_cust_account_id := p1_a68;
1137 ddp_complete_rec.reference_type := p1_a69;
1138 ddp_complete_rec.reference_id := p1_a70;
1139 ddp_complete_rec.order_line_id := p1_a71;
1140 ddp_complete_rec.orig_utilization_id := p1_a72;
1141 ddp_complete_rec.bill_to_site_use_id := p1_a73;
1142 ddp_complete_rec.ship_to_site_use_id := p1_a74;
1143 ddp_complete_rec.univ_curr_amount := p1_a75;
1144 ddp_complete_rec.univ_curr_amount_remaining := p1_a76;
1145 ddp_complete_rec.gl_account_credit := p1_a77;
1146 ddp_complete_rec.gl_account_debit := p1_a78;
1147 ddp_complete_rec.site_use_id := p1_a79;
1148
1149
1150
1151 -- here's the delegated call to the old PL/SQL routine
1152 ozf_fund_utilized_pvt.check_utilization_record(ddp_utilization_rec,
1153 ddp_complete_rec,
1154 p_mode,
1155 x_return_status);
1156
1157 -- copy data back from the local variables to OUT or IN-OUT args, if any
1158
1159
1160
1161 end;
1162
1163 procedure init_utilization_rec(p0_a0 out nocopy NUMBER
1164 , p0_a1 out nocopy DATE
1165 , p0_a2 out nocopy NUMBER
1166 , p0_a3 out nocopy NUMBER
1167 , p0_a4 out nocopy DATE
1168 , p0_a5 out nocopy NUMBER
1169 , p0_a6 out nocopy VARCHAR2
1170 , p0_a7 out nocopy NUMBER
1171 , p0_a8 out nocopy NUMBER
1172 , p0_a9 out nocopy NUMBER
1173 , p0_a10 out nocopy DATE
1174 , p0_a11 out nocopy VARCHAR2
1175 , p0_a12 out nocopy NUMBER
1176 , p0_a13 out nocopy VARCHAR2
1177 , p0_a14 out nocopy NUMBER
1178 , p0_a15 out nocopy VARCHAR2
1179 , p0_a16 out nocopy NUMBER
1180 , p0_a17 out nocopy VARCHAR2
1181 , p0_a18 out nocopy NUMBER
1182 , p0_a19 out nocopy NUMBER
1183 , p0_a20 out nocopy NUMBER
1184 , p0_a21 out nocopy NUMBER
1185 , p0_a22 out nocopy NUMBER
1186 , p0_a23 out nocopy VARCHAR2
1187 , p0_a24 out nocopy VARCHAR2
1188 , p0_a25 out nocopy DATE
1189 , p0_a26 out nocopy NUMBER
1190 , p0_a27 out nocopy VARCHAR2
1191 , p0_a28 out nocopy DATE
1192 , p0_a29 out nocopy NUMBER
1193 , p0_a30 out nocopy VARCHAR2
1194 , p0_a31 out nocopy VARCHAR2
1195 , p0_a32 out nocopy VARCHAR2
1196 , p0_a33 out nocopy VARCHAR2
1197 , p0_a34 out nocopy VARCHAR2
1198 , p0_a35 out nocopy VARCHAR2
1199 , p0_a36 out nocopy VARCHAR2
1200 , p0_a37 out nocopy VARCHAR2
1201 , p0_a38 out nocopy VARCHAR2
1202 , p0_a39 out nocopy VARCHAR2
1203 , p0_a40 out nocopy VARCHAR2
1204 , p0_a41 out nocopy VARCHAR2
1205 , p0_a42 out nocopy VARCHAR2
1206 , p0_a43 out nocopy VARCHAR2
1207 , p0_a44 out nocopy VARCHAR2
1208 , p0_a45 out nocopy VARCHAR2
1209 , p0_a46 out nocopy NUMBER
1210 , p0_a47 out nocopy VARCHAR2
1211 , p0_a48 out nocopy VARCHAR2
1212 , p0_a49 out nocopy VARCHAR2
1213 , p0_a50 out nocopy NUMBER
1214 , p0_a51 out nocopy NUMBER
1215 , p0_a52 out nocopy DATE
1216 , p0_a53 out nocopy VARCHAR2
1217 , p0_a54 out nocopy NUMBER
1218 , p0_a55 out nocopy NUMBER
1219 , p0_a56 out nocopy NUMBER
1220 , p0_a57 out nocopy NUMBER
1221 , p0_a58 out nocopy NUMBER
1222 , p0_a59 out nocopy NUMBER
1223 , p0_a60 out nocopy NUMBER
1224 , p0_a61 out nocopy NUMBER
1225 , p0_a62 out nocopy NUMBER
1226 , p0_a63 out nocopy NUMBER
1227 , p0_a64 out nocopy NUMBER
1228 , p0_a65 out nocopy NUMBER
1229 , p0_a66 out nocopy NUMBER
1230 , p0_a67 out nocopy VARCHAR2
1231 , p0_a68 out nocopy NUMBER
1232 , p0_a69 out nocopy VARCHAR2
1233 , p0_a70 out nocopy NUMBER
1234 , p0_a71 out nocopy NUMBER
1235 , p0_a72 out nocopy NUMBER
1236 , p0_a73 out nocopy NUMBER
1237 , p0_a74 out nocopy NUMBER
1238 , p0_a75 out nocopy NUMBER
1239 , p0_a76 out nocopy NUMBER
1240 , p0_a77 out nocopy NUMBER
1241 , p0_a78 out nocopy NUMBER
1242 , p0_a79 out nocopy NUMBER
1243 )
1244
1245 as
1246 ddx_utilization_rec ozf_fund_utilized_pvt.utilization_rec_type;
1247 ddindx binary_integer; indx binary_integer;
1248 begin
1249
1250 -- copy data to the local IN or IN-OUT args, if any
1251
1252 -- here's the delegated call to the old PL/SQL routine
1253 ozf_fund_utilized_pvt.init_utilization_rec(ddx_utilization_rec);
1254
1255 -- copy data back from the local variables to OUT or IN-OUT args, if any
1256 p0_a0 := ddx_utilization_rec.utilization_id;
1257 p0_a1 := ddx_utilization_rec.last_update_date;
1258 p0_a2 := ddx_utilization_rec.last_updated_by;
1259 p0_a3 := ddx_utilization_rec.last_update_login;
1260 p0_a4 := ddx_utilization_rec.creation_date;
1261 p0_a5 := ddx_utilization_rec.created_by;
1262 p0_a6 := ddx_utilization_rec.created_from;
1263 p0_a7 := ddx_utilization_rec.request_id;
1264 p0_a8 := ddx_utilization_rec.program_application_id;
1265 p0_a9 := ddx_utilization_rec.program_id;
1266 p0_a10 := ddx_utilization_rec.program_update_date;
1267 p0_a11 := ddx_utilization_rec.utilization_type;
1268 p0_a12 := ddx_utilization_rec.fund_id;
1269 p0_a13 := ddx_utilization_rec.plan_type;
1270 p0_a14 := ddx_utilization_rec.plan_id;
1271 p0_a15 := ddx_utilization_rec.component_type;
1272 p0_a16 := ddx_utilization_rec.component_id;
1273 p0_a17 := ddx_utilization_rec.object_type;
1274 p0_a18 := ddx_utilization_rec.object_id;
1275 p0_a19 := ddx_utilization_rec.order_id;
1276 p0_a20 := ddx_utilization_rec.invoice_id;
1277 p0_a21 := ddx_utilization_rec.amount;
1278 p0_a22 := ddx_utilization_rec.acctd_amount;
1279 p0_a23 := ddx_utilization_rec.currency_code;
1280 p0_a24 := ddx_utilization_rec.exchange_rate_type;
1281 p0_a25 := ddx_utilization_rec.exchange_rate_date;
1282 p0_a26 := ddx_utilization_rec.exchange_rate;
1283 p0_a27 := ddx_utilization_rec.adjustment_type;
1284 p0_a28 := ddx_utilization_rec.adjustment_date;
1285 p0_a29 := ddx_utilization_rec.object_version_number;
1286 p0_a30 := ddx_utilization_rec.attribute_category;
1287 p0_a31 := ddx_utilization_rec.attribute1;
1288 p0_a32 := ddx_utilization_rec.attribute2;
1289 p0_a33 := ddx_utilization_rec.attribute3;
1290 p0_a34 := ddx_utilization_rec.attribute4;
1291 p0_a35 := ddx_utilization_rec.attribute5;
1292 p0_a36 := ddx_utilization_rec.attribute6;
1293 p0_a37 := ddx_utilization_rec.attribute7;
1294 p0_a38 := ddx_utilization_rec.attribute8;
1295 p0_a39 := ddx_utilization_rec.attribute9;
1296 p0_a40 := ddx_utilization_rec.attribute10;
1297 p0_a41 := ddx_utilization_rec.attribute11;
1298 p0_a42 := ddx_utilization_rec.attribute12;
1299 p0_a43 := ddx_utilization_rec.attribute13;
1300 p0_a44 := ddx_utilization_rec.attribute14;
1301 p0_a45 := ddx_utilization_rec.attribute15;
1302 p0_a46 := ddx_utilization_rec.org_id;
1303 p0_a47 := ddx_utilization_rec.adjustment_desc;
1304 p0_a48 := ddx_utilization_rec.language;
1305 p0_a49 := ddx_utilization_rec.source_lang;
1306 p0_a50 := ddx_utilization_rec.camp_schedule_id;
1307 p0_a51 := ddx_utilization_rec.adjustment_type_id;
1308 p0_a52 := ddx_utilization_rec.gl_date;
1309 p0_a53 := ddx_utilization_rec.product_level_type;
1310 p0_a54 := ddx_utilization_rec.product_id;
1311 p0_a55 := ddx_utilization_rec.ams_activity_budget_id;
1312 p0_a56 := ddx_utilization_rec.amount_remaining;
1313 p0_a57 := ddx_utilization_rec.acctd_amount_remaining;
1314 p0_a58 := ddx_utilization_rec.cust_account_id;
1315 p0_a59 := ddx_utilization_rec.price_adjustment_id;
1316 p0_a60 := ddx_utilization_rec.plan_curr_amount;
1317 p0_a61 := ddx_utilization_rec.plan_curr_amount_remaining;
1318 p0_a62 := ddx_utilization_rec.scan_unit;
1319 p0_a63 := ddx_utilization_rec.scan_unit_remaining;
1320 p0_a64 := ddx_utilization_rec.activity_product_id;
1321 p0_a65 := ddx_utilization_rec.scan_data_id;
1322 p0_a66 := ddx_utilization_rec.volume_offer_tiers_id;
1323 p0_a67 := ddx_utilization_rec.gl_posted_flag;
1324 p0_a68 := ddx_utilization_rec.billto_cust_account_id;
1325 p0_a69 := ddx_utilization_rec.reference_type;
1326 p0_a70 := ddx_utilization_rec.reference_id;
1327 p0_a71 := ddx_utilization_rec.order_line_id;
1328 p0_a72 := ddx_utilization_rec.orig_utilization_id;
1329 p0_a73 := ddx_utilization_rec.bill_to_site_use_id;
1330 p0_a74 := ddx_utilization_rec.ship_to_site_use_id;
1331 p0_a75 := ddx_utilization_rec.univ_curr_amount;
1332 p0_a76 := ddx_utilization_rec.univ_curr_amount_remaining;
1333 p0_a77 := ddx_utilization_rec.gl_account_credit;
1334 p0_a78 := ddx_utilization_rec.gl_account_debit;
1335 p0_a79 := ddx_utilization_rec.site_use_id;
1336 end;
1337
1338 procedure complete_utilization_rec(p0_a0 NUMBER
1339 , p0_a1 DATE
1340 , p0_a2 NUMBER
1341 , p0_a3 NUMBER
1342 , p0_a4 DATE
1343 , p0_a5 NUMBER
1344 , p0_a6 VARCHAR2
1345 , p0_a7 NUMBER
1346 , p0_a8 NUMBER
1347 , p0_a9 NUMBER
1348 , p0_a10 DATE
1349 , p0_a11 VARCHAR2
1350 , p0_a12 NUMBER
1351 , p0_a13 VARCHAR2
1352 , p0_a14 NUMBER
1353 , p0_a15 VARCHAR2
1354 , p0_a16 NUMBER
1355 , p0_a17 VARCHAR2
1356 , p0_a18 NUMBER
1357 , p0_a19 NUMBER
1358 , p0_a20 NUMBER
1359 , p0_a21 NUMBER
1360 , p0_a22 NUMBER
1361 , p0_a23 VARCHAR2
1362 , p0_a24 VARCHAR2
1363 , p0_a25 DATE
1364 , p0_a26 NUMBER
1365 , p0_a27 VARCHAR2
1366 , p0_a28 DATE
1367 , p0_a29 NUMBER
1368 , p0_a30 VARCHAR2
1369 , p0_a31 VARCHAR2
1370 , p0_a32 VARCHAR2
1371 , p0_a33 VARCHAR2
1372 , p0_a34 VARCHAR2
1373 , p0_a35 VARCHAR2
1374 , p0_a36 VARCHAR2
1375 , p0_a37 VARCHAR2
1376 , p0_a38 VARCHAR2
1377 , p0_a39 VARCHAR2
1378 , p0_a40 VARCHAR2
1379 , p0_a41 VARCHAR2
1380 , p0_a42 VARCHAR2
1381 , p0_a43 VARCHAR2
1382 , p0_a44 VARCHAR2
1383 , p0_a45 VARCHAR2
1384 , p0_a46 NUMBER
1385 , p0_a47 VARCHAR2
1386 , p0_a48 VARCHAR2
1387 , p0_a49 VARCHAR2
1388 , p0_a50 NUMBER
1389 , p0_a51 NUMBER
1390 , p0_a52 DATE
1391 , p0_a53 VARCHAR2
1392 , p0_a54 NUMBER
1393 , p0_a55 NUMBER
1394 , p0_a56 NUMBER
1395 , p0_a57 NUMBER
1396 , p0_a58 NUMBER
1397 , p0_a59 NUMBER
1398 , p0_a60 NUMBER
1399 , p0_a61 NUMBER
1400 , p0_a62 NUMBER
1401 , p0_a63 NUMBER
1402 , p0_a64 NUMBER
1403 , p0_a65 NUMBER
1404 , p0_a66 NUMBER
1405 , p0_a67 VARCHAR2
1406 , p0_a68 NUMBER
1407 , p0_a69 VARCHAR2
1408 , p0_a70 NUMBER
1409 , p0_a71 NUMBER
1410 , p0_a72 NUMBER
1411 , p0_a73 NUMBER
1412 , p0_a74 NUMBER
1413 , p0_a75 NUMBER
1414 , p0_a76 NUMBER
1415 , p0_a77 NUMBER
1416 , p0_a78 NUMBER
1417 , p0_a79 NUMBER
1418 , p1_a0 out nocopy NUMBER
1419 , p1_a1 out nocopy DATE
1420 , p1_a2 out nocopy NUMBER
1421 , p1_a3 out nocopy NUMBER
1422 , p1_a4 out nocopy DATE
1423 , p1_a5 out nocopy NUMBER
1424 , p1_a6 out nocopy VARCHAR2
1425 , p1_a7 out nocopy NUMBER
1426 , p1_a8 out nocopy NUMBER
1427 , p1_a9 out nocopy NUMBER
1428 , p1_a10 out nocopy DATE
1429 , p1_a11 out nocopy VARCHAR2
1430 , p1_a12 out nocopy NUMBER
1431 , p1_a13 out nocopy VARCHAR2
1432 , p1_a14 out nocopy NUMBER
1433 , p1_a15 out nocopy VARCHAR2
1434 , p1_a16 out nocopy NUMBER
1435 , p1_a17 out nocopy VARCHAR2
1436 , p1_a18 out nocopy NUMBER
1437 , p1_a19 out nocopy NUMBER
1438 , p1_a20 out nocopy NUMBER
1439 , p1_a21 out nocopy NUMBER
1440 , p1_a22 out nocopy NUMBER
1441 , p1_a23 out nocopy VARCHAR2
1442 , p1_a24 out nocopy VARCHAR2
1443 , p1_a25 out nocopy DATE
1444 , p1_a26 out nocopy NUMBER
1445 , p1_a27 out nocopy VARCHAR2
1446 , p1_a28 out nocopy DATE
1447 , p1_a29 out nocopy NUMBER
1448 , p1_a30 out nocopy VARCHAR2
1449 , p1_a31 out nocopy VARCHAR2
1450 , p1_a32 out nocopy VARCHAR2
1451 , p1_a33 out nocopy VARCHAR2
1452 , p1_a34 out nocopy VARCHAR2
1453 , p1_a35 out nocopy VARCHAR2
1454 , p1_a36 out nocopy VARCHAR2
1455 , p1_a37 out nocopy VARCHAR2
1456 , p1_a38 out nocopy VARCHAR2
1457 , p1_a39 out nocopy VARCHAR2
1458 , p1_a40 out nocopy VARCHAR2
1459 , p1_a41 out nocopy VARCHAR2
1460 , p1_a42 out nocopy VARCHAR2
1461 , p1_a43 out nocopy VARCHAR2
1462 , p1_a44 out nocopy VARCHAR2
1463 , p1_a45 out nocopy VARCHAR2
1464 , p1_a46 out nocopy NUMBER
1465 , p1_a47 out nocopy VARCHAR2
1466 , p1_a48 out nocopy VARCHAR2
1467 , p1_a49 out nocopy VARCHAR2
1468 , p1_a50 out nocopy NUMBER
1469 , p1_a51 out nocopy NUMBER
1470 , p1_a52 out nocopy DATE
1471 , p1_a53 out nocopy VARCHAR2
1472 , p1_a54 out nocopy NUMBER
1473 , p1_a55 out nocopy NUMBER
1474 , p1_a56 out nocopy NUMBER
1475 , p1_a57 out nocopy NUMBER
1476 , p1_a58 out nocopy NUMBER
1477 , p1_a59 out nocopy NUMBER
1478 , p1_a60 out nocopy NUMBER
1479 , p1_a61 out nocopy NUMBER
1480 , p1_a62 out nocopy NUMBER
1481 , p1_a63 out nocopy NUMBER
1482 , p1_a64 out nocopy NUMBER
1483 , p1_a65 out nocopy NUMBER
1484 , p1_a66 out nocopy NUMBER
1485 , p1_a67 out nocopy VARCHAR2
1486 , p1_a68 out nocopy NUMBER
1487 , p1_a69 out nocopy VARCHAR2
1488 , p1_a70 out nocopy NUMBER
1489 , p1_a71 out nocopy NUMBER
1490 , p1_a72 out nocopy NUMBER
1491 , p1_a73 out nocopy NUMBER
1492 , p1_a74 out nocopy NUMBER
1493 , p1_a75 out nocopy NUMBER
1494 , p1_a76 out nocopy NUMBER
1495 , p1_a77 out nocopy NUMBER
1496 , p1_a78 out nocopy NUMBER
1497 , p1_a79 out nocopy NUMBER
1498 )
1499
1500 as
1501 ddp_utilization_rec ozf_fund_utilized_pvt.utilization_rec_type;
1502 ddx_complete_rec ozf_fund_utilized_pvt.utilization_rec_type;
1503 ddindx binary_integer; indx binary_integer;
1504 begin
1505
1506 -- copy data to the local IN or IN-OUT args, if any
1507 ddp_utilization_rec.utilization_id := p0_a0;
1508 ddp_utilization_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
1509 ddp_utilization_rec.last_updated_by := p0_a2;
1510 ddp_utilization_rec.last_update_login := p0_a3;
1511 ddp_utilization_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
1512 ddp_utilization_rec.created_by := p0_a5;
1513 ddp_utilization_rec.created_from := p0_a6;
1514 ddp_utilization_rec.request_id := p0_a7;
1515 ddp_utilization_rec.program_application_id := p0_a8;
1516 ddp_utilization_rec.program_id := p0_a9;
1517 ddp_utilization_rec.program_update_date := rosetta_g_miss_date_in_map(p0_a10);
1518 ddp_utilization_rec.utilization_type := p0_a11;
1519 ddp_utilization_rec.fund_id := p0_a12;
1520 ddp_utilization_rec.plan_type := p0_a13;
1521 ddp_utilization_rec.plan_id := p0_a14;
1522 ddp_utilization_rec.component_type := p0_a15;
1523 ddp_utilization_rec.component_id := p0_a16;
1524 ddp_utilization_rec.object_type := p0_a17;
1525 ddp_utilization_rec.object_id := p0_a18;
1526 ddp_utilization_rec.order_id := p0_a19;
1527 ddp_utilization_rec.invoice_id := p0_a20;
1528 ddp_utilization_rec.amount := p0_a21;
1529 ddp_utilization_rec.acctd_amount := p0_a22;
1530 ddp_utilization_rec.currency_code := p0_a23;
1531 ddp_utilization_rec.exchange_rate_type := p0_a24;
1532 ddp_utilization_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p0_a25);
1533 ddp_utilization_rec.exchange_rate := p0_a26;
1534 ddp_utilization_rec.adjustment_type := p0_a27;
1535 ddp_utilization_rec.adjustment_date := rosetta_g_miss_date_in_map(p0_a28);
1536 ddp_utilization_rec.object_version_number := p0_a29;
1537 ddp_utilization_rec.attribute_category := p0_a30;
1538 ddp_utilization_rec.attribute1 := p0_a31;
1539 ddp_utilization_rec.attribute2 := p0_a32;
1540 ddp_utilization_rec.attribute3 := p0_a33;
1541 ddp_utilization_rec.attribute4 := p0_a34;
1542 ddp_utilization_rec.attribute5 := p0_a35;
1543 ddp_utilization_rec.attribute6 := p0_a36;
1544 ddp_utilization_rec.attribute7 := p0_a37;
1545 ddp_utilization_rec.attribute8 := p0_a38;
1546 ddp_utilization_rec.attribute9 := p0_a39;
1547 ddp_utilization_rec.attribute10 := p0_a40;
1548 ddp_utilization_rec.attribute11 := p0_a41;
1549 ddp_utilization_rec.attribute12 := p0_a42;
1550 ddp_utilization_rec.attribute13 := p0_a43;
1551 ddp_utilization_rec.attribute14 := p0_a44;
1552 ddp_utilization_rec.attribute15 := p0_a45;
1553 ddp_utilization_rec.org_id := p0_a46;
1554 ddp_utilization_rec.adjustment_desc := p0_a47;
1555 ddp_utilization_rec.language := p0_a48;
1556 ddp_utilization_rec.source_lang := p0_a49;
1557 ddp_utilization_rec.camp_schedule_id := p0_a50;
1558 ddp_utilization_rec.adjustment_type_id := p0_a51;
1559 ddp_utilization_rec.gl_date := rosetta_g_miss_date_in_map(p0_a52);
1560 ddp_utilization_rec.product_level_type := p0_a53;
1561 ddp_utilization_rec.product_id := p0_a54;
1562 ddp_utilization_rec.ams_activity_budget_id := p0_a55;
1563 ddp_utilization_rec.amount_remaining := p0_a56;
1564 ddp_utilization_rec.acctd_amount_remaining := p0_a57;
1565 ddp_utilization_rec.cust_account_id := p0_a58;
1566 ddp_utilization_rec.price_adjustment_id := p0_a59;
1567 ddp_utilization_rec.plan_curr_amount := p0_a60;
1568 ddp_utilization_rec.plan_curr_amount_remaining := p0_a61;
1569 ddp_utilization_rec.scan_unit := p0_a62;
1570 ddp_utilization_rec.scan_unit_remaining := p0_a63;
1571 ddp_utilization_rec.activity_product_id := p0_a64;
1572 ddp_utilization_rec.scan_data_id := p0_a65;
1573 ddp_utilization_rec.volume_offer_tiers_id := p0_a66;
1574 ddp_utilization_rec.gl_posted_flag := p0_a67;
1575 ddp_utilization_rec.billto_cust_account_id := p0_a68;
1576 ddp_utilization_rec.reference_type := p0_a69;
1577 ddp_utilization_rec.reference_id := p0_a70;
1578 ddp_utilization_rec.order_line_id := p0_a71;
1579 ddp_utilization_rec.orig_utilization_id := p0_a72;
1580 ddp_utilization_rec.bill_to_site_use_id := p0_a73;
1581 ddp_utilization_rec.ship_to_site_use_id := p0_a74;
1582 ddp_utilization_rec.univ_curr_amount := p0_a75;
1583 ddp_utilization_rec.univ_curr_amount_remaining := p0_a76;
1584 ddp_utilization_rec.gl_account_credit := p0_a77;
1585 ddp_utilization_rec.gl_account_debit := p0_a78;
1586 ddp_utilization_rec.site_use_id := p0_a79;
1587
1588
1589 -- here's the delegated call to the old PL/SQL routine
1590 ozf_fund_utilized_pvt.complete_utilization_rec(ddp_utilization_rec,
1591 ddx_complete_rec);
1592
1593 -- copy data back from the local variables to OUT or IN-OUT args, if any
1594
1595 p1_a0 := ddx_complete_rec.utilization_id;
1596 p1_a1 := ddx_complete_rec.last_update_date;
1597 p1_a2 := ddx_complete_rec.last_updated_by;
1598 p1_a3 := ddx_complete_rec.last_update_login;
1599 p1_a4 := ddx_complete_rec.creation_date;
1600 p1_a5 := ddx_complete_rec.created_by;
1601 p1_a6 := ddx_complete_rec.created_from;
1602 p1_a7 := ddx_complete_rec.request_id;
1603 p1_a8 := ddx_complete_rec.program_application_id;
1604 p1_a9 := ddx_complete_rec.program_id;
1605 p1_a10 := ddx_complete_rec.program_update_date;
1606 p1_a11 := ddx_complete_rec.utilization_type;
1607 p1_a12 := ddx_complete_rec.fund_id;
1608 p1_a13 := ddx_complete_rec.plan_type;
1609 p1_a14 := ddx_complete_rec.plan_id;
1610 p1_a15 := ddx_complete_rec.component_type;
1611 p1_a16 := ddx_complete_rec.component_id;
1612 p1_a17 := ddx_complete_rec.object_type;
1613 p1_a18 := ddx_complete_rec.object_id;
1614 p1_a19 := ddx_complete_rec.order_id;
1615 p1_a20 := ddx_complete_rec.invoice_id;
1616 p1_a21 := ddx_complete_rec.amount;
1617 p1_a22 := ddx_complete_rec.acctd_amount;
1618 p1_a23 := ddx_complete_rec.currency_code;
1619 p1_a24 := ddx_complete_rec.exchange_rate_type;
1620 p1_a25 := ddx_complete_rec.exchange_rate_date;
1621 p1_a26 := ddx_complete_rec.exchange_rate;
1622 p1_a27 := ddx_complete_rec.adjustment_type;
1623 p1_a28 := ddx_complete_rec.adjustment_date;
1624 p1_a29 := ddx_complete_rec.object_version_number;
1625 p1_a30 := ddx_complete_rec.attribute_category;
1626 p1_a31 := ddx_complete_rec.attribute1;
1627 p1_a32 := ddx_complete_rec.attribute2;
1628 p1_a33 := ddx_complete_rec.attribute3;
1629 p1_a34 := ddx_complete_rec.attribute4;
1630 p1_a35 := ddx_complete_rec.attribute5;
1631 p1_a36 := ddx_complete_rec.attribute6;
1632 p1_a37 := ddx_complete_rec.attribute7;
1633 p1_a38 := ddx_complete_rec.attribute8;
1634 p1_a39 := ddx_complete_rec.attribute9;
1635 p1_a40 := ddx_complete_rec.attribute10;
1636 p1_a41 := ddx_complete_rec.attribute11;
1637 p1_a42 := ddx_complete_rec.attribute12;
1638 p1_a43 := ddx_complete_rec.attribute13;
1639 p1_a44 := ddx_complete_rec.attribute14;
1640 p1_a45 := ddx_complete_rec.attribute15;
1641 p1_a46 := ddx_complete_rec.org_id;
1642 p1_a47 := ddx_complete_rec.adjustment_desc;
1643 p1_a48 := ddx_complete_rec.language;
1644 p1_a49 := ddx_complete_rec.source_lang;
1645 p1_a50 := ddx_complete_rec.camp_schedule_id;
1646 p1_a51 := ddx_complete_rec.adjustment_type_id;
1647 p1_a52 := ddx_complete_rec.gl_date;
1648 p1_a53 := ddx_complete_rec.product_level_type;
1649 p1_a54 := ddx_complete_rec.product_id;
1650 p1_a55 := ddx_complete_rec.ams_activity_budget_id;
1651 p1_a56 := ddx_complete_rec.amount_remaining;
1652 p1_a57 := ddx_complete_rec.acctd_amount_remaining;
1653 p1_a58 := ddx_complete_rec.cust_account_id;
1654 p1_a59 := ddx_complete_rec.price_adjustment_id;
1655 p1_a60 := ddx_complete_rec.plan_curr_amount;
1656 p1_a61 := ddx_complete_rec.plan_curr_amount_remaining;
1657 p1_a62 := ddx_complete_rec.scan_unit;
1658 p1_a63 := ddx_complete_rec.scan_unit_remaining;
1659 p1_a64 := ddx_complete_rec.activity_product_id;
1660 p1_a65 := ddx_complete_rec.scan_data_id;
1661 p1_a66 := ddx_complete_rec.volume_offer_tiers_id;
1662 p1_a67 := ddx_complete_rec.gl_posted_flag;
1663 p1_a68 := ddx_complete_rec.billto_cust_account_id;
1664 p1_a69 := ddx_complete_rec.reference_type;
1665 p1_a70 := ddx_complete_rec.reference_id;
1666 p1_a71 := ddx_complete_rec.order_line_id;
1667 p1_a72 := ddx_complete_rec.orig_utilization_id;
1668 p1_a73 := ddx_complete_rec.bill_to_site_use_id;
1669 p1_a74 := ddx_complete_rec.ship_to_site_use_id;
1670 p1_a75 := ddx_complete_rec.univ_curr_amount;
1671 p1_a76 := ddx_complete_rec.univ_curr_amount_remaining;
1672 p1_a77 := ddx_complete_rec.gl_account_credit;
1673 p1_a78 := ddx_complete_rec.gl_account_debit;
1674 p1_a79 := ddx_complete_rec.site_use_id;
1675 end;
1676
1677 procedure create_act_utilization(p_api_version NUMBER
1678 , p_init_msg_list VARCHAR2
1679 , p_commit VARCHAR2
1680 , p_validation_level NUMBER
1681 , x_return_status out nocopy VARCHAR2
1682 , x_msg_count out nocopy NUMBER
1683 , x_msg_data out nocopy VARCHAR2
1684 , p7_a0 NUMBER
1685 , p7_a1 DATE
1686 , p7_a2 NUMBER
1687 , p7_a3 DATE
1688 , p7_a4 NUMBER
1689 , p7_a5 NUMBER
1690 , p7_a6 NUMBER
1691 , p7_a7 NUMBER
1692 , p7_a8 VARCHAR2
1693 , p7_a9 VARCHAR2
1694 , p7_a10 NUMBER
1695 , p7_a11 VARCHAR2
1696 , p7_a12 NUMBER
1697 , p7_a13 VARCHAR2
1698 , p7_a14 DATE
1699 , p7_a15 NUMBER
1700 , p7_a16 VARCHAR2
1701 , p7_a17 NUMBER
1702 , p7_a18 NUMBER
1703 , p7_a19 VARCHAR2
1704 , p7_a20 DATE
1705 , p7_a21 NUMBER
1706 , p7_a22 NUMBER
1707 , p7_a23 VARCHAR2
1708 , p7_a24 DATE
1709 , p7_a25 VARCHAR2
1710 , p7_a26 VARCHAR2
1711 , p7_a27 VARCHAR2
1712 , p7_a28 VARCHAR
1713 , p7_a29 VARCHAR
1714 , p7_a30 NUMBER
1715 , p7_a31 NUMBER
1716 , p7_a32 VARCHAR2
1717 , p7_a33 VARCHAR2
1718 , p7_a34 NUMBER
1719 , p7_a35 DATE
1720 , p7_a36 NUMBER
1721 , p7_a37 VARCHAR2
1722 , p7_a38 NUMBER
1723 , p7_a39 VARCHAR2
1724 , p7_a40 NUMBER
1725 , p7_a41 NUMBER
1726 , p7_a42 NUMBER
1727 , p7_a43 VARCHAR2
1728 , p7_a44 VARCHAR2
1729 , p7_a45 VARCHAR2
1730 , p7_a46 VARCHAR2
1731 , p7_a47 VARCHAR2
1732 , p7_a48 VARCHAR2
1733 , p7_a49 VARCHAR2
1734 , p7_a50 VARCHAR2
1735 , p7_a51 VARCHAR2
1736 , p7_a52 VARCHAR2
1737 , p7_a53 VARCHAR2
1738 , p7_a54 VARCHAR2
1739 , p7_a55 VARCHAR2
1740 , p7_a56 VARCHAR2
1741 , p7_a57 VARCHAR2
1742 , p7_a58 VARCHAR2
1743 , p7_a59 VARCHAR2
1744 , p7_a60 NUMBER
1745 , p8_a0 VARCHAR2
1746 , p8_a1 NUMBER
1747 , p8_a2 VARCHAR2
1748 , p8_a3 NUMBER
1749 , p8_a4 NUMBER
1750 , p8_a5 VARCHAR2
1751 , p8_a6 NUMBER
1752 , p8_a7 NUMBER
1753 , p8_a8 NUMBER
1754 , p8_a9 VARCHAR2
1755 , p8_a10 DATE
1756 , p8_a11 DATE
1757 , p8_a12 NUMBER
1758 , p8_a13 NUMBER
1759 , p8_a14 NUMBER
1760 , p8_a15 NUMBER
1761 , p8_a16 NUMBER
1762 , p8_a17 NUMBER
1763 , p8_a18 VARCHAR2
1764 , p8_a19 NUMBER
1765 , p8_a20 NUMBER
1766 , p8_a21 NUMBER
1767 , p8_a22 NUMBER
1768 , p8_a23 VARCHAR2
1769 , p8_a24 NUMBER
1770 , p8_a25 NUMBER
1771 , p8_a26 NUMBER
1772 , p8_a27 NUMBER
1773 , p8_a28 NUMBER
1774 , p8_a29 VARCHAR2
1775 , p8_a30 VARCHAR2
1776 , p8_a31 VARCHAR2
1777 , p8_a32 VARCHAR2
1778 , p8_a33 VARCHAR2
1779 , p8_a34 VARCHAR2
1780 , p8_a35 VARCHAR2
1781 , p8_a36 VARCHAR2
1782 , p8_a37 VARCHAR2
1783 , p8_a38 VARCHAR2
1784 , p8_a39 VARCHAR2
1785 , p8_a40 VARCHAR2
1786 , p8_a41 VARCHAR2
1787 , p8_a42 VARCHAR2
1788 , p8_a43 VARCHAR2
1789 , p8_a44 VARCHAR2
1790 , x_act_budget_id out nocopy NUMBER
1791 )
1792
1793 as
1794 ddp_act_budgets_rec ozf_actbudgets_pvt.act_budgets_rec_type;
1795 ddp_act_util_rec ozf_actbudgets_pvt.act_util_rec_type;
1796 ddindx binary_integer; indx binary_integer;
1797 begin
1798
1799 -- copy data to the local IN or IN-OUT args, if any
1800
1801
1802
1803
1804
1805
1806
1807 ddp_act_budgets_rec.activity_budget_id := p7_a0;
1808 ddp_act_budgets_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
1809 ddp_act_budgets_rec.last_updated_by := p7_a2;
1810 ddp_act_budgets_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
1811 ddp_act_budgets_rec.created_by := p7_a4;
1812 ddp_act_budgets_rec.last_update_login := p7_a5;
1813 ddp_act_budgets_rec.object_version_number := p7_a6;
1814 ddp_act_budgets_rec.act_budget_used_by_id := p7_a7;
1815 ddp_act_budgets_rec.arc_act_budget_used_by := p7_a8;
1816 ddp_act_budgets_rec.budget_source_type := p7_a9;
1817 ddp_act_budgets_rec.budget_source_id := p7_a10;
1818 ddp_act_budgets_rec.transaction_type := p7_a11;
1819 ddp_act_budgets_rec.request_amount := p7_a12;
1820 ddp_act_budgets_rec.request_currency := p7_a13;
1821 ddp_act_budgets_rec.request_date := rosetta_g_miss_date_in_map(p7_a14);
1822 ddp_act_budgets_rec.user_status_id := p7_a15;
1823 ddp_act_budgets_rec.status_code := p7_a16;
1824 ddp_act_budgets_rec.approved_amount := p7_a17;
1825 ddp_act_budgets_rec.approved_original_amount := p7_a18;
1826 ddp_act_budgets_rec.approved_in_currency := p7_a19;
1827 ddp_act_budgets_rec.approval_date := rosetta_g_miss_date_in_map(p7_a20);
1828 ddp_act_budgets_rec.approver_id := p7_a21;
1829 ddp_act_budgets_rec.spent_amount := p7_a22;
1830 ddp_act_budgets_rec.partner_po_number := p7_a23;
1831 ddp_act_budgets_rec.partner_po_date := rosetta_g_miss_date_in_map(p7_a24);
1832 ddp_act_budgets_rec.partner_po_approver := p7_a25;
1833 ddp_act_budgets_rec.adjusted_flag := p7_a26;
1834 ddp_act_budgets_rec.posted_flag := p7_a27;
1835 ddp_act_budgets_rec.justification := p7_a28;
1836 ddp_act_budgets_rec.comment := p7_a29;
1837 ddp_act_budgets_rec.parent_act_budget_id := p7_a30;
1838 ddp_act_budgets_rec.contact_id := p7_a31;
1839 ddp_act_budgets_rec.reason_code := p7_a32;
1840 ddp_act_budgets_rec.transfer_type := p7_a33;
1841 ddp_act_budgets_rec.requester_id := p7_a34;
1842 ddp_act_budgets_rec.date_required_by := rosetta_g_miss_date_in_map(p7_a35);
1843 ddp_act_budgets_rec.parent_source_id := p7_a36;
1844 ddp_act_budgets_rec.parent_src_curr := p7_a37;
1845 ddp_act_budgets_rec.parent_src_apprvd_amt := p7_a38;
1846 ddp_act_budgets_rec.partner_holding_type := p7_a39;
1847 ddp_act_budgets_rec.partner_address_id := p7_a40;
1848 ddp_act_budgets_rec.vendor_id := p7_a41;
1849 ddp_act_budgets_rec.owner_id := p7_a42;
1850 ddp_act_budgets_rec.recal_flag := p7_a43;
1851 ddp_act_budgets_rec.attribute_category := p7_a44;
1852 ddp_act_budgets_rec.attribute1 := p7_a45;
1853 ddp_act_budgets_rec.attribute2 := p7_a46;
1854 ddp_act_budgets_rec.attribute3 := p7_a47;
1855 ddp_act_budgets_rec.attribute4 := p7_a48;
1856 ddp_act_budgets_rec.attribute5 := p7_a49;
1857 ddp_act_budgets_rec.attribute6 := p7_a50;
1858 ddp_act_budgets_rec.attribute7 := p7_a51;
1859 ddp_act_budgets_rec.attribute8 := p7_a52;
1860 ddp_act_budgets_rec.attribute9 := p7_a53;
1861 ddp_act_budgets_rec.attribute10 := p7_a54;
1862 ddp_act_budgets_rec.attribute11 := p7_a55;
1863 ddp_act_budgets_rec.attribute12 := p7_a56;
1864 ddp_act_budgets_rec.attribute13 := p7_a57;
1865 ddp_act_budgets_rec.attribute14 := p7_a58;
1866 ddp_act_budgets_rec.attribute15 := p7_a59;
1867 ddp_act_budgets_rec.src_curr_req_amt := p7_a60;
1868
1869 ddp_act_util_rec.object_type := p8_a0;
1870 ddp_act_util_rec.object_id := p8_a1;
1871 ddp_act_util_rec.adjustment_type := p8_a2;
1872 ddp_act_util_rec.camp_schedule_id := p8_a3;
1873 ddp_act_util_rec.adjustment_type_id := p8_a4;
1874 ddp_act_util_rec.product_level_type := p8_a5;
1875 ddp_act_util_rec.product_id := p8_a6;
1876 ddp_act_util_rec.cust_account_id := p8_a7;
1877 ddp_act_util_rec.price_adjustment_id := p8_a8;
1878 ddp_act_util_rec.utilization_type := p8_a9;
1879 ddp_act_util_rec.adjustment_date := rosetta_g_miss_date_in_map(p8_a10);
1880 ddp_act_util_rec.gl_date := rosetta_g_miss_date_in_map(p8_a11);
1881 ddp_act_util_rec.scan_unit := p8_a12;
1882 ddp_act_util_rec.scan_unit_remaining := p8_a13;
1883 ddp_act_util_rec.activity_product_id := p8_a14;
1884 ddp_act_util_rec.scan_type_id := p8_a15;
1885 ddp_act_util_rec.volume_offer_tiers_id := p8_a16;
1886 ddp_act_util_rec.billto_cust_account_id := p8_a17;
1887 ddp_act_util_rec.reference_type := p8_a18;
1888 ddp_act_util_rec.reference_id := p8_a19;
1889 ddp_act_util_rec.order_line_id := p8_a20;
1890 ddp_act_util_rec.org_id := p8_a21;
1891 ddp_act_util_rec.orig_utilization_id := p8_a22;
1892 ddp_act_util_rec.gl_posted_flag := p8_a23;
1893 ddp_act_util_rec.bill_to_site_use_id := p8_a24;
1894 ddp_act_util_rec.ship_to_site_use_id := p8_a25;
1895 ddp_act_util_rec.gl_account_credit := p8_a26;
1896 ddp_act_util_rec.gl_account_debit := p8_a27;
1897 ddp_act_util_rec.site_use_id := p8_a28;
1898 ddp_act_util_rec.attribute_category := p8_a29;
1899 ddp_act_util_rec.attribute1 := p8_a30;
1900 ddp_act_util_rec.attribute2 := p8_a31;
1901 ddp_act_util_rec.attribute3 := p8_a32;
1902 ddp_act_util_rec.attribute4 := p8_a33;
1903 ddp_act_util_rec.attribute5 := p8_a34;
1904 ddp_act_util_rec.attribute6 := p8_a35;
1905 ddp_act_util_rec.attribute7 := p8_a36;
1906 ddp_act_util_rec.attribute8 := p8_a37;
1907 ddp_act_util_rec.attribute9 := p8_a38;
1908 ddp_act_util_rec.attribute10 := p8_a39;
1909 ddp_act_util_rec.attribute11 := p8_a40;
1910 ddp_act_util_rec.attribute12 := p8_a41;
1911 ddp_act_util_rec.attribute13 := p8_a42;
1912 ddp_act_util_rec.attribute14 := p8_a43;
1913 ddp_act_util_rec.attribute15 := p8_a44;
1914
1915
1916 -- here's the delegated call to the old PL/SQL routine
1917 ozf_fund_utilized_pvt.create_act_utilization(p_api_version,
1918 p_init_msg_list,
1919 p_commit,
1920 p_validation_level,
1921 x_return_status,
1922 x_msg_count,
1923 x_msg_data,
1924 ddp_act_budgets_rec,
1925 ddp_act_util_rec,
1926 x_act_budget_id);
1927
1928 -- copy data back from the local variables to OUT or IN-OUT args, if any
1929
1930
1931
1932
1933
1934
1935
1936
1937
1938 end;
1939
1940 end ozf_fund_utilized_pvt_w;