DBA Data[Home] [Help]

PACKAGE BODY: APPS.HZ_PARTY_V2PUB_JW

Source


1 package body hz_party_v2pub_jw as
2   /* $Header: ARH2PAJB.pls 120.5 2005/07/26 19:23:25 jhuang noship $ */
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   procedure create_person_1(p_init_msg_list  VARCHAR2
23     , x_party_id out nocopy  NUMBER
24     , x_party_number out nocopy  VARCHAR2
25     , x_profile_id out nocopy  NUMBER
26     , x_return_status out nocopy  VARCHAR2
27     , x_msg_count out nocopy  NUMBER
28     , x_msg_data out nocopy  VARCHAR2
29     , p1_a0  VARCHAR2 := null
30     , p1_a1  VARCHAR2 := null
31     , p1_a2  VARCHAR2 := null
32     , p1_a3  VARCHAR2 := null
33     , p1_a4  VARCHAR2 := null
34     , p1_a5  VARCHAR2 := null
35     , p1_a6  VARCHAR2 := null
36     , p1_a7  VARCHAR2 := null
37     , p1_a8  VARCHAR2 := null
38     , p1_a9  VARCHAR2 := null
39     , p1_a10  VARCHAR2 := null
40     , p1_a11  VARCHAR2 := null
41     , p1_a12  VARCHAR2 := null
42     , p1_a13  VARCHAR2 := null
43     , p1_a14  VARCHAR2 := null
44     , p1_a15  VARCHAR2 := null
45     , p1_a16  VARCHAR2 := null
46     , p1_a17  VARCHAR2 := null
47     , p1_a18  VARCHAR2 := null
48     , p1_a19  VARCHAR2 := null
49     , p1_a20  VARCHAR2 := null
50     , p1_a21  VARCHAR2 := null
51     , p1_a22  DATE := null
52     , p1_a23  VARCHAR2 := null
53     , p1_a24  DATE := null
54     , p1_a25  VARCHAR2 := null
55     , p1_a26  VARCHAR2 := null
56     , p1_a27  VARCHAR2 := null
57     , p1_a28  VARCHAR2 := null
58     , p1_a29  DATE := null
59     , p1_a30  NUMBER := null
60     , p1_a31  VARCHAR2 := null
61     , p1_a32  NUMBER := null
62     , p1_a33  NUMBER := null
63     , p1_a34  VARCHAR2 := null
64     , p1_a35  VARCHAR2 := null
65     , p1_a36  VARCHAR2 := null
66     , p1_a37  VARCHAR2 := null
67     , p1_a38  VARCHAR2 := null
68     , p1_a39  VARCHAR2 := null
69     , p1_a40  VARCHAR2 := null
70     , p1_a41  VARCHAR2 := null
71     , p1_a42  VARCHAR2 := null
72     , p1_a43  VARCHAR2 := null
73     , p1_a44  VARCHAR2 := null
74     , p1_a45  VARCHAR2 := null
75     , p1_a46  VARCHAR2 := null
76     , p1_a47  VARCHAR2 := null
77     , p1_a48  VARCHAR2 := null
78     , p1_a49  VARCHAR2 := null
79     , p1_a50  VARCHAR2 := null
80     , p1_a51  VARCHAR2 := null
81     , p1_a52  VARCHAR2 := null
82     , p1_a53  VARCHAR2 := null
83     , p1_a54  VARCHAR2 := null
84     , p1_a55  VARCHAR2 := null
85     , p1_a56  VARCHAR2 := null
86     , p1_a57  VARCHAR2 := null
87     , p1_a58  VARCHAR2 := null
88     , p1_a59  VARCHAR2 := null
89     , p1_a60  NUMBER := null
90     , p1_a61  VARCHAR2 := null
91     , p1_a62  NUMBER := null
92     , p1_a63  VARCHAR2 := null
93     , p1_a64  VARCHAR2 := null
94     , p1_a65  VARCHAR2 := null
95     , p1_a66  VARCHAR2 := null
96     , p1_a67  VARCHAR2 := null
97     , p1_a68  VARCHAR2 := null
98     , p1_a69  VARCHAR2 := null
99     , p1_a70  VARCHAR2 := null
100     , p1_a71  VARCHAR2 := null
101     , p1_a72  VARCHAR2 := null
102     , p1_a73  VARCHAR2 := null
103     , p1_a74  VARCHAR2 := null
104     , p1_a75  VARCHAR2 := null
105     , p1_a76  VARCHAR2 := null
106     , p1_a77  VARCHAR2 := null
107     , p1_a78  VARCHAR2 := null
108     , p1_a79  VARCHAR2 := null
109     , p1_a80  VARCHAR2 := null
110     , p1_a81  VARCHAR2 := null
111     , p1_a82  VARCHAR2 := null
112     , p1_a83  VARCHAR2 := null
113     , p1_a84  VARCHAR2 := null
114     , p1_a85  VARCHAR2 := null
115     , p1_a86  VARCHAR2 := null
116     , p1_a87  VARCHAR2 := null
117     , p1_a88  VARCHAR2 := null
118     , p1_a89  VARCHAR2 := null
119     , p1_a90  VARCHAR2 := null
120     , p1_a91  VARCHAR2 := null
121     , p1_a92  VARCHAR2 := null
122     , p1_a93  VARCHAR2 := null
123     , p1_a94  VARCHAR2 := null
124   )
125   as
126     ddp_person_rec hz_party_v2pub.person_rec_type;
127     ddindx binary_integer; indx binary_integer;
128   begin
129 
130     -- copy data to the local IN or IN-OUT args, if any
131 
132     ddp_person_rec.person_pre_name_adjunct := p1_a0;
133     ddp_person_rec.person_first_name := p1_a1;
134     ddp_person_rec.person_middle_name := p1_a2;
135     ddp_person_rec.person_last_name := p1_a3;
136     ddp_person_rec.person_name_suffix := p1_a4;
137     ddp_person_rec.person_title := p1_a5;
138     ddp_person_rec.person_academic_title := p1_a6;
139     ddp_person_rec.person_previous_last_name := p1_a7;
140     ddp_person_rec.person_initials := p1_a8;
141     ddp_person_rec.known_as := p1_a9;
142     ddp_person_rec.known_as2 := p1_a10;
143     ddp_person_rec.known_as3 := p1_a11;
144     ddp_person_rec.known_as4 := p1_a12;
145     ddp_person_rec.known_as5 := p1_a13;
146     ddp_person_rec.person_name_phonetic := p1_a14;
147     ddp_person_rec.person_first_name_phonetic := p1_a15;
148     ddp_person_rec.person_last_name_phonetic := p1_a16;
149     ddp_person_rec.middle_name_phonetic := p1_a17;
150     ddp_person_rec.tax_reference := p1_a18;
151     ddp_person_rec.jgzz_fiscal_code := p1_a19;
152     ddp_person_rec.person_iden_type := p1_a20;
153     ddp_person_rec.person_identifier := p1_a21;
154     ddp_person_rec.date_of_birth := rosetta_g_miss_date_in_map(p1_a22);
155     ddp_person_rec.place_of_birth := p1_a23;
156     ddp_person_rec.date_of_death := rosetta_g_miss_date_in_map(p1_a24);
157     ddp_person_rec.deceased_flag := p1_a25;
158     ddp_person_rec.gender := p1_a26;
159     ddp_person_rec.declared_ethnicity := p1_a27;
160     ddp_person_rec.marital_status := p1_a28;
161     ddp_person_rec.marital_status_effective_date := rosetta_g_miss_date_in_map(p1_a29);
162     ddp_person_rec.personal_income := rosetta_g_miss_num_map(p1_a30);
163     ddp_person_rec.head_of_household_flag := p1_a31;
164     ddp_person_rec.household_income := rosetta_g_miss_num_map(p1_a32);
165     ddp_person_rec.household_size := rosetta_g_miss_num_map(p1_a33);
166     ddp_person_rec.rent_own_ind := p1_a34;
167     ddp_person_rec.last_known_gps := p1_a35;
168     ddp_person_rec.content_source_type := p1_a36;
169     ddp_person_rec.internal_flag := p1_a37;
170     ddp_person_rec.attribute_category := p1_a38;
171     ddp_person_rec.attribute1 := p1_a39;
172     ddp_person_rec.attribute2 := p1_a40;
173     ddp_person_rec.attribute3 := p1_a41;
174     ddp_person_rec.attribute4 := p1_a42;
175     ddp_person_rec.attribute5 := p1_a43;
176     ddp_person_rec.attribute6 := p1_a44;
177     ddp_person_rec.attribute7 := p1_a45;
178     ddp_person_rec.attribute8 := p1_a46;
179     ddp_person_rec.attribute9 := p1_a47;
180     ddp_person_rec.attribute10 := p1_a48;
181     ddp_person_rec.attribute11 := p1_a49;
182     ddp_person_rec.attribute12 := p1_a50;
183     ddp_person_rec.attribute13 := p1_a51;
184     ddp_person_rec.attribute14 := p1_a52;
185     ddp_person_rec.attribute15 := p1_a53;
186     ddp_person_rec.attribute16 := p1_a54;
187     ddp_person_rec.attribute17 := p1_a55;
188     ddp_person_rec.attribute18 := p1_a56;
189     ddp_person_rec.attribute19 := p1_a57;
190     ddp_person_rec.attribute20 := p1_a58;
191     ddp_person_rec.created_by_module := p1_a59;
192     ddp_person_rec.application_id := rosetta_g_miss_num_map(p1_a60);
193     ddp_person_rec.actual_content_source := p1_a61;
194     ddp_person_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a62);
195     ddp_person_rec.party_rec.party_number := p1_a63;
196     ddp_person_rec.party_rec.validated_flag := p1_a64;
197     ddp_person_rec.party_rec.orig_system_reference := p1_a65;
198     ddp_person_rec.party_rec.orig_system := p1_a66;
199     ddp_person_rec.party_rec.status := p1_a67;
200     ddp_person_rec.party_rec.category_code := p1_a68;
201     ddp_person_rec.party_rec.salutation := p1_a69;
202     ddp_person_rec.party_rec.attribute_category := p1_a70;
203     ddp_person_rec.party_rec.attribute1 := p1_a71;
204     ddp_person_rec.party_rec.attribute2 := p1_a72;
205     ddp_person_rec.party_rec.attribute3 := p1_a73;
206     ddp_person_rec.party_rec.attribute4 := p1_a74;
207     ddp_person_rec.party_rec.attribute5 := p1_a75;
208     ddp_person_rec.party_rec.attribute6 := p1_a76;
209     ddp_person_rec.party_rec.attribute7 := p1_a77;
210     ddp_person_rec.party_rec.attribute8 := p1_a78;
211     ddp_person_rec.party_rec.attribute9 := p1_a79;
212     ddp_person_rec.party_rec.attribute10 := p1_a80;
213     ddp_person_rec.party_rec.attribute11 := p1_a81;
214     ddp_person_rec.party_rec.attribute12 := p1_a82;
215     ddp_person_rec.party_rec.attribute13 := p1_a83;
216     ddp_person_rec.party_rec.attribute14 := p1_a84;
217     ddp_person_rec.party_rec.attribute15 := p1_a85;
218     ddp_person_rec.party_rec.attribute16 := p1_a86;
219     ddp_person_rec.party_rec.attribute17 := p1_a87;
220     ddp_person_rec.party_rec.attribute18 := p1_a88;
221     ddp_person_rec.party_rec.attribute19 := p1_a89;
222     ddp_person_rec.party_rec.attribute20 := p1_a90;
223     ddp_person_rec.party_rec.attribute21 := p1_a91;
224     ddp_person_rec.party_rec.attribute22 := p1_a92;
225     ddp_person_rec.party_rec.attribute23 := p1_a93;
226     ddp_person_rec.party_rec.attribute24 := p1_a94;
227 
228 
229 
230 
231 
232 
233 
234     -- here's the delegated call to the old PL/SQL routine
235     hz_party_v2pub.create_person(p_init_msg_list,
236       ddp_person_rec,
237       x_party_id,
238       x_party_number,
239       x_profile_id,
240       x_return_status,
241       x_msg_count,
242       x_msg_data);
243 
244     -- copy data back from the local OUT or IN-OUT args, if any
245 
246 
247 
248 
249 
250 
251 
252   end;
253 
254   procedure create_person_2(p_init_msg_list  VARCHAR2
255     , p_party_usage_code  VARCHAR2
256     , x_party_id out nocopy  NUMBER
257     , x_party_number out nocopy  VARCHAR2
258     , x_profile_id out nocopy  NUMBER
259     , x_return_status out nocopy  VARCHAR2
260     , x_msg_count out nocopy  NUMBER
261     , x_msg_data out nocopy  VARCHAR2
262     , p1_a0  VARCHAR2 := null
263     , p1_a1  VARCHAR2 := null
264     , p1_a2  VARCHAR2 := null
265     , p1_a3  VARCHAR2 := null
266     , p1_a4  VARCHAR2 := null
267     , p1_a5  VARCHAR2 := null
268     , p1_a6  VARCHAR2 := null
269     , p1_a7  VARCHAR2 := null
270     , p1_a8  VARCHAR2 := null
271     , p1_a9  VARCHAR2 := null
272     , p1_a10  VARCHAR2 := null
273     , p1_a11  VARCHAR2 := null
274     , p1_a12  VARCHAR2 := null
275     , p1_a13  VARCHAR2 := null
276     , p1_a14  VARCHAR2 := null
277     , p1_a15  VARCHAR2 := null
278     , p1_a16  VARCHAR2 := null
279     , p1_a17  VARCHAR2 := null
280     , p1_a18  VARCHAR2 := null
281     , p1_a19  VARCHAR2 := null
282     , p1_a20  VARCHAR2 := null
283     , p1_a21  VARCHAR2 := null
284     , p1_a22  DATE := null
285     , p1_a23  VARCHAR2 := null
286     , p1_a24  DATE := null
287     , p1_a25  VARCHAR2 := null
288     , p1_a26  VARCHAR2 := null
289     , p1_a27  VARCHAR2 := null
290     , p1_a28  VARCHAR2 := null
291     , p1_a29  DATE := null
292     , p1_a30  NUMBER := null
293     , p1_a31  VARCHAR2 := null
294     , p1_a32  NUMBER := null
295     , p1_a33  NUMBER := null
296     , p1_a34  VARCHAR2 := null
297     , p1_a35  VARCHAR2 := null
298     , p1_a36  VARCHAR2 := null
299     , p1_a37  VARCHAR2 := null
300     , p1_a38  VARCHAR2 := null
301     , p1_a39  VARCHAR2 := null
302     , p1_a40  VARCHAR2 := null
303     , p1_a41  VARCHAR2 := null
304     , p1_a42  VARCHAR2 := null
305     , p1_a43  VARCHAR2 := null
306     , p1_a44  VARCHAR2 := null
307     , p1_a45  VARCHAR2 := null
308     , p1_a46  VARCHAR2 := null
309     , p1_a47  VARCHAR2 := null
310     , p1_a48  VARCHAR2 := null
311     , p1_a49  VARCHAR2 := null
312     , p1_a50  VARCHAR2 := null
313     , p1_a51  VARCHAR2 := null
314     , p1_a52  VARCHAR2 := null
315     , p1_a53  VARCHAR2 := null
316     , p1_a54  VARCHAR2 := null
317     , p1_a55  VARCHAR2 := null
318     , p1_a56  VARCHAR2 := null
319     , p1_a57  VARCHAR2 := null
320     , p1_a58  VARCHAR2 := null
321     , p1_a59  VARCHAR2 := null
322     , p1_a60  NUMBER := null
323     , p1_a61  VARCHAR2 := null
324     , p1_a62  NUMBER := null
325     , p1_a63  VARCHAR2 := null
326     , p1_a64  VARCHAR2 := null
327     , p1_a65  VARCHAR2 := null
328     , p1_a66  VARCHAR2 := null
329     , p1_a67  VARCHAR2 := null
330     , p1_a68  VARCHAR2 := null
331     , p1_a69  VARCHAR2 := null
332     , p1_a70  VARCHAR2 := null
333     , p1_a71  VARCHAR2 := null
334     , p1_a72  VARCHAR2 := null
335     , p1_a73  VARCHAR2 := null
336     , p1_a74  VARCHAR2 := null
337     , p1_a75  VARCHAR2 := null
338     , p1_a76  VARCHAR2 := null
339     , p1_a77  VARCHAR2 := null
340     , p1_a78  VARCHAR2 := null
341     , p1_a79  VARCHAR2 := null
342     , p1_a80  VARCHAR2 := null
343     , p1_a81  VARCHAR2 := null
344     , p1_a82  VARCHAR2 := null
345     , p1_a83  VARCHAR2 := null
346     , p1_a84  VARCHAR2 := null
347     , p1_a85  VARCHAR2 := null
348     , p1_a86  VARCHAR2 := null
349     , p1_a87  VARCHAR2 := null
350     , p1_a88  VARCHAR2 := null
351     , p1_a89  VARCHAR2 := null
352     , p1_a90  VARCHAR2 := null
353     , p1_a91  VARCHAR2 := null
354     , p1_a92  VARCHAR2 := null
355     , p1_a93  VARCHAR2 := null
356     , p1_a94  VARCHAR2 := null
357   )
358   as
359     ddp_person_rec hz_party_v2pub.person_rec_type;
360     ddindx binary_integer; indx binary_integer;
361   begin
362 
363     -- copy data to the local IN or IN-OUT args, if any
364 
365     ddp_person_rec.person_pre_name_adjunct := p1_a0;
366     ddp_person_rec.person_first_name := p1_a1;
367     ddp_person_rec.person_middle_name := p1_a2;
368     ddp_person_rec.person_last_name := p1_a3;
369     ddp_person_rec.person_name_suffix := p1_a4;
370     ddp_person_rec.person_title := p1_a5;
371     ddp_person_rec.person_academic_title := p1_a6;
372     ddp_person_rec.person_previous_last_name := p1_a7;
373     ddp_person_rec.person_initials := p1_a8;
374     ddp_person_rec.known_as := p1_a9;
375     ddp_person_rec.known_as2 := p1_a10;
376     ddp_person_rec.known_as3 := p1_a11;
377     ddp_person_rec.known_as4 := p1_a12;
378     ddp_person_rec.known_as5 := p1_a13;
379     ddp_person_rec.person_name_phonetic := p1_a14;
380     ddp_person_rec.person_first_name_phonetic := p1_a15;
381     ddp_person_rec.person_last_name_phonetic := p1_a16;
382     ddp_person_rec.middle_name_phonetic := p1_a17;
383     ddp_person_rec.tax_reference := p1_a18;
384     ddp_person_rec.jgzz_fiscal_code := p1_a19;
385     ddp_person_rec.person_iden_type := p1_a20;
386     ddp_person_rec.person_identifier := p1_a21;
387     ddp_person_rec.date_of_birth := rosetta_g_miss_date_in_map(p1_a22);
388     ddp_person_rec.place_of_birth := p1_a23;
389     ddp_person_rec.date_of_death := rosetta_g_miss_date_in_map(p1_a24);
390     ddp_person_rec.deceased_flag := p1_a25;
391     ddp_person_rec.gender := p1_a26;
392     ddp_person_rec.declared_ethnicity := p1_a27;
393     ddp_person_rec.marital_status := p1_a28;
394     ddp_person_rec.marital_status_effective_date := rosetta_g_miss_date_in_map(p1_a29);
395     ddp_person_rec.personal_income := rosetta_g_miss_num_map(p1_a30);
396     ddp_person_rec.head_of_household_flag := p1_a31;
397     ddp_person_rec.household_income := rosetta_g_miss_num_map(p1_a32);
398     ddp_person_rec.household_size := rosetta_g_miss_num_map(p1_a33);
399     ddp_person_rec.rent_own_ind := p1_a34;
400     ddp_person_rec.last_known_gps := p1_a35;
401     ddp_person_rec.content_source_type := p1_a36;
402     ddp_person_rec.internal_flag := p1_a37;
403     ddp_person_rec.attribute_category := p1_a38;
404     ddp_person_rec.attribute1 := p1_a39;
405     ddp_person_rec.attribute2 := p1_a40;
406     ddp_person_rec.attribute3 := p1_a41;
407     ddp_person_rec.attribute4 := p1_a42;
408     ddp_person_rec.attribute5 := p1_a43;
409     ddp_person_rec.attribute6 := p1_a44;
410     ddp_person_rec.attribute7 := p1_a45;
411     ddp_person_rec.attribute8 := p1_a46;
412     ddp_person_rec.attribute9 := p1_a47;
413     ddp_person_rec.attribute10 := p1_a48;
414     ddp_person_rec.attribute11 := p1_a49;
415     ddp_person_rec.attribute12 := p1_a50;
416     ddp_person_rec.attribute13 := p1_a51;
417     ddp_person_rec.attribute14 := p1_a52;
418     ddp_person_rec.attribute15 := p1_a53;
419     ddp_person_rec.attribute16 := p1_a54;
420     ddp_person_rec.attribute17 := p1_a55;
421     ddp_person_rec.attribute18 := p1_a56;
422     ddp_person_rec.attribute19 := p1_a57;
423     ddp_person_rec.attribute20 := p1_a58;
424     ddp_person_rec.created_by_module := p1_a59;
425     ddp_person_rec.application_id := rosetta_g_miss_num_map(p1_a60);
426     ddp_person_rec.actual_content_source := p1_a61;
427     ddp_person_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a62);
428     ddp_person_rec.party_rec.party_number := p1_a63;
429     ddp_person_rec.party_rec.validated_flag := p1_a64;
430     ddp_person_rec.party_rec.orig_system_reference := p1_a65;
431     ddp_person_rec.party_rec.orig_system := p1_a66;
432     ddp_person_rec.party_rec.status := p1_a67;
433     ddp_person_rec.party_rec.category_code := p1_a68;
434     ddp_person_rec.party_rec.salutation := p1_a69;
435     ddp_person_rec.party_rec.attribute_category := p1_a70;
436     ddp_person_rec.party_rec.attribute1 := p1_a71;
437     ddp_person_rec.party_rec.attribute2 := p1_a72;
438     ddp_person_rec.party_rec.attribute3 := p1_a73;
439     ddp_person_rec.party_rec.attribute4 := p1_a74;
440     ddp_person_rec.party_rec.attribute5 := p1_a75;
441     ddp_person_rec.party_rec.attribute6 := p1_a76;
442     ddp_person_rec.party_rec.attribute7 := p1_a77;
443     ddp_person_rec.party_rec.attribute8 := p1_a78;
444     ddp_person_rec.party_rec.attribute9 := p1_a79;
445     ddp_person_rec.party_rec.attribute10 := p1_a80;
446     ddp_person_rec.party_rec.attribute11 := p1_a81;
447     ddp_person_rec.party_rec.attribute12 := p1_a82;
448     ddp_person_rec.party_rec.attribute13 := p1_a83;
449     ddp_person_rec.party_rec.attribute14 := p1_a84;
450     ddp_person_rec.party_rec.attribute15 := p1_a85;
451     ddp_person_rec.party_rec.attribute16 := p1_a86;
452     ddp_person_rec.party_rec.attribute17 := p1_a87;
453     ddp_person_rec.party_rec.attribute18 := p1_a88;
454     ddp_person_rec.party_rec.attribute19 := p1_a89;
455     ddp_person_rec.party_rec.attribute20 := p1_a90;
456     ddp_person_rec.party_rec.attribute21 := p1_a91;
457     ddp_person_rec.party_rec.attribute22 := p1_a92;
458     ddp_person_rec.party_rec.attribute23 := p1_a93;
459     ddp_person_rec.party_rec.attribute24 := p1_a94;
460 
461 
462 
463 
464 
465 
466 
467 
468     -- here's the delegated call to the old PL/SQL routine
469     hz_party_v2pub.create_person(p_init_msg_list,
470       ddp_person_rec,
471       p_party_usage_code,
472       x_party_id,
473       x_party_number,
474       x_profile_id,
475       x_return_status,
476       x_msg_count,
477       x_msg_data);
478 
479     -- copy data back from the local OUT or IN-OUT args, if any
480 
481 
482 
483 
484 
485 
486 
487 
488   end;
489 
490   procedure update_person_3(p_init_msg_list  VARCHAR2
491     , p_party_object_version_number in out nocopy  NUMBER
492     , x_profile_id out nocopy  NUMBER
493     , x_return_status out nocopy  VARCHAR2
494     , x_msg_count out nocopy  NUMBER
495     , x_msg_data out nocopy  VARCHAR2
496     , p1_a0  VARCHAR2 := null
497     , p1_a1  VARCHAR2 := null
498     , p1_a2  VARCHAR2 := null
499     , p1_a3  VARCHAR2 := null
500     , p1_a4  VARCHAR2 := null
501     , p1_a5  VARCHAR2 := null
502     , p1_a6  VARCHAR2 := null
503     , p1_a7  VARCHAR2 := null
504     , p1_a8  VARCHAR2 := null
505     , p1_a9  VARCHAR2 := null
506     , p1_a10  VARCHAR2 := null
507     , p1_a11  VARCHAR2 := null
508     , p1_a12  VARCHAR2 := null
509     , p1_a13  VARCHAR2 := null
510     , p1_a14  VARCHAR2 := null
511     , p1_a15  VARCHAR2 := null
512     , p1_a16  VARCHAR2 := null
513     , p1_a17  VARCHAR2 := null
514     , p1_a18  VARCHAR2 := null
515     , p1_a19  VARCHAR2 := null
516     , p1_a20  VARCHAR2 := null
517     , p1_a21  VARCHAR2 := null
518     , p1_a22  DATE := null
519     , p1_a23  VARCHAR2 := null
520     , p1_a24  DATE := null
521     , p1_a25  VARCHAR2 := null
522     , p1_a26  VARCHAR2 := null
523     , p1_a27  VARCHAR2 := null
524     , p1_a28  VARCHAR2 := null
525     , p1_a29  DATE := null
526     , p1_a30  NUMBER := null
527     , p1_a31  VARCHAR2 := null
528     , p1_a32  NUMBER := null
529     , p1_a33  NUMBER := null
530     , p1_a34  VARCHAR2 := null
531     , p1_a35  VARCHAR2 := null
532     , p1_a36  VARCHAR2 := null
533     , p1_a37  VARCHAR2 := null
534     , p1_a38  VARCHAR2 := null
535     , p1_a39  VARCHAR2 := null
536     , p1_a40  VARCHAR2 := null
537     , p1_a41  VARCHAR2 := null
538     , p1_a42  VARCHAR2 := null
539     , p1_a43  VARCHAR2 := null
540     , p1_a44  VARCHAR2 := null
541     , p1_a45  VARCHAR2 := null
542     , p1_a46  VARCHAR2 := null
543     , p1_a47  VARCHAR2 := null
544     , p1_a48  VARCHAR2 := null
545     , p1_a49  VARCHAR2 := null
546     , p1_a50  VARCHAR2 := null
547     , p1_a51  VARCHAR2 := null
548     , p1_a52  VARCHAR2 := null
549     , p1_a53  VARCHAR2 := null
550     , p1_a54  VARCHAR2 := null
551     , p1_a55  VARCHAR2 := null
552     , p1_a56  VARCHAR2 := null
553     , p1_a57  VARCHAR2 := null
554     , p1_a58  VARCHAR2 := null
555     , p1_a59  VARCHAR2 := null
556     , p1_a60  NUMBER := null
557     , p1_a61  VARCHAR2 := null
558     , p1_a62  NUMBER := null
559     , p1_a63  VARCHAR2 := null
560     , p1_a64  VARCHAR2 := null
561     , p1_a65  VARCHAR2 := null
562     , p1_a66  VARCHAR2 := null
563     , p1_a67  VARCHAR2 := null
564     , p1_a68  VARCHAR2 := null
565     , p1_a69  VARCHAR2 := null
566     , p1_a70  VARCHAR2 := null
567     , p1_a71  VARCHAR2 := null
568     , p1_a72  VARCHAR2 := null
569     , p1_a73  VARCHAR2 := null
570     , p1_a74  VARCHAR2 := null
571     , p1_a75  VARCHAR2 := null
572     , p1_a76  VARCHAR2 := null
573     , p1_a77  VARCHAR2 := null
574     , p1_a78  VARCHAR2 := null
575     , p1_a79  VARCHAR2 := null
576     , p1_a80  VARCHAR2 := null
577     , p1_a81  VARCHAR2 := null
578     , p1_a82  VARCHAR2 := null
579     , p1_a83  VARCHAR2 := null
580     , p1_a84  VARCHAR2 := null
581     , p1_a85  VARCHAR2 := null
582     , p1_a86  VARCHAR2 := null
583     , p1_a87  VARCHAR2 := null
584     , p1_a88  VARCHAR2 := null
585     , p1_a89  VARCHAR2 := null
586     , p1_a90  VARCHAR2 := null
587     , p1_a91  VARCHAR2 := null
588     , p1_a92  VARCHAR2 := null
589     , p1_a93  VARCHAR2 := null
590     , p1_a94  VARCHAR2 := null
591   )
592   as
593     ddp_person_rec hz_party_v2pub.person_rec_type;
594     ddindx binary_integer; indx binary_integer;
595   begin
596 
597     -- copy data to the local IN or IN-OUT args, if any
598 
599     ddp_person_rec.person_pre_name_adjunct := p1_a0;
600     ddp_person_rec.person_first_name := p1_a1;
601     ddp_person_rec.person_middle_name := p1_a2;
602     ddp_person_rec.person_last_name := p1_a3;
603     ddp_person_rec.person_name_suffix := p1_a4;
604     ddp_person_rec.person_title := p1_a5;
605     ddp_person_rec.person_academic_title := p1_a6;
606     ddp_person_rec.person_previous_last_name := p1_a7;
607     ddp_person_rec.person_initials := p1_a8;
608     ddp_person_rec.known_as := p1_a9;
609     ddp_person_rec.known_as2 := p1_a10;
610     ddp_person_rec.known_as3 := p1_a11;
611     ddp_person_rec.known_as4 := p1_a12;
612     ddp_person_rec.known_as5 := p1_a13;
613     ddp_person_rec.person_name_phonetic := p1_a14;
614     ddp_person_rec.person_first_name_phonetic := p1_a15;
615     ddp_person_rec.person_last_name_phonetic := p1_a16;
616     ddp_person_rec.middle_name_phonetic := p1_a17;
617     ddp_person_rec.tax_reference := p1_a18;
618     ddp_person_rec.jgzz_fiscal_code := p1_a19;
619     ddp_person_rec.person_iden_type := p1_a20;
620     ddp_person_rec.person_identifier := p1_a21;
621     ddp_person_rec.date_of_birth := rosetta_g_miss_date_in_map(p1_a22);
622     ddp_person_rec.place_of_birth := p1_a23;
623     ddp_person_rec.date_of_death := rosetta_g_miss_date_in_map(p1_a24);
624     ddp_person_rec.deceased_flag := p1_a25;
625     ddp_person_rec.gender := p1_a26;
626     ddp_person_rec.declared_ethnicity := p1_a27;
627     ddp_person_rec.marital_status := p1_a28;
628     ddp_person_rec.marital_status_effective_date := rosetta_g_miss_date_in_map(p1_a29);
629     ddp_person_rec.personal_income := rosetta_g_miss_num_map(p1_a30);
630     ddp_person_rec.head_of_household_flag := p1_a31;
631     ddp_person_rec.household_income := rosetta_g_miss_num_map(p1_a32);
632     ddp_person_rec.household_size := rosetta_g_miss_num_map(p1_a33);
633     ddp_person_rec.rent_own_ind := p1_a34;
634     ddp_person_rec.last_known_gps := p1_a35;
635     ddp_person_rec.content_source_type := p1_a36;
636     ddp_person_rec.internal_flag := p1_a37;
637     ddp_person_rec.attribute_category := p1_a38;
638     ddp_person_rec.attribute1 := p1_a39;
639     ddp_person_rec.attribute2 := p1_a40;
640     ddp_person_rec.attribute3 := p1_a41;
641     ddp_person_rec.attribute4 := p1_a42;
642     ddp_person_rec.attribute5 := p1_a43;
643     ddp_person_rec.attribute6 := p1_a44;
644     ddp_person_rec.attribute7 := p1_a45;
645     ddp_person_rec.attribute8 := p1_a46;
646     ddp_person_rec.attribute9 := p1_a47;
647     ddp_person_rec.attribute10 := p1_a48;
648     ddp_person_rec.attribute11 := p1_a49;
649     ddp_person_rec.attribute12 := p1_a50;
650     ddp_person_rec.attribute13 := p1_a51;
651     ddp_person_rec.attribute14 := p1_a52;
652     ddp_person_rec.attribute15 := p1_a53;
653     ddp_person_rec.attribute16 := p1_a54;
654     ddp_person_rec.attribute17 := p1_a55;
655     ddp_person_rec.attribute18 := p1_a56;
656     ddp_person_rec.attribute19 := p1_a57;
657     ddp_person_rec.attribute20 := p1_a58;
658     ddp_person_rec.created_by_module := p1_a59;
659     ddp_person_rec.application_id := rosetta_g_miss_num_map(p1_a60);
660     ddp_person_rec.actual_content_source := p1_a61;
661     ddp_person_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a62);
662     ddp_person_rec.party_rec.party_number := p1_a63;
663     ddp_person_rec.party_rec.validated_flag := p1_a64;
664     ddp_person_rec.party_rec.orig_system_reference := p1_a65;
665     ddp_person_rec.party_rec.orig_system := p1_a66;
666     ddp_person_rec.party_rec.status := p1_a67;
667     ddp_person_rec.party_rec.category_code := p1_a68;
668     ddp_person_rec.party_rec.salutation := p1_a69;
669     ddp_person_rec.party_rec.attribute_category := p1_a70;
670     ddp_person_rec.party_rec.attribute1 := p1_a71;
671     ddp_person_rec.party_rec.attribute2 := p1_a72;
672     ddp_person_rec.party_rec.attribute3 := p1_a73;
673     ddp_person_rec.party_rec.attribute4 := p1_a74;
674     ddp_person_rec.party_rec.attribute5 := p1_a75;
675     ddp_person_rec.party_rec.attribute6 := p1_a76;
676     ddp_person_rec.party_rec.attribute7 := p1_a77;
677     ddp_person_rec.party_rec.attribute8 := p1_a78;
678     ddp_person_rec.party_rec.attribute9 := p1_a79;
679     ddp_person_rec.party_rec.attribute10 := p1_a80;
680     ddp_person_rec.party_rec.attribute11 := p1_a81;
681     ddp_person_rec.party_rec.attribute12 := p1_a82;
682     ddp_person_rec.party_rec.attribute13 := p1_a83;
683     ddp_person_rec.party_rec.attribute14 := p1_a84;
684     ddp_person_rec.party_rec.attribute15 := p1_a85;
685     ddp_person_rec.party_rec.attribute16 := p1_a86;
686     ddp_person_rec.party_rec.attribute17 := p1_a87;
687     ddp_person_rec.party_rec.attribute18 := p1_a88;
688     ddp_person_rec.party_rec.attribute19 := p1_a89;
689     ddp_person_rec.party_rec.attribute20 := p1_a90;
690     ddp_person_rec.party_rec.attribute21 := p1_a91;
691     ddp_person_rec.party_rec.attribute22 := p1_a92;
692     ddp_person_rec.party_rec.attribute23 := p1_a93;
693     ddp_person_rec.party_rec.attribute24 := p1_a94;
694 
695 
696 
697 
698 
699 
700     -- here's the delegated call to the old PL/SQL routine
701     hz_party_v2pub.update_person(p_init_msg_list,
702       ddp_person_rec,
703       p_party_object_version_number,
704       x_profile_id,
705       x_return_status,
706       x_msg_count,
707       x_msg_data);
708 
709     -- copy data back from the local OUT or IN-OUT args, if any
710 
711 
712 
713 
714 
715 
716   end;
717 
718   procedure create_group_4(p_init_msg_list  VARCHAR2
719     , x_party_id out nocopy  NUMBER
720     , x_party_number out nocopy  VARCHAR2
721     , x_return_status out nocopy  VARCHAR2
722     , x_msg_count out nocopy  NUMBER
723     , x_msg_data out nocopy  VARCHAR2
724     , p1_a0  VARCHAR2 := null
725     , p1_a1  VARCHAR2 := null
726     , p1_a2  VARCHAR2 := null
727     , p1_a3  VARCHAR2 := null
728     , p1_a4  NUMBER := null
729     , p1_a5  NUMBER := null
730     , p1_a6  VARCHAR2 := null
731     , p1_a7  VARCHAR2 := null
732     , p1_a8  VARCHAR2 := null
733     , p1_a9  VARCHAR2 := null
734     , p1_a10  VARCHAR2 := null
735     , p1_a11  VARCHAR2 := null
736     , p1_a12  VARCHAR2 := null
737     , p1_a13  VARCHAR2 := null
738     , p1_a14  VARCHAR2 := null
739     , p1_a15  VARCHAR2 := null
740     , p1_a16  VARCHAR2 := null
741     , p1_a17  VARCHAR2 := null
742     , p1_a18  VARCHAR2 := null
743     , p1_a19  VARCHAR2 := null
744     , p1_a20  VARCHAR2 := null
745     , p1_a21  VARCHAR2 := null
746     , p1_a22  VARCHAR2 := null
747     , p1_a23  VARCHAR2 := null
748     , p1_a24  VARCHAR2 := null
749     , p1_a25  VARCHAR2 := null
750     , p1_a26  VARCHAR2 := null
751     , p1_a27  VARCHAR2 := null
752     , p1_a28  VARCHAR2 := null
753     , p1_a29  VARCHAR2 := null
754     , p1_a30  VARCHAR2 := null
755     , p1_a31  VARCHAR2 := null
756     , p1_a32  VARCHAR2 := null
757     , p1_a33  VARCHAR2 := null
758     , p1_a34  VARCHAR2 := null
759     , p1_a35  VARCHAR2 := null
760     , p1_a36  VARCHAR2 := null
761     , p1_a37  VARCHAR2 := null
762   )
763   as
764     ddp_group_rec hz_party_v2pub.group_rec_type;
765     ddindx binary_integer; indx binary_integer;
766   begin
767 
768     -- copy data to the local IN or IN-OUT args, if any
769 
770     ddp_group_rec.group_name := p1_a0;
771     ddp_group_rec.group_type := p1_a1;
772     ddp_group_rec.created_by_module := p1_a2;
773     ddp_group_rec.mission_statement := p1_a3;
774     ddp_group_rec.application_id := rosetta_g_miss_num_map(p1_a4);
775     ddp_group_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a5);
776     ddp_group_rec.party_rec.party_number := p1_a6;
777     ddp_group_rec.party_rec.validated_flag := p1_a7;
778     ddp_group_rec.party_rec.orig_system_reference := p1_a8;
779     ddp_group_rec.party_rec.orig_system := p1_a9;
780     ddp_group_rec.party_rec.status := p1_a10;
781     ddp_group_rec.party_rec.category_code := p1_a11;
782     ddp_group_rec.party_rec.salutation := p1_a12;
783     ddp_group_rec.party_rec.attribute_category := p1_a13;
784     ddp_group_rec.party_rec.attribute1 := p1_a14;
785     ddp_group_rec.party_rec.attribute2 := p1_a15;
786     ddp_group_rec.party_rec.attribute3 := p1_a16;
787     ddp_group_rec.party_rec.attribute4 := p1_a17;
788     ddp_group_rec.party_rec.attribute5 := p1_a18;
789     ddp_group_rec.party_rec.attribute6 := p1_a19;
790     ddp_group_rec.party_rec.attribute7 := p1_a20;
791     ddp_group_rec.party_rec.attribute8 := p1_a21;
792     ddp_group_rec.party_rec.attribute9 := p1_a22;
793     ddp_group_rec.party_rec.attribute10 := p1_a23;
794     ddp_group_rec.party_rec.attribute11 := p1_a24;
795     ddp_group_rec.party_rec.attribute12 := p1_a25;
796     ddp_group_rec.party_rec.attribute13 := p1_a26;
797     ddp_group_rec.party_rec.attribute14 := p1_a27;
798     ddp_group_rec.party_rec.attribute15 := p1_a28;
799     ddp_group_rec.party_rec.attribute16 := p1_a29;
800     ddp_group_rec.party_rec.attribute17 := p1_a30;
801     ddp_group_rec.party_rec.attribute18 := p1_a31;
802     ddp_group_rec.party_rec.attribute19 := p1_a32;
803     ddp_group_rec.party_rec.attribute20 := p1_a33;
804     ddp_group_rec.party_rec.attribute21 := p1_a34;
805     ddp_group_rec.party_rec.attribute22 := p1_a35;
806     ddp_group_rec.party_rec.attribute23 := p1_a36;
807     ddp_group_rec.party_rec.attribute24 := p1_a37;
808 
809 
810 
811 
812 
813 
814     -- here's the delegated call to the old PL/SQL routine
815     hz_party_v2pub.create_group(p_init_msg_list,
816       ddp_group_rec,
817       x_party_id,
818       x_party_number,
819       x_return_status,
820       x_msg_count,
821       x_msg_data);
822 
823     -- copy data back from the local OUT or IN-OUT args, if any
824 
825 
826 
827 
828 
829 
830   end;
831 
832   procedure update_group_5(p_init_msg_list  VARCHAR2
833     , p_party_object_version_number in out nocopy  NUMBER
834     , x_return_status out nocopy  VARCHAR2
835     , x_msg_count out nocopy  NUMBER
836     , x_msg_data out nocopy  VARCHAR2
837     , p1_a0  VARCHAR2 := null
838     , p1_a1  VARCHAR2 := null
839     , p1_a2  VARCHAR2 := null
840     , p1_a3  VARCHAR2 := null
841     , p1_a4  NUMBER := null
842     , p1_a5  NUMBER := null
843     , p1_a6  VARCHAR2 := null
844     , p1_a7  VARCHAR2 := null
845     , p1_a8  VARCHAR2 := null
846     , p1_a9  VARCHAR2 := null
847     , p1_a10  VARCHAR2 := null
848     , p1_a11  VARCHAR2 := null
849     , p1_a12  VARCHAR2 := null
850     , p1_a13  VARCHAR2 := null
851     , p1_a14  VARCHAR2 := null
852     , p1_a15  VARCHAR2 := null
853     , p1_a16  VARCHAR2 := null
854     , p1_a17  VARCHAR2 := null
855     , p1_a18  VARCHAR2 := null
856     , p1_a19  VARCHAR2 := null
857     , p1_a20  VARCHAR2 := null
858     , p1_a21  VARCHAR2 := null
859     , p1_a22  VARCHAR2 := null
860     , p1_a23  VARCHAR2 := null
861     , p1_a24  VARCHAR2 := null
862     , p1_a25  VARCHAR2 := null
863     , p1_a26  VARCHAR2 := null
864     , p1_a27  VARCHAR2 := null
865     , p1_a28  VARCHAR2 := null
866     , p1_a29  VARCHAR2 := null
867     , p1_a30  VARCHAR2 := null
868     , p1_a31  VARCHAR2 := null
869     , p1_a32  VARCHAR2 := null
870     , p1_a33  VARCHAR2 := null
871     , p1_a34  VARCHAR2 := null
872     , p1_a35  VARCHAR2 := null
873     , p1_a36  VARCHAR2 := null
874     , p1_a37  VARCHAR2 := null
875   )
876   as
877     ddp_group_rec hz_party_v2pub.group_rec_type;
878     ddindx binary_integer; indx binary_integer;
879   begin
880 
881     -- copy data to the local IN or IN-OUT args, if any
882 
883     ddp_group_rec.group_name := p1_a0;
884     ddp_group_rec.group_type := p1_a1;
885     ddp_group_rec.created_by_module := p1_a2;
886     ddp_group_rec.mission_statement := p1_a3;
887     ddp_group_rec.application_id := rosetta_g_miss_num_map(p1_a4);
888     ddp_group_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a5);
889     ddp_group_rec.party_rec.party_number := p1_a6;
890     ddp_group_rec.party_rec.validated_flag := p1_a7;
891     ddp_group_rec.party_rec.orig_system_reference := p1_a8;
892     ddp_group_rec.party_rec.orig_system := p1_a9;
893     ddp_group_rec.party_rec.status := p1_a10;
894     ddp_group_rec.party_rec.category_code := p1_a11;
895     ddp_group_rec.party_rec.salutation := p1_a12;
896     ddp_group_rec.party_rec.attribute_category := p1_a13;
897     ddp_group_rec.party_rec.attribute1 := p1_a14;
898     ddp_group_rec.party_rec.attribute2 := p1_a15;
899     ddp_group_rec.party_rec.attribute3 := p1_a16;
900     ddp_group_rec.party_rec.attribute4 := p1_a17;
901     ddp_group_rec.party_rec.attribute5 := p1_a18;
902     ddp_group_rec.party_rec.attribute6 := p1_a19;
903     ddp_group_rec.party_rec.attribute7 := p1_a20;
904     ddp_group_rec.party_rec.attribute8 := p1_a21;
905     ddp_group_rec.party_rec.attribute9 := p1_a22;
906     ddp_group_rec.party_rec.attribute10 := p1_a23;
907     ddp_group_rec.party_rec.attribute11 := p1_a24;
908     ddp_group_rec.party_rec.attribute12 := p1_a25;
909     ddp_group_rec.party_rec.attribute13 := p1_a26;
910     ddp_group_rec.party_rec.attribute14 := p1_a27;
911     ddp_group_rec.party_rec.attribute15 := p1_a28;
912     ddp_group_rec.party_rec.attribute16 := p1_a29;
913     ddp_group_rec.party_rec.attribute17 := p1_a30;
914     ddp_group_rec.party_rec.attribute18 := p1_a31;
915     ddp_group_rec.party_rec.attribute19 := p1_a32;
916     ddp_group_rec.party_rec.attribute20 := p1_a33;
917     ddp_group_rec.party_rec.attribute21 := p1_a34;
918     ddp_group_rec.party_rec.attribute22 := p1_a35;
919     ddp_group_rec.party_rec.attribute23 := p1_a36;
920     ddp_group_rec.party_rec.attribute24 := p1_a37;
921 
922 
923 
924 
925 
926     -- here's the delegated call to the old PL/SQL routine
927     hz_party_v2pub.update_group(p_init_msg_list,
928       ddp_group_rec,
929       p_party_object_version_number,
930       x_return_status,
931       x_msg_count,
932       x_msg_data);
933 
934     -- copy data back from the local OUT or IN-OUT args, if any
935 
936 
937 
938 
939 
940   end;
941 
942   procedure create_organization_6(p_init_msg_list  VARCHAR2
943     , x_return_status out nocopy  VARCHAR2
944     , x_msg_count out nocopy  NUMBER
945     , x_msg_data out nocopy  VARCHAR2
946     , x_party_id out nocopy  NUMBER
947     , x_party_number out nocopy  VARCHAR2
948     , x_profile_id out nocopy  NUMBER
949     , p1_a0  VARCHAR2 := null
950     , p1_a1  VARCHAR2 := null
951     , p1_a2  VARCHAR2 := null
952     , p1_a3  VARCHAR2 := null
953     , p1_a4  VARCHAR2 := null
954     , p1_a5  VARCHAR2 := null
955     , p1_a6  VARCHAR2 := null
956     , p1_a7  VARCHAR2 := null
957     , p1_a8  NUMBER := null
958     , p1_a9  NUMBER := null
959     , p1_a10  VARCHAR2 := null
960     , p1_a11  VARCHAR2 := null
961     , p1_a12  VARCHAR2 := null
962     , p1_a13  VARCHAR2 := null
963     , p1_a14  VARCHAR2 := null
964     , p1_a15  VARCHAR2 := null
965     , p1_a16  VARCHAR2 := null
966     , p1_a17  VARCHAR2 := null
967     , p1_a18  VARCHAR2 := null
968     , p1_a19  VARCHAR2 := null
969     , p1_a20  VARCHAR2 := null
970     , p1_a21  VARCHAR2 := null
971     , p1_a22  VARCHAR2 := null
972     , p1_a23  VARCHAR2 := null
973     , p1_a24  VARCHAR2 := null
974     , p1_a25  VARCHAR2 := null
975     , p1_a26  NUMBER := null
976     , p1_a27  DATE := null
977     , p1_a28  VARCHAR2 := null
978     , p1_a29  NUMBER := null
979     , p1_a30  VARCHAR2 := null
980     , p1_a31  VARCHAR2 := null
981     , p1_a32  VARCHAR2 := null
982     , p1_a33  VARCHAR2 := null
983     , p1_a34  VARCHAR2 := null
984     , p1_a35  VARCHAR2 := null
985     , p1_a36  VARCHAR2 := null
986     , p1_a37  VARCHAR2 := null
987     , p1_a38  VARCHAR2 := null
988     , p1_a39  DATE := null
989     , p1_a40  DATE := null
990     , p1_a41  VARCHAR2 := null
991     , p1_a42  VARCHAR2 := null
992     , p1_a43  VARCHAR2 := null
993     , p1_a44  VARCHAR2 := null
994     , p1_a45  VARCHAR2 := null
995     , p1_a46  VARCHAR2 := null
996     , p1_a47  NUMBER := null
997     , p1_a48  NUMBER := null
998     , p1_a49  NUMBER := null
999     , p1_a50  VARCHAR2 := null
1000     , p1_a51  VARCHAR2 := null
1001     , p1_a52  VARCHAR2 := null
1002     , p1_a53  VARCHAR2 := null
1003     , p1_a54  VARCHAR2 := null
1004     , p1_a55  VARCHAR2 := null
1005     , p1_a56  VARCHAR2 := null
1006     , p1_a57  VARCHAR2 := null
1007     , p1_a58  VARCHAR2 := null
1008     , p1_a59  VARCHAR2 := null
1009     , p1_a60  VARCHAR2 := null
1010     , p1_a61  VARCHAR2 := null
1011     , p1_a62  VARCHAR2 := null
1012     , p1_a63  VARCHAR2 := null
1013     , p1_a64  VARCHAR2 := null
1014     , p1_a65  VARCHAR2 := null
1015     , p1_a66  VARCHAR2 := null
1016     , p1_a67  VARCHAR2 := null
1017     , p1_a68  NUMBER := null
1018     , p1_a69  VARCHAR2 := null
1019     , p1_a70  VARCHAR2 := null
1020     , p1_a71  VARCHAR2 := null
1021     , p1_a72  VARCHAR2 := null
1022     , p1_a73  VARCHAR2 := null
1023     , p1_a74  VARCHAR2 := null
1024     , p1_a75  VARCHAR2 := null
1025     , p1_a76  VARCHAR2 := null
1026     , p1_a77  VARCHAR2 := null
1027     , p1_a78  NUMBER := null
1028     , p1_a79  NUMBER := null
1029     , p1_a80  NUMBER := null
1030     , p1_a81  NUMBER := null
1031     , p1_a82  NUMBER := null
1032     , p1_a83  NUMBER := null
1033     , p1_a84  NUMBER := null
1034     , p1_a85  DATE := null
1035     , p1_a86  VARCHAR2 := null
1036     , p1_a87  VARCHAR2 := null
1037     , p1_a88  VARCHAR2 := null
1038     , p1_a89  VARCHAR2 := null
1039     , p1_a90  VARCHAR2 := null
1040     , p1_a91  VARCHAR2 := null
1041     , p1_a92  VARCHAR2 := null
1042     , p1_a93  VARCHAR2 := null
1043     , p1_a94  VARCHAR2 := null
1044     , p1_a95  NUMBER := null
1045     , p1_a96  NUMBER := null
1046     , p1_a97  NUMBER := null
1047     , p1_a98  DATE := null
1048     , p1_a99  VARCHAR2 := null
1049     , p1_a100  VARCHAR2 := null
1050     , p1_a101  VARCHAR2 := null
1051     , p1_a102  VARCHAR2 := null
1052     , p1_a103  VARCHAR2 := null
1053     , p1_a104  VARCHAR2 := null
1054     , p1_a105  VARCHAR2 := null
1055     , p1_a106  VARCHAR2 := null
1056     , p1_a107  VARCHAR2 := null
1057     , p1_a108  NUMBER := null
1058     , p1_a109  VARCHAR2 := null
1059     , p1_a110  NUMBER := null
1060     , p1_a111  VARCHAR2 := null
1061     , p1_a112  VARCHAR2 := null
1062     , p1_a113  VARCHAR2 := null
1063     , p1_a114  VARCHAR2 := null
1064     , p1_a115  VARCHAR2 := null
1065     , p1_a116  VARCHAR2 := null
1066     , p1_a117  VARCHAR2 := null
1067     , p1_a118  VARCHAR2 := null
1068     , p1_a119  VARCHAR2 := null
1069     , p1_a120  VARCHAR2 := null
1070     , p1_a121  VARCHAR2 := null
1071     , p1_a122  VARCHAR2 := null
1072     , p1_a123  VARCHAR2 := null
1073     , p1_a124  VARCHAR2 := null
1074     , p1_a125  VARCHAR2 := null
1075     , p1_a126  VARCHAR2 := null
1076     , p1_a127  VARCHAR2 := null
1077     , p1_a128  VARCHAR2 := null
1078     , p1_a129  VARCHAR2 := null
1079     , p1_a130  VARCHAR2 := null
1080     , p1_a131  VARCHAR2 := null
1081     , p1_a132  VARCHAR2 := null
1082     , p1_a133  VARCHAR2 := null
1083     , p1_a134  VARCHAR2 := null
1084     , p1_a135  NUMBER := null
1085     , p1_a136  VARCHAR2 := null
1086     , p1_a137  VARCHAR2 := null
1087     , p1_a138  VARCHAR2 := null
1088     , p1_a139  NUMBER := null
1089     , p1_a140  VARCHAR2 := null
1090     , p1_a141  VARCHAR2 := null
1091     , p1_a142  VARCHAR2 := null
1092     , p1_a143  VARCHAR2 := null
1093     , p1_a144  VARCHAR2 := null
1094     , p1_a145  VARCHAR2 := null
1095     , p1_a146  VARCHAR2 := null
1096     , p1_a147  VARCHAR2 := null
1097     , p1_a148  VARCHAR2 := null
1098     , p1_a149  VARCHAR2 := null
1099     , p1_a150  VARCHAR2 := null
1100     , p1_a151  VARCHAR2 := null
1101     , p1_a152  VARCHAR2 := null
1102     , p1_a153  VARCHAR2 := null
1103     , p1_a154  VARCHAR2 := null
1104     , p1_a155  VARCHAR2 := null
1105     , p1_a156  VARCHAR2 := null
1106     , p1_a157  VARCHAR2 := null
1107     , p1_a158  VARCHAR2 := null
1108     , p1_a159  VARCHAR2 := null
1109     , p1_a160  VARCHAR2 := null
1110     , p1_a161  VARCHAR2 := null
1111     , p1_a162  VARCHAR2 := null
1112     , p1_a163  VARCHAR2 := null
1113     , p1_a164  VARCHAR2 := null
1114     , p1_a165  VARCHAR2 := null
1115     , p1_a166  VARCHAR2 := null
1116     , p1_a167  VARCHAR2 := null
1117     , p1_a168  VARCHAR2 := null
1118     , p1_a169  VARCHAR2 := null
1119     , p1_a170  VARCHAR2 := null
1120     , p1_a171  VARCHAR2 := null
1121   )
1122   as
1123     ddp_organization_rec hz_party_v2pub.organization_rec_type;
1124     ddindx binary_integer; indx binary_integer;
1125   begin
1126 
1127     -- copy data to the local IN or IN-OUT args, if any
1128 
1129     ddp_organization_rec.organization_name := p1_a0;
1130     ddp_organization_rec.duns_number_c := p1_a1;
1131     ddp_organization_rec.enquiry_duns := p1_a2;
1132     ddp_organization_rec.ceo_name := p1_a3;
1133     ddp_organization_rec.ceo_title := p1_a4;
1134     ddp_organization_rec.principal_name := p1_a5;
1135     ddp_organization_rec.principal_title := p1_a6;
1136     ddp_organization_rec.legal_status := p1_a7;
1137     ddp_organization_rec.control_yr := rosetta_g_miss_num_map(p1_a8);
1138     ddp_organization_rec.employees_total := rosetta_g_miss_num_map(p1_a9);
1139     ddp_organization_rec.hq_branch_ind := p1_a10;
1140     ddp_organization_rec.branch_flag := p1_a11;
1141     ddp_organization_rec.oob_ind := p1_a12;
1142     ddp_organization_rec.line_of_business := p1_a13;
1143     ddp_organization_rec.cong_dist_code := p1_a14;
1144     ddp_organization_rec.sic_code := p1_a15;
1145     ddp_organization_rec.import_ind := p1_a16;
1146     ddp_organization_rec.export_ind := p1_a17;
1147     ddp_organization_rec.labor_surplus_ind := p1_a18;
1148     ddp_organization_rec.debarment_ind := p1_a19;
1149     ddp_organization_rec.minority_owned_ind := p1_a20;
1150     ddp_organization_rec.minority_owned_type := p1_a21;
1151     ddp_organization_rec.woman_owned_ind := p1_a22;
1152     ddp_organization_rec.disadv_8a_ind := p1_a23;
1153     ddp_organization_rec.small_bus_ind := p1_a24;
1154     ddp_organization_rec.rent_own_ind := p1_a25;
1155     ddp_organization_rec.debarments_count := rosetta_g_miss_num_map(p1_a26);
1156     ddp_organization_rec.debarments_date := rosetta_g_miss_date_in_map(p1_a27);
1157     ddp_organization_rec.failure_score := p1_a28;
1158     ddp_organization_rec.failure_score_natnl_percentile := rosetta_g_miss_num_map(p1_a29);
1159     ddp_organization_rec.failure_score_override_code := p1_a30;
1160     ddp_organization_rec.failure_score_commentary := p1_a31;
1161     ddp_organization_rec.global_failure_score := p1_a32;
1162     ddp_organization_rec.db_rating := p1_a33;
1163     ddp_organization_rec.credit_score := p1_a34;
1164     ddp_organization_rec.credit_score_commentary := p1_a35;
1165     ddp_organization_rec.paydex_score := p1_a36;
1166     ddp_organization_rec.paydex_three_months_ago := p1_a37;
1167     ddp_organization_rec.paydex_norm := p1_a38;
1168     ddp_organization_rec.best_time_contact_begin := rosetta_g_miss_date_in_map(p1_a39);
1169     ddp_organization_rec.best_time_contact_end := rosetta_g_miss_date_in_map(p1_a40);
1170     ddp_organization_rec.organization_name_phonetic := p1_a41;
1171     ddp_organization_rec.tax_reference := p1_a42;
1172     ddp_organization_rec.gsa_indicator_flag := p1_a43;
1173     ddp_organization_rec.jgzz_fiscal_code := p1_a44;
1174     ddp_organization_rec.analysis_fy := p1_a45;
1175     ddp_organization_rec.fiscal_yearend_month := p1_a46;
1176     ddp_organization_rec.curr_fy_potential_revenue := rosetta_g_miss_num_map(p1_a47);
1177     ddp_organization_rec.next_fy_potential_revenue := rosetta_g_miss_num_map(p1_a48);
1178     ddp_organization_rec.year_established := rosetta_g_miss_num_map(p1_a49);
1179     ddp_organization_rec.mission_statement := p1_a50;
1180     ddp_organization_rec.organization_type := p1_a51;
1181     ddp_organization_rec.business_scope := p1_a52;
1182     ddp_organization_rec.corporation_class := p1_a53;
1183     ddp_organization_rec.known_as := p1_a54;
1184     ddp_organization_rec.known_as2 := p1_a55;
1185     ddp_organization_rec.known_as3 := p1_a56;
1186     ddp_organization_rec.known_as4 := p1_a57;
1187     ddp_organization_rec.known_as5 := p1_a58;
1188     ddp_organization_rec.local_bus_iden_type := p1_a59;
1189     ddp_organization_rec.local_bus_identifier := p1_a60;
1190     ddp_organization_rec.pref_functional_currency := p1_a61;
1191     ddp_organization_rec.registration_type := p1_a62;
1192     ddp_organization_rec.total_employees_text := p1_a63;
1193     ddp_organization_rec.total_employees_ind := p1_a64;
1194     ddp_organization_rec.total_emp_est_ind := p1_a65;
1195     ddp_organization_rec.total_emp_min_ind := p1_a66;
1196     ddp_organization_rec.parent_sub_ind := p1_a67;
1197     ddp_organization_rec.incorp_year := rosetta_g_miss_num_map(p1_a68);
1198     ddp_organization_rec.sic_code_type := p1_a69;
1199     ddp_organization_rec.public_private_ownership_flag := p1_a70;
1200     ddp_organization_rec.internal_flag := p1_a71;
1201     ddp_organization_rec.local_activity_code_type := p1_a72;
1202     ddp_organization_rec.local_activity_code := p1_a73;
1203     ddp_organization_rec.emp_at_primary_adr := p1_a74;
1204     ddp_organization_rec.emp_at_primary_adr_text := p1_a75;
1205     ddp_organization_rec.emp_at_primary_adr_est_ind := p1_a76;
1206     ddp_organization_rec.emp_at_primary_adr_min_ind := p1_a77;
1207     ddp_organization_rec.high_credit := rosetta_g_miss_num_map(p1_a78);
1208     ddp_organization_rec.avg_high_credit := rosetta_g_miss_num_map(p1_a79);
1209     ddp_organization_rec.total_payments := rosetta_g_miss_num_map(p1_a80);
1210     ddp_organization_rec.credit_score_class := rosetta_g_miss_num_map(p1_a81);
1211     ddp_organization_rec.credit_score_natl_percentile := rosetta_g_miss_num_map(p1_a82);
1212     ddp_organization_rec.credit_score_incd_default := rosetta_g_miss_num_map(p1_a83);
1213     ddp_organization_rec.credit_score_age := rosetta_g_miss_num_map(p1_a84);
1214     ddp_organization_rec.credit_score_date := rosetta_g_miss_date_in_map(p1_a85);
1215     ddp_organization_rec.credit_score_commentary2 := p1_a86;
1216     ddp_organization_rec.credit_score_commentary3 := p1_a87;
1217     ddp_organization_rec.credit_score_commentary4 := p1_a88;
1218     ddp_organization_rec.credit_score_commentary5 := p1_a89;
1219     ddp_organization_rec.credit_score_commentary6 := p1_a90;
1220     ddp_organization_rec.credit_score_commentary7 := p1_a91;
1221     ddp_organization_rec.credit_score_commentary8 := p1_a92;
1222     ddp_organization_rec.credit_score_commentary9 := p1_a93;
1223     ddp_organization_rec.credit_score_commentary10 := p1_a94;
1224     ddp_organization_rec.failure_score_class := rosetta_g_miss_num_map(p1_a95);
1225     ddp_organization_rec.failure_score_incd_default := rosetta_g_miss_num_map(p1_a96);
1226     ddp_organization_rec.failure_score_age := rosetta_g_miss_num_map(p1_a97);
1227     ddp_organization_rec.failure_score_date := rosetta_g_miss_date_in_map(p1_a98);
1228     ddp_organization_rec.failure_score_commentary2 := p1_a99;
1229     ddp_organization_rec.failure_score_commentary3 := p1_a100;
1230     ddp_organization_rec.failure_score_commentary4 := p1_a101;
1231     ddp_organization_rec.failure_score_commentary5 := p1_a102;
1232     ddp_organization_rec.failure_score_commentary6 := p1_a103;
1233     ddp_organization_rec.failure_score_commentary7 := p1_a104;
1234     ddp_organization_rec.failure_score_commentary8 := p1_a105;
1235     ddp_organization_rec.failure_score_commentary9 := p1_a106;
1236     ddp_organization_rec.failure_score_commentary10 := p1_a107;
1237     ddp_organization_rec.maximum_credit_recommendation := rosetta_g_miss_num_map(p1_a108);
1238     ddp_organization_rec.maximum_credit_currency_code := p1_a109;
1239     ddp_organization_rec.displayed_duns_party_id := rosetta_g_miss_num_map(p1_a110);
1240     ddp_organization_rec.content_source_type := p1_a111;
1241     ddp_organization_rec.content_source_number := p1_a112;
1242     ddp_organization_rec.attribute_category := p1_a113;
1243     ddp_organization_rec.attribute1 := p1_a114;
1244     ddp_organization_rec.attribute2 := p1_a115;
1245     ddp_organization_rec.attribute3 := p1_a116;
1246     ddp_organization_rec.attribute4 := p1_a117;
1247     ddp_organization_rec.attribute5 := p1_a118;
1248     ddp_organization_rec.attribute6 := p1_a119;
1249     ddp_organization_rec.attribute7 := p1_a120;
1250     ddp_organization_rec.attribute8 := p1_a121;
1251     ddp_organization_rec.attribute9 := p1_a122;
1252     ddp_organization_rec.attribute10 := p1_a123;
1253     ddp_organization_rec.attribute11 := p1_a124;
1254     ddp_organization_rec.attribute12 := p1_a125;
1255     ddp_organization_rec.attribute13 := p1_a126;
1256     ddp_organization_rec.attribute14 := p1_a127;
1257     ddp_organization_rec.attribute15 := p1_a128;
1258     ddp_organization_rec.attribute16 := p1_a129;
1259     ddp_organization_rec.attribute17 := p1_a130;
1260     ddp_organization_rec.attribute18 := p1_a131;
1261     ddp_organization_rec.attribute19 := p1_a132;
1262     ddp_organization_rec.attribute20 := p1_a133;
1263     ddp_organization_rec.created_by_module := p1_a134;
1264     ddp_organization_rec.application_id := rosetta_g_miss_num_map(p1_a135);
1265     ddp_organization_rec.do_not_confuse_with := p1_a136;
1266     ddp_organization_rec.actual_content_source := p1_a137;
1267     ddp_organization_rec.home_country := p1_a138;
1268     ddp_organization_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a139);
1269     ddp_organization_rec.party_rec.party_number := p1_a140;
1270     ddp_organization_rec.party_rec.validated_flag := p1_a141;
1271     ddp_organization_rec.party_rec.orig_system_reference := p1_a142;
1272     ddp_organization_rec.party_rec.orig_system := p1_a143;
1273     ddp_organization_rec.party_rec.status := p1_a144;
1274     ddp_organization_rec.party_rec.category_code := p1_a145;
1275     ddp_organization_rec.party_rec.salutation := p1_a146;
1276     ddp_organization_rec.party_rec.attribute_category := p1_a147;
1277     ddp_organization_rec.party_rec.attribute1 := p1_a148;
1278     ddp_organization_rec.party_rec.attribute2 := p1_a149;
1279     ddp_organization_rec.party_rec.attribute3 := p1_a150;
1280     ddp_organization_rec.party_rec.attribute4 := p1_a151;
1281     ddp_organization_rec.party_rec.attribute5 := p1_a152;
1282     ddp_organization_rec.party_rec.attribute6 := p1_a153;
1283     ddp_organization_rec.party_rec.attribute7 := p1_a154;
1284     ddp_organization_rec.party_rec.attribute8 := p1_a155;
1285     ddp_organization_rec.party_rec.attribute9 := p1_a156;
1286     ddp_organization_rec.party_rec.attribute10 := p1_a157;
1287     ddp_organization_rec.party_rec.attribute11 := p1_a158;
1288     ddp_organization_rec.party_rec.attribute12 := p1_a159;
1289     ddp_organization_rec.party_rec.attribute13 := p1_a160;
1290     ddp_organization_rec.party_rec.attribute14 := p1_a161;
1291     ddp_organization_rec.party_rec.attribute15 := p1_a162;
1292     ddp_organization_rec.party_rec.attribute16 := p1_a163;
1293     ddp_organization_rec.party_rec.attribute17 := p1_a164;
1294     ddp_organization_rec.party_rec.attribute18 := p1_a165;
1295     ddp_organization_rec.party_rec.attribute19 := p1_a166;
1296     ddp_organization_rec.party_rec.attribute20 := p1_a167;
1297     ddp_organization_rec.party_rec.attribute21 := p1_a168;
1298     ddp_organization_rec.party_rec.attribute22 := p1_a169;
1299     ddp_organization_rec.party_rec.attribute23 := p1_a170;
1300     ddp_organization_rec.party_rec.attribute24 := p1_a171;
1301 
1302 
1303 
1304 
1305 
1306 
1307 
1308     -- here's the delegated call to the old PL/SQL routine
1309     hz_party_v2pub.create_organization(p_init_msg_list,
1310       ddp_organization_rec,
1311       x_return_status,
1312       x_msg_count,
1313       x_msg_data,
1314       x_party_id,
1315       x_party_number,
1316       x_profile_id);
1317 
1318     -- copy data back from the local OUT or IN-OUT args, if any
1319 
1320 
1321 
1322 
1323 
1324 
1325 
1326   end;
1327 
1328   procedure create_organization_7(p_init_msg_list  VARCHAR2
1329     , p_party_usage_code  VARCHAR2
1330     , x_return_status out nocopy  VARCHAR2
1331     , x_msg_count out nocopy  NUMBER
1332     , x_msg_data out nocopy  VARCHAR2
1333     , x_party_id out nocopy  NUMBER
1334     , x_party_number out nocopy  VARCHAR2
1335     , x_profile_id out nocopy  NUMBER
1336     , p1_a0  VARCHAR2 := null
1337     , p1_a1  VARCHAR2 := null
1338     , p1_a2  VARCHAR2 := null
1339     , p1_a3  VARCHAR2 := null
1340     , p1_a4  VARCHAR2 := null
1341     , p1_a5  VARCHAR2 := null
1342     , p1_a6  VARCHAR2 := null
1343     , p1_a7  VARCHAR2 := null
1344     , p1_a8  NUMBER := null
1345     , p1_a9  NUMBER := null
1346     , p1_a10  VARCHAR2 := null
1347     , p1_a11  VARCHAR2 := null
1348     , p1_a12  VARCHAR2 := null
1349     , p1_a13  VARCHAR2 := null
1350     , p1_a14  VARCHAR2 := null
1351     , p1_a15  VARCHAR2 := null
1352     , p1_a16  VARCHAR2 := null
1353     , p1_a17  VARCHAR2 := null
1354     , p1_a18  VARCHAR2 := null
1355     , p1_a19  VARCHAR2 := null
1356     , p1_a20  VARCHAR2 := null
1357     , p1_a21  VARCHAR2 := null
1358     , p1_a22  VARCHAR2 := null
1359     , p1_a23  VARCHAR2 := null
1360     , p1_a24  VARCHAR2 := null
1361     , p1_a25  VARCHAR2 := null
1362     , p1_a26  NUMBER := null
1363     , p1_a27  DATE := null
1364     , p1_a28  VARCHAR2 := null
1365     , p1_a29  NUMBER := null
1366     , p1_a30  VARCHAR2 := null
1367     , p1_a31  VARCHAR2 := null
1368     , p1_a32  VARCHAR2 := null
1369     , p1_a33  VARCHAR2 := null
1370     , p1_a34  VARCHAR2 := null
1371     , p1_a35  VARCHAR2 := null
1372     , p1_a36  VARCHAR2 := null
1373     , p1_a37  VARCHAR2 := null
1374     , p1_a38  VARCHAR2 := null
1375     , p1_a39  DATE := null
1376     , p1_a40  DATE := null
1377     , p1_a41  VARCHAR2 := null
1378     , p1_a42  VARCHAR2 := null
1379     , p1_a43  VARCHAR2 := null
1380     , p1_a44  VARCHAR2 := null
1381     , p1_a45  VARCHAR2 := null
1382     , p1_a46  VARCHAR2 := null
1383     , p1_a47  NUMBER := null
1384     , p1_a48  NUMBER := null
1385     , p1_a49  NUMBER := null
1386     , p1_a50  VARCHAR2 := null
1387     , p1_a51  VARCHAR2 := null
1388     , p1_a52  VARCHAR2 := null
1389     , p1_a53  VARCHAR2 := null
1390     , p1_a54  VARCHAR2 := null
1391     , p1_a55  VARCHAR2 := null
1392     , p1_a56  VARCHAR2 := null
1393     , p1_a57  VARCHAR2 := null
1394     , p1_a58  VARCHAR2 := null
1395     , p1_a59  VARCHAR2 := null
1396     , p1_a60  VARCHAR2 := null
1397     , p1_a61  VARCHAR2 := null
1398     , p1_a62  VARCHAR2 := null
1399     , p1_a63  VARCHAR2 := null
1400     , p1_a64  VARCHAR2 := null
1401     , p1_a65  VARCHAR2 := null
1402     , p1_a66  VARCHAR2 := null
1403     , p1_a67  VARCHAR2 := null
1404     , p1_a68  NUMBER := null
1405     , p1_a69  VARCHAR2 := null
1406     , p1_a70  VARCHAR2 := null
1407     , p1_a71  VARCHAR2 := null
1408     , p1_a72  VARCHAR2 := null
1409     , p1_a73  VARCHAR2 := null
1410     , p1_a74  VARCHAR2 := null
1411     , p1_a75  VARCHAR2 := null
1412     , p1_a76  VARCHAR2 := null
1413     , p1_a77  VARCHAR2 := null
1414     , p1_a78  NUMBER := null
1415     , p1_a79  NUMBER := null
1416     , p1_a80  NUMBER := null
1417     , p1_a81  NUMBER := null
1418     , p1_a82  NUMBER := null
1419     , p1_a83  NUMBER := null
1420     , p1_a84  NUMBER := null
1421     , p1_a85  DATE := null
1422     , p1_a86  VARCHAR2 := null
1423     , p1_a87  VARCHAR2 := null
1424     , p1_a88  VARCHAR2 := null
1425     , p1_a89  VARCHAR2 := null
1426     , p1_a90  VARCHAR2 := null
1427     , p1_a91  VARCHAR2 := null
1428     , p1_a92  VARCHAR2 := null
1429     , p1_a93  VARCHAR2 := null
1430     , p1_a94  VARCHAR2 := null
1431     , p1_a95  NUMBER := null
1432     , p1_a96  NUMBER := null
1433     , p1_a97  NUMBER := null
1434     , p1_a98  DATE := null
1435     , p1_a99  VARCHAR2 := null
1436     , p1_a100  VARCHAR2 := null
1437     , p1_a101  VARCHAR2 := null
1438     , p1_a102  VARCHAR2 := null
1439     , p1_a103  VARCHAR2 := null
1440     , p1_a104  VARCHAR2 := null
1441     , p1_a105  VARCHAR2 := null
1442     , p1_a106  VARCHAR2 := null
1443     , p1_a107  VARCHAR2 := null
1444     , p1_a108  NUMBER := null
1445     , p1_a109  VARCHAR2 := null
1446     , p1_a110  NUMBER := null
1447     , p1_a111  VARCHAR2 := null
1448     , p1_a112  VARCHAR2 := null
1449     , p1_a113  VARCHAR2 := null
1450     , p1_a114  VARCHAR2 := null
1451     , p1_a115  VARCHAR2 := null
1452     , p1_a116  VARCHAR2 := null
1453     , p1_a117  VARCHAR2 := null
1454     , p1_a118  VARCHAR2 := null
1455     , p1_a119  VARCHAR2 := null
1456     , p1_a120  VARCHAR2 := null
1457     , p1_a121  VARCHAR2 := null
1458     , p1_a122  VARCHAR2 := null
1459     , p1_a123  VARCHAR2 := null
1460     , p1_a124  VARCHAR2 := null
1461     , p1_a125  VARCHAR2 := null
1462     , p1_a126  VARCHAR2 := null
1463     , p1_a127  VARCHAR2 := null
1464     , p1_a128  VARCHAR2 := null
1465     , p1_a129  VARCHAR2 := null
1466     , p1_a130  VARCHAR2 := null
1467     , p1_a131  VARCHAR2 := null
1468     , p1_a132  VARCHAR2 := null
1469     , p1_a133  VARCHAR2 := null
1470     , p1_a134  VARCHAR2 := null
1471     , p1_a135  NUMBER := null
1472     , p1_a136  VARCHAR2 := null
1473     , p1_a137  VARCHAR2 := null
1474     , p1_a138  VARCHAR2 := null
1475     , p1_a139  NUMBER := null
1476     , p1_a140  VARCHAR2 := null
1477     , p1_a141  VARCHAR2 := null
1478     , p1_a142  VARCHAR2 := null
1479     , p1_a143  VARCHAR2 := null
1480     , p1_a144  VARCHAR2 := null
1481     , p1_a145  VARCHAR2 := null
1482     , p1_a146  VARCHAR2 := null
1483     , p1_a147  VARCHAR2 := null
1484     , p1_a148  VARCHAR2 := null
1485     , p1_a149  VARCHAR2 := null
1486     , p1_a150  VARCHAR2 := null
1487     , p1_a151  VARCHAR2 := null
1488     , p1_a152  VARCHAR2 := null
1489     , p1_a153  VARCHAR2 := null
1490     , p1_a154  VARCHAR2 := null
1491     , p1_a155  VARCHAR2 := null
1492     , p1_a156  VARCHAR2 := null
1493     , p1_a157  VARCHAR2 := null
1494     , p1_a158  VARCHAR2 := null
1495     , p1_a159  VARCHAR2 := null
1496     , p1_a160  VARCHAR2 := null
1497     , p1_a161  VARCHAR2 := null
1498     , p1_a162  VARCHAR2 := null
1499     , p1_a163  VARCHAR2 := null
1500     , p1_a164  VARCHAR2 := null
1501     , p1_a165  VARCHAR2 := null
1502     , p1_a166  VARCHAR2 := null
1503     , p1_a167  VARCHAR2 := null
1504     , p1_a168  VARCHAR2 := null
1505     , p1_a169  VARCHAR2 := null
1506     , p1_a170  VARCHAR2 := null
1507     , p1_a171  VARCHAR2 := null
1508   )
1509   as
1510     ddp_organization_rec hz_party_v2pub.organization_rec_type;
1511     ddindx binary_integer; indx binary_integer;
1512   begin
1513 
1514     -- copy data to the local IN or IN-OUT args, if any
1515 
1516     ddp_organization_rec.organization_name := p1_a0;
1517     ddp_organization_rec.duns_number_c := p1_a1;
1518     ddp_organization_rec.enquiry_duns := p1_a2;
1519     ddp_organization_rec.ceo_name := p1_a3;
1520     ddp_organization_rec.ceo_title := p1_a4;
1521     ddp_organization_rec.principal_name := p1_a5;
1522     ddp_organization_rec.principal_title := p1_a6;
1523     ddp_organization_rec.legal_status := p1_a7;
1524     ddp_organization_rec.control_yr := rosetta_g_miss_num_map(p1_a8);
1525     ddp_organization_rec.employees_total := rosetta_g_miss_num_map(p1_a9);
1526     ddp_organization_rec.hq_branch_ind := p1_a10;
1527     ddp_organization_rec.branch_flag := p1_a11;
1528     ddp_organization_rec.oob_ind := p1_a12;
1529     ddp_organization_rec.line_of_business := p1_a13;
1530     ddp_organization_rec.cong_dist_code := p1_a14;
1531     ddp_organization_rec.sic_code := p1_a15;
1532     ddp_organization_rec.import_ind := p1_a16;
1533     ddp_organization_rec.export_ind := p1_a17;
1534     ddp_organization_rec.labor_surplus_ind := p1_a18;
1535     ddp_organization_rec.debarment_ind := p1_a19;
1536     ddp_organization_rec.minority_owned_ind := p1_a20;
1537     ddp_organization_rec.minority_owned_type := p1_a21;
1538     ddp_organization_rec.woman_owned_ind := p1_a22;
1539     ddp_organization_rec.disadv_8a_ind := p1_a23;
1540     ddp_organization_rec.small_bus_ind := p1_a24;
1541     ddp_organization_rec.rent_own_ind := p1_a25;
1542     ddp_organization_rec.debarments_count := rosetta_g_miss_num_map(p1_a26);
1543     ddp_organization_rec.debarments_date := rosetta_g_miss_date_in_map(p1_a27);
1544     ddp_organization_rec.failure_score := p1_a28;
1545     ddp_organization_rec.failure_score_natnl_percentile := rosetta_g_miss_num_map(p1_a29);
1546     ddp_organization_rec.failure_score_override_code := p1_a30;
1547     ddp_organization_rec.failure_score_commentary := p1_a31;
1548     ddp_organization_rec.global_failure_score := p1_a32;
1549     ddp_organization_rec.db_rating := p1_a33;
1550     ddp_organization_rec.credit_score := p1_a34;
1551     ddp_organization_rec.credit_score_commentary := p1_a35;
1552     ddp_organization_rec.paydex_score := p1_a36;
1553     ddp_organization_rec.paydex_three_months_ago := p1_a37;
1554     ddp_organization_rec.paydex_norm := p1_a38;
1555     ddp_organization_rec.best_time_contact_begin := rosetta_g_miss_date_in_map(p1_a39);
1556     ddp_organization_rec.best_time_contact_end := rosetta_g_miss_date_in_map(p1_a40);
1557     ddp_organization_rec.organization_name_phonetic := p1_a41;
1558     ddp_organization_rec.tax_reference := p1_a42;
1559     ddp_organization_rec.gsa_indicator_flag := p1_a43;
1560     ddp_organization_rec.jgzz_fiscal_code := p1_a44;
1561     ddp_organization_rec.analysis_fy := p1_a45;
1562     ddp_organization_rec.fiscal_yearend_month := p1_a46;
1563     ddp_organization_rec.curr_fy_potential_revenue := rosetta_g_miss_num_map(p1_a47);
1564     ddp_organization_rec.next_fy_potential_revenue := rosetta_g_miss_num_map(p1_a48);
1565     ddp_organization_rec.year_established := rosetta_g_miss_num_map(p1_a49);
1566     ddp_organization_rec.mission_statement := p1_a50;
1567     ddp_organization_rec.organization_type := p1_a51;
1568     ddp_organization_rec.business_scope := p1_a52;
1569     ddp_organization_rec.corporation_class := p1_a53;
1570     ddp_organization_rec.known_as := p1_a54;
1571     ddp_organization_rec.known_as2 := p1_a55;
1572     ddp_organization_rec.known_as3 := p1_a56;
1573     ddp_organization_rec.known_as4 := p1_a57;
1574     ddp_organization_rec.known_as5 := p1_a58;
1575     ddp_organization_rec.local_bus_iden_type := p1_a59;
1576     ddp_organization_rec.local_bus_identifier := p1_a60;
1577     ddp_organization_rec.pref_functional_currency := p1_a61;
1578     ddp_organization_rec.registration_type := p1_a62;
1579     ddp_organization_rec.total_employees_text := p1_a63;
1580     ddp_organization_rec.total_employees_ind := p1_a64;
1581     ddp_organization_rec.total_emp_est_ind := p1_a65;
1582     ddp_organization_rec.total_emp_min_ind := p1_a66;
1583     ddp_organization_rec.parent_sub_ind := p1_a67;
1584     ddp_organization_rec.incorp_year := rosetta_g_miss_num_map(p1_a68);
1585     ddp_organization_rec.sic_code_type := p1_a69;
1586     ddp_organization_rec.public_private_ownership_flag := p1_a70;
1587     ddp_organization_rec.internal_flag := p1_a71;
1588     ddp_organization_rec.local_activity_code_type := p1_a72;
1589     ddp_organization_rec.local_activity_code := p1_a73;
1590     ddp_organization_rec.emp_at_primary_adr := p1_a74;
1591     ddp_organization_rec.emp_at_primary_adr_text := p1_a75;
1592     ddp_organization_rec.emp_at_primary_adr_est_ind := p1_a76;
1593     ddp_organization_rec.emp_at_primary_adr_min_ind := p1_a77;
1594     ddp_organization_rec.high_credit := rosetta_g_miss_num_map(p1_a78);
1595     ddp_organization_rec.avg_high_credit := rosetta_g_miss_num_map(p1_a79);
1596     ddp_organization_rec.total_payments := rosetta_g_miss_num_map(p1_a80);
1597     ddp_organization_rec.credit_score_class := rosetta_g_miss_num_map(p1_a81);
1598     ddp_organization_rec.credit_score_natl_percentile := rosetta_g_miss_num_map(p1_a82);
1599     ddp_organization_rec.credit_score_incd_default := rosetta_g_miss_num_map(p1_a83);
1600     ddp_organization_rec.credit_score_age := rosetta_g_miss_num_map(p1_a84);
1601     ddp_organization_rec.credit_score_date := rosetta_g_miss_date_in_map(p1_a85);
1602     ddp_organization_rec.credit_score_commentary2 := p1_a86;
1603     ddp_organization_rec.credit_score_commentary3 := p1_a87;
1604     ddp_organization_rec.credit_score_commentary4 := p1_a88;
1605     ddp_organization_rec.credit_score_commentary5 := p1_a89;
1606     ddp_organization_rec.credit_score_commentary6 := p1_a90;
1607     ddp_organization_rec.credit_score_commentary7 := p1_a91;
1608     ddp_organization_rec.credit_score_commentary8 := p1_a92;
1609     ddp_organization_rec.credit_score_commentary9 := p1_a93;
1610     ddp_organization_rec.credit_score_commentary10 := p1_a94;
1611     ddp_organization_rec.failure_score_class := rosetta_g_miss_num_map(p1_a95);
1612     ddp_organization_rec.failure_score_incd_default := rosetta_g_miss_num_map(p1_a96);
1613     ddp_organization_rec.failure_score_age := rosetta_g_miss_num_map(p1_a97);
1614     ddp_organization_rec.failure_score_date := rosetta_g_miss_date_in_map(p1_a98);
1615     ddp_organization_rec.failure_score_commentary2 := p1_a99;
1616     ddp_organization_rec.failure_score_commentary3 := p1_a100;
1617     ddp_organization_rec.failure_score_commentary4 := p1_a101;
1618     ddp_organization_rec.failure_score_commentary5 := p1_a102;
1619     ddp_organization_rec.failure_score_commentary6 := p1_a103;
1620     ddp_organization_rec.failure_score_commentary7 := p1_a104;
1621     ddp_organization_rec.failure_score_commentary8 := p1_a105;
1622     ddp_organization_rec.failure_score_commentary9 := p1_a106;
1623     ddp_organization_rec.failure_score_commentary10 := p1_a107;
1624     ddp_organization_rec.maximum_credit_recommendation := rosetta_g_miss_num_map(p1_a108);
1625     ddp_organization_rec.maximum_credit_currency_code := p1_a109;
1626     ddp_organization_rec.displayed_duns_party_id := rosetta_g_miss_num_map(p1_a110);
1627     ddp_organization_rec.content_source_type := p1_a111;
1628     ddp_organization_rec.content_source_number := p1_a112;
1629     ddp_organization_rec.attribute_category := p1_a113;
1630     ddp_organization_rec.attribute1 := p1_a114;
1631     ddp_organization_rec.attribute2 := p1_a115;
1632     ddp_organization_rec.attribute3 := p1_a116;
1633     ddp_organization_rec.attribute4 := p1_a117;
1634     ddp_organization_rec.attribute5 := p1_a118;
1635     ddp_organization_rec.attribute6 := p1_a119;
1636     ddp_organization_rec.attribute7 := p1_a120;
1637     ddp_organization_rec.attribute8 := p1_a121;
1638     ddp_organization_rec.attribute9 := p1_a122;
1639     ddp_organization_rec.attribute10 := p1_a123;
1640     ddp_organization_rec.attribute11 := p1_a124;
1641     ddp_organization_rec.attribute12 := p1_a125;
1642     ddp_organization_rec.attribute13 := p1_a126;
1643     ddp_organization_rec.attribute14 := p1_a127;
1644     ddp_organization_rec.attribute15 := p1_a128;
1645     ddp_organization_rec.attribute16 := p1_a129;
1646     ddp_organization_rec.attribute17 := p1_a130;
1647     ddp_organization_rec.attribute18 := p1_a131;
1648     ddp_organization_rec.attribute19 := p1_a132;
1649     ddp_organization_rec.attribute20 := p1_a133;
1650     ddp_organization_rec.created_by_module := p1_a134;
1651     ddp_organization_rec.application_id := rosetta_g_miss_num_map(p1_a135);
1652     ddp_organization_rec.do_not_confuse_with := p1_a136;
1653     ddp_organization_rec.actual_content_source := p1_a137;
1654     ddp_organization_rec.home_country := p1_a138;
1655     ddp_organization_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a139);
1656     ddp_organization_rec.party_rec.party_number := p1_a140;
1657     ddp_organization_rec.party_rec.validated_flag := p1_a141;
1658     ddp_organization_rec.party_rec.orig_system_reference := p1_a142;
1659     ddp_organization_rec.party_rec.orig_system := p1_a143;
1660     ddp_organization_rec.party_rec.status := p1_a144;
1661     ddp_organization_rec.party_rec.category_code := p1_a145;
1662     ddp_organization_rec.party_rec.salutation := p1_a146;
1663     ddp_organization_rec.party_rec.attribute_category := p1_a147;
1664     ddp_organization_rec.party_rec.attribute1 := p1_a148;
1665     ddp_organization_rec.party_rec.attribute2 := p1_a149;
1666     ddp_organization_rec.party_rec.attribute3 := p1_a150;
1667     ddp_organization_rec.party_rec.attribute4 := p1_a151;
1668     ddp_organization_rec.party_rec.attribute5 := p1_a152;
1669     ddp_organization_rec.party_rec.attribute6 := p1_a153;
1670     ddp_organization_rec.party_rec.attribute7 := p1_a154;
1671     ddp_organization_rec.party_rec.attribute8 := p1_a155;
1672     ddp_organization_rec.party_rec.attribute9 := p1_a156;
1673     ddp_organization_rec.party_rec.attribute10 := p1_a157;
1674     ddp_organization_rec.party_rec.attribute11 := p1_a158;
1675     ddp_organization_rec.party_rec.attribute12 := p1_a159;
1676     ddp_organization_rec.party_rec.attribute13 := p1_a160;
1677     ddp_organization_rec.party_rec.attribute14 := p1_a161;
1678     ddp_organization_rec.party_rec.attribute15 := p1_a162;
1679     ddp_organization_rec.party_rec.attribute16 := p1_a163;
1680     ddp_organization_rec.party_rec.attribute17 := p1_a164;
1681     ddp_organization_rec.party_rec.attribute18 := p1_a165;
1682     ddp_organization_rec.party_rec.attribute19 := p1_a166;
1683     ddp_organization_rec.party_rec.attribute20 := p1_a167;
1684     ddp_organization_rec.party_rec.attribute21 := p1_a168;
1685     ddp_organization_rec.party_rec.attribute22 := p1_a169;
1686     ddp_organization_rec.party_rec.attribute23 := p1_a170;
1687     ddp_organization_rec.party_rec.attribute24 := p1_a171;
1688 
1689 
1690 
1691 
1692 
1693 
1694 
1695 
1696     -- here's the delegated call to the old PL/SQL routine
1697     hz_party_v2pub.create_organization(p_init_msg_list,
1698       ddp_organization_rec,
1699       p_party_usage_code,
1700       x_return_status,
1701       x_msg_count,
1702       x_msg_data,
1703       x_party_id,
1704       x_party_number,
1705       x_profile_id);
1706 
1707     -- copy data back from the local OUT or IN-OUT args, if any
1708 
1709 
1710 
1711 
1712 
1713 
1714 
1715 
1716   end;
1717 
1718   procedure update_organization_8(p_init_msg_list  VARCHAR2
1719     , p_party_object_version_number in out nocopy  NUMBER
1720     , x_profile_id out nocopy  NUMBER
1721     , x_return_status out nocopy  VARCHAR2
1722     , x_msg_count out nocopy  NUMBER
1723     , x_msg_data out nocopy  VARCHAR2
1724     , p1_a0  VARCHAR2 := null
1725     , p1_a1  VARCHAR2 := null
1726     , p1_a2  VARCHAR2 := null
1727     , p1_a3  VARCHAR2 := null
1728     , p1_a4  VARCHAR2 := null
1729     , p1_a5  VARCHAR2 := null
1730     , p1_a6  VARCHAR2 := null
1731     , p1_a7  VARCHAR2 := null
1732     , p1_a8  NUMBER := null
1733     , p1_a9  NUMBER := null
1734     , p1_a10  VARCHAR2 := null
1735     , p1_a11  VARCHAR2 := null
1736     , p1_a12  VARCHAR2 := null
1737     , p1_a13  VARCHAR2 := null
1738     , p1_a14  VARCHAR2 := null
1739     , p1_a15  VARCHAR2 := null
1740     , p1_a16  VARCHAR2 := null
1741     , p1_a17  VARCHAR2 := null
1742     , p1_a18  VARCHAR2 := null
1743     , p1_a19  VARCHAR2 := null
1744     , p1_a20  VARCHAR2 := null
1745     , p1_a21  VARCHAR2 := null
1746     , p1_a22  VARCHAR2 := null
1747     , p1_a23  VARCHAR2 := null
1748     , p1_a24  VARCHAR2 := null
1749     , p1_a25  VARCHAR2 := null
1750     , p1_a26  NUMBER := null
1751     , p1_a27  DATE := null
1752     , p1_a28  VARCHAR2 := null
1753     , p1_a29  NUMBER := null
1754     , p1_a30  VARCHAR2 := null
1755     , p1_a31  VARCHAR2 := null
1756     , p1_a32  VARCHAR2 := null
1757     , p1_a33  VARCHAR2 := null
1758     , p1_a34  VARCHAR2 := null
1759     , p1_a35  VARCHAR2 := null
1760     , p1_a36  VARCHAR2 := null
1761     , p1_a37  VARCHAR2 := null
1762     , p1_a38  VARCHAR2 := null
1763     , p1_a39  DATE := null
1764     , p1_a40  DATE := null
1765     , p1_a41  VARCHAR2 := null
1766     , p1_a42  VARCHAR2 := null
1767     , p1_a43  VARCHAR2 := null
1768     , p1_a44  VARCHAR2 := null
1769     , p1_a45  VARCHAR2 := null
1770     , p1_a46  VARCHAR2 := null
1771     , p1_a47  NUMBER := null
1772     , p1_a48  NUMBER := null
1773     , p1_a49  NUMBER := null
1774     , p1_a50  VARCHAR2 := null
1775     , p1_a51  VARCHAR2 := null
1776     , p1_a52  VARCHAR2 := null
1777     , p1_a53  VARCHAR2 := null
1778     , p1_a54  VARCHAR2 := null
1779     , p1_a55  VARCHAR2 := null
1780     , p1_a56  VARCHAR2 := null
1781     , p1_a57  VARCHAR2 := null
1782     , p1_a58  VARCHAR2 := null
1783     , p1_a59  VARCHAR2 := null
1784     , p1_a60  VARCHAR2 := null
1785     , p1_a61  VARCHAR2 := null
1786     , p1_a62  VARCHAR2 := null
1787     , p1_a63  VARCHAR2 := null
1788     , p1_a64  VARCHAR2 := null
1789     , p1_a65  VARCHAR2 := null
1790     , p1_a66  VARCHAR2 := null
1791     , p1_a67  VARCHAR2 := null
1792     , p1_a68  NUMBER := null
1793     , p1_a69  VARCHAR2 := null
1794     , p1_a70  VARCHAR2 := null
1795     , p1_a71  VARCHAR2 := null
1796     , p1_a72  VARCHAR2 := null
1797     , p1_a73  VARCHAR2 := null
1798     , p1_a74  VARCHAR2 := null
1799     , p1_a75  VARCHAR2 := null
1800     , p1_a76  VARCHAR2 := null
1801     , p1_a77  VARCHAR2 := null
1802     , p1_a78  NUMBER := null
1803     , p1_a79  NUMBER := null
1804     , p1_a80  NUMBER := null
1805     , p1_a81  NUMBER := null
1806     , p1_a82  NUMBER := null
1807     , p1_a83  NUMBER := null
1808     , p1_a84  NUMBER := null
1809     , p1_a85  DATE := null
1810     , p1_a86  VARCHAR2 := null
1811     , p1_a87  VARCHAR2 := null
1812     , p1_a88  VARCHAR2 := null
1813     , p1_a89  VARCHAR2 := null
1814     , p1_a90  VARCHAR2 := null
1815     , p1_a91  VARCHAR2 := null
1816     , p1_a92  VARCHAR2 := null
1817     , p1_a93  VARCHAR2 := null
1818     , p1_a94  VARCHAR2 := null
1819     , p1_a95  NUMBER := null
1820     , p1_a96  NUMBER := null
1821     , p1_a97  NUMBER := null
1822     , p1_a98  DATE := null
1823     , p1_a99  VARCHAR2 := null
1824     , p1_a100  VARCHAR2 := null
1825     , p1_a101  VARCHAR2 := null
1826     , p1_a102  VARCHAR2 := null
1827     , p1_a103  VARCHAR2 := null
1828     , p1_a104  VARCHAR2 := null
1829     , p1_a105  VARCHAR2 := null
1830     , p1_a106  VARCHAR2 := null
1831     , p1_a107  VARCHAR2 := null
1832     , p1_a108  NUMBER := null
1833     , p1_a109  VARCHAR2 := null
1834     , p1_a110  NUMBER := null
1835     , p1_a111  VARCHAR2 := null
1836     , p1_a112  VARCHAR2 := null
1837     , p1_a113  VARCHAR2 := null
1838     , p1_a114  VARCHAR2 := null
1839     , p1_a115  VARCHAR2 := null
1840     , p1_a116  VARCHAR2 := null
1841     , p1_a117  VARCHAR2 := null
1842     , p1_a118  VARCHAR2 := null
1843     , p1_a119  VARCHAR2 := null
1844     , p1_a120  VARCHAR2 := null
1845     , p1_a121  VARCHAR2 := null
1846     , p1_a122  VARCHAR2 := null
1847     , p1_a123  VARCHAR2 := null
1848     , p1_a124  VARCHAR2 := null
1849     , p1_a125  VARCHAR2 := null
1850     , p1_a126  VARCHAR2 := null
1851     , p1_a127  VARCHAR2 := null
1852     , p1_a128  VARCHAR2 := null
1853     , p1_a129  VARCHAR2 := null
1854     , p1_a130  VARCHAR2 := null
1855     , p1_a131  VARCHAR2 := null
1856     , p1_a132  VARCHAR2 := null
1857     , p1_a133  VARCHAR2 := null
1858     , p1_a134  VARCHAR2 := null
1859     , p1_a135  NUMBER := null
1860     , p1_a136  VARCHAR2 := null
1861     , p1_a137  VARCHAR2 := null
1862     , p1_a138  VARCHAR2 := null
1863     , p1_a139  NUMBER := null
1864     , p1_a140  VARCHAR2 := null
1865     , p1_a141  VARCHAR2 := null
1866     , p1_a142  VARCHAR2 := null
1867     , p1_a143  VARCHAR2 := null
1868     , p1_a144  VARCHAR2 := null
1869     , p1_a145  VARCHAR2 := null
1870     , p1_a146  VARCHAR2 := null
1871     , p1_a147  VARCHAR2 := null
1872     , p1_a148  VARCHAR2 := null
1873     , p1_a149  VARCHAR2 := null
1874     , p1_a150  VARCHAR2 := null
1875     , p1_a151  VARCHAR2 := null
1876     , p1_a152  VARCHAR2 := null
1877     , p1_a153  VARCHAR2 := null
1878     , p1_a154  VARCHAR2 := null
1879     , p1_a155  VARCHAR2 := null
1880     , p1_a156  VARCHAR2 := null
1881     , p1_a157  VARCHAR2 := null
1882     , p1_a158  VARCHAR2 := null
1883     , p1_a159  VARCHAR2 := null
1884     , p1_a160  VARCHAR2 := null
1885     , p1_a161  VARCHAR2 := null
1886     , p1_a162  VARCHAR2 := null
1887     , p1_a163  VARCHAR2 := null
1888     , p1_a164  VARCHAR2 := null
1889     , p1_a165  VARCHAR2 := null
1890     , p1_a166  VARCHAR2 := null
1891     , p1_a167  VARCHAR2 := null
1892     , p1_a168  VARCHAR2 := null
1893     , p1_a169  VARCHAR2 := null
1894     , p1_a170  VARCHAR2 := null
1895     , p1_a171  VARCHAR2 := null
1896   )
1897   as
1898     ddp_organization_rec hz_party_v2pub.organization_rec_type;
1899     ddindx binary_integer; indx binary_integer;
1900   begin
1901 
1902     -- copy data to the local IN or IN-OUT args, if any
1903 
1904     ddp_organization_rec.organization_name := p1_a0;
1905     ddp_organization_rec.duns_number_c := p1_a1;
1906     ddp_organization_rec.enquiry_duns := p1_a2;
1907     ddp_organization_rec.ceo_name := p1_a3;
1908     ddp_organization_rec.ceo_title := p1_a4;
1909     ddp_organization_rec.principal_name := p1_a5;
1910     ddp_organization_rec.principal_title := p1_a6;
1911     ddp_organization_rec.legal_status := p1_a7;
1912     ddp_organization_rec.control_yr := rosetta_g_miss_num_map(p1_a8);
1913     ddp_organization_rec.employees_total := rosetta_g_miss_num_map(p1_a9);
1914     ddp_organization_rec.hq_branch_ind := p1_a10;
1915     ddp_organization_rec.branch_flag := p1_a11;
1916     ddp_organization_rec.oob_ind := p1_a12;
1917     ddp_organization_rec.line_of_business := p1_a13;
1918     ddp_organization_rec.cong_dist_code := p1_a14;
1919     ddp_organization_rec.sic_code := p1_a15;
1920     ddp_organization_rec.import_ind := p1_a16;
1921     ddp_organization_rec.export_ind := p1_a17;
1922     ddp_organization_rec.labor_surplus_ind := p1_a18;
1923     ddp_organization_rec.debarment_ind := p1_a19;
1924     ddp_organization_rec.minority_owned_ind := p1_a20;
1925     ddp_organization_rec.minority_owned_type := p1_a21;
1926     ddp_organization_rec.woman_owned_ind := p1_a22;
1927     ddp_organization_rec.disadv_8a_ind := p1_a23;
1928     ddp_organization_rec.small_bus_ind := p1_a24;
1929     ddp_organization_rec.rent_own_ind := p1_a25;
1930     ddp_organization_rec.debarments_count := rosetta_g_miss_num_map(p1_a26);
1931     ddp_organization_rec.debarments_date := rosetta_g_miss_date_in_map(p1_a27);
1932     ddp_organization_rec.failure_score := p1_a28;
1933     ddp_organization_rec.failure_score_natnl_percentile := rosetta_g_miss_num_map(p1_a29);
1934     ddp_organization_rec.failure_score_override_code := p1_a30;
1935     ddp_organization_rec.failure_score_commentary := p1_a31;
1936     ddp_organization_rec.global_failure_score := p1_a32;
1937     ddp_organization_rec.db_rating := p1_a33;
1938     ddp_organization_rec.credit_score := p1_a34;
1939     ddp_organization_rec.credit_score_commentary := p1_a35;
1940     ddp_organization_rec.paydex_score := p1_a36;
1941     ddp_organization_rec.paydex_three_months_ago := p1_a37;
1942     ddp_organization_rec.paydex_norm := p1_a38;
1943     ddp_organization_rec.best_time_contact_begin := rosetta_g_miss_date_in_map(p1_a39);
1944     ddp_organization_rec.best_time_contact_end := rosetta_g_miss_date_in_map(p1_a40);
1945     ddp_organization_rec.organization_name_phonetic := p1_a41;
1946     ddp_organization_rec.tax_reference := p1_a42;
1947     ddp_organization_rec.gsa_indicator_flag := p1_a43;
1948     ddp_organization_rec.jgzz_fiscal_code := p1_a44;
1949     ddp_organization_rec.analysis_fy := p1_a45;
1950     ddp_organization_rec.fiscal_yearend_month := p1_a46;
1951     ddp_organization_rec.curr_fy_potential_revenue := rosetta_g_miss_num_map(p1_a47);
1952     ddp_organization_rec.next_fy_potential_revenue := rosetta_g_miss_num_map(p1_a48);
1953     ddp_organization_rec.year_established := rosetta_g_miss_num_map(p1_a49);
1954     ddp_organization_rec.mission_statement := p1_a50;
1955     ddp_organization_rec.organization_type := p1_a51;
1956     ddp_organization_rec.business_scope := p1_a52;
1957     ddp_organization_rec.corporation_class := p1_a53;
1958     ddp_organization_rec.known_as := p1_a54;
1959     ddp_organization_rec.known_as2 := p1_a55;
1960     ddp_organization_rec.known_as3 := p1_a56;
1961     ddp_organization_rec.known_as4 := p1_a57;
1962     ddp_organization_rec.known_as5 := p1_a58;
1963     ddp_organization_rec.local_bus_iden_type := p1_a59;
1964     ddp_organization_rec.local_bus_identifier := p1_a60;
1965     ddp_organization_rec.pref_functional_currency := p1_a61;
1966     ddp_organization_rec.registration_type := p1_a62;
1967     ddp_organization_rec.total_employees_text := p1_a63;
1968     ddp_organization_rec.total_employees_ind := p1_a64;
1969     ddp_organization_rec.total_emp_est_ind := p1_a65;
1970     ddp_organization_rec.total_emp_min_ind := p1_a66;
1971     ddp_organization_rec.parent_sub_ind := p1_a67;
1972     ddp_organization_rec.incorp_year := rosetta_g_miss_num_map(p1_a68);
1973     ddp_organization_rec.sic_code_type := p1_a69;
1974     ddp_organization_rec.public_private_ownership_flag := p1_a70;
1975     ddp_organization_rec.internal_flag := p1_a71;
1976     ddp_organization_rec.local_activity_code_type := p1_a72;
1977     ddp_organization_rec.local_activity_code := p1_a73;
1978     ddp_organization_rec.emp_at_primary_adr := p1_a74;
1979     ddp_organization_rec.emp_at_primary_adr_text := p1_a75;
1980     ddp_organization_rec.emp_at_primary_adr_est_ind := p1_a76;
1981     ddp_organization_rec.emp_at_primary_adr_min_ind := p1_a77;
1982     ddp_organization_rec.high_credit := rosetta_g_miss_num_map(p1_a78);
1983     ddp_organization_rec.avg_high_credit := rosetta_g_miss_num_map(p1_a79);
1984     ddp_organization_rec.total_payments := rosetta_g_miss_num_map(p1_a80);
1985     ddp_organization_rec.credit_score_class := rosetta_g_miss_num_map(p1_a81);
1986     ddp_organization_rec.credit_score_natl_percentile := rosetta_g_miss_num_map(p1_a82);
1987     ddp_organization_rec.credit_score_incd_default := rosetta_g_miss_num_map(p1_a83);
1988     ddp_organization_rec.credit_score_age := rosetta_g_miss_num_map(p1_a84);
1989     ddp_organization_rec.credit_score_date := rosetta_g_miss_date_in_map(p1_a85);
1990     ddp_organization_rec.credit_score_commentary2 := p1_a86;
1991     ddp_organization_rec.credit_score_commentary3 := p1_a87;
1992     ddp_organization_rec.credit_score_commentary4 := p1_a88;
1993     ddp_organization_rec.credit_score_commentary5 := p1_a89;
1994     ddp_organization_rec.credit_score_commentary6 := p1_a90;
1995     ddp_organization_rec.credit_score_commentary7 := p1_a91;
1996     ddp_organization_rec.credit_score_commentary8 := p1_a92;
1997     ddp_organization_rec.credit_score_commentary9 := p1_a93;
1998     ddp_organization_rec.credit_score_commentary10 := p1_a94;
1999     ddp_organization_rec.failure_score_class := rosetta_g_miss_num_map(p1_a95);
2000     ddp_organization_rec.failure_score_incd_default := rosetta_g_miss_num_map(p1_a96);
2001     ddp_organization_rec.failure_score_age := rosetta_g_miss_num_map(p1_a97);
2002     ddp_organization_rec.failure_score_date := rosetta_g_miss_date_in_map(p1_a98);
2003     ddp_organization_rec.failure_score_commentary2 := p1_a99;
2004     ddp_organization_rec.failure_score_commentary3 := p1_a100;
2005     ddp_organization_rec.failure_score_commentary4 := p1_a101;
2006     ddp_organization_rec.failure_score_commentary5 := p1_a102;
2007     ddp_organization_rec.failure_score_commentary6 := p1_a103;
2008     ddp_organization_rec.failure_score_commentary7 := p1_a104;
2009     ddp_organization_rec.failure_score_commentary8 := p1_a105;
2010     ddp_organization_rec.failure_score_commentary9 := p1_a106;
2011     ddp_organization_rec.failure_score_commentary10 := p1_a107;
2012     ddp_organization_rec.maximum_credit_recommendation := rosetta_g_miss_num_map(p1_a108);
2013     ddp_organization_rec.maximum_credit_currency_code := p1_a109;
2014     ddp_organization_rec.displayed_duns_party_id := rosetta_g_miss_num_map(p1_a110);
2015     ddp_organization_rec.content_source_type := p1_a111;
2016     ddp_organization_rec.content_source_number := p1_a112;
2017     ddp_organization_rec.attribute_category := p1_a113;
2018     ddp_organization_rec.attribute1 := p1_a114;
2019     ddp_organization_rec.attribute2 := p1_a115;
2020     ddp_organization_rec.attribute3 := p1_a116;
2021     ddp_organization_rec.attribute4 := p1_a117;
2022     ddp_organization_rec.attribute5 := p1_a118;
2023     ddp_organization_rec.attribute6 := p1_a119;
2024     ddp_organization_rec.attribute7 := p1_a120;
2025     ddp_organization_rec.attribute8 := p1_a121;
2026     ddp_organization_rec.attribute9 := p1_a122;
2027     ddp_organization_rec.attribute10 := p1_a123;
2028     ddp_organization_rec.attribute11 := p1_a124;
2029     ddp_organization_rec.attribute12 := p1_a125;
2030     ddp_organization_rec.attribute13 := p1_a126;
2031     ddp_organization_rec.attribute14 := p1_a127;
2032     ddp_organization_rec.attribute15 := p1_a128;
2033     ddp_organization_rec.attribute16 := p1_a129;
2034     ddp_organization_rec.attribute17 := p1_a130;
2035     ddp_organization_rec.attribute18 := p1_a131;
2036     ddp_organization_rec.attribute19 := p1_a132;
2037     ddp_organization_rec.attribute20 := p1_a133;
2038     ddp_organization_rec.created_by_module := p1_a134;
2039     ddp_organization_rec.application_id := rosetta_g_miss_num_map(p1_a135);
2040     ddp_organization_rec.do_not_confuse_with := p1_a136;
2041     ddp_organization_rec.actual_content_source := p1_a137;
2042     ddp_organization_rec.home_country := p1_a138;
2043     ddp_organization_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a139);
2044     ddp_organization_rec.party_rec.party_number := p1_a140;
2045     ddp_organization_rec.party_rec.validated_flag := p1_a141;
2046     ddp_organization_rec.party_rec.orig_system_reference := p1_a142;
2047     ddp_organization_rec.party_rec.orig_system := p1_a143;
2048     ddp_organization_rec.party_rec.status := p1_a144;
2049     ddp_organization_rec.party_rec.category_code := p1_a145;
2050     ddp_organization_rec.party_rec.salutation := p1_a146;
2051     ddp_organization_rec.party_rec.attribute_category := p1_a147;
2052     ddp_organization_rec.party_rec.attribute1 := p1_a148;
2053     ddp_organization_rec.party_rec.attribute2 := p1_a149;
2054     ddp_organization_rec.party_rec.attribute3 := p1_a150;
2055     ddp_organization_rec.party_rec.attribute4 := p1_a151;
2056     ddp_organization_rec.party_rec.attribute5 := p1_a152;
2057     ddp_organization_rec.party_rec.attribute6 := p1_a153;
2058     ddp_organization_rec.party_rec.attribute7 := p1_a154;
2059     ddp_organization_rec.party_rec.attribute8 := p1_a155;
2060     ddp_organization_rec.party_rec.attribute9 := p1_a156;
2061     ddp_organization_rec.party_rec.attribute10 := p1_a157;
2062     ddp_organization_rec.party_rec.attribute11 := p1_a158;
2063     ddp_organization_rec.party_rec.attribute12 := p1_a159;
2064     ddp_organization_rec.party_rec.attribute13 := p1_a160;
2065     ddp_organization_rec.party_rec.attribute14 := p1_a161;
2066     ddp_organization_rec.party_rec.attribute15 := p1_a162;
2067     ddp_organization_rec.party_rec.attribute16 := p1_a163;
2068     ddp_organization_rec.party_rec.attribute17 := p1_a164;
2069     ddp_organization_rec.party_rec.attribute18 := p1_a165;
2070     ddp_organization_rec.party_rec.attribute19 := p1_a166;
2071     ddp_organization_rec.party_rec.attribute20 := p1_a167;
2072     ddp_organization_rec.party_rec.attribute21 := p1_a168;
2073     ddp_organization_rec.party_rec.attribute22 := p1_a169;
2074     ddp_organization_rec.party_rec.attribute23 := p1_a170;
2075     ddp_organization_rec.party_rec.attribute24 := p1_a171;
2076 
2077 
2078 
2079 
2080 
2081 
2082     -- here's the delegated call to the old PL/SQL routine
2083     hz_party_v2pub.update_organization(p_init_msg_list,
2084       ddp_organization_rec,
2085       p_party_object_version_number,
2086       x_profile_id,
2087       x_return_status,
2088       x_msg_count,
2089       x_msg_data);
2090 
2091     -- copy data back from the local OUT or IN-OUT args, if any
2092 
2093 
2094 
2095 
2096 
2097 
2098   end;
2099 
2100   procedure get_party_rec_9(p_init_msg_list  VARCHAR2
2101     , p_party_id  NUMBER
2102     , p2_a0 out nocopy  NUMBER
2103     , p2_a1 out nocopy  VARCHAR2
2104     , p2_a2 out nocopy  VARCHAR2
2105     , p2_a3 out nocopy  VARCHAR2
2106     , p2_a4 out nocopy  VARCHAR2
2107     , p2_a5 out nocopy  VARCHAR2
2108     , p2_a6 out nocopy  VARCHAR2
2109     , p2_a7 out nocopy  VARCHAR2
2110     , p2_a8 out nocopy  VARCHAR2
2111     , p2_a9 out nocopy  VARCHAR2
2112     , p2_a10 out nocopy  VARCHAR2
2113     , p2_a11 out nocopy  VARCHAR2
2114     , p2_a12 out nocopy  VARCHAR2
2115     , p2_a13 out nocopy  VARCHAR2
2116     , p2_a14 out nocopy  VARCHAR2
2117     , p2_a15 out nocopy  VARCHAR2
2118     , p2_a16 out nocopy  VARCHAR2
2119     , p2_a17 out nocopy  VARCHAR2
2120     , p2_a18 out nocopy  VARCHAR2
2121     , p2_a19 out nocopy  VARCHAR2
2122     , p2_a20 out nocopy  VARCHAR2
2123     , p2_a21 out nocopy  VARCHAR2
2124     , p2_a22 out nocopy  VARCHAR2
2125     , p2_a23 out nocopy  VARCHAR2
2126     , p2_a24 out nocopy  VARCHAR2
2127     , p2_a25 out nocopy  VARCHAR2
2128     , p2_a26 out nocopy  VARCHAR2
2129     , p2_a27 out nocopy  VARCHAR2
2130     , p2_a28 out nocopy  VARCHAR2
2131     , p2_a29 out nocopy  VARCHAR2
2132     , p2_a30 out nocopy  VARCHAR2
2133     , p2_a31 out nocopy  VARCHAR2
2134     , p2_a32 out nocopy  VARCHAR2
2135     , x_return_status out nocopy  VARCHAR2
2136     , x_msg_count out nocopy  NUMBER
2137     , x_msg_data out nocopy  VARCHAR2
2138   )
2139   as
2140     ddx_party_rec hz_party_v2pub.party_rec_type;
2141     ddindx binary_integer; indx binary_integer;
2142   begin
2143 
2144     -- copy data to the local IN or IN-OUT args, if any
2145 
2146 
2147 
2148 
2149 
2150 
2151     -- here's the delegated call to the old PL/SQL routine
2152     hz_party_v2pub.get_party_rec(p_init_msg_list,
2153       p_party_id,
2154       ddx_party_rec,
2155       x_return_status,
2156       x_msg_count,
2157       x_msg_data);
2158 
2159     -- copy data back from the local OUT or IN-OUT args, if any
2160 
2161 
2162     p2_a0 := rosetta_g_miss_num_map(ddx_party_rec.party_id);
2163     p2_a1 := ddx_party_rec.party_number;
2164     p2_a2 := ddx_party_rec.validated_flag;
2165     p2_a3 := ddx_party_rec.orig_system_reference;
2166     p2_a4 := ddx_party_rec.orig_system;
2167     p2_a5 := ddx_party_rec.status;
2168     p2_a6 := ddx_party_rec.category_code;
2169     p2_a7 := ddx_party_rec.salutation;
2170     p2_a8 := ddx_party_rec.attribute_category;
2171     p2_a9 := ddx_party_rec.attribute1;
2172     p2_a10 := ddx_party_rec.attribute2;
2173     p2_a11 := ddx_party_rec.attribute3;
2174     p2_a12 := ddx_party_rec.attribute4;
2175     p2_a13 := ddx_party_rec.attribute5;
2176     p2_a14 := ddx_party_rec.attribute6;
2177     p2_a15 := ddx_party_rec.attribute7;
2178     p2_a16 := ddx_party_rec.attribute8;
2179     p2_a17 := ddx_party_rec.attribute9;
2180     p2_a18 := ddx_party_rec.attribute10;
2181     p2_a19 := ddx_party_rec.attribute11;
2182     p2_a20 := ddx_party_rec.attribute12;
2183     p2_a21 := ddx_party_rec.attribute13;
2184     p2_a22 := ddx_party_rec.attribute14;
2185     p2_a23 := ddx_party_rec.attribute15;
2186     p2_a24 := ddx_party_rec.attribute16;
2187     p2_a25 := ddx_party_rec.attribute17;
2188     p2_a26 := ddx_party_rec.attribute18;
2189     p2_a27 := ddx_party_rec.attribute19;
2190     p2_a28 := ddx_party_rec.attribute20;
2191     p2_a29 := ddx_party_rec.attribute21;
2192     p2_a30 := ddx_party_rec.attribute22;
2193     p2_a31 := ddx_party_rec.attribute23;
2194     p2_a32 := ddx_party_rec.attribute24;
2195 
2196 
2197 
2198   end;
2199 
2200   procedure get_organization_rec_10(p_init_msg_list  VARCHAR2
2201     , p_party_id  NUMBER
2202     , p_content_source_type  VARCHAR2
2203     , p3_a0 out nocopy  VARCHAR2
2204     , p3_a1 out nocopy  VARCHAR2
2205     , p3_a2 out nocopy  VARCHAR2
2206     , p3_a3 out nocopy  VARCHAR2
2207     , p3_a4 out nocopy  VARCHAR2
2208     , p3_a5 out nocopy  VARCHAR2
2209     , p3_a6 out nocopy  VARCHAR2
2210     , p3_a7 out nocopy  VARCHAR2
2211     , p3_a8 out nocopy  NUMBER
2212     , p3_a9 out nocopy  NUMBER
2213     , p3_a10 out nocopy  VARCHAR2
2214     , p3_a11 out nocopy  VARCHAR2
2215     , p3_a12 out nocopy  VARCHAR2
2216     , p3_a13 out nocopy  VARCHAR2
2217     , p3_a14 out nocopy  VARCHAR2
2218     , p3_a15 out nocopy  VARCHAR2
2219     , p3_a16 out nocopy  VARCHAR2
2220     , p3_a17 out nocopy  VARCHAR2
2221     , p3_a18 out nocopy  VARCHAR2
2222     , p3_a19 out nocopy  VARCHAR2
2223     , p3_a20 out nocopy  VARCHAR2
2224     , p3_a21 out nocopy  VARCHAR2
2225     , p3_a22 out nocopy  VARCHAR2
2226     , p3_a23 out nocopy  VARCHAR2
2227     , p3_a24 out nocopy  VARCHAR2
2228     , p3_a25 out nocopy  VARCHAR2
2229     , p3_a26 out nocopy  NUMBER
2230     , p3_a27 out nocopy  DATE
2231     , p3_a28 out nocopy  VARCHAR2
2232     , p3_a29 out nocopy  NUMBER
2233     , p3_a30 out nocopy  VARCHAR2
2234     , p3_a31 out nocopy  VARCHAR2
2235     , p3_a32 out nocopy  VARCHAR2
2236     , p3_a33 out nocopy  VARCHAR2
2237     , p3_a34 out nocopy  VARCHAR2
2238     , p3_a35 out nocopy  VARCHAR2
2239     , p3_a36 out nocopy  VARCHAR2
2240     , p3_a37 out nocopy  VARCHAR2
2241     , p3_a38 out nocopy  VARCHAR2
2242     , p3_a39 out nocopy  DATE
2243     , p3_a40 out nocopy  DATE
2244     , p3_a41 out nocopy  VARCHAR2
2245     , p3_a42 out nocopy  VARCHAR2
2246     , p3_a43 out nocopy  VARCHAR2
2247     , p3_a44 out nocopy  VARCHAR2
2248     , p3_a45 out nocopy  VARCHAR2
2249     , p3_a46 out nocopy  VARCHAR2
2250     , p3_a47 out nocopy  NUMBER
2251     , p3_a48 out nocopy  NUMBER
2252     , p3_a49 out nocopy  NUMBER
2253     , p3_a50 out nocopy  VARCHAR2
2254     , p3_a51 out nocopy  VARCHAR2
2255     , p3_a52 out nocopy  VARCHAR2
2256     , p3_a53 out nocopy  VARCHAR2
2257     , p3_a54 out nocopy  VARCHAR2
2258     , p3_a55 out nocopy  VARCHAR2
2259     , p3_a56 out nocopy  VARCHAR2
2260     , p3_a57 out nocopy  VARCHAR2
2261     , p3_a58 out nocopy  VARCHAR2
2262     , p3_a59 out nocopy  VARCHAR2
2263     , p3_a60 out nocopy  VARCHAR2
2264     , p3_a61 out nocopy  VARCHAR2
2265     , p3_a62 out nocopy  VARCHAR2
2266     , p3_a63 out nocopy  VARCHAR2
2267     , p3_a64 out nocopy  VARCHAR2
2268     , p3_a65 out nocopy  VARCHAR2
2269     , p3_a66 out nocopy  VARCHAR2
2270     , p3_a67 out nocopy  VARCHAR2
2271     , p3_a68 out nocopy  NUMBER
2272     , p3_a69 out nocopy  VARCHAR2
2273     , p3_a70 out nocopy  VARCHAR2
2274     , p3_a71 out nocopy  VARCHAR2
2275     , p3_a72 out nocopy  VARCHAR2
2276     , p3_a73 out nocopy  VARCHAR2
2277     , p3_a74 out nocopy  VARCHAR2
2278     , p3_a75 out nocopy  VARCHAR2
2279     , p3_a76 out nocopy  VARCHAR2
2280     , p3_a77 out nocopy  VARCHAR2
2281     , p3_a78 out nocopy  NUMBER
2282     , p3_a79 out nocopy  NUMBER
2283     , p3_a80 out nocopy  NUMBER
2284     , p3_a81 out nocopy  NUMBER
2285     , p3_a82 out nocopy  NUMBER
2286     , p3_a83 out nocopy  NUMBER
2287     , p3_a84 out nocopy  NUMBER
2288     , p3_a85 out nocopy  DATE
2289     , p3_a86 out nocopy  VARCHAR2
2290     , p3_a87 out nocopy  VARCHAR2
2291     , p3_a88 out nocopy  VARCHAR2
2292     , p3_a89 out nocopy  VARCHAR2
2293     , p3_a90 out nocopy  VARCHAR2
2294     , p3_a91 out nocopy  VARCHAR2
2295     , p3_a92 out nocopy  VARCHAR2
2296     , p3_a93 out nocopy  VARCHAR2
2297     , p3_a94 out nocopy  VARCHAR2
2298     , p3_a95 out nocopy  NUMBER
2299     , p3_a96 out nocopy  NUMBER
2300     , p3_a97 out nocopy  NUMBER
2301     , p3_a98 out nocopy  DATE
2302     , p3_a99 out nocopy  VARCHAR2
2303     , p3_a100 out nocopy  VARCHAR2
2304     , p3_a101 out nocopy  VARCHAR2
2305     , p3_a102 out nocopy  VARCHAR2
2306     , p3_a103 out nocopy  VARCHAR2
2307     , p3_a104 out nocopy  VARCHAR2
2308     , p3_a105 out nocopy  VARCHAR2
2309     , p3_a106 out nocopy  VARCHAR2
2310     , p3_a107 out nocopy  VARCHAR2
2311     , p3_a108 out nocopy  NUMBER
2312     , p3_a109 out nocopy  VARCHAR2
2313     , p3_a110 out nocopy  NUMBER
2314     , p3_a111 out nocopy  VARCHAR2
2315     , p3_a112 out nocopy  VARCHAR2
2316     , p3_a113 out nocopy  VARCHAR2
2317     , p3_a114 out nocopy  VARCHAR2
2318     , p3_a115 out nocopy  VARCHAR2
2319     , p3_a116 out nocopy  VARCHAR2
2320     , p3_a117 out nocopy  VARCHAR2
2321     , p3_a118 out nocopy  VARCHAR2
2322     , p3_a119 out nocopy  VARCHAR2
2323     , p3_a120 out nocopy  VARCHAR2
2324     , p3_a121 out nocopy  VARCHAR2
2325     , p3_a122 out nocopy  VARCHAR2
2326     , p3_a123 out nocopy  VARCHAR2
2327     , p3_a124 out nocopy  VARCHAR2
2328     , p3_a125 out nocopy  VARCHAR2
2329     , p3_a126 out nocopy  VARCHAR2
2330     , p3_a127 out nocopy  VARCHAR2
2331     , p3_a128 out nocopy  VARCHAR2
2332     , p3_a129 out nocopy  VARCHAR2
2333     , p3_a130 out nocopy  VARCHAR2
2334     , p3_a131 out nocopy  VARCHAR2
2335     , p3_a132 out nocopy  VARCHAR2
2336     , p3_a133 out nocopy  VARCHAR2
2337     , p3_a134 out nocopy  VARCHAR2
2338     , p3_a135 out nocopy  NUMBER
2339     , p3_a136 out nocopy  VARCHAR2
2340     , p3_a137 out nocopy  VARCHAR2
2341     , p3_a138 out nocopy  VARCHAR2
2342     , p3_a139 out nocopy  NUMBER
2343     , p3_a140 out nocopy  VARCHAR2
2344     , p3_a141 out nocopy  VARCHAR2
2345     , p3_a142 out nocopy  VARCHAR2
2346     , p3_a143 out nocopy  VARCHAR2
2347     , p3_a144 out nocopy  VARCHAR2
2348     , p3_a145 out nocopy  VARCHAR2
2349     , p3_a146 out nocopy  VARCHAR2
2350     , p3_a147 out nocopy  VARCHAR2
2351     , p3_a148 out nocopy  VARCHAR2
2352     , p3_a149 out nocopy  VARCHAR2
2353     , p3_a150 out nocopy  VARCHAR2
2354     , p3_a151 out nocopy  VARCHAR2
2355     , p3_a152 out nocopy  VARCHAR2
2356     , p3_a153 out nocopy  VARCHAR2
2357     , p3_a154 out nocopy  VARCHAR2
2358     , p3_a155 out nocopy  VARCHAR2
2359     , p3_a156 out nocopy  VARCHAR2
2360     , p3_a157 out nocopy  VARCHAR2
2361     , p3_a158 out nocopy  VARCHAR2
2362     , p3_a159 out nocopy  VARCHAR2
2363     , p3_a160 out nocopy  VARCHAR2
2364     , p3_a161 out nocopy  VARCHAR2
2365     , p3_a162 out nocopy  VARCHAR2
2366     , p3_a163 out nocopy  VARCHAR2
2367     , p3_a164 out nocopy  VARCHAR2
2368     , p3_a165 out nocopy  VARCHAR2
2369     , p3_a166 out nocopy  VARCHAR2
2370     , p3_a167 out nocopy  VARCHAR2
2371     , p3_a168 out nocopy  VARCHAR2
2372     , p3_a169 out nocopy  VARCHAR2
2373     , p3_a170 out nocopy  VARCHAR2
2374     , p3_a171 out nocopy  VARCHAR2
2375     , x_return_status out nocopy  VARCHAR2
2376     , x_msg_count out nocopy  NUMBER
2377     , x_msg_data out nocopy  VARCHAR2
2378   )
2379   as
2380     ddx_organization_rec hz_party_v2pub.organization_rec_type;
2381     ddindx binary_integer; indx binary_integer;
2382   begin
2383 
2384     -- copy data to the local IN or IN-OUT args, if any
2385 
2386 
2387 
2388 
2389 
2390 
2391 
2392     -- here's the delegated call to the old PL/SQL routine
2393     hz_party_v2pub.get_organization_rec(p_init_msg_list,
2394       p_party_id,
2395       p_content_source_type,
2396       ddx_organization_rec,
2397       x_return_status,
2398       x_msg_count,
2399       x_msg_data);
2400 
2401     -- copy data back from the local OUT or IN-OUT args, if any
2402 
2403 
2404 
2405     p3_a0 := ddx_organization_rec.organization_name;
2406     p3_a1 := ddx_organization_rec.duns_number_c;
2407     p3_a2 := ddx_organization_rec.enquiry_duns;
2408     p3_a3 := ddx_organization_rec.ceo_name;
2409     p3_a4 := ddx_organization_rec.ceo_title;
2410     p3_a5 := ddx_organization_rec.principal_name;
2411     p3_a6 := ddx_organization_rec.principal_title;
2412     p3_a7 := ddx_organization_rec.legal_status;
2413     p3_a8 := rosetta_g_miss_num_map(ddx_organization_rec.control_yr);
2414     p3_a9 := rosetta_g_miss_num_map(ddx_organization_rec.employees_total);
2415     p3_a10 := ddx_organization_rec.hq_branch_ind;
2416     p3_a11 := ddx_organization_rec.branch_flag;
2417     p3_a12 := ddx_organization_rec.oob_ind;
2418     p3_a13 := ddx_organization_rec.line_of_business;
2419     p3_a14 := ddx_organization_rec.cong_dist_code;
2420     p3_a15 := ddx_organization_rec.sic_code;
2421     p3_a16 := ddx_organization_rec.import_ind;
2422     p3_a17 := ddx_organization_rec.export_ind;
2423     p3_a18 := ddx_organization_rec.labor_surplus_ind;
2424     p3_a19 := ddx_organization_rec.debarment_ind;
2425     p3_a20 := ddx_organization_rec.minority_owned_ind;
2426     p3_a21 := ddx_organization_rec.minority_owned_type;
2427     p3_a22 := ddx_organization_rec.woman_owned_ind;
2428     p3_a23 := ddx_organization_rec.disadv_8a_ind;
2429     p3_a24 := ddx_organization_rec.small_bus_ind;
2430     p3_a25 := ddx_organization_rec.rent_own_ind;
2431     p3_a26 := rosetta_g_miss_num_map(ddx_organization_rec.debarments_count);
2432     p3_a27 := ddx_organization_rec.debarments_date;
2433     p3_a28 := ddx_organization_rec.failure_score;
2434     p3_a29 := rosetta_g_miss_num_map(ddx_organization_rec.failure_score_natnl_percentile);
2435     p3_a30 := ddx_organization_rec.failure_score_override_code;
2436     p3_a31 := ddx_organization_rec.failure_score_commentary;
2437     p3_a32 := ddx_organization_rec.global_failure_score;
2438     p3_a33 := ddx_organization_rec.db_rating;
2439     p3_a34 := ddx_organization_rec.credit_score;
2440     p3_a35 := ddx_organization_rec.credit_score_commentary;
2441     p3_a36 := ddx_organization_rec.paydex_score;
2442     p3_a37 := ddx_organization_rec.paydex_three_months_ago;
2443     p3_a38 := ddx_organization_rec.paydex_norm;
2444     p3_a39 := ddx_organization_rec.best_time_contact_begin;
2445     p3_a40 := ddx_organization_rec.best_time_contact_end;
2446     p3_a41 := ddx_organization_rec.organization_name_phonetic;
2447     p3_a42 := ddx_organization_rec.tax_reference;
2448     p3_a43 := ddx_organization_rec.gsa_indicator_flag;
2449     p3_a44 := ddx_organization_rec.jgzz_fiscal_code;
2450     p3_a45 := ddx_organization_rec.analysis_fy;
2451     p3_a46 := ddx_organization_rec.fiscal_yearend_month;
2452     p3_a47 := rosetta_g_miss_num_map(ddx_organization_rec.curr_fy_potential_revenue);
2453     p3_a48 := rosetta_g_miss_num_map(ddx_organization_rec.next_fy_potential_revenue);
2454     p3_a49 := rosetta_g_miss_num_map(ddx_organization_rec.year_established);
2455     p3_a50 := ddx_organization_rec.mission_statement;
2456     p3_a51 := ddx_organization_rec.organization_type;
2457     p3_a52 := ddx_organization_rec.business_scope;
2458     p3_a53 := ddx_organization_rec.corporation_class;
2459     p3_a54 := ddx_organization_rec.known_as;
2460     p3_a55 := ddx_organization_rec.known_as2;
2461     p3_a56 := ddx_organization_rec.known_as3;
2462     p3_a57 := ddx_organization_rec.known_as4;
2463     p3_a58 := ddx_organization_rec.known_as5;
2464     p3_a59 := ddx_organization_rec.local_bus_iden_type;
2465     p3_a60 := ddx_organization_rec.local_bus_identifier;
2466     p3_a61 := ddx_organization_rec.pref_functional_currency;
2467     p3_a62 := ddx_organization_rec.registration_type;
2468     p3_a63 := ddx_organization_rec.total_employees_text;
2469     p3_a64 := ddx_organization_rec.total_employees_ind;
2470     p3_a65 := ddx_organization_rec.total_emp_est_ind;
2471     p3_a66 := ddx_organization_rec.total_emp_min_ind;
2472     p3_a67 := ddx_organization_rec.parent_sub_ind;
2473     p3_a68 := rosetta_g_miss_num_map(ddx_organization_rec.incorp_year);
2474     p3_a69 := ddx_organization_rec.sic_code_type;
2475     p3_a70 := ddx_organization_rec.public_private_ownership_flag;
2476     p3_a71 := ddx_organization_rec.internal_flag;
2477     p3_a72 := ddx_organization_rec.local_activity_code_type;
2478     p3_a73 := ddx_organization_rec.local_activity_code;
2479     p3_a74 := ddx_organization_rec.emp_at_primary_adr;
2480     p3_a75 := ddx_organization_rec.emp_at_primary_adr_text;
2481     p3_a76 := ddx_organization_rec.emp_at_primary_adr_est_ind;
2482     p3_a77 := ddx_organization_rec.emp_at_primary_adr_min_ind;
2483     p3_a78 := rosetta_g_miss_num_map(ddx_organization_rec.high_credit);
2484     p3_a79 := rosetta_g_miss_num_map(ddx_organization_rec.avg_high_credit);
2485     p3_a80 := rosetta_g_miss_num_map(ddx_organization_rec.total_payments);
2486     p3_a81 := rosetta_g_miss_num_map(ddx_organization_rec.credit_score_class);
2487     p3_a82 := rosetta_g_miss_num_map(ddx_organization_rec.credit_score_natl_percentile);
2488     p3_a83 := rosetta_g_miss_num_map(ddx_organization_rec.credit_score_incd_default);
2489     p3_a84 := rosetta_g_miss_num_map(ddx_organization_rec.credit_score_age);
2490     p3_a85 := ddx_organization_rec.credit_score_date;
2491     p3_a86 := ddx_organization_rec.credit_score_commentary2;
2492     p3_a87 := ddx_organization_rec.credit_score_commentary3;
2493     p3_a88 := ddx_organization_rec.credit_score_commentary4;
2494     p3_a89 := ddx_organization_rec.credit_score_commentary5;
2495     p3_a90 := ddx_organization_rec.credit_score_commentary6;
2496     p3_a91 := ddx_organization_rec.credit_score_commentary7;
2497     p3_a92 := ddx_organization_rec.credit_score_commentary8;
2498     p3_a93 := ddx_organization_rec.credit_score_commentary9;
2499     p3_a94 := ddx_organization_rec.credit_score_commentary10;
2500     p3_a95 := rosetta_g_miss_num_map(ddx_organization_rec.failure_score_class);
2501     p3_a96 := rosetta_g_miss_num_map(ddx_organization_rec.failure_score_incd_default);
2502     p3_a97 := rosetta_g_miss_num_map(ddx_organization_rec.failure_score_age);
2503     p3_a98 := ddx_organization_rec.failure_score_date;
2504     p3_a99 := ddx_organization_rec.failure_score_commentary2;
2505     p3_a100 := ddx_organization_rec.failure_score_commentary3;
2506     p3_a101 := ddx_organization_rec.failure_score_commentary4;
2507     p3_a102 := ddx_organization_rec.failure_score_commentary5;
2508     p3_a103 := ddx_organization_rec.failure_score_commentary6;
2509     p3_a104 := ddx_organization_rec.failure_score_commentary7;
2510     p3_a105 := ddx_organization_rec.failure_score_commentary8;
2511     p3_a106 := ddx_organization_rec.failure_score_commentary9;
2512     p3_a107 := ddx_organization_rec.failure_score_commentary10;
2513     p3_a108 := rosetta_g_miss_num_map(ddx_organization_rec.maximum_credit_recommendation);
2514     p3_a109 := ddx_organization_rec.maximum_credit_currency_code;
2515     p3_a110 := rosetta_g_miss_num_map(ddx_organization_rec.displayed_duns_party_id);
2516     p3_a111 := ddx_organization_rec.content_source_type;
2517     p3_a112 := ddx_organization_rec.content_source_number;
2518     p3_a113 := ddx_organization_rec.attribute_category;
2519     p3_a114 := ddx_organization_rec.attribute1;
2520     p3_a115 := ddx_organization_rec.attribute2;
2521     p3_a116 := ddx_organization_rec.attribute3;
2522     p3_a117 := ddx_organization_rec.attribute4;
2523     p3_a118 := ddx_organization_rec.attribute5;
2524     p3_a119 := ddx_organization_rec.attribute6;
2525     p3_a120 := ddx_organization_rec.attribute7;
2526     p3_a121 := ddx_organization_rec.attribute8;
2527     p3_a122 := ddx_organization_rec.attribute9;
2528     p3_a123 := ddx_organization_rec.attribute10;
2529     p3_a124 := ddx_organization_rec.attribute11;
2530     p3_a125 := ddx_organization_rec.attribute12;
2531     p3_a126 := ddx_organization_rec.attribute13;
2532     p3_a127 := ddx_organization_rec.attribute14;
2533     p3_a128 := ddx_organization_rec.attribute15;
2534     p3_a129 := ddx_organization_rec.attribute16;
2535     p3_a130 := ddx_organization_rec.attribute17;
2536     p3_a131 := ddx_organization_rec.attribute18;
2537     p3_a132 := ddx_organization_rec.attribute19;
2538     p3_a133 := ddx_organization_rec.attribute20;
2539     p3_a134 := ddx_organization_rec.created_by_module;
2540     p3_a135 := rosetta_g_miss_num_map(ddx_organization_rec.application_id);
2541     p3_a136 := ddx_organization_rec.do_not_confuse_with;
2542     p3_a137 := ddx_organization_rec.actual_content_source;
2543     p3_a138 := ddx_organization_rec.home_country;
2544     p3_a139 := rosetta_g_miss_num_map(ddx_organization_rec.party_rec.party_id);
2545     p3_a140 := ddx_organization_rec.party_rec.party_number;
2546     p3_a141 := ddx_organization_rec.party_rec.validated_flag;
2547     p3_a142 := ddx_organization_rec.party_rec.orig_system_reference;
2548     p3_a143 := ddx_organization_rec.party_rec.orig_system;
2549     p3_a144 := ddx_organization_rec.party_rec.status;
2550     p3_a145 := ddx_organization_rec.party_rec.category_code;
2551     p3_a146 := ddx_organization_rec.party_rec.salutation;
2552     p3_a147 := ddx_organization_rec.party_rec.attribute_category;
2553     p3_a148 := ddx_organization_rec.party_rec.attribute1;
2554     p3_a149 := ddx_organization_rec.party_rec.attribute2;
2555     p3_a150 := ddx_organization_rec.party_rec.attribute3;
2556     p3_a151 := ddx_organization_rec.party_rec.attribute4;
2557     p3_a152 := ddx_organization_rec.party_rec.attribute5;
2558     p3_a153 := ddx_organization_rec.party_rec.attribute6;
2559     p3_a154 := ddx_organization_rec.party_rec.attribute7;
2560     p3_a155 := ddx_organization_rec.party_rec.attribute8;
2561     p3_a156 := ddx_organization_rec.party_rec.attribute9;
2562     p3_a157 := ddx_organization_rec.party_rec.attribute10;
2563     p3_a158 := ddx_organization_rec.party_rec.attribute11;
2564     p3_a159 := ddx_organization_rec.party_rec.attribute12;
2565     p3_a160 := ddx_organization_rec.party_rec.attribute13;
2566     p3_a161 := ddx_organization_rec.party_rec.attribute14;
2567     p3_a162 := ddx_organization_rec.party_rec.attribute15;
2568     p3_a163 := ddx_organization_rec.party_rec.attribute16;
2569     p3_a164 := ddx_organization_rec.party_rec.attribute17;
2570     p3_a165 := ddx_organization_rec.party_rec.attribute18;
2571     p3_a166 := ddx_organization_rec.party_rec.attribute19;
2572     p3_a167 := ddx_organization_rec.party_rec.attribute20;
2573     p3_a168 := ddx_organization_rec.party_rec.attribute21;
2574     p3_a169 := ddx_organization_rec.party_rec.attribute22;
2575     p3_a170 := ddx_organization_rec.party_rec.attribute23;
2576     p3_a171 := ddx_organization_rec.party_rec.attribute24;
2577 
2578 
2579 
2580   end;
2581 
2582   procedure get_person_rec_11(p_init_msg_list  VARCHAR2
2583     , p_party_id  NUMBER
2584     , p_content_source_type  VARCHAR2
2585     , p3_a0 out nocopy  VARCHAR2
2586     , p3_a1 out nocopy  VARCHAR2
2587     , p3_a2 out nocopy  VARCHAR2
2588     , p3_a3 out nocopy  VARCHAR2
2589     , p3_a4 out nocopy  VARCHAR2
2590     , p3_a5 out nocopy  VARCHAR2
2591     , p3_a6 out nocopy  VARCHAR2
2592     , p3_a7 out nocopy  VARCHAR2
2593     , p3_a8 out nocopy  VARCHAR2
2594     , p3_a9 out nocopy  VARCHAR2
2595     , p3_a10 out nocopy  VARCHAR2
2596     , p3_a11 out nocopy  VARCHAR2
2597     , p3_a12 out nocopy  VARCHAR2
2598     , p3_a13 out nocopy  VARCHAR2
2599     , p3_a14 out nocopy  VARCHAR2
2600     , p3_a15 out nocopy  VARCHAR2
2601     , p3_a16 out nocopy  VARCHAR2
2602     , p3_a17 out nocopy  VARCHAR2
2603     , p3_a18 out nocopy  VARCHAR2
2604     , p3_a19 out nocopy  VARCHAR2
2605     , p3_a20 out nocopy  VARCHAR2
2606     , p3_a21 out nocopy  VARCHAR2
2607     , p3_a22 out nocopy  DATE
2608     , p3_a23 out nocopy  VARCHAR2
2609     , p3_a24 out nocopy  DATE
2610     , p3_a25 out nocopy  VARCHAR2
2611     , p3_a26 out nocopy  VARCHAR2
2612     , p3_a27 out nocopy  VARCHAR2
2613     , p3_a28 out nocopy  VARCHAR2
2614     , p3_a29 out nocopy  DATE
2615     , p3_a30 out nocopy  NUMBER
2616     , p3_a31 out nocopy  VARCHAR2
2617     , p3_a32 out nocopy  NUMBER
2618     , p3_a33 out nocopy  NUMBER
2619     , p3_a34 out nocopy  VARCHAR2
2620     , p3_a35 out nocopy  VARCHAR2
2621     , p3_a36 out nocopy  VARCHAR2
2622     , p3_a37 out nocopy  VARCHAR2
2623     , p3_a38 out nocopy  VARCHAR2
2624     , p3_a39 out nocopy  VARCHAR2
2625     , p3_a40 out nocopy  VARCHAR2
2626     , p3_a41 out nocopy  VARCHAR2
2627     , p3_a42 out nocopy  VARCHAR2
2628     , p3_a43 out nocopy  VARCHAR2
2629     , p3_a44 out nocopy  VARCHAR2
2630     , p3_a45 out nocopy  VARCHAR2
2631     , p3_a46 out nocopy  VARCHAR2
2632     , p3_a47 out nocopy  VARCHAR2
2633     , p3_a48 out nocopy  VARCHAR2
2634     , p3_a49 out nocopy  VARCHAR2
2635     , p3_a50 out nocopy  VARCHAR2
2636     , p3_a51 out nocopy  VARCHAR2
2637     , p3_a52 out nocopy  VARCHAR2
2638     , p3_a53 out nocopy  VARCHAR2
2639     , p3_a54 out nocopy  VARCHAR2
2640     , p3_a55 out nocopy  VARCHAR2
2641     , p3_a56 out nocopy  VARCHAR2
2642     , p3_a57 out nocopy  VARCHAR2
2643     , p3_a58 out nocopy  VARCHAR2
2644     , p3_a59 out nocopy  VARCHAR2
2645     , p3_a60 out nocopy  NUMBER
2646     , p3_a61 out nocopy  VARCHAR2
2647     , p3_a62 out nocopy  NUMBER
2648     , p3_a63 out nocopy  VARCHAR2
2649     , p3_a64 out nocopy  VARCHAR2
2650     , p3_a65 out nocopy  VARCHAR2
2651     , p3_a66 out nocopy  VARCHAR2
2652     , p3_a67 out nocopy  VARCHAR2
2653     , p3_a68 out nocopy  VARCHAR2
2654     , p3_a69 out nocopy  VARCHAR2
2655     , p3_a70 out nocopy  VARCHAR2
2656     , p3_a71 out nocopy  VARCHAR2
2657     , p3_a72 out nocopy  VARCHAR2
2658     , p3_a73 out nocopy  VARCHAR2
2659     , p3_a74 out nocopy  VARCHAR2
2660     , p3_a75 out nocopy  VARCHAR2
2661     , p3_a76 out nocopy  VARCHAR2
2662     , p3_a77 out nocopy  VARCHAR2
2663     , p3_a78 out nocopy  VARCHAR2
2664     , p3_a79 out nocopy  VARCHAR2
2665     , p3_a80 out nocopy  VARCHAR2
2666     , p3_a81 out nocopy  VARCHAR2
2667     , p3_a82 out nocopy  VARCHAR2
2668     , p3_a83 out nocopy  VARCHAR2
2669     , p3_a84 out nocopy  VARCHAR2
2670     , p3_a85 out nocopy  VARCHAR2
2671     , p3_a86 out nocopy  VARCHAR2
2672     , p3_a87 out nocopy  VARCHAR2
2673     , p3_a88 out nocopy  VARCHAR2
2674     , p3_a89 out nocopy  VARCHAR2
2675     , p3_a90 out nocopy  VARCHAR2
2676     , p3_a91 out nocopy  VARCHAR2
2677     , p3_a92 out nocopy  VARCHAR2
2678     , p3_a93 out nocopy  VARCHAR2
2679     , p3_a94 out nocopy  VARCHAR2
2680     , x_return_status out nocopy  VARCHAR2
2681     , x_msg_count out nocopy  NUMBER
2682     , x_msg_data out nocopy  VARCHAR2
2683   )
2684   as
2685     ddx_person_rec hz_party_v2pub.person_rec_type;
2686     ddindx binary_integer; indx binary_integer;
2687   begin
2688 
2689     -- copy data to the local IN or IN-OUT args, if any
2690 
2691 
2692 
2693 
2694 
2695 
2696 
2697     -- here's the delegated call to the old PL/SQL routine
2698     hz_party_v2pub.get_person_rec(p_init_msg_list,
2699       p_party_id,
2700       p_content_source_type,
2701       ddx_person_rec,
2702       x_return_status,
2703       x_msg_count,
2704       x_msg_data);
2705 
2706     -- copy data back from the local OUT or IN-OUT args, if any
2707 
2708 
2709 
2710     p3_a0 := ddx_person_rec.person_pre_name_adjunct;
2711     p3_a1 := ddx_person_rec.person_first_name;
2712     p3_a2 := ddx_person_rec.person_middle_name;
2713     p3_a3 := ddx_person_rec.person_last_name;
2714     p3_a4 := ddx_person_rec.person_name_suffix;
2715     p3_a5 := ddx_person_rec.person_title;
2716     p3_a6 := ddx_person_rec.person_academic_title;
2717     p3_a7 := ddx_person_rec.person_previous_last_name;
2718     p3_a8 := ddx_person_rec.person_initials;
2719     p3_a9 := ddx_person_rec.known_as;
2720     p3_a10 := ddx_person_rec.known_as2;
2721     p3_a11 := ddx_person_rec.known_as3;
2722     p3_a12 := ddx_person_rec.known_as4;
2723     p3_a13 := ddx_person_rec.known_as5;
2724     p3_a14 := ddx_person_rec.person_name_phonetic;
2725     p3_a15 := ddx_person_rec.person_first_name_phonetic;
2726     p3_a16 := ddx_person_rec.person_last_name_phonetic;
2727     p3_a17 := ddx_person_rec.middle_name_phonetic;
2728     p3_a18 := ddx_person_rec.tax_reference;
2729     p3_a19 := ddx_person_rec.jgzz_fiscal_code;
2730     p3_a20 := ddx_person_rec.person_iden_type;
2731     p3_a21 := ddx_person_rec.person_identifier;
2732     p3_a22 := ddx_person_rec.date_of_birth;
2733     p3_a23 := ddx_person_rec.place_of_birth;
2734     p3_a24 := ddx_person_rec.date_of_death;
2735     p3_a25 := ddx_person_rec.deceased_flag;
2736     p3_a26 := ddx_person_rec.gender;
2737     p3_a27 := ddx_person_rec.declared_ethnicity;
2738     p3_a28 := ddx_person_rec.marital_status;
2739     p3_a29 := ddx_person_rec.marital_status_effective_date;
2740     p3_a30 := rosetta_g_miss_num_map(ddx_person_rec.personal_income);
2741     p3_a31 := ddx_person_rec.head_of_household_flag;
2742     p3_a32 := rosetta_g_miss_num_map(ddx_person_rec.household_income);
2743     p3_a33 := rosetta_g_miss_num_map(ddx_person_rec.household_size);
2744     p3_a34 := ddx_person_rec.rent_own_ind;
2745     p3_a35 := ddx_person_rec.last_known_gps;
2746     p3_a36 := ddx_person_rec.content_source_type;
2747     p3_a37 := ddx_person_rec.internal_flag;
2748     p3_a38 := ddx_person_rec.attribute_category;
2749     p3_a39 := ddx_person_rec.attribute1;
2750     p3_a40 := ddx_person_rec.attribute2;
2751     p3_a41 := ddx_person_rec.attribute3;
2752     p3_a42 := ddx_person_rec.attribute4;
2753     p3_a43 := ddx_person_rec.attribute5;
2754     p3_a44 := ddx_person_rec.attribute6;
2755     p3_a45 := ddx_person_rec.attribute7;
2756     p3_a46 := ddx_person_rec.attribute8;
2757     p3_a47 := ddx_person_rec.attribute9;
2758     p3_a48 := ddx_person_rec.attribute10;
2759     p3_a49 := ddx_person_rec.attribute11;
2760     p3_a50 := ddx_person_rec.attribute12;
2761     p3_a51 := ddx_person_rec.attribute13;
2762     p3_a52 := ddx_person_rec.attribute14;
2763     p3_a53 := ddx_person_rec.attribute15;
2764     p3_a54 := ddx_person_rec.attribute16;
2765     p3_a55 := ddx_person_rec.attribute17;
2766     p3_a56 := ddx_person_rec.attribute18;
2767     p3_a57 := ddx_person_rec.attribute19;
2768     p3_a58 := ddx_person_rec.attribute20;
2769     p3_a59 := ddx_person_rec.created_by_module;
2770     p3_a60 := rosetta_g_miss_num_map(ddx_person_rec.application_id);
2771     p3_a61 := ddx_person_rec.actual_content_source;
2772     p3_a62 := rosetta_g_miss_num_map(ddx_person_rec.party_rec.party_id);
2773     p3_a63 := ddx_person_rec.party_rec.party_number;
2774     p3_a64 := ddx_person_rec.party_rec.validated_flag;
2775     p3_a65 := ddx_person_rec.party_rec.orig_system_reference;
2776     p3_a66 := ddx_person_rec.party_rec.orig_system;
2777     p3_a67 := ddx_person_rec.party_rec.status;
2778     p3_a68 := ddx_person_rec.party_rec.category_code;
2779     p3_a69 := ddx_person_rec.party_rec.salutation;
2780     p3_a70 := ddx_person_rec.party_rec.attribute_category;
2781     p3_a71 := ddx_person_rec.party_rec.attribute1;
2782     p3_a72 := ddx_person_rec.party_rec.attribute2;
2783     p3_a73 := ddx_person_rec.party_rec.attribute3;
2784     p3_a74 := ddx_person_rec.party_rec.attribute4;
2785     p3_a75 := ddx_person_rec.party_rec.attribute5;
2786     p3_a76 := ddx_person_rec.party_rec.attribute6;
2787     p3_a77 := ddx_person_rec.party_rec.attribute7;
2788     p3_a78 := ddx_person_rec.party_rec.attribute8;
2789     p3_a79 := ddx_person_rec.party_rec.attribute9;
2790     p3_a80 := ddx_person_rec.party_rec.attribute10;
2791     p3_a81 := ddx_person_rec.party_rec.attribute11;
2792     p3_a82 := ddx_person_rec.party_rec.attribute12;
2793     p3_a83 := ddx_person_rec.party_rec.attribute13;
2794     p3_a84 := ddx_person_rec.party_rec.attribute14;
2795     p3_a85 := ddx_person_rec.party_rec.attribute15;
2796     p3_a86 := ddx_person_rec.party_rec.attribute16;
2797     p3_a87 := ddx_person_rec.party_rec.attribute17;
2798     p3_a88 := ddx_person_rec.party_rec.attribute18;
2799     p3_a89 := ddx_person_rec.party_rec.attribute19;
2800     p3_a90 := ddx_person_rec.party_rec.attribute20;
2801     p3_a91 := ddx_person_rec.party_rec.attribute21;
2802     p3_a92 := ddx_person_rec.party_rec.attribute22;
2803     p3_a93 := ddx_person_rec.party_rec.attribute23;
2804     p3_a94 := ddx_person_rec.party_rec.attribute24;
2805 
2806 
2807 
2808   end;
2809 
2810   procedure get_group_rec_12(p_init_msg_list  VARCHAR2
2811     , p_party_id  NUMBER
2812     , p2_a0 out nocopy  VARCHAR2
2813     , p2_a1 out nocopy  VARCHAR2
2814     , p2_a2 out nocopy  VARCHAR2
2815     , p2_a3 out nocopy  VARCHAR2
2816     , p2_a4 out nocopy  NUMBER
2817     , p2_a5 out nocopy  NUMBER
2818     , p2_a6 out nocopy  VARCHAR2
2819     , p2_a7 out nocopy  VARCHAR2
2820     , p2_a8 out nocopy  VARCHAR2
2821     , p2_a9 out nocopy  VARCHAR2
2822     , p2_a10 out nocopy  VARCHAR2
2823     , p2_a11 out nocopy  VARCHAR2
2824     , p2_a12 out nocopy  VARCHAR2
2825     , p2_a13 out nocopy  VARCHAR2
2826     , p2_a14 out nocopy  VARCHAR2
2827     , p2_a15 out nocopy  VARCHAR2
2828     , p2_a16 out nocopy  VARCHAR2
2829     , p2_a17 out nocopy  VARCHAR2
2830     , p2_a18 out nocopy  VARCHAR2
2831     , p2_a19 out nocopy  VARCHAR2
2832     , p2_a20 out nocopy  VARCHAR2
2833     , p2_a21 out nocopy  VARCHAR2
2834     , p2_a22 out nocopy  VARCHAR2
2835     , p2_a23 out nocopy  VARCHAR2
2836     , p2_a24 out nocopy  VARCHAR2
2837     , p2_a25 out nocopy  VARCHAR2
2838     , p2_a26 out nocopy  VARCHAR2
2839     , p2_a27 out nocopy  VARCHAR2
2840     , p2_a28 out nocopy  VARCHAR2
2841     , p2_a29 out nocopy  VARCHAR2
2842     , p2_a30 out nocopy  VARCHAR2
2843     , p2_a31 out nocopy  VARCHAR2
2844     , p2_a32 out nocopy  VARCHAR2
2845     , p2_a33 out nocopy  VARCHAR2
2846     , p2_a34 out nocopy  VARCHAR2
2847     , p2_a35 out nocopy  VARCHAR2
2848     , p2_a36 out nocopy  VARCHAR2
2849     , p2_a37 out nocopy  VARCHAR2
2850     , x_return_status out nocopy  VARCHAR2
2851     , x_msg_count out nocopy  NUMBER
2852     , x_msg_data out nocopy  VARCHAR2
2853   )
2854   as
2855     ddx_group_rec hz_party_v2pub.group_rec_type;
2856     ddindx binary_integer; indx binary_integer;
2857   begin
2858 
2859     -- copy data to the local IN or IN-OUT args, if any
2860 
2861 
2862 
2863 
2864 
2865 
2866     -- here's the delegated call to the old PL/SQL routine
2867     hz_party_v2pub.get_group_rec(p_init_msg_list,
2868       p_party_id,
2869       ddx_group_rec,
2870       x_return_status,
2871       x_msg_count,
2872       x_msg_data);
2873 
2874     -- copy data back from the local OUT or IN-OUT args, if any
2875 
2876 
2877     p2_a0 := ddx_group_rec.group_name;
2878     p2_a1 := ddx_group_rec.group_type;
2879     p2_a2 := ddx_group_rec.created_by_module;
2880     p2_a3 := ddx_group_rec.mission_statement;
2881     p2_a4 := rosetta_g_miss_num_map(ddx_group_rec.application_id);
2882     p2_a5 := rosetta_g_miss_num_map(ddx_group_rec.party_rec.party_id);
2883     p2_a6 := ddx_group_rec.party_rec.party_number;
2884     p2_a7 := ddx_group_rec.party_rec.validated_flag;
2885     p2_a8 := ddx_group_rec.party_rec.orig_system_reference;
2886     p2_a9 := ddx_group_rec.party_rec.orig_system;
2887     p2_a10 := ddx_group_rec.party_rec.status;
2888     p2_a11 := ddx_group_rec.party_rec.category_code;
2889     p2_a12 := ddx_group_rec.party_rec.salutation;
2890     p2_a13 := ddx_group_rec.party_rec.attribute_category;
2891     p2_a14 := ddx_group_rec.party_rec.attribute1;
2892     p2_a15 := ddx_group_rec.party_rec.attribute2;
2893     p2_a16 := ddx_group_rec.party_rec.attribute3;
2894     p2_a17 := ddx_group_rec.party_rec.attribute4;
2895     p2_a18 := ddx_group_rec.party_rec.attribute5;
2896     p2_a19 := ddx_group_rec.party_rec.attribute6;
2897     p2_a20 := ddx_group_rec.party_rec.attribute7;
2898     p2_a21 := ddx_group_rec.party_rec.attribute8;
2899     p2_a22 := ddx_group_rec.party_rec.attribute9;
2900     p2_a23 := ddx_group_rec.party_rec.attribute10;
2901     p2_a24 := ddx_group_rec.party_rec.attribute11;
2902     p2_a25 := ddx_group_rec.party_rec.attribute12;
2903     p2_a26 := ddx_group_rec.party_rec.attribute13;
2904     p2_a27 := ddx_group_rec.party_rec.attribute14;
2905     p2_a28 := ddx_group_rec.party_rec.attribute15;
2906     p2_a29 := ddx_group_rec.party_rec.attribute16;
2907     p2_a30 := ddx_group_rec.party_rec.attribute17;
2908     p2_a31 := ddx_group_rec.party_rec.attribute18;
2909     p2_a32 := ddx_group_rec.party_rec.attribute19;
2910     p2_a33 := ddx_group_rec.party_rec.attribute20;
2911     p2_a34 := ddx_group_rec.party_rec.attribute21;
2912     p2_a35 := ddx_group_rec.party_rec.attribute22;
2913     p2_a36 := ddx_group_rec.party_rec.attribute23;
2914     p2_a37 := ddx_group_rec.party_rec.attribute24;
2915 
2916 
2917 
2918   end;
2919 
2920 end hz_party_v2pub_jw;