DBA Data[Home] [Help]

PACKAGE BODY: APPS.HZ_CUSTOMER_PROFILE_V2PUB_JW

Source


1 package body hz_customer_profile_v2pub_jw as
2   /* $Header: ARH2CFJB.pls 120.5.12010000.2 2009/02/27 12:32:27 rgokavar 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 
6   function rosetta_g_miss_num_map(n number) return number as
7     a number := fnd_api.g_miss_num;
8     b number := 0-1962.0724;
9   begin
10     if n=a then return b; end if;
11     if n=b then return a; end if;
12     return n;
13   end;
14 
15   -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
16   function rosetta_g_miss_date_in_map(d date) return date as
17   begin
18     if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
19     return d;
20   end;
21 
22   function next_review_date_compute_1(p_review_cycle  VARCHAR2
23     , p_last_review_date  date
24     , p_next_review_date  date
25   ) return date
26   as
27     ddp_last_review_date date;
28     ddp_next_review_date date;
29     ddindx binary_integer; indx binary_integer;
30     ddrosetta_retval date;
31   begin
32 
33     -- copy data to the local IN or IN-OUT args, if any
34 
35     ddp_last_review_date := rosetta_g_miss_date_in_map(p_last_review_date);
36 
37     ddp_next_review_date := rosetta_g_miss_date_in_map(p_next_review_date);
38 
39     -- here's the delegated call to the old PL/SQL routine
40     ddrosetta_retval := hz_customer_profile_v2pub.next_review_date_compute(p_review_cycle,
41       ddp_last_review_date,
42       ddp_next_review_date);
43 
44     -- copy data back from the local OUT or IN-OUT args, if any
45 
46 
47 
48     return ddrosetta_retval;
49   end;
50 
51   function last_review_date_default_2(p_review_cycle  VARCHAR2
52     , p_last_review_date  date
53     , p_create_update_flag  VARCHAR2
54   ) return date
55   as
56     ddp_last_review_date date;
57     ddindx binary_integer; indx binary_integer;
58     ddrosetta_retval date;
59   begin
60 
61     -- copy data to the local IN or IN-OUT args, if any
62 
63     ddp_last_review_date := rosetta_g_miss_date_in_map(p_last_review_date);
64 
65 
66     -- here's the delegated call to the old PL/SQL routine
67     ddrosetta_retval := hz_customer_profile_v2pub.last_review_date_default(p_review_cycle,
68       ddp_last_review_date,
69       p_create_update_flag);
70 
71     -- copy data back from the local OUT or IN-OUT args, if any
72 
73 
74 
75     return ddrosetta_retval;
76   end;
77 
78   procedure create_customer_profile_3(p_init_msg_list  VARCHAR2
79     , p_create_profile_amt  VARCHAR2
80     , x_cust_account_profile_id out nocopy  NUMBER
81     , x_return_status out nocopy  VARCHAR2
82     , x_msg_count out nocopy  NUMBER
83     , x_msg_data out nocopy  VARCHAR2
84     , p1_a0  NUMBER := null
85     , p1_a1  NUMBER := null
86     , p1_a2  VARCHAR2 := null
87     , p1_a3  NUMBER := null
88     , p1_a4  NUMBER := null
89     , p1_a5  VARCHAR2 := null
90     , p1_a6  DATE := null
91     , p1_a7  NUMBER := null
92     , p1_a8  VARCHAR2 := null
93     , p1_a9  VARCHAR2 := null
94     , p1_a10  VARCHAR2 := null
95     , p1_a11  VARCHAR2 := null
96     , p1_a12  VARCHAR2 := null
97     , p1_a13  VARCHAR2 := null
98     , p1_a14  NUMBER := null
99     , p1_a15  NUMBER := null
100     , p1_a16  VARCHAR2 := null
101     , p1_a17  VARCHAR2 := null
102     , p1_a18  NUMBER := null
103     , p1_a19  VARCHAR2 := null
104     , p1_a20  NUMBER := null
105     , p1_a21  NUMBER := null
106     , p1_a22  NUMBER := null
107     , p1_a23  NUMBER := null
108     , p1_a24  NUMBER := null
109     , p1_a25  VARCHAR2 := null
110     , p1_a26  NUMBER := null
111     , p1_a27  NUMBER := null
112     , p1_a28  VARCHAR2 := null
113     , p1_a29  VARCHAR2 := null
114     , p1_a30  VARCHAR2 := null
115     , p1_a31  VARCHAR2 := null
116     , p1_a32  VARCHAR2 := null
117     , p1_a33  VARCHAR2 := null
118     , p1_a34  VARCHAR2 := null
119     , p1_a35  VARCHAR2 := null
120     , p1_a36  VARCHAR2 := null
121     , p1_a37  VARCHAR2 := null
122     , p1_a38  VARCHAR2 := null
123     , p1_a39  VARCHAR2 := null
124     , p1_a40  VARCHAR2 := null
125     , p1_a41  VARCHAR2 := null
126     , p1_a42  VARCHAR2 := null
127     , p1_a43  VARCHAR2 := null
128     , p1_a44  VARCHAR2 := null
129     , p1_a45  VARCHAR2 := null
130     , p1_a46  VARCHAR2 := null
131     , p1_a47  NUMBER := null
132     , p1_a48  NUMBER := null
133     , p1_a49  VARCHAR2 := null
134     , p1_a50  VARCHAR2 := null
135     , p1_a51  VARCHAR2 := null
136     , p1_a52  VARCHAR2 := null
137     , p1_a53  VARCHAR2 := null
138     , p1_a54  VARCHAR2 := null
139     , p1_a55  VARCHAR2 := null
140     , p1_a56  VARCHAR2 := null
141     , p1_a57  VARCHAR2 := null
142     , p1_a58  VARCHAR2 := null
143     , p1_a59  VARCHAR2 := null
144     , p1_a60  VARCHAR2 := null
145     , p1_a61  VARCHAR2 := null
146     , p1_a62  VARCHAR2 := null
147     , p1_a63  VARCHAR2 := null
148     , p1_a64  VARCHAR2 := null
149     , p1_a65  VARCHAR2 := null
150     , p1_a66  VARCHAR2 := null
151     , p1_a67  VARCHAR2 := null
152     , p1_a68  VARCHAR2 := null
153     , p1_a69  VARCHAR2 := null
154     , p1_a70  VARCHAR2 := null
155     , p1_a71  VARCHAR2 := null
156     , p1_a72  VARCHAR2 := null
157     , p1_a73  VARCHAR2 := null
158     , p1_a74  VARCHAR2 := null
159     , p1_a75  VARCHAR2 := null
160     , p1_a76  VARCHAR2 := null
161     , p1_a77  VARCHAR2 := null
162     , p1_a78  VARCHAR2 := null
163     , p1_a79  VARCHAR2 := null
164     , p1_a80  VARCHAR2 := null
165     , p1_a81  VARCHAR2 := null
166     , p1_a82  VARCHAR2 := null
167     , p1_a83  VARCHAR2 := null
168     , p1_a84  VARCHAR2 := null
169     , p1_a85  VARCHAR2 := null
170     , p1_a86  VARCHAR2 := null
171     , p1_a87  VARCHAR2 := null
172     , p1_a88  NUMBER := null
173     , p1_a89  VARCHAR2 := null
174     , p1_a90  VARCHAR2 := null
175     , p1_a91  NUMBER := null
176     , p1_a92  VARCHAR2 := null
177     , p1_a93  DATE := null
178     , p1_a94  NUMBER := null
179     , p1_a95  VARCHAR2 := null
180     , p1_a96  VARCHAR2 := null
181     , p1_a97  VARCHAR2 := null
182     , p1_a98  VARCHAR2 := null
183     , p1_a99  VARCHAR2 := null
184     , p1_a100  VARCHAR2 := null
185     , p1_a101  NUMBER := null
186     , p1_a102  VARCHAR2 := null
187     , p1_a103  VARCHAR2 := null
188     , p1_a104  NUMBER := null
189     , p1_a105  VARCHAR2 := null
190     , p1_a106  DATE := null
191     , p1_a107  NUMBER := null
192   )
193   as
194     ddp_customer_profile_rec hz_customer_profile_v2pub.customer_profile_rec_type;
195     ddindx binary_integer; indx binary_integer;
196   begin
197 
198     -- copy data to the local IN or IN-OUT args, if any
199 
200     ddp_customer_profile_rec.cust_account_profile_id := rosetta_g_miss_num_map(p1_a0);
201     ddp_customer_profile_rec.cust_account_id := rosetta_g_miss_num_map(p1_a1);
202     ddp_customer_profile_rec.status := p1_a2;
203     ddp_customer_profile_rec.collector_id := rosetta_g_miss_num_map(p1_a3);
204     ddp_customer_profile_rec.credit_analyst_id := rosetta_g_miss_num_map(p1_a4);
205     ddp_customer_profile_rec.credit_checking := p1_a5;
206     ddp_customer_profile_rec.next_credit_review_date := rosetta_g_miss_date_in_map(p1_a6);
207     ddp_customer_profile_rec.tolerance := rosetta_g_miss_num_map(p1_a7);
208     ddp_customer_profile_rec.discount_terms := p1_a8;
209     ddp_customer_profile_rec.dunning_letters := p1_a9;
210     ddp_customer_profile_rec.interest_charges := p1_a10;
211     ddp_customer_profile_rec.send_statements := p1_a11;
212     ddp_customer_profile_rec.credit_balance_statements := p1_a12;
213     ddp_customer_profile_rec.credit_hold := p1_a13;
214     ddp_customer_profile_rec.profile_class_id := rosetta_g_miss_num_map(p1_a14);
215     ddp_customer_profile_rec.site_use_id := rosetta_g_miss_num_map(p1_a15);
216     ddp_customer_profile_rec.credit_rating := p1_a16;
217     ddp_customer_profile_rec.risk_code := p1_a17;
218     ddp_customer_profile_rec.standard_terms := rosetta_g_miss_num_map(p1_a18);
219     ddp_customer_profile_rec.override_terms := p1_a19;
220     ddp_customer_profile_rec.dunning_letter_set_id := rosetta_g_miss_num_map(p1_a20);
221     ddp_customer_profile_rec.interest_period_days := rosetta_g_miss_num_map(p1_a21);
222     ddp_customer_profile_rec.payment_grace_days := rosetta_g_miss_num_map(p1_a22);
223     ddp_customer_profile_rec.discount_grace_days := rosetta_g_miss_num_map(p1_a23);
224     ddp_customer_profile_rec.statement_cycle_id := rosetta_g_miss_num_map(p1_a24);
225     ddp_customer_profile_rec.account_status := p1_a25;
226     ddp_customer_profile_rec.percent_collectable := rosetta_g_miss_num_map(p1_a26);
227     ddp_customer_profile_rec.autocash_hierarchy_id := rosetta_g_miss_num_map(p1_a27);
228     ddp_customer_profile_rec.attribute_category := p1_a28;
229     ddp_customer_profile_rec.attribute1 := p1_a29;
230     ddp_customer_profile_rec.attribute2 := p1_a30;
231     ddp_customer_profile_rec.attribute3 := p1_a31;
232     ddp_customer_profile_rec.attribute4 := p1_a32;
233     ddp_customer_profile_rec.attribute5 := p1_a33;
234     ddp_customer_profile_rec.attribute6 := p1_a34;
235     ddp_customer_profile_rec.attribute7 := p1_a35;
236     ddp_customer_profile_rec.attribute8 := p1_a36;
237     ddp_customer_profile_rec.attribute9 := p1_a37;
238     ddp_customer_profile_rec.attribute10 := p1_a38;
239     ddp_customer_profile_rec.attribute11 := p1_a39;
240     ddp_customer_profile_rec.attribute12 := p1_a40;
241     ddp_customer_profile_rec.attribute13 := p1_a41;
242     ddp_customer_profile_rec.attribute14 := p1_a42;
243     ddp_customer_profile_rec.attribute15 := p1_a43;
244     ddp_customer_profile_rec.auto_rec_incl_disputed_flag := p1_a44;
245     ddp_customer_profile_rec.tax_printing_option := p1_a45;
246     ddp_customer_profile_rec.charge_on_finance_charge_flag := p1_a46;
247     ddp_customer_profile_rec.grouping_rule_id := rosetta_g_miss_num_map(p1_a47);
248     ddp_customer_profile_rec.clearing_days := rosetta_g_miss_num_map(p1_a48);
249     ddp_customer_profile_rec.jgzz_attribute_category := p1_a49;
250     ddp_customer_profile_rec.jgzz_attribute1 := p1_a50;
251     ddp_customer_profile_rec.jgzz_attribute2 := p1_a51;
252     ddp_customer_profile_rec.jgzz_attribute3 := p1_a52;
253     ddp_customer_profile_rec.jgzz_attribute4 := p1_a53;
254     ddp_customer_profile_rec.jgzz_attribute5 := p1_a54;
255     ddp_customer_profile_rec.jgzz_attribute6 := p1_a55;
256     ddp_customer_profile_rec.jgzz_attribute7 := p1_a56;
257     ddp_customer_profile_rec.jgzz_attribute8 := p1_a57;
258     ddp_customer_profile_rec.jgzz_attribute9 := p1_a58;
259     ddp_customer_profile_rec.jgzz_attribute10 := p1_a59;
260     ddp_customer_profile_rec.jgzz_attribute11 := p1_a60;
261     ddp_customer_profile_rec.jgzz_attribute12 := p1_a61;
262     ddp_customer_profile_rec.jgzz_attribute13 := p1_a62;
263     ddp_customer_profile_rec.jgzz_attribute14 := p1_a63;
264     ddp_customer_profile_rec.jgzz_attribute15 := p1_a64;
265     ddp_customer_profile_rec.global_attribute1 := p1_a65;
266     ddp_customer_profile_rec.global_attribute2 := p1_a66;
267     ddp_customer_profile_rec.global_attribute3 := p1_a67;
268     ddp_customer_profile_rec.global_attribute4 := p1_a68;
269     ddp_customer_profile_rec.global_attribute5 := p1_a69;
270     ddp_customer_profile_rec.global_attribute6 := p1_a70;
271     ddp_customer_profile_rec.global_attribute7 := p1_a71;
272     ddp_customer_profile_rec.global_attribute8 := p1_a72;
273     ddp_customer_profile_rec.global_attribute9 := p1_a73;
274     ddp_customer_profile_rec.global_attribute10 := p1_a74;
275     ddp_customer_profile_rec.global_attribute11 := p1_a75;
276     ddp_customer_profile_rec.global_attribute12 := p1_a76;
277     ddp_customer_profile_rec.global_attribute13 := p1_a77;
278     ddp_customer_profile_rec.global_attribute14 := p1_a78;
279     ddp_customer_profile_rec.global_attribute15 := p1_a79;
280     ddp_customer_profile_rec.global_attribute16 := p1_a80;
281     ddp_customer_profile_rec.global_attribute17 := p1_a81;
282     ddp_customer_profile_rec.global_attribute18 := p1_a82;
283     ddp_customer_profile_rec.global_attribute19 := p1_a83;
284     ddp_customer_profile_rec.global_attribute20 := p1_a84;
285     ddp_customer_profile_rec.global_attribute_category := p1_a85;
286     ddp_customer_profile_rec.cons_inv_flag := p1_a86;
287     ddp_customer_profile_rec.cons_inv_type := p1_a87;
288     ddp_customer_profile_rec.autocash_hierarchy_id_for_adr := rosetta_g_miss_num_map(p1_a88);
289     ddp_customer_profile_rec.lockbox_matching_option := p1_a89;
290     ddp_customer_profile_rec.created_by_module := p1_a90;
291     ddp_customer_profile_rec.application_id := rosetta_g_miss_num_map(p1_a91);
292     ddp_customer_profile_rec.review_cycle := p1_a92;
293     ddp_customer_profile_rec.last_credit_review_date := rosetta_g_miss_date_in_map(p1_a93);
294     ddp_customer_profile_rec.party_id := rosetta_g_miss_num_map(p1_a94);
295     ddp_customer_profile_rec.credit_classification := p1_a95;
296     ddp_customer_profile_rec.cons_bill_level := p1_a96;
297     ddp_customer_profile_rec.late_charge_calculation_trx := p1_a97;
298     ddp_customer_profile_rec.credit_items_flag := p1_a98;
299     ddp_customer_profile_rec.disputed_transactions_flag := p1_a99;
300     ddp_customer_profile_rec.late_charge_type := p1_a100;
301     ddp_customer_profile_rec.late_charge_term_id := rosetta_g_miss_num_map(p1_a101);
302     ddp_customer_profile_rec.interest_calculation_period := p1_a102;
303     ddp_customer_profile_rec.hold_charged_invoices_flag := p1_a103;
304     ddp_customer_profile_rec.message_text_id := rosetta_g_miss_num_map(p1_a104);
305     ddp_customer_profile_rec.multiple_interest_rates_flag := p1_a105;
306     ddp_customer_profile_rec.charge_begin_date := rosetta_g_miss_date_in_map(p1_a106);
307     ddp_customer_profile_rec.automatch_set_id  := rosetta_g_miss_num_map(p1_a107);
308 
309 
310 
311 
312     -- here's the delegated call to the old PL/SQL routine
313     hz_customer_profile_v2pub.create_customer_profile(p_init_msg_list,
314       ddp_customer_profile_rec,
315       p_create_profile_amt,
316       x_cust_account_profile_id,
317       x_return_status,
318       x_msg_count,
319       x_msg_data);
320 
321     -- copy data back from the local OUT or IN-OUT args, if any
322 
323 
324 
325 
326 
327 
328   end;
329 
330   procedure update_customer_profile_4(p_init_msg_list  VARCHAR2
331     , p_object_version_number in out nocopy  NUMBER
335     , p1_a0  NUMBER := null
332     , x_return_status out nocopy  VARCHAR2
333     , x_msg_count out nocopy  NUMBER
334     , x_msg_data out nocopy  VARCHAR2
336     , p1_a1  NUMBER := null
337     , p1_a2  VARCHAR2 := null
338     , p1_a3  NUMBER := null
339     , p1_a4  NUMBER := null
340     , p1_a5  VARCHAR2 := null
341     , p1_a6  DATE := null
342     , p1_a7  NUMBER := null
343     , p1_a8  VARCHAR2 := null
344     , p1_a9  VARCHAR2 := null
345     , p1_a10  VARCHAR2 := null
346     , p1_a11  VARCHAR2 := null
347     , p1_a12  VARCHAR2 := null
348     , p1_a13  VARCHAR2 := null
349     , p1_a14  NUMBER := null
350     , p1_a15  NUMBER := null
351     , p1_a16  VARCHAR2 := null
352     , p1_a17  VARCHAR2 := null
353     , p1_a18  NUMBER := null
354     , p1_a19  VARCHAR2 := null
355     , p1_a20  NUMBER := null
356     , p1_a21  NUMBER := null
357     , p1_a22  NUMBER := null
358     , p1_a23  NUMBER := null
359     , p1_a24  NUMBER := null
360     , p1_a25  VARCHAR2 := null
361     , p1_a26  NUMBER := null
362     , p1_a27  NUMBER := null
363     , p1_a28  VARCHAR2 := null
364     , p1_a29  VARCHAR2 := null
365     , p1_a30  VARCHAR2 := null
366     , p1_a31  VARCHAR2 := null
367     , p1_a32  VARCHAR2 := null
368     , p1_a33  VARCHAR2 := null
369     , p1_a34  VARCHAR2 := null
370     , p1_a35  VARCHAR2 := null
371     , p1_a36  VARCHAR2 := null
372     , p1_a37  VARCHAR2 := null
373     , p1_a38  VARCHAR2 := null
374     , p1_a39  VARCHAR2 := null
375     , p1_a40  VARCHAR2 := null
376     , p1_a41  VARCHAR2 := null
377     , p1_a42  VARCHAR2 := null
378     , p1_a43  VARCHAR2 := null
379     , p1_a44  VARCHAR2 := null
380     , p1_a45  VARCHAR2 := null
381     , p1_a46  VARCHAR2 := null
382     , p1_a47  NUMBER := null
383     , p1_a48  NUMBER := null
384     , p1_a49  VARCHAR2 := null
385     , p1_a50  VARCHAR2 := null
386     , p1_a51  VARCHAR2 := null
387     , p1_a52  VARCHAR2 := null
388     , p1_a53  VARCHAR2 := null
389     , p1_a54  VARCHAR2 := null
390     , p1_a55  VARCHAR2 := null
391     , p1_a56  VARCHAR2 := null
392     , p1_a57  VARCHAR2 := null
393     , p1_a58  VARCHAR2 := null
394     , p1_a59  VARCHAR2 := null
395     , p1_a60  VARCHAR2 := null
396     , p1_a61  VARCHAR2 := null
397     , p1_a62  VARCHAR2 := null
398     , p1_a63  VARCHAR2 := null
399     , p1_a64  VARCHAR2 := null
400     , p1_a65  VARCHAR2 := null
401     , p1_a66  VARCHAR2 := null
402     , p1_a67  VARCHAR2 := null
403     , p1_a68  VARCHAR2 := null
404     , p1_a69  VARCHAR2 := null
405     , p1_a70  VARCHAR2 := null
406     , p1_a71  VARCHAR2 := null
407     , p1_a72  VARCHAR2 := null
408     , p1_a73  VARCHAR2 := null
409     , p1_a74  VARCHAR2 := null
410     , p1_a75  VARCHAR2 := null
411     , p1_a76  VARCHAR2 := null
412     , p1_a77  VARCHAR2 := null
413     , p1_a78  VARCHAR2 := null
414     , p1_a79  VARCHAR2 := null
415     , p1_a80  VARCHAR2 := null
416     , p1_a81  VARCHAR2 := null
417     , p1_a82  VARCHAR2 := null
418     , p1_a83  VARCHAR2 := null
419     , p1_a84  VARCHAR2 := null
420     , p1_a85  VARCHAR2 := null
421     , p1_a86  VARCHAR2 := null
422     , p1_a87  VARCHAR2 := null
423     , p1_a88  NUMBER := null
424     , p1_a89  VARCHAR2 := null
425     , p1_a90  VARCHAR2 := null
426     , p1_a91  NUMBER := null
427     , p1_a92  VARCHAR2 := null
428     , p1_a93  DATE := null
429     , p1_a94  NUMBER := null
430     , p1_a95  VARCHAR2 := null
431     , p1_a96  VARCHAR2 := null
432     , p1_a97  VARCHAR2 := null
433     , p1_a98  VARCHAR2 := null
434     , p1_a99  VARCHAR2 := null
435     , p1_a100  VARCHAR2 := null
436     , p1_a101  NUMBER := null
437     , p1_a102  VARCHAR2 := null
438     , p1_a103  VARCHAR2 := null
439     , p1_a104  NUMBER := null
440     , p1_a105  VARCHAR2 := null
441     , p1_a106  DATE := null
442     , p1_a107  NUMBER := null
443   )
444   as
445     ddp_customer_profile_rec hz_customer_profile_v2pub.customer_profile_rec_type;
446     ddindx binary_integer; indx binary_integer;
447   begin
448 
449     -- copy data to the local IN or IN-OUT args, if any
450 
451     ddp_customer_profile_rec.cust_account_profile_id := rosetta_g_miss_num_map(p1_a0);
452     ddp_customer_profile_rec.cust_account_id := rosetta_g_miss_num_map(p1_a1);
453     ddp_customer_profile_rec.status := p1_a2;
454     ddp_customer_profile_rec.collector_id := rosetta_g_miss_num_map(p1_a3);
455     ddp_customer_profile_rec.credit_analyst_id := rosetta_g_miss_num_map(p1_a4);
456     ddp_customer_profile_rec.credit_checking := p1_a5;
457     ddp_customer_profile_rec.next_credit_review_date := rosetta_g_miss_date_in_map(p1_a6);
458     ddp_customer_profile_rec.tolerance := rosetta_g_miss_num_map(p1_a7);
459     ddp_customer_profile_rec.discount_terms := p1_a8;
460     ddp_customer_profile_rec.dunning_letters := p1_a9;
461     ddp_customer_profile_rec.interest_charges := p1_a10;
462     ddp_customer_profile_rec.send_statements := p1_a11;
463     ddp_customer_profile_rec.credit_balance_statements := p1_a12;
464     ddp_customer_profile_rec.credit_hold := p1_a13;
465     ddp_customer_profile_rec.profile_class_id := rosetta_g_miss_num_map(p1_a14);
466     ddp_customer_profile_rec.site_use_id := rosetta_g_miss_num_map(p1_a15);
467     ddp_customer_profile_rec.credit_rating := p1_a16;
471     ddp_customer_profile_rec.dunning_letter_set_id := rosetta_g_miss_num_map(p1_a20);
468     ddp_customer_profile_rec.risk_code := p1_a17;
469     ddp_customer_profile_rec.standard_terms := rosetta_g_miss_num_map(p1_a18);
470     ddp_customer_profile_rec.override_terms := p1_a19;
472     ddp_customer_profile_rec.interest_period_days := rosetta_g_miss_num_map(p1_a21);
473     ddp_customer_profile_rec.payment_grace_days := rosetta_g_miss_num_map(p1_a22);
474     ddp_customer_profile_rec.discount_grace_days := rosetta_g_miss_num_map(p1_a23);
475     ddp_customer_profile_rec.statement_cycle_id := rosetta_g_miss_num_map(p1_a24);
476     ddp_customer_profile_rec.account_status := p1_a25;
477     ddp_customer_profile_rec.percent_collectable := rosetta_g_miss_num_map(p1_a26);
478     ddp_customer_profile_rec.autocash_hierarchy_id := rosetta_g_miss_num_map(p1_a27);
479     ddp_customer_profile_rec.attribute_category := p1_a28;
480     ddp_customer_profile_rec.attribute1 := p1_a29;
481     ddp_customer_profile_rec.attribute2 := p1_a30;
482     ddp_customer_profile_rec.attribute3 := p1_a31;
483     ddp_customer_profile_rec.attribute4 := p1_a32;
484     ddp_customer_profile_rec.attribute5 := p1_a33;
485     ddp_customer_profile_rec.attribute6 := p1_a34;
486     ddp_customer_profile_rec.attribute7 := p1_a35;
487     ddp_customer_profile_rec.attribute8 := p1_a36;
488     ddp_customer_profile_rec.attribute9 := p1_a37;
489     ddp_customer_profile_rec.attribute10 := p1_a38;
490     ddp_customer_profile_rec.attribute11 := p1_a39;
491     ddp_customer_profile_rec.attribute12 := p1_a40;
492     ddp_customer_profile_rec.attribute13 := p1_a41;
493     ddp_customer_profile_rec.attribute14 := p1_a42;
494     ddp_customer_profile_rec.attribute15 := p1_a43;
495     ddp_customer_profile_rec.auto_rec_incl_disputed_flag := p1_a44;
496     ddp_customer_profile_rec.tax_printing_option := p1_a45;
497     ddp_customer_profile_rec.charge_on_finance_charge_flag := p1_a46;
498     ddp_customer_profile_rec.grouping_rule_id := rosetta_g_miss_num_map(p1_a47);
499     ddp_customer_profile_rec.clearing_days := rosetta_g_miss_num_map(p1_a48);
500     ddp_customer_profile_rec.jgzz_attribute_category := p1_a49;
501     ddp_customer_profile_rec.jgzz_attribute1 := p1_a50;
502     ddp_customer_profile_rec.jgzz_attribute2 := p1_a51;
503     ddp_customer_profile_rec.jgzz_attribute3 := p1_a52;
504     ddp_customer_profile_rec.jgzz_attribute4 := p1_a53;
505     ddp_customer_profile_rec.jgzz_attribute5 := p1_a54;
506     ddp_customer_profile_rec.jgzz_attribute6 := p1_a55;
507     ddp_customer_profile_rec.jgzz_attribute7 := p1_a56;
508     ddp_customer_profile_rec.jgzz_attribute8 := p1_a57;
509     ddp_customer_profile_rec.jgzz_attribute9 := p1_a58;
510     ddp_customer_profile_rec.jgzz_attribute10 := p1_a59;
511     ddp_customer_profile_rec.jgzz_attribute11 := p1_a60;
512     ddp_customer_profile_rec.jgzz_attribute12 := p1_a61;
513     ddp_customer_profile_rec.jgzz_attribute13 := p1_a62;
514     ddp_customer_profile_rec.jgzz_attribute14 := p1_a63;
515     ddp_customer_profile_rec.jgzz_attribute15 := p1_a64;
516     ddp_customer_profile_rec.global_attribute1 := p1_a65;
517     ddp_customer_profile_rec.global_attribute2 := p1_a66;
518     ddp_customer_profile_rec.global_attribute3 := p1_a67;
519     ddp_customer_profile_rec.global_attribute4 := p1_a68;
520     ddp_customer_profile_rec.global_attribute5 := p1_a69;
521     ddp_customer_profile_rec.global_attribute6 := p1_a70;
522     ddp_customer_profile_rec.global_attribute7 := p1_a71;
523     ddp_customer_profile_rec.global_attribute8 := p1_a72;
524     ddp_customer_profile_rec.global_attribute9 := p1_a73;
525     ddp_customer_profile_rec.global_attribute10 := p1_a74;
526     ddp_customer_profile_rec.global_attribute11 := p1_a75;
527     ddp_customer_profile_rec.global_attribute12 := p1_a76;
528     ddp_customer_profile_rec.global_attribute13 := p1_a77;
529     ddp_customer_profile_rec.global_attribute14 := p1_a78;
530     ddp_customer_profile_rec.global_attribute15 := p1_a79;
531     ddp_customer_profile_rec.global_attribute16 := p1_a80;
532     ddp_customer_profile_rec.global_attribute17 := p1_a81;
533     ddp_customer_profile_rec.global_attribute18 := p1_a82;
534     ddp_customer_profile_rec.global_attribute19 := p1_a83;
535     ddp_customer_profile_rec.global_attribute20 := p1_a84;
536     ddp_customer_profile_rec.global_attribute_category := p1_a85;
537     ddp_customer_profile_rec.cons_inv_flag := p1_a86;
538     ddp_customer_profile_rec.cons_inv_type := p1_a87;
539     ddp_customer_profile_rec.autocash_hierarchy_id_for_adr := rosetta_g_miss_num_map(p1_a88);
540     ddp_customer_profile_rec.lockbox_matching_option := p1_a89;
541     ddp_customer_profile_rec.created_by_module := p1_a90;
542     ddp_customer_profile_rec.application_id := rosetta_g_miss_num_map(p1_a91);
543     ddp_customer_profile_rec.review_cycle := p1_a92;
544     ddp_customer_profile_rec.last_credit_review_date := rosetta_g_miss_date_in_map(p1_a93);
545     ddp_customer_profile_rec.party_id := rosetta_g_miss_num_map(p1_a94);
546     ddp_customer_profile_rec.credit_classification := p1_a95;
547     ddp_customer_profile_rec.cons_bill_level := p1_a96;
548     ddp_customer_profile_rec.late_charge_calculation_trx := p1_a97;
549     ddp_customer_profile_rec.credit_items_flag := p1_a98;
550     ddp_customer_profile_rec.disputed_transactions_flag := p1_a99;
551     ddp_customer_profile_rec.late_charge_type := p1_a100;
552     ddp_customer_profile_rec.late_charge_term_id := rosetta_g_miss_num_map(p1_a101);
553     ddp_customer_profile_rec.interest_calculation_period := p1_a102;
554     ddp_customer_profile_rec.hold_charged_invoices_flag := p1_a103;
558     ddp_customer_profile_rec.automatch_set_id  := rosetta_g_miss_num_map(p1_a107);
555     ddp_customer_profile_rec.message_text_id := rosetta_g_miss_num_map(p1_a104);
556     ddp_customer_profile_rec.multiple_interest_rates_flag := p1_a105;
557     ddp_customer_profile_rec.charge_begin_date := rosetta_g_miss_date_in_map(p1_a106);
559 
560 
561 
562 
563     -- here's the delegated call to the old PL/SQL routine
564     hz_customer_profile_v2pub.update_customer_profile(p_init_msg_list,
565       ddp_customer_profile_rec,
566       p_object_version_number,
567       x_return_status,
568       x_msg_count,
569       x_msg_data);
570 
571     -- copy data back from the local OUT or IN-OUT args, if any
572 
573 
574 
575 
576 
577   end;
578 
579   procedure get_customer_profile_rec_5(p_init_msg_list  VARCHAR2
580     , p_cust_account_profile_id  NUMBER
581     , p2_a0 out nocopy  NUMBER
582     , p2_a1 out nocopy  NUMBER
583     , p2_a2 out nocopy  VARCHAR2
584     , p2_a3 out nocopy  NUMBER
585     , p2_a4 out nocopy  NUMBER
586     , p2_a5 out nocopy  VARCHAR2
587     , p2_a6 out nocopy  DATE
588     , p2_a7 out nocopy  NUMBER
589     , p2_a8 out nocopy  VARCHAR2
590     , p2_a9 out nocopy  VARCHAR2
591     , p2_a10 out nocopy  VARCHAR2
592     , p2_a11 out nocopy  VARCHAR2
593     , p2_a12 out nocopy  VARCHAR2
594     , p2_a13 out nocopy  VARCHAR2
595     , p2_a14 out nocopy  NUMBER
596     , p2_a15 out nocopy  NUMBER
597     , p2_a16 out nocopy  VARCHAR2
598     , p2_a17 out nocopy  VARCHAR2
599     , p2_a18 out nocopy  NUMBER
600     , p2_a19 out nocopy  VARCHAR2
601     , p2_a20 out nocopy  NUMBER
602     , p2_a21 out nocopy  NUMBER
603     , p2_a22 out nocopy  NUMBER
604     , p2_a23 out nocopy  NUMBER
605     , p2_a24 out nocopy  NUMBER
606     , p2_a25 out nocopy  VARCHAR2
607     , p2_a26 out nocopy  NUMBER
608     , p2_a27 out nocopy  NUMBER
609     , p2_a28 out nocopy  VARCHAR2
610     , p2_a29 out nocopy  VARCHAR2
611     , p2_a30 out nocopy  VARCHAR2
612     , p2_a31 out nocopy  VARCHAR2
613     , p2_a32 out nocopy  VARCHAR2
614     , p2_a33 out nocopy  VARCHAR2
615     , p2_a34 out nocopy  VARCHAR2
616     , p2_a35 out nocopy  VARCHAR2
617     , p2_a36 out nocopy  VARCHAR2
618     , p2_a37 out nocopy  VARCHAR2
619     , p2_a38 out nocopy  VARCHAR2
620     , p2_a39 out nocopy  VARCHAR2
621     , p2_a40 out nocopy  VARCHAR2
622     , p2_a41 out nocopy  VARCHAR2
623     , p2_a42 out nocopy  VARCHAR2
624     , p2_a43 out nocopy  VARCHAR2
625     , p2_a44 out nocopy  VARCHAR2
626     , p2_a45 out nocopy  VARCHAR2
627     , p2_a46 out nocopy  VARCHAR2
628     , p2_a47 out nocopy  NUMBER
629     , p2_a48 out nocopy  NUMBER
630     , p2_a49 out nocopy  VARCHAR2
631     , p2_a50 out nocopy  VARCHAR2
632     , p2_a51 out nocopy  VARCHAR2
633     , p2_a52 out nocopy  VARCHAR2
634     , p2_a53 out nocopy  VARCHAR2
635     , p2_a54 out nocopy  VARCHAR2
636     , p2_a55 out nocopy  VARCHAR2
637     , p2_a56 out nocopy  VARCHAR2
638     , p2_a57 out nocopy  VARCHAR2
639     , p2_a58 out nocopy  VARCHAR2
640     , p2_a59 out nocopy  VARCHAR2
641     , p2_a60 out nocopy  VARCHAR2
642     , p2_a61 out nocopy  VARCHAR2
643     , p2_a62 out nocopy  VARCHAR2
644     , p2_a63 out nocopy  VARCHAR2
645     , p2_a64 out nocopy  VARCHAR2
646     , p2_a65 out nocopy  VARCHAR2
647     , p2_a66 out nocopy  VARCHAR2
648     , p2_a67 out nocopy  VARCHAR2
649     , p2_a68 out nocopy  VARCHAR2
650     , p2_a69 out nocopy  VARCHAR2
651     , p2_a70 out nocopy  VARCHAR2
652     , p2_a71 out nocopy  VARCHAR2
653     , p2_a72 out nocopy  VARCHAR2
654     , p2_a73 out nocopy  VARCHAR2
655     , p2_a74 out nocopy  VARCHAR2
656     , p2_a75 out nocopy  VARCHAR2
657     , p2_a76 out nocopy  VARCHAR2
658     , p2_a77 out nocopy  VARCHAR2
659     , p2_a78 out nocopy  VARCHAR2
660     , p2_a79 out nocopy  VARCHAR2
661     , p2_a80 out nocopy  VARCHAR2
662     , p2_a81 out nocopy  VARCHAR2
663     , p2_a82 out nocopy  VARCHAR2
664     , p2_a83 out nocopy  VARCHAR2
665     , p2_a84 out nocopy  VARCHAR2
666     , p2_a85 out nocopy  VARCHAR2
667     , p2_a86 out nocopy  VARCHAR2
668     , p2_a87 out nocopy  VARCHAR2
669     , p2_a88 out nocopy  NUMBER
670     , p2_a89 out nocopy  VARCHAR2
671     , p2_a90 out nocopy  VARCHAR2
672     , p2_a91 out nocopy  NUMBER
673     , p2_a92 out nocopy  VARCHAR2
674     , p2_a93 out nocopy  DATE
675     , p2_a94 out nocopy  NUMBER
676     , p2_a95 out nocopy  VARCHAR2
677     , p2_a96 out nocopy  VARCHAR2
678     , p2_a97 out nocopy  VARCHAR2
679     , p2_a98 out nocopy  VARCHAR2
680     , p2_a99 out nocopy  VARCHAR2
681     , p2_a100 out nocopy  VARCHAR2
682     , p2_a101 out nocopy  NUMBER
683     , p2_a102 out nocopy  VARCHAR2
684     , p2_a103 out nocopy  VARCHAR2
685     , p2_a104 out nocopy  NUMBER
686     , p2_a105 out nocopy  VARCHAR2
687     , p2_a106 out nocopy  DATE
688     , p2_a107 out nocopy  NUMBER
689     , x_return_status out nocopy  VARCHAR2
690     , x_msg_count out nocopy  NUMBER
691     , x_msg_data out nocopy  VARCHAR2
692   )
693   as
694     ddx_customer_profile_rec hz_customer_profile_v2pub.customer_profile_rec_type;
695     ddindx binary_integer; indx binary_integer;
696   begin
697 
698     -- copy data to the local IN or IN-OUT args, if any
699 
700 
701 
705     -- here's the delegated call to the old PL/SQL routine
702 
703 
704 
706     hz_customer_profile_v2pub.get_customer_profile_rec(p_init_msg_list,
707       p_cust_account_profile_id,
708       ddx_customer_profile_rec,
709       x_return_status,
710       x_msg_count,
711       x_msg_data);
712 
713     -- copy data back from the local OUT or IN-OUT args, if any
714 
715 
716     p2_a0 := rosetta_g_miss_num_map(ddx_customer_profile_rec.cust_account_profile_id);
717     p2_a1 := rosetta_g_miss_num_map(ddx_customer_profile_rec.cust_account_id);
718     p2_a2 := ddx_customer_profile_rec.status;
719     p2_a3 := rosetta_g_miss_num_map(ddx_customer_profile_rec.collector_id);
720     p2_a4 := rosetta_g_miss_num_map(ddx_customer_profile_rec.credit_analyst_id);
721     p2_a5 := ddx_customer_profile_rec.credit_checking;
722     p2_a6 := ddx_customer_profile_rec.next_credit_review_date;
723     p2_a7 := rosetta_g_miss_num_map(ddx_customer_profile_rec.tolerance);
724     p2_a8 := ddx_customer_profile_rec.discount_terms;
725     p2_a9 := ddx_customer_profile_rec.dunning_letters;
726     p2_a10 := ddx_customer_profile_rec.interest_charges;
727     p2_a11 := ddx_customer_profile_rec.send_statements;
728     p2_a12 := ddx_customer_profile_rec.credit_balance_statements;
729     p2_a13 := ddx_customer_profile_rec.credit_hold;
730     p2_a14 := rosetta_g_miss_num_map(ddx_customer_profile_rec.profile_class_id);
731     p2_a15 := rosetta_g_miss_num_map(ddx_customer_profile_rec.site_use_id);
732     p2_a16 := ddx_customer_profile_rec.credit_rating;
733     p2_a17 := ddx_customer_profile_rec.risk_code;
734     p2_a18 := rosetta_g_miss_num_map(ddx_customer_profile_rec.standard_terms);
735     p2_a19 := ddx_customer_profile_rec.override_terms;
736     p2_a20 := rosetta_g_miss_num_map(ddx_customer_profile_rec.dunning_letter_set_id);
737     p2_a21 := rosetta_g_miss_num_map(ddx_customer_profile_rec.interest_period_days);
738     p2_a22 := rosetta_g_miss_num_map(ddx_customer_profile_rec.payment_grace_days);
739     p2_a23 := rosetta_g_miss_num_map(ddx_customer_profile_rec.discount_grace_days);
740     p2_a24 := rosetta_g_miss_num_map(ddx_customer_profile_rec.statement_cycle_id);
741     p2_a25 := ddx_customer_profile_rec.account_status;
742     p2_a26 := rosetta_g_miss_num_map(ddx_customer_profile_rec.percent_collectable);
743     p2_a27 := rosetta_g_miss_num_map(ddx_customer_profile_rec.autocash_hierarchy_id);
744     p2_a28 := ddx_customer_profile_rec.attribute_category;
745     p2_a29 := ddx_customer_profile_rec.attribute1;
746     p2_a30 := ddx_customer_profile_rec.attribute2;
747     p2_a31 := ddx_customer_profile_rec.attribute3;
748     p2_a32 := ddx_customer_profile_rec.attribute4;
749     p2_a33 := ddx_customer_profile_rec.attribute5;
750     p2_a34 := ddx_customer_profile_rec.attribute6;
751     p2_a35 := ddx_customer_profile_rec.attribute7;
752     p2_a36 := ddx_customer_profile_rec.attribute8;
753     p2_a37 := ddx_customer_profile_rec.attribute9;
754     p2_a38 := ddx_customer_profile_rec.attribute10;
755     p2_a39 := ddx_customer_profile_rec.attribute11;
756     p2_a40 := ddx_customer_profile_rec.attribute12;
757     p2_a41 := ddx_customer_profile_rec.attribute13;
758     p2_a42 := ddx_customer_profile_rec.attribute14;
759     p2_a43 := ddx_customer_profile_rec.attribute15;
760     p2_a44 := ddx_customer_profile_rec.auto_rec_incl_disputed_flag;
761     p2_a45 := ddx_customer_profile_rec.tax_printing_option;
762     p2_a46 := ddx_customer_profile_rec.charge_on_finance_charge_flag;
763     p2_a47 := rosetta_g_miss_num_map(ddx_customer_profile_rec.grouping_rule_id);
764     p2_a48 := rosetta_g_miss_num_map(ddx_customer_profile_rec.clearing_days);
765     p2_a49 := ddx_customer_profile_rec.jgzz_attribute_category;
766     p2_a50 := ddx_customer_profile_rec.jgzz_attribute1;
767     p2_a51 := ddx_customer_profile_rec.jgzz_attribute2;
768     p2_a52 := ddx_customer_profile_rec.jgzz_attribute3;
769     p2_a53 := ddx_customer_profile_rec.jgzz_attribute4;
770     p2_a54 := ddx_customer_profile_rec.jgzz_attribute5;
771     p2_a55 := ddx_customer_profile_rec.jgzz_attribute6;
772     p2_a56 := ddx_customer_profile_rec.jgzz_attribute7;
773     p2_a57 := ddx_customer_profile_rec.jgzz_attribute8;
774     p2_a58 := ddx_customer_profile_rec.jgzz_attribute9;
775     p2_a59 := ddx_customer_profile_rec.jgzz_attribute10;
776     p2_a60 := ddx_customer_profile_rec.jgzz_attribute11;
777     p2_a61 := ddx_customer_profile_rec.jgzz_attribute12;
778     p2_a62 := ddx_customer_profile_rec.jgzz_attribute13;
779     p2_a63 := ddx_customer_profile_rec.jgzz_attribute14;
780     p2_a64 := ddx_customer_profile_rec.jgzz_attribute15;
781     p2_a65 := ddx_customer_profile_rec.global_attribute1;
782     p2_a66 := ddx_customer_profile_rec.global_attribute2;
783     p2_a67 := ddx_customer_profile_rec.global_attribute3;
784     p2_a68 := ddx_customer_profile_rec.global_attribute4;
785     p2_a69 := ddx_customer_profile_rec.global_attribute5;
786     p2_a70 := ddx_customer_profile_rec.global_attribute6;
787     p2_a71 := ddx_customer_profile_rec.global_attribute7;
788     p2_a72 := ddx_customer_profile_rec.global_attribute8;
789     p2_a73 := ddx_customer_profile_rec.global_attribute9;
790     p2_a74 := ddx_customer_profile_rec.global_attribute10;
791     p2_a75 := ddx_customer_profile_rec.global_attribute11;
792     p2_a76 := ddx_customer_profile_rec.global_attribute12;
793     p2_a77 := ddx_customer_profile_rec.global_attribute13;
794     p2_a78 := ddx_customer_profile_rec.global_attribute14;
795     p2_a79 := ddx_customer_profile_rec.global_attribute15;
799     p2_a83 := ddx_customer_profile_rec.global_attribute19;
796     p2_a80 := ddx_customer_profile_rec.global_attribute16;
797     p2_a81 := ddx_customer_profile_rec.global_attribute17;
798     p2_a82 := ddx_customer_profile_rec.global_attribute18;
800     p2_a84 := ddx_customer_profile_rec.global_attribute20;
801     p2_a85 := ddx_customer_profile_rec.global_attribute_category;
802     p2_a86 := ddx_customer_profile_rec.cons_inv_flag;
803     p2_a87 := ddx_customer_profile_rec.cons_inv_type;
804     p2_a88 := rosetta_g_miss_num_map(ddx_customer_profile_rec.autocash_hierarchy_id_for_adr);
805     p2_a89 := ddx_customer_profile_rec.lockbox_matching_option;
806     p2_a90 := ddx_customer_profile_rec.created_by_module;
807     p2_a91 := rosetta_g_miss_num_map(ddx_customer_profile_rec.application_id);
808     p2_a92 := ddx_customer_profile_rec.review_cycle;
809     p2_a93 := ddx_customer_profile_rec.last_credit_review_date;
810     p2_a94 := rosetta_g_miss_num_map(ddx_customer_profile_rec.party_id);
811     p2_a95 := ddx_customer_profile_rec.credit_classification;
812     p2_a96 := ddx_customer_profile_rec.cons_bill_level;
813     p2_a97 := ddx_customer_profile_rec.late_charge_calculation_trx;
814     p2_a98 := ddx_customer_profile_rec.credit_items_flag;
815     p2_a99 := ddx_customer_profile_rec.disputed_transactions_flag;
816     p2_a100 := ddx_customer_profile_rec.late_charge_type;
817     p2_a101 := rosetta_g_miss_num_map(ddx_customer_profile_rec.late_charge_term_id);
818     p2_a102 := ddx_customer_profile_rec.interest_calculation_period;
819     p2_a103 := ddx_customer_profile_rec.hold_charged_invoices_flag;
820     p2_a104 := rosetta_g_miss_num_map(ddx_customer_profile_rec.message_text_id);
821     p2_a105 := ddx_customer_profile_rec.multiple_interest_rates_flag;
822     p2_a106 := ddx_customer_profile_rec.charge_begin_date;
823     p2_a107 := ddx_customer_profile_rec.automatch_set_id;
824 
825 
826   end;
827 
828   procedure create_cust_profile_amt_6(p_init_msg_list  VARCHAR2
829     , p_check_foreign_key  VARCHAR2
830     , x_cust_acct_profile_amt_id out nocopy  NUMBER
831     , x_return_status out nocopy  VARCHAR2
832     , x_msg_count out nocopy  NUMBER
833     , x_msg_data out nocopy  VARCHAR2
834     , p2_a0  NUMBER := null
835     , p2_a1  NUMBER := null
836     , p2_a2  VARCHAR2 := null
837     , p2_a3  NUMBER := null
838     , p2_a4  NUMBER := null
839     , p2_a5  NUMBER := null
840     , p2_a6  NUMBER := null
841     , p2_a7  NUMBER := null
842     , p2_a8  NUMBER := null
843     , p2_a9  NUMBER := null
844     , p2_a10  NUMBER := null
845     , p2_a11  VARCHAR2 := null
846     , p2_a12  VARCHAR2 := null
847     , p2_a13  VARCHAR2 := null
848     , p2_a14  VARCHAR2 := null
849     , p2_a15  VARCHAR2 := null
850     , p2_a16  VARCHAR2 := null
851     , p2_a17  VARCHAR2 := null
852     , p2_a18  VARCHAR2 := null
853     , p2_a19  VARCHAR2 := null
854     , p2_a20  VARCHAR2 := null
855     , p2_a21  VARCHAR2 := null
856     , p2_a22  VARCHAR2 := null
857     , p2_a23  VARCHAR2 := null
858     , p2_a24  VARCHAR2 := null
859     , p2_a25  VARCHAR2 := null
860     , p2_a26  VARCHAR2 := null
861     , p2_a27  NUMBER := null
862     , p2_a28  NUMBER := null
863     , p2_a29  NUMBER := null
864     , p2_a30  NUMBER := null
865     , p2_a31  DATE := null
866     , p2_a32  VARCHAR2 := null
867     , p2_a33  VARCHAR2 := null
868     , p2_a34  VARCHAR2 := null
869     , p2_a35  VARCHAR2 := null
870     , p2_a36  VARCHAR2 := null
871     , p2_a37  VARCHAR2 := null
872     , p2_a38  VARCHAR2 := null
873     , p2_a39  VARCHAR2 := null
874     , p2_a40  VARCHAR2 := null
875     , p2_a41  VARCHAR2 := null
876     , p2_a42  VARCHAR2 := null
877     , p2_a43  VARCHAR2 := null
878     , p2_a44  VARCHAR2 := null
879     , p2_a45  VARCHAR2 := null
880     , p2_a46  VARCHAR2 := null
881     , p2_a47  VARCHAR2 := null
882     , p2_a48  VARCHAR2 := null
883     , p2_a49  VARCHAR2 := null
884     , p2_a50  VARCHAR2 := null
885     , p2_a51  VARCHAR2 := null
886     , p2_a52  VARCHAR2 := null
887     , p2_a53  VARCHAR2 := null
888     , p2_a54  VARCHAR2 := null
889     , p2_a55  VARCHAR2 := null
890     , p2_a56  VARCHAR2 := null
891     , p2_a57  VARCHAR2 := null
892     , p2_a58  VARCHAR2 := null
893     , p2_a59  VARCHAR2 := null
894     , p2_a60  VARCHAR2 := null
895     , p2_a61  VARCHAR2 := null
896     , p2_a62  VARCHAR2 := null
897     , p2_a63  VARCHAR2 := null
898     , p2_a64  VARCHAR2 := null
899     , p2_a65  VARCHAR2 := null
900     , p2_a66  VARCHAR2 := null
901     , p2_a67  VARCHAR2 := null
902     , p2_a68  VARCHAR2 := null
903     , p2_a69  VARCHAR2 := null
904     , p2_a70  NUMBER := null
905     , p2_a71  VARCHAR2 := null
906     , p2_a72  VARCHAR2 := null
907     , p2_a73  NUMBER := null
908     , p2_a74  VARCHAR2 := null
909     , p2_a75  NUMBER := null
910     , p2_a76  VARCHAR2 := null
911     , p2_a77  NUMBER := null
912     , p2_a78  NUMBER := null
913     , p2_a79  VARCHAR2 := null
914     , p2_a80  NUMBER := null
915     , p2_a81  NUMBER := null
916     , p2_a82  NUMBER := null
917     , p2_a83  NUMBER := null
918   )
919   as
920     ddp_cust_profile_amt_rec hz_customer_profile_v2pub.cust_profile_amt_rec_type;
921     ddindx binary_integer; indx binary_integer;
922   begin
923 
924     -- copy data to the local IN or IN-OUT args, if any
925 
926 
930     ddp_cust_profile_amt_rec.trx_credit_limit := rosetta_g_miss_num_map(p2_a3);
927     ddp_cust_profile_amt_rec.cust_acct_profile_amt_id := rosetta_g_miss_num_map(p2_a0);
928     ddp_cust_profile_amt_rec.cust_account_profile_id := rosetta_g_miss_num_map(p2_a1);
929     ddp_cust_profile_amt_rec.currency_code := p2_a2;
931     ddp_cust_profile_amt_rec.overall_credit_limit := rosetta_g_miss_num_map(p2_a4);
932     ddp_cust_profile_amt_rec.min_dunning_amount := rosetta_g_miss_num_map(p2_a5);
933     ddp_cust_profile_amt_rec.min_dunning_invoice_amount := rosetta_g_miss_num_map(p2_a6);
934     ddp_cust_profile_amt_rec.max_interest_charge := rosetta_g_miss_num_map(p2_a7);
935     ddp_cust_profile_amt_rec.min_statement_amount := rosetta_g_miss_num_map(p2_a8);
936     ddp_cust_profile_amt_rec.auto_rec_min_receipt_amount := rosetta_g_miss_num_map(p2_a9);
937     ddp_cust_profile_amt_rec.interest_rate := rosetta_g_miss_num_map(p2_a10);
938     ddp_cust_profile_amt_rec.attribute_category := p2_a11;
939     ddp_cust_profile_amt_rec.attribute1 := p2_a12;
940     ddp_cust_profile_amt_rec.attribute2 := p2_a13;
941     ddp_cust_profile_amt_rec.attribute3 := p2_a14;
942     ddp_cust_profile_amt_rec.attribute4 := p2_a15;
943     ddp_cust_profile_amt_rec.attribute5 := p2_a16;
944     ddp_cust_profile_amt_rec.attribute6 := p2_a17;
945     ddp_cust_profile_amt_rec.attribute7 := p2_a18;
946     ddp_cust_profile_amt_rec.attribute8 := p2_a19;
947     ddp_cust_profile_amt_rec.attribute9 := p2_a20;
948     ddp_cust_profile_amt_rec.attribute10 := p2_a21;
949     ddp_cust_profile_amt_rec.attribute11 := p2_a22;
950     ddp_cust_profile_amt_rec.attribute12 := p2_a23;
951     ddp_cust_profile_amt_rec.attribute13 := p2_a24;
952     ddp_cust_profile_amt_rec.attribute14 := p2_a25;
953     ddp_cust_profile_amt_rec.attribute15 := p2_a26;
954     ddp_cust_profile_amt_rec.min_fc_balance_amount := rosetta_g_miss_num_map(p2_a27);
955     ddp_cust_profile_amt_rec.min_fc_invoice_amount := rosetta_g_miss_num_map(p2_a28);
956     ddp_cust_profile_amt_rec.cust_account_id := rosetta_g_miss_num_map(p2_a29);
957     ddp_cust_profile_amt_rec.site_use_id := rosetta_g_miss_num_map(p2_a30);
958     ddp_cust_profile_amt_rec.expiration_date := rosetta_g_miss_date_in_map(p2_a31);
959     ddp_cust_profile_amt_rec.jgzz_attribute_category := p2_a32;
960     ddp_cust_profile_amt_rec.jgzz_attribute1 := p2_a33;
961     ddp_cust_profile_amt_rec.jgzz_attribute2 := p2_a34;
962     ddp_cust_profile_amt_rec.jgzz_attribute3 := p2_a35;
963     ddp_cust_profile_amt_rec.jgzz_attribute4 := p2_a36;
964     ddp_cust_profile_amt_rec.jgzz_attribute5 := p2_a37;
965     ddp_cust_profile_amt_rec.jgzz_attribute6 := p2_a38;
966     ddp_cust_profile_amt_rec.jgzz_attribute7 := p2_a39;
967     ddp_cust_profile_amt_rec.jgzz_attribute8 := p2_a40;
968     ddp_cust_profile_amt_rec.jgzz_attribute9 := p2_a41;
969     ddp_cust_profile_amt_rec.jgzz_attribute10 := p2_a42;
970     ddp_cust_profile_amt_rec.jgzz_attribute11 := p2_a43;
971     ddp_cust_profile_amt_rec.jgzz_attribute12 := p2_a44;
972     ddp_cust_profile_amt_rec.jgzz_attribute13 := p2_a45;
973     ddp_cust_profile_amt_rec.jgzz_attribute14 := p2_a46;
974     ddp_cust_profile_amt_rec.jgzz_attribute15 := p2_a47;
975     ddp_cust_profile_amt_rec.global_attribute1 := p2_a48;
976     ddp_cust_profile_amt_rec.global_attribute2 := p2_a49;
977     ddp_cust_profile_amt_rec.global_attribute3 := p2_a50;
978     ddp_cust_profile_amt_rec.global_attribute4 := p2_a51;
979     ddp_cust_profile_amt_rec.global_attribute5 := p2_a52;
980     ddp_cust_profile_amt_rec.global_attribute6 := p2_a53;
981     ddp_cust_profile_amt_rec.global_attribute7 := p2_a54;
982     ddp_cust_profile_amt_rec.global_attribute8 := p2_a55;
983     ddp_cust_profile_amt_rec.global_attribute9 := p2_a56;
984     ddp_cust_profile_amt_rec.global_attribute10 := p2_a57;
985     ddp_cust_profile_amt_rec.global_attribute11 := p2_a58;
986     ddp_cust_profile_amt_rec.global_attribute12 := p2_a59;
987     ddp_cust_profile_amt_rec.global_attribute13 := p2_a60;
988     ddp_cust_profile_amt_rec.global_attribute14 := p2_a61;
989     ddp_cust_profile_amt_rec.global_attribute15 := p2_a62;
990     ddp_cust_profile_amt_rec.global_attribute16 := p2_a63;
991     ddp_cust_profile_amt_rec.global_attribute17 := p2_a64;
992     ddp_cust_profile_amt_rec.global_attribute18 := p2_a65;
993     ddp_cust_profile_amt_rec.global_attribute19 := p2_a66;
994     ddp_cust_profile_amt_rec.global_attribute20 := p2_a67;
995     ddp_cust_profile_amt_rec.global_attribute_category := p2_a68;
996     ddp_cust_profile_amt_rec.created_by_module := p2_a69;
997     ddp_cust_profile_amt_rec.application_id := rosetta_g_miss_num_map(p2_a70);
998     ddp_cust_profile_amt_rec.exchange_rate_type := p2_a71;
999     ddp_cust_profile_amt_rec.min_fc_invoice_overdue_type := p2_a72;
1000     ddp_cust_profile_amt_rec.min_fc_invoice_percent := rosetta_g_miss_num_map(p2_a73);
1001     ddp_cust_profile_amt_rec.min_fc_balance_overdue_type := p2_a74;
1002     ddp_cust_profile_amt_rec.min_fc_balance_percent := rosetta_g_miss_num_map(p2_a75);
1003     ddp_cust_profile_amt_rec.interest_type := p2_a76;
1004     ddp_cust_profile_amt_rec.interest_fixed_amount := rosetta_g_miss_num_map(p2_a77);
1005     ddp_cust_profile_amt_rec.interest_schedule_id := rosetta_g_miss_num_map(p2_a78);
1006     ddp_cust_profile_amt_rec.penalty_type := p2_a79;
1007     ddp_cust_profile_amt_rec.penalty_rate := rosetta_g_miss_num_map(p2_a80);
1008     ddp_cust_profile_amt_rec.min_interest_charge := rosetta_g_miss_num_map(p2_a81);
1009     ddp_cust_profile_amt_rec.penalty_fixed_amount := rosetta_g_miss_num_map(p2_a82);
1010     ddp_cust_profile_amt_rec.penalty_schedule_id := rosetta_g_miss_num_map(p2_a83);
1011 
1012 
1013 
1014 
1015 
1019       ddp_cust_profile_amt_rec,
1016     -- here's the delegated call to the old PL/SQL routine
1017     hz_customer_profile_v2pub.create_cust_profile_amt(p_init_msg_list,
1018       p_check_foreign_key,
1020       x_cust_acct_profile_amt_id,
1021       x_return_status,
1022       x_msg_count,
1023       x_msg_data);
1024 
1025     -- copy data back from the local OUT or IN-OUT args, if any
1026 
1027 
1028 
1029 
1030 
1031 
1032   end;
1033 
1034   procedure update_cust_profile_amt_7(p_init_msg_list  VARCHAR2
1035     , p_object_version_number in out nocopy  NUMBER
1036     , x_return_status out nocopy  VARCHAR2
1037     , x_msg_count out nocopy  NUMBER
1038     , x_msg_data out nocopy  VARCHAR2
1039     , p1_a0  NUMBER := null
1040     , p1_a1  NUMBER := null
1041     , p1_a2  VARCHAR2 := null
1042     , p1_a3  NUMBER := null
1043     , p1_a4  NUMBER := null
1044     , p1_a5  NUMBER := null
1045     , p1_a6  NUMBER := null
1046     , p1_a7  NUMBER := null
1047     , p1_a8  NUMBER := null
1048     , p1_a9  NUMBER := null
1049     , p1_a10  NUMBER := null
1050     , p1_a11  VARCHAR2 := null
1051     , p1_a12  VARCHAR2 := null
1052     , p1_a13  VARCHAR2 := null
1053     , p1_a14  VARCHAR2 := null
1054     , p1_a15  VARCHAR2 := null
1055     , p1_a16  VARCHAR2 := null
1056     , p1_a17  VARCHAR2 := null
1057     , p1_a18  VARCHAR2 := null
1058     , p1_a19  VARCHAR2 := null
1059     , p1_a20  VARCHAR2 := null
1060     , p1_a21  VARCHAR2 := null
1061     , p1_a22  VARCHAR2 := null
1062     , p1_a23  VARCHAR2 := null
1063     , p1_a24  VARCHAR2 := null
1064     , p1_a25  VARCHAR2 := null
1065     , p1_a26  VARCHAR2 := null
1066     , p1_a27  NUMBER := null
1067     , p1_a28  NUMBER := null
1068     , p1_a29  NUMBER := null
1069     , p1_a30  NUMBER := null
1070     , p1_a31  DATE := null
1071     , p1_a32  VARCHAR2 := null
1072     , p1_a33  VARCHAR2 := null
1073     , p1_a34  VARCHAR2 := null
1074     , p1_a35  VARCHAR2 := null
1075     , p1_a36  VARCHAR2 := null
1076     , p1_a37  VARCHAR2 := null
1077     , p1_a38  VARCHAR2 := null
1078     , p1_a39  VARCHAR2 := null
1079     , p1_a40  VARCHAR2 := null
1080     , p1_a41  VARCHAR2 := null
1081     , p1_a42  VARCHAR2 := null
1082     , p1_a43  VARCHAR2 := null
1083     , p1_a44  VARCHAR2 := null
1084     , p1_a45  VARCHAR2 := null
1085     , p1_a46  VARCHAR2 := null
1086     , p1_a47  VARCHAR2 := null
1087     , p1_a48  VARCHAR2 := null
1088     , p1_a49  VARCHAR2 := null
1089     , p1_a50  VARCHAR2 := null
1090     , p1_a51  VARCHAR2 := null
1091     , p1_a52  VARCHAR2 := null
1092     , p1_a53  VARCHAR2 := null
1093     , p1_a54  VARCHAR2 := null
1094     , p1_a55  VARCHAR2 := null
1095     , p1_a56  VARCHAR2 := null
1096     , p1_a57  VARCHAR2 := null
1097     , p1_a58  VARCHAR2 := null
1098     , p1_a59  VARCHAR2 := null
1099     , p1_a60  VARCHAR2 := null
1100     , p1_a61  VARCHAR2 := null
1101     , p1_a62  VARCHAR2 := null
1102     , p1_a63  VARCHAR2 := null
1103     , p1_a64  VARCHAR2 := null
1104     , p1_a65  VARCHAR2 := null
1105     , p1_a66  VARCHAR2 := null
1106     , p1_a67  VARCHAR2 := null
1107     , p1_a68  VARCHAR2 := null
1108     , p1_a69  VARCHAR2 := null
1109     , p1_a70  NUMBER := null
1110     , p1_a71  VARCHAR2 := null
1111     , p1_a72  VARCHAR2 := null
1112     , p1_a73  NUMBER := null
1113     , p1_a74  VARCHAR2 := null
1114     , p1_a75  NUMBER := null
1115     , p1_a76  VARCHAR2 := null
1116     , p1_a77  NUMBER := null
1117     , p1_a78  NUMBER := null
1118     , p1_a79  VARCHAR2 := null
1119     , p1_a80  NUMBER := null
1120     , p1_a81  NUMBER := null
1121     , p1_a82  NUMBER := null
1122     , p1_a83  NUMBER := null
1123   )
1124   as
1125     ddp_cust_profile_amt_rec hz_customer_profile_v2pub.cust_profile_amt_rec_type;
1126     ddindx binary_integer; indx binary_integer;
1127   begin
1128 
1129     -- copy data to the local IN or IN-OUT args, if any
1130 
1131     ddp_cust_profile_amt_rec.cust_acct_profile_amt_id := rosetta_g_miss_num_map(p1_a0);
1132     ddp_cust_profile_amt_rec.cust_account_profile_id := rosetta_g_miss_num_map(p1_a1);
1133     ddp_cust_profile_amt_rec.currency_code := p1_a2;
1134     ddp_cust_profile_amt_rec.trx_credit_limit := rosetta_g_miss_num_map(p1_a3);
1135     ddp_cust_profile_amt_rec.overall_credit_limit := rosetta_g_miss_num_map(p1_a4);
1136     ddp_cust_profile_amt_rec.min_dunning_amount := rosetta_g_miss_num_map(p1_a5);
1137     ddp_cust_profile_amt_rec.min_dunning_invoice_amount := rosetta_g_miss_num_map(p1_a6);
1138     ddp_cust_profile_amt_rec.max_interest_charge := rosetta_g_miss_num_map(p1_a7);
1139     ddp_cust_profile_amt_rec.min_statement_amount := rosetta_g_miss_num_map(p1_a8);
1140     ddp_cust_profile_amt_rec.auto_rec_min_receipt_amount := rosetta_g_miss_num_map(p1_a9);
1141     ddp_cust_profile_amt_rec.interest_rate := rosetta_g_miss_num_map(p1_a10);
1142     ddp_cust_profile_amt_rec.attribute_category := p1_a11;
1143     ddp_cust_profile_amt_rec.attribute1 := p1_a12;
1144     ddp_cust_profile_amt_rec.attribute2 := p1_a13;
1145     ddp_cust_profile_amt_rec.attribute3 := p1_a14;
1146     ddp_cust_profile_amt_rec.attribute4 := p1_a15;
1147     ddp_cust_profile_amt_rec.attribute5 := p1_a16;
1148     ddp_cust_profile_amt_rec.attribute6 := p1_a17;
1149     ddp_cust_profile_amt_rec.attribute7 := p1_a18;
1150     ddp_cust_profile_amt_rec.attribute8 := p1_a19;
1154     ddp_cust_profile_amt_rec.attribute12 := p1_a23;
1151     ddp_cust_profile_amt_rec.attribute9 := p1_a20;
1152     ddp_cust_profile_amt_rec.attribute10 := p1_a21;
1153     ddp_cust_profile_amt_rec.attribute11 := p1_a22;
1155     ddp_cust_profile_amt_rec.attribute13 := p1_a24;
1156     ddp_cust_profile_amt_rec.attribute14 := p1_a25;
1157     ddp_cust_profile_amt_rec.attribute15 := p1_a26;
1158     ddp_cust_profile_amt_rec.min_fc_balance_amount := rosetta_g_miss_num_map(p1_a27);
1159     ddp_cust_profile_amt_rec.min_fc_invoice_amount := rosetta_g_miss_num_map(p1_a28);
1160     ddp_cust_profile_amt_rec.cust_account_id := rosetta_g_miss_num_map(p1_a29);
1161     ddp_cust_profile_amt_rec.site_use_id := rosetta_g_miss_num_map(p1_a30);
1162     ddp_cust_profile_amt_rec.expiration_date := rosetta_g_miss_date_in_map(p1_a31);
1163     ddp_cust_profile_amt_rec.jgzz_attribute_category := p1_a32;
1164     ddp_cust_profile_amt_rec.jgzz_attribute1 := p1_a33;
1165     ddp_cust_profile_amt_rec.jgzz_attribute2 := p1_a34;
1166     ddp_cust_profile_amt_rec.jgzz_attribute3 := p1_a35;
1167     ddp_cust_profile_amt_rec.jgzz_attribute4 := p1_a36;
1168     ddp_cust_profile_amt_rec.jgzz_attribute5 := p1_a37;
1169     ddp_cust_profile_amt_rec.jgzz_attribute6 := p1_a38;
1170     ddp_cust_profile_amt_rec.jgzz_attribute7 := p1_a39;
1171     ddp_cust_profile_amt_rec.jgzz_attribute8 := p1_a40;
1172     ddp_cust_profile_amt_rec.jgzz_attribute9 := p1_a41;
1173     ddp_cust_profile_amt_rec.jgzz_attribute10 := p1_a42;
1174     ddp_cust_profile_amt_rec.jgzz_attribute11 := p1_a43;
1175     ddp_cust_profile_amt_rec.jgzz_attribute12 := p1_a44;
1176     ddp_cust_profile_amt_rec.jgzz_attribute13 := p1_a45;
1177     ddp_cust_profile_amt_rec.jgzz_attribute14 := p1_a46;
1178     ddp_cust_profile_amt_rec.jgzz_attribute15 := p1_a47;
1179     ddp_cust_profile_amt_rec.global_attribute1 := p1_a48;
1180     ddp_cust_profile_amt_rec.global_attribute2 := p1_a49;
1181     ddp_cust_profile_amt_rec.global_attribute3 := p1_a50;
1182     ddp_cust_profile_amt_rec.global_attribute4 := p1_a51;
1183     ddp_cust_profile_amt_rec.global_attribute5 := p1_a52;
1184     ddp_cust_profile_amt_rec.global_attribute6 := p1_a53;
1185     ddp_cust_profile_amt_rec.global_attribute7 := p1_a54;
1186     ddp_cust_profile_amt_rec.global_attribute8 := p1_a55;
1187     ddp_cust_profile_amt_rec.global_attribute9 := p1_a56;
1188     ddp_cust_profile_amt_rec.global_attribute10 := p1_a57;
1189     ddp_cust_profile_amt_rec.global_attribute11 := p1_a58;
1190     ddp_cust_profile_amt_rec.global_attribute12 := p1_a59;
1191     ddp_cust_profile_amt_rec.global_attribute13 := p1_a60;
1192     ddp_cust_profile_amt_rec.global_attribute14 := p1_a61;
1193     ddp_cust_profile_amt_rec.global_attribute15 := p1_a62;
1194     ddp_cust_profile_amt_rec.global_attribute16 := p1_a63;
1195     ddp_cust_profile_amt_rec.global_attribute17 := p1_a64;
1196     ddp_cust_profile_amt_rec.global_attribute18 := p1_a65;
1197     ddp_cust_profile_amt_rec.global_attribute19 := p1_a66;
1198     ddp_cust_profile_amt_rec.global_attribute20 := p1_a67;
1199     ddp_cust_profile_amt_rec.global_attribute_category := p1_a68;
1200     ddp_cust_profile_amt_rec.created_by_module := p1_a69;
1201     ddp_cust_profile_amt_rec.application_id := rosetta_g_miss_num_map(p1_a70);
1202     ddp_cust_profile_amt_rec.exchange_rate_type := p1_a71;
1203     ddp_cust_profile_amt_rec.min_fc_invoice_overdue_type := p1_a72;
1204     ddp_cust_profile_amt_rec.min_fc_invoice_percent := rosetta_g_miss_num_map(p1_a73);
1205     ddp_cust_profile_amt_rec.min_fc_balance_overdue_type := p1_a74;
1206     ddp_cust_profile_amt_rec.min_fc_balance_percent := rosetta_g_miss_num_map(p1_a75);
1207     ddp_cust_profile_amt_rec.interest_type := p1_a76;
1208     ddp_cust_profile_amt_rec.interest_fixed_amount := rosetta_g_miss_num_map(p1_a77);
1209     ddp_cust_profile_amt_rec.interest_schedule_id := rosetta_g_miss_num_map(p1_a78);
1210     ddp_cust_profile_amt_rec.penalty_type := p1_a79;
1211     ddp_cust_profile_amt_rec.penalty_rate := rosetta_g_miss_num_map(p1_a80);
1212     ddp_cust_profile_amt_rec.min_interest_charge := rosetta_g_miss_num_map(p1_a81);
1213     ddp_cust_profile_amt_rec.penalty_fixed_amount := rosetta_g_miss_num_map(p1_a82);
1214     ddp_cust_profile_amt_rec.penalty_schedule_id := rosetta_g_miss_num_map(p1_a83);
1215 
1216 
1217 
1218 
1219 
1220     -- here's the delegated call to the old PL/SQL routine
1221     hz_customer_profile_v2pub.update_cust_profile_amt(p_init_msg_list,
1222       ddp_cust_profile_amt_rec,
1223       p_object_version_number,
1224       x_return_status,
1225       x_msg_count,
1226       x_msg_data);
1227 
1228     -- copy data back from the local OUT or IN-OUT args, if any
1229 
1230 
1231 
1232 
1233 
1234   end;
1235 
1236   procedure get_cust_profile_amt_rec_8(p_init_msg_list  VARCHAR2
1237     , p_cust_acct_profile_amt_id  NUMBER
1238     , p2_a0 out nocopy  NUMBER
1239     , p2_a1 out nocopy  NUMBER
1240     , p2_a2 out nocopy  VARCHAR2
1241     , p2_a3 out nocopy  NUMBER
1242     , p2_a4 out nocopy  NUMBER
1243     , p2_a5 out nocopy  NUMBER
1244     , p2_a6 out nocopy  NUMBER
1245     , p2_a7 out nocopy  NUMBER
1246     , p2_a8 out nocopy  NUMBER
1247     , p2_a9 out nocopy  NUMBER
1248     , p2_a10 out nocopy  NUMBER
1249     , p2_a11 out nocopy  VARCHAR2
1250     , p2_a12 out nocopy  VARCHAR2
1251     , p2_a13 out nocopy  VARCHAR2
1252     , p2_a14 out nocopy  VARCHAR2
1253     , p2_a15 out nocopy  VARCHAR2
1254     , p2_a16 out nocopy  VARCHAR2
1255     , p2_a17 out nocopy  VARCHAR2
1256     , p2_a18 out nocopy  VARCHAR2
1257     , p2_a19 out nocopy  VARCHAR2
1258     , p2_a20 out nocopy  VARCHAR2
1259     , p2_a21 out nocopy  VARCHAR2
1263     , p2_a25 out nocopy  VARCHAR2
1260     , p2_a22 out nocopy  VARCHAR2
1261     , p2_a23 out nocopy  VARCHAR2
1262     , p2_a24 out nocopy  VARCHAR2
1264     , p2_a26 out nocopy  VARCHAR2
1265     , p2_a27 out nocopy  NUMBER
1266     , p2_a28 out nocopy  NUMBER
1267     , p2_a29 out nocopy  NUMBER
1268     , p2_a30 out nocopy  NUMBER
1269     , p2_a31 out nocopy  DATE
1270     , p2_a32 out nocopy  VARCHAR2
1271     , p2_a33 out nocopy  VARCHAR2
1272     , p2_a34 out nocopy  VARCHAR2
1273     , p2_a35 out nocopy  VARCHAR2
1274     , p2_a36 out nocopy  VARCHAR2
1275     , p2_a37 out nocopy  VARCHAR2
1276     , p2_a38 out nocopy  VARCHAR2
1277     , p2_a39 out nocopy  VARCHAR2
1278     , p2_a40 out nocopy  VARCHAR2
1279     , p2_a41 out nocopy  VARCHAR2
1280     , p2_a42 out nocopy  VARCHAR2
1281     , p2_a43 out nocopy  VARCHAR2
1282     , p2_a44 out nocopy  VARCHAR2
1283     , p2_a45 out nocopy  VARCHAR2
1284     , p2_a46 out nocopy  VARCHAR2
1285     , p2_a47 out nocopy  VARCHAR2
1286     , p2_a48 out nocopy  VARCHAR2
1287     , p2_a49 out nocopy  VARCHAR2
1288     , p2_a50 out nocopy  VARCHAR2
1289     , p2_a51 out nocopy  VARCHAR2
1290     , p2_a52 out nocopy  VARCHAR2
1291     , p2_a53 out nocopy  VARCHAR2
1292     , p2_a54 out nocopy  VARCHAR2
1293     , p2_a55 out nocopy  VARCHAR2
1294     , p2_a56 out nocopy  VARCHAR2
1295     , p2_a57 out nocopy  VARCHAR2
1296     , p2_a58 out nocopy  VARCHAR2
1297     , p2_a59 out nocopy  VARCHAR2
1298     , p2_a60 out nocopy  VARCHAR2
1299     , p2_a61 out nocopy  VARCHAR2
1300     , p2_a62 out nocopy  VARCHAR2
1301     , p2_a63 out nocopy  VARCHAR2
1302     , p2_a64 out nocopy  VARCHAR2
1303     , p2_a65 out nocopy  VARCHAR2
1304     , p2_a66 out nocopy  VARCHAR2
1305     , p2_a67 out nocopy  VARCHAR2
1306     , p2_a68 out nocopy  VARCHAR2
1307     , p2_a69 out nocopy  VARCHAR2
1308     , p2_a70 out nocopy  NUMBER
1309     , p2_a71 out nocopy  VARCHAR2
1310     , p2_a72 out nocopy  VARCHAR2
1311     , p2_a73 out nocopy  NUMBER
1312     , p2_a74 out nocopy  VARCHAR2
1313     , p2_a75 out nocopy  NUMBER
1314     , p2_a76 out nocopy  VARCHAR2
1315     , p2_a77 out nocopy  NUMBER
1316     , p2_a78 out nocopy  NUMBER
1317     , p2_a79 out nocopy  VARCHAR2
1318     , p2_a80 out nocopy  NUMBER
1319     , p2_a81 out nocopy  NUMBER
1320     , p2_a82 out nocopy  NUMBER
1321     , p2_a83 out nocopy  NUMBER
1322     , x_return_status out nocopy  VARCHAR2
1323     , x_msg_count out nocopy  NUMBER
1324     , x_msg_data out nocopy  VARCHAR2
1325   )
1326   as
1327     ddx_cust_profile_amt_rec hz_customer_profile_v2pub.cust_profile_amt_rec_type;
1328     ddindx binary_integer; indx binary_integer;
1329   begin
1330 
1331     -- copy data to the local IN or IN-OUT args, if any
1332 
1333 
1334 
1335 
1336 
1337 
1338     -- here's the delegated call to the old PL/SQL routine
1339     hz_customer_profile_v2pub.get_cust_profile_amt_rec(p_init_msg_list,
1340       p_cust_acct_profile_amt_id,
1341       ddx_cust_profile_amt_rec,
1342       x_return_status,
1343       x_msg_count,
1344       x_msg_data);
1345 
1346     -- copy data back from the local OUT or IN-OUT args, if any
1347 
1348 
1349     p2_a0 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.cust_acct_profile_amt_id);
1350     p2_a1 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.cust_account_profile_id);
1351     p2_a2 := ddx_cust_profile_amt_rec.currency_code;
1352     p2_a3 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.trx_credit_limit);
1353     p2_a4 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.overall_credit_limit);
1354     p2_a5 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.min_dunning_amount);
1355     p2_a6 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.min_dunning_invoice_amount);
1356     p2_a7 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.max_interest_charge);
1357     p2_a8 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.min_statement_amount);
1358     p2_a9 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.auto_rec_min_receipt_amount);
1359     p2_a10 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.interest_rate);
1360     p2_a11 := ddx_cust_profile_amt_rec.attribute_category;
1361     p2_a12 := ddx_cust_profile_amt_rec.attribute1;
1362     p2_a13 := ddx_cust_profile_amt_rec.attribute2;
1363     p2_a14 := ddx_cust_profile_amt_rec.attribute3;
1364     p2_a15 := ddx_cust_profile_amt_rec.attribute4;
1365     p2_a16 := ddx_cust_profile_amt_rec.attribute5;
1366     p2_a17 := ddx_cust_profile_amt_rec.attribute6;
1367     p2_a18 := ddx_cust_profile_amt_rec.attribute7;
1368     p2_a19 := ddx_cust_profile_amt_rec.attribute8;
1369     p2_a20 := ddx_cust_profile_amt_rec.attribute9;
1370     p2_a21 := ddx_cust_profile_amt_rec.attribute10;
1371     p2_a22 := ddx_cust_profile_amt_rec.attribute11;
1372     p2_a23 := ddx_cust_profile_amt_rec.attribute12;
1373     p2_a24 := ddx_cust_profile_amt_rec.attribute13;
1374     p2_a25 := ddx_cust_profile_amt_rec.attribute14;
1375     p2_a26 := ddx_cust_profile_amt_rec.attribute15;
1376     p2_a27 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.min_fc_balance_amount);
1377     p2_a28 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.min_fc_invoice_amount);
1378     p2_a29 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.cust_account_id);
1379     p2_a30 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.site_use_id);
1383     p2_a34 := ddx_cust_profile_amt_rec.jgzz_attribute2;
1380     p2_a31 := ddx_cust_profile_amt_rec.expiration_date;
1381     p2_a32 := ddx_cust_profile_amt_rec.jgzz_attribute_category;
1382     p2_a33 := ddx_cust_profile_amt_rec.jgzz_attribute1;
1384     p2_a35 := ddx_cust_profile_amt_rec.jgzz_attribute3;
1385     p2_a36 := ddx_cust_profile_amt_rec.jgzz_attribute4;
1386     p2_a37 := ddx_cust_profile_amt_rec.jgzz_attribute5;
1387     p2_a38 := ddx_cust_profile_amt_rec.jgzz_attribute6;
1388     p2_a39 := ddx_cust_profile_amt_rec.jgzz_attribute7;
1389     p2_a40 := ddx_cust_profile_amt_rec.jgzz_attribute8;
1390     p2_a41 := ddx_cust_profile_amt_rec.jgzz_attribute9;
1391     p2_a42 := ddx_cust_profile_amt_rec.jgzz_attribute10;
1392     p2_a43 := ddx_cust_profile_amt_rec.jgzz_attribute11;
1393     p2_a44 := ddx_cust_profile_amt_rec.jgzz_attribute12;
1394     p2_a45 := ddx_cust_profile_amt_rec.jgzz_attribute13;
1395     p2_a46 := ddx_cust_profile_amt_rec.jgzz_attribute14;
1396     p2_a47 := ddx_cust_profile_amt_rec.jgzz_attribute15;
1397     p2_a48 := ddx_cust_profile_amt_rec.global_attribute1;
1398     p2_a49 := ddx_cust_profile_amt_rec.global_attribute2;
1399     p2_a50 := ddx_cust_profile_amt_rec.global_attribute3;
1400     p2_a51 := ddx_cust_profile_amt_rec.global_attribute4;
1401     p2_a52 := ddx_cust_profile_amt_rec.global_attribute5;
1402     p2_a53 := ddx_cust_profile_amt_rec.global_attribute6;
1403     p2_a54 := ddx_cust_profile_amt_rec.global_attribute7;
1404     p2_a55 := ddx_cust_profile_amt_rec.global_attribute8;
1405     p2_a56 := ddx_cust_profile_amt_rec.global_attribute9;
1406     p2_a57 := ddx_cust_profile_amt_rec.global_attribute10;
1407     p2_a58 := ddx_cust_profile_amt_rec.global_attribute11;
1408     p2_a59 := ddx_cust_profile_amt_rec.global_attribute12;
1409     p2_a60 := ddx_cust_profile_amt_rec.global_attribute13;
1410     p2_a61 := ddx_cust_profile_amt_rec.global_attribute14;
1411     p2_a62 := ddx_cust_profile_amt_rec.global_attribute15;
1412     p2_a63 := ddx_cust_profile_amt_rec.global_attribute16;
1413     p2_a64 := ddx_cust_profile_amt_rec.global_attribute17;
1414     p2_a65 := ddx_cust_profile_amt_rec.global_attribute18;
1415     p2_a66 := ddx_cust_profile_amt_rec.global_attribute19;
1416     p2_a67 := ddx_cust_profile_amt_rec.global_attribute20;
1417     p2_a68 := ddx_cust_profile_amt_rec.global_attribute_category;
1418     p2_a69 := ddx_cust_profile_amt_rec.created_by_module;
1419     p2_a70 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.application_id);
1420     p2_a71 := ddx_cust_profile_amt_rec.exchange_rate_type;
1421     p2_a72 := ddx_cust_profile_amt_rec.min_fc_invoice_overdue_type;
1422     p2_a73 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.min_fc_invoice_percent);
1423     p2_a74 := ddx_cust_profile_amt_rec.min_fc_balance_overdue_type;
1424     p2_a75 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.min_fc_balance_percent);
1425     p2_a76 := ddx_cust_profile_amt_rec.interest_type;
1426     p2_a77 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.interest_fixed_amount);
1427     p2_a78 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.interest_schedule_id);
1428     p2_a79 := ddx_cust_profile_amt_rec.penalty_type;
1429     p2_a80 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.penalty_rate);
1430     p2_a81 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.min_interest_charge);
1431     p2_a82 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.penalty_fixed_amount);
1432     p2_a83 := rosetta_g_miss_num_map(ddx_cust_profile_amt_rec.penalty_schedule_id);
1433 
1434 
1435 
1436   end;
1437 
1438 end hz_customer_profile_v2pub_jw;