[Home] [Help]
PACKAGE BODY: APPS.HZ_RELATIONSHIP_V2PUB_JW
Source
1 package body hz_relationship_v2pub_jw as
2 /* $Header: ARH2REJB.pls 120.5 2005/06/18 04:29:19 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_relationship_1(p_init_msg_list VARCHAR2
23 , x_relationship_id out nocopy NUMBER
24 , x_party_id out nocopy NUMBER
25 , x_party_number out nocopy VARCHAR2
26 , x_return_status out nocopy VARCHAR2
27 , x_msg_count out nocopy NUMBER
28 , x_msg_data out nocopy VARCHAR2
29 , p_create_org_contact VARCHAR2
30 , p1_a0 NUMBER := null
31 , p1_a1 NUMBER := null
32 , p1_a2 VARCHAR2 := null
33 , p1_a3 VARCHAR2 := null
34 , p1_a4 NUMBER := 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 DATE := null
41 , p1_a11 DATE := 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 NUMBER := null
67 , p1_a37 NUMBER := null
68 , p1_a38 VARCHAR2 := null
69 , p1_a39 VARCHAR2 := null
70 , p1_a40 VARCHAR2 := null
71 , p1_a41 VARCHAR2 := null
72 , p1_a42 VARCHAR2 := null
73 , p1_a43 VARCHAR2 := null
74 , p1_a44 VARCHAR2 := null
75 , p1_a45 VARCHAR2 := 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 VARCHAR2 := null
82 , p1_a52 VARCHAR2 := 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 VARCHAR2 := null
108 , p1_a78 VARCHAR2 := 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 NUMBER := null
131 , p1_a101 VARCHAR2 := null
132 )
133 as
134 ddp_relationship_rec hz_relationship_v2pub.relationship_rec_type;
135 ddindx binary_integer; indx binary_integer;
136 begin
137
138 -- copy data to the local IN or IN-OUT args, if any
139
140 ddp_relationship_rec.relationship_id := rosetta_g_miss_num_map(p1_a0);
141 ddp_relationship_rec.subject_id := rosetta_g_miss_num_map(p1_a1);
142 ddp_relationship_rec.subject_type := p1_a2;
143 ddp_relationship_rec.subject_table_name := p1_a3;
144 ddp_relationship_rec.object_id := rosetta_g_miss_num_map(p1_a4);
145 ddp_relationship_rec.object_type := p1_a5;
146 ddp_relationship_rec.object_table_name := p1_a6;
147 ddp_relationship_rec.relationship_code := p1_a7;
148 ddp_relationship_rec.relationship_type := p1_a8;
149 ddp_relationship_rec.comments := p1_a9;
150 ddp_relationship_rec.start_date := rosetta_g_miss_date_in_map(p1_a10);
151 ddp_relationship_rec.end_date := rosetta_g_miss_date_in_map(p1_a11);
152 ddp_relationship_rec.status := p1_a12;
153 ddp_relationship_rec.content_source_type := p1_a13;
154 ddp_relationship_rec.attribute_category := p1_a14;
155 ddp_relationship_rec.attribute1 := p1_a15;
156 ddp_relationship_rec.attribute2 := p1_a16;
157 ddp_relationship_rec.attribute3 := p1_a17;
158 ddp_relationship_rec.attribute4 := p1_a18;
159 ddp_relationship_rec.attribute5 := p1_a19;
160 ddp_relationship_rec.attribute6 := p1_a20;
161 ddp_relationship_rec.attribute7 := p1_a21;
162 ddp_relationship_rec.attribute8 := p1_a22;
163 ddp_relationship_rec.attribute9 := p1_a23;
164 ddp_relationship_rec.attribute10 := p1_a24;
165 ddp_relationship_rec.attribute11 := p1_a25;
166 ddp_relationship_rec.attribute12 := p1_a26;
167 ddp_relationship_rec.attribute13 := p1_a27;
168 ddp_relationship_rec.attribute14 := p1_a28;
169 ddp_relationship_rec.attribute15 := p1_a29;
170 ddp_relationship_rec.attribute16 := p1_a30;
171 ddp_relationship_rec.attribute17 := p1_a31;
172 ddp_relationship_rec.attribute18 := p1_a32;
173 ddp_relationship_rec.attribute19 := p1_a33;
174 ddp_relationship_rec.attribute20 := p1_a34;
175 ddp_relationship_rec.created_by_module := p1_a35;
176 ddp_relationship_rec.application_id := rosetta_g_miss_num_map(p1_a36);
177 ddp_relationship_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a37);
178 ddp_relationship_rec.party_rec.party_number := p1_a38;
179 ddp_relationship_rec.party_rec.validated_flag := p1_a39;
180 ddp_relationship_rec.party_rec.orig_system_reference := p1_a40;
181 ddp_relationship_rec.party_rec.orig_system := p1_a41;
182 ddp_relationship_rec.party_rec.status := p1_a42;
183 ddp_relationship_rec.party_rec.category_code := p1_a43;
184 ddp_relationship_rec.party_rec.salutation := p1_a44;
185 ddp_relationship_rec.party_rec.attribute_category := p1_a45;
186 ddp_relationship_rec.party_rec.attribute1 := p1_a46;
187 ddp_relationship_rec.party_rec.attribute2 := p1_a47;
188 ddp_relationship_rec.party_rec.attribute3 := p1_a48;
189 ddp_relationship_rec.party_rec.attribute4 := p1_a49;
190 ddp_relationship_rec.party_rec.attribute5 := p1_a50;
191 ddp_relationship_rec.party_rec.attribute6 := p1_a51;
192 ddp_relationship_rec.party_rec.attribute7 := p1_a52;
193 ddp_relationship_rec.party_rec.attribute8 := p1_a53;
194 ddp_relationship_rec.party_rec.attribute9 := p1_a54;
195 ddp_relationship_rec.party_rec.attribute10 := p1_a55;
196 ddp_relationship_rec.party_rec.attribute11 := p1_a56;
197 ddp_relationship_rec.party_rec.attribute12 := p1_a57;
198 ddp_relationship_rec.party_rec.attribute13 := p1_a58;
199 ddp_relationship_rec.party_rec.attribute14 := p1_a59;
200 ddp_relationship_rec.party_rec.attribute15 := p1_a60;
201 ddp_relationship_rec.party_rec.attribute16 := p1_a61;
202 ddp_relationship_rec.party_rec.attribute17 := p1_a62;
203 ddp_relationship_rec.party_rec.attribute18 := p1_a63;
204 ddp_relationship_rec.party_rec.attribute19 := p1_a64;
205 ddp_relationship_rec.party_rec.attribute20 := p1_a65;
206 ddp_relationship_rec.party_rec.attribute21 := p1_a66;
207 ddp_relationship_rec.party_rec.attribute22 := p1_a67;
208 ddp_relationship_rec.party_rec.attribute23 := p1_a68;
209 ddp_relationship_rec.party_rec.attribute24 := p1_a69;
210 ddp_relationship_rec.additional_information1 := p1_a70;
211 ddp_relationship_rec.additional_information2 := p1_a71;
212 ddp_relationship_rec.additional_information3 := p1_a72;
213 ddp_relationship_rec.additional_information4 := p1_a73;
214 ddp_relationship_rec.additional_information5 := p1_a74;
215 ddp_relationship_rec.additional_information6 := p1_a75;
216 ddp_relationship_rec.additional_information7 := p1_a76;
217 ddp_relationship_rec.additional_information8 := p1_a77;
218 ddp_relationship_rec.additional_information9 := p1_a78;
219 ddp_relationship_rec.additional_information10 := p1_a79;
220 ddp_relationship_rec.additional_information11 := p1_a80;
221 ddp_relationship_rec.additional_information12 := p1_a81;
222 ddp_relationship_rec.additional_information13 := p1_a82;
223 ddp_relationship_rec.additional_information14 := p1_a83;
224 ddp_relationship_rec.additional_information15 := p1_a84;
225 ddp_relationship_rec.additional_information16 := p1_a85;
226 ddp_relationship_rec.additional_information17 := p1_a86;
227 ddp_relationship_rec.additional_information18 := p1_a87;
228 ddp_relationship_rec.additional_information19 := p1_a88;
229 ddp_relationship_rec.additional_information20 := p1_a89;
230 ddp_relationship_rec.additional_information21 := p1_a90;
231 ddp_relationship_rec.additional_information22 := p1_a91;
232 ddp_relationship_rec.additional_information23 := p1_a92;
233 ddp_relationship_rec.additional_information24 := p1_a93;
234 ddp_relationship_rec.additional_information25 := p1_a94;
235 ddp_relationship_rec.additional_information26 := p1_a95;
236 ddp_relationship_rec.additional_information27 := p1_a96;
237 ddp_relationship_rec.additional_information28 := p1_a97;
238 ddp_relationship_rec.additional_information29 := p1_a98;
239 ddp_relationship_rec.additional_information30 := p1_a99;
240 ddp_relationship_rec.percentage_ownership := rosetta_g_miss_num_map(p1_a100);
241 ddp_relationship_rec.actual_content_source := p1_a101;
242
243
244
245
246
247
248
249
250 -- here's the delegated call to the old PL/SQL routine
251 hz_relationship_v2pub.create_relationship(p_init_msg_list,
252 ddp_relationship_rec,
253 x_relationship_id,
254 x_party_id,
255 x_party_number,
256 x_return_status,
257 x_msg_count,
258 x_msg_data,
259 p_create_org_contact);
260
261 -- copy data back from the local OUT or IN-OUT args, if any
262
263
264
265
266
267
268
269
270 end;
271
272 procedure create_relationship_2(p_init_msg_list VARCHAR2
273 , x_relationship_id out nocopy NUMBER
274 , x_party_id out nocopy NUMBER
275 , x_party_number out nocopy VARCHAR2
276 , x_return_status out nocopy VARCHAR2
277 , x_msg_count out nocopy NUMBER
278 , x_msg_data out nocopy VARCHAR2
279 , p1_a0 NUMBER := null
280 , p1_a1 NUMBER := null
281 , p1_a2 VARCHAR2 := null
282 , p1_a3 VARCHAR2 := null
283 , p1_a4 NUMBER := null
284 , p1_a5 VARCHAR2 := null
285 , p1_a6 VARCHAR2 := null
286 , p1_a7 VARCHAR2 := null
287 , p1_a8 VARCHAR2 := null
288 , p1_a9 VARCHAR2 := null
289 , p1_a10 DATE := null
290 , p1_a11 DATE := null
291 , p1_a12 VARCHAR2 := null
292 , p1_a13 VARCHAR2 := null
293 , p1_a14 VARCHAR2 := null
294 , p1_a15 VARCHAR2 := null
295 , p1_a16 VARCHAR2 := null
296 , p1_a17 VARCHAR2 := null
297 , p1_a18 VARCHAR2 := null
298 , p1_a19 VARCHAR2 := null
299 , p1_a20 VARCHAR2 := null
300 , p1_a21 VARCHAR2 := null
301 , p1_a22 VARCHAR2 := null
302 , p1_a23 VARCHAR2 := null
303 , p1_a24 VARCHAR2 := null
304 , p1_a25 VARCHAR2 := null
305 , p1_a26 VARCHAR2 := null
306 , p1_a27 VARCHAR2 := null
307 , p1_a28 VARCHAR2 := null
308 , p1_a29 VARCHAR2 := null
309 , p1_a30 VARCHAR2 := null
310 , p1_a31 VARCHAR2 := null
311 , p1_a32 VARCHAR2 := null
312 , p1_a33 VARCHAR2 := null
313 , p1_a34 VARCHAR2 := null
314 , p1_a35 VARCHAR2 := null
315 , p1_a36 NUMBER := null
316 , p1_a37 NUMBER := null
317 , p1_a38 VARCHAR2 := null
318 , p1_a39 VARCHAR2 := null
319 , p1_a40 VARCHAR2 := null
320 , p1_a41 VARCHAR2 := null
321 , p1_a42 VARCHAR2 := null
322 , p1_a43 VARCHAR2 := null
323 , p1_a44 VARCHAR2 := null
324 , p1_a45 VARCHAR2 := null
325 , p1_a46 VARCHAR2 := null
326 , p1_a47 VARCHAR2 := null
327 , p1_a48 VARCHAR2 := null
328 , p1_a49 VARCHAR2 := null
329 , p1_a50 VARCHAR2 := null
330 , p1_a51 VARCHAR2 := null
331 , p1_a52 VARCHAR2 := null
332 , p1_a53 VARCHAR2 := null
333 , p1_a54 VARCHAR2 := null
334 , p1_a55 VARCHAR2 := null
335 , p1_a56 VARCHAR2 := null
336 , p1_a57 VARCHAR2 := null
337 , p1_a58 VARCHAR2 := null
338 , p1_a59 VARCHAR2 := null
339 , p1_a60 VARCHAR2 := null
340 , p1_a61 VARCHAR2 := null
341 , p1_a62 VARCHAR2 := null
342 , p1_a63 VARCHAR2 := null
343 , p1_a64 VARCHAR2 := null
344 , p1_a65 VARCHAR2 := null
345 , p1_a66 VARCHAR2 := null
346 , p1_a67 VARCHAR2 := null
347 , p1_a68 VARCHAR2 := null
348 , p1_a69 VARCHAR2 := null
349 , p1_a70 VARCHAR2 := null
350 , p1_a71 VARCHAR2 := null
351 , p1_a72 VARCHAR2 := null
352 , p1_a73 VARCHAR2 := null
353 , p1_a74 VARCHAR2 := null
354 , p1_a75 VARCHAR2 := null
355 , p1_a76 VARCHAR2 := null
356 , p1_a77 VARCHAR2 := null
357 , p1_a78 VARCHAR2 := null
358 , p1_a79 VARCHAR2 := null
359 , p1_a80 VARCHAR2 := null
360 , p1_a81 VARCHAR2 := null
361 , p1_a82 VARCHAR2 := null
362 , p1_a83 VARCHAR2 := null
363 , p1_a84 VARCHAR2 := null
364 , p1_a85 VARCHAR2 := null
365 , p1_a86 VARCHAR2 := null
366 , p1_a87 VARCHAR2 := null
367 , p1_a88 VARCHAR2 := null
368 , p1_a89 VARCHAR2 := null
369 , p1_a90 VARCHAR2 := null
370 , p1_a91 VARCHAR2 := null
371 , p1_a92 VARCHAR2 := null
372 , p1_a93 VARCHAR2 := null
373 , p1_a94 VARCHAR2 := null
374 , p1_a95 VARCHAR2 := null
375 , p1_a96 VARCHAR2 := null
376 , p1_a97 VARCHAR2 := null
377 , p1_a98 VARCHAR2 := null
378 , p1_a99 VARCHAR2 := null
379 , p1_a100 NUMBER := null
380 , p1_a101 VARCHAR2 := null
381 )
382 as
383 ddp_relationship_rec hz_relationship_v2pub.relationship_rec_type;
384 ddindx binary_integer; indx binary_integer;
385 begin
386
387 -- copy data to the local IN or IN-OUT args, if any
388
389 ddp_relationship_rec.relationship_id := rosetta_g_miss_num_map(p1_a0);
390 ddp_relationship_rec.subject_id := rosetta_g_miss_num_map(p1_a1);
391 ddp_relationship_rec.subject_type := p1_a2;
392 ddp_relationship_rec.subject_table_name := p1_a3;
393 ddp_relationship_rec.object_id := rosetta_g_miss_num_map(p1_a4);
394 ddp_relationship_rec.object_type := p1_a5;
395 ddp_relationship_rec.object_table_name := p1_a6;
396 ddp_relationship_rec.relationship_code := p1_a7;
397 ddp_relationship_rec.relationship_type := p1_a8;
398 ddp_relationship_rec.comments := p1_a9;
399 ddp_relationship_rec.start_date := rosetta_g_miss_date_in_map(p1_a10);
400 ddp_relationship_rec.end_date := rosetta_g_miss_date_in_map(p1_a11);
401 ddp_relationship_rec.status := p1_a12;
402 ddp_relationship_rec.content_source_type := p1_a13;
403 ddp_relationship_rec.attribute_category := p1_a14;
404 ddp_relationship_rec.attribute1 := p1_a15;
405 ddp_relationship_rec.attribute2 := p1_a16;
406 ddp_relationship_rec.attribute3 := p1_a17;
407 ddp_relationship_rec.attribute4 := p1_a18;
408 ddp_relationship_rec.attribute5 := p1_a19;
409 ddp_relationship_rec.attribute6 := p1_a20;
410 ddp_relationship_rec.attribute7 := p1_a21;
411 ddp_relationship_rec.attribute8 := p1_a22;
412 ddp_relationship_rec.attribute9 := p1_a23;
413 ddp_relationship_rec.attribute10 := p1_a24;
414 ddp_relationship_rec.attribute11 := p1_a25;
415 ddp_relationship_rec.attribute12 := p1_a26;
416 ddp_relationship_rec.attribute13 := p1_a27;
417 ddp_relationship_rec.attribute14 := p1_a28;
418 ddp_relationship_rec.attribute15 := p1_a29;
419 ddp_relationship_rec.attribute16 := p1_a30;
420 ddp_relationship_rec.attribute17 := p1_a31;
421 ddp_relationship_rec.attribute18 := p1_a32;
422 ddp_relationship_rec.attribute19 := p1_a33;
423 ddp_relationship_rec.attribute20 := p1_a34;
424 ddp_relationship_rec.created_by_module := p1_a35;
425 ddp_relationship_rec.application_id := rosetta_g_miss_num_map(p1_a36);
426 ddp_relationship_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a37);
427 ddp_relationship_rec.party_rec.party_number := p1_a38;
428 ddp_relationship_rec.party_rec.validated_flag := p1_a39;
429 ddp_relationship_rec.party_rec.orig_system_reference := p1_a40;
430 ddp_relationship_rec.party_rec.orig_system := p1_a41;
431 ddp_relationship_rec.party_rec.status := p1_a42;
432 ddp_relationship_rec.party_rec.category_code := p1_a43;
433 ddp_relationship_rec.party_rec.salutation := p1_a44;
434 ddp_relationship_rec.party_rec.attribute_category := p1_a45;
435 ddp_relationship_rec.party_rec.attribute1 := p1_a46;
436 ddp_relationship_rec.party_rec.attribute2 := p1_a47;
437 ddp_relationship_rec.party_rec.attribute3 := p1_a48;
438 ddp_relationship_rec.party_rec.attribute4 := p1_a49;
439 ddp_relationship_rec.party_rec.attribute5 := p1_a50;
440 ddp_relationship_rec.party_rec.attribute6 := p1_a51;
441 ddp_relationship_rec.party_rec.attribute7 := p1_a52;
442 ddp_relationship_rec.party_rec.attribute8 := p1_a53;
443 ddp_relationship_rec.party_rec.attribute9 := p1_a54;
444 ddp_relationship_rec.party_rec.attribute10 := p1_a55;
445 ddp_relationship_rec.party_rec.attribute11 := p1_a56;
446 ddp_relationship_rec.party_rec.attribute12 := p1_a57;
447 ddp_relationship_rec.party_rec.attribute13 := p1_a58;
448 ddp_relationship_rec.party_rec.attribute14 := p1_a59;
449 ddp_relationship_rec.party_rec.attribute15 := p1_a60;
450 ddp_relationship_rec.party_rec.attribute16 := p1_a61;
451 ddp_relationship_rec.party_rec.attribute17 := p1_a62;
452 ddp_relationship_rec.party_rec.attribute18 := p1_a63;
453 ddp_relationship_rec.party_rec.attribute19 := p1_a64;
454 ddp_relationship_rec.party_rec.attribute20 := p1_a65;
455 ddp_relationship_rec.party_rec.attribute21 := p1_a66;
456 ddp_relationship_rec.party_rec.attribute22 := p1_a67;
457 ddp_relationship_rec.party_rec.attribute23 := p1_a68;
458 ddp_relationship_rec.party_rec.attribute24 := p1_a69;
459 ddp_relationship_rec.additional_information1 := p1_a70;
460 ddp_relationship_rec.additional_information2 := p1_a71;
461 ddp_relationship_rec.additional_information3 := p1_a72;
462 ddp_relationship_rec.additional_information4 := p1_a73;
463 ddp_relationship_rec.additional_information5 := p1_a74;
464 ddp_relationship_rec.additional_information6 := p1_a75;
465 ddp_relationship_rec.additional_information7 := p1_a76;
466 ddp_relationship_rec.additional_information8 := p1_a77;
467 ddp_relationship_rec.additional_information9 := p1_a78;
468 ddp_relationship_rec.additional_information10 := p1_a79;
469 ddp_relationship_rec.additional_information11 := p1_a80;
470 ddp_relationship_rec.additional_information12 := p1_a81;
471 ddp_relationship_rec.additional_information13 := p1_a82;
472 ddp_relationship_rec.additional_information14 := p1_a83;
473 ddp_relationship_rec.additional_information15 := p1_a84;
474 ddp_relationship_rec.additional_information16 := p1_a85;
475 ddp_relationship_rec.additional_information17 := p1_a86;
476 ddp_relationship_rec.additional_information18 := p1_a87;
477 ddp_relationship_rec.additional_information19 := p1_a88;
478 ddp_relationship_rec.additional_information20 := p1_a89;
479 ddp_relationship_rec.additional_information21 := p1_a90;
480 ddp_relationship_rec.additional_information22 := p1_a91;
481 ddp_relationship_rec.additional_information23 := p1_a92;
482 ddp_relationship_rec.additional_information24 := p1_a93;
483 ddp_relationship_rec.additional_information25 := p1_a94;
484 ddp_relationship_rec.additional_information26 := p1_a95;
485 ddp_relationship_rec.additional_information27 := p1_a96;
486 ddp_relationship_rec.additional_information28 := p1_a97;
487 ddp_relationship_rec.additional_information29 := p1_a98;
488 ddp_relationship_rec.additional_information30 := p1_a99;
489 ddp_relationship_rec.percentage_ownership := rosetta_g_miss_num_map(p1_a100);
490 ddp_relationship_rec.actual_content_source := p1_a101;
491
492
493
494
495
496
497
498 -- here's the delegated call to the old PL/SQL routine
499 hz_relationship_v2pub.create_relationship(p_init_msg_list,
500 ddp_relationship_rec,
501 x_relationship_id,
502 x_party_id,
503 x_party_number,
504 x_return_status,
505 x_msg_count,
506 x_msg_data);
507
508 -- copy data back from the local OUT or IN-OUT args, if any
509
510
511
512
513
514
515
516 end;
517
518 procedure create_relationship_with_us_3(p_init_msg_list VARCHAR2
519 , p_contact_party_id NUMBER
520 , p_contact_party_usage_code VARCHAR2
521 , p_create_org_contact VARCHAR2
522 , x_relationship_id out nocopy NUMBER
523 , x_party_id out nocopy NUMBER
524 , x_party_number out nocopy VARCHAR2
525 , x_return_status out nocopy VARCHAR2
526 , x_msg_count out nocopy NUMBER
527 , x_msg_data out nocopy VARCHAR2
528 , p1_a0 NUMBER := null
529 , p1_a1 NUMBER := null
530 , p1_a2 VARCHAR2 := null
531 , p1_a3 VARCHAR2 := null
532 , p1_a4 NUMBER := null
533 , p1_a5 VARCHAR2 := null
534 , p1_a6 VARCHAR2 := null
535 , p1_a7 VARCHAR2 := null
536 , p1_a8 VARCHAR2 := null
537 , p1_a9 VARCHAR2 := null
538 , p1_a10 DATE := null
539 , p1_a11 DATE := null
540 , p1_a12 VARCHAR2 := null
541 , p1_a13 VARCHAR2 := null
542 , p1_a14 VARCHAR2 := null
543 , p1_a15 VARCHAR2 := null
544 , p1_a16 VARCHAR2 := null
545 , p1_a17 VARCHAR2 := null
546 , p1_a18 VARCHAR2 := null
547 , p1_a19 VARCHAR2 := null
548 , p1_a20 VARCHAR2 := null
549 , p1_a21 VARCHAR2 := null
550 , p1_a22 VARCHAR2 := null
551 , p1_a23 VARCHAR2 := null
552 , p1_a24 VARCHAR2 := null
553 , p1_a25 VARCHAR2 := null
554 , p1_a26 VARCHAR2 := null
555 , p1_a27 VARCHAR2 := null
556 , p1_a28 VARCHAR2 := null
557 , p1_a29 VARCHAR2 := null
558 , p1_a30 VARCHAR2 := null
559 , p1_a31 VARCHAR2 := null
560 , p1_a32 VARCHAR2 := null
561 , p1_a33 VARCHAR2 := null
562 , p1_a34 VARCHAR2 := null
563 , p1_a35 VARCHAR2 := null
564 , p1_a36 NUMBER := null
565 , p1_a37 NUMBER := null
566 , p1_a38 VARCHAR2 := null
567 , p1_a39 VARCHAR2 := null
568 , p1_a40 VARCHAR2 := null
569 , p1_a41 VARCHAR2 := null
570 , p1_a42 VARCHAR2 := null
571 , p1_a43 VARCHAR2 := null
572 , p1_a44 VARCHAR2 := null
573 , p1_a45 VARCHAR2 := null
574 , p1_a46 VARCHAR2 := null
575 , p1_a47 VARCHAR2 := null
576 , p1_a48 VARCHAR2 := null
577 , p1_a49 VARCHAR2 := null
578 , p1_a50 VARCHAR2 := null
579 , p1_a51 VARCHAR2 := null
580 , p1_a52 VARCHAR2 := null
581 , p1_a53 VARCHAR2 := null
582 , p1_a54 VARCHAR2 := null
583 , p1_a55 VARCHAR2 := null
584 , p1_a56 VARCHAR2 := null
585 , p1_a57 VARCHAR2 := null
586 , p1_a58 VARCHAR2 := null
587 , p1_a59 VARCHAR2 := null
588 , p1_a60 VARCHAR2 := null
589 , p1_a61 VARCHAR2 := null
590 , p1_a62 VARCHAR2 := null
591 , p1_a63 VARCHAR2 := null
592 , p1_a64 VARCHAR2 := null
593 , p1_a65 VARCHAR2 := null
594 , p1_a66 VARCHAR2 := null
595 , p1_a67 VARCHAR2 := null
596 , p1_a68 VARCHAR2 := null
597 , p1_a69 VARCHAR2 := null
598 , p1_a70 VARCHAR2 := null
599 , p1_a71 VARCHAR2 := null
600 , p1_a72 VARCHAR2 := null
601 , p1_a73 VARCHAR2 := null
602 , p1_a74 VARCHAR2 := null
603 , p1_a75 VARCHAR2 := null
604 , p1_a76 VARCHAR2 := null
605 , p1_a77 VARCHAR2 := null
606 , p1_a78 VARCHAR2 := null
607 , p1_a79 VARCHAR2 := null
608 , p1_a80 VARCHAR2 := null
609 , p1_a81 VARCHAR2 := null
610 , p1_a82 VARCHAR2 := null
611 , p1_a83 VARCHAR2 := null
612 , p1_a84 VARCHAR2 := null
613 , p1_a85 VARCHAR2 := null
614 , p1_a86 VARCHAR2 := null
615 , p1_a87 VARCHAR2 := null
616 , p1_a88 VARCHAR2 := null
617 , p1_a89 VARCHAR2 := null
618 , p1_a90 VARCHAR2 := null
619 , p1_a91 VARCHAR2 := null
620 , p1_a92 VARCHAR2 := null
621 , p1_a93 VARCHAR2 := null
622 , p1_a94 VARCHAR2 := null
623 , p1_a95 VARCHAR2 := null
624 , p1_a96 VARCHAR2 := null
625 , p1_a97 VARCHAR2 := null
626 , p1_a98 VARCHAR2 := null
627 , p1_a99 VARCHAR2 := null
628 , p1_a100 NUMBER := null
629 , p1_a101 VARCHAR2 := null
630 )
631 as
632 ddp_relationship_rec hz_relationship_v2pub.relationship_rec_type;
633 ddindx binary_integer; indx binary_integer;
634 begin
635
636 -- copy data to the local IN or IN-OUT args, if any
637
638 ddp_relationship_rec.relationship_id := rosetta_g_miss_num_map(p1_a0);
639 ddp_relationship_rec.subject_id := rosetta_g_miss_num_map(p1_a1);
640 ddp_relationship_rec.subject_type := p1_a2;
641 ddp_relationship_rec.subject_table_name := p1_a3;
642 ddp_relationship_rec.object_id := rosetta_g_miss_num_map(p1_a4);
643 ddp_relationship_rec.object_type := p1_a5;
644 ddp_relationship_rec.object_table_name := p1_a6;
645 ddp_relationship_rec.relationship_code := p1_a7;
646 ddp_relationship_rec.relationship_type := p1_a8;
647 ddp_relationship_rec.comments := p1_a9;
648 ddp_relationship_rec.start_date := rosetta_g_miss_date_in_map(p1_a10);
649 ddp_relationship_rec.end_date := rosetta_g_miss_date_in_map(p1_a11);
650 ddp_relationship_rec.status := p1_a12;
651 ddp_relationship_rec.content_source_type := p1_a13;
652 ddp_relationship_rec.attribute_category := p1_a14;
653 ddp_relationship_rec.attribute1 := p1_a15;
654 ddp_relationship_rec.attribute2 := p1_a16;
655 ddp_relationship_rec.attribute3 := p1_a17;
656 ddp_relationship_rec.attribute4 := p1_a18;
657 ddp_relationship_rec.attribute5 := p1_a19;
658 ddp_relationship_rec.attribute6 := p1_a20;
659 ddp_relationship_rec.attribute7 := p1_a21;
660 ddp_relationship_rec.attribute8 := p1_a22;
661 ddp_relationship_rec.attribute9 := p1_a23;
662 ddp_relationship_rec.attribute10 := p1_a24;
663 ddp_relationship_rec.attribute11 := p1_a25;
664 ddp_relationship_rec.attribute12 := p1_a26;
665 ddp_relationship_rec.attribute13 := p1_a27;
666 ddp_relationship_rec.attribute14 := p1_a28;
667 ddp_relationship_rec.attribute15 := p1_a29;
668 ddp_relationship_rec.attribute16 := p1_a30;
669 ddp_relationship_rec.attribute17 := p1_a31;
670 ddp_relationship_rec.attribute18 := p1_a32;
671 ddp_relationship_rec.attribute19 := p1_a33;
672 ddp_relationship_rec.attribute20 := p1_a34;
673 ddp_relationship_rec.created_by_module := p1_a35;
674 ddp_relationship_rec.application_id := rosetta_g_miss_num_map(p1_a36);
675 ddp_relationship_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a37);
676 ddp_relationship_rec.party_rec.party_number := p1_a38;
677 ddp_relationship_rec.party_rec.validated_flag := p1_a39;
678 ddp_relationship_rec.party_rec.orig_system_reference := p1_a40;
679 ddp_relationship_rec.party_rec.orig_system := p1_a41;
680 ddp_relationship_rec.party_rec.status := p1_a42;
681 ddp_relationship_rec.party_rec.category_code := p1_a43;
682 ddp_relationship_rec.party_rec.salutation := p1_a44;
683 ddp_relationship_rec.party_rec.attribute_category := p1_a45;
684 ddp_relationship_rec.party_rec.attribute1 := p1_a46;
685 ddp_relationship_rec.party_rec.attribute2 := p1_a47;
686 ddp_relationship_rec.party_rec.attribute3 := p1_a48;
687 ddp_relationship_rec.party_rec.attribute4 := p1_a49;
688 ddp_relationship_rec.party_rec.attribute5 := p1_a50;
689 ddp_relationship_rec.party_rec.attribute6 := p1_a51;
690 ddp_relationship_rec.party_rec.attribute7 := p1_a52;
691 ddp_relationship_rec.party_rec.attribute8 := p1_a53;
692 ddp_relationship_rec.party_rec.attribute9 := p1_a54;
693 ddp_relationship_rec.party_rec.attribute10 := p1_a55;
694 ddp_relationship_rec.party_rec.attribute11 := p1_a56;
695 ddp_relationship_rec.party_rec.attribute12 := p1_a57;
696 ddp_relationship_rec.party_rec.attribute13 := p1_a58;
697 ddp_relationship_rec.party_rec.attribute14 := p1_a59;
698 ddp_relationship_rec.party_rec.attribute15 := p1_a60;
699 ddp_relationship_rec.party_rec.attribute16 := p1_a61;
700 ddp_relationship_rec.party_rec.attribute17 := p1_a62;
701 ddp_relationship_rec.party_rec.attribute18 := p1_a63;
702 ddp_relationship_rec.party_rec.attribute19 := p1_a64;
703 ddp_relationship_rec.party_rec.attribute20 := p1_a65;
704 ddp_relationship_rec.party_rec.attribute21 := p1_a66;
705 ddp_relationship_rec.party_rec.attribute22 := p1_a67;
706 ddp_relationship_rec.party_rec.attribute23 := p1_a68;
707 ddp_relationship_rec.party_rec.attribute24 := p1_a69;
708 ddp_relationship_rec.additional_information1 := p1_a70;
709 ddp_relationship_rec.additional_information2 := p1_a71;
710 ddp_relationship_rec.additional_information3 := p1_a72;
711 ddp_relationship_rec.additional_information4 := p1_a73;
712 ddp_relationship_rec.additional_information5 := p1_a74;
713 ddp_relationship_rec.additional_information6 := p1_a75;
714 ddp_relationship_rec.additional_information7 := p1_a76;
715 ddp_relationship_rec.additional_information8 := p1_a77;
716 ddp_relationship_rec.additional_information9 := p1_a78;
717 ddp_relationship_rec.additional_information10 := p1_a79;
718 ddp_relationship_rec.additional_information11 := p1_a80;
719 ddp_relationship_rec.additional_information12 := p1_a81;
720 ddp_relationship_rec.additional_information13 := p1_a82;
721 ddp_relationship_rec.additional_information14 := p1_a83;
722 ddp_relationship_rec.additional_information15 := p1_a84;
723 ddp_relationship_rec.additional_information16 := p1_a85;
724 ddp_relationship_rec.additional_information17 := p1_a86;
725 ddp_relationship_rec.additional_information18 := p1_a87;
726 ddp_relationship_rec.additional_information19 := p1_a88;
727 ddp_relationship_rec.additional_information20 := p1_a89;
728 ddp_relationship_rec.additional_information21 := p1_a90;
729 ddp_relationship_rec.additional_information22 := p1_a91;
730 ddp_relationship_rec.additional_information23 := p1_a92;
731 ddp_relationship_rec.additional_information24 := p1_a93;
732 ddp_relationship_rec.additional_information25 := p1_a94;
733 ddp_relationship_rec.additional_information26 := p1_a95;
734 ddp_relationship_rec.additional_information27 := p1_a96;
735 ddp_relationship_rec.additional_information28 := p1_a97;
736 ddp_relationship_rec.additional_information29 := p1_a98;
737 ddp_relationship_rec.additional_information30 := p1_a99;
738 ddp_relationship_rec.percentage_ownership := rosetta_g_miss_num_map(p1_a100);
739 ddp_relationship_rec.actual_content_source := p1_a101;
740
741
742
743
744
745
746
747
748
749
750 -- here's the delegated call to the old PL/SQL routine
751 hz_relationship_v2pub.create_relationship_with_usg(p_init_msg_list,
752 ddp_relationship_rec,
753 p_contact_party_id,
754 p_contact_party_usage_code,
755 p_create_org_contact,
756 x_relationship_id,
757 x_party_id,
758 x_party_number,
759 x_return_status,
760 x_msg_count,
761 x_msg_data);
762
763 -- copy data back from the local OUT or IN-OUT args, if any
764
765
766
767
768
769
770
771
772
773
774 end;
775
776 procedure update_relationship_4(p_init_msg_list VARCHAR2
777 , p_object_version_number in out nocopy NUMBER
778 , p_party_object_version_number in out nocopy NUMBER
779 , x_return_status out nocopy VARCHAR2
780 , x_msg_count out nocopy NUMBER
781 , x_msg_data out nocopy VARCHAR2
782 , p1_a0 NUMBER := null
783 , p1_a1 NUMBER := null
784 , p1_a2 VARCHAR2 := null
785 , p1_a3 VARCHAR2 := null
786 , p1_a4 NUMBER := null
787 , p1_a5 VARCHAR2 := null
788 , p1_a6 VARCHAR2 := null
789 , p1_a7 VARCHAR2 := null
790 , p1_a8 VARCHAR2 := null
791 , p1_a9 VARCHAR2 := null
792 , p1_a10 DATE := null
793 , p1_a11 DATE := null
794 , p1_a12 VARCHAR2 := null
795 , p1_a13 VARCHAR2 := null
796 , p1_a14 VARCHAR2 := null
797 , p1_a15 VARCHAR2 := null
798 , p1_a16 VARCHAR2 := null
799 , p1_a17 VARCHAR2 := null
800 , p1_a18 VARCHAR2 := null
801 , p1_a19 VARCHAR2 := null
802 , p1_a20 VARCHAR2 := null
803 , p1_a21 VARCHAR2 := null
804 , p1_a22 VARCHAR2 := null
805 , p1_a23 VARCHAR2 := null
806 , p1_a24 VARCHAR2 := null
807 , p1_a25 VARCHAR2 := null
808 , p1_a26 VARCHAR2 := null
809 , p1_a27 VARCHAR2 := null
810 , p1_a28 VARCHAR2 := null
811 , p1_a29 VARCHAR2 := null
812 , p1_a30 VARCHAR2 := null
813 , p1_a31 VARCHAR2 := null
814 , p1_a32 VARCHAR2 := null
815 , p1_a33 VARCHAR2 := null
816 , p1_a34 VARCHAR2 := null
817 , p1_a35 VARCHAR2 := null
818 , p1_a36 NUMBER := null
819 , p1_a37 NUMBER := null
820 , p1_a38 VARCHAR2 := null
821 , p1_a39 VARCHAR2 := null
822 , p1_a40 VARCHAR2 := null
823 , p1_a41 VARCHAR2 := null
824 , p1_a42 VARCHAR2 := null
825 , p1_a43 VARCHAR2 := null
826 , p1_a44 VARCHAR2 := null
827 , p1_a45 VARCHAR2 := null
828 , p1_a46 VARCHAR2 := null
829 , p1_a47 VARCHAR2 := null
830 , p1_a48 VARCHAR2 := null
831 , p1_a49 VARCHAR2 := null
832 , p1_a50 VARCHAR2 := null
833 , p1_a51 VARCHAR2 := null
834 , p1_a52 VARCHAR2 := null
835 , p1_a53 VARCHAR2 := null
836 , p1_a54 VARCHAR2 := null
837 , p1_a55 VARCHAR2 := null
838 , p1_a56 VARCHAR2 := null
839 , p1_a57 VARCHAR2 := null
840 , p1_a58 VARCHAR2 := null
841 , p1_a59 VARCHAR2 := null
842 , p1_a60 VARCHAR2 := null
843 , p1_a61 VARCHAR2 := null
844 , p1_a62 VARCHAR2 := null
845 , p1_a63 VARCHAR2 := null
846 , p1_a64 VARCHAR2 := null
847 , p1_a65 VARCHAR2 := null
848 , p1_a66 VARCHAR2 := null
849 , p1_a67 VARCHAR2 := null
850 , p1_a68 VARCHAR2 := null
851 , p1_a69 VARCHAR2 := null
852 , p1_a70 VARCHAR2 := null
853 , p1_a71 VARCHAR2 := null
854 , p1_a72 VARCHAR2 := null
855 , p1_a73 VARCHAR2 := null
856 , p1_a74 VARCHAR2 := null
857 , p1_a75 VARCHAR2 := null
858 , p1_a76 VARCHAR2 := null
859 , p1_a77 VARCHAR2 := null
860 , p1_a78 VARCHAR2 := null
861 , p1_a79 VARCHAR2 := null
862 , p1_a80 VARCHAR2 := null
863 , p1_a81 VARCHAR2 := null
864 , p1_a82 VARCHAR2 := null
865 , p1_a83 VARCHAR2 := null
866 , p1_a84 VARCHAR2 := null
867 , p1_a85 VARCHAR2 := null
868 , p1_a86 VARCHAR2 := null
869 , p1_a87 VARCHAR2 := null
870 , p1_a88 VARCHAR2 := null
871 , p1_a89 VARCHAR2 := null
872 , p1_a90 VARCHAR2 := null
873 , p1_a91 VARCHAR2 := null
874 , p1_a92 VARCHAR2 := null
875 , p1_a93 VARCHAR2 := null
876 , p1_a94 VARCHAR2 := null
877 , p1_a95 VARCHAR2 := null
878 , p1_a96 VARCHAR2 := null
879 , p1_a97 VARCHAR2 := null
880 , p1_a98 VARCHAR2 := null
881 , p1_a99 VARCHAR2 := null
882 , p1_a100 NUMBER := null
883 , p1_a101 VARCHAR2 := null
884 )
885 as
886 ddp_relationship_rec hz_relationship_v2pub.relationship_rec_type;
887 ddindx binary_integer; indx binary_integer;
888 begin
889
890 -- copy data to the local IN or IN-OUT args, if any
891
892 ddp_relationship_rec.relationship_id := rosetta_g_miss_num_map(p1_a0);
893 ddp_relationship_rec.subject_id := rosetta_g_miss_num_map(p1_a1);
894 ddp_relationship_rec.subject_type := p1_a2;
895 ddp_relationship_rec.subject_table_name := p1_a3;
896 ddp_relationship_rec.object_id := rosetta_g_miss_num_map(p1_a4);
897 ddp_relationship_rec.object_type := p1_a5;
898 ddp_relationship_rec.object_table_name := p1_a6;
899 ddp_relationship_rec.relationship_code := p1_a7;
900 ddp_relationship_rec.relationship_type := p1_a8;
901 ddp_relationship_rec.comments := p1_a9;
902 ddp_relationship_rec.start_date := rosetta_g_miss_date_in_map(p1_a10);
903 ddp_relationship_rec.end_date := rosetta_g_miss_date_in_map(p1_a11);
904 ddp_relationship_rec.status := p1_a12;
905 ddp_relationship_rec.content_source_type := p1_a13;
906 ddp_relationship_rec.attribute_category := p1_a14;
907 ddp_relationship_rec.attribute1 := p1_a15;
908 ddp_relationship_rec.attribute2 := p1_a16;
909 ddp_relationship_rec.attribute3 := p1_a17;
910 ddp_relationship_rec.attribute4 := p1_a18;
911 ddp_relationship_rec.attribute5 := p1_a19;
912 ddp_relationship_rec.attribute6 := p1_a20;
913 ddp_relationship_rec.attribute7 := p1_a21;
914 ddp_relationship_rec.attribute8 := p1_a22;
915 ddp_relationship_rec.attribute9 := p1_a23;
916 ddp_relationship_rec.attribute10 := p1_a24;
917 ddp_relationship_rec.attribute11 := p1_a25;
918 ddp_relationship_rec.attribute12 := p1_a26;
919 ddp_relationship_rec.attribute13 := p1_a27;
920 ddp_relationship_rec.attribute14 := p1_a28;
921 ddp_relationship_rec.attribute15 := p1_a29;
922 ddp_relationship_rec.attribute16 := p1_a30;
923 ddp_relationship_rec.attribute17 := p1_a31;
924 ddp_relationship_rec.attribute18 := p1_a32;
925 ddp_relationship_rec.attribute19 := p1_a33;
926 ddp_relationship_rec.attribute20 := p1_a34;
927 ddp_relationship_rec.created_by_module := p1_a35;
928 ddp_relationship_rec.application_id := rosetta_g_miss_num_map(p1_a36);
929 ddp_relationship_rec.party_rec.party_id := rosetta_g_miss_num_map(p1_a37);
930 ddp_relationship_rec.party_rec.party_number := p1_a38;
931 ddp_relationship_rec.party_rec.validated_flag := p1_a39;
932 ddp_relationship_rec.party_rec.orig_system_reference := p1_a40;
933 ddp_relationship_rec.party_rec.orig_system := p1_a41;
934 ddp_relationship_rec.party_rec.status := p1_a42;
935 ddp_relationship_rec.party_rec.category_code := p1_a43;
936 ddp_relationship_rec.party_rec.salutation := p1_a44;
937 ddp_relationship_rec.party_rec.attribute_category := p1_a45;
938 ddp_relationship_rec.party_rec.attribute1 := p1_a46;
939 ddp_relationship_rec.party_rec.attribute2 := p1_a47;
940 ddp_relationship_rec.party_rec.attribute3 := p1_a48;
941 ddp_relationship_rec.party_rec.attribute4 := p1_a49;
942 ddp_relationship_rec.party_rec.attribute5 := p1_a50;
943 ddp_relationship_rec.party_rec.attribute6 := p1_a51;
944 ddp_relationship_rec.party_rec.attribute7 := p1_a52;
945 ddp_relationship_rec.party_rec.attribute8 := p1_a53;
946 ddp_relationship_rec.party_rec.attribute9 := p1_a54;
947 ddp_relationship_rec.party_rec.attribute10 := p1_a55;
948 ddp_relationship_rec.party_rec.attribute11 := p1_a56;
949 ddp_relationship_rec.party_rec.attribute12 := p1_a57;
950 ddp_relationship_rec.party_rec.attribute13 := p1_a58;
951 ddp_relationship_rec.party_rec.attribute14 := p1_a59;
952 ddp_relationship_rec.party_rec.attribute15 := p1_a60;
953 ddp_relationship_rec.party_rec.attribute16 := p1_a61;
954 ddp_relationship_rec.party_rec.attribute17 := p1_a62;
955 ddp_relationship_rec.party_rec.attribute18 := p1_a63;
956 ddp_relationship_rec.party_rec.attribute19 := p1_a64;
957 ddp_relationship_rec.party_rec.attribute20 := p1_a65;
958 ddp_relationship_rec.party_rec.attribute21 := p1_a66;
959 ddp_relationship_rec.party_rec.attribute22 := p1_a67;
960 ddp_relationship_rec.party_rec.attribute23 := p1_a68;
961 ddp_relationship_rec.party_rec.attribute24 := p1_a69;
962 ddp_relationship_rec.additional_information1 := p1_a70;
963 ddp_relationship_rec.additional_information2 := p1_a71;
964 ddp_relationship_rec.additional_information3 := p1_a72;
965 ddp_relationship_rec.additional_information4 := p1_a73;
966 ddp_relationship_rec.additional_information5 := p1_a74;
967 ddp_relationship_rec.additional_information6 := p1_a75;
968 ddp_relationship_rec.additional_information7 := p1_a76;
969 ddp_relationship_rec.additional_information8 := p1_a77;
970 ddp_relationship_rec.additional_information9 := p1_a78;
971 ddp_relationship_rec.additional_information10 := p1_a79;
972 ddp_relationship_rec.additional_information11 := p1_a80;
973 ddp_relationship_rec.additional_information12 := p1_a81;
974 ddp_relationship_rec.additional_information13 := p1_a82;
975 ddp_relationship_rec.additional_information14 := p1_a83;
976 ddp_relationship_rec.additional_information15 := p1_a84;
977 ddp_relationship_rec.additional_information16 := p1_a85;
978 ddp_relationship_rec.additional_information17 := p1_a86;
979 ddp_relationship_rec.additional_information18 := p1_a87;
980 ddp_relationship_rec.additional_information19 := p1_a88;
981 ddp_relationship_rec.additional_information20 := p1_a89;
982 ddp_relationship_rec.additional_information21 := p1_a90;
983 ddp_relationship_rec.additional_information22 := p1_a91;
984 ddp_relationship_rec.additional_information23 := p1_a92;
985 ddp_relationship_rec.additional_information24 := p1_a93;
986 ddp_relationship_rec.additional_information25 := p1_a94;
987 ddp_relationship_rec.additional_information26 := p1_a95;
988 ddp_relationship_rec.additional_information27 := p1_a96;
989 ddp_relationship_rec.additional_information28 := p1_a97;
990 ddp_relationship_rec.additional_information29 := p1_a98;
991 ddp_relationship_rec.additional_information30 := p1_a99;
992 ddp_relationship_rec.percentage_ownership := rosetta_g_miss_num_map(p1_a100);
993 ddp_relationship_rec.actual_content_source := p1_a101;
994
995
996
997
998
999
1000 -- here's the delegated call to the old PL/SQL routine
1001 hz_relationship_v2pub.update_relationship(p_init_msg_list,
1002 ddp_relationship_rec,
1003 p_object_version_number,
1004 p_party_object_version_number,
1005 x_return_status,
1006 x_msg_count,
1007 x_msg_data);
1008
1009 -- copy data back from the local OUT or IN-OUT args, if any
1010
1011
1012
1013
1014
1015
1016 end;
1017
1018 procedure get_relationship_rec_5(p_init_msg_list VARCHAR2
1019 , p_relationship_id NUMBER
1020 , p_directional_flag VARCHAR2
1021 , p3_a0 out nocopy NUMBER
1022 , p3_a1 out nocopy NUMBER
1023 , p3_a2 out nocopy VARCHAR2
1024 , p3_a3 out nocopy VARCHAR2
1025 , p3_a4 out nocopy NUMBER
1026 , p3_a5 out nocopy VARCHAR2
1027 , p3_a6 out nocopy VARCHAR2
1028 , p3_a7 out nocopy VARCHAR2
1029 , p3_a8 out nocopy VARCHAR2
1030 , p3_a9 out nocopy VARCHAR2
1031 , p3_a10 out nocopy DATE
1032 , p3_a11 out nocopy DATE
1033 , p3_a12 out nocopy VARCHAR2
1034 , p3_a13 out nocopy VARCHAR2
1035 , p3_a14 out nocopy VARCHAR2
1036 , p3_a15 out nocopy VARCHAR2
1037 , p3_a16 out nocopy VARCHAR2
1038 , p3_a17 out nocopy VARCHAR2
1039 , p3_a18 out nocopy VARCHAR2
1040 , p3_a19 out nocopy VARCHAR2
1041 , p3_a20 out nocopy VARCHAR2
1042 , p3_a21 out nocopy VARCHAR2
1043 , p3_a22 out nocopy VARCHAR2
1044 , p3_a23 out nocopy VARCHAR2
1045 , p3_a24 out nocopy VARCHAR2
1046 , p3_a25 out nocopy VARCHAR2
1047 , p3_a26 out nocopy VARCHAR2
1048 , p3_a27 out nocopy VARCHAR2
1049 , p3_a28 out nocopy VARCHAR2
1050 , p3_a29 out nocopy VARCHAR2
1051 , p3_a30 out nocopy VARCHAR2
1052 , p3_a31 out nocopy VARCHAR2
1053 , p3_a32 out nocopy VARCHAR2
1054 , p3_a33 out nocopy VARCHAR2
1055 , p3_a34 out nocopy VARCHAR2
1056 , p3_a35 out nocopy VARCHAR2
1057 , p3_a36 out nocopy NUMBER
1058 , p3_a37 out nocopy NUMBER
1059 , p3_a38 out nocopy VARCHAR2
1060 , p3_a39 out nocopy VARCHAR2
1061 , p3_a40 out nocopy VARCHAR2
1062 , p3_a41 out nocopy VARCHAR2
1063 , p3_a42 out nocopy VARCHAR2
1064 , p3_a43 out nocopy VARCHAR2
1065 , p3_a44 out nocopy VARCHAR2
1066 , p3_a45 out nocopy VARCHAR2
1067 , p3_a46 out nocopy VARCHAR2
1068 , p3_a47 out nocopy VARCHAR2
1069 , p3_a48 out nocopy VARCHAR2
1070 , p3_a49 out nocopy VARCHAR2
1071 , p3_a50 out nocopy VARCHAR2
1072 , p3_a51 out nocopy VARCHAR2
1073 , p3_a52 out nocopy VARCHAR2
1074 , p3_a53 out nocopy VARCHAR2
1075 , p3_a54 out nocopy VARCHAR2
1076 , p3_a55 out nocopy VARCHAR2
1077 , p3_a56 out nocopy VARCHAR2
1078 , p3_a57 out nocopy VARCHAR2
1079 , p3_a58 out nocopy VARCHAR2
1080 , p3_a59 out nocopy VARCHAR2
1081 , p3_a60 out nocopy VARCHAR2
1082 , p3_a61 out nocopy VARCHAR2
1083 , p3_a62 out nocopy VARCHAR2
1084 , p3_a63 out nocopy VARCHAR2
1085 , p3_a64 out nocopy VARCHAR2
1086 , p3_a65 out nocopy VARCHAR2
1087 , p3_a66 out nocopy VARCHAR2
1088 , p3_a67 out nocopy VARCHAR2
1089 , p3_a68 out nocopy VARCHAR2
1090 , p3_a69 out nocopy VARCHAR2
1091 , p3_a70 out nocopy VARCHAR2
1092 , p3_a71 out nocopy VARCHAR2
1093 , p3_a72 out nocopy VARCHAR2
1094 , p3_a73 out nocopy VARCHAR2
1095 , p3_a74 out nocopy VARCHAR2
1096 , p3_a75 out nocopy VARCHAR2
1097 , p3_a76 out nocopy VARCHAR2
1098 , p3_a77 out nocopy VARCHAR2
1099 , p3_a78 out nocopy VARCHAR2
1100 , p3_a79 out nocopy VARCHAR2
1101 , p3_a80 out nocopy VARCHAR2
1102 , p3_a81 out nocopy VARCHAR2
1103 , p3_a82 out nocopy VARCHAR2
1104 , p3_a83 out nocopy VARCHAR2
1105 , p3_a84 out nocopy VARCHAR2
1106 , p3_a85 out nocopy VARCHAR2
1107 , p3_a86 out nocopy VARCHAR2
1108 , p3_a87 out nocopy VARCHAR2
1109 , p3_a88 out nocopy VARCHAR2
1110 , p3_a89 out nocopy VARCHAR2
1111 , p3_a90 out nocopy VARCHAR2
1112 , p3_a91 out nocopy VARCHAR2
1113 , p3_a92 out nocopy VARCHAR2
1114 , p3_a93 out nocopy VARCHAR2
1115 , p3_a94 out nocopy VARCHAR2
1116 , p3_a95 out nocopy VARCHAR2
1117 , p3_a96 out nocopy VARCHAR2
1118 , p3_a97 out nocopy VARCHAR2
1119 , p3_a98 out nocopy VARCHAR2
1120 , p3_a99 out nocopy VARCHAR2
1121 , p3_a100 out nocopy NUMBER
1122 , p3_a101 out nocopy VARCHAR2
1123 , x_return_status out nocopy VARCHAR2
1124 , x_msg_count out nocopy NUMBER
1125 , x_msg_data out nocopy VARCHAR2
1126 )
1127 as
1128 ddx_rel_rec hz_relationship_v2pub.relationship_rec_type;
1129 ddindx binary_integer; indx binary_integer;
1130 begin
1131
1132 -- copy data to the local IN or IN-OUT args, if any
1133
1134
1135
1136
1137
1138
1139
1140 -- here's the delegated call to the old PL/SQL routine
1141 hz_relationship_v2pub.get_relationship_rec(p_init_msg_list,
1142 p_relationship_id,
1143 p_directional_flag,
1144 ddx_rel_rec,
1145 x_return_status,
1146 x_msg_count,
1147 x_msg_data);
1148
1149 -- copy data back from the local OUT or IN-OUT args, if any
1150
1151
1152
1153 p3_a0 := rosetta_g_miss_num_map(ddx_rel_rec.relationship_id);
1154 p3_a1 := rosetta_g_miss_num_map(ddx_rel_rec.subject_id);
1155 p3_a2 := ddx_rel_rec.subject_type;
1156 p3_a3 := ddx_rel_rec.subject_table_name;
1157 p3_a4 := rosetta_g_miss_num_map(ddx_rel_rec.object_id);
1158 p3_a5 := ddx_rel_rec.object_type;
1159 p3_a6 := ddx_rel_rec.object_table_name;
1160 p3_a7 := ddx_rel_rec.relationship_code;
1161 p3_a8 := ddx_rel_rec.relationship_type;
1162 p3_a9 := ddx_rel_rec.comments;
1163 p3_a10 := ddx_rel_rec.start_date;
1164 p3_a11 := ddx_rel_rec.end_date;
1165 p3_a12 := ddx_rel_rec.status;
1166 p3_a13 := ddx_rel_rec.content_source_type;
1167 p3_a14 := ddx_rel_rec.attribute_category;
1168 p3_a15 := ddx_rel_rec.attribute1;
1169 p3_a16 := ddx_rel_rec.attribute2;
1170 p3_a17 := ddx_rel_rec.attribute3;
1171 p3_a18 := ddx_rel_rec.attribute4;
1172 p3_a19 := ddx_rel_rec.attribute5;
1173 p3_a20 := ddx_rel_rec.attribute6;
1174 p3_a21 := ddx_rel_rec.attribute7;
1175 p3_a22 := ddx_rel_rec.attribute8;
1176 p3_a23 := ddx_rel_rec.attribute9;
1177 p3_a24 := ddx_rel_rec.attribute10;
1178 p3_a25 := ddx_rel_rec.attribute11;
1179 p3_a26 := ddx_rel_rec.attribute12;
1180 p3_a27 := ddx_rel_rec.attribute13;
1181 p3_a28 := ddx_rel_rec.attribute14;
1182 p3_a29 := ddx_rel_rec.attribute15;
1183 p3_a30 := ddx_rel_rec.attribute16;
1184 p3_a31 := ddx_rel_rec.attribute17;
1185 p3_a32 := ddx_rel_rec.attribute18;
1186 p3_a33 := ddx_rel_rec.attribute19;
1187 p3_a34 := ddx_rel_rec.attribute20;
1188 p3_a35 := ddx_rel_rec.created_by_module;
1189 p3_a36 := rosetta_g_miss_num_map(ddx_rel_rec.application_id);
1190 p3_a37 := rosetta_g_miss_num_map(ddx_rel_rec.party_rec.party_id);
1191 p3_a38 := ddx_rel_rec.party_rec.party_number;
1192 p3_a39 := ddx_rel_rec.party_rec.validated_flag;
1193 p3_a40 := ddx_rel_rec.party_rec.orig_system_reference;
1194 p3_a41 := ddx_rel_rec.party_rec.orig_system;
1195 p3_a42 := ddx_rel_rec.party_rec.status;
1196 p3_a43 := ddx_rel_rec.party_rec.category_code;
1197 p3_a44 := ddx_rel_rec.party_rec.salutation;
1198 p3_a45 := ddx_rel_rec.party_rec.attribute_category;
1199 p3_a46 := ddx_rel_rec.party_rec.attribute1;
1200 p3_a47 := ddx_rel_rec.party_rec.attribute2;
1201 p3_a48 := ddx_rel_rec.party_rec.attribute3;
1202 p3_a49 := ddx_rel_rec.party_rec.attribute4;
1203 p3_a50 := ddx_rel_rec.party_rec.attribute5;
1204 p3_a51 := ddx_rel_rec.party_rec.attribute6;
1205 p3_a52 := ddx_rel_rec.party_rec.attribute7;
1206 p3_a53 := ddx_rel_rec.party_rec.attribute8;
1207 p3_a54 := ddx_rel_rec.party_rec.attribute9;
1208 p3_a55 := ddx_rel_rec.party_rec.attribute10;
1209 p3_a56 := ddx_rel_rec.party_rec.attribute11;
1210 p3_a57 := ddx_rel_rec.party_rec.attribute12;
1211 p3_a58 := ddx_rel_rec.party_rec.attribute13;
1212 p3_a59 := ddx_rel_rec.party_rec.attribute14;
1213 p3_a60 := ddx_rel_rec.party_rec.attribute15;
1214 p3_a61 := ddx_rel_rec.party_rec.attribute16;
1215 p3_a62 := ddx_rel_rec.party_rec.attribute17;
1216 p3_a63 := ddx_rel_rec.party_rec.attribute18;
1217 p3_a64 := ddx_rel_rec.party_rec.attribute19;
1218 p3_a65 := ddx_rel_rec.party_rec.attribute20;
1219 p3_a66 := ddx_rel_rec.party_rec.attribute21;
1220 p3_a67 := ddx_rel_rec.party_rec.attribute22;
1221 p3_a68 := ddx_rel_rec.party_rec.attribute23;
1222 p3_a69 := ddx_rel_rec.party_rec.attribute24;
1223 p3_a70 := ddx_rel_rec.additional_information1;
1224 p3_a71 := ddx_rel_rec.additional_information2;
1225 p3_a72 := ddx_rel_rec.additional_information3;
1226 p3_a73 := ddx_rel_rec.additional_information4;
1227 p3_a74 := ddx_rel_rec.additional_information5;
1228 p3_a75 := ddx_rel_rec.additional_information6;
1229 p3_a76 := ddx_rel_rec.additional_information7;
1230 p3_a77 := ddx_rel_rec.additional_information8;
1231 p3_a78 := ddx_rel_rec.additional_information9;
1232 p3_a79 := ddx_rel_rec.additional_information10;
1233 p3_a80 := ddx_rel_rec.additional_information11;
1234 p3_a81 := ddx_rel_rec.additional_information12;
1235 p3_a82 := ddx_rel_rec.additional_information13;
1236 p3_a83 := ddx_rel_rec.additional_information14;
1237 p3_a84 := ddx_rel_rec.additional_information15;
1238 p3_a85 := ddx_rel_rec.additional_information16;
1239 p3_a86 := ddx_rel_rec.additional_information17;
1240 p3_a87 := ddx_rel_rec.additional_information18;
1241 p3_a88 := ddx_rel_rec.additional_information19;
1242 p3_a89 := ddx_rel_rec.additional_information20;
1243 p3_a90 := ddx_rel_rec.additional_information21;
1244 p3_a91 := ddx_rel_rec.additional_information22;
1245 p3_a92 := ddx_rel_rec.additional_information23;
1246 p3_a93 := ddx_rel_rec.additional_information24;
1247 p3_a94 := ddx_rel_rec.additional_information25;
1248 p3_a95 := ddx_rel_rec.additional_information26;
1249 p3_a96 := ddx_rel_rec.additional_information27;
1250 p3_a97 := ddx_rel_rec.additional_information28;
1251 p3_a98 := ddx_rel_rec.additional_information29;
1252 p3_a99 := ddx_rel_rec.additional_information30;
1253 p3_a100 := rosetta_g_miss_num_map(ddx_rel_rec.percentage_ownership);
1254 p3_a101 := ddx_rel_rec.actual_content_source;
1255
1256
1257
1258 end;
1259
1260 end hz_relationship_v2pub_jw;