DBA Data[Home] [Help]

PACKAGE BODY: APPS.PV_PARTNER_UTIL_PVT_W

Source


1 package body pv_partner_util_pvt_w as
2   /* $Header: pvxwputb.pls 120.2 2005/11/14 21:04 pinagara ship $ */
3   rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4   rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5 
6   -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7   function rosetta_g_miss_date_in_map(d date) return date as
8   begin
9     if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10     return d;
11   end;
12 
13   procedure create_partner(p_api_version_number  NUMBER
14     , p_init_msg_list  VARCHAR2
15     , p_commit  VARCHAR2
16     , p_validation_level  NUMBER
17     , x_return_status out nocopy  VARCHAR2
18     , x_msg_count out nocopy  NUMBER
19     , x_msg_data out nocopy  VARCHAR2
20     , p7_a0  VARCHAR2
21     , p7_a1  VARCHAR2
22     , p7_a2  VARCHAR2
23     , p7_a3  VARCHAR2
24     , p7_a4  VARCHAR2
25     , p7_a5  VARCHAR2
26     , p7_a6  VARCHAR2
27     , p7_a7  VARCHAR2
28     , p7_a8  NUMBER
29     , p7_a9  NUMBER
30     , p7_a10  VARCHAR2
31     , p7_a11  VARCHAR2
32     , p7_a12  VARCHAR2
33     , p7_a13  VARCHAR2
34     , p7_a14  VARCHAR2
35     , p7_a15  VARCHAR2
36     , p7_a16  VARCHAR2
37     , p7_a17  VARCHAR2
38     , p7_a18  VARCHAR2
39     , p7_a19  VARCHAR2
40     , p7_a20  VARCHAR2
41     , p7_a21  VARCHAR2
42     , p7_a22  VARCHAR2
43     , p7_a23  VARCHAR2
44     , p7_a24  VARCHAR2
45     , p7_a25  VARCHAR2
46     , p7_a26  NUMBER
47     , p7_a27  DATE
48     , p7_a28  VARCHAR2
49     , p7_a29  NUMBER
50     , p7_a30  VARCHAR2
51     , p7_a31  VARCHAR2
52     , p7_a32  VARCHAR2
53     , p7_a33  VARCHAR2
54     , p7_a34  VARCHAR2
55     , p7_a35  VARCHAR2
56     , p7_a36  VARCHAR2
57     , p7_a37  VARCHAR2
58     , p7_a38  VARCHAR2
59     , p7_a39  DATE
60     , p7_a40  DATE
61     , p7_a41  VARCHAR2
62     , p7_a42  VARCHAR2
63     , p7_a43  VARCHAR2
64     , p7_a44  VARCHAR2
65     , p7_a45  VARCHAR2
66     , p7_a46  VARCHAR2
67     , p7_a47  NUMBER
68     , p7_a48  NUMBER
69     , p7_a49  NUMBER
70     , p7_a50  VARCHAR2
71     , p7_a51  VARCHAR2
72     , p7_a52  VARCHAR2
73     , p7_a53  VARCHAR2
74     , p7_a54  VARCHAR2
75     , p7_a55  VARCHAR2
76     , p7_a56  VARCHAR2
77     , p7_a57  VARCHAR2
78     , p7_a58  VARCHAR2
79     , p7_a59  VARCHAR2
80     , p7_a60  VARCHAR2
81     , p7_a61  VARCHAR2
82     , p7_a62  VARCHAR2
83     , p7_a63  VARCHAR2
84     , p7_a64  VARCHAR2
85     , p7_a65  VARCHAR2
86     , p7_a66  VARCHAR2
87     , p7_a67  VARCHAR2
88     , p7_a68  NUMBER
89     , p7_a69  VARCHAR2
90     , p7_a70  VARCHAR2
91     , p7_a71  VARCHAR2
92     , p7_a72  VARCHAR2
93     , p7_a73  VARCHAR2
94     , p7_a74  VARCHAR2
95     , p7_a75  VARCHAR2
96     , p7_a76  VARCHAR2
97     , p7_a77  VARCHAR2
98     , p7_a78  NUMBER
99     , p7_a79  NUMBER
100     , p7_a80  NUMBER
101     , p7_a81  NUMBER
102     , p7_a82  NUMBER
103     , p7_a83  NUMBER
104     , p7_a84  NUMBER
105     , p7_a85  DATE
106     , p7_a86  VARCHAR2
107     , p7_a87  VARCHAR2
108     , p7_a88  VARCHAR2
109     , p7_a89  VARCHAR2
110     , p7_a90  VARCHAR2
111     , p7_a91  VARCHAR2
112     , p7_a92  VARCHAR2
113     , p7_a93  VARCHAR2
114     , p7_a94  VARCHAR2
115     , p7_a95  NUMBER
116     , p7_a96  NUMBER
117     , p7_a97  NUMBER
118     , p7_a98  DATE
119     , p7_a99  VARCHAR2
120     , p7_a100  VARCHAR2
121     , p7_a101  VARCHAR2
122     , p7_a102  VARCHAR2
123     , p7_a103  VARCHAR2
124     , p7_a104  VARCHAR2
125     , p7_a105  VARCHAR2
126     , p7_a106  VARCHAR2
127     , p7_a107  VARCHAR2
128     , p7_a108  NUMBER
129     , p7_a109  VARCHAR2
130     , p7_a110  NUMBER
131     , p7_a111  VARCHAR2
132     , p7_a112  VARCHAR2
133     , p7_a113  VARCHAR2
134     , p7_a114  VARCHAR2
135     , p7_a115  VARCHAR2
136     , p7_a116  VARCHAR2
137     , p7_a117  VARCHAR2
138     , p7_a118  VARCHAR2
139     , p7_a119  VARCHAR2
140     , p7_a120  VARCHAR2
141     , p7_a121  VARCHAR2
142     , p7_a122  VARCHAR2
143     , p7_a123  VARCHAR2
144     , p7_a124  VARCHAR2
145     , p7_a125  VARCHAR2
146     , p7_a126  VARCHAR2
147     , p7_a127  VARCHAR2
148     , p7_a128  VARCHAR2
149     , p7_a129  VARCHAR2
150     , p7_a130  VARCHAR2
151     , p7_a131  VARCHAR2
152     , p7_a132  VARCHAR2
153     , p7_a133  VARCHAR2
154     , p7_a134  VARCHAR2
155     , p7_a135  NUMBER
156     , p7_a136  VARCHAR2
157     , p7_a137  VARCHAR2
158     , p7_a138  NUMBER
159     , p7_a139  VARCHAR2
160     , p7_a140  VARCHAR2
161     , p7_a141  VARCHAR2
162     , p7_a142  VARCHAR2
163     , p7_a143  VARCHAR2
164     , p7_a144  VARCHAR2
165     , p7_a145  VARCHAR2
166     , p7_a146  VARCHAR2
167     , p7_a147  VARCHAR2
168     , p7_a148  VARCHAR2
169     , p7_a149  VARCHAR2
170     , p7_a150  VARCHAR2
171     , p7_a151  VARCHAR2
172     , p7_a152  VARCHAR2
173     , p7_a153  VARCHAR2
174     , p7_a154  VARCHAR2
175     , p7_a155  VARCHAR2
176     , p7_a156  VARCHAR2
177     , p7_a157  VARCHAR2
178     , p7_a158  VARCHAR2
179     , p7_a159  VARCHAR2
180     , p7_a160  VARCHAR2
181     , p7_a161  VARCHAR2
182     , p7_a162  VARCHAR2
183     , p7_a163  VARCHAR2
184     , p7_a164  VARCHAR2
185     , p7_a165  VARCHAR2
186     , p7_a166  VARCHAR2
187     , p7_a167  VARCHAR2
188     , p7_a168  VARCHAR2
189     , p7_a169  VARCHAR2
190     , p7_a170  VARCHAR2
191     , p8_a0  NUMBER
192     , p8_a1  VARCHAR2
193     , p8_a2  VARCHAR2
194     , p8_a3  VARCHAR2
195     , p8_a4  VARCHAR2
196     , p8_a5  VARCHAR2
197     , p8_a6  VARCHAR2
198     , p8_a7  VARCHAR2
199     , p8_a8  VARCHAR2
200     , p8_a9  VARCHAR2
201     , p8_a10  VARCHAR2
202     , p8_a11  VARCHAR2
203     , p8_a12  VARCHAR2
204     , p8_a13  VARCHAR2
205     , p8_a14  VARCHAR2
206     , p8_a15  VARCHAR2
207     , p8_a16  VARCHAR2
208     , p8_a17  VARCHAR2
209     , p8_a18  VARCHAR2
210     , p8_a19  VARCHAR2
211     , p8_a20  VARCHAR2
212     , p8_a21  VARCHAR2
213     , p8_a22  VARCHAR2
214     , p8_a23  VARCHAR2
215     , p8_a24  VARCHAR2
216     , p8_a25  VARCHAR2
217     , p8_a26  VARCHAR2
218     , p8_a27  DATE
219     , p8_a28  DATE
220     , p8_a29  VARCHAR2
221     , p8_a30  VARCHAR2
222     , p8_a31  VARCHAR2
223     , p8_a32  VARCHAR2
224     , p8_a33  VARCHAR2
225     , p8_a34  NUMBER
226     , p8_a35  VARCHAR2
227     , p8_a36  VARCHAR2
228     , p8_a37  NUMBER
229     , p8_a38  VARCHAR2
230     , p8_a39  VARCHAR2
231     , p8_a40  VARCHAR2
232     , p8_a41  VARCHAR2
233     , p8_a42  VARCHAR2
234     , p8_a43  VARCHAR2
235     , p8_a44  VARCHAR2
236     , p8_a45  VARCHAR2
237     , p8_a46  VARCHAR2
238     , p8_a47  VARCHAR2
239     , p8_a48  VARCHAR2
240     , p8_a49  VARCHAR2
241     , p8_a50  VARCHAR2
242     , p8_a51  VARCHAR2
243     , p8_a52  VARCHAR2
244     , p8_a53  VARCHAR2
245     , p8_a54  VARCHAR2
246     , p8_a55  VARCHAR2
247     , p8_a56  VARCHAR2
248     , p8_a57  VARCHAR2
249     , p8_a58  VARCHAR2
250     , p8_a59  VARCHAR2
251     , p8_a60  NUMBER
252     , p8_a61  VARCHAR2
253     , p8_a62  NUMBER
254     , p8_a63  VARCHAR2
255     , p9_a0  NUMBER
256     , p9_a1  NUMBER
257     , p9_a2  NUMBER
258     , p9_a3  VARCHAR2
259     , p9_a4  VARCHAR2
260     , p9_a5  VARCHAR2
261     , p9_a6  VARCHAR2
262     , p9_a7  VARCHAR2
263     , p9_a8  VARCHAR2
264     , p9_a9  VARCHAR2
265     , p9_a10  VARCHAR2
266     , p9_a11  VARCHAR2
267     , p9_a12  VARCHAR2
268     , p9_a13  VARCHAR2
269     , p9_a14  VARCHAR2
270     , p9_a15  VARCHAR2
271     , p9_a16  VARCHAR2
272     , p9_a17  VARCHAR2
273     , p9_a18  VARCHAR2
274     , p9_a19  VARCHAR2
275     , p9_a20  VARCHAR2
276     , p9_a21  VARCHAR2
277     , p9_a22  VARCHAR2
278     , p9_a23  VARCHAR2
279     , p9_a24  VARCHAR2
280     , p9_a25  VARCHAR2
281     , p9_a26  VARCHAR2
282     , p9_a27  VARCHAR2
283     , p9_a28  VARCHAR2
284     , p9_a29  VARCHAR2
285     , p9_a30  VARCHAR2
286     , p9_a31  VARCHAR2
287     , p9_a32  VARCHAR2
288     , p9_a33  VARCHAR2
289     , p9_a34  NUMBER
290     , p9_a35  VARCHAR2
291     , p10_a0 JTF_VARCHAR2_TABLE_2000
292     , p10_a1 JTF_VARCHAR2_TABLE_4000
293     , p_vad_partner_id  NUMBER
294     , p_member_type  VARCHAR2
295     , p_global_partner_id  NUMBER
296     , x_party_id out nocopy  NUMBER
297     , x_default_resp_id out nocopy  NUMBER
298     , x_resp_map_rule_id out nocopy  NUMBER
299     , x_group_id out nocopy  NUMBER
300   )
301 
302   as
303     ddp_organization_rec hz_party_v2pub.organization_rec_type;
304     ddp_location_rec pv_partner_util_pvt.location_rec_type;
305     ddp_party_site_rec hz_party_site_v2pub.party_site_rec_type;
306     ddp_partner_types_tbl pv_enty_attr_value_pub.attr_value_tbl_type;
307     ddindx binary_integer; indx binary_integer;
308   begin
309 
310     -- copy data to the local IN or IN-OUT args, if any
311 
312 
313 
314 
315 
316 
317 
318     ddp_organization_rec.organization_name := p7_a0;
319     ddp_organization_rec.duns_number_c := p7_a1;
320     ddp_organization_rec.enquiry_duns := p7_a2;
321     ddp_organization_rec.ceo_name := p7_a3;
322     ddp_organization_rec.ceo_title := p7_a4;
323     ddp_organization_rec.principal_name := p7_a5;
324     ddp_organization_rec.principal_title := p7_a6;
325     ddp_organization_rec.legal_status := p7_a7;
326     ddp_organization_rec.control_yr := p7_a8;
327     ddp_organization_rec.employees_total := p7_a9;
328     ddp_organization_rec.hq_branch_ind := p7_a10;
329     ddp_organization_rec.branch_flag := p7_a11;
330     ddp_organization_rec.oob_ind := p7_a12;
331     ddp_organization_rec.line_of_business := p7_a13;
332     ddp_organization_rec.cong_dist_code := p7_a14;
333     ddp_organization_rec.sic_code := p7_a15;
334     ddp_organization_rec.import_ind := p7_a16;
335     ddp_organization_rec.export_ind := p7_a17;
336     ddp_organization_rec.labor_surplus_ind := p7_a18;
337     ddp_organization_rec.debarment_ind := p7_a19;
338     ddp_organization_rec.minority_owned_ind := p7_a20;
339     ddp_organization_rec.minority_owned_type := p7_a21;
340     ddp_organization_rec.woman_owned_ind := p7_a22;
341     ddp_organization_rec.disadv_8a_ind := p7_a23;
342     ddp_organization_rec.small_bus_ind := p7_a24;
343     ddp_organization_rec.rent_own_ind := p7_a25;
344     ddp_organization_rec.debarments_count := p7_a26;
345     ddp_organization_rec.debarments_date := rosetta_g_miss_date_in_map(p7_a27);
346     ddp_organization_rec.failure_score := p7_a28;
347     ddp_organization_rec.failure_score_natnl_percentile := p7_a29;
348     ddp_organization_rec.failure_score_override_code := p7_a30;
349     ddp_organization_rec.failure_score_commentary := p7_a31;
350     ddp_organization_rec.global_failure_score := p7_a32;
351     ddp_organization_rec.db_rating := p7_a33;
352     ddp_organization_rec.credit_score := p7_a34;
353     ddp_organization_rec.credit_score_commentary := p7_a35;
354     ddp_organization_rec.paydex_score := p7_a36;
355     ddp_organization_rec.paydex_three_months_ago := p7_a37;
356     ddp_organization_rec.paydex_norm := p7_a38;
357     ddp_organization_rec.best_time_contact_begin := rosetta_g_miss_date_in_map(p7_a39);
358     ddp_organization_rec.best_time_contact_end := rosetta_g_miss_date_in_map(p7_a40);
359     ddp_organization_rec.organization_name_phonetic := p7_a41;
360     ddp_organization_rec.tax_reference := p7_a42;
361     ddp_organization_rec.gsa_indicator_flag := p7_a43;
362     ddp_organization_rec.jgzz_fiscal_code := p7_a44;
363     ddp_organization_rec.analysis_fy := p7_a45;
364     ddp_organization_rec.fiscal_yearend_month := p7_a46;
365     ddp_organization_rec.curr_fy_potential_revenue := p7_a47;
366     ddp_organization_rec.next_fy_potential_revenue := p7_a48;
367     ddp_organization_rec.year_established := p7_a49;
368     ddp_organization_rec.mission_statement := p7_a50;
369     ddp_organization_rec.organization_type := p7_a51;
370     ddp_organization_rec.business_scope := p7_a52;
371     ddp_organization_rec.corporation_class := p7_a53;
372     ddp_organization_rec.known_as := p7_a54;
373     ddp_organization_rec.known_as2 := p7_a55;
374     ddp_organization_rec.known_as3 := p7_a56;
375     ddp_organization_rec.known_as4 := p7_a57;
376     ddp_organization_rec.known_as5 := p7_a58;
377     ddp_organization_rec.local_bus_iden_type := p7_a59;
378     ddp_organization_rec.local_bus_identifier := p7_a60;
379     ddp_organization_rec.pref_functional_currency := p7_a61;
380     ddp_organization_rec.registration_type := p7_a62;
381     ddp_organization_rec.total_employees_text := p7_a63;
382     ddp_organization_rec.total_employees_ind := p7_a64;
383     ddp_organization_rec.total_emp_est_ind := p7_a65;
384     ddp_organization_rec.total_emp_min_ind := p7_a66;
385     ddp_organization_rec.parent_sub_ind := p7_a67;
386     ddp_organization_rec.incorp_year := p7_a68;
387     ddp_organization_rec.sic_code_type := p7_a69;
388     ddp_organization_rec.public_private_ownership_flag := p7_a70;
389     ddp_organization_rec.internal_flag := p7_a71;
390     ddp_organization_rec.local_activity_code_type := p7_a72;
391     ddp_organization_rec.local_activity_code := p7_a73;
392     ddp_organization_rec.emp_at_primary_adr := p7_a74;
393     ddp_organization_rec.emp_at_primary_adr_text := p7_a75;
394     ddp_organization_rec.emp_at_primary_adr_est_ind := p7_a76;
395     ddp_organization_rec.emp_at_primary_adr_min_ind := p7_a77;
396     ddp_organization_rec.high_credit := p7_a78;
397     ddp_organization_rec.avg_high_credit := p7_a79;
398     ddp_organization_rec.total_payments := p7_a80;
399     ddp_organization_rec.credit_score_class := p7_a81;
400     ddp_organization_rec.credit_score_natl_percentile := p7_a82;
401     ddp_organization_rec.credit_score_incd_default := p7_a83;
402     ddp_organization_rec.credit_score_age := p7_a84;
403     ddp_organization_rec.credit_score_date := rosetta_g_miss_date_in_map(p7_a85);
404     ddp_organization_rec.credit_score_commentary2 := p7_a86;
405     ddp_organization_rec.credit_score_commentary3 := p7_a87;
406     ddp_organization_rec.credit_score_commentary4 := p7_a88;
407     ddp_organization_rec.credit_score_commentary5 := p7_a89;
408     ddp_organization_rec.credit_score_commentary6 := p7_a90;
409     ddp_organization_rec.credit_score_commentary7 := p7_a91;
410     ddp_organization_rec.credit_score_commentary8 := p7_a92;
411     ddp_organization_rec.credit_score_commentary9 := p7_a93;
412     ddp_organization_rec.credit_score_commentary10 := p7_a94;
413     ddp_organization_rec.failure_score_class := p7_a95;
414     ddp_organization_rec.failure_score_incd_default := p7_a96;
415     ddp_organization_rec.failure_score_age := p7_a97;
416     ddp_organization_rec.failure_score_date := rosetta_g_miss_date_in_map(p7_a98);
417     ddp_organization_rec.failure_score_commentary2 := p7_a99;
418     ddp_organization_rec.failure_score_commentary3 := p7_a100;
419     ddp_organization_rec.failure_score_commentary4 := p7_a101;
420     ddp_organization_rec.failure_score_commentary5 := p7_a102;
421     ddp_organization_rec.failure_score_commentary6 := p7_a103;
422     ddp_organization_rec.failure_score_commentary7 := p7_a104;
423     ddp_organization_rec.failure_score_commentary8 := p7_a105;
424     ddp_organization_rec.failure_score_commentary9 := p7_a106;
425     ddp_organization_rec.failure_score_commentary10 := p7_a107;
426     ddp_organization_rec.maximum_credit_recommendation := p7_a108;
427     ddp_organization_rec.maximum_credit_currency_code := p7_a109;
428     ddp_organization_rec.displayed_duns_party_id := p7_a110;
429     ddp_organization_rec.content_source_type := p7_a111;
430     ddp_organization_rec.content_source_number := p7_a112;
431     ddp_organization_rec.attribute_category := p7_a113;
432     ddp_organization_rec.attribute1 := p7_a114;
433     ddp_organization_rec.attribute2 := p7_a115;
434     ddp_organization_rec.attribute3 := p7_a116;
435     ddp_organization_rec.attribute4 := p7_a117;
436     ddp_organization_rec.attribute5 := p7_a118;
437     ddp_organization_rec.attribute6 := p7_a119;
438     ddp_organization_rec.attribute7 := p7_a120;
439     ddp_organization_rec.attribute8 := p7_a121;
440     ddp_organization_rec.attribute9 := p7_a122;
441     ddp_organization_rec.attribute10 := p7_a123;
442     ddp_organization_rec.attribute11 := p7_a124;
443     ddp_organization_rec.attribute12 := p7_a125;
444     ddp_organization_rec.attribute13 := p7_a126;
445     ddp_organization_rec.attribute14 := p7_a127;
446     ddp_organization_rec.attribute15 := p7_a128;
447     ddp_organization_rec.attribute16 := p7_a129;
448     ddp_organization_rec.attribute17 := p7_a130;
449     ddp_organization_rec.attribute18 := p7_a131;
450     ddp_organization_rec.attribute19 := p7_a132;
451     ddp_organization_rec.attribute20 := p7_a133;
452     ddp_organization_rec.created_by_module := p7_a134;
453     ddp_organization_rec.application_id := p7_a135;
454     ddp_organization_rec.do_not_confuse_with := p7_a136;
455     ddp_organization_rec.actual_content_source := p7_a137;
456     ddp_organization_rec.party_rec.party_id := p7_a138;
457     ddp_organization_rec.party_rec.party_number := p7_a139;
458     ddp_organization_rec.party_rec.validated_flag := p7_a140;
459     ddp_organization_rec.party_rec.orig_system_reference := p7_a141;
460     ddp_organization_rec.party_rec.orig_system := p7_a142;
461     ddp_organization_rec.party_rec.status := p7_a143;
462     ddp_organization_rec.party_rec.category_code := p7_a144;
463     ddp_organization_rec.party_rec.salutation := p7_a145;
464     ddp_organization_rec.party_rec.attribute_category := p7_a146;
465     ddp_organization_rec.party_rec.attribute1 := p7_a147;
466     ddp_organization_rec.party_rec.attribute2 := p7_a148;
467     ddp_organization_rec.party_rec.attribute3 := p7_a149;
468     ddp_organization_rec.party_rec.attribute4 := p7_a150;
469     ddp_organization_rec.party_rec.attribute5 := p7_a151;
470     ddp_organization_rec.party_rec.attribute6 := p7_a152;
471     ddp_organization_rec.party_rec.attribute7 := p7_a153;
472     ddp_organization_rec.party_rec.attribute8 := p7_a154;
473     ddp_organization_rec.party_rec.attribute9 := p7_a155;
474     ddp_organization_rec.party_rec.attribute10 := p7_a156;
475     ddp_organization_rec.party_rec.attribute11 := p7_a157;
476     ddp_organization_rec.party_rec.attribute12 := p7_a158;
477     ddp_organization_rec.party_rec.attribute13 := p7_a159;
478     ddp_organization_rec.party_rec.attribute14 := p7_a160;
479     ddp_organization_rec.party_rec.attribute15 := p7_a161;
480     ddp_organization_rec.party_rec.attribute16 := p7_a162;
481     ddp_organization_rec.party_rec.attribute17 := p7_a163;
482     ddp_organization_rec.party_rec.attribute18 := p7_a164;
483     ddp_organization_rec.party_rec.attribute19 := p7_a165;
484     ddp_organization_rec.party_rec.attribute20 := p7_a166;
485     ddp_organization_rec.party_rec.attribute21 := p7_a167;
486     ddp_organization_rec.party_rec.attribute22 := p7_a168;
487     ddp_organization_rec.party_rec.attribute23 := p7_a169;
488     ddp_organization_rec.party_rec.attribute24 := p7_a170;
489 
490     ddp_location_rec.location_id := p8_a0;
491     ddp_location_rec.orig_system_reference := p8_a1;
492     ddp_location_rec.orig_system := p8_a2;
493     ddp_location_rec.country := p8_a3;
494     ddp_location_rec.address1 := p8_a4;
495     ddp_location_rec.address2 := p8_a5;
496     ddp_location_rec.address3 := p8_a6;
497     ddp_location_rec.address4 := p8_a7;
498     ddp_location_rec.city := p8_a8;
499     ddp_location_rec.postal_code := p8_a9;
500     ddp_location_rec.state := p8_a10;
501     ddp_location_rec.province := p8_a11;
502     ddp_location_rec.county := p8_a12;
503     ddp_location_rec.address_key := p8_a13;
504     ddp_location_rec.address_style := p8_a14;
505     ddp_location_rec.validated_flag := p8_a15;
506     ddp_location_rec.address_lines_phonetic := p8_a16;
507     ddp_location_rec.po_box_number := p8_a17;
508     ddp_location_rec.house_number := p8_a18;
509     ddp_location_rec.street_suffix := p8_a19;
510     ddp_location_rec.street := p8_a20;
511     ddp_location_rec.street_number := p8_a21;
512     ddp_location_rec.floor := p8_a22;
513     ddp_location_rec.suite := p8_a23;
514     ddp_location_rec.postal_plus4_code := p8_a24;
515     ddp_location_rec.position := p8_a25;
516     ddp_location_rec.location_directions := p8_a26;
517     ddp_location_rec.address_effective_date := rosetta_g_miss_date_in_map(p8_a27);
518     ddp_location_rec.address_expiration_date := rosetta_g_miss_date_in_map(p8_a28);
519     ddp_location_rec.clli_code := p8_a29;
520     ddp_location_rec.language := p8_a30;
521     ddp_location_rec.short_description := p8_a31;
522     ddp_location_rec.description := p8_a32;
523     ddp_location_rec.geometry_status_code := p8_a33;
524     ddp_location_rec.loc_hierarchy_id := p8_a34;
525     ddp_location_rec.sales_tax_geocode := p8_a35;
526     ddp_location_rec.sales_tax_inside_city_limits := p8_a36;
527     ddp_location_rec.fa_location_id := p8_a37;
528     ddp_location_rec.content_source_type := p8_a38;
529     ddp_location_rec.attribute_category := p8_a39;
530     ddp_location_rec.attribute1 := p8_a40;
531     ddp_location_rec.attribute2 := p8_a41;
532     ddp_location_rec.attribute3 := p8_a42;
533     ddp_location_rec.attribute4 := p8_a43;
534     ddp_location_rec.attribute5 := p8_a44;
535     ddp_location_rec.attribute6 := p8_a45;
536     ddp_location_rec.attribute7 := p8_a46;
537     ddp_location_rec.attribute8 := p8_a47;
538     ddp_location_rec.attribute9 := p8_a48;
539     ddp_location_rec.attribute10 := p8_a49;
540     ddp_location_rec.attribute11 := p8_a50;
541     ddp_location_rec.attribute12 := p8_a51;
542     ddp_location_rec.attribute13 := p8_a52;
543     ddp_location_rec.attribute14 := p8_a53;
544     ddp_location_rec.attribute15 := p8_a54;
545     ddp_location_rec.attribute16 := p8_a55;
546     ddp_location_rec.attribute17 := p8_a56;
547     ddp_location_rec.attribute18 := p8_a57;
548     ddp_location_rec.attribute19 := p8_a58;
549     ddp_location_rec.attribute20 := p8_a59;
550     ddp_location_rec.timezone_id := p8_a60;
551     ddp_location_rec.created_by_module := p8_a61;
552     ddp_location_rec.application_id := p8_a62;
553     ddp_location_rec.actual_content_source := p8_a63;
554 
555     ddp_party_site_rec.party_site_id := p9_a0;
556     ddp_party_site_rec.party_id := p9_a1;
557     ddp_party_site_rec.location_id := p9_a2;
558     ddp_party_site_rec.party_site_number := p9_a3;
559     ddp_party_site_rec.orig_system_reference := p9_a4;
560     ddp_party_site_rec.orig_system := p9_a5;
561     ddp_party_site_rec.mailstop := p9_a6;
562     ddp_party_site_rec.identifying_address_flag := p9_a7;
563     ddp_party_site_rec.status := p9_a8;
564     ddp_party_site_rec.party_site_name := p9_a9;
565     ddp_party_site_rec.attribute_category := p9_a10;
566     ddp_party_site_rec.attribute1 := p9_a11;
567     ddp_party_site_rec.attribute2 := p9_a12;
568     ddp_party_site_rec.attribute3 := p9_a13;
569     ddp_party_site_rec.attribute4 := p9_a14;
570     ddp_party_site_rec.attribute5 := p9_a15;
571     ddp_party_site_rec.attribute6 := p9_a16;
572     ddp_party_site_rec.attribute7 := p9_a17;
573     ddp_party_site_rec.attribute8 := p9_a18;
574     ddp_party_site_rec.attribute9 := p9_a19;
575     ddp_party_site_rec.attribute10 := p9_a20;
576     ddp_party_site_rec.attribute11 := p9_a21;
577     ddp_party_site_rec.attribute12 := p9_a22;
578     ddp_party_site_rec.attribute13 := p9_a23;
579     ddp_party_site_rec.attribute14 := p9_a24;
580     ddp_party_site_rec.attribute15 := p9_a25;
581     ddp_party_site_rec.attribute16 := p9_a26;
582     ddp_party_site_rec.attribute17 := p9_a27;
583     ddp_party_site_rec.attribute18 := p9_a28;
584     ddp_party_site_rec.attribute19 := p9_a29;
585     ddp_party_site_rec.attribute20 := p9_a30;
586     ddp_party_site_rec.language := p9_a31;
587     ddp_party_site_rec.addressee := p9_a32;
588     ddp_party_site_rec.created_by_module := p9_a33;
589     ddp_party_site_rec.application_id := p9_a34;
590     ddp_party_site_rec.global_location_number := p9_a35;
591 
592     pv_enty_attr_value_pub_w.rosetta_table_copy_in_p2(ddp_partner_types_tbl, p10_a0
593       , p10_a1
594       );
595 
596 
597 
598 
599 
600 
601 
602 
603     -- here's the delegated call to the old PL/SQL routine
604     pv_partner_util_pvt.create_partner(p_api_version_number,
605       p_init_msg_list,
606       p_commit,
607       p_validation_level,
608       x_return_status,
609       x_msg_count,
610       x_msg_data,
611       ddp_organization_rec,
612       ddp_location_rec,
613       ddp_party_site_rec,
614       ddp_partner_types_tbl,
615       p_vad_partner_id,
616       p_member_type,
617       p_global_partner_id,
618       x_party_id,
619       x_default_resp_id,
620       x_resp_map_rule_id,
621       x_group_id);
622 
623     -- copy data back from the local variables to OUT or IN-OUT args, if any
624 
625 
626 
627 
628 
629 
630 
631 
632 
633 
634 
635 
636 
637 
638 
639 
640 
641   end;
642 
643   procedure create_relationship(p_api_version_number  NUMBER
644     , p_init_msg_list  VARCHAR2
645     , p_commit  VARCHAR2
646     , p_validation_level  NUMBER
647     , x_return_status out nocopy  VARCHAR2
648     , x_msg_data out nocopy  VARCHAR2
649     , x_msg_count out nocopy  NUMBER
650     , p_party_id  NUMBER
651     , p8_a0 JTF_VARCHAR2_TABLE_2000
652     , p8_a1 JTF_VARCHAR2_TABLE_4000
653     , p_vad_partner_id  NUMBER
654     , p_member_type  VARCHAR2
655     , p_global_partner_id  NUMBER
656     , x_partner_id out nocopy  NUMBER
657     , x_default_resp_id out nocopy  NUMBER
658     , x_resp_map_rule_id out nocopy  NUMBER
659     , x_group_id out nocopy  NUMBER
660   )
661 
662   as
663     ddp_partner_types_tbl pv_enty_attr_value_pub.attr_value_tbl_type;
664     ddindx binary_integer; indx binary_integer;
665   begin
666 
667     -- copy data to the local IN or IN-OUT args, if any
668 
669 
670 
671 
672 
673 
674 
675 
676     pv_enty_attr_value_pub_w.rosetta_table_copy_in_p2(ddp_partner_types_tbl, p8_a0
677       , p8_a1
678       );
679 
680 
681 
682 
683 
684 
685 
686 
687     -- here's the delegated call to the old PL/SQL routine
688     pv_partner_util_pvt.create_relationship(p_api_version_number,
689       p_init_msg_list,
690       p_commit,
691       p_validation_level,
692       x_return_status,
693       x_msg_data,
694       x_msg_count,
695       p_party_id,
696       ddp_partner_types_tbl,
697       p_vad_partner_id,
698       p_member_type,
699       p_global_partner_id,
700       x_partner_id,
701       x_default_resp_id,
702       x_resp_map_rule_id,
703       x_group_id);
704 
705     -- copy data back from the local variables to OUT or IN-OUT args, if any
706 
707 
708 
709 
710 
711 
712 
713 
714 
715 
716 
717 
718 
719 
720 
721   end;
722 
723   procedure do_create_relationship(p_api_version_number  NUMBER
724     , p_init_msg_list  VARCHAR2
725     , p_commit  VARCHAR2
726     , p_validation_level  NUMBER
727     , x_return_status out nocopy  VARCHAR2
728     , x_msg_data out nocopy  VARCHAR2
729     , x_msg_count out nocopy  NUMBER
730     , p_party_id  NUMBER
731     , p8_a0 JTF_VARCHAR2_TABLE_2000
732     , p8_a1 JTF_VARCHAR2_TABLE_4000
733     , p_vad_partner_id  NUMBER
734     , p_member_type  VARCHAR2
735     , p_global_partner_id  NUMBER
736     , p12_a0 JTF_VARCHAR2_TABLE_400
737     , p12_a1 JTF_NUMBER_TABLE
738     , p12_a2 JTF_NUMBER_TABLE
739     , p12_a3 JTF_VARCHAR2_TABLE_100
740     , p12_a4 JTF_VARCHAR2_TABLE_100
741     , p12_a5 JTF_VARCHAR2_TABLE_100
742     , p12_a6 JTF_VARCHAR2_TABLE_100
743     , p12_a7 JTF_VARCHAR2_TABLE_100
744     , p12_a8 JTF_VARCHAR2_TABLE_100
745     , p12_a9 JTF_VARCHAR2_TABLE_100
746     , p12_a10 JTF_NUMBER_TABLE
747     , p12_a11 JTF_NUMBER_TABLE
748     , p12_a12 JTF_VARCHAR2_TABLE_100
749     , p12_a13 JTF_VARCHAR2_TABLE_500
750     , p12_a14 JTF_VARCHAR2_TABLE_100
751     , x_partner_id out nocopy  NUMBER
752     , x_default_resp_id out nocopy  NUMBER
753     , x_resp_map_rule_id out nocopy  NUMBER
754     , x_group_id out nocopy  NUMBER
755   )
756 
757   as
758     ddp_partner_types_tbl pv_enty_attr_value_pub.attr_value_tbl_type;
759     ddp_partner_qualifiers_tbl pv_terr_assign_pub.partner_qualifiers_tbl_type;
760     ddindx binary_integer; indx binary_integer;
761   begin
762 
763     -- copy data to the local IN or IN-OUT args, if any
764 
765 
766 
767 
768 
769 
770 
771 
772     pv_enty_attr_value_pub_w.rosetta_table_copy_in_p2(ddp_partner_types_tbl, p8_a0
773       , p8_a1
774       );
775 
776 
777 
778 
779     pv_terr_assign_pub_w.rosetta_table_copy_in_p15(ddp_partner_qualifiers_tbl, p12_a0
780       , p12_a1
781       , p12_a2
782       , p12_a3
783       , p12_a4
784       , p12_a5
785       , p12_a6
786       , p12_a7
787       , p12_a8
788       , p12_a9
789       , p12_a10
790       , p12_a11
791       , p12_a12
792       , p12_a13
793       , p12_a14
794       );
795 
796 
797 
798 
799 
800     -- here's the delegated call to the old PL/SQL routine
801     pv_partner_util_pvt.do_create_relationship(p_api_version_number,
802       p_init_msg_list,
803       p_commit,
804       p_validation_level,
805       x_return_status,
806       x_msg_data,
807       x_msg_count,
808       p_party_id,
809       ddp_partner_types_tbl,
810       p_vad_partner_id,
811       p_member_type,
812       p_global_partner_id,
813       ddp_partner_qualifiers_tbl,
814       x_partner_id,
815       x_default_resp_id,
816       x_resp_map_rule_id,
817       x_group_id);
818 
819     -- copy data back from the local variables to OUT or IN-OUT args, if any
820 
821 
822 
823 
824 
825 
826 
827 
828 
829 
830 
831 
832 
833 
834 
835 
836   end;
837 
838   procedure invite_partner(p_api_version_number  NUMBER
839     , p_init_msg_list  VARCHAR2
840     , p_commit  VARCHAR2
841     , p_validation_level  NUMBER
842     , x_return_status out nocopy  VARCHAR2
843     , x_msg_data out nocopy  VARCHAR2
844     , x_msg_count out nocopy  NUMBER
845     , p_party_id  NUMBER
846     , p8_a0 JTF_VARCHAR2_TABLE_400
847     , p8_a1 JTF_NUMBER_TABLE
848     , p8_a2 JTF_NUMBER_TABLE
849     , p8_a3 JTF_VARCHAR2_TABLE_100
850     , p8_a4 JTF_VARCHAR2_TABLE_100
851     , p8_a5 JTF_VARCHAR2_TABLE_100
852     , p8_a6 JTF_VARCHAR2_TABLE_100
853     , p8_a7 JTF_VARCHAR2_TABLE_100
854     , p8_a8 JTF_VARCHAR2_TABLE_100
855     , p8_a9 JTF_VARCHAR2_TABLE_100
856     , p8_a10 JTF_NUMBER_TABLE
857     , p8_a11 JTF_NUMBER_TABLE
858     , p8_a12 JTF_VARCHAR2_TABLE_100
859     , p8_a13 JTF_VARCHAR2_TABLE_500
860     , p8_a14 JTF_VARCHAR2_TABLE_100
861     , p9_a0 JTF_VARCHAR2_TABLE_2000
862     , p9_a1 JTF_VARCHAR2_TABLE_4000
863     , p_vad_partner_id  NUMBER
864     , p11_a0  VARCHAR2
865     , p11_a1  VARCHAR2
866     , p11_a2  VARCHAR2
867     , p11_a3  VARCHAR2
868     , p11_a4  VARCHAR2
869     , p11_a5  VARCHAR2
870     , p11_a6  VARCHAR2
871     , p11_a7  VARCHAR2
872     , p11_a8  VARCHAR2
873     , p11_a9  VARCHAR2
874     , p11_a10  VARCHAR2
875     , p11_a11  VARCHAR2
876     , p11_a12  VARCHAR2
877     , p11_a13  VARCHAR2
878     , p11_a14  VARCHAR2
879     , p11_a15  VARCHAR2
880     , p11_a16  VARCHAR2
881     , p11_a17  VARCHAR2
882     , p11_a18  VARCHAR2
883     , p11_a19  VARCHAR2
884     , p11_a20  VARCHAR2
885     , p11_a21  VARCHAR2
886     , p11_a22  DATE
887     , p11_a23  VARCHAR2
888     , p11_a24  DATE
889     , p11_a25  VARCHAR2
890     , p11_a26  VARCHAR2
891     , p11_a27  VARCHAR2
892     , p11_a28  VARCHAR2
893     , p11_a29  DATE
894     , p11_a30  NUMBER
895     , p11_a31  VARCHAR2
896     , p11_a32  NUMBER
897     , p11_a33  NUMBER
898     , p11_a34  VARCHAR2
899     , p11_a35  VARCHAR2
900     , p11_a36  VARCHAR2
901     , p11_a37  VARCHAR2
902     , p11_a38  VARCHAR2
903     , p11_a39  VARCHAR2
904     , p11_a40  VARCHAR2
905     , p11_a41  VARCHAR2
906     , p11_a42  VARCHAR2
907     , p11_a43  VARCHAR2
908     , p11_a44  VARCHAR2
909     , p11_a45  VARCHAR2
910     , p11_a46  VARCHAR2
911     , p11_a47  VARCHAR2
912     , p11_a48  VARCHAR2
913     , p11_a49  VARCHAR2
914     , p11_a50  VARCHAR2
915     , p11_a51  VARCHAR2
916     , p11_a52  VARCHAR2
917     , p11_a53  VARCHAR2
918     , p11_a54  VARCHAR2
919     , p11_a55  VARCHAR2
920     , p11_a56  VARCHAR2
921     , p11_a57  VARCHAR2
922     , p11_a58  VARCHAR2
923     , p11_a59  VARCHAR2
924     , p11_a60  NUMBER
925     , p11_a61  VARCHAR2
926     , p11_a62  NUMBER
927     , p11_a63  VARCHAR2
928     , p11_a64  VARCHAR2
929     , p11_a65  VARCHAR2
930     , p11_a66  VARCHAR2
931     , p11_a67  VARCHAR2
932     , p11_a68  VARCHAR2
933     , p11_a69  VARCHAR2
934     , p11_a70  VARCHAR2
935     , p11_a71  VARCHAR2
936     , p11_a72  VARCHAR2
937     , p11_a73  VARCHAR2
938     , p11_a74  VARCHAR2
939     , p11_a75  VARCHAR2
940     , p11_a76  VARCHAR2
941     , p11_a77  VARCHAR2
942     , p11_a78  VARCHAR2
943     , p11_a79  VARCHAR2
944     , p11_a80  VARCHAR2
945     , p11_a81  VARCHAR2
946     , p11_a82  VARCHAR2
947     , p11_a83  VARCHAR2
948     , p11_a84  VARCHAR2
949     , p11_a85  VARCHAR2
950     , p11_a86  VARCHAR2
951     , p11_a87  VARCHAR2
952     , p11_a88  VARCHAR2
953     , p11_a89  VARCHAR2
954     , p11_a90  VARCHAR2
955     , p11_a91  VARCHAR2
956     , p11_a92  VARCHAR2
957     , p11_a93  VARCHAR2
958     , p11_a94  VARCHAR2
959     , p12_a0  VARCHAR2
960     , p12_a1  DATE
961     , p12_a2  NUMBER
962     , p12_a3  VARCHAR2
963     , p12_a4  VARCHAR2
964     , p12_a5  VARCHAR2
965     , p12_a6  VARCHAR2
966     , p12_a7  VARCHAR2
967     , p12_a8  VARCHAR2
968     , p13_a0  VARCHAR2
969     , p13_a1  VARCHAR2
970     , p_member_type  VARCHAR2
971     , p_global_partner_id  NUMBER
972     , x_partner_party_id out nocopy  NUMBER
973     , x_partner_id out nocopy  NUMBER
974     , x_cnt_party_id out nocopy  NUMBER
975     , x_cnt_partner_id out nocopy  NUMBER
976     , x_cnt_rel_start_date out nocopy  DATE
977     , x_default_resp_id out nocopy  NUMBER
978     , x_resp_map_rule_id out nocopy  NUMBER
979     , x_group_id out nocopy  NUMBER
980   )
981 
982   as
983     ddp_partner_qualifiers_tbl pv_terr_assign_pub.partner_qualifiers_tbl_type;
984     ddp_partner_types_tbl pv_enty_attr_value_pub.attr_value_tbl_type;
985     ddp_person_rec pv_partner_util_pvt.person_rec_type;
986     ddp_phone_rec hz_contact_point_v2pub.phone_rec_type;
987     ddp_email_rec hz_contact_point_v2pub.email_rec_type;
988     ddindx binary_integer; indx binary_integer;
989   begin
990 
991     -- copy data to the local IN or IN-OUT args, if any
992 
993 
994 
995 
996 
997 
998 
999 
1000     pv_terr_assign_pub_w.rosetta_table_copy_in_p15(ddp_partner_qualifiers_tbl, p8_a0
1001       , p8_a1
1002       , p8_a2
1003       , p8_a3
1004       , p8_a4
1005       , p8_a5
1006       , p8_a6
1007       , p8_a7
1008       , p8_a8
1009       , p8_a9
1010       , p8_a10
1011       , p8_a11
1012       , p8_a12
1013       , p8_a13
1014       , p8_a14
1015       );
1016 
1017     pv_enty_attr_value_pub_w.rosetta_table_copy_in_p2(ddp_partner_types_tbl, p9_a0
1018       , p9_a1
1019       );
1020 
1021 
1022     ddp_person_rec.person_pre_name_adjunct := p11_a0;
1023     ddp_person_rec.person_first_name := p11_a1;
1024     ddp_person_rec.person_middle_name := p11_a2;
1025     ddp_person_rec.person_last_name := p11_a3;
1026     ddp_person_rec.person_name_suffix := p11_a4;
1027     ddp_person_rec.person_title := p11_a5;
1028     ddp_person_rec.person_academic_title := p11_a6;
1029     ddp_person_rec.person_previous_last_name := p11_a7;
1030     ddp_person_rec.person_initials := p11_a8;
1031     ddp_person_rec.known_as := p11_a9;
1032     ddp_person_rec.known_as2 := p11_a10;
1033     ddp_person_rec.known_as3 := p11_a11;
1034     ddp_person_rec.known_as4 := p11_a12;
1035     ddp_person_rec.known_as5 := p11_a13;
1036     ddp_person_rec.person_name_phonetic := p11_a14;
1037     ddp_person_rec.person_first_name_phonetic := p11_a15;
1038     ddp_person_rec.person_last_name_phonetic := p11_a16;
1039     ddp_person_rec.middle_name_phonetic := p11_a17;
1040     ddp_person_rec.tax_reference := p11_a18;
1041     ddp_person_rec.jgzz_fiscal_code := p11_a19;
1042     ddp_person_rec.person_iden_type := p11_a20;
1043     ddp_person_rec.person_identifier := p11_a21;
1044     ddp_person_rec.date_of_birth := rosetta_g_miss_date_in_map(p11_a22);
1045     ddp_person_rec.place_of_birth := p11_a23;
1046     ddp_person_rec.date_of_death := rosetta_g_miss_date_in_map(p11_a24);
1047     ddp_person_rec.deceased_flag := p11_a25;
1048     ddp_person_rec.gender := p11_a26;
1049     ddp_person_rec.declared_ethnicity := p11_a27;
1050     ddp_person_rec.marital_status := p11_a28;
1051     ddp_person_rec.marital_status_effective_date := rosetta_g_miss_date_in_map(p11_a29);
1052     ddp_person_rec.personal_income := p11_a30;
1053     ddp_person_rec.head_of_household_flag := p11_a31;
1054     ddp_person_rec.household_income := p11_a32;
1055     ddp_person_rec.household_size := p11_a33;
1056     ddp_person_rec.rent_own_ind := p11_a34;
1057     ddp_person_rec.last_known_gps := p11_a35;
1058     ddp_person_rec.content_source_type := p11_a36;
1059     ddp_person_rec.internal_flag := p11_a37;
1060     ddp_person_rec.attribute_category := p11_a38;
1061     ddp_person_rec.attribute1 := p11_a39;
1062     ddp_person_rec.attribute2 := p11_a40;
1063     ddp_person_rec.attribute3 := p11_a41;
1064     ddp_person_rec.attribute4 := p11_a42;
1065     ddp_person_rec.attribute5 := p11_a43;
1066     ddp_person_rec.attribute6 := p11_a44;
1067     ddp_person_rec.attribute7 := p11_a45;
1068     ddp_person_rec.attribute8 := p11_a46;
1069     ddp_person_rec.attribute9 := p11_a47;
1070     ddp_person_rec.attribute10 := p11_a48;
1071     ddp_person_rec.attribute11 := p11_a49;
1072     ddp_person_rec.attribute12 := p11_a50;
1073     ddp_person_rec.attribute13 := p11_a51;
1074     ddp_person_rec.attribute14 := p11_a52;
1075     ddp_person_rec.attribute15 := p11_a53;
1076     ddp_person_rec.attribute16 := p11_a54;
1077     ddp_person_rec.attribute17 := p11_a55;
1078     ddp_person_rec.attribute18 := p11_a56;
1079     ddp_person_rec.attribute19 := p11_a57;
1080     ddp_person_rec.attribute20 := p11_a58;
1081     ddp_person_rec.created_by_module := p11_a59;
1082     ddp_person_rec.application_id := p11_a60;
1083     ddp_person_rec.actual_content_source := p11_a61;
1084     ddp_person_rec.party_rec.party_id := p11_a62;
1085     ddp_person_rec.party_rec.party_number := p11_a63;
1086     ddp_person_rec.party_rec.validated_flag := p11_a64;
1087     ddp_person_rec.party_rec.orig_system_reference := p11_a65;
1088     ddp_person_rec.party_rec.orig_system := p11_a66;
1089     ddp_person_rec.party_rec.status := p11_a67;
1090     ddp_person_rec.party_rec.category_code := p11_a68;
1091     ddp_person_rec.party_rec.salutation := p11_a69;
1092     ddp_person_rec.party_rec.attribute_category := p11_a70;
1093     ddp_person_rec.party_rec.attribute1 := p11_a71;
1094     ddp_person_rec.party_rec.attribute2 := p11_a72;
1095     ddp_person_rec.party_rec.attribute3 := p11_a73;
1096     ddp_person_rec.party_rec.attribute4 := p11_a74;
1097     ddp_person_rec.party_rec.attribute5 := p11_a75;
1098     ddp_person_rec.party_rec.attribute6 := p11_a76;
1099     ddp_person_rec.party_rec.attribute7 := p11_a77;
1100     ddp_person_rec.party_rec.attribute8 := p11_a78;
1101     ddp_person_rec.party_rec.attribute9 := p11_a79;
1102     ddp_person_rec.party_rec.attribute10 := p11_a80;
1103     ddp_person_rec.party_rec.attribute11 := p11_a81;
1104     ddp_person_rec.party_rec.attribute12 := p11_a82;
1105     ddp_person_rec.party_rec.attribute13 := p11_a83;
1106     ddp_person_rec.party_rec.attribute14 := p11_a84;
1107     ddp_person_rec.party_rec.attribute15 := p11_a85;
1108     ddp_person_rec.party_rec.attribute16 := p11_a86;
1109     ddp_person_rec.party_rec.attribute17 := p11_a87;
1110     ddp_person_rec.party_rec.attribute18 := p11_a88;
1111     ddp_person_rec.party_rec.attribute19 := p11_a89;
1112     ddp_person_rec.party_rec.attribute20 := p11_a90;
1113     ddp_person_rec.party_rec.attribute21 := p11_a91;
1114     ddp_person_rec.party_rec.attribute22 := p11_a92;
1115     ddp_person_rec.party_rec.attribute23 := p11_a93;
1116     ddp_person_rec.party_rec.attribute24 := p11_a94;
1117 
1118     ddp_phone_rec.phone_calling_calendar := p12_a0;
1119     ddp_phone_rec.last_contact_dt_time := rosetta_g_miss_date_in_map(p12_a1);
1120     ddp_phone_rec.timezone_id := p12_a2;
1121     ddp_phone_rec.phone_area_code := p12_a3;
1122     ddp_phone_rec.phone_country_code := p12_a4;
1123     ddp_phone_rec.phone_number := p12_a5;
1124     ddp_phone_rec.phone_extension := p12_a6;
1125     ddp_phone_rec.phone_line_type := p12_a7;
1126     ddp_phone_rec.raw_phone_number := p12_a8;
1127 
1128     ddp_email_rec.email_format := p13_a0;
1129     ddp_email_rec.email_address := p13_a1;
1130 
1131 
1132 
1133 
1134 
1135 
1136 
1137 
1138 
1139 
1140 
1141     -- here's the delegated call to the old PL/SQL routine
1142     pv_partner_util_pvt.invite_partner(p_api_version_number,
1143       p_init_msg_list,
1144       p_commit,
1145       p_validation_level,
1146       x_return_status,
1147       x_msg_data,
1148       x_msg_count,
1149       p_party_id,
1150       ddp_partner_qualifiers_tbl,
1151       ddp_partner_types_tbl,
1152       p_vad_partner_id,
1153       ddp_person_rec,
1154       ddp_phone_rec,
1155       ddp_email_rec,
1156       p_member_type,
1157       p_global_partner_id,
1158       x_partner_party_id,
1159       x_partner_id,
1160       x_cnt_party_id,
1161       x_cnt_partner_id,
1162       x_cnt_rel_start_date,
1163       x_default_resp_id,
1164       x_resp_map_rule_id,
1165       x_group_id);
1166 
1167     -- copy data back from the local variables to OUT or IN-OUT args, if any
1168 
1169 
1170 
1171 
1172 
1173 
1174 
1175 
1176 
1177 
1178 
1179 
1180 
1181 
1182 
1183 
1184 
1185 
1186 
1187 
1188 
1189 
1190 
1191   end;
1192 
1193 end pv_partner_util_pvt_w;