DBA Data[Home] [Help]

PACKAGE BODY: APPS.HZ_PARTY_CONTACT_V2PUB_JW

Source


1 package body hz_party_contact_v2pub_jw as
2   /* $Header: ARH2PCJB.pls 120.3 2005/06/18 04:28:49 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_org_contact_1(p_init_msg_list  VARCHAR2
23     , x_org_contact_id out nocopy  NUMBER
24     , x_party_rel_id out nocopy  NUMBER
25     , x_party_id out nocopy  NUMBER
26     , x_party_number out nocopy  VARCHAR2
27     , x_return_status out nocopy  VARCHAR2
28     , x_msg_count out nocopy  NUMBER
29     , x_msg_data out nocopy  VARCHAR2
30     , p1_a0  NUMBER := null
31     , p1_a1  VARCHAR2 := null
32     , p1_a2  VARCHAR2 := null
33     , p1_a3  VARCHAR2 := null
34     , p1_a4  VARCHAR2 := null
35     , p1_a5  VARCHAR2 := null
36     , p1_a6  VARCHAR2 := null
37     , p1_a7  VARCHAR2 := null
38     , p1_a8  VARCHAR2 := null
39     , p1_a9  VARCHAR2 := null
40     , p1_a10  VARCHAR2 := null
41     , p1_a11  NUMBER := null
42     , p1_a12  VARCHAR2 := null
43     , p1_a13  VARCHAR2 := null
44     , p1_a14  VARCHAR2 := null
45     , p1_a15  VARCHAR2 := null
46     , p1_a16  VARCHAR2 := null
47     , p1_a17  VARCHAR2 := null
48     , p1_a18  VARCHAR2 := null
49     , p1_a19  VARCHAR2 := null
50     , p1_a20  VARCHAR2 := null
51     , p1_a21  VARCHAR2 := null
52     , p1_a22  VARCHAR2 := null
53     , p1_a23  VARCHAR2 := null
54     , p1_a24  VARCHAR2 := null
55     , p1_a25  VARCHAR2 := null
56     , p1_a26  VARCHAR2 := null
57     , p1_a27  VARCHAR2 := null
58     , p1_a28  VARCHAR2 := null
59     , p1_a29  VARCHAR2 := null
60     , p1_a30  VARCHAR2 := null
61     , p1_a31  VARCHAR2 := null
62     , p1_a32  VARCHAR2 := null
63     , p1_a33  VARCHAR2 := null
64     , p1_a34  VARCHAR2 := null
65     , p1_a35  VARCHAR2 := null
66     , p1_a36  VARCHAR2 := null
67     , p1_a37  VARCHAR2 := null
68     , p1_a38  VARCHAR2 := null
69     , p1_a39  VARCHAR2 := null
70     , p1_a40  NUMBER := null
71     , p1_a41  NUMBER := null
72     , p1_a42  NUMBER := null
73     , p1_a43  VARCHAR2 := null
74     , p1_a44  VARCHAR2 := null
75     , p1_a45  NUMBER := null
76     , p1_a46  VARCHAR2 := null
77     , p1_a47  VARCHAR2 := null
78     , p1_a48  VARCHAR2 := null
79     , p1_a49  VARCHAR2 := null
80     , p1_a50  VARCHAR2 := null
81     , p1_a51  DATE := null
82     , p1_a52  DATE := null
83     , p1_a53  VARCHAR2 := null
84     , p1_a54  VARCHAR2 := null
85     , p1_a55  VARCHAR2 := null
86     , p1_a56  VARCHAR2 := null
87     , p1_a57  VARCHAR2 := null
88     , p1_a58  VARCHAR2 := null
89     , p1_a59  VARCHAR2 := null
90     , p1_a60  VARCHAR2 := null
91     , p1_a61  VARCHAR2 := null
92     , p1_a62  VARCHAR2 := null
93     , p1_a63  VARCHAR2 := null
94     , p1_a64  VARCHAR2 := null
95     , p1_a65  VARCHAR2 := null
96     , p1_a66  VARCHAR2 := null
97     , p1_a67  VARCHAR2 := null
98     , p1_a68  VARCHAR2 := null
99     , p1_a69  VARCHAR2 := null
100     , p1_a70  VARCHAR2 := null
101     , p1_a71  VARCHAR2 := null
102     , p1_a72  VARCHAR2 := null
103     , p1_a73  VARCHAR2 := null
104     , p1_a74  VARCHAR2 := null
105     , p1_a75  VARCHAR2 := null
106     , p1_a76  VARCHAR2 := null
107     , p1_a77  NUMBER := null
108     , p1_a78  NUMBER := null
109     , p1_a79  VARCHAR2 := null
110     , p1_a80  VARCHAR2 := null
111     , p1_a81  VARCHAR2 := null
112     , p1_a82  VARCHAR2 := null
113     , p1_a83  VARCHAR2 := null
114     , p1_a84  VARCHAR2 := null
115     , p1_a85  VARCHAR2 := null
116     , p1_a86  VARCHAR2 := null
117     , p1_a87  VARCHAR2 := null
118     , p1_a88  VARCHAR2 := null
119     , p1_a89  VARCHAR2 := null
120     , p1_a90  VARCHAR2 := null
121     , p1_a91  VARCHAR2 := null
122     , p1_a92  VARCHAR2 := null
123     , p1_a93  VARCHAR2 := null
124     , p1_a94  VARCHAR2 := null
125     , p1_a95  VARCHAR2 := null
126     , p1_a96  VARCHAR2 := null
127     , p1_a97  VARCHAR2 := null
128     , p1_a98  VARCHAR2 := null
129     , p1_a99  VARCHAR2 := null
130     , p1_a100  VARCHAR2 := null
131     , p1_a101  VARCHAR2 := null
132     , p1_a102  VARCHAR2 := null
133     , p1_a103  VARCHAR2 := null
134     , p1_a104  VARCHAR2 := null
135     , p1_a105  VARCHAR2 := null
136     , p1_a106  VARCHAR2 := null
137     , p1_a107  VARCHAR2 := null
138     , p1_a108  VARCHAR2 := null
139     , p1_a109  VARCHAR2 := null
140     , p1_a110  VARCHAR2 := null
141     , p1_a111  VARCHAR2 := null
142     , p1_a112  VARCHAR2 := null
143     , p1_a113  VARCHAR2 := null
144     , p1_a114  VARCHAR2 := null
145     , p1_a115  VARCHAR2 := null
146     , p1_a116  VARCHAR2 := null
147     , p1_a117  VARCHAR2 := null
148     , p1_a118  VARCHAR2 := null
149     , p1_a119  VARCHAR2 := null
150     , p1_a120  VARCHAR2 := null
151     , p1_a121  VARCHAR2 := null
152     , p1_a122  VARCHAR2 := null
153     , p1_a123  VARCHAR2 := null
154     , p1_a124  VARCHAR2 := null
155     , p1_a125  VARCHAR2 := null
156     , p1_a126  VARCHAR2 := null
157     , p1_a127  VARCHAR2 := null
158     , p1_a128  VARCHAR2 := null
159     , p1_a129  VARCHAR2 := null
160     , p1_a130  VARCHAR2 := null
161     , p1_a131  VARCHAR2 := null
162     , p1_a132  VARCHAR2 := null
163     , p1_a133  VARCHAR2 := null
164     , p1_a134  VARCHAR2 := null
165     , p1_a135  VARCHAR2 := null
166     , p1_a136  VARCHAR2 := null
167     , p1_a137  VARCHAR2 := null
168     , p1_a138  VARCHAR2 := null
169     , p1_a139  VARCHAR2 := null
170     , p1_a140  VARCHAR2 := null
171     , p1_a141  NUMBER := null
172     , p1_a142  VARCHAR2 := null
173   )
174   as
175     ddp_org_contact_rec hz_party_contact_v2pub.org_contact_rec_type;
176     ddindx binary_integer; indx binary_integer;
177   begin
178 
179     -- copy data to the local IN or IN-OUT args, if any
180 
181     ddp_org_contact_rec.org_contact_id := rosetta_g_miss_num_map(p1_a0);
182     ddp_org_contact_rec.comments := p1_a1;
183     ddp_org_contact_rec.contact_number := p1_a2;
184     ddp_org_contact_rec.department_code := p1_a3;
185     ddp_org_contact_rec.department := p1_a4;
186     ddp_org_contact_rec.title := p1_a5;
187     ddp_org_contact_rec.job_title := p1_a6;
188     ddp_org_contact_rec.decision_maker_flag := p1_a7;
189     ddp_org_contact_rec.job_title_code := p1_a8;
190     ddp_org_contact_rec.reference_use_flag := p1_a9;
191     ddp_org_contact_rec.rank := p1_a10;
192     ddp_org_contact_rec.party_site_id := rosetta_g_miss_num_map(p1_a11);
193     ddp_org_contact_rec.orig_system_reference := p1_a12;
194     ddp_org_contact_rec.orig_system := p1_a13;
195     ddp_org_contact_rec.attribute_category := p1_a14;
196     ddp_org_contact_rec.attribute1 := p1_a15;
197     ddp_org_contact_rec.attribute2 := p1_a16;
198     ddp_org_contact_rec.attribute3 := p1_a17;
199     ddp_org_contact_rec.attribute4 := p1_a18;
200     ddp_org_contact_rec.attribute5 := p1_a19;
201     ddp_org_contact_rec.attribute6 := p1_a20;
202     ddp_org_contact_rec.attribute7 := p1_a21;
203     ddp_org_contact_rec.attribute8 := p1_a22;
204     ddp_org_contact_rec.attribute9 := p1_a23;
205     ddp_org_contact_rec.attribute10 := p1_a24;
206     ddp_org_contact_rec.attribute11 := p1_a25;
207     ddp_org_contact_rec.attribute12 := p1_a26;
208     ddp_org_contact_rec.attribute13 := p1_a27;
209     ddp_org_contact_rec.attribute14 := p1_a28;
210     ddp_org_contact_rec.attribute15 := p1_a29;
211     ddp_org_contact_rec.attribute16 := p1_a30;
212     ddp_org_contact_rec.attribute17 := p1_a31;
213     ddp_org_contact_rec.attribute18 := p1_a32;
214     ddp_org_contact_rec.attribute19 := p1_a33;
215     ddp_org_contact_rec.attribute20 := p1_a34;
216     ddp_org_contact_rec.attribute21 := p1_a35;
217     ddp_org_contact_rec.attribute22 := p1_a36;
218     ddp_org_contact_rec.attribute23 := p1_a37;
219     ddp_org_contact_rec.attribute24 := p1_a38;
220     ddp_org_contact_rec.created_by_module := p1_a39;
221     ddp_org_contact_rec.application_id := rosetta_g_miss_num_map(p1_a40);
222     ddp_org_contact_rec.party_rel_rec.relationship_id := rosetta_g_miss_num_map(p1_a41);
223     ddp_org_contact_rec.party_rel_rec.subject_id := rosetta_g_miss_num_map(p1_a42);
224     ddp_org_contact_rec.party_rel_rec.subject_type := p1_a43;
225     ddp_org_contact_rec.party_rel_rec.subject_table_name := p1_a44;
226     ddp_org_contact_rec.party_rel_rec.object_id := rosetta_g_miss_num_map(p1_a45);
227     ddp_org_contact_rec.party_rel_rec.object_type := p1_a46;
228     ddp_org_contact_rec.party_rel_rec.object_table_name := p1_a47;
229     ddp_org_contact_rec.party_rel_rec.relationship_code := p1_a48;
230     ddp_org_contact_rec.party_rel_rec.relationship_type := p1_a49;
231     ddp_org_contact_rec.party_rel_rec.comments := p1_a50;
232     ddp_org_contact_rec.party_rel_rec.start_date := rosetta_g_miss_date_in_map(p1_a51);
233     ddp_org_contact_rec.party_rel_rec.end_date := rosetta_g_miss_date_in_map(p1_a52);
234     ddp_org_contact_rec.party_rel_rec.status := p1_a53;
235     ddp_org_contact_rec.party_rel_rec.content_source_type := p1_a54;
236     ddp_org_contact_rec.party_rel_rec.attribute_category := p1_a55;
237     ddp_org_contact_rec.party_rel_rec.attribute1 := p1_a56;
238     ddp_org_contact_rec.party_rel_rec.attribute2 := p1_a57;
239     ddp_org_contact_rec.party_rel_rec.attribute3 := p1_a58;
240     ddp_org_contact_rec.party_rel_rec.attribute4 := p1_a59;
241     ddp_org_contact_rec.party_rel_rec.attribute5 := p1_a60;
242     ddp_org_contact_rec.party_rel_rec.attribute6 := p1_a61;
243     ddp_org_contact_rec.party_rel_rec.attribute7 := p1_a62;
244     ddp_org_contact_rec.party_rel_rec.attribute8 := p1_a63;
245     ddp_org_contact_rec.party_rel_rec.attribute9 := p1_a64;
246     ddp_org_contact_rec.party_rel_rec.attribute10 := p1_a65;
247     ddp_org_contact_rec.party_rel_rec.attribute11 := p1_a66;
248     ddp_org_contact_rec.party_rel_rec.attribute12 := p1_a67;
249     ddp_org_contact_rec.party_rel_rec.attribute13 := p1_a68;
250     ddp_org_contact_rec.party_rel_rec.attribute14 := p1_a69;
251     ddp_org_contact_rec.party_rel_rec.attribute15 := p1_a70;
252     ddp_org_contact_rec.party_rel_rec.attribute16 := p1_a71;
253     ddp_org_contact_rec.party_rel_rec.attribute17 := p1_a72;
254     ddp_org_contact_rec.party_rel_rec.attribute18 := p1_a73;
255     ddp_org_contact_rec.party_rel_rec.attribute19 := p1_a74;
256     ddp_org_contact_rec.party_rel_rec.attribute20 := p1_a75;
257     ddp_org_contact_rec.party_rel_rec.created_by_module := p1_a76;
258     ddp_org_contact_rec.party_rel_rec.application_id := rosetta_g_miss_num_map(p1_a77);
259     ddp_org_contact_rec.party_rel_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a78);
260     ddp_org_contact_rec.party_rel_rec.party_rec.party_number := p1_a79;
261     ddp_org_contact_rec.party_rel_rec.party_rec.validated_flag := p1_a80;
262     ddp_org_contact_rec.party_rel_rec.party_rec.orig_system_reference := p1_a81;
263     ddp_org_contact_rec.party_rel_rec.party_rec.orig_system := p1_a82;
264     ddp_org_contact_rec.party_rel_rec.party_rec.status := p1_a83;
265     ddp_org_contact_rec.party_rel_rec.party_rec.category_code := p1_a84;
266     ddp_org_contact_rec.party_rel_rec.party_rec.salutation := p1_a85;
267     ddp_org_contact_rec.party_rel_rec.party_rec.attribute_category := p1_a86;
268     ddp_org_contact_rec.party_rel_rec.party_rec.attribute1 := p1_a87;
269     ddp_org_contact_rec.party_rel_rec.party_rec.attribute2 := p1_a88;
270     ddp_org_contact_rec.party_rel_rec.party_rec.attribute3 := p1_a89;
271     ddp_org_contact_rec.party_rel_rec.party_rec.attribute4 := p1_a90;
272     ddp_org_contact_rec.party_rel_rec.party_rec.attribute5 := p1_a91;
273     ddp_org_contact_rec.party_rel_rec.party_rec.attribute6 := p1_a92;
274     ddp_org_contact_rec.party_rel_rec.party_rec.attribute7 := p1_a93;
275     ddp_org_contact_rec.party_rel_rec.party_rec.attribute8 := p1_a94;
276     ddp_org_contact_rec.party_rel_rec.party_rec.attribute9 := p1_a95;
277     ddp_org_contact_rec.party_rel_rec.party_rec.attribute10 := p1_a96;
278     ddp_org_contact_rec.party_rel_rec.party_rec.attribute11 := p1_a97;
279     ddp_org_contact_rec.party_rel_rec.party_rec.attribute12 := p1_a98;
280     ddp_org_contact_rec.party_rel_rec.party_rec.attribute13 := p1_a99;
281     ddp_org_contact_rec.party_rel_rec.party_rec.attribute14 := p1_a100;
282     ddp_org_contact_rec.party_rel_rec.party_rec.attribute15 := p1_a101;
283     ddp_org_contact_rec.party_rel_rec.party_rec.attribute16 := p1_a102;
284     ddp_org_contact_rec.party_rel_rec.party_rec.attribute17 := p1_a103;
285     ddp_org_contact_rec.party_rel_rec.party_rec.attribute18 := p1_a104;
286     ddp_org_contact_rec.party_rel_rec.party_rec.attribute19 := p1_a105;
287     ddp_org_contact_rec.party_rel_rec.party_rec.attribute20 := p1_a106;
288     ddp_org_contact_rec.party_rel_rec.party_rec.attribute21 := p1_a107;
289     ddp_org_contact_rec.party_rel_rec.party_rec.attribute22 := p1_a108;
290     ddp_org_contact_rec.party_rel_rec.party_rec.attribute23 := p1_a109;
291     ddp_org_contact_rec.party_rel_rec.party_rec.attribute24 := p1_a110;
292     ddp_org_contact_rec.party_rel_rec.additional_information1 := p1_a111;
293     ddp_org_contact_rec.party_rel_rec.additional_information2 := p1_a112;
294     ddp_org_contact_rec.party_rel_rec.additional_information3 := p1_a113;
295     ddp_org_contact_rec.party_rel_rec.additional_information4 := p1_a114;
296     ddp_org_contact_rec.party_rel_rec.additional_information5 := p1_a115;
297     ddp_org_contact_rec.party_rel_rec.additional_information6 := p1_a116;
298     ddp_org_contact_rec.party_rel_rec.additional_information7 := p1_a117;
299     ddp_org_contact_rec.party_rel_rec.additional_information8 := p1_a118;
300     ddp_org_contact_rec.party_rel_rec.additional_information9 := p1_a119;
301     ddp_org_contact_rec.party_rel_rec.additional_information10 := p1_a120;
302     ddp_org_contact_rec.party_rel_rec.additional_information11 := p1_a121;
303     ddp_org_contact_rec.party_rel_rec.additional_information12 := p1_a122;
304     ddp_org_contact_rec.party_rel_rec.additional_information13 := p1_a123;
305     ddp_org_contact_rec.party_rel_rec.additional_information14 := p1_a124;
306     ddp_org_contact_rec.party_rel_rec.additional_information15 := p1_a125;
307     ddp_org_contact_rec.party_rel_rec.additional_information16 := p1_a126;
308     ddp_org_contact_rec.party_rel_rec.additional_information17 := p1_a127;
309     ddp_org_contact_rec.party_rel_rec.additional_information18 := p1_a128;
310     ddp_org_contact_rec.party_rel_rec.additional_information19 := p1_a129;
311     ddp_org_contact_rec.party_rel_rec.additional_information20 := p1_a130;
312     ddp_org_contact_rec.party_rel_rec.additional_information21 := p1_a131;
313     ddp_org_contact_rec.party_rel_rec.additional_information22 := p1_a132;
314     ddp_org_contact_rec.party_rel_rec.additional_information23 := p1_a133;
315     ddp_org_contact_rec.party_rel_rec.additional_information24 := p1_a134;
316     ddp_org_contact_rec.party_rel_rec.additional_information25 := p1_a135;
317     ddp_org_contact_rec.party_rel_rec.additional_information26 := p1_a136;
318     ddp_org_contact_rec.party_rel_rec.additional_information27 := p1_a137;
319     ddp_org_contact_rec.party_rel_rec.additional_information28 := p1_a138;
320     ddp_org_contact_rec.party_rel_rec.additional_information29 := p1_a139;
321     ddp_org_contact_rec.party_rel_rec.additional_information30 := p1_a140;
322     ddp_org_contact_rec.party_rel_rec.percentage_ownership := rosetta_g_miss_num_map(p1_a141);
323     ddp_org_contact_rec.party_rel_rec.actual_content_source := p1_a142;
324 
325 
326 
327 
328 
329 
330 
331 
332     -- here's the delegated call to the old PL/SQL routine
333     hz_party_contact_v2pub.create_org_contact(p_init_msg_list,
334       ddp_org_contact_rec,
335       x_org_contact_id,
336       x_party_rel_id,
337       x_party_id,
338       x_party_number,
339       x_return_status,
340       x_msg_count,
341       x_msg_data);
342 
343     -- copy data back from the local OUT or IN-OUT args, if any
344 
345 
346 
347 
348 
349 
350 
351 
352   end;
353 
354   procedure update_org_contact_2(p_init_msg_list  VARCHAR2
355     , p_cont_object_version_number in out nocopy  NUMBER
356     , p_rel_object_version_number in out nocopy  NUMBER
357     , p_party_object_version_number in out nocopy  NUMBER
358     , x_return_status out nocopy  VARCHAR2
359     , x_msg_count out nocopy  NUMBER
360     , x_msg_data out nocopy  VARCHAR2
361     , p1_a0  NUMBER := null
362     , p1_a1  VARCHAR2 := null
363     , p1_a2  VARCHAR2 := null
364     , p1_a3  VARCHAR2 := null
365     , p1_a4  VARCHAR2 := null
366     , p1_a5  VARCHAR2 := null
367     , p1_a6  VARCHAR2 := null
368     , p1_a7  VARCHAR2 := null
369     , p1_a8  VARCHAR2 := null
370     , p1_a9  VARCHAR2 := null
371     , p1_a10  VARCHAR2 := null
372     , p1_a11  NUMBER := null
373     , p1_a12  VARCHAR2 := null
374     , p1_a13  VARCHAR2 := null
375     , p1_a14  VARCHAR2 := null
376     , p1_a15  VARCHAR2 := null
377     , p1_a16  VARCHAR2 := null
378     , p1_a17  VARCHAR2 := null
379     , p1_a18  VARCHAR2 := null
380     , p1_a19  VARCHAR2 := null
381     , p1_a20  VARCHAR2 := null
382     , p1_a21  VARCHAR2 := null
383     , p1_a22  VARCHAR2 := null
384     , p1_a23  VARCHAR2 := null
385     , p1_a24  VARCHAR2 := null
386     , p1_a25  VARCHAR2 := null
387     , p1_a26  VARCHAR2 := null
388     , p1_a27  VARCHAR2 := null
389     , p1_a28  VARCHAR2 := null
390     , p1_a29  VARCHAR2 := null
391     , p1_a30  VARCHAR2 := null
392     , p1_a31  VARCHAR2 := null
393     , p1_a32  VARCHAR2 := null
394     , p1_a33  VARCHAR2 := null
395     , p1_a34  VARCHAR2 := null
396     , p1_a35  VARCHAR2 := null
397     , p1_a36  VARCHAR2 := null
398     , p1_a37  VARCHAR2 := null
399     , p1_a38  VARCHAR2 := null
400     , p1_a39  VARCHAR2 := null
401     , p1_a40  NUMBER := null
402     , p1_a41  NUMBER := null
403     , p1_a42  NUMBER := null
404     , p1_a43  VARCHAR2 := null
405     , p1_a44  VARCHAR2 := null
406     , p1_a45  NUMBER := null
407     , p1_a46  VARCHAR2 := null
408     , p1_a47  VARCHAR2 := null
409     , p1_a48  VARCHAR2 := null
410     , p1_a49  VARCHAR2 := null
411     , p1_a50  VARCHAR2 := null
412     , p1_a51  DATE := null
413     , p1_a52  DATE := null
414     , p1_a53  VARCHAR2 := null
415     , p1_a54  VARCHAR2 := null
416     , p1_a55  VARCHAR2 := null
417     , p1_a56  VARCHAR2 := null
418     , p1_a57  VARCHAR2 := null
419     , p1_a58  VARCHAR2 := null
420     , p1_a59  VARCHAR2 := null
421     , p1_a60  VARCHAR2 := null
422     , p1_a61  VARCHAR2 := null
423     , p1_a62  VARCHAR2 := null
424     , p1_a63  VARCHAR2 := null
425     , p1_a64  VARCHAR2 := null
426     , p1_a65  VARCHAR2 := null
427     , p1_a66  VARCHAR2 := null
428     , p1_a67  VARCHAR2 := null
429     , p1_a68  VARCHAR2 := null
430     , p1_a69  VARCHAR2 := null
431     , p1_a70  VARCHAR2 := null
432     , p1_a71  VARCHAR2 := null
433     , p1_a72  VARCHAR2 := null
434     , p1_a73  VARCHAR2 := null
435     , p1_a74  VARCHAR2 := null
436     , p1_a75  VARCHAR2 := null
437     , p1_a76  VARCHAR2 := null
438     , p1_a77  NUMBER := null
439     , p1_a78  NUMBER := null
440     , p1_a79  VARCHAR2 := null
441     , p1_a80  VARCHAR2 := null
442     , p1_a81  VARCHAR2 := null
443     , p1_a82  VARCHAR2 := null
444     , p1_a83  VARCHAR2 := null
445     , p1_a84  VARCHAR2 := null
446     , p1_a85  VARCHAR2 := null
447     , p1_a86  VARCHAR2 := null
448     , p1_a87  VARCHAR2 := null
449     , p1_a88  VARCHAR2 := null
450     , p1_a89  VARCHAR2 := null
451     , p1_a90  VARCHAR2 := null
452     , p1_a91  VARCHAR2 := null
453     , p1_a92  VARCHAR2 := null
454     , p1_a93  VARCHAR2 := null
455     , p1_a94  VARCHAR2 := null
456     , p1_a95  VARCHAR2 := null
457     , p1_a96  VARCHAR2 := null
458     , p1_a97  VARCHAR2 := null
459     , p1_a98  VARCHAR2 := null
460     , p1_a99  VARCHAR2 := null
461     , p1_a100  VARCHAR2 := null
462     , p1_a101  VARCHAR2 := null
463     , p1_a102  VARCHAR2 := null
464     , p1_a103  VARCHAR2 := null
465     , p1_a104  VARCHAR2 := null
466     , p1_a105  VARCHAR2 := null
467     , p1_a106  VARCHAR2 := null
468     , p1_a107  VARCHAR2 := null
469     , p1_a108  VARCHAR2 := null
470     , p1_a109  VARCHAR2 := null
471     , p1_a110  VARCHAR2 := null
472     , p1_a111  VARCHAR2 := null
473     , p1_a112  VARCHAR2 := null
474     , p1_a113  VARCHAR2 := null
475     , p1_a114  VARCHAR2 := null
476     , p1_a115  VARCHAR2 := null
477     , p1_a116  VARCHAR2 := null
478     , p1_a117  VARCHAR2 := null
479     , p1_a118  VARCHAR2 := null
480     , p1_a119  VARCHAR2 := null
481     , p1_a120  VARCHAR2 := null
482     , p1_a121  VARCHAR2 := null
483     , p1_a122  VARCHAR2 := null
484     , p1_a123  VARCHAR2 := null
485     , p1_a124  VARCHAR2 := null
486     , p1_a125  VARCHAR2 := null
487     , p1_a126  VARCHAR2 := null
488     , p1_a127  VARCHAR2 := null
489     , p1_a128  VARCHAR2 := null
490     , p1_a129  VARCHAR2 := null
491     , p1_a130  VARCHAR2 := null
492     , p1_a131  VARCHAR2 := null
493     , p1_a132  VARCHAR2 := null
494     , p1_a133  VARCHAR2 := null
495     , p1_a134  VARCHAR2 := null
496     , p1_a135  VARCHAR2 := null
497     , p1_a136  VARCHAR2 := null
498     , p1_a137  VARCHAR2 := null
499     , p1_a138  VARCHAR2 := null
500     , p1_a139  VARCHAR2 := null
501     , p1_a140  VARCHAR2 := null
502     , p1_a141  NUMBER := null
503     , p1_a142  VARCHAR2 := null
504   )
505   as
506     ddp_org_contact_rec hz_party_contact_v2pub.org_contact_rec_type;
507     ddindx binary_integer; indx binary_integer;
508   begin
509 
510     -- copy data to the local IN or IN-OUT args, if any
511 
512     ddp_org_contact_rec.org_contact_id := rosetta_g_miss_num_map(p1_a0);
513     ddp_org_contact_rec.comments := p1_a1;
514     ddp_org_contact_rec.contact_number := p1_a2;
515     ddp_org_contact_rec.department_code := p1_a3;
516     ddp_org_contact_rec.department := p1_a4;
517     ddp_org_contact_rec.title := p1_a5;
518     ddp_org_contact_rec.job_title := p1_a6;
519     ddp_org_contact_rec.decision_maker_flag := p1_a7;
520     ddp_org_contact_rec.job_title_code := p1_a8;
521     ddp_org_contact_rec.reference_use_flag := p1_a9;
522     ddp_org_contact_rec.rank := p1_a10;
523     ddp_org_contact_rec.party_site_id := rosetta_g_miss_num_map(p1_a11);
524     ddp_org_contact_rec.orig_system_reference := p1_a12;
525     ddp_org_contact_rec.orig_system := p1_a13;
526     ddp_org_contact_rec.attribute_category := p1_a14;
527     ddp_org_contact_rec.attribute1 := p1_a15;
528     ddp_org_contact_rec.attribute2 := p1_a16;
529     ddp_org_contact_rec.attribute3 := p1_a17;
530     ddp_org_contact_rec.attribute4 := p1_a18;
531     ddp_org_contact_rec.attribute5 := p1_a19;
532     ddp_org_contact_rec.attribute6 := p1_a20;
533     ddp_org_contact_rec.attribute7 := p1_a21;
534     ddp_org_contact_rec.attribute8 := p1_a22;
535     ddp_org_contact_rec.attribute9 := p1_a23;
536     ddp_org_contact_rec.attribute10 := p1_a24;
537     ddp_org_contact_rec.attribute11 := p1_a25;
538     ddp_org_contact_rec.attribute12 := p1_a26;
539     ddp_org_contact_rec.attribute13 := p1_a27;
540     ddp_org_contact_rec.attribute14 := p1_a28;
541     ddp_org_contact_rec.attribute15 := p1_a29;
542     ddp_org_contact_rec.attribute16 := p1_a30;
543     ddp_org_contact_rec.attribute17 := p1_a31;
544     ddp_org_contact_rec.attribute18 := p1_a32;
545     ddp_org_contact_rec.attribute19 := p1_a33;
546     ddp_org_contact_rec.attribute20 := p1_a34;
547     ddp_org_contact_rec.attribute21 := p1_a35;
548     ddp_org_contact_rec.attribute22 := p1_a36;
549     ddp_org_contact_rec.attribute23 := p1_a37;
550     ddp_org_contact_rec.attribute24 := p1_a38;
551     ddp_org_contact_rec.created_by_module := p1_a39;
552     ddp_org_contact_rec.application_id := rosetta_g_miss_num_map(p1_a40);
553     ddp_org_contact_rec.party_rel_rec.relationship_id := rosetta_g_miss_num_map(p1_a41);
554     ddp_org_contact_rec.party_rel_rec.subject_id := rosetta_g_miss_num_map(p1_a42);
555     ddp_org_contact_rec.party_rel_rec.subject_type := p1_a43;
556     ddp_org_contact_rec.party_rel_rec.subject_table_name := p1_a44;
557     ddp_org_contact_rec.party_rel_rec.object_id := rosetta_g_miss_num_map(p1_a45);
558     ddp_org_contact_rec.party_rel_rec.object_type := p1_a46;
559     ddp_org_contact_rec.party_rel_rec.object_table_name := p1_a47;
560     ddp_org_contact_rec.party_rel_rec.relationship_code := p1_a48;
561     ddp_org_contact_rec.party_rel_rec.relationship_type := p1_a49;
562     ddp_org_contact_rec.party_rel_rec.comments := p1_a50;
563     ddp_org_contact_rec.party_rel_rec.start_date := rosetta_g_miss_date_in_map(p1_a51);
564     ddp_org_contact_rec.party_rel_rec.end_date := rosetta_g_miss_date_in_map(p1_a52);
565     ddp_org_contact_rec.party_rel_rec.status := p1_a53;
566     ddp_org_contact_rec.party_rel_rec.content_source_type := p1_a54;
567     ddp_org_contact_rec.party_rel_rec.attribute_category := p1_a55;
568     ddp_org_contact_rec.party_rel_rec.attribute1 := p1_a56;
569     ddp_org_contact_rec.party_rel_rec.attribute2 := p1_a57;
570     ddp_org_contact_rec.party_rel_rec.attribute3 := p1_a58;
571     ddp_org_contact_rec.party_rel_rec.attribute4 := p1_a59;
572     ddp_org_contact_rec.party_rel_rec.attribute5 := p1_a60;
573     ddp_org_contact_rec.party_rel_rec.attribute6 := p1_a61;
574     ddp_org_contact_rec.party_rel_rec.attribute7 := p1_a62;
575     ddp_org_contact_rec.party_rel_rec.attribute8 := p1_a63;
576     ddp_org_contact_rec.party_rel_rec.attribute9 := p1_a64;
577     ddp_org_contact_rec.party_rel_rec.attribute10 := p1_a65;
578     ddp_org_contact_rec.party_rel_rec.attribute11 := p1_a66;
579     ddp_org_contact_rec.party_rel_rec.attribute12 := p1_a67;
580     ddp_org_contact_rec.party_rel_rec.attribute13 := p1_a68;
581     ddp_org_contact_rec.party_rel_rec.attribute14 := p1_a69;
582     ddp_org_contact_rec.party_rel_rec.attribute15 := p1_a70;
583     ddp_org_contact_rec.party_rel_rec.attribute16 := p1_a71;
584     ddp_org_contact_rec.party_rel_rec.attribute17 := p1_a72;
585     ddp_org_contact_rec.party_rel_rec.attribute18 := p1_a73;
586     ddp_org_contact_rec.party_rel_rec.attribute19 := p1_a74;
587     ddp_org_contact_rec.party_rel_rec.attribute20 := p1_a75;
588     ddp_org_contact_rec.party_rel_rec.created_by_module := p1_a76;
589     ddp_org_contact_rec.party_rel_rec.application_id := rosetta_g_miss_num_map(p1_a77);
590     ddp_org_contact_rec.party_rel_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a78);
591     ddp_org_contact_rec.party_rel_rec.party_rec.party_number := p1_a79;
592     ddp_org_contact_rec.party_rel_rec.party_rec.validated_flag := p1_a80;
593     ddp_org_contact_rec.party_rel_rec.party_rec.orig_system_reference := p1_a81;
594     ddp_org_contact_rec.party_rel_rec.party_rec.orig_system := p1_a82;
595     ddp_org_contact_rec.party_rel_rec.party_rec.status := p1_a83;
596     ddp_org_contact_rec.party_rel_rec.party_rec.category_code := p1_a84;
597     ddp_org_contact_rec.party_rel_rec.party_rec.salutation := p1_a85;
598     ddp_org_contact_rec.party_rel_rec.party_rec.attribute_category := p1_a86;
599     ddp_org_contact_rec.party_rel_rec.party_rec.attribute1 := p1_a87;
600     ddp_org_contact_rec.party_rel_rec.party_rec.attribute2 := p1_a88;
601     ddp_org_contact_rec.party_rel_rec.party_rec.attribute3 := p1_a89;
602     ddp_org_contact_rec.party_rel_rec.party_rec.attribute4 := p1_a90;
603     ddp_org_contact_rec.party_rel_rec.party_rec.attribute5 := p1_a91;
604     ddp_org_contact_rec.party_rel_rec.party_rec.attribute6 := p1_a92;
605     ddp_org_contact_rec.party_rel_rec.party_rec.attribute7 := p1_a93;
606     ddp_org_contact_rec.party_rel_rec.party_rec.attribute8 := p1_a94;
607     ddp_org_contact_rec.party_rel_rec.party_rec.attribute9 := p1_a95;
608     ddp_org_contact_rec.party_rel_rec.party_rec.attribute10 := p1_a96;
609     ddp_org_contact_rec.party_rel_rec.party_rec.attribute11 := p1_a97;
610     ddp_org_contact_rec.party_rel_rec.party_rec.attribute12 := p1_a98;
611     ddp_org_contact_rec.party_rel_rec.party_rec.attribute13 := p1_a99;
612     ddp_org_contact_rec.party_rel_rec.party_rec.attribute14 := p1_a100;
613     ddp_org_contact_rec.party_rel_rec.party_rec.attribute15 := p1_a101;
614     ddp_org_contact_rec.party_rel_rec.party_rec.attribute16 := p1_a102;
615     ddp_org_contact_rec.party_rel_rec.party_rec.attribute17 := p1_a103;
616     ddp_org_contact_rec.party_rel_rec.party_rec.attribute18 := p1_a104;
617     ddp_org_contact_rec.party_rel_rec.party_rec.attribute19 := p1_a105;
618     ddp_org_contact_rec.party_rel_rec.party_rec.attribute20 := p1_a106;
619     ddp_org_contact_rec.party_rel_rec.party_rec.attribute21 := p1_a107;
620     ddp_org_contact_rec.party_rel_rec.party_rec.attribute22 := p1_a108;
621     ddp_org_contact_rec.party_rel_rec.party_rec.attribute23 := p1_a109;
622     ddp_org_contact_rec.party_rel_rec.party_rec.attribute24 := p1_a110;
623     ddp_org_contact_rec.party_rel_rec.additional_information1 := p1_a111;
624     ddp_org_contact_rec.party_rel_rec.additional_information2 := p1_a112;
625     ddp_org_contact_rec.party_rel_rec.additional_information3 := p1_a113;
626     ddp_org_contact_rec.party_rel_rec.additional_information4 := p1_a114;
627     ddp_org_contact_rec.party_rel_rec.additional_information5 := p1_a115;
628     ddp_org_contact_rec.party_rel_rec.additional_information6 := p1_a116;
629     ddp_org_contact_rec.party_rel_rec.additional_information7 := p1_a117;
630     ddp_org_contact_rec.party_rel_rec.additional_information8 := p1_a118;
631     ddp_org_contact_rec.party_rel_rec.additional_information9 := p1_a119;
632     ddp_org_contact_rec.party_rel_rec.additional_information10 := p1_a120;
633     ddp_org_contact_rec.party_rel_rec.additional_information11 := p1_a121;
634     ddp_org_contact_rec.party_rel_rec.additional_information12 := p1_a122;
635     ddp_org_contact_rec.party_rel_rec.additional_information13 := p1_a123;
636     ddp_org_contact_rec.party_rel_rec.additional_information14 := p1_a124;
637     ddp_org_contact_rec.party_rel_rec.additional_information15 := p1_a125;
638     ddp_org_contact_rec.party_rel_rec.additional_information16 := p1_a126;
639     ddp_org_contact_rec.party_rel_rec.additional_information17 := p1_a127;
640     ddp_org_contact_rec.party_rel_rec.additional_information18 := p1_a128;
641     ddp_org_contact_rec.party_rel_rec.additional_information19 := p1_a129;
642     ddp_org_contact_rec.party_rel_rec.additional_information20 := p1_a130;
643     ddp_org_contact_rec.party_rel_rec.additional_information21 := p1_a131;
644     ddp_org_contact_rec.party_rel_rec.additional_information22 := p1_a132;
645     ddp_org_contact_rec.party_rel_rec.additional_information23 := p1_a133;
646     ddp_org_contact_rec.party_rel_rec.additional_information24 := p1_a134;
647     ddp_org_contact_rec.party_rel_rec.additional_information25 := p1_a135;
648     ddp_org_contact_rec.party_rel_rec.additional_information26 := p1_a136;
649     ddp_org_contact_rec.party_rel_rec.additional_information27 := p1_a137;
650     ddp_org_contact_rec.party_rel_rec.additional_information28 := p1_a138;
651     ddp_org_contact_rec.party_rel_rec.additional_information29 := p1_a139;
652     ddp_org_contact_rec.party_rel_rec.additional_information30 := p1_a140;
653     ddp_org_contact_rec.party_rel_rec.percentage_ownership := rosetta_g_miss_num_map(p1_a141);
654     ddp_org_contact_rec.party_rel_rec.actual_content_source := p1_a142;
655 
656 
657 
658 
659 
660 
661 
662     -- here's the delegated call to the old PL/SQL routine
663     hz_party_contact_v2pub.update_org_contact(p_init_msg_list,
664       ddp_org_contact_rec,
665       p_cont_object_version_number,
666       p_rel_object_version_number,
667       p_party_object_version_number,
668       x_return_status,
669       x_msg_count,
670       x_msg_data);
671 
672     -- copy data back from the local OUT or IN-OUT args, if any
673 
674 
675 
676 
677 
678 
679 
680   end;
681 
682   procedure create_org_contact_role_3(p_init_msg_list  VARCHAR2
683     , x_org_contact_role_id out nocopy  NUMBER
684     , x_return_status out nocopy  VARCHAR2
685     , x_msg_count out nocopy  NUMBER
686     , x_msg_data out nocopy  VARCHAR2
687     , p1_a0  NUMBER := null
688     , p1_a1  VARCHAR2 := null
689     , p1_a2  VARCHAR2 := null
690     , p1_a3  NUMBER := null
691     , p1_a4  VARCHAR2 := null
692     , p1_a5  VARCHAR2 := null
693     , p1_a6  VARCHAR2 := null
694     , p1_a7  VARCHAR2 := null
695     , p1_a8  VARCHAR2 := null
696     , p1_a9  VARCHAR2 := null
697     , p1_a10  NUMBER := null
698   )
699   as
700     ddp_org_contact_role_rec hz_party_contact_v2pub.org_contact_role_rec_type;
701     ddindx binary_integer; indx binary_integer;
702   begin
703 
704     -- copy data to the local IN or IN-OUT args, if any
705 
706     ddp_org_contact_role_rec.org_contact_role_id := rosetta_g_miss_num_map(p1_a0);
707     ddp_org_contact_role_rec.role_type := p1_a1;
708     ddp_org_contact_role_rec.primary_flag := p1_a2;
709     ddp_org_contact_role_rec.org_contact_id := rosetta_g_miss_num_map(p1_a3);
710     ddp_org_contact_role_rec.orig_system_reference := p1_a4;
711     ddp_org_contact_role_rec.orig_system := p1_a5;
712     ddp_org_contact_role_rec.role_level := p1_a6;
713     ddp_org_contact_role_rec.primary_contact_per_role_type := p1_a7;
714     ddp_org_contact_role_rec.status := p1_a8;
715     ddp_org_contact_role_rec.created_by_module := p1_a9;
716     ddp_org_contact_role_rec.application_id := rosetta_g_miss_num_map(p1_a10);
717 
718 
719 
720 
721 
722     -- here's the delegated call to the old PL/SQL routine
723     hz_party_contact_v2pub.create_org_contact_role(p_init_msg_list,
724       ddp_org_contact_role_rec,
725       x_org_contact_role_id,
726       x_return_status,
727       x_msg_count,
728       x_msg_data);
729 
730     -- copy data back from the local OUT or IN-OUT args, if any
731 
732 
733 
734 
735 
736   end;
737 
738   procedure update_org_contact_role_4(p_init_msg_list  VARCHAR2
739     , p_object_version_number in out nocopy  NUMBER
740     , x_return_status out nocopy  VARCHAR2
741     , x_msg_count out nocopy  NUMBER
742     , x_msg_data out nocopy  VARCHAR2
743     , p1_a0  NUMBER := null
744     , p1_a1  VARCHAR2 := null
745     , p1_a2  VARCHAR2 := null
746     , p1_a3  NUMBER := null
747     , p1_a4  VARCHAR2 := null
748     , p1_a5  VARCHAR2 := null
749     , p1_a6  VARCHAR2 := null
750     , p1_a7  VARCHAR2 := null
751     , p1_a8  VARCHAR2 := null
752     , p1_a9  VARCHAR2 := null
753     , p1_a10  NUMBER := null
754   )
755   as
756     ddp_org_contact_role_rec hz_party_contact_v2pub.org_contact_role_rec_type;
757     ddindx binary_integer; indx binary_integer;
758   begin
759 
760     -- copy data to the local IN or IN-OUT args, if any
761 
762     ddp_org_contact_role_rec.org_contact_role_id := rosetta_g_miss_num_map(p1_a0);
763     ddp_org_contact_role_rec.role_type := p1_a1;
764     ddp_org_contact_role_rec.primary_flag := p1_a2;
765     ddp_org_contact_role_rec.org_contact_id := rosetta_g_miss_num_map(p1_a3);
766     ddp_org_contact_role_rec.orig_system_reference := p1_a4;
767     ddp_org_contact_role_rec.orig_system := p1_a5;
768     ddp_org_contact_role_rec.role_level := p1_a6;
769     ddp_org_contact_role_rec.primary_contact_per_role_type := p1_a7;
770     ddp_org_contact_role_rec.status := p1_a8;
771     ddp_org_contact_role_rec.created_by_module := p1_a9;
772     ddp_org_contact_role_rec.application_id := rosetta_g_miss_num_map(p1_a10);
773 
774 
775 
776 
777 
778     -- here's the delegated call to the old PL/SQL routine
779     hz_party_contact_v2pub.update_org_contact_role(p_init_msg_list,
780       ddp_org_contact_role_rec,
781       p_object_version_number,
782       x_return_status,
783       x_msg_count,
784       x_msg_data);
785 
786     -- copy data back from the local OUT or IN-OUT args, if any
787 
788 
789 
790 
791 
792   end;
793 
794   procedure get_org_contact_rec_5(p_init_msg_list  VARCHAR2
795     , p_org_contact_id  NUMBER
796     , p2_a0 out nocopy  NUMBER
797     , p2_a1 out nocopy  VARCHAR2
798     , p2_a2 out nocopy  VARCHAR2
799     , p2_a3 out nocopy  VARCHAR2
800     , p2_a4 out nocopy  VARCHAR2
801     , p2_a5 out nocopy  VARCHAR2
802     , p2_a6 out nocopy  VARCHAR2
803     , p2_a7 out nocopy  VARCHAR2
804     , p2_a8 out nocopy  VARCHAR2
805     , p2_a9 out nocopy  VARCHAR2
806     , p2_a10 out nocopy  VARCHAR2
807     , p2_a11 out nocopy  NUMBER
808     , p2_a12 out nocopy  VARCHAR2
809     , p2_a13 out nocopy  VARCHAR2
810     , p2_a14 out nocopy  VARCHAR2
811     , p2_a15 out nocopy  VARCHAR2
812     , p2_a16 out nocopy  VARCHAR2
813     , p2_a17 out nocopy  VARCHAR2
814     , p2_a18 out nocopy  VARCHAR2
815     , p2_a19 out nocopy  VARCHAR2
816     , p2_a20 out nocopy  VARCHAR2
817     , p2_a21 out nocopy  VARCHAR2
818     , p2_a22 out nocopy  VARCHAR2
819     , p2_a23 out nocopy  VARCHAR2
820     , p2_a24 out nocopy  VARCHAR2
821     , p2_a25 out nocopy  VARCHAR2
822     , p2_a26 out nocopy  VARCHAR2
823     , p2_a27 out nocopy  VARCHAR2
824     , p2_a28 out nocopy  VARCHAR2
825     , p2_a29 out nocopy  VARCHAR2
826     , p2_a30 out nocopy  VARCHAR2
827     , p2_a31 out nocopy  VARCHAR2
828     , p2_a32 out nocopy  VARCHAR2
829     , p2_a33 out nocopy  VARCHAR2
830     , p2_a34 out nocopy  VARCHAR2
831     , p2_a35 out nocopy  VARCHAR2
832     , p2_a36 out nocopy  VARCHAR2
833     , p2_a37 out nocopy  VARCHAR2
834     , p2_a38 out nocopy  VARCHAR2
835     , p2_a39 out nocopy  VARCHAR2
836     , p2_a40 out nocopy  NUMBER
837     , p2_a41 out nocopy  NUMBER
838     , p2_a42 out nocopy  NUMBER
839     , p2_a43 out nocopy  VARCHAR2
840     , p2_a44 out nocopy  VARCHAR2
841     , p2_a45 out nocopy  NUMBER
842     , p2_a46 out nocopy  VARCHAR2
843     , p2_a47 out nocopy  VARCHAR2
844     , p2_a48 out nocopy  VARCHAR2
845     , p2_a49 out nocopy  VARCHAR2
846     , p2_a50 out nocopy  VARCHAR2
847     , p2_a51 out nocopy  DATE
848     , p2_a52 out nocopy  DATE
849     , p2_a53 out nocopy  VARCHAR2
850     , p2_a54 out nocopy  VARCHAR2
851     , p2_a55 out nocopy  VARCHAR2
852     , p2_a56 out nocopy  VARCHAR2
853     , p2_a57 out nocopy  VARCHAR2
854     , p2_a58 out nocopy  VARCHAR2
855     , p2_a59 out nocopy  VARCHAR2
856     , p2_a60 out nocopy  VARCHAR2
857     , p2_a61 out nocopy  VARCHAR2
858     , p2_a62 out nocopy  VARCHAR2
859     , p2_a63 out nocopy  VARCHAR2
860     , p2_a64 out nocopy  VARCHAR2
861     , p2_a65 out nocopy  VARCHAR2
862     , p2_a66 out nocopy  VARCHAR2
863     , p2_a67 out nocopy  VARCHAR2
864     , p2_a68 out nocopy  VARCHAR2
865     , p2_a69 out nocopy  VARCHAR2
866     , p2_a70 out nocopy  VARCHAR2
867     , p2_a71 out nocopy  VARCHAR2
868     , p2_a72 out nocopy  VARCHAR2
869     , p2_a73 out nocopy  VARCHAR2
870     , p2_a74 out nocopy  VARCHAR2
871     , p2_a75 out nocopy  VARCHAR2
872     , p2_a76 out nocopy  VARCHAR2
873     , p2_a77 out nocopy  NUMBER
874     , p2_a78 out nocopy  NUMBER
875     , p2_a79 out nocopy  VARCHAR2
876     , p2_a80 out nocopy  VARCHAR2
877     , p2_a81 out nocopy  VARCHAR2
878     , p2_a82 out nocopy  VARCHAR2
879     , p2_a83 out nocopy  VARCHAR2
880     , p2_a84 out nocopy  VARCHAR2
881     , p2_a85 out nocopy  VARCHAR2
882     , p2_a86 out nocopy  VARCHAR2
883     , p2_a87 out nocopy  VARCHAR2
884     , p2_a88 out nocopy  VARCHAR2
885     , p2_a89 out nocopy  VARCHAR2
886     , p2_a90 out nocopy  VARCHAR2
887     , p2_a91 out nocopy  VARCHAR2
888     , p2_a92 out nocopy  VARCHAR2
889     , p2_a93 out nocopy  VARCHAR2
890     , p2_a94 out nocopy  VARCHAR2
891     , p2_a95 out nocopy  VARCHAR2
892     , p2_a96 out nocopy  VARCHAR2
893     , p2_a97 out nocopy  VARCHAR2
894     , p2_a98 out nocopy  VARCHAR2
895     , p2_a99 out nocopy  VARCHAR2
896     , p2_a100 out nocopy  VARCHAR2
897     , p2_a101 out nocopy  VARCHAR2
898     , p2_a102 out nocopy  VARCHAR2
899     , p2_a103 out nocopy  VARCHAR2
900     , p2_a104 out nocopy  VARCHAR2
901     , p2_a105 out nocopy  VARCHAR2
902     , p2_a106 out nocopy  VARCHAR2
903     , p2_a107 out nocopy  VARCHAR2
904     , p2_a108 out nocopy  VARCHAR2
905     , p2_a109 out nocopy  VARCHAR2
906     , p2_a110 out nocopy  VARCHAR2
907     , p2_a111 out nocopy  VARCHAR2
908     , p2_a112 out nocopy  VARCHAR2
909     , p2_a113 out nocopy  VARCHAR2
910     , p2_a114 out nocopy  VARCHAR2
911     , p2_a115 out nocopy  VARCHAR2
912     , p2_a116 out nocopy  VARCHAR2
913     , p2_a117 out nocopy  VARCHAR2
914     , p2_a118 out nocopy  VARCHAR2
915     , p2_a119 out nocopy  VARCHAR2
916     , p2_a120 out nocopy  VARCHAR2
917     , p2_a121 out nocopy  VARCHAR2
918     , p2_a122 out nocopy  VARCHAR2
919     , p2_a123 out nocopy  VARCHAR2
920     , p2_a124 out nocopy  VARCHAR2
921     , p2_a125 out nocopy  VARCHAR2
922     , p2_a126 out nocopy  VARCHAR2
923     , p2_a127 out nocopy  VARCHAR2
924     , p2_a128 out nocopy  VARCHAR2
925     , p2_a129 out nocopy  VARCHAR2
926     , p2_a130 out nocopy  VARCHAR2
927     , p2_a131 out nocopy  VARCHAR2
928     , p2_a132 out nocopy  VARCHAR2
929     , p2_a133 out nocopy  VARCHAR2
930     , p2_a134 out nocopy  VARCHAR2
931     , p2_a135 out nocopy  VARCHAR2
932     , p2_a136 out nocopy  VARCHAR2
933     , p2_a137 out nocopy  VARCHAR2
934     , p2_a138 out nocopy  VARCHAR2
935     , p2_a139 out nocopy  VARCHAR2
936     , p2_a140 out nocopy  VARCHAR2
937     , p2_a141 out nocopy  NUMBER
938     , p2_a142 out nocopy  VARCHAR2
939     , x_return_status out nocopy  VARCHAR2
940     , x_msg_count out nocopy  NUMBER
941     , x_msg_data out nocopy  VARCHAR2
942   )
943   as
944     ddx_org_contact_rec hz_party_contact_v2pub.org_contact_rec_type;
945     ddindx binary_integer; indx binary_integer;
946   begin
947 
948     -- copy data to the local IN or IN-OUT args, if any
949 
950 
951 
952 
953 
954 
955     -- here's the delegated call to the old PL/SQL routine
956     hz_party_contact_v2pub.get_org_contact_rec(p_init_msg_list,
957       p_org_contact_id,
958       ddx_org_contact_rec,
959       x_return_status,
960       x_msg_count,
961       x_msg_data);
962 
963     -- copy data back from the local OUT or IN-OUT args, if any
964 
965 
966     p2_a0 := rosetta_g_miss_num_map(ddx_org_contact_rec.org_contact_id);
967     p2_a1 := ddx_org_contact_rec.comments;
968     p2_a2 := ddx_org_contact_rec.contact_number;
969     p2_a3 := ddx_org_contact_rec.department_code;
970     p2_a4 := ddx_org_contact_rec.department;
971     p2_a5 := ddx_org_contact_rec.title;
972     p2_a6 := ddx_org_contact_rec.job_title;
973     p2_a7 := ddx_org_contact_rec.decision_maker_flag;
974     p2_a8 := ddx_org_contact_rec.job_title_code;
975     p2_a9 := ddx_org_contact_rec.reference_use_flag;
976     p2_a10 := ddx_org_contact_rec.rank;
977     p2_a11 := rosetta_g_miss_num_map(ddx_org_contact_rec.party_site_id);
978     p2_a12 := ddx_org_contact_rec.orig_system_reference;
979     p2_a13 := ddx_org_contact_rec.orig_system;
980     p2_a14 := ddx_org_contact_rec.attribute_category;
981     p2_a15 := ddx_org_contact_rec.attribute1;
982     p2_a16 := ddx_org_contact_rec.attribute2;
983     p2_a17 := ddx_org_contact_rec.attribute3;
984     p2_a18 := ddx_org_contact_rec.attribute4;
985     p2_a19 := ddx_org_contact_rec.attribute5;
986     p2_a20 := ddx_org_contact_rec.attribute6;
987     p2_a21 := ddx_org_contact_rec.attribute7;
988     p2_a22 := ddx_org_contact_rec.attribute8;
989     p2_a23 := ddx_org_contact_rec.attribute9;
990     p2_a24 := ddx_org_contact_rec.attribute10;
991     p2_a25 := ddx_org_contact_rec.attribute11;
992     p2_a26 := ddx_org_contact_rec.attribute12;
993     p2_a27 := ddx_org_contact_rec.attribute13;
994     p2_a28 := ddx_org_contact_rec.attribute14;
995     p2_a29 := ddx_org_contact_rec.attribute15;
996     p2_a30 := ddx_org_contact_rec.attribute16;
997     p2_a31 := ddx_org_contact_rec.attribute17;
998     p2_a32 := ddx_org_contact_rec.attribute18;
999     p2_a33 := ddx_org_contact_rec.attribute19;
1000     p2_a34 := ddx_org_contact_rec.attribute20;
1001     p2_a35 := ddx_org_contact_rec.attribute21;
1002     p2_a36 := ddx_org_contact_rec.attribute22;
1003     p2_a37 := ddx_org_contact_rec.attribute23;
1004     p2_a38 := ddx_org_contact_rec.attribute24;
1005     p2_a39 := ddx_org_contact_rec.created_by_module;
1006     p2_a40 := rosetta_g_miss_num_map(ddx_org_contact_rec.application_id);
1007     p2_a41 := rosetta_g_miss_num_map(ddx_org_contact_rec.party_rel_rec.relationship_id);
1008     p2_a42 := rosetta_g_miss_num_map(ddx_org_contact_rec.party_rel_rec.subject_id);
1009     p2_a43 := ddx_org_contact_rec.party_rel_rec.subject_type;
1010     p2_a44 := ddx_org_contact_rec.party_rel_rec.subject_table_name;
1011     p2_a45 := rosetta_g_miss_num_map(ddx_org_contact_rec.party_rel_rec.object_id);
1012     p2_a46 := ddx_org_contact_rec.party_rel_rec.object_type;
1013     p2_a47 := ddx_org_contact_rec.party_rel_rec.object_table_name;
1014     p2_a48 := ddx_org_contact_rec.party_rel_rec.relationship_code;
1015     p2_a49 := ddx_org_contact_rec.party_rel_rec.relationship_type;
1016     p2_a50 := ddx_org_contact_rec.party_rel_rec.comments;
1017     p2_a51 := ddx_org_contact_rec.party_rel_rec.start_date;
1018     p2_a52 := ddx_org_contact_rec.party_rel_rec.end_date;
1019     p2_a53 := ddx_org_contact_rec.party_rel_rec.status;
1020     p2_a54 := ddx_org_contact_rec.party_rel_rec.content_source_type;
1021     p2_a55 := ddx_org_contact_rec.party_rel_rec.attribute_category;
1022     p2_a56 := ddx_org_contact_rec.party_rel_rec.attribute1;
1023     p2_a57 := ddx_org_contact_rec.party_rel_rec.attribute2;
1024     p2_a58 := ddx_org_contact_rec.party_rel_rec.attribute3;
1025     p2_a59 := ddx_org_contact_rec.party_rel_rec.attribute4;
1026     p2_a60 := ddx_org_contact_rec.party_rel_rec.attribute5;
1027     p2_a61 := ddx_org_contact_rec.party_rel_rec.attribute6;
1028     p2_a62 := ddx_org_contact_rec.party_rel_rec.attribute7;
1029     p2_a63 := ddx_org_contact_rec.party_rel_rec.attribute8;
1030     p2_a64 := ddx_org_contact_rec.party_rel_rec.attribute9;
1031     p2_a65 := ddx_org_contact_rec.party_rel_rec.attribute10;
1032     p2_a66 := ddx_org_contact_rec.party_rel_rec.attribute11;
1033     p2_a67 := ddx_org_contact_rec.party_rel_rec.attribute12;
1034     p2_a68 := ddx_org_contact_rec.party_rel_rec.attribute13;
1035     p2_a69 := ddx_org_contact_rec.party_rel_rec.attribute14;
1036     p2_a70 := ddx_org_contact_rec.party_rel_rec.attribute15;
1037     p2_a71 := ddx_org_contact_rec.party_rel_rec.attribute16;
1038     p2_a72 := ddx_org_contact_rec.party_rel_rec.attribute17;
1039     p2_a73 := ddx_org_contact_rec.party_rel_rec.attribute18;
1040     p2_a74 := ddx_org_contact_rec.party_rel_rec.attribute19;
1041     p2_a75 := ddx_org_contact_rec.party_rel_rec.attribute20;
1042     p2_a76 := ddx_org_contact_rec.party_rel_rec.created_by_module;
1043     p2_a77 := rosetta_g_miss_num_map(ddx_org_contact_rec.party_rel_rec.application_id);
1044     p2_a78 := rosetta_g_miss_num_map(ddx_org_contact_rec.party_rel_rec.party_rec.party_id);
1045     p2_a79 := ddx_org_contact_rec.party_rel_rec.party_rec.party_number;
1046     p2_a80 := ddx_org_contact_rec.party_rel_rec.party_rec.validated_flag;
1047     p2_a81 := ddx_org_contact_rec.party_rel_rec.party_rec.orig_system_reference;
1048     p2_a82 := ddx_org_contact_rec.party_rel_rec.party_rec.orig_system;
1049     p2_a83 := ddx_org_contact_rec.party_rel_rec.party_rec.status;
1050     p2_a84 := ddx_org_contact_rec.party_rel_rec.party_rec.category_code;
1051     p2_a85 := ddx_org_contact_rec.party_rel_rec.party_rec.salutation;
1052     p2_a86 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute_category;
1053     p2_a87 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute1;
1054     p2_a88 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute2;
1055     p2_a89 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute3;
1056     p2_a90 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute4;
1057     p2_a91 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute5;
1058     p2_a92 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute6;
1059     p2_a93 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute7;
1060     p2_a94 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute8;
1061     p2_a95 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute9;
1062     p2_a96 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute10;
1063     p2_a97 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute11;
1064     p2_a98 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute12;
1065     p2_a99 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute13;
1066     p2_a100 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute14;
1067     p2_a101 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute15;
1068     p2_a102 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute16;
1069     p2_a103 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute17;
1070     p2_a104 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute18;
1071     p2_a105 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute19;
1072     p2_a106 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute20;
1073     p2_a107 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute21;
1074     p2_a108 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute22;
1075     p2_a109 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute23;
1076     p2_a110 := ddx_org_contact_rec.party_rel_rec.party_rec.attribute24;
1077     p2_a111 := ddx_org_contact_rec.party_rel_rec.additional_information1;
1078     p2_a112 := ddx_org_contact_rec.party_rel_rec.additional_information2;
1079     p2_a113 := ddx_org_contact_rec.party_rel_rec.additional_information3;
1080     p2_a114 := ddx_org_contact_rec.party_rel_rec.additional_information4;
1081     p2_a115 := ddx_org_contact_rec.party_rel_rec.additional_information5;
1082     p2_a116 := ddx_org_contact_rec.party_rel_rec.additional_information6;
1083     p2_a117 := ddx_org_contact_rec.party_rel_rec.additional_information7;
1084     p2_a118 := ddx_org_contact_rec.party_rel_rec.additional_information8;
1085     p2_a119 := ddx_org_contact_rec.party_rel_rec.additional_information9;
1086     p2_a120 := ddx_org_contact_rec.party_rel_rec.additional_information10;
1087     p2_a121 := ddx_org_contact_rec.party_rel_rec.additional_information11;
1088     p2_a122 := ddx_org_contact_rec.party_rel_rec.additional_information12;
1089     p2_a123 := ddx_org_contact_rec.party_rel_rec.additional_information13;
1090     p2_a124 := ddx_org_contact_rec.party_rel_rec.additional_information14;
1091     p2_a125 := ddx_org_contact_rec.party_rel_rec.additional_information15;
1092     p2_a126 := ddx_org_contact_rec.party_rel_rec.additional_information16;
1093     p2_a127 := ddx_org_contact_rec.party_rel_rec.additional_information17;
1094     p2_a128 := ddx_org_contact_rec.party_rel_rec.additional_information18;
1095     p2_a129 := ddx_org_contact_rec.party_rel_rec.additional_information19;
1096     p2_a130 := ddx_org_contact_rec.party_rel_rec.additional_information20;
1097     p2_a131 := ddx_org_contact_rec.party_rel_rec.additional_information21;
1098     p2_a132 := ddx_org_contact_rec.party_rel_rec.additional_information22;
1099     p2_a133 := ddx_org_contact_rec.party_rel_rec.additional_information23;
1100     p2_a134 := ddx_org_contact_rec.party_rel_rec.additional_information24;
1101     p2_a135 := ddx_org_contact_rec.party_rel_rec.additional_information25;
1102     p2_a136 := ddx_org_contact_rec.party_rel_rec.additional_information26;
1103     p2_a137 := ddx_org_contact_rec.party_rel_rec.additional_information27;
1104     p2_a138 := ddx_org_contact_rec.party_rel_rec.additional_information28;
1105     p2_a139 := ddx_org_contact_rec.party_rel_rec.additional_information29;
1106     p2_a140 := ddx_org_contact_rec.party_rel_rec.additional_information30;
1107     p2_a141 := rosetta_g_miss_num_map(ddx_org_contact_rec.party_rel_rec.percentage_ownership);
1108     p2_a142 := ddx_org_contact_rec.party_rel_rec.actual_content_source;
1109 
1110 
1111 
1112   end;
1113 
1114   procedure get_org_contact_role_rec_6(p_init_msg_list  VARCHAR2
1115     , p_org_contact_role_id  NUMBER
1116     , p2_a0 out nocopy  NUMBER
1117     , p2_a1 out nocopy  VARCHAR2
1118     , p2_a2 out nocopy  VARCHAR2
1119     , p2_a3 out nocopy  NUMBER
1120     , p2_a4 out nocopy  VARCHAR2
1121     , p2_a5 out nocopy  VARCHAR2
1122     , p2_a6 out nocopy  VARCHAR2
1123     , p2_a7 out nocopy  VARCHAR2
1124     , p2_a8 out nocopy  VARCHAR2
1125     , p2_a9 out nocopy  VARCHAR2
1126     , p2_a10 out nocopy  NUMBER
1127     , x_return_status out nocopy  VARCHAR2
1128     , x_msg_count out nocopy  NUMBER
1129     , x_msg_data out nocopy  VARCHAR2
1130   )
1131   as
1132     ddx_org_contact_role_rec hz_party_contact_v2pub.org_contact_role_rec_type;
1133     ddindx binary_integer; indx binary_integer;
1134   begin
1135 
1136     -- copy data to the local IN or IN-OUT args, if any
1137 
1138 
1139 
1140 
1141 
1142 
1143     -- here's the delegated call to the old PL/SQL routine
1144     hz_party_contact_v2pub.get_org_contact_role_rec(p_init_msg_list,
1145       p_org_contact_role_id,
1146       ddx_org_contact_role_rec,
1147       x_return_status,
1148       x_msg_count,
1149       x_msg_data);
1150 
1151     -- copy data back from the local OUT or IN-OUT args, if any
1152 
1153 
1154     p2_a0 := rosetta_g_miss_num_map(ddx_org_contact_role_rec.org_contact_role_id);
1155     p2_a1 := ddx_org_contact_role_rec.role_type;
1156     p2_a2 := ddx_org_contact_role_rec.primary_flag;
1157     p2_a3 := rosetta_g_miss_num_map(ddx_org_contact_role_rec.org_contact_id);
1158     p2_a4 := ddx_org_contact_role_rec.orig_system_reference;
1159     p2_a5 := ddx_org_contact_role_rec.orig_system;
1160     p2_a6 := ddx_org_contact_role_rec.role_level;
1161     p2_a7 := ddx_org_contact_role_rec.primary_contact_per_role_type;
1162     p2_a8 := ddx_org_contact_role_rec.status;
1163     p2_a9 := ddx_org_contact_role_rec.created_by_module;
1164     p2_a10 := rosetta_g_miss_num_map(ddx_org_contact_role_rec.application_id);
1165 
1166 
1167 
1168   end;
1169 
1170 end hz_party_contact_v2pub_jw;