DBA Data[Home] [Help]

PACKAGE BODY: APPS.OZF_CLAIM_PVT_W

Source


1 package body ozf_claim_pvt_w as
2   /* $Header: ozfwclab.pls 120.4 2006/04/18 02:10 azahmed 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_p3(t out nocopy ozf_claim_pvt.claim_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_DATE_TABLE
26     , a10 JTF_NUMBER_TABLE
27     , a11 JTF_VARCHAR2_TABLE_100
28     , a12 JTF_NUMBER_TABLE
29     , a13 JTF_VARCHAR2_TABLE_100
30     , a14 JTF_NUMBER_TABLE
31     , a15 JTF_VARCHAR2_TABLE_100
32     , a16 JTF_DATE_TABLE
33     , a17 JTF_DATE_TABLE
34     , a18 JTF_NUMBER_TABLE
35     , a19 JTF_VARCHAR2_TABLE_100
36     , a20 JTF_DATE_TABLE
37     , a21 JTF_VARCHAR2_TABLE_2000
38     , a22 JTF_NUMBER_TABLE
39     , a23 JTF_NUMBER_TABLE
40     , a24 JTF_DATE_TABLE
41     , a25 JTF_NUMBER_TABLE
42     , a26 JTF_NUMBER_TABLE
43     , a27 JTF_NUMBER_TABLE
44     , a28 JTF_NUMBER_TABLE
45     , a29 JTF_NUMBER_TABLE
46     , a30 JTF_NUMBER_TABLE
47     , a31 JTF_NUMBER_TABLE
48     , a32 JTF_NUMBER_TABLE
49     , a33 JTF_NUMBER_TABLE
50     , a34 JTF_NUMBER_TABLE
51     , a35 JTF_VARCHAR2_TABLE_100
52     , a36 JTF_VARCHAR2_TABLE_100
53     , a37 JTF_VARCHAR2_TABLE_100
54     , a38 JTF_VARCHAR2_TABLE_100
55     , a39 JTF_DATE_TABLE
56     , a40 JTF_NUMBER_TABLE
57     , a41 JTF_NUMBER_TABLE
58     , a42 JTF_DATE_TABLE
59     , a43 JTF_NUMBER_TABLE
60     , a44 JTF_VARCHAR2_TABLE_100
61     , a45 JTF_NUMBER_TABLE
62     , a46 JTF_VARCHAR2_TABLE_100
63     , a47 JTF_NUMBER_TABLE
64     , a48 JTF_NUMBER_TABLE
65     , a49 JTF_NUMBER_TABLE
66     , a50 JTF_NUMBER_TABLE
67     , a51 JTF_VARCHAR2_TABLE_100
68     , a52 JTF_NUMBER_TABLE
69     , a53 JTF_NUMBER_TABLE
70     , a54 JTF_VARCHAR2_TABLE_100
71     , a55 JTF_NUMBER_TABLE
72     , a56 JTF_NUMBER_TABLE
73     , a57 JTF_VARCHAR2_TABLE_100
74     , a58 JTF_NUMBER_TABLE
75     , a59 JTF_NUMBER_TABLE
76     , a60 JTF_VARCHAR2_TABLE_100
77     , a61 JTF_NUMBER_TABLE
78     , a62 JTF_NUMBER_TABLE
79     , a63 JTF_NUMBER_TABLE
80     , a64 JTF_NUMBER_TABLE
81     , a65 JTF_NUMBER_TABLE
82     , a66 JTF_NUMBER_TABLE
83     , a67 JTF_DATE_TABLE
84     , a68 JTF_VARCHAR2_TABLE_100
85     , a69 JTF_NUMBER_TABLE
86     , a70 JTF_NUMBER_TABLE
87     , a71 JTF_VARCHAR2_TABLE_100
88     , a72 JTF_NUMBER_TABLE
89     , a73 JTF_NUMBER_TABLE
90     , a74 JTF_DATE_TABLE
91     , a75 JTF_VARCHAR2_TABLE_100
92     , a76 JTF_NUMBER_TABLE
93     , a77 JTF_VARCHAR2_TABLE_100
94     , a78 JTF_NUMBER_TABLE
95     , a79 JTF_VARCHAR2_TABLE_100
96     , a80 JTF_DATE_TABLE
97     , a81 JTF_VARCHAR2_TABLE_100
98     , a82 JTF_VARCHAR2_TABLE_100
99     , a83 JTF_DATE_TABLE
100     , a84 JTF_NUMBER_TABLE
101     , a85 JTF_DATE_TABLE
102     , a86 JTF_NUMBER_TABLE
103     , a87 JTF_DATE_TABLE
104     , a88 JTF_NUMBER_TABLE
105     , a89 JTF_NUMBER_TABLE
106     , a90 JTF_NUMBER_TABLE
107     , a91 JTF_NUMBER_TABLE
108     , a92 JTF_VARCHAR2_TABLE_2000
109     , a93 JTF_VARCHAR2_TABLE_100
110     , a94 JTF_VARCHAR2_TABLE_200
111     , a95 JTF_VARCHAR2_TABLE_200
112     , a96 JTF_VARCHAR2_TABLE_200
113     , a97 JTF_VARCHAR2_TABLE_200
114     , a98 JTF_VARCHAR2_TABLE_200
115     , a99 JTF_VARCHAR2_TABLE_200
116     , a100 JTF_VARCHAR2_TABLE_200
117     , a101 JTF_VARCHAR2_TABLE_200
118     , a102 JTF_VARCHAR2_TABLE_200
119     , a103 JTF_VARCHAR2_TABLE_200
120     , a104 JTF_VARCHAR2_TABLE_200
121     , a105 JTF_VARCHAR2_TABLE_200
122     , a106 JTF_VARCHAR2_TABLE_200
123     , a107 JTF_VARCHAR2_TABLE_200
124     , a108 JTF_VARCHAR2_TABLE_200
125     , a109 JTF_VARCHAR2_TABLE_100
126     , a110 JTF_VARCHAR2_TABLE_200
127     , a111 JTF_VARCHAR2_TABLE_200
128     , a112 JTF_VARCHAR2_TABLE_200
129     , a113 JTF_VARCHAR2_TABLE_200
130     , a114 JTF_VARCHAR2_TABLE_200
131     , a115 JTF_VARCHAR2_TABLE_200
132     , a116 JTF_VARCHAR2_TABLE_200
133     , a117 JTF_VARCHAR2_TABLE_200
134     , a118 JTF_VARCHAR2_TABLE_200
135     , a119 JTF_VARCHAR2_TABLE_200
136     , a120 JTF_VARCHAR2_TABLE_200
137     , a121 JTF_VARCHAR2_TABLE_200
138     , a122 JTF_VARCHAR2_TABLE_200
139     , a123 JTF_VARCHAR2_TABLE_200
140     , a124 JTF_VARCHAR2_TABLE_200
141     , a125 JTF_NUMBER_TABLE
142     , a126 JTF_NUMBER_TABLE
143     , a127 JTF_VARCHAR2_TABLE_100
144     , a128 JTF_NUMBER_TABLE
145     , a129 JTF_VARCHAR2_TABLE_100
146     , a130 JTF_VARCHAR2_TABLE_100
147     , a131 JTF_NUMBER_TABLE
148     , a132 JTF_NUMBER_TABLE
149     , a133 JTF_NUMBER_TABLE
150     , a134 JTF_VARCHAR2_TABLE_100
151     , a135 JTF_NUMBER_TABLE
152     , a136 JTF_NUMBER_TABLE
153     , a137 JTF_VARCHAR2_TABLE_300
154     , a138 JTF_VARCHAR2_TABLE_300
155     , a139 JTF_VARCHAR2_TABLE_100
156     , a140 JTF_VARCHAR2_TABLE_100
157     ) as
158     ddindx binary_integer; indx binary_integer;
159   begin
160   if a0 is not null and a0.count > 0 then
161       if a0.count > 0 then
162         indx := a0.first;
163         ddindx := 1;
164         while true loop
165           t(ddindx).claim_id := a0(indx);
166           t(ddindx).object_version_number := a1(indx);
167           t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a2(indx));
168           t(ddindx).last_updated_by := a3(indx);
169           t(ddindx).creation_date := rosetta_g_miss_date_in_map(a4(indx));
170           t(ddindx).created_by := a5(indx);
171           t(ddindx).last_update_login := a6(indx);
172           t(ddindx).request_id := a7(indx);
173           t(ddindx).program_application_id := a8(indx);
174           t(ddindx).program_update_date := rosetta_g_miss_date_in_map(a9(indx));
175           t(ddindx).program_id := a10(indx);
176           t(ddindx).created_from := a11(indx);
177           t(ddindx).batch_id := a12(indx);
178           t(ddindx).claim_number := a13(indx);
179           t(ddindx).claim_type_id := a14(indx);
180           t(ddindx).claim_class := a15(indx);
181           t(ddindx).claim_date := rosetta_g_miss_date_in_map(a16(indx));
182           t(ddindx).due_date := rosetta_g_miss_date_in_map(a17(indx));
183           t(ddindx).owner_id := a18(indx);
184           t(ddindx).history_event := a19(indx);
185           t(ddindx).history_event_date := rosetta_g_miss_date_in_map(a20(indx));
186           t(ddindx).history_event_description := a21(indx);
187           t(ddindx).split_from_claim_id := a22(indx);
188           t(ddindx).duplicate_claim_id := a23(indx);
189           t(ddindx).split_date := rosetta_g_miss_date_in_map(a24(indx));
190           t(ddindx).root_claim_id := a25(indx);
191           t(ddindx).amount := a26(indx);
192           t(ddindx).amount_adjusted := a27(indx);
193           t(ddindx).amount_remaining := a28(indx);
194           t(ddindx).amount_settled := a29(indx);
195           t(ddindx).acctd_amount := a30(indx);
196           t(ddindx).acctd_amount_remaining := a31(indx);
197           t(ddindx).acctd_amount_adjusted := a32(indx);
198           t(ddindx).acctd_amount_settled := a33(indx);
199           t(ddindx).tax_amount := a34(indx);
200           t(ddindx).tax_code := a35(indx);
201           t(ddindx).tax_calculation_flag := a36(indx);
202           t(ddindx).currency_code := a37(indx);
203           t(ddindx).exchange_rate_type := a38(indx);
204           t(ddindx).exchange_rate_date := rosetta_g_miss_date_in_map(a39(indx));
205           t(ddindx).exchange_rate := a40(indx);
206           t(ddindx).set_of_books_id := a41(indx);
207           t(ddindx).original_claim_date := rosetta_g_miss_date_in_map(a42(indx));
208           t(ddindx).source_object_id := a43(indx);
209           t(ddindx).source_object_class := a44(indx);
210           t(ddindx).source_object_type_id := a45(indx);
211           t(ddindx).source_object_number := a46(indx);
212           t(ddindx).cust_account_id := a47(indx);
213           t(ddindx).cust_billto_acct_site_id := a48(indx);
214           t(ddindx).cust_shipto_acct_site_id := a49(indx);
215           t(ddindx).location_id := a50(indx);
216           t(ddindx).pay_related_account_flag := a51(indx);
217           t(ddindx).related_cust_account_id := a52(indx);
218           t(ddindx).related_site_use_id := a53(indx);
219           t(ddindx).relationship_type := a54(indx);
220           t(ddindx).vendor_id := a55(indx);
221           t(ddindx).vendor_site_id := a56(indx);
222           t(ddindx).reason_type := a57(indx);
223           t(ddindx).reason_code_id := a58(indx);
224           t(ddindx).task_template_group_id := a59(indx);
225           t(ddindx).status_code := a60(indx);
226           t(ddindx).user_status_id := a61(indx);
227           t(ddindx).sales_rep_id := a62(indx);
228           t(ddindx).collector_id := a63(indx);
229           t(ddindx).contact_id := a64(indx);
230           t(ddindx).broker_id := a65(indx);
231           t(ddindx).territory_id := a66(indx);
232           t(ddindx).customer_ref_date := rosetta_g_miss_date_in_map(a67(indx));
233           t(ddindx).customer_ref_number := a68(indx);
234           t(ddindx).assigned_to := a69(indx);
235           t(ddindx).receipt_id := a70(indx);
236           t(ddindx).receipt_number := a71(indx);
237           t(ddindx).doc_sequence_id := a72(indx);
238           t(ddindx).doc_sequence_value := a73(indx);
239           t(ddindx).gl_date := rosetta_g_miss_date_in_map(a74(indx));
240           t(ddindx).payment_method := a75(indx);
241           t(ddindx).voucher_id := a76(indx);
242           t(ddindx).voucher_number := a77(indx);
243           t(ddindx).payment_reference_id := a78(indx);
244           t(ddindx).payment_reference_number := a79(indx);
245           t(ddindx).payment_reference_date := rosetta_g_miss_date_in_map(a80(indx));
246           t(ddindx).payment_status := a81(indx);
247           t(ddindx).approved_flag := a82(indx);
248           t(ddindx).approved_date := rosetta_g_miss_date_in_map(a83(indx));
249           t(ddindx).approved_by := a84(indx);
250           t(ddindx).settled_date := rosetta_g_miss_date_in_map(a85(indx));
251           t(ddindx).settled_by := a86(indx);
252           t(ddindx).effective_date := rosetta_g_miss_date_in_map(a87(indx));
253           t(ddindx).custom_setup_id := a88(indx);
254           t(ddindx).task_id := a89(indx);
255           t(ddindx).country_id := a90(indx);
256           t(ddindx).order_type_id := a91(indx);
257           t(ddindx).comments := a92(indx);
258           t(ddindx).attribute_category := a93(indx);
259           t(ddindx).attribute1 := a94(indx);
260           t(ddindx).attribute2 := a95(indx);
261           t(ddindx).attribute3 := a96(indx);
262           t(ddindx).attribute4 := a97(indx);
263           t(ddindx).attribute5 := a98(indx);
264           t(ddindx).attribute6 := a99(indx);
265           t(ddindx).attribute7 := a100(indx);
266           t(ddindx).attribute8 := a101(indx);
267           t(ddindx).attribute9 := a102(indx);
268           t(ddindx).attribute10 := a103(indx);
269           t(ddindx).attribute11 := a104(indx);
270           t(ddindx).attribute12 := a105(indx);
271           t(ddindx).attribute13 := a106(indx);
272           t(ddindx).attribute14 := a107(indx);
273           t(ddindx).attribute15 := a108(indx);
274           t(ddindx).deduction_attribute_category := a109(indx);
275           t(ddindx).deduction_attribute1 := a110(indx);
276           t(ddindx).deduction_attribute2 := a111(indx);
277           t(ddindx).deduction_attribute3 := a112(indx);
278           t(ddindx).deduction_attribute4 := a113(indx);
279           t(ddindx).deduction_attribute5 := a114(indx);
280           t(ddindx).deduction_attribute6 := a115(indx);
281           t(ddindx).deduction_attribute7 := a116(indx);
282           t(ddindx).deduction_attribute8 := a117(indx);
283           t(ddindx).deduction_attribute9 := a118(indx);
284           t(ddindx).deduction_attribute10 := a119(indx);
285           t(ddindx).deduction_attribute11 := a120(indx);
286           t(ddindx).deduction_attribute12 := a121(indx);
287           t(ddindx).deduction_attribute13 := a122(indx);
288           t(ddindx).deduction_attribute14 := a123(indx);
289           t(ddindx).deduction_attribute15 := a124(indx);
290           t(ddindx).org_id := a125(indx);
291           t(ddindx).legal_entity_id := a126(indx);
292           t(ddindx).write_off_flag := a127(indx);
293           t(ddindx).write_off_threshold_amount := a128(indx);
294           t(ddindx).under_write_off_threshold := a129(indx);
295           t(ddindx).customer_reason := a130(indx);
296           t(ddindx).ship_to_cust_account_id := a131(indx);
297           t(ddindx).amount_applied := a132(indx);
298           t(ddindx).applied_receipt_id := a133(indx);
299           t(ddindx).applied_receipt_number := a134(indx);
300           t(ddindx).wo_rec_trx_id := a135(indx);
301           t(ddindx).group_claim_id := a136(indx);
302           t(ddindx).appr_wf_item_key := a137(indx);
303           t(ddindx).cstl_wf_item_key := a138(indx);
304           t(ddindx).batch_type := a139(indx);
305           t(ddindx).tax_action := a140(indx);
306           ddindx := ddindx+1;
307           if a0.last =indx
308             then exit;
309           end if;
310           indx := a0.next(indx);
311         end loop;
312       end if;
313    end if;
314   end rosetta_table_copy_in_p3;
315   procedure rosetta_table_copy_out_p3(t ozf_claim_pvt.claim_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
316     , a1 out nocopy JTF_NUMBER_TABLE
317     , a2 out nocopy JTF_DATE_TABLE
318     , a3 out nocopy JTF_NUMBER_TABLE
319     , a4 out nocopy JTF_DATE_TABLE
320     , a5 out nocopy JTF_NUMBER_TABLE
321     , a6 out nocopy JTF_NUMBER_TABLE
322     , a7 out nocopy JTF_NUMBER_TABLE
323     , a8 out nocopy JTF_NUMBER_TABLE
324     , a9 out nocopy JTF_DATE_TABLE
325     , a10 out nocopy JTF_NUMBER_TABLE
326     , a11 out nocopy JTF_VARCHAR2_TABLE_100
327     , a12 out nocopy JTF_NUMBER_TABLE
328     , a13 out nocopy JTF_VARCHAR2_TABLE_100
329     , a14 out nocopy JTF_NUMBER_TABLE
330     , a15 out nocopy JTF_VARCHAR2_TABLE_100
331     , a16 out nocopy JTF_DATE_TABLE
332     , a17 out nocopy JTF_DATE_TABLE
333     , a18 out nocopy JTF_NUMBER_TABLE
334     , a19 out nocopy JTF_VARCHAR2_TABLE_100
335     , a20 out nocopy JTF_DATE_TABLE
336     , a21 out nocopy JTF_VARCHAR2_TABLE_2000
337     , a22 out nocopy JTF_NUMBER_TABLE
338     , a23 out nocopy JTF_NUMBER_TABLE
339     , a24 out nocopy JTF_DATE_TABLE
340     , a25 out nocopy JTF_NUMBER_TABLE
341     , a26 out nocopy JTF_NUMBER_TABLE
342     , a27 out nocopy JTF_NUMBER_TABLE
343     , a28 out nocopy JTF_NUMBER_TABLE
344     , a29 out nocopy JTF_NUMBER_TABLE
345     , a30 out nocopy JTF_NUMBER_TABLE
346     , a31 out nocopy JTF_NUMBER_TABLE
347     , a32 out nocopy JTF_NUMBER_TABLE
348     , a33 out nocopy JTF_NUMBER_TABLE
349     , a34 out nocopy JTF_NUMBER_TABLE
350     , a35 out nocopy JTF_VARCHAR2_TABLE_100
351     , a36 out nocopy JTF_VARCHAR2_TABLE_100
352     , a37 out nocopy JTF_VARCHAR2_TABLE_100
353     , a38 out nocopy JTF_VARCHAR2_TABLE_100
354     , a39 out nocopy JTF_DATE_TABLE
355     , a40 out nocopy JTF_NUMBER_TABLE
356     , a41 out nocopy JTF_NUMBER_TABLE
357     , a42 out nocopy JTF_DATE_TABLE
358     , a43 out nocopy JTF_NUMBER_TABLE
359     , a44 out nocopy JTF_VARCHAR2_TABLE_100
360     , a45 out nocopy JTF_NUMBER_TABLE
361     , a46 out nocopy JTF_VARCHAR2_TABLE_100
362     , a47 out nocopy JTF_NUMBER_TABLE
363     , a48 out nocopy JTF_NUMBER_TABLE
364     , a49 out nocopy JTF_NUMBER_TABLE
365     , a50 out nocopy JTF_NUMBER_TABLE
366     , a51 out nocopy JTF_VARCHAR2_TABLE_100
367     , a52 out nocopy JTF_NUMBER_TABLE
368     , a53 out nocopy JTF_NUMBER_TABLE
369     , a54 out nocopy JTF_VARCHAR2_TABLE_100
370     , a55 out nocopy JTF_NUMBER_TABLE
371     , a56 out nocopy JTF_NUMBER_TABLE
372     , a57 out nocopy JTF_VARCHAR2_TABLE_100
373     , a58 out nocopy JTF_NUMBER_TABLE
374     , a59 out nocopy JTF_NUMBER_TABLE
375     , a60 out nocopy JTF_VARCHAR2_TABLE_100
376     , a61 out nocopy JTF_NUMBER_TABLE
377     , a62 out nocopy JTF_NUMBER_TABLE
378     , a63 out nocopy JTF_NUMBER_TABLE
379     , a64 out nocopy JTF_NUMBER_TABLE
380     , a65 out nocopy JTF_NUMBER_TABLE
381     , a66 out nocopy JTF_NUMBER_TABLE
382     , a67 out nocopy JTF_DATE_TABLE
383     , a68 out nocopy JTF_VARCHAR2_TABLE_100
384     , a69 out nocopy JTF_NUMBER_TABLE
385     , a70 out nocopy JTF_NUMBER_TABLE
386     , a71 out nocopy JTF_VARCHAR2_TABLE_100
387     , a72 out nocopy JTF_NUMBER_TABLE
388     , a73 out nocopy JTF_NUMBER_TABLE
389     , a74 out nocopy JTF_DATE_TABLE
390     , a75 out nocopy JTF_VARCHAR2_TABLE_100
391     , a76 out nocopy JTF_NUMBER_TABLE
392     , a77 out nocopy JTF_VARCHAR2_TABLE_100
393     , a78 out nocopy JTF_NUMBER_TABLE
394     , a79 out nocopy JTF_VARCHAR2_TABLE_100
395     , a80 out nocopy JTF_DATE_TABLE
396     , a81 out nocopy JTF_VARCHAR2_TABLE_100
397     , a82 out nocopy JTF_VARCHAR2_TABLE_100
398     , a83 out nocopy JTF_DATE_TABLE
399     , a84 out nocopy JTF_NUMBER_TABLE
400     , a85 out nocopy JTF_DATE_TABLE
401     , a86 out nocopy JTF_NUMBER_TABLE
402     , a87 out nocopy JTF_DATE_TABLE
403     , a88 out nocopy JTF_NUMBER_TABLE
404     , a89 out nocopy JTF_NUMBER_TABLE
405     , a90 out nocopy JTF_NUMBER_TABLE
406     , a91 out nocopy JTF_NUMBER_TABLE
407     , a92 out nocopy JTF_VARCHAR2_TABLE_2000
408     , a93 out nocopy JTF_VARCHAR2_TABLE_100
409     , a94 out nocopy JTF_VARCHAR2_TABLE_200
410     , a95 out nocopy JTF_VARCHAR2_TABLE_200
411     , a96 out nocopy JTF_VARCHAR2_TABLE_200
412     , a97 out nocopy JTF_VARCHAR2_TABLE_200
413     , a98 out nocopy JTF_VARCHAR2_TABLE_200
414     , a99 out nocopy JTF_VARCHAR2_TABLE_200
415     , a100 out nocopy JTF_VARCHAR2_TABLE_200
416     , a101 out nocopy JTF_VARCHAR2_TABLE_200
417     , a102 out nocopy JTF_VARCHAR2_TABLE_200
418     , a103 out nocopy JTF_VARCHAR2_TABLE_200
419     , a104 out nocopy JTF_VARCHAR2_TABLE_200
420     , a105 out nocopy JTF_VARCHAR2_TABLE_200
421     , a106 out nocopy JTF_VARCHAR2_TABLE_200
422     , a107 out nocopy JTF_VARCHAR2_TABLE_200
423     , a108 out nocopy JTF_VARCHAR2_TABLE_200
424     , a109 out nocopy JTF_VARCHAR2_TABLE_100
425     , a110 out nocopy JTF_VARCHAR2_TABLE_200
426     , a111 out nocopy JTF_VARCHAR2_TABLE_200
427     , a112 out nocopy JTF_VARCHAR2_TABLE_200
428     , a113 out nocopy JTF_VARCHAR2_TABLE_200
429     , a114 out nocopy JTF_VARCHAR2_TABLE_200
430     , a115 out nocopy JTF_VARCHAR2_TABLE_200
431     , a116 out nocopy JTF_VARCHAR2_TABLE_200
432     , a117 out nocopy JTF_VARCHAR2_TABLE_200
433     , a118 out nocopy JTF_VARCHAR2_TABLE_200
434     , a119 out nocopy JTF_VARCHAR2_TABLE_200
435     , a120 out nocopy JTF_VARCHAR2_TABLE_200
436     , a121 out nocopy JTF_VARCHAR2_TABLE_200
437     , a122 out nocopy JTF_VARCHAR2_TABLE_200
438     , a123 out nocopy JTF_VARCHAR2_TABLE_200
439     , a124 out nocopy JTF_VARCHAR2_TABLE_200
440     , a125 out nocopy JTF_NUMBER_TABLE
441     , a126 out nocopy JTF_NUMBER_TABLE
442     , a127 out nocopy JTF_VARCHAR2_TABLE_100
443     , a128 out nocopy JTF_NUMBER_TABLE
444     , a129 out nocopy JTF_VARCHAR2_TABLE_100
445     , a130 out nocopy JTF_VARCHAR2_TABLE_100
446     , a131 out nocopy JTF_NUMBER_TABLE
447     , a132 out nocopy JTF_NUMBER_TABLE
448     , a133 out nocopy JTF_NUMBER_TABLE
449     , a134 out nocopy JTF_VARCHAR2_TABLE_100
450     , a135 out nocopy JTF_NUMBER_TABLE
451     , a136 out nocopy JTF_NUMBER_TABLE
452     , a137 out nocopy JTF_VARCHAR2_TABLE_300
453     , a138 out nocopy JTF_VARCHAR2_TABLE_300
454     , a139 out nocopy JTF_VARCHAR2_TABLE_100
455     , a140 out nocopy JTF_VARCHAR2_TABLE_100
456     ) as
457     ddindx binary_integer; indx binary_integer;
458   begin
459   if t is null or t.count = 0 then
460     a0 := JTF_NUMBER_TABLE();
461     a1 := JTF_NUMBER_TABLE();
462     a2 := JTF_DATE_TABLE();
463     a3 := JTF_NUMBER_TABLE();
464     a4 := JTF_DATE_TABLE();
465     a5 := JTF_NUMBER_TABLE();
466     a6 := JTF_NUMBER_TABLE();
467     a7 := JTF_NUMBER_TABLE();
468     a8 := JTF_NUMBER_TABLE();
469     a9 := JTF_DATE_TABLE();
470     a10 := JTF_NUMBER_TABLE();
471     a11 := JTF_VARCHAR2_TABLE_100();
472     a12 := JTF_NUMBER_TABLE();
473     a13 := JTF_VARCHAR2_TABLE_100();
474     a14 := JTF_NUMBER_TABLE();
475     a15 := JTF_VARCHAR2_TABLE_100();
476     a16 := JTF_DATE_TABLE();
477     a17 := JTF_DATE_TABLE();
478     a18 := JTF_NUMBER_TABLE();
479     a19 := JTF_VARCHAR2_TABLE_100();
480     a20 := JTF_DATE_TABLE();
481     a21 := JTF_VARCHAR2_TABLE_2000();
482     a22 := JTF_NUMBER_TABLE();
483     a23 := JTF_NUMBER_TABLE();
484     a24 := JTF_DATE_TABLE();
485     a25 := JTF_NUMBER_TABLE();
486     a26 := JTF_NUMBER_TABLE();
487     a27 := JTF_NUMBER_TABLE();
488     a28 := JTF_NUMBER_TABLE();
489     a29 := JTF_NUMBER_TABLE();
490     a30 := JTF_NUMBER_TABLE();
491     a31 := JTF_NUMBER_TABLE();
492     a32 := JTF_NUMBER_TABLE();
493     a33 := JTF_NUMBER_TABLE();
494     a34 := JTF_NUMBER_TABLE();
495     a35 := JTF_VARCHAR2_TABLE_100();
496     a36 := JTF_VARCHAR2_TABLE_100();
497     a37 := JTF_VARCHAR2_TABLE_100();
498     a38 := JTF_VARCHAR2_TABLE_100();
499     a39 := JTF_DATE_TABLE();
500     a40 := JTF_NUMBER_TABLE();
501     a41 := JTF_NUMBER_TABLE();
502     a42 := JTF_DATE_TABLE();
503     a43 := JTF_NUMBER_TABLE();
504     a44 := JTF_VARCHAR2_TABLE_100();
505     a45 := JTF_NUMBER_TABLE();
506     a46 := JTF_VARCHAR2_TABLE_100();
507     a47 := JTF_NUMBER_TABLE();
508     a48 := JTF_NUMBER_TABLE();
509     a49 := JTF_NUMBER_TABLE();
510     a50 := JTF_NUMBER_TABLE();
511     a51 := JTF_VARCHAR2_TABLE_100();
512     a52 := JTF_NUMBER_TABLE();
513     a53 := JTF_NUMBER_TABLE();
514     a54 := JTF_VARCHAR2_TABLE_100();
515     a55 := JTF_NUMBER_TABLE();
516     a56 := JTF_NUMBER_TABLE();
517     a57 := JTF_VARCHAR2_TABLE_100();
518     a58 := JTF_NUMBER_TABLE();
519     a59 := JTF_NUMBER_TABLE();
520     a60 := JTF_VARCHAR2_TABLE_100();
521     a61 := JTF_NUMBER_TABLE();
522     a62 := JTF_NUMBER_TABLE();
523     a63 := JTF_NUMBER_TABLE();
524     a64 := JTF_NUMBER_TABLE();
525     a65 := JTF_NUMBER_TABLE();
526     a66 := JTF_NUMBER_TABLE();
527     a67 := JTF_DATE_TABLE();
528     a68 := JTF_VARCHAR2_TABLE_100();
529     a69 := JTF_NUMBER_TABLE();
530     a70 := JTF_NUMBER_TABLE();
531     a71 := JTF_VARCHAR2_TABLE_100();
532     a72 := JTF_NUMBER_TABLE();
533     a73 := JTF_NUMBER_TABLE();
534     a74 := JTF_DATE_TABLE();
535     a75 := JTF_VARCHAR2_TABLE_100();
536     a76 := JTF_NUMBER_TABLE();
537     a77 := JTF_VARCHAR2_TABLE_100();
538     a78 := JTF_NUMBER_TABLE();
539     a79 := JTF_VARCHAR2_TABLE_100();
540     a80 := JTF_DATE_TABLE();
541     a81 := JTF_VARCHAR2_TABLE_100();
542     a82 := JTF_VARCHAR2_TABLE_100();
543     a83 := JTF_DATE_TABLE();
544     a84 := JTF_NUMBER_TABLE();
545     a85 := JTF_DATE_TABLE();
546     a86 := JTF_NUMBER_TABLE();
547     a87 := JTF_DATE_TABLE();
548     a88 := JTF_NUMBER_TABLE();
549     a89 := JTF_NUMBER_TABLE();
550     a90 := JTF_NUMBER_TABLE();
551     a91 := JTF_NUMBER_TABLE();
552     a92 := JTF_VARCHAR2_TABLE_2000();
553     a93 := JTF_VARCHAR2_TABLE_100();
554     a94 := JTF_VARCHAR2_TABLE_200();
555     a95 := JTF_VARCHAR2_TABLE_200();
556     a96 := JTF_VARCHAR2_TABLE_200();
557     a97 := JTF_VARCHAR2_TABLE_200();
558     a98 := JTF_VARCHAR2_TABLE_200();
559     a99 := JTF_VARCHAR2_TABLE_200();
560     a100 := JTF_VARCHAR2_TABLE_200();
561     a101 := JTF_VARCHAR2_TABLE_200();
562     a102 := JTF_VARCHAR2_TABLE_200();
563     a103 := JTF_VARCHAR2_TABLE_200();
564     a104 := JTF_VARCHAR2_TABLE_200();
565     a105 := JTF_VARCHAR2_TABLE_200();
566     a106 := JTF_VARCHAR2_TABLE_200();
567     a107 := JTF_VARCHAR2_TABLE_200();
568     a108 := JTF_VARCHAR2_TABLE_200();
569     a109 := JTF_VARCHAR2_TABLE_100();
570     a110 := JTF_VARCHAR2_TABLE_200();
571     a111 := JTF_VARCHAR2_TABLE_200();
572     a112 := JTF_VARCHAR2_TABLE_200();
573     a113 := JTF_VARCHAR2_TABLE_200();
574     a114 := JTF_VARCHAR2_TABLE_200();
575     a115 := JTF_VARCHAR2_TABLE_200();
576     a116 := JTF_VARCHAR2_TABLE_200();
577     a117 := JTF_VARCHAR2_TABLE_200();
578     a118 := JTF_VARCHAR2_TABLE_200();
579     a119 := JTF_VARCHAR2_TABLE_200();
580     a120 := JTF_VARCHAR2_TABLE_200();
581     a121 := JTF_VARCHAR2_TABLE_200();
582     a122 := JTF_VARCHAR2_TABLE_200();
583     a123 := JTF_VARCHAR2_TABLE_200();
584     a124 := JTF_VARCHAR2_TABLE_200();
585     a125 := JTF_NUMBER_TABLE();
586     a126 := JTF_NUMBER_TABLE();
587     a127 := JTF_VARCHAR2_TABLE_100();
588     a128 := JTF_NUMBER_TABLE();
589     a129 := JTF_VARCHAR2_TABLE_100();
590     a130 := JTF_VARCHAR2_TABLE_100();
591     a131 := JTF_NUMBER_TABLE();
592     a132 := JTF_NUMBER_TABLE();
593     a133 := JTF_NUMBER_TABLE();
594     a134 := JTF_VARCHAR2_TABLE_100();
595     a135 := JTF_NUMBER_TABLE();
596     a136 := JTF_NUMBER_TABLE();
597     a137 := JTF_VARCHAR2_TABLE_300();
598     a138 := JTF_VARCHAR2_TABLE_300();
599     a139 := JTF_VARCHAR2_TABLE_100();
600     a140 := JTF_VARCHAR2_TABLE_100();
601   else
602       a0 := JTF_NUMBER_TABLE();
603       a1 := JTF_NUMBER_TABLE();
604       a2 := JTF_DATE_TABLE();
605       a3 := JTF_NUMBER_TABLE();
606       a4 := JTF_DATE_TABLE();
607       a5 := JTF_NUMBER_TABLE();
608       a6 := JTF_NUMBER_TABLE();
609       a7 := JTF_NUMBER_TABLE();
610       a8 := JTF_NUMBER_TABLE();
611       a9 := JTF_DATE_TABLE();
612       a10 := JTF_NUMBER_TABLE();
613       a11 := JTF_VARCHAR2_TABLE_100();
614       a12 := JTF_NUMBER_TABLE();
615       a13 := JTF_VARCHAR2_TABLE_100();
616       a14 := JTF_NUMBER_TABLE();
617       a15 := JTF_VARCHAR2_TABLE_100();
618       a16 := JTF_DATE_TABLE();
619       a17 := JTF_DATE_TABLE();
620       a18 := JTF_NUMBER_TABLE();
621       a19 := JTF_VARCHAR2_TABLE_100();
622       a20 := JTF_DATE_TABLE();
623       a21 := JTF_VARCHAR2_TABLE_2000();
624       a22 := JTF_NUMBER_TABLE();
625       a23 := JTF_NUMBER_TABLE();
626       a24 := JTF_DATE_TABLE();
627       a25 := JTF_NUMBER_TABLE();
628       a26 := JTF_NUMBER_TABLE();
629       a27 := JTF_NUMBER_TABLE();
630       a28 := JTF_NUMBER_TABLE();
631       a29 := JTF_NUMBER_TABLE();
632       a30 := JTF_NUMBER_TABLE();
633       a31 := JTF_NUMBER_TABLE();
634       a32 := JTF_NUMBER_TABLE();
635       a33 := JTF_NUMBER_TABLE();
636       a34 := JTF_NUMBER_TABLE();
637       a35 := JTF_VARCHAR2_TABLE_100();
638       a36 := JTF_VARCHAR2_TABLE_100();
639       a37 := JTF_VARCHAR2_TABLE_100();
640       a38 := JTF_VARCHAR2_TABLE_100();
641       a39 := JTF_DATE_TABLE();
642       a40 := JTF_NUMBER_TABLE();
643       a41 := JTF_NUMBER_TABLE();
644       a42 := JTF_DATE_TABLE();
645       a43 := JTF_NUMBER_TABLE();
646       a44 := JTF_VARCHAR2_TABLE_100();
647       a45 := JTF_NUMBER_TABLE();
648       a46 := JTF_VARCHAR2_TABLE_100();
649       a47 := JTF_NUMBER_TABLE();
650       a48 := JTF_NUMBER_TABLE();
651       a49 := JTF_NUMBER_TABLE();
652       a50 := JTF_NUMBER_TABLE();
653       a51 := JTF_VARCHAR2_TABLE_100();
654       a52 := JTF_NUMBER_TABLE();
655       a53 := JTF_NUMBER_TABLE();
656       a54 := JTF_VARCHAR2_TABLE_100();
657       a55 := JTF_NUMBER_TABLE();
658       a56 := JTF_NUMBER_TABLE();
659       a57 := JTF_VARCHAR2_TABLE_100();
660       a58 := JTF_NUMBER_TABLE();
661       a59 := JTF_NUMBER_TABLE();
662       a60 := JTF_VARCHAR2_TABLE_100();
663       a61 := JTF_NUMBER_TABLE();
664       a62 := JTF_NUMBER_TABLE();
665       a63 := JTF_NUMBER_TABLE();
666       a64 := JTF_NUMBER_TABLE();
667       a65 := JTF_NUMBER_TABLE();
668       a66 := JTF_NUMBER_TABLE();
669       a67 := JTF_DATE_TABLE();
670       a68 := JTF_VARCHAR2_TABLE_100();
671       a69 := JTF_NUMBER_TABLE();
672       a70 := JTF_NUMBER_TABLE();
673       a71 := JTF_VARCHAR2_TABLE_100();
674       a72 := JTF_NUMBER_TABLE();
675       a73 := JTF_NUMBER_TABLE();
676       a74 := JTF_DATE_TABLE();
677       a75 := JTF_VARCHAR2_TABLE_100();
678       a76 := JTF_NUMBER_TABLE();
679       a77 := JTF_VARCHAR2_TABLE_100();
680       a78 := JTF_NUMBER_TABLE();
681       a79 := JTF_VARCHAR2_TABLE_100();
682       a80 := JTF_DATE_TABLE();
683       a81 := JTF_VARCHAR2_TABLE_100();
684       a82 := JTF_VARCHAR2_TABLE_100();
685       a83 := JTF_DATE_TABLE();
686       a84 := JTF_NUMBER_TABLE();
687       a85 := JTF_DATE_TABLE();
688       a86 := JTF_NUMBER_TABLE();
689       a87 := JTF_DATE_TABLE();
690       a88 := JTF_NUMBER_TABLE();
691       a89 := JTF_NUMBER_TABLE();
692       a90 := JTF_NUMBER_TABLE();
693       a91 := JTF_NUMBER_TABLE();
694       a92 := JTF_VARCHAR2_TABLE_2000();
695       a93 := JTF_VARCHAR2_TABLE_100();
696       a94 := JTF_VARCHAR2_TABLE_200();
697       a95 := JTF_VARCHAR2_TABLE_200();
698       a96 := JTF_VARCHAR2_TABLE_200();
699       a97 := JTF_VARCHAR2_TABLE_200();
700       a98 := JTF_VARCHAR2_TABLE_200();
701       a99 := JTF_VARCHAR2_TABLE_200();
702       a100 := JTF_VARCHAR2_TABLE_200();
703       a101 := JTF_VARCHAR2_TABLE_200();
704       a102 := JTF_VARCHAR2_TABLE_200();
705       a103 := JTF_VARCHAR2_TABLE_200();
706       a104 := JTF_VARCHAR2_TABLE_200();
707       a105 := JTF_VARCHAR2_TABLE_200();
708       a106 := JTF_VARCHAR2_TABLE_200();
709       a107 := JTF_VARCHAR2_TABLE_200();
710       a108 := JTF_VARCHAR2_TABLE_200();
711       a109 := JTF_VARCHAR2_TABLE_100();
712       a110 := JTF_VARCHAR2_TABLE_200();
713       a111 := JTF_VARCHAR2_TABLE_200();
714       a112 := JTF_VARCHAR2_TABLE_200();
715       a113 := JTF_VARCHAR2_TABLE_200();
716       a114 := JTF_VARCHAR2_TABLE_200();
717       a115 := JTF_VARCHAR2_TABLE_200();
718       a116 := JTF_VARCHAR2_TABLE_200();
719       a117 := JTF_VARCHAR2_TABLE_200();
720       a118 := JTF_VARCHAR2_TABLE_200();
721       a119 := JTF_VARCHAR2_TABLE_200();
722       a120 := JTF_VARCHAR2_TABLE_200();
723       a121 := JTF_VARCHAR2_TABLE_200();
724       a122 := JTF_VARCHAR2_TABLE_200();
725       a123 := JTF_VARCHAR2_TABLE_200();
726       a124 := JTF_VARCHAR2_TABLE_200();
727       a125 := JTF_NUMBER_TABLE();
728       a126 := JTF_NUMBER_TABLE();
729       a127 := JTF_VARCHAR2_TABLE_100();
730       a128 := JTF_NUMBER_TABLE();
731       a129 := JTF_VARCHAR2_TABLE_100();
732       a130 := JTF_VARCHAR2_TABLE_100();
733       a131 := JTF_NUMBER_TABLE();
734       a132 := JTF_NUMBER_TABLE();
735       a133 := JTF_NUMBER_TABLE();
736       a134 := JTF_VARCHAR2_TABLE_100();
737       a135 := JTF_NUMBER_TABLE();
738       a136 := JTF_NUMBER_TABLE();
739       a137 := JTF_VARCHAR2_TABLE_300();
740       a138 := JTF_VARCHAR2_TABLE_300();
741       a139 := JTF_VARCHAR2_TABLE_100();
742       a140 := JTF_VARCHAR2_TABLE_100();
743       if t.count > 0 then
744         a0.extend(t.count);
745         a1.extend(t.count);
746         a2.extend(t.count);
747         a3.extend(t.count);
748         a4.extend(t.count);
749         a5.extend(t.count);
750         a6.extend(t.count);
751         a7.extend(t.count);
752         a8.extend(t.count);
753         a9.extend(t.count);
754         a10.extend(t.count);
755         a11.extend(t.count);
756         a12.extend(t.count);
757         a13.extend(t.count);
758         a14.extend(t.count);
759         a15.extend(t.count);
760         a16.extend(t.count);
761         a17.extend(t.count);
762         a18.extend(t.count);
763         a19.extend(t.count);
764         a20.extend(t.count);
765         a21.extend(t.count);
766         a22.extend(t.count);
767         a23.extend(t.count);
768         a24.extend(t.count);
769         a25.extend(t.count);
770         a26.extend(t.count);
771         a27.extend(t.count);
772         a28.extend(t.count);
773         a29.extend(t.count);
774         a30.extend(t.count);
775         a31.extend(t.count);
776         a32.extend(t.count);
777         a33.extend(t.count);
778         a34.extend(t.count);
779         a35.extend(t.count);
780         a36.extend(t.count);
781         a37.extend(t.count);
782         a38.extend(t.count);
783         a39.extend(t.count);
784         a40.extend(t.count);
785         a41.extend(t.count);
786         a42.extend(t.count);
787         a43.extend(t.count);
788         a44.extend(t.count);
789         a45.extend(t.count);
790         a46.extend(t.count);
791         a47.extend(t.count);
792         a48.extend(t.count);
793         a49.extend(t.count);
794         a50.extend(t.count);
795         a51.extend(t.count);
796         a52.extend(t.count);
797         a53.extend(t.count);
798         a54.extend(t.count);
799         a55.extend(t.count);
800         a56.extend(t.count);
801         a57.extend(t.count);
802         a58.extend(t.count);
803         a59.extend(t.count);
804         a60.extend(t.count);
805         a61.extend(t.count);
806         a62.extend(t.count);
807         a63.extend(t.count);
808         a64.extend(t.count);
809         a65.extend(t.count);
810         a66.extend(t.count);
811         a67.extend(t.count);
812         a68.extend(t.count);
813         a69.extend(t.count);
814         a70.extend(t.count);
815         a71.extend(t.count);
816         a72.extend(t.count);
817         a73.extend(t.count);
818         a74.extend(t.count);
819         a75.extend(t.count);
820         a76.extend(t.count);
821         a77.extend(t.count);
822         a78.extend(t.count);
823         a79.extend(t.count);
824         a80.extend(t.count);
825         a81.extend(t.count);
826         a82.extend(t.count);
827         a83.extend(t.count);
828         a84.extend(t.count);
829         a85.extend(t.count);
830         a86.extend(t.count);
831         a87.extend(t.count);
832         a88.extend(t.count);
833         a89.extend(t.count);
834         a90.extend(t.count);
835         a91.extend(t.count);
836         a92.extend(t.count);
837         a93.extend(t.count);
838         a94.extend(t.count);
839         a95.extend(t.count);
840         a96.extend(t.count);
841         a97.extend(t.count);
842         a98.extend(t.count);
843         a99.extend(t.count);
844         a100.extend(t.count);
845         a101.extend(t.count);
846         a102.extend(t.count);
847         a103.extend(t.count);
848         a104.extend(t.count);
849         a105.extend(t.count);
850         a106.extend(t.count);
851         a107.extend(t.count);
852         a108.extend(t.count);
853         a109.extend(t.count);
854         a110.extend(t.count);
855         a111.extend(t.count);
856         a112.extend(t.count);
857         a113.extend(t.count);
858         a114.extend(t.count);
859         a115.extend(t.count);
860         a116.extend(t.count);
861         a117.extend(t.count);
862         a118.extend(t.count);
863         a119.extend(t.count);
864         a120.extend(t.count);
865         a121.extend(t.count);
866         a122.extend(t.count);
867         a123.extend(t.count);
868         a124.extend(t.count);
869         a125.extend(t.count);
870         a126.extend(t.count);
871         a127.extend(t.count);
872         a128.extend(t.count);
873         a129.extend(t.count);
874         a130.extend(t.count);
875         a131.extend(t.count);
876         a132.extend(t.count);
877         a133.extend(t.count);
878         a134.extend(t.count);
879         a135.extend(t.count);
880         a136.extend(t.count);
881         a137.extend(t.count);
882         a138.extend(t.count);
883         a139.extend(t.count);
884         a140.extend(t.count);
885         ddindx := t.first;
886         indx := 1;
887         while true loop
888           a0(indx) := t(ddindx).claim_id;
889           a1(indx) := t(ddindx).object_version_number;
890           a2(indx) := t(ddindx).last_update_date;
891           a3(indx) := t(ddindx).last_updated_by;
892           a4(indx) := t(ddindx).creation_date;
893           a5(indx) := t(ddindx).created_by;
894           a6(indx) := t(ddindx).last_update_login;
895           a7(indx) := t(ddindx).request_id;
896           a8(indx) := t(ddindx).program_application_id;
897           a9(indx) := t(ddindx).program_update_date;
898           a10(indx) := t(ddindx).program_id;
899           a11(indx) := t(ddindx).created_from;
900           a12(indx) := t(ddindx).batch_id;
901           a13(indx) := t(ddindx).claim_number;
902           a14(indx) := t(ddindx).claim_type_id;
903           a15(indx) := t(ddindx).claim_class;
904           a16(indx) := t(ddindx).claim_date;
905           a17(indx) := t(ddindx).due_date;
906           a18(indx) := t(ddindx).owner_id;
907           a19(indx) := t(ddindx).history_event;
908           a20(indx) := t(ddindx).history_event_date;
909           a21(indx) := t(ddindx).history_event_description;
910           a22(indx) := t(ddindx).split_from_claim_id;
911           a23(indx) := t(ddindx).duplicate_claim_id;
912           a24(indx) := t(ddindx).split_date;
913           a25(indx) := t(ddindx).root_claim_id;
914           a26(indx) := t(ddindx).amount;
915           a27(indx) := t(ddindx).amount_adjusted;
916           a28(indx) := t(ddindx).amount_remaining;
917           a29(indx) := t(ddindx).amount_settled;
918           a30(indx) := t(ddindx).acctd_amount;
919           a31(indx) := t(ddindx).acctd_amount_remaining;
920           a32(indx) := t(ddindx).acctd_amount_adjusted;
921           a33(indx) := t(ddindx).acctd_amount_settled;
922           a34(indx) := t(ddindx).tax_amount;
923           a35(indx) := t(ddindx).tax_code;
924           a36(indx) := t(ddindx).tax_calculation_flag;
925           a37(indx) := t(ddindx).currency_code;
926           a38(indx) := t(ddindx).exchange_rate_type;
927           a39(indx) := t(ddindx).exchange_rate_date;
928           a40(indx) := t(ddindx).exchange_rate;
929           a41(indx) := t(ddindx).set_of_books_id;
930           a42(indx) := t(ddindx).original_claim_date;
931           a43(indx) := t(ddindx).source_object_id;
932           a44(indx) := t(ddindx).source_object_class;
933           a45(indx) := t(ddindx).source_object_type_id;
934           a46(indx) := t(ddindx).source_object_number;
935           a47(indx) := t(ddindx).cust_account_id;
936           a48(indx) := t(ddindx).cust_billto_acct_site_id;
937           a49(indx) := t(ddindx).cust_shipto_acct_site_id;
938           a50(indx) := t(ddindx).location_id;
939           a51(indx) := t(ddindx).pay_related_account_flag;
940           a52(indx) := t(ddindx).related_cust_account_id;
941           a53(indx) := t(ddindx).related_site_use_id;
942           a54(indx) := t(ddindx).relationship_type;
943           a55(indx) := t(ddindx).vendor_id;
944           a56(indx) := t(ddindx).vendor_site_id;
945           a57(indx) := t(ddindx).reason_type;
946           a58(indx) := t(ddindx).reason_code_id;
947           a59(indx) := t(ddindx).task_template_group_id;
948           a60(indx) := t(ddindx).status_code;
949           a61(indx) := t(ddindx).user_status_id;
950           a62(indx) := t(ddindx).sales_rep_id;
951           a63(indx) := t(ddindx).collector_id;
952           a64(indx) := t(ddindx).contact_id;
953           a65(indx) := t(ddindx).broker_id;
954           a66(indx) := t(ddindx).territory_id;
955           a67(indx) := t(ddindx).customer_ref_date;
956           a68(indx) := t(ddindx).customer_ref_number;
957           a69(indx) := t(ddindx).assigned_to;
958           a70(indx) := t(ddindx).receipt_id;
959           a71(indx) := t(ddindx).receipt_number;
960           a72(indx) := t(ddindx).doc_sequence_id;
961           a73(indx) := t(ddindx).doc_sequence_value;
962           a74(indx) := t(ddindx).gl_date;
963           a75(indx) := t(ddindx).payment_method;
964           a76(indx) := t(ddindx).voucher_id;
965           a77(indx) := t(ddindx).voucher_number;
966           a78(indx) := t(ddindx).payment_reference_id;
967           a79(indx) := t(ddindx).payment_reference_number;
968           a80(indx) := t(ddindx).payment_reference_date;
969           a81(indx) := t(ddindx).payment_status;
970           a82(indx) := t(ddindx).approved_flag;
971           a83(indx) := t(ddindx).approved_date;
972           a84(indx) := t(ddindx).approved_by;
973           a85(indx) := t(ddindx).settled_date;
974           a86(indx) := t(ddindx).settled_by;
975           a87(indx) := t(ddindx).effective_date;
976           a88(indx) := t(ddindx).custom_setup_id;
977           a89(indx) := t(ddindx).task_id;
978           a90(indx) := t(ddindx).country_id;
979           a91(indx) := t(ddindx).order_type_id;
980           a92(indx) := t(ddindx).comments;
981           a93(indx) := t(ddindx).attribute_category;
982           a94(indx) := t(ddindx).attribute1;
983           a95(indx) := t(ddindx).attribute2;
984           a96(indx) := t(ddindx).attribute3;
985           a97(indx) := t(ddindx).attribute4;
986           a98(indx) := t(ddindx).attribute5;
987           a99(indx) := t(ddindx).attribute6;
988           a100(indx) := t(ddindx).attribute7;
989           a101(indx) := t(ddindx).attribute8;
990           a102(indx) := t(ddindx).attribute9;
991           a103(indx) := t(ddindx).attribute10;
992           a104(indx) := t(ddindx).attribute11;
993           a105(indx) := t(ddindx).attribute12;
994           a106(indx) := t(ddindx).attribute13;
995           a107(indx) := t(ddindx).attribute14;
996           a108(indx) := t(ddindx).attribute15;
997           a109(indx) := t(ddindx).deduction_attribute_category;
998           a110(indx) := t(ddindx).deduction_attribute1;
999           a111(indx) := t(ddindx).deduction_attribute2;
1000           a112(indx) := t(ddindx).deduction_attribute3;
1001           a113(indx) := t(ddindx).deduction_attribute4;
1002           a114(indx) := t(ddindx).deduction_attribute5;
1003           a115(indx) := t(ddindx).deduction_attribute6;
1004           a116(indx) := t(ddindx).deduction_attribute7;
1005           a117(indx) := t(ddindx).deduction_attribute8;
1006           a118(indx) := t(ddindx).deduction_attribute9;
1007           a119(indx) := t(ddindx).deduction_attribute10;
1008           a120(indx) := t(ddindx).deduction_attribute11;
1009           a121(indx) := t(ddindx).deduction_attribute12;
1010           a122(indx) := t(ddindx).deduction_attribute13;
1011           a123(indx) := t(ddindx).deduction_attribute14;
1012           a124(indx) := t(ddindx).deduction_attribute15;
1013           a125(indx) := t(ddindx).org_id;
1014           a126(indx) := t(ddindx).legal_entity_id;
1015           a127(indx) := t(ddindx).write_off_flag;
1016           a128(indx) := t(ddindx).write_off_threshold_amount;
1017           a129(indx) := t(ddindx).under_write_off_threshold;
1018           a130(indx) := t(ddindx).customer_reason;
1019           a131(indx) := t(ddindx).ship_to_cust_account_id;
1020           a132(indx) := t(ddindx).amount_applied;
1021           a133(indx) := t(ddindx).applied_receipt_id;
1022           a134(indx) := t(ddindx).applied_receipt_number;
1023           a135(indx) := t(ddindx).wo_rec_trx_id;
1024           a136(indx) := t(ddindx).group_claim_id;
1025           a137(indx) := t(ddindx).appr_wf_item_key;
1026           a138(indx) := t(ddindx).cstl_wf_item_key;
1027           a139(indx) := t(ddindx).batch_type;
1028           a140(indx) := t(ddindx).tax_action;
1029           indx := indx+1;
1030           if t.last =ddindx
1031             then exit;
1032           end if;
1033           ddindx := t.next(ddindx);
1034         end loop;
1035       end if;
1036    end if;
1037   end rosetta_table_copy_out_p3;
1038 
1039   procedure create_claim(p_api_version  NUMBER
1040     , p_init_msg_list  VARCHAR2
1041     , p_commit  VARCHAR2
1042     , p_validation_level  NUMBER
1043     , x_return_status out nocopy  VARCHAR2
1044     , x_msg_data out nocopy  VARCHAR2
1045     , x_msg_count out nocopy  NUMBER
1046     , p7_a0  NUMBER
1047     , p7_a1  NUMBER
1048     , p7_a2  DATE
1049     , p7_a3  NUMBER
1050     , p7_a4  DATE
1051     , p7_a5  NUMBER
1052     , p7_a6  NUMBER
1053     , p7_a7  NUMBER
1054     , p7_a8  NUMBER
1055     , p7_a9  DATE
1056     , p7_a10  NUMBER
1057     , p7_a11  VARCHAR2
1058     , p7_a12  NUMBER
1059     , p7_a13  VARCHAR2
1060     , p7_a14  NUMBER
1061     , p7_a15  VARCHAR2
1062     , p7_a16  DATE
1063     , p7_a17  DATE
1064     , p7_a18  NUMBER
1065     , p7_a19  VARCHAR2
1066     , p7_a20  DATE
1067     , p7_a21  VARCHAR2
1068     , p7_a22  NUMBER
1069     , p7_a23  NUMBER
1070     , p7_a24  DATE
1071     , p7_a25  NUMBER
1072     , p7_a26  NUMBER
1073     , p7_a27  NUMBER
1074     , p7_a28  NUMBER
1075     , p7_a29  NUMBER
1076     , p7_a30  NUMBER
1077     , p7_a31  NUMBER
1078     , p7_a32  NUMBER
1079     , p7_a33  NUMBER
1080     , p7_a34  NUMBER
1081     , p7_a35  VARCHAR2
1082     , p7_a36  VARCHAR2
1083     , p7_a37  VARCHAR2
1084     , p7_a38  VARCHAR2
1085     , p7_a39  DATE
1086     , p7_a40  NUMBER
1087     , p7_a41  NUMBER
1088     , p7_a42  DATE
1089     , p7_a43  NUMBER
1090     , p7_a44  VARCHAR2
1091     , p7_a45  NUMBER
1092     , p7_a46  VARCHAR2
1093     , p7_a47  NUMBER
1094     , p7_a48  NUMBER
1095     , p7_a49  NUMBER
1096     , p7_a50  NUMBER
1097     , p7_a51  VARCHAR2
1098     , p7_a52  NUMBER
1099     , p7_a53  NUMBER
1100     , p7_a54  VARCHAR2
1101     , p7_a55  NUMBER
1102     , p7_a56  NUMBER
1103     , p7_a57  VARCHAR2
1104     , p7_a58  NUMBER
1105     , p7_a59  NUMBER
1106     , p7_a60  VARCHAR2
1107     , p7_a61  NUMBER
1108     , p7_a62  NUMBER
1109     , p7_a63  NUMBER
1110     , p7_a64  NUMBER
1111     , p7_a65  NUMBER
1112     , p7_a66  NUMBER
1113     , p7_a67  DATE
1114     , p7_a68  VARCHAR2
1115     , p7_a69  NUMBER
1116     , p7_a70  NUMBER
1117     , p7_a71  VARCHAR2
1118     , p7_a72  NUMBER
1119     , p7_a73  NUMBER
1120     , p7_a74  DATE
1121     , p7_a75  VARCHAR2
1122     , p7_a76  NUMBER
1123     , p7_a77  VARCHAR2
1124     , p7_a78  NUMBER
1125     , p7_a79  VARCHAR2
1126     , p7_a80  DATE
1127     , p7_a81  VARCHAR2
1128     , p7_a82  VARCHAR2
1129     , p7_a83  DATE
1130     , p7_a84  NUMBER
1131     , p7_a85  DATE
1132     , p7_a86  NUMBER
1133     , p7_a87  DATE
1134     , p7_a88  NUMBER
1135     , p7_a89  NUMBER
1136     , p7_a90  NUMBER
1137     , p7_a91  NUMBER
1138     , p7_a92  VARCHAR2
1139     , p7_a93  VARCHAR2
1140     , p7_a94  VARCHAR2
1141     , p7_a95  VARCHAR2
1142     , p7_a96  VARCHAR2
1143     , p7_a97  VARCHAR2
1144     , p7_a98  VARCHAR2
1145     , p7_a99  VARCHAR2
1146     , p7_a100  VARCHAR2
1147     , p7_a101  VARCHAR2
1148     , p7_a102  VARCHAR2
1149     , p7_a103  VARCHAR2
1150     , p7_a104  VARCHAR2
1151     , p7_a105  VARCHAR2
1152     , p7_a106  VARCHAR2
1153     , p7_a107  VARCHAR2
1154     , p7_a108  VARCHAR2
1155     , p7_a109  VARCHAR2
1156     , p7_a110  VARCHAR2
1157     , p7_a111  VARCHAR2
1158     , p7_a112  VARCHAR2
1159     , p7_a113  VARCHAR2
1160     , p7_a114  VARCHAR2
1161     , p7_a115  VARCHAR2
1162     , p7_a116  VARCHAR2
1163     , p7_a117  VARCHAR2
1164     , p7_a118  VARCHAR2
1165     , p7_a119  VARCHAR2
1166     , p7_a120  VARCHAR2
1167     , p7_a121  VARCHAR2
1168     , p7_a122  VARCHAR2
1169     , p7_a123  VARCHAR2
1170     , p7_a124  VARCHAR2
1171     , p7_a125  NUMBER
1172     , p7_a126  NUMBER
1173     , p7_a127  VARCHAR2
1174     , p7_a128  NUMBER
1175     , p7_a129  VARCHAR2
1176     , p7_a130  VARCHAR2
1177     , p7_a131  NUMBER
1178     , p7_a132  NUMBER
1179     , p7_a133  NUMBER
1180     , p7_a134  VARCHAR2
1181     , p7_a135  NUMBER
1182     , p7_a136  NUMBER
1183     , p7_a137  VARCHAR2
1184     , p7_a138  VARCHAR2
1185     , p7_a139  VARCHAR2
1186     , p7_a140  VARCHAR2
1187     , x_claim_id out nocopy  NUMBER
1188   )
1189 
1190   as
1191     ddp_claim ozf_claim_pvt.claim_rec_type;
1192     ddindx binary_integer; indx binary_integer;
1193   begin
1194 
1195     -- copy data to the local IN or IN-OUT args, if any
1196 
1197 
1198 
1199 
1200 
1201 
1202 
1203     ddp_claim.claim_id := p7_a0;
1204     ddp_claim.object_version_number := p7_a1;
1205     ddp_claim.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
1206     ddp_claim.last_updated_by := p7_a3;
1207     ddp_claim.creation_date := rosetta_g_miss_date_in_map(p7_a4);
1208     ddp_claim.created_by := p7_a5;
1209     ddp_claim.last_update_login := p7_a6;
1210     ddp_claim.request_id := p7_a7;
1211     ddp_claim.program_application_id := p7_a8;
1212     ddp_claim.program_update_date := rosetta_g_miss_date_in_map(p7_a9);
1213     ddp_claim.program_id := p7_a10;
1214     ddp_claim.created_from := p7_a11;
1215     ddp_claim.batch_id := p7_a12;
1216     ddp_claim.claim_number := p7_a13;
1217     ddp_claim.claim_type_id := p7_a14;
1218     ddp_claim.claim_class := p7_a15;
1219     ddp_claim.claim_date := rosetta_g_miss_date_in_map(p7_a16);
1220     ddp_claim.due_date := rosetta_g_miss_date_in_map(p7_a17);
1221     ddp_claim.owner_id := p7_a18;
1222     ddp_claim.history_event := p7_a19;
1223     ddp_claim.history_event_date := rosetta_g_miss_date_in_map(p7_a20);
1224     ddp_claim.history_event_description := p7_a21;
1225     ddp_claim.split_from_claim_id := p7_a22;
1226     ddp_claim.duplicate_claim_id := p7_a23;
1227     ddp_claim.split_date := rosetta_g_miss_date_in_map(p7_a24);
1228     ddp_claim.root_claim_id := p7_a25;
1229     ddp_claim.amount := p7_a26;
1230     ddp_claim.amount_adjusted := p7_a27;
1231     ddp_claim.amount_remaining := p7_a28;
1232     ddp_claim.amount_settled := p7_a29;
1233     ddp_claim.acctd_amount := p7_a30;
1234     ddp_claim.acctd_amount_remaining := p7_a31;
1235     ddp_claim.acctd_amount_adjusted := p7_a32;
1236     ddp_claim.acctd_amount_settled := p7_a33;
1237     ddp_claim.tax_amount := p7_a34;
1238     ddp_claim.tax_code := p7_a35;
1239     ddp_claim.tax_calculation_flag := p7_a36;
1240     ddp_claim.currency_code := p7_a37;
1241     ddp_claim.exchange_rate_type := p7_a38;
1242     ddp_claim.exchange_rate_date := rosetta_g_miss_date_in_map(p7_a39);
1243     ddp_claim.exchange_rate := p7_a40;
1244     ddp_claim.set_of_books_id := p7_a41;
1245     ddp_claim.original_claim_date := rosetta_g_miss_date_in_map(p7_a42);
1246     ddp_claim.source_object_id := p7_a43;
1247     ddp_claim.source_object_class := p7_a44;
1248     ddp_claim.source_object_type_id := p7_a45;
1249     ddp_claim.source_object_number := p7_a46;
1250     ddp_claim.cust_account_id := p7_a47;
1251     ddp_claim.cust_billto_acct_site_id := p7_a48;
1252     ddp_claim.cust_shipto_acct_site_id := p7_a49;
1253     ddp_claim.location_id := p7_a50;
1254     ddp_claim.pay_related_account_flag := p7_a51;
1255     ddp_claim.related_cust_account_id := p7_a52;
1256     ddp_claim.related_site_use_id := p7_a53;
1257     ddp_claim.relationship_type := p7_a54;
1258     ddp_claim.vendor_id := p7_a55;
1259     ddp_claim.vendor_site_id := p7_a56;
1260     ddp_claim.reason_type := p7_a57;
1261     ddp_claim.reason_code_id := p7_a58;
1262     ddp_claim.task_template_group_id := p7_a59;
1263     ddp_claim.status_code := p7_a60;
1264     ddp_claim.user_status_id := p7_a61;
1265     ddp_claim.sales_rep_id := p7_a62;
1266     ddp_claim.collector_id := p7_a63;
1267     ddp_claim.contact_id := p7_a64;
1268     ddp_claim.broker_id := p7_a65;
1269     ddp_claim.territory_id := p7_a66;
1270     ddp_claim.customer_ref_date := rosetta_g_miss_date_in_map(p7_a67);
1271     ddp_claim.customer_ref_number := p7_a68;
1272     ddp_claim.assigned_to := p7_a69;
1273     ddp_claim.receipt_id := p7_a70;
1274     ddp_claim.receipt_number := p7_a71;
1275     ddp_claim.doc_sequence_id := p7_a72;
1276     ddp_claim.doc_sequence_value := p7_a73;
1277     ddp_claim.gl_date := rosetta_g_miss_date_in_map(p7_a74);
1278     ddp_claim.payment_method := p7_a75;
1279     ddp_claim.voucher_id := p7_a76;
1280     ddp_claim.voucher_number := p7_a77;
1281     ddp_claim.payment_reference_id := p7_a78;
1282     ddp_claim.payment_reference_number := p7_a79;
1283     ddp_claim.payment_reference_date := rosetta_g_miss_date_in_map(p7_a80);
1284     ddp_claim.payment_status := p7_a81;
1285     ddp_claim.approved_flag := p7_a82;
1286     ddp_claim.approved_date := rosetta_g_miss_date_in_map(p7_a83);
1287     ddp_claim.approved_by := p7_a84;
1288     ddp_claim.settled_date := rosetta_g_miss_date_in_map(p7_a85);
1289     ddp_claim.settled_by := p7_a86;
1290     ddp_claim.effective_date := rosetta_g_miss_date_in_map(p7_a87);
1291     ddp_claim.custom_setup_id := p7_a88;
1292     ddp_claim.task_id := p7_a89;
1293     ddp_claim.country_id := p7_a90;
1294     ddp_claim.order_type_id := p7_a91;
1295     ddp_claim.comments := p7_a92;
1296     ddp_claim.attribute_category := p7_a93;
1297     ddp_claim.attribute1 := p7_a94;
1298     ddp_claim.attribute2 := p7_a95;
1299     ddp_claim.attribute3 := p7_a96;
1300     ddp_claim.attribute4 := p7_a97;
1301     ddp_claim.attribute5 := p7_a98;
1302     ddp_claim.attribute6 := p7_a99;
1303     ddp_claim.attribute7 := p7_a100;
1304     ddp_claim.attribute8 := p7_a101;
1305     ddp_claim.attribute9 := p7_a102;
1306     ddp_claim.attribute10 := p7_a103;
1307     ddp_claim.attribute11 := p7_a104;
1308     ddp_claim.attribute12 := p7_a105;
1309     ddp_claim.attribute13 := p7_a106;
1310     ddp_claim.attribute14 := p7_a107;
1311     ddp_claim.attribute15 := p7_a108;
1312     ddp_claim.deduction_attribute_category := p7_a109;
1313     ddp_claim.deduction_attribute1 := p7_a110;
1314     ddp_claim.deduction_attribute2 := p7_a111;
1315     ddp_claim.deduction_attribute3 := p7_a112;
1316     ddp_claim.deduction_attribute4 := p7_a113;
1317     ddp_claim.deduction_attribute5 := p7_a114;
1318     ddp_claim.deduction_attribute6 := p7_a115;
1319     ddp_claim.deduction_attribute7 := p7_a116;
1320     ddp_claim.deduction_attribute8 := p7_a117;
1321     ddp_claim.deduction_attribute9 := p7_a118;
1322     ddp_claim.deduction_attribute10 := p7_a119;
1323     ddp_claim.deduction_attribute11 := p7_a120;
1324     ddp_claim.deduction_attribute12 := p7_a121;
1325     ddp_claim.deduction_attribute13 := p7_a122;
1326     ddp_claim.deduction_attribute14 := p7_a123;
1327     ddp_claim.deduction_attribute15 := p7_a124;
1328     ddp_claim.org_id := p7_a125;
1329     ddp_claim.legal_entity_id := p7_a126;
1330     ddp_claim.write_off_flag := p7_a127;
1331     ddp_claim.write_off_threshold_amount := p7_a128;
1332     ddp_claim.under_write_off_threshold := p7_a129;
1333     ddp_claim.customer_reason := p7_a130;
1334     ddp_claim.ship_to_cust_account_id := p7_a131;
1335     ddp_claim.amount_applied := p7_a132;
1336     ddp_claim.applied_receipt_id := p7_a133;
1337     ddp_claim.applied_receipt_number := p7_a134;
1338     ddp_claim.wo_rec_trx_id := p7_a135;
1339     ddp_claim.group_claim_id := p7_a136;
1340     ddp_claim.appr_wf_item_key := p7_a137;
1341     ddp_claim.cstl_wf_item_key := p7_a138;
1342     ddp_claim.batch_type := p7_a139;
1343     ddp_claim.tax_action := p7_a140;
1344 
1345 
1346     -- here's the delegated call to the old PL/SQL routine
1347     ozf_claim_pvt.create_claim(p_api_version,
1348       p_init_msg_list,
1349       p_commit,
1350       p_validation_level,
1351       x_return_status,
1352       x_msg_data,
1353       x_msg_count,
1354       ddp_claim,
1355       x_claim_id);
1356 
1357     -- copy data back from the local variables to OUT or IN-OUT args, if any
1358 
1359 
1360 
1361 
1362 
1363 
1364 
1365 
1366   end;
1367 
1368   procedure update_claim(p_api_version  NUMBER
1369     , p_init_msg_list  VARCHAR2
1370     , p_commit  VARCHAR2
1371     , p_validation_level  NUMBER
1372     , x_return_status out nocopy  VARCHAR2
1373     , x_msg_data out nocopy  VARCHAR2
1374     , x_msg_count out nocopy  NUMBER
1375     , p7_a0  NUMBER
1376     , p7_a1  NUMBER
1377     , p7_a2  DATE
1378     , p7_a3  NUMBER
1379     , p7_a4  DATE
1380     , p7_a5  NUMBER
1381     , p7_a6  NUMBER
1382     , p7_a7  NUMBER
1383     , p7_a8  NUMBER
1384     , p7_a9  DATE
1385     , p7_a10  NUMBER
1386     , p7_a11  VARCHAR2
1387     , p7_a12  NUMBER
1388     , p7_a13  VARCHAR2
1389     , p7_a14  NUMBER
1390     , p7_a15  VARCHAR2
1391     , p7_a16  DATE
1392     , p7_a17  DATE
1393     , p7_a18  NUMBER
1394     , p7_a19  VARCHAR2
1395     , p7_a20  DATE
1396     , p7_a21  VARCHAR2
1397     , p7_a22  NUMBER
1398     , p7_a23  NUMBER
1399     , p7_a24  DATE
1400     , p7_a25  NUMBER
1401     , p7_a26  NUMBER
1402     , p7_a27  NUMBER
1403     , p7_a28  NUMBER
1404     , p7_a29  NUMBER
1405     , p7_a30  NUMBER
1406     , p7_a31  NUMBER
1407     , p7_a32  NUMBER
1408     , p7_a33  NUMBER
1409     , p7_a34  NUMBER
1410     , p7_a35  VARCHAR2
1411     , p7_a36  VARCHAR2
1412     , p7_a37  VARCHAR2
1413     , p7_a38  VARCHAR2
1414     , p7_a39  DATE
1415     , p7_a40  NUMBER
1416     , p7_a41  NUMBER
1417     , p7_a42  DATE
1418     , p7_a43  NUMBER
1419     , p7_a44  VARCHAR2
1420     , p7_a45  NUMBER
1421     , p7_a46  VARCHAR2
1422     , p7_a47  NUMBER
1423     , p7_a48  NUMBER
1424     , p7_a49  NUMBER
1425     , p7_a50  NUMBER
1426     , p7_a51  VARCHAR2
1427     , p7_a52  NUMBER
1428     , p7_a53  NUMBER
1429     , p7_a54  VARCHAR2
1430     , p7_a55  NUMBER
1431     , p7_a56  NUMBER
1432     , p7_a57  VARCHAR2
1433     , p7_a58  NUMBER
1434     , p7_a59  NUMBER
1435     , p7_a60  VARCHAR2
1436     , p7_a61  NUMBER
1437     , p7_a62  NUMBER
1438     , p7_a63  NUMBER
1439     , p7_a64  NUMBER
1440     , p7_a65  NUMBER
1441     , p7_a66  NUMBER
1442     , p7_a67  DATE
1443     , p7_a68  VARCHAR2
1444     , p7_a69  NUMBER
1445     , p7_a70  NUMBER
1446     , p7_a71  VARCHAR2
1447     , p7_a72  NUMBER
1448     , p7_a73  NUMBER
1449     , p7_a74  DATE
1450     , p7_a75  VARCHAR2
1451     , p7_a76  NUMBER
1452     , p7_a77  VARCHAR2
1453     , p7_a78  NUMBER
1454     , p7_a79  VARCHAR2
1455     , p7_a80  DATE
1456     , p7_a81  VARCHAR2
1457     , p7_a82  VARCHAR2
1458     , p7_a83  DATE
1459     , p7_a84  NUMBER
1460     , p7_a85  DATE
1461     , p7_a86  NUMBER
1462     , p7_a87  DATE
1463     , p7_a88  NUMBER
1464     , p7_a89  NUMBER
1465     , p7_a90  NUMBER
1466     , p7_a91  NUMBER
1467     , p7_a92  VARCHAR2
1468     , p7_a93  VARCHAR2
1469     , p7_a94  VARCHAR2
1470     , p7_a95  VARCHAR2
1471     , p7_a96  VARCHAR2
1472     , p7_a97  VARCHAR2
1473     , p7_a98  VARCHAR2
1474     , p7_a99  VARCHAR2
1475     , p7_a100  VARCHAR2
1476     , p7_a101  VARCHAR2
1477     , p7_a102  VARCHAR2
1478     , p7_a103  VARCHAR2
1479     , p7_a104  VARCHAR2
1480     , p7_a105  VARCHAR2
1481     , p7_a106  VARCHAR2
1482     , p7_a107  VARCHAR2
1483     , p7_a108  VARCHAR2
1484     , p7_a109  VARCHAR2
1485     , p7_a110  VARCHAR2
1486     , p7_a111  VARCHAR2
1487     , p7_a112  VARCHAR2
1488     , p7_a113  VARCHAR2
1489     , p7_a114  VARCHAR2
1490     , p7_a115  VARCHAR2
1491     , p7_a116  VARCHAR2
1492     , p7_a117  VARCHAR2
1493     , p7_a118  VARCHAR2
1494     , p7_a119  VARCHAR2
1495     , p7_a120  VARCHAR2
1496     , p7_a121  VARCHAR2
1497     , p7_a122  VARCHAR2
1498     , p7_a123  VARCHAR2
1499     , p7_a124  VARCHAR2
1500     , p7_a125  NUMBER
1501     , p7_a126  NUMBER
1502     , p7_a127  VARCHAR2
1503     , p7_a128  NUMBER
1504     , p7_a129  VARCHAR2
1505     , p7_a130  VARCHAR2
1506     , p7_a131  NUMBER
1507     , p7_a132  NUMBER
1508     , p7_a133  NUMBER
1509     , p7_a134  VARCHAR2
1510     , p7_a135  NUMBER
1511     , p7_a136  NUMBER
1512     , p7_a137  VARCHAR2
1513     , p7_a138  VARCHAR2
1514     , p7_a139  VARCHAR2
1515     , p7_a140  VARCHAR2
1516     , p_event  VARCHAR2
1517     , p_mode  VARCHAR2
1518     , x_object_version_number out nocopy  NUMBER
1519   )
1520 
1521   as
1522     ddp_claim ozf_claim_pvt.claim_rec_type;
1523     ddindx binary_integer; indx binary_integer;
1524   begin
1525 
1526     -- copy data to the local IN or IN-OUT args, if any
1527 
1528 
1529 
1530 
1531 
1532 
1533 
1534     ddp_claim.claim_id := p7_a0;
1535     ddp_claim.object_version_number := p7_a1;
1536     ddp_claim.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
1537     ddp_claim.last_updated_by := p7_a3;
1538     ddp_claim.creation_date := rosetta_g_miss_date_in_map(p7_a4);
1539     ddp_claim.created_by := p7_a5;
1540     ddp_claim.last_update_login := p7_a6;
1541     ddp_claim.request_id := p7_a7;
1542     ddp_claim.program_application_id := p7_a8;
1543     ddp_claim.program_update_date := rosetta_g_miss_date_in_map(p7_a9);
1544     ddp_claim.program_id := p7_a10;
1545     ddp_claim.created_from := p7_a11;
1546     ddp_claim.batch_id := p7_a12;
1547     ddp_claim.claim_number := p7_a13;
1548     ddp_claim.claim_type_id := p7_a14;
1549     ddp_claim.claim_class := p7_a15;
1550     ddp_claim.claim_date := rosetta_g_miss_date_in_map(p7_a16);
1551     ddp_claim.due_date := rosetta_g_miss_date_in_map(p7_a17);
1552     ddp_claim.owner_id := p7_a18;
1553     ddp_claim.history_event := p7_a19;
1554     ddp_claim.history_event_date := rosetta_g_miss_date_in_map(p7_a20);
1555     ddp_claim.history_event_description := p7_a21;
1556     ddp_claim.split_from_claim_id := p7_a22;
1557     ddp_claim.duplicate_claim_id := p7_a23;
1558     ddp_claim.split_date := rosetta_g_miss_date_in_map(p7_a24);
1559     ddp_claim.root_claim_id := p7_a25;
1560     ddp_claim.amount := p7_a26;
1561     ddp_claim.amount_adjusted := p7_a27;
1562     ddp_claim.amount_remaining := p7_a28;
1563     ddp_claim.amount_settled := p7_a29;
1564     ddp_claim.acctd_amount := p7_a30;
1565     ddp_claim.acctd_amount_remaining := p7_a31;
1566     ddp_claim.acctd_amount_adjusted := p7_a32;
1567     ddp_claim.acctd_amount_settled := p7_a33;
1568     ddp_claim.tax_amount := p7_a34;
1569     ddp_claim.tax_code := p7_a35;
1570     ddp_claim.tax_calculation_flag := p7_a36;
1571     ddp_claim.currency_code := p7_a37;
1572     ddp_claim.exchange_rate_type := p7_a38;
1573     ddp_claim.exchange_rate_date := rosetta_g_miss_date_in_map(p7_a39);
1574     ddp_claim.exchange_rate := p7_a40;
1575     ddp_claim.set_of_books_id := p7_a41;
1576     ddp_claim.original_claim_date := rosetta_g_miss_date_in_map(p7_a42);
1577     ddp_claim.source_object_id := p7_a43;
1578     ddp_claim.source_object_class := p7_a44;
1579     ddp_claim.source_object_type_id := p7_a45;
1580     ddp_claim.source_object_number := p7_a46;
1581     ddp_claim.cust_account_id := p7_a47;
1582     ddp_claim.cust_billto_acct_site_id := p7_a48;
1583     ddp_claim.cust_shipto_acct_site_id := p7_a49;
1584     ddp_claim.location_id := p7_a50;
1585     ddp_claim.pay_related_account_flag := p7_a51;
1586     ddp_claim.related_cust_account_id := p7_a52;
1587     ddp_claim.related_site_use_id := p7_a53;
1588     ddp_claim.relationship_type := p7_a54;
1589     ddp_claim.vendor_id := p7_a55;
1590     ddp_claim.vendor_site_id := p7_a56;
1591     ddp_claim.reason_type := p7_a57;
1592     ddp_claim.reason_code_id := p7_a58;
1593     ddp_claim.task_template_group_id := p7_a59;
1594     ddp_claim.status_code := p7_a60;
1595     ddp_claim.user_status_id := p7_a61;
1596     ddp_claim.sales_rep_id := p7_a62;
1597     ddp_claim.collector_id := p7_a63;
1598     ddp_claim.contact_id := p7_a64;
1599     ddp_claim.broker_id := p7_a65;
1600     ddp_claim.territory_id := p7_a66;
1601     ddp_claim.customer_ref_date := rosetta_g_miss_date_in_map(p7_a67);
1602     ddp_claim.customer_ref_number := p7_a68;
1603     ddp_claim.assigned_to := p7_a69;
1604     ddp_claim.receipt_id := p7_a70;
1605     ddp_claim.receipt_number := p7_a71;
1606     ddp_claim.doc_sequence_id := p7_a72;
1607     ddp_claim.doc_sequence_value := p7_a73;
1608     ddp_claim.gl_date := rosetta_g_miss_date_in_map(p7_a74);
1609     ddp_claim.payment_method := p7_a75;
1610     ddp_claim.voucher_id := p7_a76;
1611     ddp_claim.voucher_number := p7_a77;
1612     ddp_claim.payment_reference_id := p7_a78;
1613     ddp_claim.payment_reference_number := p7_a79;
1614     ddp_claim.payment_reference_date := rosetta_g_miss_date_in_map(p7_a80);
1615     ddp_claim.payment_status := p7_a81;
1616     ddp_claim.approved_flag := p7_a82;
1617     ddp_claim.approved_date := rosetta_g_miss_date_in_map(p7_a83);
1618     ddp_claim.approved_by := p7_a84;
1619     ddp_claim.settled_date := rosetta_g_miss_date_in_map(p7_a85);
1620     ddp_claim.settled_by := p7_a86;
1621     ddp_claim.effective_date := rosetta_g_miss_date_in_map(p7_a87);
1622     ddp_claim.custom_setup_id := p7_a88;
1623     ddp_claim.task_id := p7_a89;
1624     ddp_claim.country_id := p7_a90;
1625     ddp_claim.order_type_id := p7_a91;
1626     ddp_claim.comments := p7_a92;
1627     ddp_claim.attribute_category := p7_a93;
1628     ddp_claim.attribute1 := p7_a94;
1629     ddp_claim.attribute2 := p7_a95;
1630     ddp_claim.attribute3 := p7_a96;
1631     ddp_claim.attribute4 := p7_a97;
1632     ddp_claim.attribute5 := p7_a98;
1633     ddp_claim.attribute6 := p7_a99;
1634     ddp_claim.attribute7 := p7_a100;
1635     ddp_claim.attribute8 := p7_a101;
1636     ddp_claim.attribute9 := p7_a102;
1637     ddp_claim.attribute10 := p7_a103;
1638     ddp_claim.attribute11 := p7_a104;
1639     ddp_claim.attribute12 := p7_a105;
1640     ddp_claim.attribute13 := p7_a106;
1641     ddp_claim.attribute14 := p7_a107;
1642     ddp_claim.attribute15 := p7_a108;
1643     ddp_claim.deduction_attribute_category := p7_a109;
1644     ddp_claim.deduction_attribute1 := p7_a110;
1645     ddp_claim.deduction_attribute2 := p7_a111;
1646     ddp_claim.deduction_attribute3 := p7_a112;
1647     ddp_claim.deduction_attribute4 := p7_a113;
1648     ddp_claim.deduction_attribute5 := p7_a114;
1649     ddp_claim.deduction_attribute6 := p7_a115;
1650     ddp_claim.deduction_attribute7 := p7_a116;
1651     ddp_claim.deduction_attribute8 := p7_a117;
1652     ddp_claim.deduction_attribute9 := p7_a118;
1653     ddp_claim.deduction_attribute10 := p7_a119;
1654     ddp_claim.deduction_attribute11 := p7_a120;
1655     ddp_claim.deduction_attribute12 := p7_a121;
1656     ddp_claim.deduction_attribute13 := p7_a122;
1657     ddp_claim.deduction_attribute14 := p7_a123;
1658     ddp_claim.deduction_attribute15 := p7_a124;
1659     ddp_claim.org_id := p7_a125;
1660     ddp_claim.legal_entity_id := p7_a126;
1661     ddp_claim.write_off_flag := p7_a127;
1662     ddp_claim.write_off_threshold_amount := p7_a128;
1663     ddp_claim.under_write_off_threshold := p7_a129;
1664     ddp_claim.customer_reason := p7_a130;
1665     ddp_claim.ship_to_cust_account_id := p7_a131;
1666     ddp_claim.amount_applied := p7_a132;
1667     ddp_claim.applied_receipt_id := p7_a133;
1668     ddp_claim.applied_receipt_number := p7_a134;
1669     ddp_claim.wo_rec_trx_id := p7_a135;
1670     ddp_claim.group_claim_id := p7_a136;
1671     ddp_claim.appr_wf_item_key := p7_a137;
1672     ddp_claim.cstl_wf_item_key := p7_a138;
1673     ddp_claim.batch_type := p7_a139;
1674     ddp_claim.tax_action := p7_a140;
1675 
1676 
1677 
1678 
1679     -- here's the delegated call to the old PL/SQL routine
1680     ozf_claim_pvt.update_claim(p_api_version,
1681       p_init_msg_list,
1682       p_commit,
1683       p_validation_level,
1684       x_return_status,
1685       x_msg_data,
1686       x_msg_count,
1687       ddp_claim,
1688       p_event,
1689       p_mode,
1690       x_object_version_number);
1691 
1692     -- copy data back from the local variables to OUT or IN-OUT args, if any
1693 
1694 
1695 
1696 
1697 
1698 
1699 
1700 
1701 
1702 
1703   end;
1704 
1705   procedure validate_claim(p_api_version  NUMBER
1706     , p_init_msg_list  VARCHAR2
1707     , p_validation_level  NUMBER
1708     , x_return_status out nocopy  VARCHAR2
1709     , x_msg_count out nocopy  NUMBER
1710     , x_msg_data out nocopy  VARCHAR2
1711     , p6_a0  NUMBER
1712     , p6_a1  NUMBER
1713     , p6_a2  DATE
1714     , p6_a3  NUMBER
1715     , p6_a4  DATE
1716     , p6_a5  NUMBER
1717     , p6_a6  NUMBER
1718     , p6_a7  NUMBER
1719     , p6_a8  NUMBER
1720     , p6_a9  DATE
1721     , p6_a10  NUMBER
1722     , p6_a11  VARCHAR2
1723     , p6_a12  NUMBER
1724     , p6_a13  VARCHAR2
1725     , p6_a14  NUMBER
1726     , p6_a15  VARCHAR2
1727     , p6_a16  DATE
1728     , p6_a17  DATE
1729     , p6_a18  NUMBER
1730     , p6_a19  VARCHAR2
1731     , p6_a20  DATE
1732     , p6_a21  VARCHAR2
1733     , p6_a22  NUMBER
1734     , p6_a23  NUMBER
1735     , p6_a24  DATE
1736     , p6_a25  NUMBER
1737     , p6_a26  NUMBER
1738     , p6_a27  NUMBER
1739     , p6_a28  NUMBER
1740     , p6_a29  NUMBER
1741     , p6_a30  NUMBER
1742     , p6_a31  NUMBER
1743     , p6_a32  NUMBER
1744     , p6_a33  NUMBER
1745     , p6_a34  NUMBER
1746     , p6_a35  VARCHAR2
1747     , p6_a36  VARCHAR2
1748     , p6_a37  VARCHAR2
1749     , p6_a38  VARCHAR2
1750     , p6_a39  DATE
1751     , p6_a40  NUMBER
1752     , p6_a41  NUMBER
1753     , p6_a42  DATE
1754     , p6_a43  NUMBER
1755     , p6_a44  VARCHAR2
1756     , p6_a45  NUMBER
1757     , p6_a46  VARCHAR2
1758     , p6_a47  NUMBER
1759     , p6_a48  NUMBER
1760     , p6_a49  NUMBER
1761     , p6_a50  NUMBER
1762     , p6_a51  VARCHAR2
1763     , p6_a52  NUMBER
1764     , p6_a53  NUMBER
1765     , p6_a54  VARCHAR2
1766     , p6_a55  NUMBER
1767     , p6_a56  NUMBER
1768     , p6_a57  VARCHAR2
1769     , p6_a58  NUMBER
1770     , p6_a59  NUMBER
1771     , p6_a60  VARCHAR2
1772     , p6_a61  NUMBER
1773     , p6_a62  NUMBER
1774     , p6_a63  NUMBER
1775     , p6_a64  NUMBER
1776     , p6_a65  NUMBER
1777     , p6_a66  NUMBER
1778     , p6_a67  DATE
1779     , p6_a68  VARCHAR2
1780     , p6_a69  NUMBER
1781     , p6_a70  NUMBER
1782     , p6_a71  VARCHAR2
1783     , p6_a72  NUMBER
1784     , p6_a73  NUMBER
1785     , p6_a74  DATE
1786     , p6_a75  VARCHAR2
1787     , p6_a76  NUMBER
1788     , p6_a77  VARCHAR2
1789     , p6_a78  NUMBER
1790     , p6_a79  VARCHAR2
1791     , p6_a80  DATE
1792     , p6_a81  VARCHAR2
1793     , p6_a82  VARCHAR2
1794     , p6_a83  DATE
1795     , p6_a84  NUMBER
1796     , p6_a85  DATE
1797     , p6_a86  NUMBER
1798     , p6_a87  DATE
1799     , p6_a88  NUMBER
1800     , p6_a89  NUMBER
1801     , p6_a90  NUMBER
1802     , p6_a91  NUMBER
1803     , p6_a92  VARCHAR2
1804     , p6_a93  VARCHAR2
1805     , p6_a94  VARCHAR2
1806     , p6_a95  VARCHAR2
1807     , p6_a96  VARCHAR2
1808     , p6_a97  VARCHAR2
1809     , p6_a98  VARCHAR2
1810     , p6_a99  VARCHAR2
1811     , p6_a100  VARCHAR2
1812     , p6_a101  VARCHAR2
1813     , p6_a102  VARCHAR2
1814     , p6_a103  VARCHAR2
1815     , p6_a104  VARCHAR2
1816     , p6_a105  VARCHAR2
1817     , p6_a106  VARCHAR2
1818     , p6_a107  VARCHAR2
1819     , p6_a108  VARCHAR2
1820     , p6_a109  VARCHAR2
1821     , p6_a110  VARCHAR2
1822     , p6_a111  VARCHAR2
1823     , p6_a112  VARCHAR2
1824     , p6_a113  VARCHAR2
1825     , p6_a114  VARCHAR2
1826     , p6_a115  VARCHAR2
1827     , p6_a116  VARCHAR2
1828     , p6_a117  VARCHAR2
1829     , p6_a118  VARCHAR2
1830     , p6_a119  VARCHAR2
1831     , p6_a120  VARCHAR2
1832     , p6_a121  VARCHAR2
1833     , p6_a122  VARCHAR2
1834     , p6_a123  VARCHAR2
1835     , p6_a124  VARCHAR2
1836     , p6_a125  NUMBER
1837     , p6_a126  NUMBER
1838     , p6_a127  VARCHAR2
1839     , p6_a128  NUMBER
1840     , p6_a129  VARCHAR2
1841     , p6_a130  VARCHAR2
1842     , p6_a131  NUMBER
1843     , p6_a132  NUMBER
1844     , p6_a133  NUMBER
1845     , p6_a134  VARCHAR2
1846     , p6_a135  NUMBER
1847     , p6_a136  NUMBER
1848     , p6_a137  VARCHAR2
1849     , p6_a138  VARCHAR2
1850     , p6_a139  VARCHAR2
1851     , p6_a140  VARCHAR2
1852   )
1853 
1854   as
1855     ddp_claim ozf_claim_pvt.claim_rec_type;
1856     ddindx binary_integer; indx binary_integer;
1857   begin
1858 
1859     -- copy data to the local IN or IN-OUT args, if any
1860 
1861 
1862 
1863 
1864 
1865 
1866     ddp_claim.claim_id := p6_a0;
1867     ddp_claim.object_version_number := p6_a1;
1868     ddp_claim.last_update_date := rosetta_g_miss_date_in_map(p6_a2);
1869     ddp_claim.last_updated_by := p6_a3;
1870     ddp_claim.creation_date := rosetta_g_miss_date_in_map(p6_a4);
1871     ddp_claim.created_by := p6_a5;
1872     ddp_claim.last_update_login := p6_a6;
1873     ddp_claim.request_id := p6_a7;
1874     ddp_claim.program_application_id := p6_a8;
1875     ddp_claim.program_update_date := rosetta_g_miss_date_in_map(p6_a9);
1876     ddp_claim.program_id := p6_a10;
1877     ddp_claim.created_from := p6_a11;
1878     ddp_claim.batch_id := p6_a12;
1879     ddp_claim.claim_number := p6_a13;
1880     ddp_claim.claim_type_id := p6_a14;
1881     ddp_claim.claim_class := p6_a15;
1882     ddp_claim.claim_date := rosetta_g_miss_date_in_map(p6_a16);
1883     ddp_claim.due_date := rosetta_g_miss_date_in_map(p6_a17);
1884     ddp_claim.owner_id := p6_a18;
1885     ddp_claim.history_event := p6_a19;
1886     ddp_claim.history_event_date := rosetta_g_miss_date_in_map(p6_a20);
1887     ddp_claim.history_event_description := p6_a21;
1888     ddp_claim.split_from_claim_id := p6_a22;
1889     ddp_claim.duplicate_claim_id := p6_a23;
1890     ddp_claim.split_date := rosetta_g_miss_date_in_map(p6_a24);
1891     ddp_claim.root_claim_id := p6_a25;
1892     ddp_claim.amount := p6_a26;
1893     ddp_claim.amount_adjusted := p6_a27;
1894     ddp_claim.amount_remaining := p6_a28;
1895     ddp_claim.amount_settled := p6_a29;
1896     ddp_claim.acctd_amount := p6_a30;
1897     ddp_claim.acctd_amount_remaining := p6_a31;
1898     ddp_claim.acctd_amount_adjusted := p6_a32;
1899     ddp_claim.acctd_amount_settled := p6_a33;
1900     ddp_claim.tax_amount := p6_a34;
1901     ddp_claim.tax_code := p6_a35;
1902     ddp_claim.tax_calculation_flag := p6_a36;
1903     ddp_claim.currency_code := p6_a37;
1904     ddp_claim.exchange_rate_type := p6_a38;
1905     ddp_claim.exchange_rate_date := rosetta_g_miss_date_in_map(p6_a39);
1906     ddp_claim.exchange_rate := p6_a40;
1907     ddp_claim.set_of_books_id := p6_a41;
1908     ddp_claim.original_claim_date := rosetta_g_miss_date_in_map(p6_a42);
1909     ddp_claim.source_object_id := p6_a43;
1910     ddp_claim.source_object_class := p6_a44;
1911     ddp_claim.source_object_type_id := p6_a45;
1912     ddp_claim.source_object_number := p6_a46;
1913     ddp_claim.cust_account_id := p6_a47;
1914     ddp_claim.cust_billto_acct_site_id := p6_a48;
1915     ddp_claim.cust_shipto_acct_site_id := p6_a49;
1916     ddp_claim.location_id := p6_a50;
1917     ddp_claim.pay_related_account_flag := p6_a51;
1918     ddp_claim.related_cust_account_id := p6_a52;
1919     ddp_claim.related_site_use_id := p6_a53;
1920     ddp_claim.relationship_type := p6_a54;
1921     ddp_claim.vendor_id := p6_a55;
1922     ddp_claim.vendor_site_id := p6_a56;
1923     ddp_claim.reason_type := p6_a57;
1924     ddp_claim.reason_code_id := p6_a58;
1925     ddp_claim.task_template_group_id := p6_a59;
1926     ddp_claim.status_code := p6_a60;
1927     ddp_claim.user_status_id := p6_a61;
1928     ddp_claim.sales_rep_id := p6_a62;
1929     ddp_claim.collector_id := p6_a63;
1930     ddp_claim.contact_id := p6_a64;
1931     ddp_claim.broker_id := p6_a65;
1932     ddp_claim.territory_id := p6_a66;
1933     ddp_claim.customer_ref_date := rosetta_g_miss_date_in_map(p6_a67);
1934     ddp_claim.customer_ref_number := p6_a68;
1935     ddp_claim.assigned_to := p6_a69;
1936     ddp_claim.receipt_id := p6_a70;
1937     ddp_claim.receipt_number := p6_a71;
1938     ddp_claim.doc_sequence_id := p6_a72;
1939     ddp_claim.doc_sequence_value := p6_a73;
1940     ddp_claim.gl_date := rosetta_g_miss_date_in_map(p6_a74);
1941     ddp_claim.payment_method := p6_a75;
1942     ddp_claim.voucher_id := p6_a76;
1943     ddp_claim.voucher_number := p6_a77;
1944     ddp_claim.payment_reference_id := p6_a78;
1945     ddp_claim.payment_reference_number := p6_a79;
1946     ddp_claim.payment_reference_date := rosetta_g_miss_date_in_map(p6_a80);
1947     ddp_claim.payment_status := p6_a81;
1948     ddp_claim.approved_flag := p6_a82;
1949     ddp_claim.approved_date := rosetta_g_miss_date_in_map(p6_a83);
1950     ddp_claim.approved_by := p6_a84;
1951     ddp_claim.settled_date := rosetta_g_miss_date_in_map(p6_a85);
1952     ddp_claim.settled_by := p6_a86;
1953     ddp_claim.effective_date := rosetta_g_miss_date_in_map(p6_a87);
1954     ddp_claim.custom_setup_id := p6_a88;
1955     ddp_claim.task_id := p6_a89;
1956     ddp_claim.country_id := p6_a90;
1957     ddp_claim.order_type_id := p6_a91;
1958     ddp_claim.comments := p6_a92;
1959     ddp_claim.attribute_category := p6_a93;
1960     ddp_claim.attribute1 := p6_a94;
1961     ddp_claim.attribute2 := p6_a95;
1962     ddp_claim.attribute3 := p6_a96;
1963     ddp_claim.attribute4 := p6_a97;
1964     ddp_claim.attribute5 := p6_a98;
1965     ddp_claim.attribute6 := p6_a99;
1966     ddp_claim.attribute7 := p6_a100;
1967     ddp_claim.attribute8 := p6_a101;
1968     ddp_claim.attribute9 := p6_a102;
1969     ddp_claim.attribute10 := p6_a103;
1970     ddp_claim.attribute11 := p6_a104;
1971     ddp_claim.attribute12 := p6_a105;
1972     ddp_claim.attribute13 := p6_a106;
1973     ddp_claim.attribute14 := p6_a107;
1974     ddp_claim.attribute15 := p6_a108;
1975     ddp_claim.deduction_attribute_category := p6_a109;
1976     ddp_claim.deduction_attribute1 := p6_a110;
1977     ddp_claim.deduction_attribute2 := p6_a111;
1978     ddp_claim.deduction_attribute3 := p6_a112;
1979     ddp_claim.deduction_attribute4 := p6_a113;
1980     ddp_claim.deduction_attribute5 := p6_a114;
1981     ddp_claim.deduction_attribute6 := p6_a115;
1982     ddp_claim.deduction_attribute7 := p6_a116;
1983     ddp_claim.deduction_attribute8 := p6_a117;
1984     ddp_claim.deduction_attribute9 := p6_a118;
1985     ddp_claim.deduction_attribute10 := p6_a119;
1986     ddp_claim.deduction_attribute11 := p6_a120;
1987     ddp_claim.deduction_attribute12 := p6_a121;
1988     ddp_claim.deduction_attribute13 := p6_a122;
1989     ddp_claim.deduction_attribute14 := p6_a123;
1990     ddp_claim.deduction_attribute15 := p6_a124;
1991     ddp_claim.org_id := p6_a125;
1992     ddp_claim.legal_entity_id := p6_a126;
1993     ddp_claim.write_off_flag := p6_a127;
1994     ddp_claim.write_off_threshold_amount := p6_a128;
1995     ddp_claim.under_write_off_threshold := p6_a129;
1996     ddp_claim.customer_reason := p6_a130;
1997     ddp_claim.ship_to_cust_account_id := p6_a131;
1998     ddp_claim.amount_applied := p6_a132;
1999     ddp_claim.applied_receipt_id := p6_a133;
2000     ddp_claim.applied_receipt_number := p6_a134;
2001     ddp_claim.wo_rec_trx_id := p6_a135;
2002     ddp_claim.group_claim_id := p6_a136;
2003     ddp_claim.appr_wf_item_key := p6_a137;
2004     ddp_claim.cstl_wf_item_key := p6_a138;
2005     ddp_claim.batch_type := p6_a139;
2006     ddp_claim.tax_action := p6_a140;
2007 
2008     -- here's the delegated call to the old PL/SQL routine
2009     ozf_claim_pvt.validate_claim(p_api_version,
2010       p_init_msg_list,
2011       p_validation_level,
2012       x_return_status,
2013       x_msg_count,
2014       x_msg_data,
2015       ddp_claim);
2016 
2017     -- copy data back from the local variables to OUT or IN-OUT args, if any
2018 
2019 
2020 
2021 
2022 
2023 
2024   end;
2025 
2026   procedure check_claim_common_element(p_api_version  NUMBER
2027     , p_init_msg_list  VARCHAR2
2028     , p_validation_level  NUMBER
2029     , x_return_status out nocopy  VARCHAR2
2030     , x_msg_count out nocopy  NUMBER
2031     , x_msg_data out nocopy  VARCHAR2
2032     , p6_a0  NUMBER
2033     , p6_a1  NUMBER
2034     , p6_a2  DATE
2035     , p6_a3  NUMBER
2036     , p6_a4  DATE
2037     , p6_a5  NUMBER
2038     , p6_a6  NUMBER
2039     , p6_a7  NUMBER
2040     , p6_a8  NUMBER
2041     , p6_a9  DATE
2042     , p6_a10  NUMBER
2043     , p6_a11  VARCHAR2
2044     , p6_a12  NUMBER
2045     , p6_a13  VARCHAR2
2046     , p6_a14  NUMBER
2047     , p6_a15  VARCHAR2
2048     , p6_a16  DATE
2049     , p6_a17  DATE
2050     , p6_a18  NUMBER
2051     , p6_a19  VARCHAR2
2052     , p6_a20  DATE
2053     , p6_a21  VARCHAR2
2054     , p6_a22  NUMBER
2055     , p6_a23  NUMBER
2056     , p6_a24  DATE
2057     , p6_a25  NUMBER
2058     , p6_a26  NUMBER
2059     , p6_a27  NUMBER
2060     , p6_a28  NUMBER
2061     , p6_a29  NUMBER
2062     , p6_a30  NUMBER
2063     , p6_a31  NUMBER
2064     , p6_a32  NUMBER
2065     , p6_a33  NUMBER
2066     , p6_a34  NUMBER
2067     , p6_a35  VARCHAR2
2068     , p6_a36  VARCHAR2
2069     , p6_a37  VARCHAR2
2070     , p6_a38  VARCHAR2
2071     , p6_a39  DATE
2072     , p6_a40  NUMBER
2073     , p6_a41  NUMBER
2074     , p6_a42  DATE
2075     , p6_a43  NUMBER
2076     , p6_a44  VARCHAR2
2077     , p6_a45  NUMBER
2078     , p6_a46  VARCHAR2
2079     , p6_a47  NUMBER
2080     , p6_a48  NUMBER
2081     , p6_a49  NUMBER
2082     , p6_a50  NUMBER
2083     , p6_a51  VARCHAR2
2084     , p6_a52  NUMBER
2085     , p6_a53  NUMBER
2086     , p6_a54  VARCHAR2
2087     , p6_a55  NUMBER
2088     , p6_a56  NUMBER
2089     , p6_a57  VARCHAR2
2090     , p6_a58  NUMBER
2091     , p6_a59  NUMBER
2092     , p6_a60  VARCHAR2
2093     , p6_a61  NUMBER
2094     , p6_a62  NUMBER
2095     , p6_a63  NUMBER
2096     , p6_a64  NUMBER
2097     , p6_a65  NUMBER
2098     , p6_a66  NUMBER
2099     , p6_a67  DATE
2100     , p6_a68  VARCHAR2
2101     , p6_a69  NUMBER
2102     , p6_a70  NUMBER
2103     , p6_a71  VARCHAR2
2104     , p6_a72  NUMBER
2105     , p6_a73  NUMBER
2106     , p6_a74  DATE
2107     , p6_a75  VARCHAR2
2108     , p6_a76  NUMBER
2109     , p6_a77  VARCHAR2
2110     , p6_a78  NUMBER
2111     , p6_a79  VARCHAR2
2112     , p6_a80  DATE
2113     , p6_a81  VARCHAR2
2114     , p6_a82  VARCHAR2
2115     , p6_a83  DATE
2116     , p6_a84  NUMBER
2117     , p6_a85  DATE
2118     , p6_a86  NUMBER
2119     , p6_a87  DATE
2120     , p6_a88  NUMBER
2121     , p6_a89  NUMBER
2122     , p6_a90  NUMBER
2123     , p6_a91  NUMBER
2124     , p6_a92  VARCHAR2
2125     , p6_a93  VARCHAR2
2126     , p6_a94  VARCHAR2
2127     , p6_a95  VARCHAR2
2128     , p6_a96  VARCHAR2
2129     , p6_a97  VARCHAR2
2130     , p6_a98  VARCHAR2
2131     , p6_a99  VARCHAR2
2132     , p6_a100  VARCHAR2
2133     , p6_a101  VARCHAR2
2134     , p6_a102  VARCHAR2
2135     , p6_a103  VARCHAR2
2136     , p6_a104  VARCHAR2
2137     , p6_a105  VARCHAR2
2138     , p6_a106  VARCHAR2
2139     , p6_a107  VARCHAR2
2140     , p6_a108  VARCHAR2
2141     , p6_a109  VARCHAR2
2142     , p6_a110  VARCHAR2
2143     , p6_a111  VARCHAR2
2144     , p6_a112  VARCHAR2
2145     , p6_a113  VARCHAR2
2146     , p6_a114  VARCHAR2
2147     , p6_a115  VARCHAR2
2148     , p6_a116  VARCHAR2
2149     , p6_a117  VARCHAR2
2150     , p6_a118  VARCHAR2
2151     , p6_a119  VARCHAR2
2152     , p6_a120  VARCHAR2
2153     , p6_a121  VARCHAR2
2154     , p6_a122  VARCHAR2
2155     , p6_a123  VARCHAR2
2156     , p6_a124  VARCHAR2
2157     , p6_a125  NUMBER
2158     , p6_a126  NUMBER
2159     , p6_a127  VARCHAR2
2160     , p6_a128  NUMBER
2161     , p6_a129  VARCHAR2
2162     , p6_a130  VARCHAR2
2163     , p6_a131  NUMBER
2164     , p6_a132  NUMBER
2165     , p6_a133  NUMBER
2166     , p6_a134  VARCHAR2
2167     , p6_a135  NUMBER
2168     , p6_a136  NUMBER
2169     , p6_a137  VARCHAR2
2170     , p6_a138  VARCHAR2
2171     , p6_a139  VARCHAR2
2172     , p6_a140  VARCHAR2
2173     , p7_a0 out nocopy  NUMBER
2174     , p7_a1 out nocopy  NUMBER
2175     , p7_a2 out nocopy  DATE
2176     , p7_a3 out nocopy  NUMBER
2177     , p7_a4 out nocopy  DATE
2178     , p7_a5 out nocopy  NUMBER
2179     , p7_a6 out nocopy  NUMBER
2180     , p7_a7 out nocopy  NUMBER
2181     , p7_a8 out nocopy  NUMBER
2182     , p7_a9 out nocopy  DATE
2183     , p7_a10 out nocopy  NUMBER
2184     , p7_a11 out nocopy  VARCHAR2
2185     , p7_a12 out nocopy  NUMBER
2186     , p7_a13 out nocopy  VARCHAR2
2187     , p7_a14 out nocopy  NUMBER
2188     , p7_a15 out nocopy  VARCHAR2
2189     , p7_a16 out nocopy  DATE
2190     , p7_a17 out nocopy  DATE
2191     , p7_a18 out nocopy  NUMBER
2192     , p7_a19 out nocopy  VARCHAR2
2193     , p7_a20 out nocopy  DATE
2194     , p7_a21 out nocopy  VARCHAR2
2195     , p7_a22 out nocopy  NUMBER
2196     , p7_a23 out nocopy  NUMBER
2197     , p7_a24 out nocopy  DATE
2198     , p7_a25 out nocopy  NUMBER
2199     , p7_a26 out nocopy  NUMBER
2200     , p7_a27 out nocopy  NUMBER
2201     , p7_a28 out nocopy  NUMBER
2202     , p7_a29 out nocopy  NUMBER
2203     , p7_a30 out nocopy  NUMBER
2204     , p7_a31 out nocopy  NUMBER
2205     , p7_a32 out nocopy  NUMBER
2206     , p7_a33 out nocopy  NUMBER
2207     , p7_a34 out nocopy  NUMBER
2208     , p7_a35 out nocopy  VARCHAR2
2209     , p7_a36 out nocopy  VARCHAR2
2210     , p7_a37 out nocopy  VARCHAR2
2211     , p7_a38 out nocopy  VARCHAR2
2212     , p7_a39 out nocopy  DATE
2213     , p7_a40 out nocopy  NUMBER
2214     , p7_a41 out nocopy  NUMBER
2215     , p7_a42 out nocopy  DATE
2216     , p7_a43 out nocopy  NUMBER
2217     , p7_a44 out nocopy  VARCHAR2
2218     , p7_a45 out nocopy  NUMBER
2219     , p7_a46 out nocopy  VARCHAR2
2220     , p7_a47 out nocopy  NUMBER
2221     , p7_a48 out nocopy  NUMBER
2222     , p7_a49 out nocopy  NUMBER
2223     , p7_a50 out nocopy  NUMBER
2224     , p7_a51 out nocopy  VARCHAR2
2225     , p7_a52 out nocopy  NUMBER
2226     , p7_a53 out nocopy  NUMBER
2227     , p7_a54 out nocopy  VARCHAR2
2228     , p7_a55 out nocopy  NUMBER
2229     , p7_a56 out nocopy  NUMBER
2230     , p7_a57 out nocopy  VARCHAR2
2231     , p7_a58 out nocopy  NUMBER
2232     , p7_a59 out nocopy  NUMBER
2233     , p7_a60 out nocopy  VARCHAR2
2234     , p7_a61 out nocopy  NUMBER
2235     , p7_a62 out nocopy  NUMBER
2236     , p7_a63 out nocopy  NUMBER
2237     , p7_a64 out nocopy  NUMBER
2238     , p7_a65 out nocopy  NUMBER
2239     , p7_a66 out nocopy  NUMBER
2240     , p7_a67 out nocopy  DATE
2241     , p7_a68 out nocopy  VARCHAR2
2242     , p7_a69 out nocopy  NUMBER
2243     , p7_a70 out nocopy  NUMBER
2244     , p7_a71 out nocopy  VARCHAR2
2245     , p7_a72 out nocopy  NUMBER
2246     , p7_a73 out nocopy  NUMBER
2247     , p7_a74 out nocopy  DATE
2248     , p7_a75 out nocopy  VARCHAR2
2249     , p7_a76 out nocopy  NUMBER
2250     , p7_a77 out nocopy  VARCHAR2
2251     , p7_a78 out nocopy  NUMBER
2252     , p7_a79 out nocopy  VARCHAR2
2253     , p7_a80 out nocopy  DATE
2254     , p7_a81 out nocopy  VARCHAR2
2255     , p7_a82 out nocopy  VARCHAR2
2256     , p7_a83 out nocopy  DATE
2257     , p7_a84 out nocopy  NUMBER
2258     , p7_a85 out nocopy  DATE
2259     , p7_a86 out nocopy  NUMBER
2260     , p7_a87 out nocopy  DATE
2261     , p7_a88 out nocopy  NUMBER
2262     , p7_a89 out nocopy  NUMBER
2263     , p7_a90 out nocopy  NUMBER
2264     , p7_a91 out nocopy  NUMBER
2265     , p7_a92 out nocopy  VARCHAR2
2266     , p7_a93 out nocopy  VARCHAR2
2267     , p7_a94 out nocopy  VARCHAR2
2268     , p7_a95 out nocopy  VARCHAR2
2269     , p7_a96 out nocopy  VARCHAR2
2270     , p7_a97 out nocopy  VARCHAR2
2271     , p7_a98 out nocopy  VARCHAR2
2272     , p7_a99 out nocopy  VARCHAR2
2273     , p7_a100 out nocopy  VARCHAR2
2274     , p7_a101 out nocopy  VARCHAR2
2275     , p7_a102 out nocopy  VARCHAR2
2276     , p7_a103 out nocopy  VARCHAR2
2277     , p7_a104 out nocopy  VARCHAR2
2278     , p7_a105 out nocopy  VARCHAR2
2279     , p7_a106 out nocopy  VARCHAR2
2280     , p7_a107 out nocopy  VARCHAR2
2281     , p7_a108 out nocopy  VARCHAR2
2282     , p7_a109 out nocopy  VARCHAR2
2283     , p7_a110 out nocopy  VARCHAR2
2284     , p7_a111 out nocopy  VARCHAR2
2285     , p7_a112 out nocopy  VARCHAR2
2286     , p7_a113 out nocopy  VARCHAR2
2287     , p7_a114 out nocopy  VARCHAR2
2288     , p7_a115 out nocopy  VARCHAR2
2289     , p7_a116 out nocopy  VARCHAR2
2290     , p7_a117 out nocopy  VARCHAR2
2291     , p7_a118 out nocopy  VARCHAR2
2292     , p7_a119 out nocopy  VARCHAR2
2293     , p7_a120 out nocopy  VARCHAR2
2294     , p7_a121 out nocopy  VARCHAR2
2295     , p7_a122 out nocopy  VARCHAR2
2296     , p7_a123 out nocopy  VARCHAR2
2297     , p7_a124 out nocopy  VARCHAR2
2298     , p7_a125 out nocopy  NUMBER
2299     , p7_a126 out nocopy  NUMBER
2300     , p7_a127 out nocopy  VARCHAR2
2301     , p7_a128 out nocopy  NUMBER
2302     , p7_a129 out nocopy  VARCHAR2
2303     , p7_a130 out nocopy  VARCHAR2
2304     , p7_a131 out nocopy  NUMBER
2305     , p7_a132 out nocopy  NUMBER
2306     , p7_a133 out nocopy  NUMBER
2307     , p7_a134 out nocopy  VARCHAR2
2308     , p7_a135 out nocopy  NUMBER
2309     , p7_a136 out nocopy  NUMBER
2310     , p7_a137 out nocopy  VARCHAR2
2311     , p7_a138 out nocopy  VARCHAR2
2312     , p7_a139 out nocopy  VARCHAR2
2313     , p7_a140 out nocopy  VARCHAR2
2314     , p_mode  VARCHAR2
2315   )
2316 
2317   as
2318     ddp_claim ozf_claim_pvt.claim_rec_type;
2319     ddx_claim ozf_claim_pvt.claim_rec_type;
2320     ddindx binary_integer; indx binary_integer;
2321   begin
2322 
2323     -- copy data to the local IN or IN-OUT args, if any
2324 
2325 
2326 
2327 
2328 
2329 
2330     ddp_claim.claim_id := p6_a0;
2331     ddp_claim.object_version_number := p6_a1;
2332     ddp_claim.last_update_date := rosetta_g_miss_date_in_map(p6_a2);
2333     ddp_claim.last_updated_by := p6_a3;
2334     ddp_claim.creation_date := rosetta_g_miss_date_in_map(p6_a4);
2335     ddp_claim.created_by := p6_a5;
2336     ddp_claim.last_update_login := p6_a6;
2337     ddp_claim.request_id := p6_a7;
2338     ddp_claim.program_application_id := p6_a8;
2339     ddp_claim.program_update_date := rosetta_g_miss_date_in_map(p6_a9);
2340     ddp_claim.program_id := p6_a10;
2341     ddp_claim.created_from := p6_a11;
2342     ddp_claim.batch_id := p6_a12;
2343     ddp_claim.claim_number := p6_a13;
2344     ddp_claim.claim_type_id := p6_a14;
2345     ddp_claim.claim_class := p6_a15;
2346     ddp_claim.claim_date := rosetta_g_miss_date_in_map(p6_a16);
2347     ddp_claim.due_date := rosetta_g_miss_date_in_map(p6_a17);
2348     ddp_claim.owner_id := p6_a18;
2349     ddp_claim.history_event := p6_a19;
2350     ddp_claim.history_event_date := rosetta_g_miss_date_in_map(p6_a20);
2351     ddp_claim.history_event_description := p6_a21;
2352     ddp_claim.split_from_claim_id := p6_a22;
2353     ddp_claim.duplicate_claim_id := p6_a23;
2354     ddp_claim.split_date := rosetta_g_miss_date_in_map(p6_a24);
2355     ddp_claim.root_claim_id := p6_a25;
2356     ddp_claim.amount := p6_a26;
2357     ddp_claim.amount_adjusted := p6_a27;
2358     ddp_claim.amount_remaining := p6_a28;
2359     ddp_claim.amount_settled := p6_a29;
2360     ddp_claim.acctd_amount := p6_a30;
2361     ddp_claim.acctd_amount_remaining := p6_a31;
2362     ddp_claim.acctd_amount_adjusted := p6_a32;
2363     ddp_claim.acctd_amount_settled := p6_a33;
2364     ddp_claim.tax_amount := p6_a34;
2365     ddp_claim.tax_code := p6_a35;
2366     ddp_claim.tax_calculation_flag := p6_a36;
2367     ddp_claim.currency_code := p6_a37;
2368     ddp_claim.exchange_rate_type := p6_a38;
2369     ddp_claim.exchange_rate_date := rosetta_g_miss_date_in_map(p6_a39);
2370     ddp_claim.exchange_rate := p6_a40;
2371     ddp_claim.set_of_books_id := p6_a41;
2372     ddp_claim.original_claim_date := rosetta_g_miss_date_in_map(p6_a42);
2373     ddp_claim.source_object_id := p6_a43;
2374     ddp_claim.source_object_class := p6_a44;
2375     ddp_claim.source_object_type_id := p6_a45;
2376     ddp_claim.source_object_number := p6_a46;
2377     ddp_claim.cust_account_id := p6_a47;
2378     ddp_claim.cust_billto_acct_site_id := p6_a48;
2379     ddp_claim.cust_shipto_acct_site_id := p6_a49;
2380     ddp_claim.location_id := p6_a50;
2381     ddp_claim.pay_related_account_flag := p6_a51;
2382     ddp_claim.related_cust_account_id := p6_a52;
2383     ddp_claim.related_site_use_id := p6_a53;
2384     ddp_claim.relationship_type := p6_a54;
2385     ddp_claim.vendor_id := p6_a55;
2386     ddp_claim.vendor_site_id := p6_a56;
2387     ddp_claim.reason_type := p6_a57;
2388     ddp_claim.reason_code_id := p6_a58;
2389     ddp_claim.task_template_group_id := p6_a59;
2390     ddp_claim.status_code := p6_a60;
2391     ddp_claim.user_status_id := p6_a61;
2392     ddp_claim.sales_rep_id := p6_a62;
2393     ddp_claim.collector_id := p6_a63;
2394     ddp_claim.contact_id := p6_a64;
2395     ddp_claim.broker_id := p6_a65;
2396     ddp_claim.territory_id := p6_a66;
2397     ddp_claim.customer_ref_date := rosetta_g_miss_date_in_map(p6_a67);
2398     ddp_claim.customer_ref_number := p6_a68;
2399     ddp_claim.assigned_to := p6_a69;
2400     ddp_claim.receipt_id := p6_a70;
2401     ddp_claim.receipt_number := p6_a71;
2402     ddp_claim.doc_sequence_id := p6_a72;
2403     ddp_claim.doc_sequence_value := p6_a73;
2404     ddp_claim.gl_date := rosetta_g_miss_date_in_map(p6_a74);
2405     ddp_claim.payment_method := p6_a75;
2406     ddp_claim.voucher_id := p6_a76;
2407     ddp_claim.voucher_number := p6_a77;
2408     ddp_claim.payment_reference_id := p6_a78;
2409     ddp_claim.payment_reference_number := p6_a79;
2410     ddp_claim.payment_reference_date := rosetta_g_miss_date_in_map(p6_a80);
2411     ddp_claim.payment_status := p6_a81;
2412     ddp_claim.approved_flag := p6_a82;
2413     ddp_claim.approved_date := rosetta_g_miss_date_in_map(p6_a83);
2414     ddp_claim.approved_by := p6_a84;
2415     ddp_claim.settled_date := rosetta_g_miss_date_in_map(p6_a85);
2416     ddp_claim.settled_by := p6_a86;
2417     ddp_claim.effective_date := rosetta_g_miss_date_in_map(p6_a87);
2418     ddp_claim.custom_setup_id := p6_a88;
2419     ddp_claim.task_id := p6_a89;
2420     ddp_claim.country_id := p6_a90;
2421     ddp_claim.order_type_id := p6_a91;
2422     ddp_claim.comments := p6_a92;
2423     ddp_claim.attribute_category := p6_a93;
2424     ddp_claim.attribute1 := p6_a94;
2425     ddp_claim.attribute2 := p6_a95;
2426     ddp_claim.attribute3 := p6_a96;
2427     ddp_claim.attribute4 := p6_a97;
2428     ddp_claim.attribute5 := p6_a98;
2429     ddp_claim.attribute6 := p6_a99;
2430     ddp_claim.attribute7 := p6_a100;
2431     ddp_claim.attribute8 := p6_a101;
2432     ddp_claim.attribute9 := p6_a102;
2433     ddp_claim.attribute10 := p6_a103;
2434     ddp_claim.attribute11 := p6_a104;
2435     ddp_claim.attribute12 := p6_a105;
2436     ddp_claim.attribute13 := p6_a106;
2437     ddp_claim.attribute14 := p6_a107;
2438     ddp_claim.attribute15 := p6_a108;
2439     ddp_claim.deduction_attribute_category := p6_a109;
2440     ddp_claim.deduction_attribute1 := p6_a110;
2441     ddp_claim.deduction_attribute2 := p6_a111;
2442     ddp_claim.deduction_attribute3 := p6_a112;
2443     ddp_claim.deduction_attribute4 := p6_a113;
2444     ddp_claim.deduction_attribute5 := p6_a114;
2445     ddp_claim.deduction_attribute6 := p6_a115;
2446     ddp_claim.deduction_attribute7 := p6_a116;
2447     ddp_claim.deduction_attribute8 := p6_a117;
2448     ddp_claim.deduction_attribute9 := p6_a118;
2449     ddp_claim.deduction_attribute10 := p6_a119;
2450     ddp_claim.deduction_attribute11 := p6_a120;
2451     ddp_claim.deduction_attribute12 := p6_a121;
2452     ddp_claim.deduction_attribute13 := p6_a122;
2453     ddp_claim.deduction_attribute14 := p6_a123;
2454     ddp_claim.deduction_attribute15 := p6_a124;
2455     ddp_claim.org_id := p6_a125;
2456     ddp_claim.legal_entity_id := p6_a126;
2457     ddp_claim.write_off_flag := p6_a127;
2458     ddp_claim.write_off_threshold_amount := p6_a128;
2459     ddp_claim.under_write_off_threshold := p6_a129;
2460     ddp_claim.customer_reason := p6_a130;
2461     ddp_claim.ship_to_cust_account_id := p6_a131;
2462     ddp_claim.amount_applied := p6_a132;
2463     ddp_claim.applied_receipt_id := p6_a133;
2464     ddp_claim.applied_receipt_number := p6_a134;
2465     ddp_claim.wo_rec_trx_id := p6_a135;
2466     ddp_claim.group_claim_id := p6_a136;
2467     ddp_claim.appr_wf_item_key := p6_a137;
2468     ddp_claim.cstl_wf_item_key := p6_a138;
2469     ddp_claim.batch_type := p6_a139;
2470     ddp_claim.tax_action := p6_a140;
2471 
2472 
2473 
2474     -- here's the delegated call to the old PL/SQL routine
2475     ozf_claim_pvt.check_claim_common_element(p_api_version,
2476       p_init_msg_list,
2477       p_validation_level,
2478       x_return_status,
2479       x_msg_count,
2480       x_msg_data,
2481       ddp_claim,
2482       ddx_claim,
2483       p_mode);
2484 
2485     -- copy data back from the local variables to OUT or IN-OUT args, if any
2486 
2487 
2488 
2489 
2490 
2491 
2492 
2493     p7_a0 := ddx_claim.claim_id;
2494     p7_a1 := ddx_claim.object_version_number;
2495     p7_a2 := ddx_claim.last_update_date;
2496     p7_a3 := ddx_claim.last_updated_by;
2497     p7_a4 := ddx_claim.creation_date;
2498     p7_a5 := ddx_claim.created_by;
2499     p7_a6 := ddx_claim.last_update_login;
2500     p7_a7 := ddx_claim.request_id;
2501     p7_a8 := ddx_claim.program_application_id;
2502     p7_a9 := ddx_claim.program_update_date;
2503     p7_a10 := ddx_claim.program_id;
2504     p7_a11 := ddx_claim.created_from;
2505     p7_a12 := ddx_claim.batch_id;
2506     p7_a13 := ddx_claim.claim_number;
2507     p7_a14 := ddx_claim.claim_type_id;
2508     p7_a15 := ddx_claim.claim_class;
2509     p7_a16 := ddx_claim.claim_date;
2510     p7_a17 := ddx_claim.due_date;
2511     p7_a18 := ddx_claim.owner_id;
2512     p7_a19 := ddx_claim.history_event;
2513     p7_a20 := ddx_claim.history_event_date;
2514     p7_a21 := ddx_claim.history_event_description;
2515     p7_a22 := ddx_claim.split_from_claim_id;
2516     p7_a23 := ddx_claim.duplicate_claim_id;
2517     p7_a24 := ddx_claim.split_date;
2518     p7_a25 := ddx_claim.root_claim_id;
2519     p7_a26 := ddx_claim.amount;
2520     p7_a27 := ddx_claim.amount_adjusted;
2521     p7_a28 := ddx_claim.amount_remaining;
2522     p7_a29 := ddx_claim.amount_settled;
2523     p7_a30 := ddx_claim.acctd_amount;
2524     p7_a31 := ddx_claim.acctd_amount_remaining;
2525     p7_a32 := ddx_claim.acctd_amount_adjusted;
2526     p7_a33 := ddx_claim.acctd_amount_settled;
2527     p7_a34 := ddx_claim.tax_amount;
2528     p7_a35 := ddx_claim.tax_code;
2529     p7_a36 := ddx_claim.tax_calculation_flag;
2530     p7_a37 := ddx_claim.currency_code;
2531     p7_a38 := ddx_claim.exchange_rate_type;
2532     p7_a39 := ddx_claim.exchange_rate_date;
2533     p7_a40 := ddx_claim.exchange_rate;
2534     p7_a41 := ddx_claim.set_of_books_id;
2535     p7_a42 := ddx_claim.original_claim_date;
2536     p7_a43 := ddx_claim.source_object_id;
2537     p7_a44 := ddx_claim.source_object_class;
2538     p7_a45 := ddx_claim.source_object_type_id;
2539     p7_a46 := ddx_claim.source_object_number;
2540     p7_a47 := ddx_claim.cust_account_id;
2541     p7_a48 := ddx_claim.cust_billto_acct_site_id;
2542     p7_a49 := ddx_claim.cust_shipto_acct_site_id;
2543     p7_a50 := ddx_claim.location_id;
2544     p7_a51 := ddx_claim.pay_related_account_flag;
2545     p7_a52 := ddx_claim.related_cust_account_id;
2546     p7_a53 := ddx_claim.related_site_use_id;
2547     p7_a54 := ddx_claim.relationship_type;
2548     p7_a55 := ddx_claim.vendor_id;
2549     p7_a56 := ddx_claim.vendor_site_id;
2550     p7_a57 := ddx_claim.reason_type;
2551     p7_a58 := ddx_claim.reason_code_id;
2552     p7_a59 := ddx_claim.task_template_group_id;
2553     p7_a60 := ddx_claim.status_code;
2554     p7_a61 := ddx_claim.user_status_id;
2555     p7_a62 := ddx_claim.sales_rep_id;
2556     p7_a63 := ddx_claim.collector_id;
2557     p7_a64 := ddx_claim.contact_id;
2558     p7_a65 := ddx_claim.broker_id;
2559     p7_a66 := ddx_claim.territory_id;
2560     p7_a67 := ddx_claim.customer_ref_date;
2561     p7_a68 := ddx_claim.customer_ref_number;
2562     p7_a69 := ddx_claim.assigned_to;
2563     p7_a70 := ddx_claim.receipt_id;
2564     p7_a71 := ddx_claim.receipt_number;
2565     p7_a72 := ddx_claim.doc_sequence_id;
2566     p7_a73 := ddx_claim.doc_sequence_value;
2567     p7_a74 := ddx_claim.gl_date;
2568     p7_a75 := ddx_claim.payment_method;
2569     p7_a76 := ddx_claim.voucher_id;
2570     p7_a77 := ddx_claim.voucher_number;
2571     p7_a78 := ddx_claim.payment_reference_id;
2572     p7_a79 := ddx_claim.payment_reference_number;
2573     p7_a80 := ddx_claim.payment_reference_date;
2574     p7_a81 := ddx_claim.payment_status;
2575     p7_a82 := ddx_claim.approved_flag;
2576     p7_a83 := ddx_claim.approved_date;
2577     p7_a84 := ddx_claim.approved_by;
2578     p7_a85 := ddx_claim.settled_date;
2579     p7_a86 := ddx_claim.settled_by;
2580     p7_a87 := ddx_claim.effective_date;
2581     p7_a88 := ddx_claim.custom_setup_id;
2582     p7_a89 := ddx_claim.task_id;
2583     p7_a90 := ddx_claim.country_id;
2584     p7_a91 := ddx_claim.order_type_id;
2585     p7_a92 := ddx_claim.comments;
2586     p7_a93 := ddx_claim.attribute_category;
2587     p7_a94 := ddx_claim.attribute1;
2588     p7_a95 := ddx_claim.attribute2;
2589     p7_a96 := ddx_claim.attribute3;
2590     p7_a97 := ddx_claim.attribute4;
2591     p7_a98 := ddx_claim.attribute5;
2592     p7_a99 := ddx_claim.attribute6;
2593     p7_a100 := ddx_claim.attribute7;
2594     p7_a101 := ddx_claim.attribute8;
2595     p7_a102 := ddx_claim.attribute9;
2596     p7_a103 := ddx_claim.attribute10;
2597     p7_a104 := ddx_claim.attribute11;
2598     p7_a105 := ddx_claim.attribute12;
2599     p7_a106 := ddx_claim.attribute13;
2600     p7_a107 := ddx_claim.attribute14;
2601     p7_a108 := ddx_claim.attribute15;
2602     p7_a109 := ddx_claim.deduction_attribute_category;
2603     p7_a110 := ddx_claim.deduction_attribute1;
2604     p7_a111 := ddx_claim.deduction_attribute2;
2605     p7_a112 := ddx_claim.deduction_attribute3;
2606     p7_a113 := ddx_claim.deduction_attribute4;
2607     p7_a114 := ddx_claim.deduction_attribute5;
2608     p7_a115 := ddx_claim.deduction_attribute6;
2609     p7_a116 := ddx_claim.deduction_attribute7;
2610     p7_a117 := ddx_claim.deduction_attribute8;
2611     p7_a118 := ddx_claim.deduction_attribute9;
2612     p7_a119 := ddx_claim.deduction_attribute10;
2613     p7_a120 := ddx_claim.deduction_attribute11;
2614     p7_a121 := ddx_claim.deduction_attribute12;
2615     p7_a122 := ddx_claim.deduction_attribute13;
2616     p7_a123 := ddx_claim.deduction_attribute14;
2617     p7_a124 := ddx_claim.deduction_attribute15;
2618     p7_a125 := ddx_claim.org_id;
2619     p7_a126 := ddx_claim.legal_entity_id;
2620     p7_a127 := ddx_claim.write_off_flag;
2621     p7_a128 := ddx_claim.write_off_threshold_amount;
2622     p7_a129 := ddx_claim.under_write_off_threshold;
2623     p7_a130 := ddx_claim.customer_reason;
2624     p7_a131 := ddx_claim.ship_to_cust_account_id;
2625     p7_a132 := ddx_claim.amount_applied;
2626     p7_a133 := ddx_claim.applied_receipt_id;
2627     p7_a134 := ddx_claim.applied_receipt_number;
2628     p7_a135 := ddx_claim.wo_rec_trx_id;
2629     p7_a136 := ddx_claim.group_claim_id;
2630     p7_a137 := ddx_claim.appr_wf_item_key;
2631     p7_a138 := ddx_claim.cstl_wf_item_key;
2632     p7_a139 := ddx_claim.batch_type;
2633     p7_a140 := ddx_claim.tax_action;
2634 
2635   end;
2636 
2637   procedure check_claim_items(p_validation_mode  VARCHAR2
2638     , p1_a0  NUMBER
2639     , p1_a1  NUMBER
2640     , p1_a2  DATE
2641     , p1_a3  NUMBER
2642     , p1_a4  DATE
2643     , p1_a5  NUMBER
2644     , p1_a6  NUMBER
2645     , p1_a7  NUMBER
2646     , p1_a8  NUMBER
2647     , p1_a9  DATE
2648     , p1_a10  NUMBER
2649     , p1_a11  VARCHAR2
2650     , p1_a12  NUMBER
2651     , p1_a13  VARCHAR2
2652     , p1_a14  NUMBER
2653     , p1_a15  VARCHAR2
2654     , p1_a16  DATE
2655     , p1_a17  DATE
2656     , p1_a18  NUMBER
2657     , p1_a19  VARCHAR2
2658     , p1_a20  DATE
2659     , p1_a21  VARCHAR2
2660     , p1_a22  NUMBER
2661     , p1_a23  NUMBER
2662     , p1_a24  DATE
2663     , p1_a25  NUMBER
2664     , p1_a26  NUMBER
2665     , p1_a27  NUMBER
2666     , p1_a28  NUMBER
2667     , p1_a29  NUMBER
2668     , p1_a30  NUMBER
2669     , p1_a31  NUMBER
2670     , p1_a32  NUMBER
2671     , p1_a33  NUMBER
2672     , p1_a34  NUMBER
2673     , p1_a35  VARCHAR2
2674     , p1_a36  VARCHAR2
2675     , p1_a37  VARCHAR2
2676     , p1_a38  VARCHAR2
2677     , p1_a39  DATE
2678     , p1_a40  NUMBER
2679     , p1_a41  NUMBER
2680     , p1_a42  DATE
2681     , p1_a43  NUMBER
2682     , p1_a44  VARCHAR2
2683     , p1_a45  NUMBER
2684     , p1_a46  VARCHAR2
2685     , p1_a47  NUMBER
2686     , p1_a48  NUMBER
2687     , p1_a49  NUMBER
2688     , p1_a50  NUMBER
2689     , p1_a51  VARCHAR2
2690     , p1_a52  NUMBER
2691     , p1_a53  NUMBER
2692     , p1_a54  VARCHAR2
2693     , p1_a55  NUMBER
2694     , p1_a56  NUMBER
2695     , p1_a57  VARCHAR2
2696     , p1_a58  NUMBER
2697     , p1_a59  NUMBER
2698     , p1_a60  VARCHAR2
2699     , p1_a61  NUMBER
2700     , p1_a62  NUMBER
2701     , p1_a63  NUMBER
2702     , p1_a64  NUMBER
2703     , p1_a65  NUMBER
2704     , p1_a66  NUMBER
2705     , p1_a67  DATE
2706     , p1_a68  VARCHAR2
2707     , p1_a69  NUMBER
2708     , p1_a70  NUMBER
2709     , p1_a71  VARCHAR2
2710     , p1_a72  NUMBER
2711     , p1_a73  NUMBER
2712     , p1_a74  DATE
2713     , p1_a75  VARCHAR2
2714     , p1_a76  NUMBER
2715     , p1_a77  VARCHAR2
2716     , p1_a78  NUMBER
2717     , p1_a79  VARCHAR2
2718     , p1_a80  DATE
2719     , p1_a81  VARCHAR2
2720     , p1_a82  VARCHAR2
2721     , p1_a83  DATE
2722     , p1_a84  NUMBER
2723     , p1_a85  DATE
2724     , p1_a86  NUMBER
2725     , p1_a87  DATE
2726     , p1_a88  NUMBER
2727     , p1_a89  NUMBER
2728     , p1_a90  NUMBER
2729     , p1_a91  NUMBER
2730     , p1_a92  VARCHAR2
2731     , p1_a93  VARCHAR2
2732     , p1_a94  VARCHAR2
2733     , p1_a95  VARCHAR2
2734     , p1_a96  VARCHAR2
2735     , p1_a97  VARCHAR2
2736     , p1_a98  VARCHAR2
2737     , p1_a99  VARCHAR2
2738     , p1_a100  VARCHAR2
2739     , p1_a101  VARCHAR2
2740     , p1_a102  VARCHAR2
2741     , p1_a103  VARCHAR2
2742     , p1_a104  VARCHAR2
2743     , p1_a105  VARCHAR2
2744     , p1_a106  VARCHAR2
2745     , p1_a107  VARCHAR2
2746     , p1_a108  VARCHAR2
2747     , p1_a109  VARCHAR2
2748     , p1_a110  VARCHAR2
2749     , p1_a111  VARCHAR2
2750     , p1_a112  VARCHAR2
2751     , p1_a113  VARCHAR2
2752     , p1_a114  VARCHAR2
2753     , p1_a115  VARCHAR2
2754     , p1_a116  VARCHAR2
2755     , p1_a117  VARCHAR2
2756     , p1_a118  VARCHAR2
2757     , p1_a119  VARCHAR2
2758     , p1_a120  VARCHAR2
2759     , p1_a121  VARCHAR2
2760     , p1_a122  VARCHAR2
2761     , p1_a123  VARCHAR2
2762     , p1_a124  VARCHAR2
2763     , p1_a125  NUMBER
2764     , p1_a126  NUMBER
2765     , p1_a127  VARCHAR2
2766     , p1_a128  NUMBER
2767     , p1_a129  VARCHAR2
2768     , p1_a130  VARCHAR2
2769     , p1_a131  NUMBER
2770     , p1_a132  NUMBER
2771     , p1_a133  NUMBER
2772     , p1_a134  VARCHAR2
2773     , p1_a135  NUMBER
2774     , p1_a136  NUMBER
2775     , p1_a137  VARCHAR2
2776     , p1_a138  VARCHAR2
2777     , p1_a139  VARCHAR2
2778     , p1_a140  VARCHAR2
2779     , x_return_status out nocopy  VARCHAR2
2780   )
2781 
2782   as
2783     ddp_claim_rec ozf_claim_pvt.claim_rec_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     ddp_claim_rec.claim_id := p1_a0;
2790     ddp_claim_rec.object_version_number := p1_a1;
2791     ddp_claim_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a2);
2792     ddp_claim_rec.last_updated_by := p1_a3;
2793     ddp_claim_rec.creation_date := rosetta_g_miss_date_in_map(p1_a4);
2794     ddp_claim_rec.created_by := p1_a5;
2795     ddp_claim_rec.last_update_login := p1_a6;
2796     ddp_claim_rec.request_id := p1_a7;
2797     ddp_claim_rec.program_application_id := p1_a8;
2798     ddp_claim_rec.program_update_date := rosetta_g_miss_date_in_map(p1_a9);
2799     ddp_claim_rec.program_id := p1_a10;
2800     ddp_claim_rec.created_from := p1_a11;
2801     ddp_claim_rec.batch_id := p1_a12;
2802     ddp_claim_rec.claim_number := p1_a13;
2803     ddp_claim_rec.claim_type_id := p1_a14;
2804     ddp_claim_rec.claim_class := p1_a15;
2805     ddp_claim_rec.claim_date := rosetta_g_miss_date_in_map(p1_a16);
2806     ddp_claim_rec.due_date := rosetta_g_miss_date_in_map(p1_a17);
2807     ddp_claim_rec.owner_id := p1_a18;
2808     ddp_claim_rec.history_event := p1_a19;
2809     ddp_claim_rec.history_event_date := rosetta_g_miss_date_in_map(p1_a20);
2810     ddp_claim_rec.history_event_description := p1_a21;
2811     ddp_claim_rec.split_from_claim_id := p1_a22;
2812     ddp_claim_rec.duplicate_claim_id := p1_a23;
2813     ddp_claim_rec.split_date := rosetta_g_miss_date_in_map(p1_a24);
2814     ddp_claim_rec.root_claim_id := p1_a25;
2815     ddp_claim_rec.amount := p1_a26;
2816     ddp_claim_rec.amount_adjusted := p1_a27;
2817     ddp_claim_rec.amount_remaining := p1_a28;
2818     ddp_claim_rec.amount_settled := p1_a29;
2819     ddp_claim_rec.acctd_amount := p1_a30;
2820     ddp_claim_rec.acctd_amount_remaining := p1_a31;
2821     ddp_claim_rec.acctd_amount_adjusted := p1_a32;
2822     ddp_claim_rec.acctd_amount_settled := p1_a33;
2823     ddp_claim_rec.tax_amount := p1_a34;
2824     ddp_claim_rec.tax_code := p1_a35;
2825     ddp_claim_rec.tax_calculation_flag := p1_a36;
2826     ddp_claim_rec.currency_code := p1_a37;
2827     ddp_claim_rec.exchange_rate_type := p1_a38;
2828     ddp_claim_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p1_a39);
2829     ddp_claim_rec.exchange_rate := p1_a40;
2830     ddp_claim_rec.set_of_books_id := p1_a41;
2831     ddp_claim_rec.original_claim_date := rosetta_g_miss_date_in_map(p1_a42);
2832     ddp_claim_rec.source_object_id := p1_a43;
2833     ddp_claim_rec.source_object_class := p1_a44;
2834     ddp_claim_rec.source_object_type_id := p1_a45;
2835     ddp_claim_rec.source_object_number := p1_a46;
2836     ddp_claim_rec.cust_account_id := p1_a47;
2837     ddp_claim_rec.cust_billto_acct_site_id := p1_a48;
2838     ddp_claim_rec.cust_shipto_acct_site_id := p1_a49;
2839     ddp_claim_rec.location_id := p1_a50;
2840     ddp_claim_rec.pay_related_account_flag := p1_a51;
2841     ddp_claim_rec.related_cust_account_id := p1_a52;
2842     ddp_claim_rec.related_site_use_id := p1_a53;
2843     ddp_claim_rec.relationship_type := p1_a54;
2844     ddp_claim_rec.vendor_id := p1_a55;
2845     ddp_claim_rec.vendor_site_id := p1_a56;
2846     ddp_claim_rec.reason_type := p1_a57;
2847     ddp_claim_rec.reason_code_id := p1_a58;
2848     ddp_claim_rec.task_template_group_id := p1_a59;
2849     ddp_claim_rec.status_code := p1_a60;
2850     ddp_claim_rec.user_status_id := p1_a61;
2851     ddp_claim_rec.sales_rep_id := p1_a62;
2852     ddp_claim_rec.collector_id := p1_a63;
2853     ddp_claim_rec.contact_id := p1_a64;
2854     ddp_claim_rec.broker_id := p1_a65;
2855     ddp_claim_rec.territory_id := p1_a66;
2856     ddp_claim_rec.customer_ref_date := rosetta_g_miss_date_in_map(p1_a67);
2857     ddp_claim_rec.customer_ref_number := p1_a68;
2858     ddp_claim_rec.assigned_to := p1_a69;
2859     ddp_claim_rec.receipt_id := p1_a70;
2860     ddp_claim_rec.receipt_number := p1_a71;
2861     ddp_claim_rec.doc_sequence_id := p1_a72;
2862     ddp_claim_rec.doc_sequence_value := p1_a73;
2863     ddp_claim_rec.gl_date := rosetta_g_miss_date_in_map(p1_a74);
2864     ddp_claim_rec.payment_method := p1_a75;
2865     ddp_claim_rec.voucher_id := p1_a76;
2866     ddp_claim_rec.voucher_number := p1_a77;
2867     ddp_claim_rec.payment_reference_id := p1_a78;
2868     ddp_claim_rec.payment_reference_number := p1_a79;
2869     ddp_claim_rec.payment_reference_date := rosetta_g_miss_date_in_map(p1_a80);
2870     ddp_claim_rec.payment_status := p1_a81;
2871     ddp_claim_rec.approved_flag := p1_a82;
2872     ddp_claim_rec.approved_date := rosetta_g_miss_date_in_map(p1_a83);
2873     ddp_claim_rec.approved_by := p1_a84;
2874     ddp_claim_rec.settled_date := rosetta_g_miss_date_in_map(p1_a85);
2875     ddp_claim_rec.settled_by := p1_a86;
2876     ddp_claim_rec.effective_date := rosetta_g_miss_date_in_map(p1_a87);
2877     ddp_claim_rec.custom_setup_id := p1_a88;
2878     ddp_claim_rec.task_id := p1_a89;
2879     ddp_claim_rec.country_id := p1_a90;
2880     ddp_claim_rec.order_type_id := p1_a91;
2881     ddp_claim_rec.comments := p1_a92;
2882     ddp_claim_rec.attribute_category := p1_a93;
2883     ddp_claim_rec.attribute1 := p1_a94;
2884     ddp_claim_rec.attribute2 := p1_a95;
2885     ddp_claim_rec.attribute3 := p1_a96;
2886     ddp_claim_rec.attribute4 := p1_a97;
2887     ddp_claim_rec.attribute5 := p1_a98;
2888     ddp_claim_rec.attribute6 := p1_a99;
2889     ddp_claim_rec.attribute7 := p1_a100;
2890     ddp_claim_rec.attribute8 := p1_a101;
2891     ddp_claim_rec.attribute9 := p1_a102;
2892     ddp_claim_rec.attribute10 := p1_a103;
2893     ddp_claim_rec.attribute11 := p1_a104;
2894     ddp_claim_rec.attribute12 := p1_a105;
2895     ddp_claim_rec.attribute13 := p1_a106;
2896     ddp_claim_rec.attribute14 := p1_a107;
2897     ddp_claim_rec.attribute15 := p1_a108;
2898     ddp_claim_rec.deduction_attribute_category := p1_a109;
2899     ddp_claim_rec.deduction_attribute1 := p1_a110;
2900     ddp_claim_rec.deduction_attribute2 := p1_a111;
2901     ddp_claim_rec.deduction_attribute3 := p1_a112;
2902     ddp_claim_rec.deduction_attribute4 := p1_a113;
2903     ddp_claim_rec.deduction_attribute5 := p1_a114;
2904     ddp_claim_rec.deduction_attribute6 := p1_a115;
2905     ddp_claim_rec.deduction_attribute7 := p1_a116;
2906     ddp_claim_rec.deduction_attribute8 := p1_a117;
2907     ddp_claim_rec.deduction_attribute9 := p1_a118;
2908     ddp_claim_rec.deduction_attribute10 := p1_a119;
2909     ddp_claim_rec.deduction_attribute11 := p1_a120;
2910     ddp_claim_rec.deduction_attribute12 := p1_a121;
2911     ddp_claim_rec.deduction_attribute13 := p1_a122;
2912     ddp_claim_rec.deduction_attribute14 := p1_a123;
2913     ddp_claim_rec.deduction_attribute15 := p1_a124;
2914     ddp_claim_rec.org_id := p1_a125;
2915     ddp_claim_rec.legal_entity_id := p1_a126;
2916     ddp_claim_rec.write_off_flag := p1_a127;
2917     ddp_claim_rec.write_off_threshold_amount := p1_a128;
2918     ddp_claim_rec.under_write_off_threshold := p1_a129;
2919     ddp_claim_rec.customer_reason := p1_a130;
2920     ddp_claim_rec.ship_to_cust_account_id := p1_a131;
2921     ddp_claim_rec.amount_applied := p1_a132;
2922     ddp_claim_rec.applied_receipt_id := p1_a133;
2923     ddp_claim_rec.applied_receipt_number := p1_a134;
2924     ddp_claim_rec.wo_rec_trx_id := p1_a135;
2925     ddp_claim_rec.group_claim_id := p1_a136;
2926     ddp_claim_rec.appr_wf_item_key := p1_a137;
2927     ddp_claim_rec.cstl_wf_item_key := p1_a138;
2928     ddp_claim_rec.batch_type := p1_a139;
2929     ddp_claim_rec.tax_action := p1_a140;
2930 
2931 
2932     -- here's the delegated call to the old PL/SQL routine
2933     ozf_claim_pvt.check_claim_items(p_validation_mode,
2934       ddp_claim_rec,
2935       x_return_status);
2936 
2937     -- copy data back from the local variables to OUT or IN-OUT args, if any
2938 
2939 
2940   end;
2941 
2942   procedure complete_claim_rec(p0_a0  NUMBER
2943     , p0_a1  NUMBER
2944     , p0_a2  DATE
2945     , p0_a3  NUMBER
2946     , p0_a4  DATE
2947     , p0_a5  NUMBER
2948     , p0_a6  NUMBER
2949     , p0_a7  NUMBER
2950     , p0_a8  NUMBER
2951     , p0_a9  DATE
2952     , p0_a10  NUMBER
2953     , p0_a11  VARCHAR2
2954     , p0_a12  NUMBER
2955     , p0_a13  VARCHAR2
2956     , p0_a14  NUMBER
2957     , p0_a15  VARCHAR2
2958     , p0_a16  DATE
2959     , p0_a17  DATE
2960     , p0_a18  NUMBER
2961     , p0_a19  VARCHAR2
2962     , p0_a20  DATE
2963     , p0_a21  VARCHAR2
2964     , p0_a22  NUMBER
2965     , p0_a23  NUMBER
2966     , p0_a24  DATE
2967     , p0_a25  NUMBER
2968     , p0_a26  NUMBER
2969     , p0_a27  NUMBER
2970     , p0_a28  NUMBER
2971     , p0_a29  NUMBER
2972     , p0_a30  NUMBER
2973     , p0_a31  NUMBER
2974     , p0_a32  NUMBER
2975     , p0_a33  NUMBER
2976     , p0_a34  NUMBER
2977     , p0_a35  VARCHAR2
2978     , p0_a36  VARCHAR2
2979     , p0_a37  VARCHAR2
2980     , p0_a38  VARCHAR2
2981     , p0_a39  DATE
2982     , p0_a40  NUMBER
2983     , p0_a41  NUMBER
2984     , p0_a42  DATE
2985     , p0_a43  NUMBER
2986     , p0_a44  VARCHAR2
2987     , p0_a45  NUMBER
2988     , p0_a46  VARCHAR2
2989     , p0_a47  NUMBER
2990     , p0_a48  NUMBER
2991     , p0_a49  NUMBER
2992     , p0_a50  NUMBER
2993     , p0_a51  VARCHAR2
2994     , p0_a52  NUMBER
2995     , p0_a53  NUMBER
2996     , p0_a54  VARCHAR2
2997     , p0_a55  NUMBER
2998     , p0_a56  NUMBER
2999     , p0_a57  VARCHAR2
3000     , p0_a58  NUMBER
3001     , p0_a59  NUMBER
3002     , p0_a60  VARCHAR2
3003     , p0_a61  NUMBER
3004     , p0_a62  NUMBER
3005     , p0_a63  NUMBER
3006     , p0_a64  NUMBER
3007     , p0_a65  NUMBER
3008     , p0_a66  NUMBER
3009     , p0_a67  DATE
3010     , p0_a68  VARCHAR2
3011     , p0_a69  NUMBER
3012     , p0_a70  NUMBER
3013     , p0_a71  VARCHAR2
3014     , p0_a72  NUMBER
3015     , p0_a73  NUMBER
3016     , p0_a74  DATE
3017     , p0_a75  VARCHAR2
3018     , p0_a76  NUMBER
3019     , p0_a77  VARCHAR2
3020     , p0_a78  NUMBER
3021     , p0_a79  VARCHAR2
3022     , p0_a80  DATE
3023     , p0_a81  VARCHAR2
3024     , p0_a82  VARCHAR2
3025     , p0_a83  DATE
3026     , p0_a84  NUMBER
3027     , p0_a85  DATE
3028     , p0_a86  NUMBER
3029     , p0_a87  DATE
3030     , p0_a88  NUMBER
3031     , p0_a89  NUMBER
3032     , p0_a90  NUMBER
3033     , p0_a91  NUMBER
3034     , p0_a92  VARCHAR2
3035     , p0_a93  VARCHAR2
3036     , p0_a94  VARCHAR2
3037     , p0_a95  VARCHAR2
3038     , p0_a96  VARCHAR2
3039     , p0_a97  VARCHAR2
3040     , p0_a98  VARCHAR2
3041     , p0_a99  VARCHAR2
3042     , p0_a100  VARCHAR2
3043     , p0_a101  VARCHAR2
3044     , p0_a102  VARCHAR2
3045     , p0_a103  VARCHAR2
3046     , p0_a104  VARCHAR2
3047     , p0_a105  VARCHAR2
3048     , p0_a106  VARCHAR2
3049     , p0_a107  VARCHAR2
3050     , p0_a108  VARCHAR2
3051     , p0_a109  VARCHAR2
3052     , p0_a110  VARCHAR2
3053     , p0_a111  VARCHAR2
3054     , p0_a112  VARCHAR2
3055     , p0_a113  VARCHAR2
3056     , p0_a114  VARCHAR2
3057     , p0_a115  VARCHAR2
3058     , p0_a116  VARCHAR2
3059     , p0_a117  VARCHAR2
3060     , p0_a118  VARCHAR2
3061     , p0_a119  VARCHAR2
3062     , p0_a120  VARCHAR2
3063     , p0_a121  VARCHAR2
3064     , p0_a122  VARCHAR2
3065     , p0_a123  VARCHAR2
3066     , p0_a124  VARCHAR2
3067     , p0_a125  NUMBER
3068     , p0_a126  NUMBER
3069     , p0_a127  VARCHAR2
3070     , p0_a128  NUMBER
3071     , p0_a129  VARCHAR2
3072     , p0_a130  VARCHAR2
3073     , p0_a131  NUMBER
3074     , p0_a132  NUMBER
3075     , p0_a133  NUMBER
3076     , p0_a134  VARCHAR2
3077     , p0_a135  NUMBER
3078     , p0_a136  NUMBER
3079     , p0_a137  VARCHAR2
3080     , p0_a138  VARCHAR2
3081     , p0_a139  VARCHAR2
3082     , p0_a140  VARCHAR2
3083     , p1_a0 out nocopy  NUMBER
3084     , p1_a1 out nocopy  NUMBER
3085     , p1_a2 out nocopy  DATE
3086     , p1_a3 out nocopy  NUMBER
3087     , p1_a4 out nocopy  DATE
3088     , p1_a5 out nocopy  NUMBER
3089     , p1_a6 out nocopy  NUMBER
3090     , p1_a7 out nocopy  NUMBER
3091     , p1_a8 out nocopy  NUMBER
3092     , p1_a9 out nocopy  DATE
3093     , p1_a10 out nocopy  NUMBER
3094     , p1_a11 out nocopy  VARCHAR2
3095     , p1_a12 out nocopy  NUMBER
3096     , p1_a13 out nocopy  VARCHAR2
3097     , p1_a14 out nocopy  NUMBER
3098     , p1_a15 out nocopy  VARCHAR2
3099     , p1_a16 out nocopy  DATE
3100     , p1_a17 out nocopy  DATE
3101     , p1_a18 out nocopy  NUMBER
3102     , p1_a19 out nocopy  VARCHAR2
3103     , p1_a20 out nocopy  DATE
3104     , p1_a21 out nocopy  VARCHAR2
3105     , p1_a22 out nocopy  NUMBER
3106     , p1_a23 out nocopy  NUMBER
3107     , p1_a24 out nocopy  DATE
3108     , p1_a25 out nocopy  NUMBER
3109     , p1_a26 out nocopy  NUMBER
3110     , p1_a27 out nocopy  NUMBER
3111     , p1_a28 out nocopy  NUMBER
3112     , p1_a29 out nocopy  NUMBER
3113     , p1_a30 out nocopy  NUMBER
3114     , p1_a31 out nocopy  NUMBER
3115     , p1_a32 out nocopy  NUMBER
3116     , p1_a33 out nocopy  NUMBER
3117     , p1_a34 out nocopy  NUMBER
3118     , p1_a35 out nocopy  VARCHAR2
3119     , p1_a36 out nocopy  VARCHAR2
3120     , p1_a37 out nocopy  VARCHAR2
3121     , p1_a38 out nocopy  VARCHAR2
3122     , p1_a39 out nocopy  DATE
3123     , p1_a40 out nocopy  NUMBER
3124     , p1_a41 out nocopy  NUMBER
3125     , p1_a42 out nocopy  DATE
3126     , p1_a43 out nocopy  NUMBER
3127     , p1_a44 out nocopy  VARCHAR2
3128     , p1_a45 out nocopy  NUMBER
3129     , p1_a46 out nocopy  VARCHAR2
3130     , p1_a47 out nocopy  NUMBER
3131     , p1_a48 out nocopy  NUMBER
3132     , p1_a49 out nocopy  NUMBER
3133     , p1_a50 out nocopy  NUMBER
3134     , p1_a51 out nocopy  VARCHAR2
3135     , p1_a52 out nocopy  NUMBER
3136     , p1_a53 out nocopy  NUMBER
3137     , p1_a54 out nocopy  VARCHAR2
3138     , p1_a55 out nocopy  NUMBER
3139     , p1_a56 out nocopy  NUMBER
3140     , p1_a57 out nocopy  VARCHAR2
3141     , p1_a58 out nocopy  NUMBER
3142     , p1_a59 out nocopy  NUMBER
3143     , p1_a60 out nocopy  VARCHAR2
3144     , p1_a61 out nocopy  NUMBER
3145     , p1_a62 out nocopy  NUMBER
3146     , p1_a63 out nocopy  NUMBER
3147     , p1_a64 out nocopy  NUMBER
3148     , p1_a65 out nocopy  NUMBER
3149     , p1_a66 out nocopy  NUMBER
3150     , p1_a67 out nocopy  DATE
3151     , p1_a68 out nocopy  VARCHAR2
3152     , p1_a69 out nocopy  NUMBER
3153     , p1_a70 out nocopy  NUMBER
3154     , p1_a71 out nocopy  VARCHAR2
3155     , p1_a72 out nocopy  NUMBER
3156     , p1_a73 out nocopy  NUMBER
3157     , p1_a74 out nocopy  DATE
3158     , p1_a75 out nocopy  VARCHAR2
3159     , p1_a76 out nocopy  NUMBER
3160     , p1_a77 out nocopy  VARCHAR2
3161     , p1_a78 out nocopy  NUMBER
3162     , p1_a79 out nocopy  VARCHAR2
3163     , p1_a80 out nocopy  DATE
3164     , p1_a81 out nocopy  VARCHAR2
3165     , p1_a82 out nocopy  VARCHAR2
3166     , p1_a83 out nocopy  DATE
3167     , p1_a84 out nocopy  NUMBER
3168     , p1_a85 out nocopy  DATE
3169     , p1_a86 out nocopy  NUMBER
3170     , p1_a87 out nocopy  DATE
3171     , p1_a88 out nocopy  NUMBER
3172     , p1_a89 out nocopy  NUMBER
3173     , p1_a90 out nocopy  NUMBER
3174     , p1_a91 out nocopy  NUMBER
3175     , p1_a92 out nocopy  VARCHAR2
3176     , p1_a93 out nocopy  VARCHAR2
3177     , p1_a94 out nocopy  VARCHAR2
3178     , p1_a95 out nocopy  VARCHAR2
3179     , p1_a96 out nocopy  VARCHAR2
3180     , p1_a97 out nocopy  VARCHAR2
3181     , p1_a98 out nocopy  VARCHAR2
3182     , p1_a99 out nocopy  VARCHAR2
3183     , p1_a100 out nocopy  VARCHAR2
3184     , p1_a101 out nocopy  VARCHAR2
3185     , p1_a102 out nocopy  VARCHAR2
3186     , p1_a103 out nocopy  VARCHAR2
3187     , p1_a104 out nocopy  VARCHAR2
3188     , p1_a105 out nocopy  VARCHAR2
3189     , p1_a106 out nocopy  VARCHAR2
3190     , p1_a107 out nocopy  VARCHAR2
3191     , p1_a108 out nocopy  VARCHAR2
3192     , p1_a109 out nocopy  VARCHAR2
3193     , p1_a110 out nocopy  VARCHAR2
3194     , p1_a111 out nocopy  VARCHAR2
3195     , p1_a112 out nocopy  VARCHAR2
3196     , p1_a113 out nocopy  VARCHAR2
3197     , p1_a114 out nocopy  VARCHAR2
3198     , p1_a115 out nocopy  VARCHAR2
3199     , p1_a116 out nocopy  VARCHAR2
3200     , p1_a117 out nocopy  VARCHAR2
3201     , p1_a118 out nocopy  VARCHAR2
3202     , p1_a119 out nocopy  VARCHAR2
3203     , p1_a120 out nocopy  VARCHAR2
3204     , p1_a121 out nocopy  VARCHAR2
3205     , p1_a122 out nocopy  VARCHAR2
3206     , p1_a123 out nocopy  VARCHAR2
3207     , p1_a124 out nocopy  VARCHAR2
3208     , p1_a125 out nocopy  NUMBER
3209     , p1_a126 out nocopy  NUMBER
3210     , p1_a127 out nocopy  VARCHAR2
3211     , p1_a128 out nocopy  NUMBER
3212     , p1_a129 out nocopy  VARCHAR2
3213     , p1_a130 out nocopy  VARCHAR2
3214     , p1_a131 out nocopy  NUMBER
3215     , p1_a132 out nocopy  NUMBER
3216     , p1_a133 out nocopy  NUMBER
3217     , p1_a134 out nocopy  VARCHAR2
3218     , p1_a135 out nocopy  NUMBER
3219     , p1_a136 out nocopy  NUMBER
3220     , p1_a137 out nocopy  VARCHAR2
3221     , p1_a138 out nocopy  VARCHAR2
3222     , p1_a139 out nocopy  VARCHAR2
3223     , p1_a140 out nocopy  VARCHAR2
3224     , x_return_status out nocopy  VARCHAR2
3225   )
3226 
3227   as
3228     ddp_claim_rec ozf_claim_pvt.claim_rec_type;
3229     ddx_complete_rec ozf_claim_pvt.claim_rec_type;
3230     ddindx binary_integer; indx binary_integer;
3231   begin
3232 
3233     -- copy data to the local IN or IN-OUT args, if any
3234     ddp_claim_rec.claim_id := p0_a0;
3235     ddp_claim_rec.object_version_number := p0_a1;
3236     ddp_claim_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a2);
3237     ddp_claim_rec.last_updated_by := p0_a3;
3238     ddp_claim_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
3239     ddp_claim_rec.created_by := p0_a5;
3240     ddp_claim_rec.last_update_login := p0_a6;
3241     ddp_claim_rec.request_id := p0_a7;
3242     ddp_claim_rec.program_application_id := p0_a8;
3243     ddp_claim_rec.program_update_date := rosetta_g_miss_date_in_map(p0_a9);
3244     ddp_claim_rec.program_id := p0_a10;
3245     ddp_claim_rec.created_from := p0_a11;
3246     ddp_claim_rec.batch_id := p0_a12;
3247     ddp_claim_rec.claim_number := p0_a13;
3248     ddp_claim_rec.claim_type_id := p0_a14;
3249     ddp_claim_rec.claim_class := p0_a15;
3250     ddp_claim_rec.claim_date := rosetta_g_miss_date_in_map(p0_a16);
3251     ddp_claim_rec.due_date := rosetta_g_miss_date_in_map(p0_a17);
3252     ddp_claim_rec.owner_id := p0_a18;
3253     ddp_claim_rec.history_event := p0_a19;
3254     ddp_claim_rec.history_event_date := rosetta_g_miss_date_in_map(p0_a20);
3255     ddp_claim_rec.history_event_description := p0_a21;
3256     ddp_claim_rec.split_from_claim_id := p0_a22;
3257     ddp_claim_rec.duplicate_claim_id := p0_a23;
3258     ddp_claim_rec.split_date := rosetta_g_miss_date_in_map(p0_a24);
3259     ddp_claim_rec.root_claim_id := p0_a25;
3260     ddp_claim_rec.amount := p0_a26;
3261     ddp_claim_rec.amount_adjusted := p0_a27;
3262     ddp_claim_rec.amount_remaining := p0_a28;
3263     ddp_claim_rec.amount_settled := p0_a29;
3264     ddp_claim_rec.acctd_amount := p0_a30;
3265     ddp_claim_rec.acctd_amount_remaining := p0_a31;
3266     ddp_claim_rec.acctd_amount_adjusted := p0_a32;
3267     ddp_claim_rec.acctd_amount_settled := p0_a33;
3268     ddp_claim_rec.tax_amount := p0_a34;
3269     ddp_claim_rec.tax_code := p0_a35;
3270     ddp_claim_rec.tax_calculation_flag := p0_a36;
3271     ddp_claim_rec.currency_code := p0_a37;
3272     ddp_claim_rec.exchange_rate_type := p0_a38;
3273     ddp_claim_rec.exchange_rate_date := rosetta_g_miss_date_in_map(p0_a39);
3274     ddp_claim_rec.exchange_rate := p0_a40;
3275     ddp_claim_rec.set_of_books_id := p0_a41;
3276     ddp_claim_rec.original_claim_date := rosetta_g_miss_date_in_map(p0_a42);
3277     ddp_claim_rec.source_object_id := p0_a43;
3278     ddp_claim_rec.source_object_class := p0_a44;
3279     ddp_claim_rec.source_object_type_id := p0_a45;
3280     ddp_claim_rec.source_object_number := p0_a46;
3281     ddp_claim_rec.cust_account_id := p0_a47;
3282     ddp_claim_rec.cust_billto_acct_site_id := p0_a48;
3283     ddp_claim_rec.cust_shipto_acct_site_id := p0_a49;
3284     ddp_claim_rec.location_id := p0_a50;
3285     ddp_claim_rec.pay_related_account_flag := p0_a51;
3286     ddp_claim_rec.related_cust_account_id := p0_a52;
3287     ddp_claim_rec.related_site_use_id := p0_a53;
3288     ddp_claim_rec.relationship_type := p0_a54;
3289     ddp_claim_rec.vendor_id := p0_a55;
3290     ddp_claim_rec.vendor_site_id := p0_a56;
3291     ddp_claim_rec.reason_type := p0_a57;
3292     ddp_claim_rec.reason_code_id := p0_a58;
3293     ddp_claim_rec.task_template_group_id := p0_a59;
3294     ddp_claim_rec.status_code := p0_a60;
3295     ddp_claim_rec.user_status_id := p0_a61;
3296     ddp_claim_rec.sales_rep_id := p0_a62;
3297     ddp_claim_rec.collector_id := p0_a63;
3298     ddp_claim_rec.contact_id := p0_a64;
3299     ddp_claim_rec.broker_id := p0_a65;
3300     ddp_claim_rec.territory_id := p0_a66;
3301     ddp_claim_rec.customer_ref_date := rosetta_g_miss_date_in_map(p0_a67);
3302     ddp_claim_rec.customer_ref_number := p0_a68;
3303     ddp_claim_rec.assigned_to := p0_a69;
3304     ddp_claim_rec.receipt_id := p0_a70;
3305     ddp_claim_rec.receipt_number := p0_a71;
3306     ddp_claim_rec.doc_sequence_id := p0_a72;
3307     ddp_claim_rec.doc_sequence_value := p0_a73;
3308     ddp_claim_rec.gl_date := rosetta_g_miss_date_in_map(p0_a74);
3309     ddp_claim_rec.payment_method := p0_a75;
3310     ddp_claim_rec.voucher_id := p0_a76;
3311     ddp_claim_rec.voucher_number := p0_a77;
3312     ddp_claim_rec.payment_reference_id := p0_a78;
3313     ddp_claim_rec.payment_reference_number := p0_a79;
3314     ddp_claim_rec.payment_reference_date := rosetta_g_miss_date_in_map(p0_a80);
3315     ddp_claim_rec.payment_status := p0_a81;
3316     ddp_claim_rec.approved_flag := p0_a82;
3317     ddp_claim_rec.approved_date := rosetta_g_miss_date_in_map(p0_a83);
3318     ddp_claim_rec.approved_by := p0_a84;
3319     ddp_claim_rec.settled_date := rosetta_g_miss_date_in_map(p0_a85);
3320     ddp_claim_rec.settled_by := p0_a86;
3321     ddp_claim_rec.effective_date := rosetta_g_miss_date_in_map(p0_a87);
3322     ddp_claim_rec.custom_setup_id := p0_a88;
3323     ddp_claim_rec.task_id := p0_a89;
3324     ddp_claim_rec.country_id := p0_a90;
3325     ddp_claim_rec.order_type_id := p0_a91;
3326     ddp_claim_rec.comments := p0_a92;
3327     ddp_claim_rec.attribute_category := p0_a93;
3328     ddp_claim_rec.attribute1 := p0_a94;
3329     ddp_claim_rec.attribute2 := p0_a95;
3330     ddp_claim_rec.attribute3 := p0_a96;
3331     ddp_claim_rec.attribute4 := p0_a97;
3332     ddp_claim_rec.attribute5 := p0_a98;
3333     ddp_claim_rec.attribute6 := p0_a99;
3334     ddp_claim_rec.attribute7 := p0_a100;
3335     ddp_claim_rec.attribute8 := p0_a101;
3336     ddp_claim_rec.attribute9 := p0_a102;
3337     ddp_claim_rec.attribute10 := p0_a103;
3338     ddp_claim_rec.attribute11 := p0_a104;
3339     ddp_claim_rec.attribute12 := p0_a105;
3340     ddp_claim_rec.attribute13 := p0_a106;
3341     ddp_claim_rec.attribute14 := p0_a107;
3342     ddp_claim_rec.attribute15 := p0_a108;
3343     ddp_claim_rec.deduction_attribute_category := p0_a109;
3344     ddp_claim_rec.deduction_attribute1 := p0_a110;
3345     ddp_claim_rec.deduction_attribute2 := p0_a111;
3346     ddp_claim_rec.deduction_attribute3 := p0_a112;
3347     ddp_claim_rec.deduction_attribute4 := p0_a113;
3348     ddp_claim_rec.deduction_attribute5 := p0_a114;
3349     ddp_claim_rec.deduction_attribute6 := p0_a115;
3350     ddp_claim_rec.deduction_attribute7 := p0_a116;
3351     ddp_claim_rec.deduction_attribute8 := p0_a117;
3352     ddp_claim_rec.deduction_attribute9 := p0_a118;
3353     ddp_claim_rec.deduction_attribute10 := p0_a119;
3354     ddp_claim_rec.deduction_attribute11 := p0_a120;
3355     ddp_claim_rec.deduction_attribute12 := p0_a121;
3356     ddp_claim_rec.deduction_attribute13 := p0_a122;
3357     ddp_claim_rec.deduction_attribute14 := p0_a123;
3358     ddp_claim_rec.deduction_attribute15 := p0_a124;
3359     ddp_claim_rec.org_id := p0_a125;
3360     ddp_claim_rec.legal_entity_id := p0_a126;
3361     ddp_claim_rec.write_off_flag := p0_a127;
3362     ddp_claim_rec.write_off_threshold_amount := p0_a128;
3363     ddp_claim_rec.under_write_off_threshold := p0_a129;
3364     ddp_claim_rec.customer_reason := p0_a130;
3365     ddp_claim_rec.ship_to_cust_account_id := p0_a131;
3366     ddp_claim_rec.amount_applied := p0_a132;
3367     ddp_claim_rec.applied_receipt_id := p0_a133;
3368     ddp_claim_rec.applied_receipt_number := p0_a134;
3369     ddp_claim_rec.wo_rec_trx_id := p0_a135;
3370     ddp_claim_rec.group_claim_id := p0_a136;
3371     ddp_claim_rec.appr_wf_item_key := p0_a137;
3372     ddp_claim_rec.cstl_wf_item_key := p0_a138;
3373     ddp_claim_rec.batch_type := p0_a139;
3374     ddp_claim_rec.tax_action := p0_a140;
3375 
3376 
3377 
3378     -- here's the delegated call to the old PL/SQL routine
3379     ozf_claim_pvt.complete_claim_rec(ddp_claim_rec,
3380       ddx_complete_rec,
3381       x_return_status);
3382 
3383     -- copy data back from the local variables to OUT or IN-OUT args, if any
3384 
3385     p1_a0 := ddx_complete_rec.claim_id;
3386     p1_a1 := ddx_complete_rec.object_version_number;
3387     p1_a2 := ddx_complete_rec.last_update_date;
3388     p1_a3 := ddx_complete_rec.last_updated_by;
3389     p1_a4 := ddx_complete_rec.creation_date;
3390     p1_a5 := ddx_complete_rec.created_by;
3391     p1_a6 := ddx_complete_rec.last_update_login;
3392     p1_a7 := ddx_complete_rec.request_id;
3393     p1_a8 := ddx_complete_rec.program_application_id;
3394     p1_a9 := ddx_complete_rec.program_update_date;
3395     p1_a10 := ddx_complete_rec.program_id;
3396     p1_a11 := ddx_complete_rec.created_from;
3397     p1_a12 := ddx_complete_rec.batch_id;
3398     p1_a13 := ddx_complete_rec.claim_number;
3399     p1_a14 := ddx_complete_rec.claim_type_id;
3400     p1_a15 := ddx_complete_rec.claim_class;
3401     p1_a16 := ddx_complete_rec.claim_date;
3402     p1_a17 := ddx_complete_rec.due_date;
3403     p1_a18 := ddx_complete_rec.owner_id;
3404     p1_a19 := ddx_complete_rec.history_event;
3405     p1_a20 := ddx_complete_rec.history_event_date;
3406     p1_a21 := ddx_complete_rec.history_event_description;
3407     p1_a22 := ddx_complete_rec.split_from_claim_id;
3408     p1_a23 := ddx_complete_rec.duplicate_claim_id;
3409     p1_a24 := ddx_complete_rec.split_date;
3410     p1_a25 := ddx_complete_rec.root_claim_id;
3411     p1_a26 := ddx_complete_rec.amount;
3412     p1_a27 := ddx_complete_rec.amount_adjusted;
3413     p1_a28 := ddx_complete_rec.amount_remaining;
3414     p1_a29 := ddx_complete_rec.amount_settled;
3415     p1_a30 := ddx_complete_rec.acctd_amount;
3416     p1_a31 := ddx_complete_rec.acctd_amount_remaining;
3417     p1_a32 := ddx_complete_rec.acctd_amount_adjusted;
3418     p1_a33 := ddx_complete_rec.acctd_amount_settled;
3419     p1_a34 := ddx_complete_rec.tax_amount;
3420     p1_a35 := ddx_complete_rec.tax_code;
3421     p1_a36 := ddx_complete_rec.tax_calculation_flag;
3422     p1_a37 := ddx_complete_rec.currency_code;
3423     p1_a38 := ddx_complete_rec.exchange_rate_type;
3424     p1_a39 := ddx_complete_rec.exchange_rate_date;
3425     p1_a40 := ddx_complete_rec.exchange_rate;
3426     p1_a41 := ddx_complete_rec.set_of_books_id;
3427     p1_a42 := ddx_complete_rec.original_claim_date;
3428     p1_a43 := ddx_complete_rec.source_object_id;
3429     p1_a44 := ddx_complete_rec.source_object_class;
3430     p1_a45 := ddx_complete_rec.source_object_type_id;
3431     p1_a46 := ddx_complete_rec.source_object_number;
3432     p1_a47 := ddx_complete_rec.cust_account_id;
3433     p1_a48 := ddx_complete_rec.cust_billto_acct_site_id;
3434     p1_a49 := ddx_complete_rec.cust_shipto_acct_site_id;
3435     p1_a50 := ddx_complete_rec.location_id;
3436     p1_a51 := ddx_complete_rec.pay_related_account_flag;
3437     p1_a52 := ddx_complete_rec.related_cust_account_id;
3438     p1_a53 := ddx_complete_rec.related_site_use_id;
3439     p1_a54 := ddx_complete_rec.relationship_type;
3440     p1_a55 := ddx_complete_rec.vendor_id;
3441     p1_a56 := ddx_complete_rec.vendor_site_id;
3442     p1_a57 := ddx_complete_rec.reason_type;
3443     p1_a58 := ddx_complete_rec.reason_code_id;
3444     p1_a59 := ddx_complete_rec.task_template_group_id;
3445     p1_a60 := ddx_complete_rec.status_code;
3446     p1_a61 := ddx_complete_rec.user_status_id;
3447     p1_a62 := ddx_complete_rec.sales_rep_id;
3448     p1_a63 := ddx_complete_rec.collector_id;
3449     p1_a64 := ddx_complete_rec.contact_id;
3450     p1_a65 := ddx_complete_rec.broker_id;
3451     p1_a66 := ddx_complete_rec.territory_id;
3452     p1_a67 := ddx_complete_rec.customer_ref_date;
3453     p1_a68 := ddx_complete_rec.customer_ref_number;
3454     p1_a69 := ddx_complete_rec.assigned_to;
3455     p1_a70 := ddx_complete_rec.receipt_id;
3456     p1_a71 := ddx_complete_rec.receipt_number;
3457     p1_a72 := ddx_complete_rec.doc_sequence_id;
3458     p1_a73 := ddx_complete_rec.doc_sequence_value;
3459     p1_a74 := ddx_complete_rec.gl_date;
3460     p1_a75 := ddx_complete_rec.payment_method;
3461     p1_a76 := ddx_complete_rec.voucher_id;
3462     p1_a77 := ddx_complete_rec.voucher_number;
3463     p1_a78 := ddx_complete_rec.payment_reference_id;
3464     p1_a79 := ddx_complete_rec.payment_reference_number;
3465     p1_a80 := ddx_complete_rec.payment_reference_date;
3466     p1_a81 := ddx_complete_rec.payment_status;
3467     p1_a82 := ddx_complete_rec.approved_flag;
3468     p1_a83 := ddx_complete_rec.approved_date;
3469     p1_a84 := ddx_complete_rec.approved_by;
3470     p1_a85 := ddx_complete_rec.settled_date;
3471     p1_a86 := ddx_complete_rec.settled_by;
3472     p1_a87 := ddx_complete_rec.effective_date;
3473     p1_a88 := ddx_complete_rec.custom_setup_id;
3474     p1_a89 := ddx_complete_rec.task_id;
3475     p1_a90 := ddx_complete_rec.country_id;
3476     p1_a91 := ddx_complete_rec.order_type_id;
3477     p1_a92 := ddx_complete_rec.comments;
3478     p1_a93 := ddx_complete_rec.attribute_category;
3479     p1_a94 := ddx_complete_rec.attribute1;
3480     p1_a95 := ddx_complete_rec.attribute2;
3481     p1_a96 := ddx_complete_rec.attribute3;
3482     p1_a97 := ddx_complete_rec.attribute4;
3483     p1_a98 := ddx_complete_rec.attribute5;
3484     p1_a99 := ddx_complete_rec.attribute6;
3485     p1_a100 := ddx_complete_rec.attribute7;
3486     p1_a101 := ddx_complete_rec.attribute8;
3487     p1_a102 := ddx_complete_rec.attribute9;
3488     p1_a103 := ddx_complete_rec.attribute10;
3489     p1_a104 := ddx_complete_rec.attribute11;
3490     p1_a105 := ddx_complete_rec.attribute12;
3491     p1_a106 := ddx_complete_rec.attribute13;
3492     p1_a107 := ddx_complete_rec.attribute14;
3493     p1_a108 := ddx_complete_rec.attribute15;
3494     p1_a109 := ddx_complete_rec.deduction_attribute_category;
3495     p1_a110 := ddx_complete_rec.deduction_attribute1;
3496     p1_a111 := ddx_complete_rec.deduction_attribute2;
3497     p1_a112 := ddx_complete_rec.deduction_attribute3;
3498     p1_a113 := ddx_complete_rec.deduction_attribute4;
3499     p1_a114 := ddx_complete_rec.deduction_attribute5;
3500     p1_a115 := ddx_complete_rec.deduction_attribute6;
3501     p1_a116 := ddx_complete_rec.deduction_attribute7;
3502     p1_a117 := ddx_complete_rec.deduction_attribute8;
3503     p1_a118 := ddx_complete_rec.deduction_attribute9;
3504     p1_a119 := ddx_complete_rec.deduction_attribute10;
3505     p1_a120 := ddx_complete_rec.deduction_attribute11;
3506     p1_a121 := ddx_complete_rec.deduction_attribute12;
3507     p1_a122 := ddx_complete_rec.deduction_attribute13;
3508     p1_a123 := ddx_complete_rec.deduction_attribute14;
3509     p1_a124 := ddx_complete_rec.deduction_attribute15;
3510     p1_a125 := ddx_complete_rec.org_id;
3511     p1_a126 := ddx_complete_rec.legal_entity_id;
3512     p1_a127 := ddx_complete_rec.write_off_flag;
3513     p1_a128 := ddx_complete_rec.write_off_threshold_amount;
3514     p1_a129 := ddx_complete_rec.under_write_off_threshold;
3515     p1_a130 := ddx_complete_rec.customer_reason;
3516     p1_a131 := ddx_complete_rec.ship_to_cust_account_id;
3517     p1_a132 := ddx_complete_rec.amount_applied;
3518     p1_a133 := ddx_complete_rec.applied_receipt_id;
3519     p1_a134 := ddx_complete_rec.applied_receipt_number;
3520     p1_a135 := ddx_complete_rec.wo_rec_trx_id;
3521     p1_a136 := ddx_complete_rec.group_claim_id;
3522     p1_a137 := ddx_complete_rec.appr_wf_item_key;
3523     p1_a138 := ddx_complete_rec.cstl_wf_item_key;
3524     p1_a139 := ddx_complete_rec.batch_type;
3525     p1_a140 := ddx_complete_rec.tax_action;
3526 
3527   end;
3528 
3529   procedure create_claim_history(p_api_version  NUMBER
3530     , p_init_msg_list  VARCHAR2
3531     , p_commit  VARCHAR2
3532     , p_validation_level  NUMBER
3533     , x_return_status out nocopy  VARCHAR2
3534     , x_msg_data out nocopy  VARCHAR2
3535     , x_msg_count out nocopy  NUMBER
3536     , p7_a0  NUMBER
3537     , p7_a1  NUMBER
3538     , p7_a2  DATE
3539     , p7_a3  NUMBER
3540     , p7_a4  DATE
3541     , p7_a5  NUMBER
3542     , p7_a6  NUMBER
3543     , p7_a7  NUMBER
3544     , p7_a8  NUMBER
3545     , p7_a9  DATE
3546     , p7_a10  NUMBER
3547     , p7_a11  VARCHAR2
3548     , p7_a12  NUMBER
3549     , p7_a13  VARCHAR2
3550     , p7_a14  NUMBER
3551     , p7_a15  VARCHAR2
3552     , p7_a16  DATE
3553     , p7_a17  DATE
3554     , p7_a18  NUMBER
3555     , p7_a19  VARCHAR2
3556     , p7_a20  DATE
3557     , p7_a21  VARCHAR2
3558     , p7_a22  NUMBER
3559     , p7_a23  NUMBER
3560     , p7_a24  DATE
3561     , p7_a25  NUMBER
3562     , p7_a26  NUMBER
3563     , p7_a27  NUMBER
3564     , p7_a28  NUMBER
3565     , p7_a29  NUMBER
3566     , p7_a30  NUMBER
3567     , p7_a31  NUMBER
3568     , p7_a32  NUMBER
3569     , p7_a33  NUMBER
3570     , p7_a34  NUMBER
3571     , p7_a35  VARCHAR2
3572     , p7_a36  VARCHAR2
3573     , p7_a37  VARCHAR2
3574     , p7_a38  VARCHAR2
3575     , p7_a39  DATE
3576     , p7_a40  NUMBER
3577     , p7_a41  NUMBER
3578     , p7_a42  DATE
3579     , p7_a43  NUMBER
3580     , p7_a44  VARCHAR2
3581     , p7_a45  NUMBER
3582     , p7_a46  VARCHAR2
3583     , p7_a47  NUMBER
3584     , p7_a48  NUMBER
3585     , p7_a49  NUMBER
3586     , p7_a50  NUMBER
3587     , p7_a51  VARCHAR2
3588     , p7_a52  NUMBER
3589     , p7_a53  NUMBER
3590     , p7_a54  VARCHAR2
3591     , p7_a55  NUMBER
3592     , p7_a56  NUMBER
3593     , p7_a57  VARCHAR2
3594     , p7_a58  NUMBER
3595     , p7_a59  NUMBER
3596     , p7_a60  VARCHAR2
3597     , p7_a61  NUMBER
3598     , p7_a62  NUMBER
3599     , p7_a63  NUMBER
3600     , p7_a64  NUMBER
3601     , p7_a65  NUMBER
3602     , p7_a66  NUMBER
3603     , p7_a67  DATE
3604     , p7_a68  VARCHAR2
3605     , p7_a69  NUMBER
3606     , p7_a70  NUMBER
3607     , p7_a71  VARCHAR2
3608     , p7_a72  NUMBER
3609     , p7_a73  NUMBER
3610     , p7_a74  DATE
3611     , p7_a75  VARCHAR2
3612     , p7_a76  NUMBER
3613     , p7_a77  VARCHAR2
3614     , p7_a78  NUMBER
3615     , p7_a79  VARCHAR2
3616     , p7_a80  DATE
3617     , p7_a81  VARCHAR2
3618     , p7_a82  VARCHAR2
3619     , p7_a83  DATE
3620     , p7_a84  NUMBER
3621     , p7_a85  DATE
3622     , p7_a86  NUMBER
3623     , p7_a87  DATE
3624     , p7_a88  NUMBER
3625     , p7_a89  NUMBER
3626     , p7_a90  NUMBER
3627     , p7_a91  NUMBER
3628     , p7_a92  VARCHAR2
3629     , p7_a93  VARCHAR2
3630     , p7_a94  VARCHAR2
3631     , p7_a95  VARCHAR2
3632     , p7_a96  VARCHAR2
3633     , p7_a97  VARCHAR2
3634     , p7_a98  VARCHAR2
3635     , p7_a99  VARCHAR2
3636     , p7_a100  VARCHAR2
3637     , p7_a101  VARCHAR2
3638     , p7_a102  VARCHAR2
3639     , p7_a103  VARCHAR2
3640     , p7_a104  VARCHAR2
3641     , p7_a105  VARCHAR2
3642     , p7_a106  VARCHAR2
3643     , p7_a107  VARCHAR2
3644     , p7_a108  VARCHAR2
3645     , p7_a109  VARCHAR2
3646     , p7_a110  VARCHAR2
3647     , p7_a111  VARCHAR2
3648     , p7_a112  VARCHAR2
3649     , p7_a113  VARCHAR2
3650     , p7_a114  VARCHAR2
3651     , p7_a115  VARCHAR2
3652     , p7_a116  VARCHAR2
3653     , p7_a117  VARCHAR2
3654     , p7_a118  VARCHAR2
3655     , p7_a119  VARCHAR2
3656     , p7_a120  VARCHAR2
3657     , p7_a121  VARCHAR2
3658     , p7_a122  VARCHAR2
3659     , p7_a123  VARCHAR2
3660     , p7_a124  VARCHAR2
3661     , p7_a125  NUMBER
3662     , p7_a126  NUMBER
3663     , p7_a127  VARCHAR2
3664     , p7_a128  NUMBER
3665     , p7_a129  VARCHAR2
3666     , p7_a130  VARCHAR2
3667     , p7_a131  NUMBER
3668     , p7_a132  NUMBER
3669     , p7_a133  NUMBER
3670     , p7_a134  VARCHAR2
3671     , p7_a135  NUMBER
3672     , p7_a136  NUMBER
3673     , p7_a137  VARCHAR2
3674     , p7_a138  VARCHAR2
3675     , p7_a139  VARCHAR2
3676     , p7_a140  VARCHAR2
3677     , p_event  VARCHAR2
3678     , x_need_to_create out nocopy  VARCHAR2
3679     , x_claim_history_id out nocopy  NUMBER
3680   )
3681 
3682   as
3683     ddp_claim ozf_claim_pvt.claim_rec_type;
3684     ddindx binary_integer; indx binary_integer;
3685   begin
3686 
3687     -- copy data to the local IN or IN-OUT args, if any
3688 
3689 
3690 
3691 
3692 
3693 
3694 
3695     ddp_claim.claim_id := p7_a0;
3696     ddp_claim.object_version_number := p7_a1;
3697     ddp_claim.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
3698     ddp_claim.last_updated_by := p7_a3;
3699     ddp_claim.creation_date := rosetta_g_miss_date_in_map(p7_a4);
3700     ddp_claim.created_by := p7_a5;
3701     ddp_claim.last_update_login := p7_a6;
3702     ddp_claim.request_id := p7_a7;
3703     ddp_claim.program_application_id := p7_a8;
3704     ddp_claim.program_update_date := rosetta_g_miss_date_in_map(p7_a9);
3705     ddp_claim.program_id := p7_a10;
3706     ddp_claim.created_from := p7_a11;
3707     ddp_claim.batch_id := p7_a12;
3708     ddp_claim.claim_number := p7_a13;
3709     ddp_claim.claim_type_id := p7_a14;
3710     ddp_claim.claim_class := p7_a15;
3711     ddp_claim.claim_date := rosetta_g_miss_date_in_map(p7_a16);
3712     ddp_claim.due_date := rosetta_g_miss_date_in_map(p7_a17);
3713     ddp_claim.owner_id := p7_a18;
3714     ddp_claim.history_event := p7_a19;
3715     ddp_claim.history_event_date := rosetta_g_miss_date_in_map(p7_a20);
3716     ddp_claim.history_event_description := p7_a21;
3717     ddp_claim.split_from_claim_id := p7_a22;
3718     ddp_claim.duplicate_claim_id := p7_a23;
3719     ddp_claim.split_date := rosetta_g_miss_date_in_map(p7_a24);
3720     ddp_claim.root_claim_id := p7_a25;
3721     ddp_claim.amount := p7_a26;
3722     ddp_claim.amount_adjusted := p7_a27;
3723     ddp_claim.amount_remaining := p7_a28;
3724     ddp_claim.amount_settled := p7_a29;
3725     ddp_claim.acctd_amount := p7_a30;
3726     ddp_claim.acctd_amount_remaining := p7_a31;
3727     ddp_claim.acctd_amount_adjusted := p7_a32;
3728     ddp_claim.acctd_amount_settled := p7_a33;
3729     ddp_claim.tax_amount := p7_a34;
3730     ddp_claim.tax_code := p7_a35;
3731     ddp_claim.tax_calculation_flag := p7_a36;
3732     ddp_claim.currency_code := p7_a37;
3733     ddp_claim.exchange_rate_type := p7_a38;
3734     ddp_claim.exchange_rate_date := rosetta_g_miss_date_in_map(p7_a39);
3735     ddp_claim.exchange_rate := p7_a40;
3736     ddp_claim.set_of_books_id := p7_a41;
3737     ddp_claim.original_claim_date := rosetta_g_miss_date_in_map(p7_a42);
3738     ddp_claim.source_object_id := p7_a43;
3739     ddp_claim.source_object_class := p7_a44;
3740     ddp_claim.source_object_type_id := p7_a45;
3741     ddp_claim.source_object_number := p7_a46;
3742     ddp_claim.cust_account_id := p7_a47;
3743     ddp_claim.cust_billto_acct_site_id := p7_a48;
3744     ddp_claim.cust_shipto_acct_site_id := p7_a49;
3745     ddp_claim.location_id := p7_a50;
3746     ddp_claim.pay_related_account_flag := p7_a51;
3747     ddp_claim.related_cust_account_id := p7_a52;
3748     ddp_claim.related_site_use_id := p7_a53;
3749     ddp_claim.relationship_type := p7_a54;
3750     ddp_claim.vendor_id := p7_a55;
3751     ddp_claim.vendor_site_id := p7_a56;
3752     ddp_claim.reason_type := p7_a57;
3753     ddp_claim.reason_code_id := p7_a58;
3754     ddp_claim.task_template_group_id := p7_a59;
3755     ddp_claim.status_code := p7_a60;
3756     ddp_claim.user_status_id := p7_a61;
3757     ddp_claim.sales_rep_id := p7_a62;
3758     ddp_claim.collector_id := p7_a63;
3759     ddp_claim.contact_id := p7_a64;
3760     ddp_claim.broker_id := p7_a65;
3761     ddp_claim.territory_id := p7_a66;
3762     ddp_claim.customer_ref_date := rosetta_g_miss_date_in_map(p7_a67);
3763     ddp_claim.customer_ref_number := p7_a68;
3764     ddp_claim.assigned_to := p7_a69;
3765     ddp_claim.receipt_id := p7_a70;
3766     ddp_claim.receipt_number := p7_a71;
3767     ddp_claim.doc_sequence_id := p7_a72;
3768     ddp_claim.doc_sequence_value := p7_a73;
3769     ddp_claim.gl_date := rosetta_g_miss_date_in_map(p7_a74);
3770     ddp_claim.payment_method := p7_a75;
3771     ddp_claim.voucher_id := p7_a76;
3772     ddp_claim.voucher_number := p7_a77;
3773     ddp_claim.payment_reference_id := p7_a78;
3774     ddp_claim.payment_reference_number := p7_a79;
3775     ddp_claim.payment_reference_date := rosetta_g_miss_date_in_map(p7_a80);
3776     ddp_claim.payment_status := p7_a81;
3777     ddp_claim.approved_flag := p7_a82;
3778     ddp_claim.approved_date := rosetta_g_miss_date_in_map(p7_a83);
3779     ddp_claim.approved_by := p7_a84;
3780     ddp_claim.settled_date := rosetta_g_miss_date_in_map(p7_a85);
3781     ddp_claim.settled_by := p7_a86;
3782     ddp_claim.effective_date := rosetta_g_miss_date_in_map(p7_a87);
3783     ddp_claim.custom_setup_id := p7_a88;
3784     ddp_claim.task_id := p7_a89;
3785     ddp_claim.country_id := p7_a90;
3786     ddp_claim.order_type_id := p7_a91;
3787     ddp_claim.comments := p7_a92;
3788     ddp_claim.attribute_category := p7_a93;
3789     ddp_claim.attribute1 := p7_a94;
3790     ddp_claim.attribute2 := p7_a95;
3791     ddp_claim.attribute3 := p7_a96;
3792     ddp_claim.attribute4 := p7_a97;
3793     ddp_claim.attribute5 := p7_a98;
3794     ddp_claim.attribute6 := p7_a99;
3795     ddp_claim.attribute7 := p7_a100;
3796     ddp_claim.attribute8 := p7_a101;
3797     ddp_claim.attribute9 := p7_a102;
3798     ddp_claim.attribute10 := p7_a103;
3799     ddp_claim.attribute11 := p7_a104;
3800     ddp_claim.attribute12 := p7_a105;
3801     ddp_claim.attribute13 := p7_a106;
3802     ddp_claim.attribute14 := p7_a107;
3803     ddp_claim.attribute15 := p7_a108;
3804     ddp_claim.deduction_attribute_category := p7_a109;
3805     ddp_claim.deduction_attribute1 := p7_a110;
3806     ddp_claim.deduction_attribute2 := p7_a111;
3807     ddp_claim.deduction_attribute3 := p7_a112;
3808     ddp_claim.deduction_attribute4 := p7_a113;
3809     ddp_claim.deduction_attribute5 := p7_a114;
3810     ddp_claim.deduction_attribute6 := p7_a115;
3811     ddp_claim.deduction_attribute7 := p7_a116;
3812     ddp_claim.deduction_attribute8 := p7_a117;
3813     ddp_claim.deduction_attribute9 := p7_a118;
3814     ddp_claim.deduction_attribute10 := p7_a119;
3815     ddp_claim.deduction_attribute11 := p7_a120;
3816     ddp_claim.deduction_attribute12 := p7_a121;
3817     ddp_claim.deduction_attribute13 := p7_a122;
3818     ddp_claim.deduction_attribute14 := p7_a123;
3819     ddp_claim.deduction_attribute15 := p7_a124;
3820     ddp_claim.org_id := p7_a125;
3821     ddp_claim.legal_entity_id := p7_a126;
3822     ddp_claim.write_off_flag := p7_a127;
3823     ddp_claim.write_off_threshold_amount := p7_a128;
3824     ddp_claim.under_write_off_threshold := p7_a129;
3825     ddp_claim.customer_reason := p7_a130;
3826     ddp_claim.ship_to_cust_account_id := p7_a131;
3827     ddp_claim.amount_applied := p7_a132;
3828     ddp_claim.applied_receipt_id := p7_a133;
3829     ddp_claim.applied_receipt_number := p7_a134;
3830     ddp_claim.wo_rec_trx_id := p7_a135;
3831     ddp_claim.group_claim_id := p7_a136;
3832     ddp_claim.appr_wf_item_key := p7_a137;
3833     ddp_claim.cstl_wf_item_key := p7_a138;
3834     ddp_claim.batch_type := p7_a139;
3835     ddp_claim.tax_action := p7_a140;
3836 
3837 
3838 
3839 
3840     -- here's the delegated call to the old PL/SQL routine
3841     ozf_claim_pvt.create_claim_history(p_api_version,
3842       p_init_msg_list,
3843       p_commit,
3844       p_validation_level,
3845       x_return_status,
3846       x_msg_data,
3847       x_msg_count,
3848       ddp_claim,
3849       p_event,
3850       x_need_to_create,
3851       x_claim_history_id);
3852 
3853     -- copy data back from the local variables to OUT or IN-OUT args, if any
3854 
3855 
3856 
3857 
3858 
3859 
3860 
3861 
3862 
3863 
3864   end;
3865 
3866   procedure validate_delete_claim(p_api_version_number  NUMBER
3867     , p_init_msg_list  VARCHAR2
3868     , p_commit  VARCHAR2
3869     , p_object_id  NUMBER
3870     , p_object_version_number  NUMBER
3871     , p5_a0 out nocopy JTF_VARCHAR2_TABLE_300
3872     , p5_a1 out nocopy JTF_VARCHAR2_TABLE_100
3873     , p5_a2 out nocopy JTF_VARCHAR2_TABLE_100
3874     , p5_a3 out nocopy JTF_VARCHAR2_TABLE_300
3875     , p5_a4 out nocopy JTF_VARCHAR2_TABLE_100
3876     , x_return_status out nocopy  VARCHAR2
3877     , x_msg_count out nocopy  NUMBER
3878     , x_msg_data out nocopy  VARCHAR2
3879   )
3880 
3881   as
3882     ddx_dependent_object_tbl ams_utility_pvt.dependent_objects_tbl_type;
3883     ddindx binary_integer; indx binary_integer;
3884   begin
3885 
3886     -- copy data to the local IN or IN-OUT args, if any
3887 
3888 
3889 
3890 
3891 
3892 
3893 
3894 
3895 
3896     -- here's the delegated call to the old PL/SQL routine
3897     ozf_claim_pvt.validate_delete_claim(p_api_version_number,
3898       p_init_msg_list,
3899       p_commit,
3900       p_object_id,
3901       p_object_version_number,
3902       ddx_dependent_object_tbl,
3903       x_return_status,
3904       x_msg_count,
3905       x_msg_data);
3906 
3907     -- copy data back from the local variables to OUT or IN-OUT args, if any
3908 
3909 
3910 
3911 
3912 
3913     ams_utility_pvt_w.rosetta_table_copy_out_p45(ddx_dependent_object_tbl, p5_a0
3914       , p5_a1
3915       , p5_a2
3916       , p5_a3
3917       , p5_a4
3918       );
3919 
3920 
3921 
3922   end;
3923 
3924   procedure create_claim_tbl(p_api_version  NUMBER
3925     , p_init_msg_list  VARCHAR2
3926     , p_commit  VARCHAR2
3927     , p_validation_level  NUMBER
3928     , x_return_status out nocopy  VARCHAR2
3929     , x_msg_data out nocopy  VARCHAR2
3930     , x_msg_count out nocopy  NUMBER
3931     , p7_a0 JTF_NUMBER_TABLE
3932     , p7_a1 JTF_NUMBER_TABLE
3933     , p7_a2 JTF_DATE_TABLE
3934     , p7_a3 JTF_NUMBER_TABLE
3935     , p7_a4 JTF_DATE_TABLE
3936     , p7_a5 JTF_NUMBER_TABLE
3937     , p7_a6 JTF_NUMBER_TABLE
3938     , p7_a7 JTF_NUMBER_TABLE
3939     , p7_a8 JTF_NUMBER_TABLE
3940     , p7_a9 JTF_DATE_TABLE
3941     , p7_a10 JTF_NUMBER_TABLE
3942     , p7_a11 JTF_VARCHAR2_TABLE_100
3943     , p7_a12 JTF_NUMBER_TABLE
3944     , p7_a13 JTF_VARCHAR2_TABLE_100
3945     , p7_a14 JTF_NUMBER_TABLE
3946     , p7_a15 JTF_VARCHAR2_TABLE_100
3947     , p7_a16 JTF_DATE_TABLE
3948     , p7_a17 JTF_DATE_TABLE
3949     , p7_a18 JTF_NUMBER_TABLE
3950     , p7_a19 JTF_VARCHAR2_TABLE_100
3951     , p7_a20 JTF_DATE_TABLE
3952     , p7_a21 JTF_VARCHAR2_TABLE_2000
3953     , p7_a22 JTF_NUMBER_TABLE
3954     , p7_a23 JTF_NUMBER_TABLE
3955     , p7_a24 JTF_DATE_TABLE
3956     , p7_a25 JTF_NUMBER_TABLE
3957     , p7_a26 JTF_NUMBER_TABLE
3958     , p7_a27 JTF_NUMBER_TABLE
3959     , p7_a28 JTF_NUMBER_TABLE
3960     , p7_a29 JTF_NUMBER_TABLE
3961     , p7_a30 JTF_NUMBER_TABLE
3962     , p7_a31 JTF_NUMBER_TABLE
3963     , p7_a32 JTF_NUMBER_TABLE
3964     , p7_a33 JTF_NUMBER_TABLE
3965     , p7_a34 JTF_NUMBER_TABLE
3966     , p7_a35 JTF_VARCHAR2_TABLE_100
3967     , p7_a36 JTF_VARCHAR2_TABLE_100
3968     , p7_a37 JTF_VARCHAR2_TABLE_100
3969     , p7_a38 JTF_VARCHAR2_TABLE_100
3970     , p7_a39 JTF_DATE_TABLE
3971     , p7_a40 JTF_NUMBER_TABLE
3972     , p7_a41 JTF_NUMBER_TABLE
3973     , p7_a42 JTF_DATE_TABLE
3974     , p7_a43 JTF_NUMBER_TABLE
3975     , p7_a44 JTF_VARCHAR2_TABLE_100
3976     , p7_a45 JTF_NUMBER_TABLE
3977     , p7_a46 JTF_VARCHAR2_TABLE_100
3978     , p7_a47 JTF_NUMBER_TABLE
3979     , p7_a48 JTF_NUMBER_TABLE
3980     , p7_a49 JTF_NUMBER_TABLE
3981     , p7_a50 JTF_NUMBER_TABLE
3982     , p7_a51 JTF_VARCHAR2_TABLE_100
3983     , p7_a52 JTF_NUMBER_TABLE
3984     , p7_a53 JTF_NUMBER_TABLE
3985     , p7_a54 JTF_VARCHAR2_TABLE_100
3986     , p7_a55 JTF_NUMBER_TABLE
3987     , p7_a56 JTF_NUMBER_TABLE
3988     , p7_a57 JTF_VARCHAR2_TABLE_100
3989     , p7_a58 JTF_NUMBER_TABLE
3990     , p7_a59 JTF_NUMBER_TABLE
3991     , p7_a60 JTF_VARCHAR2_TABLE_100
3992     , p7_a61 JTF_NUMBER_TABLE
3993     , p7_a62 JTF_NUMBER_TABLE
3994     , p7_a63 JTF_NUMBER_TABLE
3995     , p7_a64 JTF_NUMBER_TABLE
3996     , p7_a65 JTF_NUMBER_TABLE
3997     , p7_a66 JTF_NUMBER_TABLE
3998     , p7_a67 JTF_DATE_TABLE
3999     , p7_a68 JTF_VARCHAR2_TABLE_100
4000     , p7_a69 JTF_NUMBER_TABLE
4001     , p7_a70 JTF_NUMBER_TABLE
4002     , p7_a71 JTF_VARCHAR2_TABLE_100
4003     , p7_a72 JTF_NUMBER_TABLE
4004     , p7_a73 JTF_NUMBER_TABLE
4005     , p7_a74 JTF_DATE_TABLE
4006     , p7_a75 JTF_VARCHAR2_TABLE_100
4007     , p7_a76 JTF_NUMBER_TABLE
4008     , p7_a77 JTF_VARCHAR2_TABLE_100
4009     , p7_a78 JTF_NUMBER_TABLE
4010     , p7_a79 JTF_VARCHAR2_TABLE_100
4011     , p7_a80 JTF_DATE_TABLE
4012     , p7_a81 JTF_VARCHAR2_TABLE_100
4013     , p7_a82 JTF_VARCHAR2_TABLE_100
4014     , p7_a83 JTF_DATE_TABLE
4015     , p7_a84 JTF_NUMBER_TABLE
4016     , p7_a85 JTF_DATE_TABLE
4017     , p7_a86 JTF_NUMBER_TABLE
4018     , p7_a87 JTF_DATE_TABLE
4019     , p7_a88 JTF_NUMBER_TABLE
4020     , p7_a89 JTF_NUMBER_TABLE
4021     , p7_a90 JTF_NUMBER_TABLE
4022     , p7_a91 JTF_NUMBER_TABLE
4023     , p7_a92 JTF_VARCHAR2_TABLE_2000
4024     , p7_a93 JTF_VARCHAR2_TABLE_100
4025     , p7_a94 JTF_VARCHAR2_TABLE_200
4026     , p7_a95 JTF_VARCHAR2_TABLE_200
4027     , p7_a96 JTF_VARCHAR2_TABLE_200
4028     , p7_a97 JTF_VARCHAR2_TABLE_200
4029     , p7_a98 JTF_VARCHAR2_TABLE_200
4030     , p7_a99 JTF_VARCHAR2_TABLE_200
4031     , p7_a100 JTF_VARCHAR2_TABLE_200
4032     , p7_a101 JTF_VARCHAR2_TABLE_200
4033     , p7_a102 JTF_VARCHAR2_TABLE_200
4034     , p7_a103 JTF_VARCHAR2_TABLE_200
4035     , p7_a104 JTF_VARCHAR2_TABLE_200
4036     , p7_a105 JTF_VARCHAR2_TABLE_200
4037     , p7_a106 JTF_VARCHAR2_TABLE_200
4038     , p7_a107 JTF_VARCHAR2_TABLE_200
4039     , p7_a108 JTF_VARCHAR2_TABLE_200
4040     , p7_a109 JTF_VARCHAR2_TABLE_100
4041     , p7_a110 JTF_VARCHAR2_TABLE_200
4042     , p7_a111 JTF_VARCHAR2_TABLE_200
4043     , p7_a112 JTF_VARCHAR2_TABLE_200
4044     , p7_a113 JTF_VARCHAR2_TABLE_200
4045     , p7_a114 JTF_VARCHAR2_TABLE_200
4046     , p7_a115 JTF_VARCHAR2_TABLE_200
4047     , p7_a116 JTF_VARCHAR2_TABLE_200
4048     , p7_a117 JTF_VARCHAR2_TABLE_200
4049     , p7_a118 JTF_VARCHAR2_TABLE_200
4050     , p7_a119 JTF_VARCHAR2_TABLE_200
4051     , p7_a120 JTF_VARCHAR2_TABLE_200
4052     , p7_a121 JTF_VARCHAR2_TABLE_200
4053     , p7_a122 JTF_VARCHAR2_TABLE_200
4054     , p7_a123 JTF_VARCHAR2_TABLE_200
4055     , p7_a124 JTF_VARCHAR2_TABLE_200
4056     , p7_a125 JTF_NUMBER_TABLE
4057     , p7_a126 JTF_NUMBER_TABLE
4058     , p7_a127 JTF_VARCHAR2_TABLE_100
4059     , p7_a128 JTF_NUMBER_TABLE
4060     , p7_a129 JTF_VARCHAR2_TABLE_100
4061     , p7_a130 JTF_VARCHAR2_TABLE_100
4062     , p7_a131 JTF_NUMBER_TABLE
4063     , p7_a132 JTF_NUMBER_TABLE
4064     , p7_a133 JTF_NUMBER_TABLE
4065     , p7_a134 JTF_VARCHAR2_TABLE_100
4066     , p7_a135 JTF_NUMBER_TABLE
4067     , p7_a136 JTF_NUMBER_TABLE
4068     , p7_a137 JTF_VARCHAR2_TABLE_300
4069     , p7_a138 JTF_VARCHAR2_TABLE_300
4070     , p7_a139 JTF_VARCHAR2_TABLE_100
4071     , p7_a140 JTF_VARCHAR2_TABLE_100
4072     , x_error_index out nocopy  NUMBER
4073   )
4074 
4075   as
4076     ddp_claim_tbl ozf_claim_pvt.claim_tbl_type;
4077     ddindx binary_integer; indx binary_integer;
4078   begin
4079 
4080     -- copy data to the local IN or IN-OUT args, if any
4081 
4082 
4083 
4084 
4085 
4086 
4087 
4088     ozf_claim_pvt_w.rosetta_table_copy_in_p3(ddp_claim_tbl, p7_a0
4089       , p7_a1
4090       , p7_a2
4091       , p7_a3
4092       , p7_a4
4093       , p7_a5
4094       , p7_a6
4095       , p7_a7
4096       , p7_a8
4097       , p7_a9
4098       , p7_a10
4099       , p7_a11
4100       , p7_a12
4101       , p7_a13
4102       , p7_a14
4103       , p7_a15
4104       , p7_a16
4105       , p7_a17
4106       , p7_a18
4107       , p7_a19
4108       , p7_a20
4109       , p7_a21
4110       , p7_a22
4111       , p7_a23
4112       , p7_a24
4113       , p7_a25
4114       , p7_a26
4115       , p7_a27
4116       , p7_a28
4117       , p7_a29
4118       , p7_a30
4119       , p7_a31
4120       , p7_a32
4121       , p7_a33
4122       , p7_a34
4123       , p7_a35
4124       , p7_a36
4125       , p7_a37
4126       , p7_a38
4127       , p7_a39
4128       , p7_a40
4129       , p7_a41
4130       , p7_a42
4131       , p7_a43
4132       , p7_a44
4133       , p7_a45
4134       , p7_a46
4135       , p7_a47
4136       , p7_a48
4137       , p7_a49
4138       , p7_a50
4139       , p7_a51
4140       , p7_a52
4141       , p7_a53
4142       , p7_a54
4143       , p7_a55
4144       , p7_a56
4145       , p7_a57
4146       , p7_a58
4147       , p7_a59
4148       , p7_a60
4149       , p7_a61
4150       , p7_a62
4151       , p7_a63
4152       , p7_a64
4153       , p7_a65
4154       , p7_a66
4155       , p7_a67
4156       , p7_a68
4157       , p7_a69
4158       , p7_a70
4159       , p7_a71
4160       , p7_a72
4161       , p7_a73
4162       , p7_a74
4163       , p7_a75
4164       , p7_a76
4165       , p7_a77
4166       , p7_a78
4167       , p7_a79
4168       , p7_a80
4169       , p7_a81
4170       , p7_a82
4171       , p7_a83
4172       , p7_a84
4173       , p7_a85
4174       , p7_a86
4175       , p7_a87
4176       , p7_a88
4177       , p7_a89
4178       , p7_a90
4179       , p7_a91
4180       , p7_a92
4181       , p7_a93
4182       , p7_a94
4183       , p7_a95
4184       , p7_a96
4185       , p7_a97
4186       , p7_a98
4187       , p7_a99
4188       , p7_a100
4189       , p7_a101
4190       , p7_a102
4191       , p7_a103
4192       , p7_a104
4193       , p7_a105
4194       , p7_a106
4195       , p7_a107
4196       , p7_a108
4197       , p7_a109
4198       , p7_a110
4199       , p7_a111
4200       , p7_a112
4201       , p7_a113
4202       , p7_a114
4203       , p7_a115
4204       , p7_a116
4205       , p7_a117
4206       , p7_a118
4207       , p7_a119
4208       , p7_a120
4209       , p7_a121
4210       , p7_a122
4211       , p7_a123
4212       , p7_a124
4213       , p7_a125
4214       , p7_a126
4215       , p7_a127
4216       , p7_a128
4217       , p7_a129
4218       , p7_a130
4219       , p7_a131
4220       , p7_a132
4221       , p7_a133
4222       , p7_a134
4223       , p7_a135
4224       , p7_a136
4225       , p7_a137
4226       , p7_a138
4227       , p7_a139
4228       , p7_a140
4229       );
4230 
4231 
4232     -- here's the delegated call to the old PL/SQL routine
4233     ozf_claim_pvt.create_claim_tbl(p_api_version,
4234       p_init_msg_list,
4235       p_commit,
4236       p_validation_level,
4237       x_return_status,
4238       x_msg_data,
4239       x_msg_count,
4240       ddp_claim_tbl,
4241       x_error_index);
4242 
4243     -- copy data back from the local variables to OUT or IN-OUT args, if any
4244 
4245 
4246 
4247 
4248 
4249 
4250 
4251 
4252   end;
4253 
4254   procedure update_claim_tbl(p_api_version  NUMBER
4255     , p_init_msg_list  VARCHAR2
4256     , p_commit  VARCHAR2
4257     , p_validation_level  NUMBER
4258     , x_return_status out nocopy  VARCHAR2
4259     , x_msg_data out nocopy  VARCHAR2
4260     , x_msg_count out nocopy  NUMBER
4261     , p7_a0 JTF_NUMBER_TABLE
4262     , p7_a1 JTF_NUMBER_TABLE
4263     , p7_a2 JTF_DATE_TABLE
4264     , p7_a3 JTF_NUMBER_TABLE
4265     , p7_a4 JTF_DATE_TABLE
4266     , p7_a5 JTF_NUMBER_TABLE
4267     , p7_a6 JTF_NUMBER_TABLE
4268     , p7_a7 JTF_NUMBER_TABLE
4269     , p7_a8 JTF_NUMBER_TABLE
4270     , p7_a9 JTF_DATE_TABLE
4271     , p7_a10 JTF_NUMBER_TABLE
4272     , p7_a11 JTF_VARCHAR2_TABLE_100
4273     , p7_a12 JTF_NUMBER_TABLE
4274     , p7_a13 JTF_VARCHAR2_TABLE_100
4275     , p7_a14 JTF_NUMBER_TABLE
4276     , p7_a15 JTF_VARCHAR2_TABLE_100
4277     , p7_a16 JTF_DATE_TABLE
4278     , p7_a17 JTF_DATE_TABLE
4279     , p7_a18 JTF_NUMBER_TABLE
4280     , p7_a19 JTF_VARCHAR2_TABLE_100
4281     , p7_a20 JTF_DATE_TABLE
4282     , p7_a21 JTF_VARCHAR2_TABLE_2000
4283     , p7_a22 JTF_NUMBER_TABLE
4284     , p7_a23 JTF_NUMBER_TABLE
4285     , p7_a24 JTF_DATE_TABLE
4286     , p7_a25 JTF_NUMBER_TABLE
4287     , p7_a26 JTF_NUMBER_TABLE
4288     , p7_a27 JTF_NUMBER_TABLE
4289     , p7_a28 JTF_NUMBER_TABLE
4290     , p7_a29 JTF_NUMBER_TABLE
4291     , p7_a30 JTF_NUMBER_TABLE
4292     , p7_a31 JTF_NUMBER_TABLE
4293     , p7_a32 JTF_NUMBER_TABLE
4294     , p7_a33 JTF_NUMBER_TABLE
4295     , p7_a34 JTF_NUMBER_TABLE
4296     , p7_a35 JTF_VARCHAR2_TABLE_100
4297     , p7_a36 JTF_VARCHAR2_TABLE_100
4298     , p7_a37 JTF_VARCHAR2_TABLE_100
4299     , p7_a38 JTF_VARCHAR2_TABLE_100
4300     , p7_a39 JTF_DATE_TABLE
4301     , p7_a40 JTF_NUMBER_TABLE
4302     , p7_a41 JTF_NUMBER_TABLE
4303     , p7_a42 JTF_DATE_TABLE
4304     , p7_a43 JTF_NUMBER_TABLE
4305     , p7_a44 JTF_VARCHAR2_TABLE_100
4306     , p7_a45 JTF_NUMBER_TABLE
4307     , p7_a46 JTF_VARCHAR2_TABLE_100
4308     , p7_a47 JTF_NUMBER_TABLE
4309     , p7_a48 JTF_NUMBER_TABLE
4310     , p7_a49 JTF_NUMBER_TABLE
4311     , p7_a50 JTF_NUMBER_TABLE
4312     , p7_a51 JTF_VARCHAR2_TABLE_100
4313     , p7_a52 JTF_NUMBER_TABLE
4314     , p7_a53 JTF_NUMBER_TABLE
4315     , p7_a54 JTF_VARCHAR2_TABLE_100
4316     , p7_a55 JTF_NUMBER_TABLE
4317     , p7_a56 JTF_NUMBER_TABLE
4318     , p7_a57 JTF_VARCHAR2_TABLE_100
4319     , p7_a58 JTF_NUMBER_TABLE
4320     , p7_a59 JTF_NUMBER_TABLE
4321     , p7_a60 JTF_VARCHAR2_TABLE_100
4322     , p7_a61 JTF_NUMBER_TABLE
4323     , p7_a62 JTF_NUMBER_TABLE
4324     , p7_a63 JTF_NUMBER_TABLE
4325     , p7_a64 JTF_NUMBER_TABLE
4326     , p7_a65 JTF_NUMBER_TABLE
4327     , p7_a66 JTF_NUMBER_TABLE
4328     , p7_a67 JTF_DATE_TABLE
4329     , p7_a68 JTF_VARCHAR2_TABLE_100
4330     , p7_a69 JTF_NUMBER_TABLE
4331     , p7_a70 JTF_NUMBER_TABLE
4332     , p7_a71 JTF_VARCHAR2_TABLE_100
4333     , p7_a72 JTF_NUMBER_TABLE
4334     , p7_a73 JTF_NUMBER_TABLE
4335     , p7_a74 JTF_DATE_TABLE
4336     , p7_a75 JTF_VARCHAR2_TABLE_100
4337     , p7_a76 JTF_NUMBER_TABLE
4338     , p7_a77 JTF_VARCHAR2_TABLE_100
4339     , p7_a78 JTF_NUMBER_TABLE
4340     , p7_a79 JTF_VARCHAR2_TABLE_100
4341     , p7_a80 JTF_DATE_TABLE
4342     , p7_a81 JTF_VARCHAR2_TABLE_100
4343     , p7_a82 JTF_VARCHAR2_TABLE_100
4344     , p7_a83 JTF_DATE_TABLE
4345     , p7_a84 JTF_NUMBER_TABLE
4346     , p7_a85 JTF_DATE_TABLE
4347     , p7_a86 JTF_NUMBER_TABLE
4348     , p7_a87 JTF_DATE_TABLE
4349     , p7_a88 JTF_NUMBER_TABLE
4350     , p7_a89 JTF_NUMBER_TABLE
4351     , p7_a90 JTF_NUMBER_TABLE
4352     , p7_a91 JTF_NUMBER_TABLE
4353     , p7_a92 JTF_VARCHAR2_TABLE_2000
4354     , p7_a93 JTF_VARCHAR2_TABLE_100
4355     , p7_a94 JTF_VARCHAR2_TABLE_200
4356     , p7_a95 JTF_VARCHAR2_TABLE_200
4357     , p7_a96 JTF_VARCHAR2_TABLE_200
4358     , p7_a97 JTF_VARCHAR2_TABLE_200
4359     , p7_a98 JTF_VARCHAR2_TABLE_200
4360     , p7_a99 JTF_VARCHAR2_TABLE_200
4361     , p7_a100 JTF_VARCHAR2_TABLE_200
4362     , p7_a101 JTF_VARCHAR2_TABLE_200
4363     , p7_a102 JTF_VARCHAR2_TABLE_200
4364     , p7_a103 JTF_VARCHAR2_TABLE_200
4365     , p7_a104 JTF_VARCHAR2_TABLE_200
4366     , p7_a105 JTF_VARCHAR2_TABLE_200
4367     , p7_a106 JTF_VARCHAR2_TABLE_200
4368     , p7_a107 JTF_VARCHAR2_TABLE_200
4369     , p7_a108 JTF_VARCHAR2_TABLE_200
4370     , p7_a109 JTF_VARCHAR2_TABLE_100
4371     , p7_a110 JTF_VARCHAR2_TABLE_200
4372     , p7_a111 JTF_VARCHAR2_TABLE_200
4373     , p7_a112 JTF_VARCHAR2_TABLE_200
4374     , p7_a113 JTF_VARCHAR2_TABLE_200
4375     , p7_a114 JTF_VARCHAR2_TABLE_200
4376     , p7_a115 JTF_VARCHAR2_TABLE_200
4377     , p7_a116 JTF_VARCHAR2_TABLE_200
4378     , p7_a117 JTF_VARCHAR2_TABLE_200
4379     , p7_a118 JTF_VARCHAR2_TABLE_200
4380     , p7_a119 JTF_VARCHAR2_TABLE_200
4381     , p7_a120 JTF_VARCHAR2_TABLE_200
4382     , p7_a121 JTF_VARCHAR2_TABLE_200
4383     , p7_a122 JTF_VARCHAR2_TABLE_200
4384     , p7_a123 JTF_VARCHAR2_TABLE_200
4385     , p7_a124 JTF_VARCHAR2_TABLE_200
4386     , p7_a125 JTF_NUMBER_TABLE
4387     , p7_a126 JTF_NUMBER_TABLE
4388     , p7_a127 JTF_VARCHAR2_TABLE_100
4389     , p7_a128 JTF_NUMBER_TABLE
4390     , p7_a129 JTF_VARCHAR2_TABLE_100
4391     , p7_a130 JTF_VARCHAR2_TABLE_100
4392     , p7_a131 JTF_NUMBER_TABLE
4393     , p7_a132 JTF_NUMBER_TABLE
4394     , p7_a133 JTF_NUMBER_TABLE
4395     , p7_a134 JTF_VARCHAR2_TABLE_100
4396     , p7_a135 JTF_NUMBER_TABLE
4397     , p7_a136 JTF_NUMBER_TABLE
4398     , p7_a137 JTF_VARCHAR2_TABLE_300
4399     , p7_a138 JTF_VARCHAR2_TABLE_300
4400     , p7_a139 JTF_VARCHAR2_TABLE_100
4401     , p7_a140 JTF_VARCHAR2_TABLE_100
4402   )
4403 
4404   as
4405     ddp_claim_tbl ozf_claim_pvt.claim_tbl_type;
4406     ddindx binary_integer; indx binary_integer;
4407   begin
4408 
4409     -- copy data to the local IN or IN-OUT args, if any
4410 
4411 
4412 
4413 
4414 
4415 
4416 
4417     ozf_claim_pvt_w.rosetta_table_copy_in_p3(ddp_claim_tbl, p7_a0
4418       , p7_a1
4419       , p7_a2
4420       , p7_a3
4421       , p7_a4
4422       , p7_a5
4423       , p7_a6
4424       , p7_a7
4425       , p7_a8
4426       , p7_a9
4427       , p7_a10
4428       , p7_a11
4429       , p7_a12
4430       , p7_a13
4431       , p7_a14
4432       , p7_a15
4433       , p7_a16
4434       , p7_a17
4435       , p7_a18
4436       , p7_a19
4437       , p7_a20
4438       , p7_a21
4439       , p7_a22
4440       , p7_a23
4441       , p7_a24
4442       , p7_a25
4443       , p7_a26
4444       , p7_a27
4445       , p7_a28
4446       , p7_a29
4447       , p7_a30
4448       , p7_a31
4449       , p7_a32
4450       , p7_a33
4451       , p7_a34
4452       , p7_a35
4453       , p7_a36
4454       , p7_a37
4455       , p7_a38
4456       , p7_a39
4457       , p7_a40
4458       , p7_a41
4459       , p7_a42
4460       , p7_a43
4461       , p7_a44
4462       , p7_a45
4463       , p7_a46
4464       , p7_a47
4465       , p7_a48
4466       , p7_a49
4467       , p7_a50
4468       , p7_a51
4469       , p7_a52
4470       , p7_a53
4471       , p7_a54
4472       , p7_a55
4473       , p7_a56
4474       , p7_a57
4475       , p7_a58
4476       , p7_a59
4477       , p7_a60
4478       , p7_a61
4479       , p7_a62
4480       , p7_a63
4481       , p7_a64
4482       , p7_a65
4483       , p7_a66
4484       , p7_a67
4485       , p7_a68
4486       , p7_a69
4487       , p7_a70
4488       , p7_a71
4489       , p7_a72
4490       , p7_a73
4491       , p7_a74
4492       , p7_a75
4493       , p7_a76
4494       , p7_a77
4495       , p7_a78
4496       , p7_a79
4497       , p7_a80
4498       , p7_a81
4499       , p7_a82
4500       , p7_a83
4501       , p7_a84
4502       , p7_a85
4503       , p7_a86
4504       , p7_a87
4505       , p7_a88
4506       , p7_a89
4507       , p7_a90
4508       , p7_a91
4509       , p7_a92
4510       , p7_a93
4511       , p7_a94
4512       , p7_a95
4513       , p7_a96
4514       , p7_a97
4515       , p7_a98
4516       , p7_a99
4517       , p7_a100
4518       , p7_a101
4519       , p7_a102
4520       , p7_a103
4521       , p7_a104
4522       , p7_a105
4523       , p7_a106
4524       , p7_a107
4525       , p7_a108
4526       , p7_a109
4527       , p7_a110
4528       , p7_a111
4529       , p7_a112
4530       , p7_a113
4531       , p7_a114
4532       , p7_a115
4533       , p7_a116
4534       , p7_a117
4535       , p7_a118
4536       , p7_a119
4537       , p7_a120
4538       , p7_a121
4539       , p7_a122
4540       , p7_a123
4541       , p7_a124
4542       , p7_a125
4543       , p7_a126
4544       , p7_a127
4545       , p7_a128
4546       , p7_a129
4547       , p7_a130
4548       , p7_a131
4549       , p7_a132
4550       , p7_a133
4551       , p7_a134
4552       , p7_a135
4553       , p7_a136
4554       , p7_a137
4555       , p7_a138
4556       , p7_a139
4557       , p7_a140
4558       );
4559 
4560     -- here's the delegated call to the old PL/SQL routine
4561     ozf_claim_pvt.update_claim_tbl(p_api_version,
4562       p_init_msg_list,
4563       p_commit,
4564       p_validation_level,
4565       x_return_status,
4566       x_msg_data,
4567       x_msg_count,
4568       ddp_claim_tbl);
4569 
4570     -- copy data back from the local variables to OUT or IN-OUT args, if any
4571 
4572 
4573 
4574 
4575 
4576 
4577 
4578   end;
4579 
4580 end ozf_claim_pvt_w;