[Home] [Help]
PACKAGE BODY: APPS.OZF_CLAIM_ACCRUAL_PVT_W
Source
1 package body ozf_claim_accrual_pvt_w as
2 /* $Header: ozfwcacb.pls 120.11.12020000.2 2012/07/10 09:10:16 ninarasi 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 rosetta_table_copy_in_p1(t out nocopy ozf_claim_accrual_pvt.line_util_tbl_type, a0 JTF_NUMBER_TABLE
17 , a1 JTF_NUMBER_TABLE
18 , a2 JTF_DATE_TABLE
19 , a3 JTF_NUMBER_TABLE
20 , a4 JTF_DATE_TABLE
21 , a5 JTF_NUMBER_TABLE
22 , a6 JTF_NUMBER_TABLE
23 , a7 JTF_NUMBER_TABLE
24 , a8 JTF_NUMBER_TABLE
25 , a9 JTF_NUMBER_TABLE
26 , a10 JTF_VARCHAR2_TABLE_100
27 , a11 JTF_VARCHAR2_TABLE_100
28 , a12 JTF_DATE_TABLE
29 , a13 JTF_NUMBER_TABLE
30 , a14 JTF_NUMBER_TABLE
31 , a15 JTF_NUMBER_TABLE
32 , a16 JTF_NUMBER_TABLE
33 , a17 JTF_NUMBER_TABLE
34 , a18 JTF_NUMBER_TABLE
35 , a19 JTF_VARCHAR2_TABLE_100
36 , a20 JTF_NUMBER_TABLE
37 , a21 JTF_NUMBER_TABLE
38 , a22 JTF_NUMBER_TABLE
39 , a23 JTF_NUMBER_TABLE
40 , a24 JTF_NUMBER_TABLE
41 , a25 JTF_VARCHAR2_TABLE_100
42 ) as
43 ddindx binary_integer; indx binary_integer;
44 begin
45 if a0 is not null and a0.count > 0 then
46 if a0.count > 0 then
47 indx := a0.first;
48 ddindx := 1;
49 while true loop
50 t(ddindx).claim_line_util_id := a0(indx);
51 t(ddindx).object_version_number := a1(indx);
52 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a2(indx));
53 t(ddindx).last_updated_by := a3(indx);
54 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a4(indx));
55 t(ddindx).created_by := a5(indx);
56 t(ddindx).last_update_login := a6(indx);
57 t(ddindx).claim_line_id := a7(indx);
58 t(ddindx).utilization_id := a8(indx);
59 t(ddindx).amount := a9(indx);
60 t(ddindx).currency_code := a10(indx);
61 t(ddindx).exchange_rate_type := a11(indx);
62 t(ddindx).exchange_rate_date := rosetta_g_miss_date_in_map(a12(indx));
63 t(ddindx).exchange_rate := a13(indx);
64 t(ddindx).acctd_amount := a14(indx);
65 t(ddindx).util_curr_amount := a15(indx);
66 t(ddindx).plan_curr_amount := a16(indx);
67 t(ddindx).scan_unit := a17(indx);
68 t(ddindx).activity_product_id := a18(indx);
69 t(ddindx).uom_code := a19(indx);
70 t(ddindx).quantity := a20(indx);
71 t(ddindx).org_id := a21(indx);
72 t(ddindx).univ_curr_amount := a22(indx);
73 t(ddindx).fxgl_acctd_amount := a23(indx);
74 t(ddindx).utilized_acctd_amount := a24(indx);
75 t(ddindx).update_from_tbl_flag := a25(indx);
76 ddindx := ddindx+1;
77 if a0.last =indx
78 then exit;
79 end if;
80 indx := a0.next(indx);
81 end loop;
82 end if;
83 end if;
84 end rosetta_table_copy_in_p1;
85 procedure rosetta_table_copy_out_p1(t ozf_claim_accrual_pvt.line_util_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
86 , a1 out nocopy JTF_NUMBER_TABLE
87 , a2 out nocopy JTF_DATE_TABLE
88 , a3 out nocopy JTF_NUMBER_TABLE
89 , a4 out nocopy JTF_DATE_TABLE
90 , a5 out nocopy JTF_NUMBER_TABLE
91 , a6 out nocopy JTF_NUMBER_TABLE
92 , a7 out nocopy JTF_NUMBER_TABLE
93 , a8 out nocopy JTF_NUMBER_TABLE
94 , a9 out nocopy JTF_NUMBER_TABLE
95 , a10 out nocopy JTF_VARCHAR2_TABLE_100
96 , a11 out nocopy JTF_VARCHAR2_TABLE_100
97 , a12 out nocopy JTF_DATE_TABLE
98 , a13 out nocopy JTF_NUMBER_TABLE
99 , a14 out nocopy JTF_NUMBER_TABLE
100 , a15 out nocopy JTF_NUMBER_TABLE
101 , a16 out nocopy JTF_NUMBER_TABLE
102 , a17 out nocopy JTF_NUMBER_TABLE
103 , a18 out nocopy JTF_NUMBER_TABLE
104 , a19 out nocopy JTF_VARCHAR2_TABLE_100
105 , a20 out nocopy JTF_NUMBER_TABLE
106 , a21 out nocopy JTF_NUMBER_TABLE
107 , a22 out nocopy JTF_NUMBER_TABLE
108 , a23 out nocopy JTF_NUMBER_TABLE
109 , a24 out nocopy JTF_NUMBER_TABLE
110 , a25 out nocopy JTF_VARCHAR2_TABLE_100
111 ) as
112 ddindx binary_integer; indx binary_integer;
113 begin
114 if t is null or t.count = 0 then
115 a0 := JTF_NUMBER_TABLE();
116 a1 := JTF_NUMBER_TABLE();
117 a2 := JTF_DATE_TABLE();
118 a3 := JTF_NUMBER_TABLE();
119 a4 := JTF_DATE_TABLE();
120 a5 := JTF_NUMBER_TABLE();
121 a6 := JTF_NUMBER_TABLE();
122 a7 := JTF_NUMBER_TABLE();
123 a8 := JTF_NUMBER_TABLE();
124 a9 := JTF_NUMBER_TABLE();
125 a10 := JTF_VARCHAR2_TABLE_100();
126 a11 := JTF_VARCHAR2_TABLE_100();
127 a12 := JTF_DATE_TABLE();
128 a13 := JTF_NUMBER_TABLE();
129 a14 := JTF_NUMBER_TABLE();
130 a15 := JTF_NUMBER_TABLE();
131 a16 := JTF_NUMBER_TABLE();
132 a17 := JTF_NUMBER_TABLE();
133 a18 := JTF_NUMBER_TABLE();
134 a19 := JTF_VARCHAR2_TABLE_100();
135 a20 := JTF_NUMBER_TABLE();
136 a21 := JTF_NUMBER_TABLE();
137 a22 := JTF_NUMBER_TABLE();
138 a23 := JTF_NUMBER_TABLE();
139 a24 := JTF_NUMBER_TABLE();
140 a25 := JTF_VARCHAR2_TABLE_100();
141 else
142 a0 := JTF_NUMBER_TABLE();
143 a1 := JTF_NUMBER_TABLE();
144 a2 := JTF_DATE_TABLE();
145 a3 := JTF_NUMBER_TABLE();
146 a4 := JTF_DATE_TABLE();
147 a5 := JTF_NUMBER_TABLE();
148 a6 := JTF_NUMBER_TABLE();
149 a7 := JTF_NUMBER_TABLE();
150 a8 := JTF_NUMBER_TABLE();
151 a9 := JTF_NUMBER_TABLE();
152 a10 := JTF_VARCHAR2_TABLE_100();
153 a11 := JTF_VARCHAR2_TABLE_100();
154 a12 := JTF_DATE_TABLE();
155 a13 := JTF_NUMBER_TABLE();
156 a14 := JTF_NUMBER_TABLE();
157 a15 := JTF_NUMBER_TABLE();
158 a16 := JTF_NUMBER_TABLE();
159 a17 := JTF_NUMBER_TABLE();
160 a18 := JTF_NUMBER_TABLE();
161 a19 := JTF_VARCHAR2_TABLE_100();
162 a20 := JTF_NUMBER_TABLE();
163 a21 := JTF_NUMBER_TABLE();
164 a22 := JTF_NUMBER_TABLE();
165 a23 := JTF_NUMBER_TABLE();
166 a24 := JTF_NUMBER_TABLE();
167 a25 := JTF_VARCHAR2_TABLE_100();
168 if t.count > 0 then
169 a0.extend(t.count);
170 a1.extend(t.count);
171 a2.extend(t.count);
172 a3.extend(t.count);
173 a4.extend(t.count);
174 a5.extend(t.count);
175 a6.extend(t.count);
176 a7.extend(t.count);
177 a8.extend(t.count);
178 a9.extend(t.count);
179 a10.extend(t.count);
180 a11.extend(t.count);
181 a12.extend(t.count);
182 a13.extend(t.count);
183 a14.extend(t.count);
184 a15.extend(t.count);
185 a16.extend(t.count);
186 a17.extend(t.count);
187 a18.extend(t.count);
188 a19.extend(t.count);
189 a20.extend(t.count);
190 a21.extend(t.count);
191 a22.extend(t.count);
192 a23.extend(t.count);
193 a24.extend(t.count);
194 a25.extend(t.count);
195 ddindx := t.first;
196 indx := 1;
197 while true loop
198 a0(indx) := t(ddindx).claim_line_util_id;
199 a1(indx) := t(ddindx).object_version_number;
200 a2(indx) := t(ddindx).last_update_date;
201 a3(indx) := t(ddindx).last_updated_by;
202 a4(indx) := t(ddindx).creation_date;
203 a5(indx) := t(ddindx).created_by;
204 a6(indx) := t(ddindx).last_update_login;
205 a7(indx) := t(ddindx).claim_line_id;
206 a8(indx) := t(ddindx).utilization_id;
207 a9(indx) := t(ddindx).amount;
208 a10(indx) := t(ddindx).currency_code;
209 a11(indx) := t(ddindx).exchange_rate_type;
210 a12(indx) := t(ddindx).exchange_rate_date;
211 a13(indx) := t(ddindx).exchange_rate;
212 a14(indx) := t(ddindx).acctd_amount;
213 a15(indx) := t(ddindx).util_curr_amount;
214 a16(indx) := t(ddindx).plan_curr_amount;
215 a17(indx) := t(ddindx).scan_unit;
216 a18(indx) := t(ddindx).activity_product_id;
217 a19(indx) := t(ddindx).uom_code;
218 a20(indx) := t(ddindx).quantity;
219 a21(indx) := t(ddindx).org_id;
220 a22(indx) := t(ddindx).univ_curr_amount;
221 a23(indx) := t(ddindx).fxgl_acctd_amount;
222 a24(indx) := t(ddindx).utilized_acctd_amount;
223 a25(indx) := t(ddindx).update_from_tbl_flag;
224 indx := indx+1;
225 if t.last =ddindx
226 then exit;
227 end if;
228 ddindx := t.next(ddindx);
229 end loop;
230 end if;
231 end if;
232 end rosetta_table_copy_out_p1;
233
234 procedure rosetta_table_copy_in_p5(t out nocopy ozf_claim_accrual_pvt.offer_performance_tbl_type, a0 JTF_NUMBER_TABLE
235 , a1 JTF_NUMBER_TABLE
236 , a2 JTF_VARCHAR2_TABLE_100
237 , a3 JTF_VARCHAR2_TABLE_300
238 , a4 JTF_DATE_TABLE
239 , a5 JTF_DATE_TABLE
240 , a6 JTF_VARCHAR2_TABLE_100
241 , a7 JTF_NUMBER_TABLE
242 , a8 JTF_VARCHAR2_TABLE_100
243 ) as
244 ddindx binary_integer; indx binary_integer;
245 begin
246 if a0 is not null and a0.count > 0 then
247 if a0.count > 0 then
248 indx := a0.first;
249 ddindx := 1;
250 while true loop
251 t(ddindx).offer_id := a0(indx);
252 t(ddindx).offer_performance_id := a1(indx);
253 t(ddindx).product_attribute := a2(indx);
254 t(ddindx).product_attr_value := a3(indx);
255 t(ddindx).start_date := rosetta_g_miss_date_in_map(a4(indx));
256 t(ddindx).end_date := rosetta_g_miss_date_in_map(a5(indx));
257 t(ddindx).requirement_type := a6(indx);
258 t(ddindx).estimated_value := a7(indx);
259 t(ddindx).uom_code := a8(indx);
260 ddindx := ddindx+1;
261 if a0.last =indx
262 then exit;
263 end if;
264 indx := a0.next(indx);
265 end loop;
266 end if;
267 end if;
268 end rosetta_table_copy_in_p5;
269 procedure rosetta_table_copy_out_p5(t ozf_claim_accrual_pvt.offer_performance_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
270 , a1 out nocopy JTF_NUMBER_TABLE
271 , a2 out nocopy JTF_VARCHAR2_TABLE_100
272 , a3 out nocopy JTF_VARCHAR2_TABLE_300
273 , a4 out nocopy JTF_DATE_TABLE
274 , a5 out nocopy JTF_DATE_TABLE
275 , a6 out nocopy JTF_VARCHAR2_TABLE_100
276 , a7 out nocopy JTF_NUMBER_TABLE
277 , a8 out nocopy JTF_VARCHAR2_TABLE_100
278 ) as
279 ddindx binary_integer; indx binary_integer;
280 begin
281 if t is null or t.count = 0 then
282 a0 := JTF_NUMBER_TABLE();
283 a1 := JTF_NUMBER_TABLE();
284 a2 := JTF_VARCHAR2_TABLE_100();
285 a3 := JTF_VARCHAR2_TABLE_300();
286 a4 := JTF_DATE_TABLE();
287 a5 := JTF_DATE_TABLE();
288 a6 := JTF_VARCHAR2_TABLE_100();
289 a7 := JTF_NUMBER_TABLE();
290 a8 := JTF_VARCHAR2_TABLE_100();
291 else
292 a0 := JTF_NUMBER_TABLE();
293 a1 := JTF_NUMBER_TABLE();
294 a2 := JTF_VARCHAR2_TABLE_100();
295 a3 := JTF_VARCHAR2_TABLE_300();
296 a4 := JTF_DATE_TABLE();
297 a5 := JTF_DATE_TABLE();
298 a6 := JTF_VARCHAR2_TABLE_100();
299 a7 := JTF_NUMBER_TABLE();
300 a8 := JTF_VARCHAR2_TABLE_100();
301 if t.count > 0 then
302 a0.extend(t.count);
303 a1.extend(t.count);
304 a2.extend(t.count);
305 a3.extend(t.count);
306 a4.extend(t.count);
307 a5.extend(t.count);
308 a6.extend(t.count);
309 a7.extend(t.count);
310 a8.extend(t.count);
311 ddindx := t.first;
312 indx := 1;
313 while true loop
314 a0(indx) := t(ddindx).offer_id;
315 a1(indx) := t(ddindx).offer_performance_id;
316 a2(indx) := t(ddindx).product_attribute;
317 a3(indx) := t(ddindx).product_attr_value;
318 a4(indx) := t(ddindx).start_date;
319 a5(indx) := t(ddindx).end_date;
320 a6(indx) := t(ddindx).requirement_type;
321 a7(indx) := t(ddindx).estimated_value;
322 a8(indx) := t(ddindx).uom_code;
323 indx := indx+1;
324 if t.last =ddindx
325 then exit;
326 end if;
327 ddindx := t.next(ddindx);
328 end loop;
329 end if;
330 end if;
331 end rosetta_table_copy_out_p5;
332
333 procedure rosetta_table_copy_in_p7(t out nocopy ozf_claim_accrual_pvt.offer_earning_tbl_type, a0 JTF_NUMBER_TABLE
334 , a1 JTF_NUMBER_TABLE
335 ) as
336 ddindx binary_integer; indx binary_integer;
337 begin
338 if a0 is not null and a0.count > 0 then
339 if a0.count > 0 then
340 indx := a0.first;
341 ddindx := 1;
342 while true loop
343 t(ddindx).offer_id := a0(indx);
344 t(ddindx).acctd_amount_over := a1(indx);
345 ddindx := ddindx+1;
346 if a0.last =indx
347 then exit;
348 end if;
349 indx := a0.next(indx);
350 end loop;
351 end if;
352 end if;
353 end rosetta_table_copy_in_p7;
354 procedure rosetta_table_copy_out_p7(t ozf_claim_accrual_pvt.offer_earning_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
355 , a1 out nocopy JTF_NUMBER_TABLE
356 ) as
357 ddindx binary_integer; indx binary_integer;
358 begin
359 if t is null or t.count = 0 then
363 a0 := JTF_NUMBER_TABLE();
360 a0 := JTF_NUMBER_TABLE();
361 a1 := JTF_NUMBER_TABLE();
362 else
364 a1 := JTF_NUMBER_TABLE();
365 if t.count > 0 then
366 a0.extend(t.count);
367 a1.extend(t.count);
368 ddindx := t.first;
369 indx := 1;
370 while true loop
371 a0(indx) := t(ddindx).offer_id;
372 a1(indx) := t(ddindx).acctd_amount_over;
373 indx := indx+1;
374 if t.last =ddindx
375 then exit;
376 end if;
377 ddindx := t.next(ddindx);
378 end loop;
379 end if;
380 end if;
381 end rosetta_table_copy_out_p7;
382
383 procedure get_utiz_sql_stmt(p_api_version NUMBER
384 , p_init_msg_list VARCHAR2
385 , p_commit VARCHAR2
386 , p_validation_level NUMBER
387 , x_return_status out nocopy VARCHAR2
388 , x_msg_count out nocopy NUMBER
389 , x_msg_data out nocopy VARCHAR2
390 , p_summary_view VARCHAR2
391 , p8_a0 NUMBER
392 , p8_a1 NUMBER
393 , p8_a2 VARCHAR2
394 , p8_a3 NUMBER
395 , p8_a4 NUMBER
396 , p8_a5 NUMBER
397 , p8_a6 VARCHAR2
398 , p8_a7 VARCHAR2
399 , p8_a8 NUMBER
400 , p8_a9 VARCHAR2
401 , p8_a10 NUMBER
402 , p8_a11 VARCHAR2
403 , p8_a12 NUMBER
404 , p8_a13 VARCHAR2
405 , p8_a14 NUMBER
406 , p8_a15 NUMBER
407 , p8_a16 NUMBER
408 , p8_a17 NUMBER
409 , p8_a18 NUMBER
410 , p8_a19 NUMBER
411 , p8_a20 VARCHAR2
412 , p8_a21 NUMBER
413 , p8_a22 VARCHAR2
414 , p8_a23 NUMBER
415 , p8_a24 NUMBER
416 , p8_a25 NUMBER
417 , p8_a26 VARCHAR2
418 , p8_a27 VARCHAR2
419 , p8_a28 VARCHAR2
420 , p8_a29 NUMBER
421 , p8_a30 DATE
422 , p8_a31 VARCHAR2
423 , p8_a32 VARCHAR2
424 , p8_a33 VARCHAR2
425 , p8_a34 VARCHAR2
426 , p8_a35 VARCHAR2
427 , p8_a36 NUMBER
428 , p8_a37 NUMBER
429 , p8_a38 VARCHAR2
430 , p8_a39 VARCHAR2
431 , p8_a40 VARCHAR2
432 , p8_a41 NUMBER
433 , p8_a42 VARCHAR2
434 , p9_a0 in out nocopy VARCHAR2
435 , p9_a1 in out nocopy VARCHAR2
436 , p9_a2 in out nocopy VARCHAR2
437 , p9_a3 in out nocopy VARCHAR2
438 , p9_a4 in out nocopy VARCHAR2
439 , p9_a5 in out nocopy VARCHAR2
440 , p_cust_account_id NUMBER
441 , x_utiz_sql_stmt out nocopy VARCHAR2
442 )
443
444 as
445 ddp_funds_util_flt ozf_claim_accrual_pvt.funds_util_flt_type;
446 ddpx_currency_rec ozf_claim_accrual_pvt.currency_rec_type;
447 ddindx binary_integer; indx binary_integer;
448 begin
449
450 -- copy data to the local IN or IN-OUT args, if any
451
452
453
454
455
456
457
458
459 ddp_funds_util_flt.claim_line_id := p8_a0;
460 ddp_funds_util_flt.fund_id := p8_a1;
461 ddp_funds_util_flt.activity_type := p8_a2;
462 ddp_funds_util_flt.activity_id := p8_a3;
463 ddp_funds_util_flt.activity_product_id := p8_a4;
464 ddp_funds_util_flt.schedule_id := p8_a5;
465 ddp_funds_util_flt.offer_type := p8_a6;
466 ddp_funds_util_flt.document_class := p8_a7;
467 ddp_funds_util_flt.document_id := p8_a8;
468 ddp_funds_util_flt.product_level_type := p8_a9;
469 ddp_funds_util_flt.product_id := p8_a10;
470 ddp_funds_util_flt.reference_type := p8_a11;
471 ddp_funds_util_flt.reference_id := p8_a12;
472 ddp_funds_util_flt.utilization_type := p8_a13;
473 ddp_funds_util_flt.total_amount := p8_a14;
474 ddp_funds_util_flt.old_total_amount := p8_a15;
475 if p8_a16 is null
476 then ddp_funds_util_flt.pay_over_all_flag := null;
477 elsif p8_a16 = 0
478 then ddp_funds_util_flt.pay_over_all_flag := false;
479 else ddp_funds_util_flt.pay_over_all_flag := true;
480 end if;
481 ddp_funds_util_flt.total_units := p8_a17;
482 ddp_funds_util_flt.old_total_units := p8_a18;
483 ddp_funds_util_flt.quantity := p8_a19;
484 ddp_funds_util_flt.uom_code := p8_a20;
485 ddp_funds_util_flt.cust_account_id := p8_a21;
486 ddp_funds_util_flt.relationship_type := p8_a22;
487 ddp_funds_util_flt.related_cust_account_id := p8_a23;
488 ddp_funds_util_flt.buy_group_cust_account_id := p8_a24;
489 ddp_funds_util_flt.buy_group_party_id := p8_a25;
490 ddp_funds_util_flt.select_cust_children_flag := p8_a26;
491 ddp_funds_util_flt.pay_to_customer := p8_a27;
492 ddp_funds_util_flt.prorate_earnings_flag := p8_a28;
493 ddp_funds_util_flt.adjustment_type_id := p8_a29;
494 ddp_funds_util_flt.end_date := rosetta_g_miss_date_in_map(p8_a30);
495 ddp_funds_util_flt.run_mode := p8_a31;
496 ddp_funds_util_flt.check_sales_rep_flag := p8_a32;
497 ddp_funds_util_flt.group_by_offer := p8_a33;
498 ddp_funds_util_flt.offer_payment_method := p8_a34;
499 ddp_funds_util_flt.utiz_currency_code := p8_a35;
500 ddp_funds_util_flt.bill_to_site_use_id := p8_a36;
501 ddp_funds_util_flt.utilization_id := p8_a37;
502 ddp_funds_util_flt.autopay_check := p8_a38;
503 ddp_funds_util_flt.period_name := p8_a39;
504 ddp_funds_util_flt.year_name := p8_a40;
505 ddp_funds_util_flt.claim_id := p8_a41;
506 ddp_funds_util_flt.created_from := p8_a42;
507
508 ddpx_currency_rec.functional_currency_code := p9_a0;
509 ddpx_currency_rec.offer_currency_code := p9_a1;
510 ddpx_currency_rec.universal_currency_code := p9_a2;
511 ddpx_currency_rec.claim_currency_code := p9_a3;
512 ddpx_currency_rec.transaction_currency_code := p9_a4;
516
513 ddpx_currency_rec.association_currency_code := p9_a5;
514
515
517 -- here's the delegated call to the old PL/SQL routine
518 ozf_claim_accrual_pvt.get_utiz_sql_stmt(p_api_version,
519 p_init_msg_list,
520 p_commit,
521 p_validation_level,
522 x_return_status,
523 x_msg_count,
524 x_msg_data,
525 p_summary_view,
526 ddp_funds_util_flt,
527 ddpx_currency_rec,
528 p_cust_account_id,
529 x_utiz_sql_stmt);
530
531 -- copy data back from the local variables to OUT or IN-OUT args, if any
532
533
534
535
536
537
538
539
540
541 p9_a0 := ddpx_currency_rec.functional_currency_code;
542 p9_a1 := ddpx_currency_rec.offer_currency_code;
543 p9_a2 := ddpx_currency_rec.universal_currency_code;
544 p9_a3 := ddpx_currency_rec.claim_currency_code;
545 p9_a4 := ddpx_currency_rec.transaction_currency_code;
546 p9_a5 := ddpx_currency_rec.association_currency_code;
547
548
549 end;
550
551 procedure update_line_util_tbl(p_api_version NUMBER
552 , p_init_msg_list VARCHAR2
553 , p_commit VARCHAR2
554 , p_validation_level NUMBER
555 , x_return_status out nocopy VARCHAR2
556 , x_msg_data out nocopy VARCHAR2
557 , x_msg_count out nocopy NUMBER
558 , p7_a0 JTF_NUMBER_TABLE
559 , p7_a1 JTF_NUMBER_TABLE
560 , p7_a2 JTF_DATE_TABLE
561 , p7_a3 JTF_NUMBER_TABLE
562 , p7_a4 JTF_DATE_TABLE
563 , p7_a5 JTF_NUMBER_TABLE
564 , p7_a6 JTF_NUMBER_TABLE
565 , p7_a7 JTF_NUMBER_TABLE
566 , p7_a8 JTF_NUMBER_TABLE
567 , p7_a9 JTF_NUMBER_TABLE
568 , p7_a10 JTF_VARCHAR2_TABLE_100
569 , p7_a11 JTF_VARCHAR2_TABLE_100
570 , p7_a12 JTF_DATE_TABLE
571 , p7_a13 JTF_NUMBER_TABLE
572 , p7_a14 JTF_NUMBER_TABLE
573 , p7_a15 JTF_NUMBER_TABLE
574 , p7_a16 JTF_NUMBER_TABLE
575 , p7_a17 JTF_NUMBER_TABLE
576 , p7_a18 JTF_NUMBER_TABLE
577 , p7_a19 JTF_VARCHAR2_TABLE_100
578 , p7_a20 JTF_NUMBER_TABLE
579 , p7_a21 JTF_NUMBER_TABLE
580 , p7_a22 JTF_NUMBER_TABLE
581 , p7_a23 JTF_NUMBER_TABLE
582 , p7_a24 JTF_NUMBER_TABLE
583 , p7_a25 JTF_VARCHAR2_TABLE_100
584 , p_mode VARCHAR2
585 , x_error_index out nocopy NUMBER
586 )
587
588 as
589 ddp_line_util_tbl ozf_claim_accrual_pvt.line_util_tbl_type;
590 ddindx binary_integer; indx binary_integer;
591 begin
592
593 -- copy data to the local IN or IN-OUT args, if any
594
595
596
597
598
599
600
601 ozf_claim_accrual_pvt_w.rosetta_table_copy_in_p1(ddp_line_util_tbl, p7_a0
602 , p7_a1
603 , p7_a2
604 , p7_a3
605 , p7_a4
606 , p7_a5
607 , p7_a6
608 , p7_a7
609 , p7_a8
610 , p7_a9
611 , p7_a10
612 , p7_a11
613 , p7_a12
614 , p7_a13
615 , p7_a14
616 , p7_a15
617 , p7_a16
618 , p7_a17
619 , p7_a18
620 , p7_a19
621 , p7_a20
622 , p7_a21
623 , p7_a22
624 , p7_a23
625 , p7_a24
626 , p7_a25
627 );
628
629
630
631 -- here's the delegated call to the old PL/SQL routine
632 ozf_claim_accrual_pvt.update_line_util_tbl(p_api_version,
633 p_init_msg_list,
634 p_commit,
635 p_validation_level,
636 x_return_status,
637 x_msg_data,
638 x_msg_count,
639 ddp_line_util_tbl,
640 p_mode,
641 x_error_index);
642
643 -- copy data back from the local variables to OUT or IN-OUT args, if any
644
645
646
647
648
649
650
651
652
653 end;
654
655 procedure delete_line_util_tbl(p_api_version NUMBER
656 , p_init_msg_list VARCHAR2
657 , p_commit VARCHAR2
658 , p_validation_level NUMBER
659 , x_return_status out nocopy VARCHAR2
660 , x_msg_data out nocopy VARCHAR2
661 , x_msg_count out nocopy NUMBER
662 , p7_a0 JTF_NUMBER_TABLE
663 , p7_a1 JTF_NUMBER_TABLE
664 , p7_a2 JTF_DATE_TABLE
665 , p7_a3 JTF_NUMBER_TABLE
666 , p7_a4 JTF_DATE_TABLE
667 , p7_a5 JTF_NUMBER_TABLE
668 , p7_a6 JTF_NUMBER_TABLE
669 , p7_a7 JTF_NUMBER_TABLE
670 , p7_a8 JTF_NUMBER_TABLE
671 , p7_a9 JTF_NUMBER_TABLE
672 , p7_a10 JTF_VARCHAR2_TABLE_100
673 , p7_a11 JTF_VARCHAR2_TABLE_100
674 , p7_a12 JTF_DATE_TABLE
675 , p7_a13 JTF_NUMBER_TABLE
676 , p7_a14 JTF_NUMBER_TABLE
677 , p7_a15 JTF_NUMBER_TABLE
678 , p7_a16 JTF_NUMBER_TABLE
679 , p7_a17 JTF_NUMBER_TABLE
680 , p7_a18 JTF_NUMBER_TABLE
681 , p7_a19 JTF_VARCHAR2_TABLE_100
682 , p7_a20 JTF_NUMBER_TABLE
683 , p7_a21 JTF_NUMBER_TABLE
684 , p7_a22 JTF_NUMBER_TABLE
685 , p7_a23 JTF_NUMBER_TABLE
686 , p7_a24 JTF_NUMBER_TABLE
687 , p7_a25 JTF_VARCHAR2_TABLE_100
688 , p_mode VARCHAR2
689 , x_error_index out nocopy NUMBER
690 )
691
692 as
693 ddp_line_util_tbl ozf_claim_accrual_pvt.line_util_tbl_type;
694 ddindx binary_integer; indx binary_integer;
695 begin
696
697 -- copy data to the local IN or IN-OUT args, if any
698
699
700
701
702
703
704
708 , p7_a3
705 ozf_claim_accrual_pvt_w.rosetta_table_copy_in_p1(ddp_line_util_tbl, p7_a0
706 , p7_a1
707 , p7_a2
709 , p7_a4
710 , p7_a5
711 , p7_a6
712 , p7_a7
713 , p7_a8
714 , p7_a9
715 , p7_a10
716 , p7_a11
717 , p7_a12
718 , p7_a13
719 , p7_a14
720 , p7_a15
721 , p7_a16
722 , p7_a17
723 , p7_a18
724 , p7_a19
725 , p7_a20
726 , p7_a21
727 , p7_a22
728 , p7_a23
729 , p7_a24
730 , p7_a25
731 );
732
733
734
735 -- here's the delegated call to the old PL/SQL routine
736 ozf_claim_accrual_pvt.delete_line_util_tbl(p_api_version,
737 p_init_msg_list,
738 p_commit,
739 p_validation_level,
740 x_return_status,
741 x_msg_data,
742 x_msg_count,
743 ddp_line_util_tbl,
744 p_mode,
745 x_error_index);
746
747 -- copy data back from the local variables to OUT or IN-OUT args, if any
748
749
750
751
752
753
754
755
756
757 end;
758
759 procedure init_line_util_rec(p0_a0 out nocopy NUMBER
760 , p0_a1 out nocopy NUMBER
761 , p0_a2 out nocopy DATE
762 , p0_a3 out nocopy NUMBER
763 , p0_a4 out nocopy DATE
764 , p0_a5 out nocopy NUMBER
765 , p0_a6 out nocopy NUMBER
766 , p0_a7 out nocopy NUMBER
767 , p0_a8 out nocopy NUMBER
768 , p0_a9 out nocopy NUMBER
769 , p0_a10 out nocopy VARCHAR2
770 , p0_a11 out nocopy VARCHAR2
771 , p0_a12 out nocopy DATE
772 , p0_a13 out nocopy NUMBER
773 , p0_a14 out nocopy NUMBER
774 , p0_a15 out nocopy NUMBER
775 , p0_a16 out nocopy NUMBER
776 , p0_a17 out nocopy NUMBER
777 , p0_a18 out nocopy NUMBER
778 , p0_a19 out nocopy VARCHAR2
779 , p0_a20 out nocopy NUMBER
780 , p0_a21 out nocopy NUMBER
781 , p0_a22 out nocopy NUMBER
782 , p0_a23 out nocopy NUMBER
783 , p0_a24 out nocopy NUMBER
784 , p0_a25 out nocopy VARCHAR2
785 )
786
787 as
788 ddx_line_util_rec ozf_claim_accrual_pvt.line_util_rec_type;
789 ddindx binary_integer; indx binary_integer;
790 begin
791
792 -- copy data to the local IN or IN-OUT args, if any
793
794 -- here's the delegated call to the old PL/SQL routine
795 ozf_claim_accrual_pvt.init_line_util_rec(ddx_line_util_rec);
796
797 -- copy data back from the local variables to OUT or IN-OUT args, if any
798 p0_a0 := ddx_line_util_rec.claim_line_util_id;
799 p0_a1 := ddx_line_util_rec.object_version_number;
800 p0_a2 := ddx_line_util_rec.last_update_date;
801 p0_a3 := ddx_line_util_rec.last_updated_by;
802 p0_a4 := ddx_line_util_rec.creation_date;
803 p0_a5 := ddx_line_util_rec.created_by;
804 p0_a6 := ddx_line_util_rec.last_update_login;
805 p0_a7 := ddx_line_util_rec.claim_line_id;
806 p0_a8 := ddx_line_util_rec.utilization_id;
807 p0_a9 := ddx_line_util_rec.amount;
808 p0_a10 := ddx_line_util_rec.currency_code;
809 p0_a11 := ddx_line_util_rec.exchange_rate_type;
810 p0_a12 := ddx_line_util_rec.exchange_rate_date;
811 p0_a13 := ddx_line_util_rec.exchange_rate;
812 p0_a14 := ddx_line_util_rec.acctd_amount;
813 p0_a15 := ddx_line_util_rec.util_curr_amount;
814 p0_a16 := ddx_line_util_rec.plan_curr_amount;
815 p0_a17 := ddx_line_util_rec.scan_unit;
816 p0_a18 := ddx_line_util_rec.activity_product_id;
817 p0_a19 := ddx_line_util_rec.uom_code;
818 p0_a20 := ddx_line_util_rec.quantity;
819 p0_a21 := ddx_line_util_rec.org_id;
820 p0_a22 := ddx_line_util_rec.univ_curr_amount;
821 p0_a23 := ddx_line_util_rec.fxgl_acctd_amount;
822 p0_a24 := ddx_line_util_rec.utilized_acctd_amount;
823 p0_a25 := ddx_line_util_rec.update_from_tbl_flag;
824 end;
825
826 procedure complete_line_util_rec(p0_a0 NUMBER
827 , p0_a1 NUMBER
828 , p0_a2 DATE
829 , p0_a3 NUMBER
830 , p0_a4 DATE
831 , p0_a5 NUMBER
832 , p0_a6 NUMBER
833 , p0_a7 NUMBER
834 , p0_a8 NUMBER
835 , p0_a9 NUMBER
836 , p0_a10 VARCHAR2
837 , p0_a11 VARCHAR2
838 , p0_a12 DATE
839 , p0_a13 NUMBER
840 , p0_a14 NUMBER
841 , p0_a15 NUMBER
842 , p0_a16 NUMBER
843 , p0_a17 NUMBER
844 , p0_a18 NUMBER
845 , p0_a19 VARCHAR2
846 , p0_a20 NUMBER
847 , p0_a21 NUMBER
848 , p0_a22 NUMBER
849 , p0_a23 NUMBER
850 , p0_a24 NUMBER
851 , p0_a25 VARCHAR2
852 , p1_a0 out nocopy NUMBER
853 , p1_a1 out nocopy NUMBER
854 , p1_a2 out nocopy DATE
855 , p1_a3 out nocopy NUMBER
856 , p1_a4 out nocopy DATE
857 , p1_a5 out nocopy NUMBER
858 , p1_a6 out nocopy NUMBER
859 , p1_a7 out nocopy NUMBER
860 , p1_a8 out nocopy NUMBER
861 , p1_a9 out nocopy NUMBER
862 , p1_a10 out nocopy VARCHAR2
863 , p1_a11 out nocopy VARCHAR2
864 , p1_a12 out nocopy DATE
865 , p1_a13 out nocopy NUMBER
866 , p1_a14 out nocopy NUMBER
867 , p1_a15 out nocopy NUMBER
868 , p1_a16 out nocopy NUMBER
869 , p1_a17 out nocopy NUMBER
870 , p1_a18 out nocopy NUMBER
871 , p1_a19 out nocopy VARCHAR2
872 , p1_a20 out nocopy NUMBER
873 , p1_a21 out nocopy NUMBER
874 , p1_a22 out nocopy NUMBER
875 , p1_a23 out nocopy NUMBER
876 , p1_a24 out nocopy NUMBER
880 as
877 , p1_a25 out nocopy VARCHAR2
878 )
879
881 ddp_line_util_rec ozf_claim_accrual_pvt.line_util_rec_type;
882 ddx_complete_rec ozf_claim_accrual_pvt.line_util_rec_type;
883 ddindx binary_integer; indx binary_integer;
884 begin
885
886 -- copy data to the local IN or IN-OUT args, if any
887 ddp_line_util_rec.claim_line_util_id := p0_a0;
888 ddp_line_util_rec.object_version_number := p0_a1;
889 ddp_line_util_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a2);
890 ddp_line_util_rec.last_updated_by := p0_a3;
891 ddp_line_util_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
892 ddp_line_util_rec.created_by := p0_a5;
893 ddp_line_util_rec.last_update_login := p0_a6;
894 ddp_line_util_rec.claim_line_id := p0_a7;
895 ddp_line_util_rec.utilization_id := p0_a8;
896 ddp_line_util_rec.amount := p0_a9;
897 ddp_line_util_rec.currency_code := p0_a10;
898 ddp_line_util_rec.exchange_rate_type := p0_a11;
899 ddp_line_util_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p0_a12);
900 ddp_line_util_rec.exchange_rate := p0_a13;
901 ddp_line_util_rec.acctd_amount := p0_a14;
902 ddp_line_util_rec.util_curr_amount := p0_a15;
903 ddp_line_util_rec.plan_curr_amount := p0_a16;
904 ddp_line_util_rec.scan_unit := p0_a17;
905 ddp_line_util_rec.activity_product_id := p0_a18;
906 ddp_line_util_rec.uom_code := p0_a19;
907 ddp_line_util_rec.quantity := p0_a20;
908 ddp_line_util_rec.org_id := p0_a21;
909 ddp_line_util_rec.univ_curr_amount := p0_a22;
910 ddp_line_util_rec.fxgl_acctd_amount := p0_a23;
911 ddp_line_util_rec.utilized_acctd_amount := p0_a24;
912 ddp_line_util_rec.update_from_tbl_flag := p0_a25;
913
914
915 -- here's the delegated call to the old PL/SQL routine
916 ozf_claim_accrual_pvt.complete_line_util_rec(ddp_line_util_rec,
917 ddx_complete_rec);
918
919 -- copy data back from the local variables to OUT or IN-OUT args, if any
920
921 p1_a0 := ddx_complete_rec.claim_line_util_id;
922 p1_a1 := ddx_complete_rec.object_version_number;
923 p1_a2 := ddx_complete_rec.last_update_date;
924 p1_a3 := ddx_complete_rec.last_updated_by;
925 p1_a4 := ddx_complete_rec.creation_date;
926 p1_a5 := ddx_complete_rec.created_by;
927 p1_a6 := ddx_complete_rec.last_update_login;
928 p1_a7 := ddx_complete_rec.claim_line_id;
929 p1_a8 := ddx_complete_rec.utilization_id;
930 p1_a9 := ddx_complete_rec.amount;
931 p1_a10 := ddx_complete_rec.currency_code;
932 p1_a11 := ddx_complete_rec.exchange_rate_type;
933 p1_a12 := ddx_complete_rec.exchange_rate_date;
934 p1_a13 := ddx_complete_rec.exchange_rate;
935 p1_a14 := ddx_complete_rec.acctd_amount;
936 p1_a15 := ddx_complete_rec.util_curr_amount;
937 p1_a16 := ddx_complete_rec.plan_curr_amount;
938 p1_a17 := ddx_complete_rec.scan_unit;
939 p1_a18 := ddx_complete_rec.activity_product_id;
940 p1_a19 := ddx_complete_rec.uom_code;
941 p1_a20 := ddx_complete_rec.quantity;
942 p1_a21 := ddx_complete_rec.org_id;
943 p1_a22 := ddx_complete_rec.univ_curr_amount;
944 p1_a23 := ddx_complete_rec.fxgl_acctd_amount;
945 p1_a24 := ddx_complete_rec.utilized_acctd_amount;
946 p1_a25 := ddx_complete_rec.update_from_tbl_flag;
947 end;
948
949 procedure update_group_line_util(p_api_version NUMBER
950 , p_init_msg_list VARCHAR2
951 , p_commit VARCHAR2
952 , p_validation_level NUMBER
953 , x_return_status out nocopy VARCHAR2
954 , x_msg_count out nocopy NUMBER
955 , x_msg_data out nocopy VARCHAR2
956 , p_summary_view VARCHAR2
957 , p8_a0 NUMBER
958 , p8_a1 NUMBER
959 , p8_a2 VARCHAR2
960 , p8_a3 NUMBER
961 , p8_a4 NUMBER
962 , p8_a5 NUMBER
963 , p8_a6 VARCHAR2
964 , p8_a7 VARCHAR2
965 , p8_a8 NUMBER
966 , p8_a9 VARCHAR2
967 , p8_a10 NUMBER
968 , p8_a11 VARCHAR2
969 , p8_a12 NUMBER
970 , p8_a13 VARCHAR2
971 , p8_a14 NUMBER
972 , p8_a15 NUMBER
973 , p8_a16 NUMBER
974 , p8_a17 NUMBER
975 , p8_a18 NUMBER
976 , p8_a19 NUMBER
977 , p8_a20 VARCHAR2
978 , p8_a21 NUMBER
979 , p8_a22 VARCHAR2
980 , p8_a23 NUMBER
981 , p8_a24 NUMBER
982 , p8_a25 NUMBER
983 , p8_a26 VARCHAR2
984 , p8_a27 VARCHAR2
985 , p8_a28 VARCHAR2
986 , p8_a29 NUMBER
987 , p8_a30 DATE
988 , p8_a31 VARCHAR2
989 , p8_a32 VARCHAR2
990 , p8_a33 VARCHAR2
991 , p8_a34 VARCHAR2
992 , p8_a35 VARCHAR2
993 , p8_a36 NUMBER
994 , p8_a37 NUMBER
995 , p8_a38 VARCHAR2
996 , p8_a39 VARCHAR2
997 , p8_a40 VARCHAR2
998 , p8_a41 NUMBER
999 , p8_a42 VARCHAR2
1000 , p_mode VARCHAR2
1001 )
1002
1003 as
1004 ddp_funds_util_flt ozf_claim_accrual_pvt.funds_util_flt_type;
1005 ddindx binary_integer; indx binary_integer;
1006 begin
1007
1008 -- copy data to the local IN or IN-OUT args, if any
1009
1010
1011
1012
1013
1014
1015
1016
1017 ddp_funds_util_flt.claim_line_id := p8_a0;
1018 ddp_funds_util_flt.fund_id := p8_a1;
1019 ddp_funds_util_flt.activity_type := p8_a2;
1020 ddp_funds_util_flt.activity_id := p8_a3;
1021 ddp_funds_util_flt.activity_product_id := p8_a4;
1022 ddp_funds_util_flt.schedule_id := p8_a5;
1023 ddp_funds_util_flt.offer_type := p8_a6;
1024 ddp_funds_util_flt.document_class := p8_a7;
1025 ddp_funds_util_flt.document_id := p8_a8;
1026 ddp_funds_util_flt.product_level_type := p8_a9;
1030 ddp_funds_util_flt.utilization_type := p8_a13;
1027 ddp_funds_util_flt.product_id := p8_a10;
1028 ddp_funds_util_flt.reference_type := p8_a11;
1029 ddp_funds_util_flt.reference_id := p8_a12;
1031 ddp_funds_util_flt.total_amount := p8_a14;
1032 ddp_funds_util_flt.old_total_amount := p8_a15;
1033 if p8_a16 is null
1034 then ddp_funds_util_flt.pay_over_all_flag := null;
1035 elsif p8_a16 = 0
1036 then ddp_funds_util_flt.pay_over_all_flag := false;
1037 else ddp_funds_util_flt.pay_over_all_flag := true;
1038 end if;
1039 ddp_funds_util_flt.total_units := p8_a17;
1040 ddp_funds_util_flt.old_total_units := p8_a18;
1041 ddp_funds_util_flt.quantity := p8_a19;
1042 ddp_funds_util_flt.uom_code := p8_a20;
1043 ddp_funds_util_flt.cust_account_id := p8_a21;
1044 ddp_funds_util_flt.relationship_type := p8_a22;
1045 ddp_funds_util_flt.related_cust_account_id := p8_a23;
1046 ddp_funds_util_flt.buy_group_cust_account_id := p8_a24;
1047 ddp_funds_util_flt.buy_group_party_id := p8_a25;
1048 ddp_funds_util_flt.select_cust_children_flag := p8_a26;
1049 ddp_funds_util_flt.pay_to_customer := p8_a27;
1050 ddp_funds_util_flt.prorate_earnings_flag := p8_a28;
1051 ddp_funds_util_flt.adjustment_type_id := p8_a29;
1052 ddp_funds_util_flt.end_date := rosetta_g_miss_date_in_map(p8_a30);
1053 ddp_funds_util_flt.run_mode := p8_a31;
1054 ddp_funds_util_flt.check_sales_rep_flag := p8_a32;
1055 ddp_funds_util_flt.group_by_offer := p8_a33;
1056 ddp_funds_util_flt.offer_payment_method := p8_a34;
1057 ddp_funds_util_flt.utiz_currency_code := p8_a35;
1058 ddp_funds_util_flt.bill_to_site_use_id := p8_a36;
1059 ddp_funds_util_flt.utilization_id := p8_a37;
1060 ddp_funds_util_flt.autopay_check := p8_a38;
1061 ddp_funds_util_flt.period_name := p8_a39;
1062 ddp_funds_util_flt.year_name := p8_a40;
1063 ddp_funds_util_flt.claim_id := p8_a41;
1064 ddp_funds_util_flt.created_from := p8_a42;
1065
1066
1067 -- here's the delegated call to the old PL/SQL routine
1068 ozf_claim_accrual_pvt.update_group_line_util(p_api_version,
1069 p_init_msg_list,
1070 p_commit,
1071 p_validation_level,
1072 x_return_status,
1073 x_msg_count,
1074 x_msg_data,
1075 p_summary_view,
1076 ddp_funds_util_flt,
1077 p_mode);
1078
1079 -- copy data back from the local variables to OUT or IN-OUT args, if any
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089 end;
1090
1091 procedure delete_group_line_util(p_api_version NUMBER
1092 , p_init_msg_list VARCHAR2
1093 , p_commit VARCHAR2
1094 , p_validation_level NUMBER
1095 , x_return_status out nocopy VARCHAR2
1096 , x_msg_count out nocopy NUMBER
1097 , x_msg_data out nocopy VARCHAR2
1098 , p7_a0 NUMBER
1099 , p7_a1 NUMBER
1100 , p7_a2 VARCHAR2
1101 , p7_a3 NUMBER
1102 , p7_a4 NUMBER
1103 , p7_a5 NUMBER
1104 , p7_a6 VARCHAR2
1105 , p7_a7 VARCHAR2
1106 , p7_a8 NUMBER
1107 , p7_a9 VARCHAR2
1108 , p7_a10 NUMBER
1109 , p7_a11 VARCHAR2
1110 , p7_a12 NUMBER
1111 , p7_a13 VARCHAR2
1112 , p7_a14 NUMBER
1113 , p7_a15 NUMBER
1114 , p7_a16 NUMBER
1115 , p7_a17 NUMBER
1116 , p7_a18 NUMBER
1117 , p7_a19 NUMBER
1118 , p7_a20 VARCHAR2
1119 , p7_a21 NUMBER
1120 , p7_a22 VARCHAR2
1121 , p7_a23 NUMBER
1122 , p7_a24 NUMBER
1123 , p7_a25 NUMBER
1124 , p7_a26 VARCHAR2
1125 , p7_a27 VARCHAR2
1126 , p7_a28 VARCHAR2
1127 , p7_a29 NUMBER
1128 , p7_a30 DATE
1129 , p7_a31 VARCHAR2
1130 , p7_a32 VARCHAR2
1131 , p7_a33 VARCHAR2
1132 , p7_a34 VARCHAR2
1133 , p7_a35 VARCHAR2
1134 , p7_a36 NUMBER
1135 , p7_a37 NUMBER
1136 , p7_a38 VARCHAR2
1137 , p7_a39 VARCHAR2
1138 , p7_a40 VARCHAR2
1139 , p7_a41 NUMBER
1140 , p7_a42 VARCHAR2
1141 , p_mode VARCHAR2
1142 )
1143
1144 as
1145 ddp_funds_util_flt ozf_claim_accrual_pvt.funds_util_flt_type;
1146 ddindx binary_integer; indx binary_integer;
1147 begin
1148
1149 -- copy data to the local IN or IN-OUT args, if any
1150
1151
1152
1153
1154
1155
1156
1157 ddp_funds_util_flt.claim_line_id := p7_a0;
1158 ddp_funds_util_flt.fund_id := p7_a1;
1159 ddp_funds_util_flt.activity_type := p7_a2;
1160 ddp_funds_util_flt.activity_id := p7_a3;
1161 ddp_funds_util_flt.activity_product_id := p7_a4;
1162 ddp_funds_util_flt.schedule_id := p7_a5;
1163 ddp_funds_util_flt.offer_type := p7_a6;
1164 ddp_funds_util_flt.document_class := p7_a7;
1165 ddp_funds_util_flt.document_id := p7_a8;
1166 ddp_funds_util_flt.product_level_type := p7_a9;
1167 ddp_funds_util_flt.product_id := p7_a10;
1168 ddp_funds_util_flt.reference_type := p7_a11;
1169 ddp_funds_util_flt.reference_id := p7_a12;
1170 ddp_funds_util_flt.utilization_type := p7_a13;
1171 ddp_funds_util_flt.total_amount := p7_a14;
1172 ddp_funds_util_flt.old_total_amount := p7_a15;
1173 if p7_a16 is null
1174 then ddp_funds_util_flt.pay_over_all_flag := null;
1175 elsif p7_a16 = 0
1176 then ddp_funds_util_flt.pay_over_all_flag := false;
1177 else ddp_funds_util_flt.pay_over_all_flag := true;
1178 end if;
1179 ddp_funds_util_flt.total_units := p7_a17;
1180 ddp_funds_util_flt.old_total_units := p7_a18;
1181 ddp_funds_util_flt.quantity := p7_a19;
1182 ddp_funds_util_flt.uom_code := p7_a20;
1183 ddp_funds_util_flt.cust_account_id := p7_a21;
1187 ddp_funds_util_flt.buy_group_party_id := p7_a25;
1184 ddp_funds_util_flt.relationship_type := p7_a22;
1185 ddp_funds_util_flt.related_cust_account_id := p7_a23;
1186 ddp_funds_util_flt.buy_group_cust_account_id := p7_a24;
1188 ddp_funds_util_flt.select_cust_children_flag := p7_a26;
1189 ddp_funds_util_flt.pay_to_customer := p7_a27;
1190 ddp_funds_util_flt.prorate_earnings_flag := p7_a28;
1191 ddp_funds_util_flt.adjustment_type_id := p7_a29;
1192 ddp_funds_util_flt.end_date := rosetta_g_miss_date_in_map(p7_a30);
1193 ddp_funds_util_flt.run_mode := p7_a31;
1194 ddp_funds_util_flt.check_sales_rep_flag := p7_a32;
1195 ddp_funds_util_flt.group_by_offer := p7_a33;
1196 ddp_funds_util_flt.offer_payment_method := p7_a34;
1197 ddp_funds_util_flt.utiz_currency_code := p7_a35;
1198 ddp_funds_util_flt.bill_to_site_use_id := p7_a36;
1199 ddp_funds_util_flt.utilization_id := p7_a37;
1200 ddp_funds_util_flt.autopay_check := p7_a38;
1201 ddp_funds_util_flt.period_name := p7_a39;
1202 ddp_funds_util_flt.year_name := p7_a40;
1203 ddp_funds_util_flt.claim_id := p7_a41;
1204 ddp_funds_util_flt.created_from := p7_a42;
1205
1206
1207 -- here's the delegated call to the old PL/SQL routine
1208 ozf_claim_accrual_pvt.delete_group_line_util(p_api_version,
1209 p_init_msg_list,
1210 p_commit,
1211 p_validation_level,
1212 x_return_status,
1213 x_msg_count,
1214 x_msg_data,
1215 ddp_funds_util_flt,
1216 p_mode);
1217
1218 -- copy data back from the local variables to OUT or IN-OUT args, if any
1219
1220
1221
1222
1223
1224
1225
1226
1227 end;
1228
1229 procedure asso_accruals_to_claim(p_api_version NUMBER
1230 , p_init_msg_list VARCHAR2
1231 , p_commit VARCHAR2
1232 , p_validation_level NUMBER
1233 , x_return_status out nocopy VARCHAR2
1234 , x_msg_count out nocopy NUMBER
1235 , x_msg_data out nocopy VARCHAR2
1236 , p_claim_id NUMBER
1237 , p8_a0 NUMBER
1238 , p8_a1 NUMBER
1239 , p8_a2 VARCHAR2
1240 , p8_a3 NUMBER
1241 , p8_a4 NUMBER
1242 , p8_a5 NUMBER
1243 , p8_a6 VARCHAR2
1244 , p8_a7 VARCHAR2
1245 , p8_a8 NUMBER
1246 , p8_a9 VARCHAR2
1247 , p8_a10 NUMBER
1248 , p8_a11 VARCHAR2
1249 , p8_a12 NUMBER
1250 , p8_a13 VARCHAR2
1251 , p8_a14 NUMBER
1252 , p8_a15 NUMBER
1253 , p8_a16 NUMBER
1254 , p8_a17 NUMBER
1255 , p8_a18 NUMBER
1256 , p8_a19 NUMBER
1257 , p8_a20 VARCHAR2
1258 , p8_a21 NUMBER
1259 , p8_a22 VARCHAR2
1260 , p8_a23 NUMBER
1261 , p8_a24 NUMBER
1262 , p8_a25 NUMBER
1263 , p8_a26 VARCHAR2
1264 , p8_a27 VARCHAR2
1265 , p8_a28 VARCHAR2
1266 , p8_a29 NUMBER
1267 , p8_a30 DATE
1268 , p8_a31 VARCHAR2
1269 , p8_a32 VARCHAR2
1270 , p8_a33 VARCHAR2
1271 , p8_a34 VARCHAR2
1272 , p8_a35 VARCHAR2
1273 , p8_a36 NUMBER
1274 , p8_a37 NUMBER
1275 , p8_a38 VARCHAR2
1276 , p8_a39 VARCHAR2
1277 , p8_a40 VARCHAR2
1278 , p8_a41 NUMBER
1279 , p8_a42 VARCHAR2
1280 )
1281
1282 as
1283 ddp_funds_util_flt ozf_claim_accrual_pvt.funds_util_flt_type;
1284 ddindx binary_integer; indx binary_integer;
1285 begin
1286
1287 -- copy data to the local IN or IN-OUT args, if any
1288
1289
1290
1291
1292
1293
1294
1295
1296 ddp_funds_util_flt.claim_line_id := p8_a0;
1297 ddp_funds_util_flt.fund_id := p8_a1;
1298 ddp_funds_util_flt.activity_type := p8_a2;
1299 ddp_funds_util_flt.activity_id := p8_a3;
1300 ddp_funds_util_flt.activity_product_id := p8_a4;
1301 ddp_funds_util_flt.schedule_id := p8_a5;
1302 ddp_funds_util_flt.offer_type := p8_a6;
1303 ddp_funds_util_flt.document_class := p8_a7;
1304 ddp_funds_util_flt.document_id := p8_a8;
1305 ddp_funds_util_flt.product_level_type := p8_a9;
1306 ddp_funds_util_flt.product_id := p8_a10;
1307 ddp_funds_util_flt.reference_type := p8_a11;
1308 ddp_funds_util_flt.reference_id := p8_a12;
1309 ddp_funds_util_flt.utilization_type := p8_a13;
1310 ddp_funds_util_flt.total_amount := p8_a14;
1311 ddp_funds_util_flt.old_total_amount := p8_a15;
1312 if p8_a16 is null
1313 then ddp_funds_util_flt.pay_over_all_flag := null;
1314 elsif p8_a16 = 0
1315 then ddp_funds_util_flt.pay_over_all_flag := false;
1316 else ddp_funds_util_flt.pay_over_all_flag := true;
1317 end if;
1318 ddp_funds_util_flt.total_units := p8_a17;
1319 ddp_funds_util_flt.old_total_units := p8_a18;
1320 ddp_funds_util_flt.quantity := p8_a19;
1321 ddp_funds_util_flt.uom_code := p8_a20;
1322 ddp_funds_util_flt.cust_account_id := p8_a21;
1323 ddp_funds_util_flt.relationship_type := p8_a22;
1324 ddp_funds_util_flt.related_cust_account_id := p8_a23;
1325 ddp_funds_util_flt.buy_group_cust_account_id := p8_a24;
1326 ddp_funds_util_flt.buy_group_party_id := p8_a25;
1327 ddp_funds_util_flt.select_cust_children_flag := p8_a26;
1328 ddp_funds_util_flt.pay_to_customer := p8_a27;
1329 ddp_funds_util_flt.prorate_earnings_flag := p8_a28;
1330 ddp_funds_util_flt.adjustment_type_id := p8_a29;
1331 ddp_funds_util_flt.end_date := rosetta_g_miss_date_in_map(p8_a30);
1332 ddp_funds_util_flt.run_mode := p8_a31;
1333 ddp_funds_util_flt.check_sales_rep_flag := p8_a32;
1334 ddp_funds_util_flt.group_by_offer := p8_a33;
1335 ddp_funds_util_flt.offer_payment_method := p8_a34;
1336 ddp_funds_util_flt.utiz_currency_code := p8_a35;
1337 ddp_funds_util_flt.bill_to_site_use_id := p8_a36;
1341 ddp_funds_util_flt.year_name := p8_a40;
1338 ddp_funds_util_flt.utilization_id := p8_a37;
1339 ddp_funds_util_flt.autopay_check := p8_a38;
1340 ddp_funds_util_flt.period_name := p8_a39;
1342 ddp_funds_util_flt.claim_id := p8_a41;
1343 ddp_funds_util_flt.created_from := p8_a42;
1344
1345 -- here's the delegated call to the old PL/SQL routine
1346 ozf_claim_accrual_pvt.asso_accruals_to_claim(p_api_version,
1347 p_init_msg_list,
1348 p_commit,
1349 p_validation_level,
1350 x_return_status,
1351 x_msg_count,
1352 x_msg_data,
1353 p_claim_id,
1354 ddp_funds_util_flt);
1355
1356 -- copy data back from the local variables to OUT or IN-OUT args, if any
1357
1358
1359
1360
1361
1362
1363
1364
1365 end;
1366
1367 procedure create_claim_for_accruals(p_api_version NUMBER
1368 , p_init_msg_list VARCHAR2
1369 , p_commit VARCHAR2
1370 , p_validation_level NUMBER
1371 , x_return_status out nocopy VARCHAR2
1372 , x_msg_count out nocopy NUMBER
1373 , x_msg_data out nocopy VARCHAR2
1374 , p7_a0 NUMBER
1375 , p7_a1 NUMBER
1376 , p7_a2 DATE
1377 , p7_a3 NUMBER
1378 , p7_a4 DATE
1379 , p7_a5 NUMBER
1380 , p7_a6 NUMBER
1381 , p7_a7 NUMBER
1382 , p7_a8 NUMBER
1383 , p7_a9 DATE
1384 , p7_a10 NUMBER
1385 , p7_a11 VARCHAR2
1386 , p7_a12 NUMBER
1387 , p7_a13 VARCHAR2
1388 , p7_a14 NUMBER
1389 , p7_a15 VARCHAR2
1390 , p7_a16 DATE
1391 , p7_a17 DATE
1392 , p7_a18 NUMBER
1393 , p7_a19 VARCHAR2
1394 , p7_a20 DATE
1395 , p7_a21 VARCHAR2
1396 , p7_a22 NUMBER
1397 , p7_a23 NUMBER
1398 , p7_a24 DATE
1399 , p7_a25 NUMBER
1400 , p7_a26 NUMBER
1401 , p7_a27 NUMBER
1402 , p7_a28 NUMBER
1403 , p7_a29 NUMBER
1404 , p7_a30 NUMBER
1405 , p7_a31 NUMBER
1406 , p7_a32 NUMBER
1407 , p7_a33 NUMBER
1408 , p7_a34 NUMBER
1409 , p7_a35 VARCHAR2
1410 , p7_a36 VARCHAR2
1411 , p7_a37 VARCHAR2
1412 , p7_a38 VARCHAR2
1413 , p7_a39 DATE
1414 , p7_a40 NUMBER
1415 , p7_a41 NUMBER
1416 , p7_a42 DATE
1417 , p7_a43 NUMBER
1418 , p7_a44 VARCHAR2
1419 , p7_a45 NUMBER
1420 , p7_a46 VARCHAR2
1421 , p7_a47 NUMBER
1422 , p7_a48 NUMBER
1423 , p7_a49 NUMBER
1424 , p7_a50 NUMBER
1425 , p7_a51 VARCHAR2
1426 , p7_a52 NUMBER
1427 , p7_a53 NUMBER
1428 , p7_a54 VARCHAR2
1429 , p7_a55 NUMBER
1430 , p7_a56 NUMBER
1431 , p7_a57 VARCHAR2
1432 , p7_a58 NUMBER
1433 , p7_a59 NUMBER
1434 , p7_a60 VARCHAR2
1435 , p7_a61 NUMBER
1436 , p7_a62 NUMBER
1437 , p7_a63 NUMBER
1438 , p7_a64 NUMBER
1439 , p7_a65 NUMBER
1440 , p7_a66 NUMBER
1441 , p7_a67 DATE
1442 , p7_a68 VARCHAR2
1443 , p7_a69 NUMBER
1444 , p7_a70 NUMBER
1445 , p7_a71 VARCHAR2
1446 , p7_a72 NUMBER
1447 , p7_a73 NUMBER
1448 , p7_a74 DATE
1449 , p7_a75 VARCHAR2
1450 , p7_a76 NUMBER
1451 , p7_a77 VARCHAR2
1452 , p7_a78 NUMBER
1453 , p7_a79 VARCHAR2
1454 , p7_a80 DATE
1455 , p7_a81 VARCHAR2
1456 , p7_a82 VARCHAR2
1457 , p7_a83 DATE
1458 , p7_a84 NUMBER
1459 , p7_a85 DATE
1460 , p7_a86 NUMBER
1461 , p7_a87 DATE
1462 , p7_a88 NUMBER
1463 , p7_a89 NUMBER
1464 , p7_a90 NUMBER
1465 , p7_a91 NUMBER
1466 , p7_a92 VARCHAR2
1467 , p7_a93 VARCHAR2
1468 , p7_a94 VARCHAR2
1469 , p7_a95 VARCHAR2
1470 , p7_a96 VARCHAR2
1471 , p7_a97 VARCHAR2
1472 , p7_a98 VARCHAR2
1473 , p7_a99 VARCHAR2
1474 , p7_a100 VARCHAR2
1475 , p7_a101 VARCHAR2
1476 , p7_a102 VARCHAR2
1477 , p7_a103 VARCHAR2
1478 , p7_a104 VARCHAR2
1479 , p7_a105 VARCHAR2
1480 , p7_a106 VARCHAR2
1481 , p7_a107 VARCHAR2
1482 , p7_a108 VARCHAR2
1483 , p7_a109 VARCHAR2
1484 , p7_a110 VARCHAR2
1485 , p7_a111 VARCHAR2
1486 , p7_a112 VARCHAR2
1487 , p7_a113 VARCHAR2
1488 , p7_a114 VARCHAR2
1489 , p7_a115 VARCHAR2
1490 , p7_a116 VARCHAR2
1491 , p7_a117 VARCHAR2
1492 , p7_a118 VARCHAR2
1493 , p7_a119 VARCHAR2
1494 , p7_a120 VARCHAR2
1495 , p7_a121 VARCHAR2
1496 , p7_a122 VARCHAR2
1497 , p7_a123 VARCHAR2
1498 , p7_a124 VARCHAR2
1499 , p7_a125 NUMBER
1500 , p7_a126 NUMBER
1501 , p7_a127 VARCHAR2
1502 , p7_a128 NUMBER
1503 , p7_a129 VARCHAR2
1504 , p7_a130 VARCHAR2
1505 , p7_a131 NUMBER
1506 , p7_a132 NUMBER
1507 , p7_a133 NUMBER
1508 , p7_a134 VARCHAR2
1509 , p7_a135 NUMBER
1510 , p7_a136 NUMBER
1511 , p7_a137 VARCHAR2
1512 , p7_a138 VARCHAR2
1513 , p7_a139 VARCHAR2
1514 , p7_a140 VARCHAR2
1515 , p7_a141 NUMBER
1516 , p7_a142 NUMBER
1517 , p7_a143 VARCHAR2
1518 , p7_a144 VARCHAR2
1519 , p7_a145 NUMBER
1520 , p7_a146 VARCHAR2
1521 , p7_a147 VARCHAR2
1522 , p8_a0 NUMBER
1523 , p8_a1 NUMBER
1524 , p8_a2 VARCHAR2
1525 , p8_a3 NUMBER
1526 , p8_a4 NUMBER
1527 , p8_a5 NUMBER
1528 , p8_a6 VARCHAR2
1529 , p8_a7 VARCHAR2
1530 , p8_a8 NUMBER
1534 , p8_a12 NUMBER
1531 , p8_a9 VARCHAR2
1532 , p8_a10 NUMBER
1533 , p8_a11 VARCHAR2
1535 , p8_a13 VARCHAR2
1536 , p8_a14 NUMBER
1537 , p8_a15 NUMBER
1538 , p8_a16 NUMBER
1539 , p8_a17 NUMBER
1540 , p8_a18 NUMBER
1541 , p8_a19 NUMBER
1542 , p8_a20 VARCHAR2
1543 , p8_a21 NUMBER
1544 , p8_a22 VARCHAR2
1545 , p8_a23 NUMBER
1546 , p8_a24 NUMBER
1547 , p8_a25 NUMBER
1548 , p8_a26 VARCHAR2
1549 , p8_a27 VARCHAR2
1550 , p8_a28 VARCHAR2
1551 , p8_a29 NUMBER
1552 , p8_a30 DATE
1553 , p8_a31 VARCHAR2
1554 , p8_a32 VARCHAR2
1555 , p8_a33 VARCHAR2
1556 , p8_a34 VARCHAR2
1557 , p8_a35 VARCHAR2
1558 , p8_a36 NUMBER
1559 , p8_a37 NUMBER
1560 , p8_a38 VARCHAR2
1561 , p8_a39 VARCHAR2
1562 , p8_a40 VARCHAR2
1563 , p8_a41 NUMBER
1564 , p8_a42 VARCHAR2
1565 , x_claim_id out nocopy NUMBER
1566 )
1567
1568 as
1569 ddp_claim_rec ozf_claim_pvt.claim_rec_type;
1570 ddp_funds_util_flt ozf_claim_accrual_pvt.funds_util_flt_type;
1571 ddindx binary_integer; indx binary_integer;
1572 begin
1573
1574 -- copy data to the local IN or IN-OUT args, if any
1575
1576
1577
1578
1579
1580
1581
1582 ddp_claim_rec.claim_id := p7_a0;
1583 ddp_claim_rec.object_version_number := p7_a1;
1584 ddp_claim_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
1585 ddp_claim_rec.last_updated_by := p7_a3;
1586 ddp_claim_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
1587 ddp_claim_rec.created_by := p7_a5;
1588 ddp_claim_rec.last_update_login := p7_a6;
1589 ddp_claim_rec.request_id := p7_a7;
1590 ddp_claim_rec.program_application_id := p7_a8;
1591 ddp_claim_rec.program_update_date := rosetta_g_miss_date_in_map(p7_a9);
1592 ddp_claim_rec.program_id := p7_a10;
1593 ddp_claim_rec.created_from := p7_a11;
1594 ddp_claim_rec.batch_id := p7_a12;
1595 ddp_claim_rec.claim_number := p7_a13;
1596 ddp_claim_rec.claim_type_id := p7_a14;
1597 ddp_claim_rec.claim_class := p7_a15;
1598 ddp_claim_rec.claim_date := rosetta_g_miss_date_in_map(p7_a16);
1599 ddp_claim_rec.due_date := rosetta_g_miss_date_in_map(p7_a17);
1600 ddp_claim_rec.owner_id := p7_a18;
1601 ddp_claim_rec.history_event := p7_a19;
1602 ddp_claim_rec.history_event_date := rosetta_g_miss_date_in_map(p7_a20);
1603 ddp_claim_rec.history_event_description := p7_a21;
1604 ddp_claim_rec.split_from_claim_id := p7_a22;
1605 ddp_claim_rec.duplicate_claim_id := p7_a23;
1606 ddp_claim_rec.split_date := rosetta_g_miss_date_in_map(p7_a24);
1607 ddp_claim_rec.root_claim_id := p7_a25;
1608 ddp_claim_rec.amount := p7_a26;
1609 ddp_claim_rec.amount_adjusted := p7_a27;
1610 ddp_claim_rec.amount_remaining := p7_a28;
1611 ddp_claim_rec.amount_settled := p7_a29;
1612 ddp_claim_rec.acctd_amount := p7_a30;
1613 ddp_claim_rec.acctd_amount_remaining := p7_a31;
1614 ddp_claim_rec.acctd_amount_adjusted := p7_a32;
1615 ddp_claim_rec.acctd_amount_settled := p7_a33;
1616 ddp_claim_rec.tax_amount := p7_a34;
1617 ddp_claim_rec.tax_code := p7_a35;
1618 ddp_claim_rec.tax_calculation_flag := p7_a36;
1619 ddp_claim_rec.currency_code := p7_a37;
1620 ddp_claim_rec.exchange_rate_type := p7_a38;
1621 ddp_claim_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p7_a39);
1622 ddp_claim_rec.exchange_rate := p7_a40;
1623 ddp_claim_rec.set_of_books_id := p7_a41;
1624 ddp_claim_rec.original_claim_date := rosetta_g_miss_date_in_map(p7_a42);
1625 ddp_claim_rec.source_object_id := p7_a43;
1626 ddp_claim_rec.source_object_class := p7_a44;
1627 ddp_claim_rec.source_object_type_id := p7_a45;
1628 ddp_claim_rec.source_object_number := p7_a46;
1629 ddp_claim_rec.cust_account_id := p7_a47;
1630 ddp_claim_rec.cust_billto_acct_site_id := p7_a48;
1631 ddp_claim_rec.cust_shipto_acct_site_id := p7_a49;
1632 ddp_claim_rec.location_id := p7_a50;
1633 ddp_claim_rec.pay_related_account_flag := p7_a51;
1634 ddp_claim_rec.related_cust_account_id := p7_a52;
1635 ddp_claim_rec.related_site_use_id := p7_a53;
1636 ddp_claim_rec.relationship_type := p7_a54;
1637 ddp_claim_rec.vendor_id := p7_a55;
1638 ddp_claim_rec.vendor_site_id := p7_a56;
1639 ddp_claim_rec.reason_type := p7_a57;
1640 ddp_claim_rec.reason_code_id := p7_a58;
1641 ddp_claim_rec.task_template_group_id := p7_a59;
1642 ddp_claim_rec.status_code := p7_a60;
1643 ddp_claim_rec.user_status_id := p7_a61;
1644 ddp_claim_rec.sales_rep_id := p7_a62;
1645 ddp_claim_rec.collector_id := p7_a63;
1646 ddp_claim_rec.contact_id := p7_a64;
1647 ddp_claim_rec.broker_id := p7_a65;
1648 ddp_claim_rec.territory_id := p7_a66;
1649 ddp_claim_rec.customer_ref_date := rosetta_g_miss_date_in_map(p7_a67);
1650 ddp_claim_rec.customer_ref_number := p7_a68;
1651 ddp_claim_rec.assigned_to := p7_a69;
1652 ddp_claim_rec.receipt_id := p7_a70;
1653 ddp_claim_rec.receipt_number := p7_a71;
1654 ddp_claim_rec.doc_sequence_id := p7_a72;
1655 ddp_claim_rec.doc_sequence_value := p7_a73;
1656 ddp_claim_rec.gl_date := rosetta_g_miss_date_in_map(p7_a74);
1657 ddp_claim_rec.payment_method := p7_a75;
1658 ddp_claim_rec.voucher_id := p7_a76;
1659 ddp_claim_rec.voucher_number := p7_a77;
1660 ddp_claim_rec.payment_reference_id := p7_a78;
1661 ddp_claim_rec.payment_reference_number := p7_a79;
1662 ddp_claim_rec.payment_reference_date := rosetta_g_miss_date_in_map(p7_a80);
1663 ddp_claim_rec.payment_status := p7_a81;
1664 ddp_claim_rec.approved_flag := p7_a82;
1665 ddp_claim_rec.approved_date := rosetta_g_miss_date_in_map(p7_a83);
1666 ddp_claim_rec.approved_by := p7_a84;
1670 ddp_claim_rec.custom_setup_id := p7_a88;
1667 ddp_claim_rec.settled_date := rosetta_g_miss_date_in_map(p7_a85);
1668 ddp_claim_rec.settled_by := p7_a86;
1669 ddp_claim_rec.effective_date := rosetta_g_miss_date_in_map(p7_a87);
1671 ddp_claim_rec.task_id := p7_a89;
1672 ddp_claim_rec.country_id := p7_a90;
1673 ddp_claim_rec.order_type_id := p7_a91;
1674 ddp_claim_rec.comments := p7_a92;
1675 ddp_claim_rec.attribute_category := p7_a93;
1676 ddp_claim_rec.attribute1 := p7_a94;
1677 ddp_claim_rec.attribute2 := p7_a95;
1678 ddp_claim_rec.attribute3 := p7_a96;
1679 ddp_claim_rec.attribute4 := p7_a97;
1680 ddp_claim_rec.attribute5 := p7_a98;
1681 ddp_claim_rec.attribute6 := p7_a99;
1682 ddp_claim_rec.attribute7 := p7_a100;
1683 ddp_claim_rec.attribute8 := p7_a101;
1684 ddp_claim_rec.attribute9 := p7_a102;
1685 ddp_claim_rec.attribute10 := p7_a103;
1686 ddp_claim_rec.attribute11 := p7_a104;
1687 ddp_claim_rec.attribute12 := p7_a105;
1688 ddp_claim_rec.attribute13 := p7_a106;
1689 ddp_claim_rec.attribute14 := p7_a107;
1690 ddp_claim_rec.attribute15 := p7_a108;
1691 ddp_claim_rec.deduction_attribute_category := p7_a109;
1692 ddp_claim_rec.deduction_attribute1 := p7_a110;
1693 ddp_claim_rec.deduction_attribute2 := p7_a111;
1694 ddp_claim_rec.deduction_attribute3 := p7_a112;
1695 ddp_claim_rec.deduction_attribute4 := p7_a113;
1696 ddp_claim_rec.deduction_attribute5 := p7_a114;
1697 ddp_claim_rec.deduction_attribute6 := p7_a115;
1698 ddp_claim_rec.deduction_attribute7 := p7_a116;
1699 ddp_claim_rec.deduction_attribute8 := p7_a117;
1700 ddp_claim_rec.deduction_attribute9 := p7_a118;
1701 ddp_claim_rec.deduction_attribute10 := p7_a119;
1702 ddp_claim_rec.deduction_attribute11 := p7_a120;
1703 ddp_claim_rec.deduction_attribute12 := p7_a121;
1704 ddp_claim_rec.deduction_attribute13 := p7_a122;
1705 ddp_claim_rec.deduction_attribute14 := p7_a123;
1706 ddp_claim_rec.deduction_attribute15 := p7_a124;
1707 ddp_claim_rec.org_id := p7_a125;
1708 ddp_claim_rec.legal_entity_id := p7_a126;
1709 ddp_claim_rec.write_off_flag := p7_a127;
1710 ddp_claim_rec.write_off_threshold_amount := p7_a128;
1711 ddp_claim_rec.under_write_off_threshold := p7_a129;
1712 ddp_claim_rec.customer_reason := p7_a130;
1713 ddp_claim_rec.ship_to_cust_account_id := p7_a131;
1714 ddp_claim_rec.amount_applied := p7_a132;
1715 ddp_claim_rec.applied_receipt_id := p7_a133;
1716 ddp_claim_rec.applied_receipt_number := p7_a134;
1717 ddp_claim_rec.wo_rec_trx_id := p7_a135;
1718 ddp_claim_rec.group_claim_id := p7_a136;
1719 ddp_claim_rec.appr_wf_item_key := p7_a137;
1720 ddp_claim_rec.cstl_wf_item_key := p7_a138;
1721 ddp_claim_rec.batch_type := p7_a139;
1722 ddp_claim_rec.tax_action := p7_a140;
1723 ddp_claim_rec.close_status_id := p7_a141;
1724 ddp_claim_rec.open_status_id := p7_a142;
1725 ddp_claim_rec.pre_auth_deduction_number := p7_a143;
1726 ddp_claim_rec.pre_auth_deduction_normalized := p7_a144;
1727 ddp_claim_rec.offer_id := p7_a145;
1728 ddp_claim_rec.settled_from := p7_a146;
1729 ddp_claim_rec.approval_in_prog := p7_a147;
1730
1731 ddp_funds_util_flt.claim_line_id := p8_a0;
1732 ddp_funds_util_flt.fund_id := p8_a1;
1733 ddp_funds_util_flt.activity_type := p8_a2;
1734 ddp_funds_util_flt.activity_id := p8_a3;
1735 ddp_funds_util_flt.activity_product_id := p8_a4;
1736 ddp_funds_util_flt.schedule_id := p8_a5;
1737 ddp_funds_util_flt.offer_type := p8_a6;
1738 ddp_funds_util_flt.document_class := p8_a7;
1739 ddp_funds_util_flt.document_id := p8_a8;
1740 ddp_funds_util_flt.product_level_type := p8_a9;
1741 ddp_funds_util_flt.product_id := p8_a10;
1742 ddp_funds_util_flt.reference_type := p8_a11;
1743 ddp_funds_util_flt.reference_id := p8_a12;
1744 ddp_funds_util_flt.utilization_type := p8_a13;
1745 ddp_funds_util_flt.total_amount := p8_a14;
1746 ddp_funds_util_flt.old_total_amount := p8_a15;
1747 if p8_a16 is null
1748 then ddp_funds_util_flt.pay_over_all_flag := null;
1749 elsif p8_a16 = 0
1750 then ddp_funds_util_flt.pay_over_all_flag := false;
1751 else ddp_funds_util_flt.pay_over_all_flag := true;
1752 end if;
1753 ddp_funds_util_flt.total_units := p8_a17;
1754 ddp_funds_util_flt.old_total_units := p8_a18;
1755 ddp_funds_util_flt.quantity := p8_a19;
1756 ddp_funds_util_flt.uom_code := p8_a20;
1757 ddp_funds_util_flt.cust_account_id := p8_a21;
1758 ddp_funds_util_flt.relationship_type := p8_a22;
1759 ddp_funds_util_flt.related_cust_account_id := p8_a23;
1760 ddp_funds_util_flt.buy_group_cust_account_id := p8_a24;
1761 ddp_funds_util_flt.buy_group_party_id := p8_a25;
1762 ddp_funds_util_flt.select_cust_children_flag := p8_a26;
1763 ddp_funds_util_flt.pay_to_customer := p8_a27;
1764 ddp_funds_util_flt.prorate_earnings_flag := p8_a28;
1765 ddp_funds_util_flt.adjustment_type_id := p8_a29;
1766 ddp_funds_util_flt.end_date := rosetta_g_miss_date_in_map(p8_a30);
1767 ddp_funds_util_flt.run_mode := p8_a31;
1768 ddp_funds_util_flt.check_sales_rep_flag := p8_a32;
1769 ddp_funds_util_flt.group_by_offer := p8_a33;
1770 ddp_funds_util_flt.offer_payment_method := p8_a34;
1771 ddp_funds_util_flt.utiz_currency_code := p8_a35;
1772 ddp_funds_util_flt.bill_to_site_use_id := p8_a36;
1773 ddp_funds_util_flt.utilization_id := p8_a37;
1774 ddp_funds_util_flt.autopay_check := p8_a38;
1775 ddp_funds_util_flt.period_name := p8_a39;
1776 ddp_funds_util_flt.year_name := p8_a40;
1777 ddp_funds_util_flt.claim_id := p8_a41;
1778 ddp_funds_util_flt.created_from := p8_a42;
1779
1780
1781 -- here's the delegated call to the old PL/SQL routine
1782 ozf_claim_accrual_pvt.create_claim_for_accruals(p_api_version,
1783 p_init_msg_list,
1784 p_commit,
1785 p_validation_level,
1789 ddp_claim_rec,
1786 x_return_status,
1787 x_msg_count,
1788 x_msg_data,
1790 ddp_funds_util_flt,
1791 x_claim_id);
1792
1793 -- copy data back from the local variables to OUT or IN-OUT args, if any
1794
1795
1796
1797
1798
1799
1800
1801
1802
1803 end;
1804
1805 procedure create_claim_existing_accruals(p_api_version NUMBER
1806 , p_init_msg_list VARCHAR2
1807 , p_commit VARCHAR2
1808 , p_validation_level NUMBER
1809 , x_return_status out nocopy VARCHAR2
1810 , x_msg_count out nocopy NUMBER
1811 , x_msg_data out nocopy VARCHAR2
1812 , p7_a0 NUMBER
1813 , p7_a1 NUMBER
1814 , p7_a2 DATE
1815 , p7_a3 NUMBER
1816 , p7_a4 DATE
1817 , p7_a5 NUMBER
1818 , p7_a6 NUMBER
1819 , p7_a7 NUMBER
1820 , p7_a8 NUMBER
1821 , p7_a9 DATE
1822 , p7_a10 NUMBER
1823 , p7_a11 VARCHAR2
1824 , p7_a12 NUMBER
1825 , p7_a13 VARCHAR2
1826 , p7_a14 NUMBER
1827 , p7_a15 VARCHAR2
1828 , p7_a16 DATE
1829 , p7_a17 DATE
1830 , p7_a18 NUMBER
1831 , p7_a19 VARCHAR2
1832 , p7_a20 DATE
1833 , p7_a21 VARCHAR2
1834 , p7_a22 NUMBER
1835 , p7_a23 NUMBER
1836 , p7_a24 DATE
1837 , p7_a25 NUMBER
1838 , p7_a26 NUMBER
1839 , p7_a27 NUMBER
1840 , p7_a28 NUMBER
1841 , p7_a29 NUMBER
1842 , p7_a30 NUMBER
1843 , p7_a31 NUMBER
1844 , p7_a32 NUMBER
1845 , p7_a33 NUMBER
1846 , p7_a34 NUMBER
1847 , p7_a35 VARCHAR2
1848 , p7_a36 VARCHAR2
1849 , p7_a37 VARCHAR2
1850 , p7_a38 VARCHAR2
1851 , p7_a39 DATE
1852 , p7_a40 NUMBER
1853 , p7_a41 NUMBER
1854 , p7_a42 DATE
1855 , p7_a43 NUMBER
1856 , p7_a44 VARCHAR2
1857 , p7_a45 NUMBER
1858 , p7_a46 VARCHAR2
1859 , p7_a47 NUMBER
1860 , p7_a48 NUMBER
1861 , p7_a49 NUMBER
1862 , p7_a50 NUMBER
1863 , p7_a51 VARCHAR2
1864 , p7_a52 NUMBER
1865 , p7_a53 NUMBER
1866 , p7_a54 VARCHAR2
1867 , p7_a55 NUMBER
1868 , p7_a56 NUMBER
1869 , p7_a57 VARCHAR2
1870 , p7_a58 NUMBER
1871 , p7_a59 NUMBER
1872 , p7_a60 VARCHAR2
1873 , p7_a61 NUMBER
1874 , p7_a62 NUMBER
1875 , p7_a63 NUMBER
1876 , p7_a64 NUMBER
1877 , p7_a65 NUMBER
1878 , p7_a66 NUMBER
1879 , p7_a67 DATE
1880 , p7_a68 VARCHAR2
1881 , p7_a69 NUMBER
1882 , p7_a70 NUMBER
1883 , p7_a71 VARCHAR2
1884 , p7_a72 NUMBER
1885 , p7_a73 NUMBER
1886 , p7_a74 DATE
1887 , p7_a75 VARCHAR2
1888 , p7_a76 NUMBER
1889 , p7_a77 VARCHAR2
1890 , p7_a78 NUMBER
1891 , p7_a79 VARCHAR2
1892 , p7_a80 DATE
1893 , p7_a81 VARCHAR2
1894 , p7_a82 VARCHAR2
1895 , p7_a83 DATE
1896 , p7_a84 NUMBER
1897 , p7_a85 DATE
1898 , p7_a86 NUMBER
1899 , p7_a87 DATE
1900 , p7_a88 NUMBER
1901 , p7_a89 NUMBER
1902 , p7_a90 NUMBER
1903 , p7_a91 NUMBER
1904 , p7_a92 VARCHAR2
1905 , p7_a93 VARCHAR2
1906 , p7_a94 VARCHAR2
1907 , p7_a95 VARCHAR2
1908 , p7_a96 VARCHAR2
1909 , p7_a97 VARCHAR2
1910 , p7_a98 VARCHAR2
1911 , p7_a99 VARCHAR2
1912 , p7_a100 VARCHAR2
1913 , p7_a101 VARCHAR2
1914 , p7_a102 VARCHAR2
1915 , p7_a103 VARCHAR2
1916 , p7_a104 VARCHAR2
1917 , p7_a105 VARCHAR2
1918 , p7_a106 VARCHAR2
1919 , p7_a107 VARCHAR2
1920 , p7_a108 VARCHAR2
1921 , p7_a109 VARCHAR2
1922 , p7_a110 VARCHAR2
1923 , p7_a111 VARCHAR2
1924 , p7_a112 VARCHAR2
1925 , p7_a113 VARCHAR2
1926 , p7_a114 VARCHAR2
1927 , p7_a115 VARCHAR2
1928 , p7_a116 VARCHAR2
1929 , p7_a117 VARCHAR2
1930 , p7_a118 VARCHAR2
1931 , p7_a119 VARCHAR2
1932 , p7_a120 VARCHAR2
1933 , p7_a121 VARCHAR2
1934 , p7_a122 VARCHAR2
1935 , p7_a123 VARCHAR2
1936 , p7_a124 VARCHAR2
1937 , p7_a125 NUMBER
1938 , p7_a126 NUMBER
1939 , p7_a127 VARCHAR2
1940 , p7_a128 NUMBER
1941 , p7_a129 VARCHAR2
1942 , p7_a130 VARCHAR2
1943 , p7_a131 NUMBER
1944 , p7_a132 NUMBER
1945 , p7_a133 NUMBER
1946 , p7_a134 VARCHAR2
1947 , p7_a135 NUMBER
1948 , p7_a136 NUMBER
1949 , p7_a137 VARCHAR2
1950 , p7_a138 VARCHAR2
1951 , p7_a139 VARCHAR2
1952 , p7_a140 VARCHAR2
1953 , p7_a141 NUMBER
1954 , p7_a142 NUMBER
1955 , p7_a143 VARCHAR2
1956 , p7_a144 VARCHAR2
1957 , p7_a145 NUMBER
1958 , p7_a146 VARCHAR2
1959 , p7_a147 VARCHAR2
1960 , p8_a0 NUMBER
1961 , p8_a1 NUMBER
1962 , p8_a2 VARCHAR2
1963 , p8_a3 NUMBER
1964 , p8_a4 NUMBER
1965 , p8_a5 NUMBER
1966 , p8_a6 VARCHAR2
1967 , p8_a7 VARCHAR2
1968 , p8_a8 NUMBER
1969 , p8_a9 VARCHAR2
1970 , p8_a10 NUMBER
1971 , p8_a11 VARCHAR2
1972 , p8_a12 NUMBER
1973 , p8_a13 VARCHAR2
1974 , p8_a14 NUMBER
1975 , p8_a15 NUMBER
1976 , p8_a16 NUMBER
1977 , p8_a17 NUMBER
1978 , p8_a18 NUMBER
1979 , p8_a19 NUMBER
1980 , p8_a20 VARCHAR2
1981 , p8_a21 NUMBER
1982 , p8_a22 VARCHAR2
1983 , p8_a23 NUMBER
1984 , p8_a24 NUMBER
1988 , p8_a28 VARCHAR2
1985 , p8_a25 NUMBER
1986 , p8_a26 VARCHAR2
1987 , p8_a27 VARCHAR2
1989 , p8_a29 NUMBER
1990 , p8_a30 DATE
1991 , p8_a31 VARCHAR2
1992 , p8_a32 VARCHAR2
1993 , p8_a33 VARCHAR2
1994 , p8_a34 VARCHAR2
1995 , p8_a35 VARCHAR2
1996 , p8_a36 NUMBER
1997 , p8_a37 NUMBER
1998 , p8_a38 VARCHAR2
1999 , p8_a39 VARCHAR2
2000 , p8_a40 VARCHAR2
2001 , p8_a41 NUMBER
2002 , p8_a42 VARCHAR2
2003 , x_claim_id out nocopy NUMBER
2004 )
2005
2006 as
2007 ddp_claim_rec ozf_claim_pvt.claim_rec_type;
2008 ddp_funds_util_flt ozf_claim_accrual_pvt.funds_util_flt_type;
2009 ddindx binary_integer; indx binary_integer;
2010 begin
2011
2012 -- copy data to the local IN or IN-OUT args, if any
2013
2014
2015
2016
2017
2018
2019
2020 ddp_claim_rec.claim_id := p7_a0;
2021 ddp_claim_rec.object_version_number := p7_a1;
2022 ddp_claim_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
2023 ddp_claim_rec.last_updated_by := p7_a3;
2024 ddp_claim_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
2025 ddp_claim_rec.created_by := p7_a5;
2026 ddp_claim_rec.last_update_login := p7_a6;
2027 ddp_claim_rec.request_id := p7_a7;
2028 ddp_claim_rec.program_application_id := p7_a8;
2029 ddp_claim_rec.program_update_date := rosetta_g_miss_date_in_map(p7_a9);
2030 ddp_claim_rec.program_id := p7_a10;
2031 ddp_claim_rec.created_from := p7_a11;
2032 ddp_claim_rec.batch_id := p7_a12;
2033 ddp_claim_rec.claim_number := p7_a13;
2034 ddp_claim_rec.claim_type_id := p7_a14;
2035 ddp_claim_rec.claim_class := p7_a15;
2036 ddp_claim_rec.claim_date := rosetta_g_miss_date_in_map(p7_a16);
2037 ddp_claim_rec.due_date := rosetta_g_miss_date_in_map(p7_a17);
2038 ddp_claim_rec.owner_id := p7_a18;
2039 ddp_claim_rec.history_event := p7_a19;
2040 ddp_claim_rec.history_event_date := rosetta_g_miss_date_in_map(p7_a20);
2041 ddp_claim_rec.history_event_description := p7_a21;
2042 ddp_claim_rec.split_from_claim_id := p7_a22;
2043 ddp_claim_rec.duplicate_claim_id := p7_a23;
2044 ddp_claim_rec.split_date := rosetta_g_miss_date_in_map(p7_a24);
2045 ddp_claim_rec.root_claim_id := p7_a25;
2046 ddp_claim_rec.amount := p7_a26;
2047 ddp_claim_rec.amount_adjusted := p7_a27;
2048 ddp_claim_rec.amount_remaining := p7_a28;
2049 ddp_claim_rec.amount_settled := p7_a29;
2050 ddp_claim_rec.acctd_amount := p7_a30;
2051 ddp_claim_rec.acctd_amount_remaining := p7_a31;
2052 ddp_claim_rec.acctd_amount_adjusted := p7_a32;
2053 ddp_claim_rec.acctd_amount_settled := p7_a33;
2054 ddp_claim_rec.tax_amount := p7_a34;
2055 ddp_claim_rec.tax_code := p7_a35;
2056 ddp_claim_rec.tax_calculation_flag := p7_a36;
2057 ddp_claim_rec.currency_code := p7_a37;
2058 ddp_claim_rec.exchange_rate_type := p7_a38;
2059 ddp_claim_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p7_a39);
2060 ddp_claim_rec.exchange_rate := p7_a40;
2061 ddp_claim_rec.set_of_books_id := p7_a41;
2062 ddp_claim_rec.original_claim_date := rosetta_g_miss_date_in_map(p7_a42);
2063 ddp_claim_rec.source_object_id := p7_a43;
2064 ddp_claim_rec.source_object_class := p7_a44;
2065 ddp_claim_rec.source_object_type_id := p7_a45;
2066 ddp_claim_rec.source_object_number := p7_a46;
2067 ddp_claim_rec.cust_account_id := p7_a47;
2068 ddp_claim_rec.cust_billto_acct_site_id := p7_a48;
2069 ddp_claim_rec.cust_shipto_acct_site_id := p7_a49;
2070 ddp_claim_rec.location_id := p7_a50;
2071 ddp_claim_rec.pay_related_account_flag := p7_a51;
2072 ddp_claim_rec.related_cust_account_id := p7_a52;
2073 ddp_claim_rec.related_site_use_id := p7_a53;
2074 ddp_claim_rec.relationship_type := p7_a54;
2075 ddp_claim_rec.vendor_id := p7_a55;
2076 ddp_claim_rec.vendor_site_id := p7_a56;
2077 ddp_claim_rec.reason_type := p7_a57;
2078 ddp_claim_rec.reason_code_id := p7_a58;
2079 ddp_claim_rec.task_template_group_id := p7_a59;
2080 ddp_claim_rec.status_code := p7_a60;
2081 ddp_claim_rec.user_status_id := p7_a61;
2082 ddp_claim_rec.sales_rep_id := p7_a62;
2083 ddp_claim_rec.collector_id := p7_a63;
2084 ddp_claim_rec.contact_id := p7_a64;
2085 ddp_claim_rec.broker_id := p7_a65;
2086 ddp_claim_rec.territory_id := p7_a66;
2087 ddp_claim_rec.customer_ref_date := rosetta_g_miss_date_in_map(p7_a67);
2088 ddp_claim_rec.customer_ref_number := p7_a68;
2089 ddp_claim_rec.assigned_to := p7_a69;
2090 ddp_claim_rec.receipt_id := p7_a70;
2091 ddp_claim_rec.receipt_number := p7_a71;
2092 ddp_claim_rec.doc_sequence_id := p7_a72;
2093 ddp_claim_rec.doc_sequence_value := p7_a73;
2094 ddp_claim_rec.gl_date := rosetta_g_miss_date_in_map(p7_a74);
2095 ddp_claim_rec.payment_method := p7_a75;
2096 ddp_claim_rec.voucher_id := p7_a76;
2097 ddp_claim_rec.voucher_number := p7_a77;
2098 ddp_claim_rec.payment_reference_id := p7_a78;
2099 ddp_claim_rec.payment_reference_number := p7_a79;
2100 ddp_claim_rec.payment_reference_date := rosetta_g_miss_date_in_map(p7_a80);
2101 ddp_claim_rec.payment_status := p7_a81;
2102 ddp_claim_rec.approved_flag := p7_a82;
2103 ddp_claim_rec.approved_date := rosetta_g_miss_date_in_map(p7_a83);
2104 ddp_claim_rec.approved_by := p7_a84;
2105 ddp_claim_rec.settled_date := rosetta_g_miss_date_in_map(p7_a85);
2106 ddp_claim_rec.settled_by := p7_a86;
2107 ddp_claim_rec.effective_date := rosetta_g_miss_date_in_map(p7_a87);
2108 ddp_claim_rec.custom_setup_id := p7_a88;
2109 ddp_claim_rec.task_id := p7_a89;
2110 ddp_claim_rec.country_id := p7_a90;
2111 ddp_claim_rec.order_type_id := p7_a91;
2112 ddp_claim_rec.comments := p7_a92;
2113 ddp_claim_rec.attribute_category := p7_a93;
2114 ddp_claim_rec.attribute1 := p7_a94;
2118 ddp_claim_rec.attribute5 := p7_a98;
2115 ddp_claim_rec.attribute2 := p7_a95;
2116 ddp_claim_rec.attribute3 := p7_a96;
2117 ddp_claim_rec.attribute4 := p7_a97;
2119 ddp_claim_rec.attribute6 := p7_a99;
2120 ddp_claim_rec.attribute7 := p7_a100;
2121 ddp_claim_rec.attribute8 := p7_a101;
2122 ddp_claim_rec.attribute9 := p7_a102;
2123 ddp_claim_rec.attribute10 := p7_a103;
2124 ddp_claim_rec.attribute11 := p7_a104;
2125 ddp_claim_rec.attribute12 := p7_a105;
2126 ddp_claim_rec.attribute13 := p7_a106;
2127 ddp_claim_rec.attribute14 := p7_a107;
2128 ddp_claim_rec.attribute15 := p7_a108;
2129 ddp_claim_rec.deduction_attribute_category := p7_a109;
2130 ddp_claim_rec.deduction_attribute1 := p7_a110;
2131 ddp_claim_rec.deduction_attribute2 := p7_a111;
2132 ddp_claim_rec.deduction_attribute3 := p7_a112;
2133 ddp_claim_rec.deduction_attribute4 := p7_a113;
2134 ddp_claim_rec.deduction_attribute5 := p7_a114;
2135 ddp_claim_rec.deduction_attribute6 := p7_a115;
2136 ddp_claim_rec.deduction_attribute7 := p7_a116;
2137 ddp_claim_rec.deduction_attribute8 := p7_a117;
2138 ddp_claim_rec.deduction_attribute9 := p7_a118;
2139 ddp_claim_rec.deduction_attribute10 := p7_a119;
2140 ddp_claim_rec.deduction_attribute11 := p7_a120;
2141 ddp_claim_rec.deduction_attribute12 := p7_a121;
2142 ddp_claim_rec.deduction_attribute13 := p7_a122;
2143 ddp_claim_rec.deduction_attribute14 := p7_a123;
2144 ddp_claim_rec.deduction_attribute15 := p7_a124;
2145 ddp_claim_rec.org_id := p7_a125;
2146 ddp_claim_rec.legal_entity_id := p7_a126;
2147 ddp_claim_rec.write_off_flag := p7_a127;
2148 ddp_claim_rec.write_off_threshold_amount := p7_a128;
2149 ddp_claim_rec.under_write_off_threshold := p7_a129;
2150 ddp_claim_rec.customer_reason := p7_a130;
2151 ddp_claim_rec.ship_to_cust_account_id := p7_a131;
2152 ddp_claim_rec.amount_applied := p7_a132;
2153 ddp_claim_rec.applied_receipt_id := p7_a133;
2154 ddp_claim_rec.applied_receipt_number := p7_a134;
2155 ddp_claim_rec.wo_rec_trx_id := p7_a135;
2156 ddp_claim_rec.group_claim_id := p7_a136;
2157 ddp_claim_rec.appr_wf_item_key := p7_a137;
2158 ddp_claim_rec.cstl_wf_item_key := p7_a138;
2159 ddp_claim_rec.batch_type := p7_a139;
2160 ddp_claim_rec.tax_action := p7_a140;
2161 ddp_claim_rec.close_status_id := p7_a141;
2162 ddp_claim_rec.open_status_id := p7_a142;
2163 ddp_claim_rec.pre_auth_deduction_number := p7_a143;
2164 ddp_claim_rec.pre_auth_deduction_normalized := p7_a144;
2165 ddp_claim_rec.offer_id := p7_a145;
2166 ddp_claim_rec.settled_from := p7_a146;
2167 ddp_claim_rec.approval_in_prog := p7_a147;
2168
2169 ddp_funds_util_flt.claim_line_id := p8_a0;
2170 ddp_funds_util_flt.fund_id := p8_a1;
2171 ddp_funds_util_flt.activity_type := p8_a2;
2172 ddp_funds_util_flt.activity_id := p8_a3;
2173 ddp_funds_util_flt.activity_product_id := p8_a4;
2174 ddp_funds_util_flt.schedule_id := p8_a5;
2175 ddp_funds_util_flt.offer_type := p8_a6;
2176 ddp_funds_util_flt.document_class := p8_a7;
2177 ddp_funds_util_flt.document_id := p8_a8;
2178 ddp_funds_util_flt.product_level_type := p8_a9;
2179 ddp_funds_util_flt.product_id := p8_a10;
2180 ddp_funds_util_flt.reference_type := p8_a11;
2181 ddp_funds_util_flt.reference_id := p8_a12;
2182 ddp_funds_util_flt.utilization_type := p8_a13;
2183 ddp_funds_util_flt.total_amount := p8_a14;
2184 ddp_funds_util_flt.old_total_amount := p8_a15;
2185 if p8_a16 is null
2186 then ddp_funds_util_flt.pay_over_all_flag := null;
2187 elsif p8_a16 = 0
2188 then ddp_funds_util_flt.pay_over_all_flag := false;
2189 else ddp_funds_util_flt.pay_over_all_flag := true;
2190 end if;
2191 ddp_funds_util_flt.total_units := p8_a17;
2192 ddp_funds_util_flt.old_total_units := p8_a18;
2193 ddp_funds_util_flt.quantity := p8_a19;
2194 ddp_funds_util_flt.uom_code := p8_a20;
2195 ddp_funds_util_flt.cust_account_id := p8_a21;
2196 ddp_funds_util_flt.relationship_type := p8_a22;
2197 ddp_funds_util_flt.related_cust_account_id := p8_a23;
2198 ddp_funds_util_flt.buy_group_cust_account_id := p8_a24;
2199 ddp_funds_util_flt.buy_group_party_id := p8_a25;
2200 ddp_funds_util_flt.select_cust_children_flag := p8_a26;
2201 ddp_funds_util_flt.pay_to_customer := p8_a27;
2202 ddp_funds_util_flt.prorate_earnings_flag := p8_a28;
2203 ddp_funds_util_flt.adjustment_type_id := p8_a29;
2204 ddp_funds_util_flt.end_date := rosetta_g_miss_date_in_map(p8_a30);
2205 ddp_funds_util_flt.run_mode := p8_a31;
2206 ddp_funds_util_flt.check_sales_rep_flag := p8_a32;
2207 ddp_funds_util_flt.group_by_offer := p8_a33;
2208 ddp_funds_util_flt.offer_payment_method := p8_a34;
2209 ddp_funds_util_flt.utiz_currency_code := p8_a35;
2210 ddp_funds_util_flt.bill_to_site_use_id := p8_a36;
2211 ddp_funds_util_flt.utilization_id := p8_a37;
2212 ddp_funds_util_flt.autopay_check := p8_a38;
2213 ddp_funds_util_flt.period_name := p8_a39;
2214 ddp_funds_util_flt.year_name := p8_a40;
2215 ddp_funds_util_flt.claim_id := p8_a41;
2216 ddp_funds_util_flt.created_from := p8_a42;
2217
2218
2219 -- here's the delegated call to the old PL/SQL routine
2220 ozf_claim_accrual_pvt.create_claim_existing_accruals(p_api_version,
2221 p_init_msg_list,
2222 p_commit,
2223 p_validation_level,
2224 x_return_status,
2225 x_msg_count,
2226 x_msg_data,
2227 ddp_claim_rec,
2228 ddp_funds_util_flt,
2229 x_claim_id);
2230
2231 -- copy data back from the local variables to OUT or IN-OUT args, if any
2232
2233
2234
2235
2236
2237
2238
2239
2240
2241 end;
2242
2243 procedure pay_claim_for_accruals(p_api_version NUMBER
2244 , p_init_msg_list VARCHAR2
2248 , x_return_status out nocopy VARCHAR2
2245 , p_commit VARCHAR2
2246 , p_validation_level NUMBER
2247 , p_accrual_flag VARCHAR2
2249 , x_msg_count out nocopy NUMBER
2250 , x_msg_data out nocopy VARCHAR2
2251 , p8_a0 NUMBER
2252 , p8_a1 NUMBER
2253 , p8_a2 DATE
2254 , p8_a3 NUMBER
2255 , p8_a4 DATE
2256 , p8_a5 NUMBER
2257 , p8_a6 NUMBER
2258 , p8_a7 NUMBER
2259 , p8_a8 NUMBER
2260 , p8_a9 DATE
2261 , p8_a10 NUMBER
2262 , p8_a11 VARCHAR2
2263 , p8_a12 NUMBER
2264 , p8_a13 VARCHAR2
2265 , p8_a14 NUMBER
2266 , p8_a15 VARCHAR2
2267 , p8_a16 DATE
2268 , p8_a17 DATE
2269 , p8_a18 NUMBER
2270 , p8_a19 VARCHAR2
2271 , p8_a20 DATE
2272 , p8_a21 VARCHAR2
2273 , p8_a22 NUMBER
2274 , p8_a23 NUMBER
2275 , p8_a24 DATE
2276 , p8_a25 NUMBER
2277 , p8_a26 NUMBER
2278 , p8_a27 NUMBER
2279 , p8_a28 NUMBER
2280 , p8_a29 NUMBER
2281 , p8_a30 NUMBER
2282 , p8_a31 NUMBER
2283 , p8_a32 NUMBER
2284 , p8_a33 NUMBER
2285 , p8_a34 NUMBER
2286 , p8_a35 VARCHAR2
2287 , p8_a36 VARCHAR2
2288 , p8_a37 VARCHAR2
2289 , p8_a38 VARCHAR2
2290 , p8_a39 DATE
2291 , p8_a40 NUMBER
2292 , p8_a41 NUMBER
2293 , p8_a42 DATE
2294 , p8_a43 NUMBER
2295 , p8_a44 VARCHAR2
2296 , p8_a45 NUMBER
2297 , p8_a46 VARCHAR2
2298 , p8_a47 NUMBER
2299 , p8_a48 NUMBER
2300 , p8_a49 NUMBER
2301 , p8_a50 NUMBER
2302 , p8_a51 VARCHAR2
2303 , p8_a52 NUMBER
2304 , p8_a53 NUMBER
2305 , p8_a54 VARCHAR2
2306 , p8_a55 NUMBER
2307 , p8_a56 NUMBER
2308 , p8_a57 VARCHAR2
2309 , p8_a58 NUMBER
2310 , p8_a59 NUMBER
2311 , p8_a60 VARCHAR2
2312 , p8_a61 NUMBER
2313 , p8_a62 NUMBER
2314 , p8_a63 NUMBER
2315 , p8_a64 NUMBER
2316 , p8_a65 NUMBER
2317 , p8_a66 NUMBER
2318 , p8_a67 DATE
2319 , p8_a68 VARCHAR2
2320 , p8_a69 NUMBER
2321 , p8_a70 NUMBER
2322 , p8_a71 VARCHAR2
2323 , p8_a72 NUMBER
2324 , p8_a73 NUMBER
2325 , p8_a74 DATE
2326 , p8_a75 VARCHAR2
2327 , p8_a76 NUMBER
2328 , p8_a77 VARCHAR2
2329 , p8_a78 NUMBER
2330 , p8_a79 VARCHAR2
2331 , p8_a80 DATE
2332 , p8_a81 VARCHAR2
2333 , p8_a82 VARCHAR2
2334 , p8_a83 DATE
2335 , p8_a84 NUMBER
2336 , p8_a85 DATE
2337 , p8_a86 NUMBER
2338 , p8_a87 DATE
2339 , p8_a88 NUMBER
2340 , p8_a89 NUMBER
2341 , p8_a90 NUMBER
2342 , p8_a91 NUMBER
2343 , p8_a92 VARCHAR2
2344 , p8_a93 VARCHAR2
2345 , p8_a94 VARCHAR2
2346 , p8_a95 VARCHAR2
2347 , p8_a96 VARCHAR2
2348 , p8_a97 VARCHAR2
2349 , p8_a98 VARCHAR2
2350 , p8_a99 VARCHAR2
2351 , p8_a100 VARCHAR2
2352 , p8_a101 VARCHAR2
2353 , p8_a102 VARCHAR2
2354 , p8_a103 VARCHAR2
2355 , p8_a104 VARCHAR2
2356 , p8_a105 VARCHAR2
2357 , p8_a106 VARCHAR2
2358 , p8_a107 VARCHAR2
2359 , p8_a108 VARCHAR2
2360 , p8_a109 VARCHAR2
2361 , p8_a110 VARCHAR2
2362 , p8_a111 VARCHAR2
2363 , p8_a112 VARCHAR2
2364 , p8_a113 VARCHAR2
2365 , p8_a114 VARCHAR2
2366 , p8_a115 VARCHAR2
2367 , p8_a116 VARCHAR2
2368 , p8_a117 VARCHAR2
2369 , p8_a118 VARCHAR2
2370 , p8_a119 VARCHAR2
2371 , p8_a120 VARCHAR2
2372 , p8_a121 VARCHAR2
2373 , p8_a122 VARCHAR2
2374 , p8_a123 VARCHAR2
2375 , p8_a124 VARCHAR2
2376 , p8_a125 NUMBER
2377 , p8_a126 NUMBER
2378 , p8_a127 VARCHAR2
2379 , p8_a128 NUMBER
2380 , p8_a129 VARCHAR2
2381 , p8_a130 VARCHAR2
2382 , p8_a131 NUMBER
2383 , p8_a132 NUMBER
2384 , p8_a133 NUMBER
2385 , p8_a134 VARCHAR2
2386 , p8_a135 NUMBER
2387 , p8_a136 NUMBER
2388 , p8_a137 VARCHAR2
2389 , p8_a138 VARCHAR2
2390 , p8_a139 VARCHAR2
2391 , p8_a140 VARCHAR2
2392 , p8_a141 NUMBER
2393 , p8_a142 NUMBER
2394 , p8_a143 VARCHAR2
2395 , p8_a144 VARCHAR2
2396 , p8_a145 NUMBER
2397 , p8_a146 VARCHAR2
2398 , p8_a147 VARCHAR2
2399 , p9_a0 NUMBER
2400 , p9_a1 NUMBER
2401 , p9_a2 VARCHAR2
2402 , p9_a3 NUMBER
2403 , p9_a4 NUMBER
2404 , p9_a5 NUMBER
2405 , p9_a6 VARCHAR2
2406 , p9_a7 VARCHAR2
2407 , p9_a8 NUMBER
2408 , p9_a9 VARCHAR2
2409 , p9_a10 NUMBER
2410 , p9_a11 VARCHAR2
2411 , p9_a12 NUMBER
2412 , p9_a13 VARCHAR2
2413 , p9_a14 NUMBER
2414 , p9_a15 NUMBER
2415 , p9_a16 NUMBER
2416 , p9_a17 NUMBER
2417 , p9_a18 NUMBER
2418 , p9_a19 NUMBER
2419 , p9_a20 VARCHAR2
2420 , p9_a21 NUMBER
2421 , p9_a22 VARCHAR2
2422 , p9_a23 NUMBER
2423 , p9_a24 NUMBER
2424 , p9_a25 NUMBER
2425 , p9_a26 VARCHAR2
2426 , p9_a27 VARCHAR2
2427 , p9_a28 VARCHAR2
2428 , p9_a29 NUMBER
2429 , p9_a30 DATE
2430 , p9_a31 VARCHAR2
2431 , p9_a32 VARCHAR2
2432 , p9_a33 VARCHAR2
2433 , p9_a34 VARCHAR2
2434 , p9_a35 VARCHAR2
2435 , p9_a36 NUMBER
2436 , p9_a37 NUMBER
2437 , p9_a38 VARCHAR2
2438 , p9_a39 VARCHAR2
2439 , p9_a40 VARCHAR2
2443 )
2440 , p9_a41 NUMBER
2441 , p9_a42 VARCHAR2
2442 , x_claim_id out nocopy NUMBER
2444
2445 as
2446 ddp_claim_rec ozf_claim_pvt.claim_rec_type;
2447 ddp_funds_util_flt ozf_claim_accrual_pvt.funds_util_flt_type;
2448 ddindx binary_integer; indx binary_integer;
2449 begin
2450
2451 -- copy data to the local IN or IN-OUT args, if any
2452
2453
2454
2455
2456
2457
2458
2459
2460 ddp_claim_rec.claim_id := p8_a0;
2461 ddp_claim_rec.object_version_number := p8_a1;
2462 ddp_claim_rec.last_update_date := rosetta_g_miss_date_in_map(p8_a2);
2463 ddp_claim_rec.last_updated_by := p8_a3;
2464 ddp_claim_rec.creation_date := rosetta_g_miss_date_in_map(p8_a4);
2465 ddp_claim_rec.created_by := p8_a5;
2466 ddp_claim_rec.last_update_login := p8_a6;
2467 ddp_claim_rec.request_id := p8_a7;
2468 ddp_claim_rec.program_application_id := p8_a8;
2469 ddp_claim_rec.program_update_date := rosetta_g_miss_date_in_map(p8_a9);
2470 ddp_claim_rec.program_id := p8_a10;
2471 ddp_claim_rec.created_from := p8_a11;
2472 ddp_claim_rec.batch_id := p8_a12;
2473 ddp_claim_rec.claim_number := p8_a13;
2474 ddp_claim_rec.claim_type_id := p8_a14;
2475 ddp_claim_rec.claim_class := p8_a15;
2476 ddp_claim_rec.claim_date := rosetta_g_miss_date_in_map(p8_a16);
2477 ddp_claim_rec.due_date := rosetta_g_miss_date_in_map(p8_a17);
2478 ddp_claim_rec.owner_id := p8_a18;
2479 ddp_claim_rec.history_event := p8_a19;
2480 ddp_claim_rec.history_event_date := rosetta_g_miss_date_in_map(p8_a20);
2481 ddp_claim_rec.history_event_description := p8_a21;
2482 ddp_claim_rec.split_from_claim_id := p8_a22;
2483 ddp_claim_rec.duplicate_claim_id := p8_a23;
2484 ddp_claim_rec.split_date := rosetta_g_miss_date_in_map(p8_a24);
2485 ddp_claim_rec.root_claim_id := p8_a25;
2486 ddp_claim_rec.amount := p8_a26;
2487 ddp_claim_rec.amount_adjusted := p8_a27;
2488 ddp_claim_rec.amount_remaining := p8_a28;
2489 ddp_claim_rec.amount_settled := p8_a29;
2490 ddp_claim_rec.acctd_amount := p8_a30;
2491 ddp_claim_rec.acctd_amount_remaining := p8_a31;
2492 ddp_claim_rec.acctd_amount_adjusted := p8_a32;
2493 ddp_claim_rec.acctd_amount_settled := p8_a33;
2494 ddp_claim_rec.tax_amount := p8_a34;
2495 ddp_claim_rec.tax_code := p8_a35;
2496 ddp_claim_rec.tax_calculation_flag := p8_a36;
2497 ddp_claim_rec.currency_code := p8_a37;
2498 ddp_claim_rec.exchange_rate_type := p8_a38;
2499 ddp_claim_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p8_a39);
2500 ddp_claim_rec.exchange_rate := p8_a40;
2501 ddp_claim_rec.set_of_books_id := p8_a41;
2502 ddp_claim_rec.original_claim_date := rosetta_g_miss_date_in_map(p8_a42);
2503 ddp_claim_rec.source_object_id := p8_a43;
2504 ddp_claim_rec.source_object_class := p8_a44;
2505 ddp_claim_rec.source_object_type_id := p8_a45;
2506 ddp_claim_rec.source_object_number := p8_a46;
2507 ddp_claim_rec.cust_account_id := p8_a47;
2508 ddp_claim_rec.cust_billto_acct_site_id := p8_a48;
2509 ddp_claim_rec.cust_shipto_acct_site_id := p8_a49;
2510 ddp_claim_rec.location_id := p8_a50;
2511 ddp_claim_rec.pay_related_account_flag := p8_a51;
2512 ddp_claim_rec.related_cust_account_id := p8_a52;
2513 ddp_claim_rec.related_site_use_id := p8_a53;
2514 ddp_claim_rec.relationship_type := p8_a54;
2515 ddp_claim_rec.vendor_id := p8_a55;
2516 ddp_claim_rec.vendor_site_id := p8_a56;
2517 ddp_claim_rec.reason_type := p8_a57;
2518 ddp_claim_rec.reason_code_id := p8_a58;
2519 ddp_claim_rec.task_template_group_id := p8_a59;
2520 ddp_claim_rec.status_code := p8_a60;
2521 ddp_claim_rec.user_status_id := p8_a61;
2522 ddp_claim_rec.sales_rep_id := p8_a62;
2523 ddp_claim_rec.collector_id := p8_a63;
2524 ddp_claim_rec.contact_id := p8_a64;
2525 ddp_claim_rec.broker_id := p8_a65;
2526 ddp_claim_rec.territory_id := p8_a66;
2527 ddp_claim_rec.customer_ref_date := rosetta_g_miss_date_in_map(p8_a67);
2528 ddp_claim_rec.customer_ref_number := p8_a68;
2529 ddp_claim_rec.assigned_to := p8_a69;
2530 ddp_claim_rec.receipt_id := p8_a70;
2531 ddp_claim_rec.receipt_number := p8_a71;
2532 ddp_claim_rec.doc_sequence_id := p8_a72;
2533 ddp_claim_rec.doc_sequence_value := p8_a73;
2534 ddp_claim_rec.gl_date := rosetta_g_miss_date_in_map(p8_a74);
2535 ddp_claim_rec.payment_method := p8_a75;
2536 ddp_claim_rec.voucher_id := p8_a76;
2537 ddp_claim_rec.voucher_number := p8_a77;
2538 ddp_claim_rec.payment_reference_id := p8_a78;
2539 ddp_claim_rec.payment_reference_number := p8_a79;
2540 ddp_claim_rec.payment_reference_date := rosetta_g_miss_date_in_map(p8_a80);
2541 ddp_claim_rec.payment_status := p8_a81;
2542 ddp_claim_rec.approved_flag := p8_a82;
2543 ddp_claim_rec.approved_date := rosetta_g_miss_date_in_map(p8_a83);
2544 ddp_claim_rec.approved_by := p8_a84;
2545 ddp_claim_rec.settled_date := rosetta_g_miss_date_in_map(p8_a85);
2546 ddp_claim_rec.settled_by := p8_a86;
2547 ddp_claim_rec.effective_date := rosetta_g_miss_date_in_map(p8_a87);
2548 ddp_claim_rec.custom_setup_id := p8_a88;
2549 ddp_claim_rec.task_id := p8_a89;
2550 ddp_claim_rec.country_id := p8_a90;
2551 ddp_claim_rec.order_type_id := p8_a91;
2552 ddp_claim_rec.comments := p8_a92;
2553 ddp_claim_rec.attribute_category := p8_a93;
2554 ddp_claim_rec.attribute1 := p8_a94;
2555 ddp_claim_rec.attribute2 := p8_a95;
2556 ddp_claim_rec.attribute3 := p8_a96;
2557 ddp_claim_rec.attribute4 := p8_a97;
2558 ddp_claim_rec.attribute5 := p8_a98;
2559 ddp_claim_rec.attribute6 := p8_a99;
2560 ddp_claim_rec.attribute7 := p8_a100;
2561 ddp_claim_rec.attribute8 := p8_a101;
2562 ddp_claim_rec.attribute9 := p8_a102;
2563 ddp_claim_rec.attribute10 := p8_a103;
2564 ddp_claim_rec.attribute11 := p8_a104;
2568 ddp_claim_rec.attribute15 := p8_a108;
2565 ddp_claim_rec.attribute12 := p8_a105;
2566 ddp_claim_rec.attribute13 := p8_a106;
2567 ddp_claim_rec.attribute14 := p8_a107;
2569 ddp_claim_rec.deduction_attribute_category := p8_a109;
2570 ddp_claim_rec.deduction_attribute1 := p8_a110;
2571 ddp_claim_rec.deduction_attribute2 := p8_a111;
2572 ddp_claim_rec.deduction_attribute3 := p8_a112;
2573 ddp_claim_rec.deduction_attribute4 := p8_a113;
2574 ddp_claim_rec.deduction_attribute5 := p8_a114;
2575 ddp_claim_rec.deduction_attribute6 := p8_a115;
2576 ddp_claim_rec.deduction_attribute7 := p8_a116;
2577 ddp_claim_rec.deduction_attribute8 := p8_a117;
2578 ddp_claim_rec.deduction_attribute9 := p8_a118;
2579 ddp_claim_rec.deduction_attribute10 := p8_a119;
2580 ddp_claim_rec.deduction_attribute11 := p8_a120;
2581 ddp_claim_rec.deduction_attribute12 := p8_a121;
2582 ddp_claim_rec.deduction_attribute13 := p8_a122;
2583 ddp_claim_rec.deduction_attribute14 := p8_a123;
2584 ddp_claim_rec.deduction_attribute15 := p8_a124;
2585 ddp_claim_rec.org_id := p8_a125;
2586 ddp_claim_rec.legal_entity_id := p8_a126;
2587 ddp_claim_rec.write_off_flag := p8_a127;
2588 ddp_claim_rec.write_off_threshold_amount := p8_a128;
2589 ddp_claim_rec.under_write_off_threshold := p8_a129;
2590 ddp_claim_rec.customer_reason := p8_a130;
2591 ddp_claim_rec.ship_to_cust_account_id := p8_a131;
2592 ddp_claim_rec.amount_applied := p8_a132;
2593 ddp_claim_rec.applied_receipt_id := p8_a133;
2594 ddp_claim_rec.applied_receipt_number := p8_a134;
2595 ddp_claim_rec.wo_rec_trx_id := p8_a135;
2596 ddp_claim_rec.group_claim_id := p8_a136;
2597 ddp_claim_rec.appr_wf_item_key := p8_a137;
2598 ddp_claim_rec.cstl_wf_item_key := p8_a138;
2599 ddp_claim_rec.batch_type := p8_a139;
2600 ddp_claim_rec.tax_action := p8_a140;
2601 ddp_claim_rec.close_status_id := p8_a141;
2602 ddp_claim_rec.open_status_id := p8_a142;
2603 ddp_claim_rec.pre_auth_deduction_number := p8_a143;
2604 ddp_claim_rec.pre_auth_deduction_normalized := p8_a144;
2605 ddp_claim_rec.offer_id := p8_a145;
2606 ddp_claim_rec.settled_from := p8_a146;
2607 ddp_claim_rec.approval_in_prog := p8_a147;
2608
2609 ddp_funds_util_flt.claim_line_id := p9_a0;
2610 ddp_funds_util_flt.fund_id := p9_a1;
2611 ddp_funds_util_flt.activity_type := p9_a2;
2612 ddp_funds_util_flt.activity_id := p9_a3;
2613 ddp_funds_util_flt.activity_product_id := p9_a4;
2614 ddp_funds_util_flt.schedule_id := p9_a5;
2615 ddp_funds_util_flt.offer_type := p9_a6;
2616 ddp_funds_util_flt.document_class := p9_a7;
2617 ddp_funds_util_flt.document_id := p9_a8;
2618 ddp_funds_util_flt.product_level_type := p9_a9;
2619 ddp_funds_util_flt.product_id := p9_a10;
2620 ddp_funds_util_flt.reference_type := p9_a11;
2621 ddp_funds_util_flt.reference_id := p9_a12;
2622 ddp_funds_util_flt.utilization_type := p9_a13;
2623 ddp_funds_util_flt.total_amount := p9_a14;
2624 ddp_funds_util_flt.old_total_amount := p9_a15;
2625 if p9_a16 is null
2626 then ddp_funds_util_flt.pay_over_all_flag := null;
2627 elsif p9_a16 = 0
2628 then ddp_funds_util_flt.pay_over_all_flag := false;
2629 else ddp_funds_util_flt.pay_over_all_flag := true;
2630 end if;
2631 ddp_funds_util_flt.total_units := p9_a17;
2632 ddp_funds_util_flt.old_total_units := p9_a18;
2633 ddp_funds_util_flt.quantity := p9_a19;
2634 ddp_funds_util_flt.uom_code := p9_a20;
2635 ddp_funds_util_flt.cust_account_id := p9_a21;
2636 ddp_funds_util_flt.relationship_type := p9_a22;
2637 ddp_funds_util_flt.related_cust_account_id := p9_a23;
2638 ddp_funds_util_flt.buy_group_cust_account_id := p9_a24;
2639 ddp_funds_util_flt.buy_group_party_id := p9_a25;
2640 ddp_funds_util_flt.select_cust_children_flag := p9_a26;
2641 ddp_funds_util_flt.pay_to_customer := p9_a27;
2642 ddp_funds_util_flt.prorate_earnings_flag := p9_a28;
2643 ddp_funds_util_flt.adjustment_type_id := p9_a29;
2644 ddp_funds_util_flt.end_date := rosetta_g_miss_date_in_map(p9_a30);
2645 ddp_funds_util_flt.run_mode := p9_a31;
2646 ddp_funds_util_flt.check_sales_rep_flag := p9_a32;
2647 ddp_funds_util_flt.group_by_offer := p9_a33;
2648 ddp_funds_util_flt.offer_payment_method := p9_a34;
2649 ddp_funds_util_flt.utiz_currency_code := p9_a35;
2650 ddp_funds_util_flt.bill_to_site_use_id := p9_a36;
2651 ddp_funds_util_flt.utilization_id := p9_a37;
2652 ddp_funds_util_flt.autopay_check := p9_a38;
2653 ddp_funds_util_flt.period_name := p9_a39;
2654 ddp_funds_util_flt.year_name := p9_a40;
2655 ddp_funds_util_flt.claim_id := p9_a41;
2656 ddp_funds_util_flt.created_from := p9_a42;
2657
2658
2659 -- here's the delegated call to the old PL/SQL routine
2660 ozf_claim_accrual_pvt.pay_claim_for_accruals(p_api_version,
2661 p_init_msg_list,
2662 p_commit,
2663 p_validation_level,
2664 p_accrual_flag,
2665 x_return_status,
2666 x_msg_count,
2667 x_msg_data,
2668 ddp_claim_rec,
2669 ddp_funds_util_flt,
2670 x_claim_id);
2671
2672 -- copy data back from the local variables to OUT or IN-OUT args, if any
2673
2674
2675
2676
2677
2678
2679
2680
2681
2682
2683 end;
2684
2685 procedure check_offer_performance(p_cust_account_id NUMBER
2686 , p_offer_id NUMBER
2687 , p_resale_flag VARCHAR2
2688 , p_check_all_flag VARCHAR2
2689 , x_performance_flag out nocopy VARCHAR2
2690 , p5_a0 out nocopy JTF_NUMBER_TABLE
2691 , p5_a1 out nocopy JTF_NUMBER_TABLE
2692 , p5_a2 out nocopy JTF_VARCHAR2_TABLE_100
2693 , p5_a3 out nocopy JTF_VARCHAR2_TABLE_300
2694 , p5_a4 out nocopy JTF_DATE_TABLE
2695 , p5_a5 out nocopy JTF_DATE_TABLE
2699 )
2696 , p5_a6 out nocopy JTF_VARCHAR2_TABLE_100
2697 , p5_a7 out nocopy JTF_NUMBER_TABLE
2698 , p5_a8 out nocopy JTF_VARCHAR2_TABLE_100
2700
2701 as
2702 ddx_offer_perf_tbl ozf_claim_accrual_pvt.offer_performance_tbl_type;
2703 ddindx binary_integer; indx binary_integer;
2704 begin
2705
2706 -- copy data to the local IN or IN-OUT args, if any
2707
2708
2709
2710
2711
2712
2713 -- here's the delegated call to the old PL/SQL routine
2714 ozf_claim_accrual_pvt.check_offer_performance(p_cust_account_id,
2715 p_offer_id,
2716 p_resale_flag,
2717 p_check_all_flag,
2718 x_performance_flag,
2719 ddx_offer_perf_tbl);
2720
2721 -- copy data back from the local variables to OUT or IN-OUT args, if any
2722
2723
2724
2725
2726
2727 ozf_claim_accrual_pvt_w.rosetta_table_copy_out_p5(ddx_offer_perf_tbl, p5_a0
2728 , p5_a1
2729 , p5_a2
2730 , p5_a3
2731 , p5_a4
2732 , p5_a5
2733 , p5_a6
2734 , p5_a7
2735 , p5_a8
2736 );
2737 end;
2738
2739 procedure check_offer_performance_tbl(p_claim_id NUMBER
2740 , p1_a0 out nocopy JTF_NUMBER_TABLE
2741 , p1_a1 out nocopy JTF_NUMBER_TABLE
2742 , p1_a2 out nocopy JTF_VARCHAR2_TABLE_100
2743 , p1_a3 out nocopy JTF_VARCHAR2_TABLE_300
2744 , p1_a4 out nocopy JTF_DATE_TABLE
2745 , p1_a5 out nocopy JTF_DATE_TABLE
2746 , p1_a6 out nocopy JTF_VARCHAR2_TABLE_100
2747 , p1_a7 out nocopy JTF_NUMBER_TABLE
2748 , p1_a8 out nocopy JTF_VARCHAR2_TABLE_100
2749 )
2750
2751 as
2752 ddx_offer_perf_tbl ozf_claim_accrual_pvt.offer_performance_tbl_type;
2753 ddindx binary_integer; indx binary_integer;
2754 begin
2755
2756 -- copy data to the local IN or IN-OUT args, if any
2757
2758
2759 -- here's the delegated call to the old PL/SQL routine
2760 ozf_claim_accrual_pvt.check_offer_performance_tbl(p_claim_id,
2761 ddx_offer_perf_tbl);
2762
2763 -- copy data back from the local variables to OUT or IN-OUT args, if any
2764
2765 ozf_claim_accrual_pvt_w.rosetta_table_copy_out_p5(ddx_offer_perf_tbl, p1_a0
2766 , p1_a1
2767 , p1_a2
2768 , p1_a3
2769 , p1_a4
2770 , p1_a5
2771 , p1_a6
2772 , p1_a7
2773 , p1_a8
2774 );
2775 end;
2776
2777 procedure check_offer_earning_tbl(p_claim_id NUMBER
2778 , p1_a0 out nocopy JTF_NUMBER_TABLE
2779 , p1_a1 out nocopy JTF_NUMBER_TABLE
2780 )
2781
2782 as
2783 ddx_offer_earn_tbl ozf_claim_accrual_pvt.offer_earning_tbl_type;
2784 ddindx binary_integer; indx binary_integer;
2785 begin
2786
2787 -- copy data to the local IN or IN-OUT args, if any
2788
2789
2790 -- here's the delegated call to the old PL/SQL routine
2791 ozf_claim_accrual_pvt.check_offer_earning_tbl(p_claim_id,
2792 ddx_offer_earn_tbl);
2793
2794 -- copy data back from the local variables to OUT or IN-OUT args, if any
2795
2796 ozf_claim_accrual_pvt_w.rosetta_table_copy_out_p7(ddx_offer_earn_tbl, p1_a0
2797 , p1_a1
2798 );
2799 end;
2800
2801 function calculate_fxgl_amount(p0_a0 NUMBER
2802 , p0_a1 NUMBER
2803 , p0_a2 DATE
2804 , p0_a3 NUMBER
2805 , p0_a4 DATE
2806 , p0_a5 NUMBER
2807 , p0_a6 NUMBER
2808 , p0_a7 NUMBER
2809 , p0_a8 NUMBER
2810 , p0_a9 NUMBER
2811 , p0_a10 VARCHAR2
2812 , p0_a11 VARCHAR2
2813 , p0_a12 DATE
2814 , p0_a13 NUMBER
2815 , p0_a14 NUMBER
2816 , p0_a15 NUMBER
2817 , p0_a16 NUMBER
2818 , p0_a17 NUMBER
2819 , p0_a18 NUMBER
2820 , p0_a19 VARCHAR2
2821 , p0_a20 NUMBER
2822 , p0_a21 NUMBER
2823 , p0_a22 NUMBER
2824 , p0_a23 NUMBER
2825 , p0_a24 NUMBER
2826 , p0_a25 VARCHAR2
2827 , p1_a0 VARCHAR2
2828 , p1_a1 VARCHAR2
2829 , p1_a2 VARCHAR2
2830 , p1_a3 VARCHAR2
2831 , p1_a4 VARCHAR2
2832 , p1_a5 VARCHAR2
2833 ) return number
2834
2835 as
2836 ddp_line_util_rec ozf_claim_accrual_pvt.line_util_rec_type;
2837 ddp_currency_rec ozf_claim_accrual_pvt.currency_rec_type;
2838 ddindx binary_integer; indx binary_integer;
2839 ddrosetta_retval number;
2840 begin
2841
2842 -- copy data to the local IN or IN-OUT args, if any
2843 ddp_line_util_rec.claim_line_util_id := p0_a0;
2844 ddp_line_util_rec.object_version_number := p0_a1;
2845 ddp_line_util_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a2);
2846 ddp_line_util_rec.last_updated_by := p0_a3;
2847 ddp_line_util_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
2848 ddp_line_util_rec.created_by := p0_a5;
2849 ddp_line_util_rec.last_update_login := p0_a6;
2850 ddp_line_util_rec.claim_line_id := p0_a7;
2851 ddp_line_util_rec.utilization_id := p0_a8;
2852 ddp_line_util_rec.amount := p0_a9;
2853 ddp_line_util_rec.currency_code := p0_a10;
2854 ddp_line_util_rec.exchange_rate_type := p0_a11;
2855 ddp_line_util_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p0_a12);
2856 ddp_line_util_rec.exchange_rate := p0_a13;
2857 ddp_line_util_rec.acctd_amount := p0_a14;
2858 ddp_line_util_rec.util_curr_amount := p0_a15;
2859 ddp_line_util_rec.plan_curr_amount := p0_a16;
2860 ddp_line_util_rec.scan_unit := p0_a17;
2861 ddp_line_util_rec.activity_product_id := p0_a18;
2862 ddp_line_util_rec.uom_code := p0_a19;
2863 ddp_line_util_rec.quantity := p0_a20;
2864 ddp_line_util_rec.org_id := p0_a21;
2868 ddp_line_util_rec.update_from_tbl_flag := p0_a25;
2865 ddp_line_util_rec.univ_curr_amount := p0_a22;
2866 ddp_line_util_rec.fxgl_acctd_amount := p0_a23;
2867 ddp_line_util_rec.utilized_acctd_amount := p0_a24;
2869
2870 ddp_currency_rec.functional_currency_code := p1_a0;
2871 ddp_currency_rec.offer_currency_code := p1_a1;
2872 ddp_currency_rec.universal_currency_code := p1_a2;
2873 ddp_currency_rec.claim_currency_code := p1_a3;
2874 ddp_currency_rec.transaction_currency_code := p1_a4;
2875 ddp_currency_rec.association_currency_code := p1_a5;
2876
2877 -- here's the delegated call to the old PL/SQL routine
2878 ddrosetta_retval := ozf_claim_accrual_pvt.calculate_fxgl_amount(ddp_line_util_rec,
2879 ddp_currency_rec);
2880
2881 -- copy data back from the local variables to OUT or IN-OUT args, if any
2882
2883
2884 return ddrosetta_retval;
2885 end;
2886
2887 procedure accruals_association(p_api_version NUMBER
2888 , p_init_msg_list VARCHAR2
2889 , p_commit VARCHAR2
2890 , p_validation_level NUMBER
2891 , x_return_status out nocopy VARCHAR2
2892 , x_msg_count out nocopy NUMBER
2893 , x_msg_data out nocopy VARCHAR2
2894 , p_claim_id NUMBER
2895 , p8_a0 NUMBER
2896 , p8_a1 NUMBER
2897 , p8_a2 VARCHAR2
2898 , p8_a3 NUMBER
2899 , p8_a4 NUMBER
2900 , p8_a5 NUMBER
2901 , p8_a6 VARCHAR2
2902 , p8_a7 VARCHAR2
2903 , p8_a8 NUMBER
2904 , p8_a9 VARCHAR2
2905 , p8_a10 NUMBER
2906 , p8_a11 VARCHAR2
2907 , p8_a12 NUMBER
2908 , p8_a13 VARCHAR2
2909 , p8_a14 NUMBER
2910 , p8_a15 NUMBER
2911 , p8_a16 NUMBER
2912 , p8_a17 NUMBER
2913 , p8_a18 NUMBER
2914 , p8_a19 NUMBER
2915 , p8_a20 VARCHAR2
2916 , p8_a21 NUMBER
2917 , p8_a22 VARCHAR2
2918 , p8_a23 NUMBER
2919 , p8_a24 NUMBER
2920 , p8_a25 NUMBER
2921 , p8_a26 VARCHAR2
2922 , p8_a27 VARCHAR2
2923 , p8_a28 VARCHAR2
2924 , p8_a29 NUMBER
2925 , p8_a30 DATE
2926 , p8_a31 VARCHAR2
2927 , p8_a32 VARCHAR2
2928 , p8_a33 VARCHAR2
2929 , p8_a34 VARCHAR2
2930 , p8_a35 VARCHAR2
2931 , p8_a36 NUMBER
2932 , p8_a37 NUMBER
2933 , p8_a38 VARCHAR2
2934 , p8_a39 VARCHAR2
2935 , p8_a40 VARCHAR2
2936 , p8_a41 NUMBER
2937 , p8_a42 VARCHAR2
2938 , p_summary_view VARCHAR2
2939 )
2940
2941 as
2942 ddp_funds_util_flt ozf_claim_accrual_pvt.funds_util_flt_type;
2943 ddindx binary_integer; indx binary_integer;
2944 begin
2945
2946 -- copy data to the local IN or IN-OUT args, if any
2947
2948
2949
2950
2951
2952
2953
2954
2955 ddp_funds_util_flt.claim_line_id := p8_a0;
2956 ddp_funds_util_flt.fund_id := p8_a1;
2957 ddp_funds_util_flt.activity_type := p8_a2;
2958 ddp_funds_util_flt.activity_id := p8_a3;
2959 ddp_funds_util_flt.activity_product_id := p8_a4;
2960 ddp_funds_util_flt.schedule_id := p8_a5;
2961 ddp_funds_util_flt.offer_type := p8_a6;
2962 ddp_funds_util_flt.document_class := p8_a7;
2963 ddp_funds_util_flt.document_id := p8_a8;
2964 ddp_funds_util_flt.product_level_type := p8_a9;
2965 ddp_funds_util_flt.product_id := p8_a10;
2966 ddp_funds_util_flt.reference_type := p8_a11;
2967 ddp_funds_util_flt.reference_id := p8_a12;
2968 ddp_funds_util_flt.utilization_type := p8_a13;
2969 ddp_funds_util_flt.total_amount := p8_a14;
2970 ddp_funds_util_flt.old_total_amount := p8_a15;
2971 if p8_a16 is null
2972 then ddp_funds_util_flt.pay_over_all_flag := null;
2973 elsif p8_a16 = 0
2974 then ddp_funds_util_flt.pay_over_all_flag := false;
2975 else ddp_funds_util_flt.pay_over_all_flag := true;
2976 end if;
2977 ddp_funds_util_flt.total_units := p8_a17;
2978 ddp_funds_util_flt.old_total_units := p8_a18;
2979 ddp_funds_util_flt.quantity := p8_a19;
2980 ddp_funds_util_flt.uom_code := p8_a20;
2981 ddp_funds_util_flt.cust_account_id := p8_a21;
2982 ddp_funds_util_flt.relationship_type := p8_a22;
2983 ddp_funds_util_flt.related_cust_account_id := p8_a23;
2984 ddp_funds_util_flt.buy_group_cust_account_id := p8_a24;
2985 ddp_funds_util_flt.buy_group_party_id := p8_a25;
2986 ddp_funds_util_flt.select_cust_children_flag := p8_a26;
2987 ddp_funds_util_flt.pay_to_customer := p8_a27;
2988 ddp_funds_util_flt.prorate_earnings_flag := p8_a28;
2989 ddp_funds_util_flt.adjustment_type_id := p8_a29;
2990 ddp_funds_util_flt.end_date := rosetta_g_miss_date_in_map(p8_a30);
2991 ddp_funds_util_flt.run_mode := p8_a31;
2992 ddp_funds_util_flt.check_sales_rep_flag := p8_a32;
2993 ddp_funds_util_flt.group_by_offer := p8_a33;
2994 ddp_funds_util_flt.offer_payment_method := p8_a34;
2995 ddp_funds_util_flt.utiz_currency_code := p8_a35;
2996 ddp_funds_util_flt.bill_to_site_use_id := p8_a36;
2997 ddp_funds_util_flt.utilization_id := p8_a37;
2998 ddp_funds_util_flt.autopay_check := p8_a38;
2999 ddp_funds_util_flt.period_name := p8_a39;
3000 ddp_funds_util_flt.year_name := p8_a40;
3001 ddp_funds_util_flt.claim_id := p8_a41;
3002 ddp_funds_util_flt.created_from := p8_a42;
3003
3004
3005 -- here's the delegated call to the old PL/SQL routine
3006 ozf_claim_accrual_pvt.accruals_association(p_api_version,
3007 p_init_msg_list,
3008 p_commit,
3009 p_validation_level,
3010 x_return_status,
3011 x_msg_count,
3012 x_msg_data,
3013 p_claim_id,
3014 ddp_funds_util_flt,
3015 p_summary_view);
3016
3017 -- copy data back from the local variables to OUT or IN-OUT args, if any
3018
3022
3019
3020
3021
3023
3024
3025
3026
3027 end;
3028
3029 end ozf_claim_accrual_pvt_w;