DBA Data[Home] [Help]

PACKAGE BODY: APPS.HZ_CUST_ACCOUNT_ROLE_V2PUB_JW

Source


1 package body hz_cust_account_role_v2pub_jw as
2   /* $Header: ARH2CRJB.pls 120.3 2005/06/18 04:27:50 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_cust_account_role_1(p_init_msg_list  VARCHAR2
23     , x_cust_account_role_id out nocopy  NUMBER
24     , x_return_status out nocopy  VARCHAR2
25     , x_msg_count out nocopy  NUMBER
26     , x_msg_data out nocopy  VARCHAR2
27     , p1_a0  NUMBER := null
28     , p1_a1  NUMBER := null
29     , p1_a2  NUMBER := null
30     , p1_a3  NUMBER := null
31     , p1_a4  VARCHAR2 := null
32     , p1_a5  VARCHAR2 := null
33     , p1_a6  VARCHAR2 := null
34     , p1_a7  VARCHAR2 := null
35     , p1_a8  VARCHAR2 := null
36     , p1_a9  VARCHAR2 := null
37     , p1_a10  VARCHAR2 := null
38     , p1_a11  VARCHAR2 := null
39     , p1_a12  VARCHAR2 := null
40     , p1_a13  VARCHAR2 := null
41     , p1_a14  VARCHAR2 := null
42     , p1_a15  VARCHAR2 := null
43     , p1_a16  VARCHAR2 := null
44     , p1_a17  VARCHAR2 := null
45     , p1_a18  VARCHAR2 := null
46     , p1_a19  VARCHAR2 := null
47     , p1_a20  VARCHAR2 := null
48     , p1_a21  VARCHAR2 := null
49     , p1_a22  VARCHAR2 := null
50     , p1_a23  VARCHAR2 := null
51     , p1_a24  VARCHAR2 := null
52     , p1_a25  VARCHAR2 := null
53     , p1_a26  VARCHAR2 := null
54     , p1_a27  VARCHAR2 := null
55     , p1_a28  VARCHAR2 := null
56     , p1_a29  VARCHAR2 := null
57     , p1_a30  VARCHAR2 := null
58     , p1_a31  VARCHAR2 := null
59     , p1_a32  VARCHAR2 := null
60     , p1_a33  VARCHAR2 := null
61     , p1_a34  VARCHAR2 := null
62     , p1_a35  VARCHAR2 := null
63     , p1_a36  VARCHAR2 := null
64     , p1_a37  NUMBER := null
65   )
66   as
67     ddp_cust_account_role_rec hz_cust_account_role_v2pub.cust_account_role_rec_type;
68     ddindx binary_integer; indx binary_integer;
69   begin
70 
71     -- copy data to the local IN or IN-OUT args, if any
72 
73     ddp_cust_account_role_rec.cust_account_role_id := rosetta_g_miss_num_map(p1_a0);
74     ddp_cust_account_role_rec.party_id := rosetta_g_miss_num_map(p1_a1);
75     ddp_cust_account_role_rec.cust_account_id := rosetta_g_miss_num_map(p1_a2);
76     ddp_cust_account_role_rec.cust_acct_site_id := rosetta_g_miss_num_map(p1_a3);
77     ddp_cust_account_role_rec.primary_flag := p1_a4;
78     ddp_cust_account_role_rec.role_type := p1_a5;
79     ddp_cust_account_role_rec.source_code := p1_a6;
80     ddp_cust_account_role_rec.attribute_category := p1_a7;
81     ddp_cust_account_role_rec.attribute1 := p1_a8;
82     ddp_cust_account_role_rec.attribute2 := p1_a9;
83     ddp_cust_account_role_rec.attribute3 := p1_a10;
84     ddp_cust_account_role_rec.attribute4 := p1_a11;
85     ddp_cust_account_role_rec.attribute5 := p1_a12;
86     ddp_cust_account_role_rec.attribute6 := p1_a13;
87     ddp_cust_account_role_rec.attribute7 := p1_a14;
88     ddp_cust_account_role_rec.attribute8 := p1_a15;
89     ddp_cust_account_role_rec.attribute9 := p1_a16;
90     ddp_cust_account_role_rec.attribute10 := p1_a17;
91     ddp_cust_account_role_rec.attribute11 := p1_a18;
92     ddp_cust_account_role_rec.attribute12 := p1_a19;
93     ddp_cust_account_role_rec.attribute13 := p1_a20;
94     ddp_cust_account_role_rec.attribute14 := p1_a21;
95     ddp_cust_account_role_rec.attribute15 := p1_a22;
96     ddp_cust_account_role_rec.attribute16 := p1_a23;
97     ddp_cust_account_role_rec.attribute17 := p1_a24;
98     ddp_cust_account_role_rec.attribute18 := p1_a25;
99     ddp_cust_account_role_rec.attribute19 := p1_a26;
100     ddp_cust_account_role_rec.attribute20 := p1_a27;
101     ddp_cust_account_role_rec.attribute21 := p1_a28;
102     ddp_cust_account_role_rec.attribute22 := p1_a29;
103     ddp_cust_account_role_rec.attribute23 := p1_a30;
104     ddp_cust_account_role_rec.attribute24 := p1_a31;
105     ddp_cust_account_role_rec.orig_system_reference := p1_a32;
106     ddp_cust_account_role_rec.orig_system := p1_a33;
107     ddp_cust_account_role_rec.attribute25 := p1_a34;
108     ddp_cust_account_role_rec.status := p1_a35;
109     ddp_cust_account_role_rec.created_by_module := p1_a36;
110     ddp_cust_account_role_rec.application_id := rosetta_g_miss_num_map(p1_a37);
111 
112 
113 
114 
115 
116     -- here's the delegated call to the old PL/SQL routine
117     hz_cust_account_role_v2pub.create_cust_account_role(p_init_msg_list,
118       ddp_cust_account_role_rec,
119       x_cust_account_role_id,
120       x_return_status,
121       x_msg_count,
122       x_msg_data);
123 
124     -- copy data back from the local OUT or IN-OUT args, if any
125 
126 
127 
128 
129 
130   end;
131 
132   procedure update_cust_account_role_2(p_init_msg_list  VARCHAR2
133     , p_object_version_number in out nocopy  NUMBER
134     , x_return_status out nocopy  VARCHAR2
135     , x_msg_count out nocopy  NUMBER
136     , x_msg_data out nocopy  VARCHAR2
137     , p1_a0  NUMBER := null
138     , p1_a1  NUMBER := null
139     , p1_a2  NUMBER := null
140     , p1_a3  NUMBER := null
141     , p1_a4  VARCHAR2 := null
142     , p1_a5  VARCHAR2 := null
143     , p1_a6  VARCHAR2 := null
144     , p1_a7  VARCHAR2 := null
145     , p1_a8  VARCHAR2 := null
146     , p1_a9  VARCHAR2 := null
147     , p1_a10  VARCHAR2 := null
148     , p1_a11  VARCHAR2 := null
149     , p1_a12  VARCHAR2 := null
150     , p1_a13  VARCHAR2 := null
151     , p1_a14  VARCHAR2 := null
152     , p1_a15  VARCHAR2 := null
153     , p1_a16  VARCHAR2 := null
154     , p1_a17  VARCHAR2 := null
155     , p1_a18  VARCHAR2 := null
156     , p1_a19  VARCHAR2 := null
157     , p1_a20  VARCHAR2 := null
158     , p1_a21  VARCHAR2 := null
159     , p1_a22  VARCHAR2 := null
160     , p1_a23  VARCHAR2 := null
161     , p1_a24  VARCHAR2 := null
162     , p1_a25  VARCHAR2 := null
163     , p1_a26  VARCHAR2 := null
164     , p1_a27  VARCHAR2 := null
165     , p1_a28  VARCHAR2 := null
166     , p1_a29  VARCHAR2 := null
167     , p1_a30  VARCHAR2 := null
168     , p1_a31  VARCHAR2 := null
169     , p1_a32  VARCHAR2 := null
170     , p1_a33  VARCHAR2 := null
171     , p1_a34  VARCHAR2 := null
172     , p1_a35  VARCHAR2 := null
173     , p1_a36  VARCHAR2 := null
174     , p1_a37  NUMBER := null
175   )
176   as
177     ddp_cust_account_role_rec hz_cust_account_role_v2pub.cust_account_role_rec_type;
178     ddindx binary_integer; indx binary_integer;
179   begin
180 
181     -- copy data to the local IN or IN-OUT args, if any
182 
183     ddp_cust_account_role_rec.cust_account_role_id := rosetta_g_miss_num_map(p1_a0);
184     ddp_cust_account_role_rec.party_id := rosetta_g_miss_num_map(p1_a1);
185     ddp_cust_account_role_rec.cust_account_id := rosetta_g_miss_num_map(p1_a2);
186     ddp_cust_account_role_rec.cust_acct_site_id := rosetta_g_miss_num_map(p1_a3);
187     ddp_cust_account_role_rec.primary_flag := p1_a4;
188     ddp_cust_account_role_rec.role_type := p1_a5;
189     ddp_cust_account_role_rec.source_code := p1_a6;
190     ddp_cust_account_role_rec.attribute_category := p1_a7;
191     ddp_cust_account_role_rec.attribute1 := p1_a8;
192     ddp_cust_account_role_rec.attribute2 := p1_a9;
193     ddp_cust_account_role_rec.attribute3 := p1_a10;
194     ddp_cust_account_role_rec.attribute4 := p1_a11;
195     ddp_cust_account_role_rec.attribute5 := p1_a12;
196     ddp_cust_account_role_rec.attribute6 := p1_a13;
197     ddp_cust_account_role_rec.attribute7 := p1_a14;
198     ddp_cust_account_role_rec.attribute8 := p1_a15;
199     ddp_cust_account_role_rec.attribute9 := p1_a16;
200     ddp_cust_account_role_rec.attribute10 := p1_a17;
201     ddp_cust_account_role_rec.attribute11 := p1_a18;
202     ddp_cust_account_role_rec.attribute12 := p1_a19;
203     ddp_cust_account_role_rec.attribute13 := p1_a20;
204     ddp_cust_account_role_rec.attribute14 := p1_a21;
205     ddp_cust_account_role_rec.attribute15 := p1_a22;
206     ddp_cust_account_role_rec.attribute16 := p1_a23;
207     ddp_cust_account_role_rec.attribute17 := p1_a24;
208     ddp_cust_account_role_rec.attribute18 := p1_a25;
209     ddp_cust_account_role_rec.attribute19 := p1_a26;
210     ddp_cust_account_role_rec.attribute20 := p1_a27;
211     ddp_cust_account_role_rec.attribute21 := p1_a28;
212     ddp_cust_account_role_rec.attribute22 := p1_a29;
213     ddp_cust_account_role_rec.attribute23 := p1_a30;
214     ddp_cust_account_role_rec.attribute24 := p1_a31;
215     ddp_cust_account_role_rec.orig_system_reference := p1_a32;
216     ddp_cust_account_role_rec.orig_system := p1_a33;
217     ddp_cust_account_role_rec.attribute25 := p1_a34;
218     ddp_cust_account_role_rec.status := p1_a35;
219     ddp_cust_account_role_rec.created_by_module := p1_a36;
220     ddp_cust_account_role_rec.application_id := rosetta_g_miss_num_map(p1_a37);
221 
222 
223 
224 
225 
226     -- here's the delegated call to the old PL/SQL routine
227     hz_cust_account_role_v2pub.update_cust_account_role(p_init_msg_list,
228       ddp_cust_account_role_rec,
229       p_object_version_number,
230       x_return_status,
231       x_msg_count,
232       x_msg_data);
233 
234     -- copy data back from the local OUT or IN-OUT args, if any
235 
236 
237 
238 
239 
240   end;
241 
242   procedure get_cust_account_role_rec_3(p_init_msg_list  VARCHAR2
243     , p_cust_account_role_id  NUMBER
244     , p2_a0 out nocopy  NUMBER
245     , p2_a1 out nocopy  NUMBER
246     , p2_a2 out nocopy  NUMBER
247     , p2_a3 out nocopy  NUMBER
248     , p2_a4 out nocopy  VARCHAR2
249     , p2_a5 out nocopy  VARCHAR2
250     , p2_a6 out nocopy  VARCHAR2
251     , p2_a7 out nocopy  VARCHAR2
252     , p2_a8 out nocopy  VARCHAR2
253     , p2_a9 out nocopy  VARCHAR2
254     , p2_a10 out nocopy  VARCHAR2
255     , p2_a11 out nocopy  VARCHAR2
256     , p2_a12 out nocopy  VARCHAR2
257     , p2_a13 out nocopy  VARCHAR2
258     , p2_a14 out nocopy  VARCHAR2
259     , p2_a15 out nocopy  VARCHAR2
260     , p2_a16 out nocopy  VARCHAR2
261     , p2_a17 out nocopy  VARCHAR2
262     , p2_a18 out nocopy  VARCHAR2
263     , p2_a19 out nocopy  VARCHAR2
264     , p2_a20 out nocopy  VARCHAR2
265     , p2_a21 out nocopy  VARCHAR2
266     , p2_a22 out nocopy  VARCHAR2
267     , p2_a23 out nocopy  VARCHAR2
268     , p2_a24 out nocopy  VARCHAR2
269     , p2_a25 out nocopy  VARCHAR2
270     , p2_a26 out nocopy  VARCHAR2
271     , p2_a27 out nocopy  VARCHAR2
272     , p2_a28 out nocopy  VARCHAR2
273     , p2_a29 out nocopy  VARCHAR2
274     , p2_a30 out nocopy  VARCHAR2
275     , p2_a31 out nocopy  VARCHAR2
276     , p2_a32 out nocopy  VARCHAR2
277     , p2_a33 out nocopy  VARCHAR2
278     , p2_a34 out nocopy  VARCHAR2
279     , p2_a35 out nocopy  VARCHAR2
280     , p2_a36 out nocopy  VARCHAR2
281     , p2_a37 out nocopy  NUMBER
282     , x_return_status out nocopy  VARCHAR2
283     , x_msg_count out nocopy  NUMBER
284     , x_msg_data out nocopy  VARCHAR2
285   )
286   as
287     ddx_cust_account_role_rec hz_cust_account_role_v2pub.cust_account_role_rec_type;
288     ddindx binary_integer; indx binary_integer;
289   begin
290 
291     -- copy data to the local IN or IN-OUT args, if any
292 
293 
294 
295 
296 
297 
298     -- here's the delegated call to the old PL/SQL routine
299     hz_cust_account_role_v2pub.get_cust_account_role_rec(p_init_msg_list,
300       p_cust_account_role_id,
301       ddx_cust_account_role_rec,
302       x_return_status,
303       x_msg_count,
304       x_msg_data);
305 
306     -- copy data back from the local OUT or IN-OUT args, if any
307 
308 
309     p2_a0 := rosetta_g_miss_num_map(ddx_cust_account_role_rec.cust_account_role_id);
310     p2_a1 := rosetta_g_miss_num_map(ddx_cust_account_role_rec.party_id);
311     p2_a2 := rosetta_g_miss_num_map(ddx_cust_account_role_rec.cust_account_id);
312     p2_a3 := rosetta_g_miss_num_map(ddx_cust_account_role_rec.cust_acct_site_id);
313     p2_a4 := ddx_cust_account_role_rec.primary_flag;
314     p2_a5 := ddx_cust_account_role_rec.role_type;
315     p2_a6 := ddx_cust_account_role_rec.source_code;
316     p2_a7 := ddx_cust_account_role_rec.attribute_category;
317     p2_a8 := ddx_cust_account_role_rec.attribute1;
318     p2_a9 := ddx_cust_account_role_rec.attribute2;
319     p2_a10 := ddx_cust_account_role_rec.attribute3;
320     p2_a11 := ddx_cust_account_role_rec.attribute4;
321     p2_a12 := ddx_cust_account_role_rec.attribute5;
322     p2_a13 := ddx_cust_account_role_rec.attribute6;
323     p2_a14 := ddx_cust_account_role_rec.attribute7;
324     p2_a15 := ddx_cust_account_role_rec.attribute8;
325     p2_a16 := ddx_cust_account_role_rec.attribute9;
326     p2_a17 := ddx_cust_account_role_rec.attribute10;
327     p2_a18 := ddx_cust_account_role_rec.attribute11;
328     p2_a19 := ddx_cust_account_role_rec.attribute12;
329     p2_a20 := ddx_cust_account_role_rec.attribute13;
330     p2_a21 := ddx_cust_account_role_rec.attribute14;
331     p2_a22 := ddx_cust_account_role_rec.attribute15;
332     p2_a23 := ddx_cust_account_role_rec.attribute16;
333     p2_a24 := ddx_cust_account_role_rec.attribute17;
334     p2_a25 := ddx_cust_account_role_rec.attribute18;
335     p2_a26 := ddx_cust_account_role_rec.attribute19;
336     p2_a27 := ddx_cust_account_role_rec.attribute20;
337     p2_a28 := ddx_cust_account_role_rec.attribute21;
338     p2_a29 := ddx_cust_account_role_rec.attribute22;
339     p2_a30 := ddx_cust_account_role_rec.attribute23;
340     p2_a31 := ddx_cust_account_role_rec.attribute24;
341     p2_a32 := ddx_cust_account_role_rec.orig_system_reference;
342     p2_a33 := ddx_cust_account_role_rec.orig_system;
343     p2_a34 := ddx_cust_account_role_rec.attribute25;
344     p2_a35 := ddx_cust_account_role_rec.status;
345     p2_a36 := ddx_cust_account_role_rec.created_by_module;
346     p2_a37 := rosetta_g_miss_num_map(ddx_cust_account_role_rec.application_id);
347 
348 
349 
350   end;
351 
352   procedure create_role_responsibility_4(p_init_msg_list  VARCHAR2
353     , x_responsibility_id out nocopy  NUMBER
354     , x_return_status out nocopy  VARCHAR2
355     , x_msg_count out nocopy  NUMBER
356     , x_msg_data out nocopy  VARCHAR2
357     , p1_a0  NUMBER := null
358     , p1_a1  NUMBER := null
359     , p1_a2  VARCHAR2 := null
360     , p1_a3  VARCHAR2 := null
361     , p1_a4  VARCHAR2 := null
362     , p1_a5  VARCHAR2 := null
363     , p1_a6  VARCHAR2 := null
364     , p1_a7  VARCHAR2 := null
365     , p1_a8  VARCHAR2 := null
366     , p1_a9  VARCHAR2 := null
367     , p1_a10  VARCHAR2 := null
368     , p1_a11  VARCHAR2 := null
369     , p1_a12  VARCHAR2 := null
370     , p1_a13  VARCHAR2 := null
371     , p1_a14  VARCHAR2 := null
372     , p1_a15  VARCHAR2 := null
373     , p1_a16  VARCHAR2 := null
374     , p1_a17  VARCHAR2 := null
375     , p1_a18  VARCHAR2 := null
376     , p1_a19  VARCHAR2 := null
377     , p1_a20  VARCHAR2 := null
378     , p1_a21  VARCHAR2 := null
379     , p1_a22  NUMBER := null
380   )
381   as
382     ddp_role_responsibility_rec hz_cust_account_role_v2pub.role_responsibility_rec_type;
383     ddindx binary_integer; indx binary_integer;
384   begin
385 
386     -- copy data to the local IN or IN-OUT args, if any
387 
388     ddp_role_responsibility_rec.responsibility_id := rosetta_g_miss_num_map(p1_a0);
389     ddp_role_responsibility_rec.cust_account_role_id := rosetta_g_miss_num_map(p1_a1);
390     ddp_role_responsibility_rec.responsibility_type := p1_a2;
391     ddp_role_responsibility_rec.primary_flag := p1_a3;
392     ddp_role_responsibility_rec.attribute_category := p1_a4;
393     ddp_role_responsibility_rec.attribute1 := p1_a5;
394     ddp_role_responsibility_rec.attribute2 := p1_a6;
395     ddp_role_responsibility_rec.attribute3 := p1_a7;
396     ddp_role_responsibility_rec.attribute4 := p1_a8;
397     ddp_role_responsibility_rec.attribute5 := p1_a9;
398     ddp_role_responsibility_rec.attribute6 := p1_a10;
399     ddp_role_responsibility_rec.attribute7 := p1_a11;
400     ddp_role_responsibility_rec.attribute8 := p1_a12;
401     ddp_role_responsibility_rec.attribute9 := p1_a13;
402     ddp_role_responsibility_rec.attribute10 := p1_a14;
403     ddp_role_responsibility_rec.attribute11 := p1_a15;
404     ddp_role_responsibility_rec.attribute12 := p1_a16;
405     ddp_role_responsibility_rec.attribute13 := p1_a17;
406     ddp_role_responsibility_rec.attribute14 := p1_a18;
407     ddp_role_responsibility_rec.attribute15 := p1_a19;
408     ddp_role_responsibility_rec.orig_system_reference := p1_a20;
409     ddp_role_responsibility_rec.created_by_module := p1_a21;
410     ddp_role_responsibility_rec.application_id := rosetta_g_miss_num_map(p1_a22);
411 
412 
413 
414 
415 
416     -- here's the delegated call to the old PL/SQL routine
417     hz_cust_account_role_v2pub.create_role_responsibility(p_init_msg_list,
418       ddp_role_responsibility_rec,
419       x_responsibility_id,
420       x_return_status,
421       x_msg_count,
422       x_msg_data);
423 
424     -- copy data back from the local OUT or IN-OUT args, if any
425 
426 
427 
428 
429 
430   end;
431 
432   procedure update_role_responsibility_5(p_init_msg_list  VARCHAR2
433     , p_object_version_number in out nocopy  NUMBER
434     , x_return_status out nocopy  VARCHAR2
435     , x_msg_count out nocopy  NUMBER
436     , x_msg_data out nocopy  VARCHAR2
437     , p1_a0  NUMBER := null
438     , p1_a1  NUMBER := null
439     , p1_a2  VARCHAR2 := null
440     , p1_a3  VARCHAR2 := null
441     , p1_a4  VARCHAR2 := null
442     , p1_a5  VARCHAR2 := null
443     , p1_a6  VARCHAR2 := null
444     , p1_a7  VARCHAR2 := null
445     , p1_a8  VARCHAR2 := null
446     , p1_a9  VARCHAR2 := null
447     , p1_a10  VARCHAR2 := null
448     , p1_a11  VARCHAR2 := null
449     , p1_a12  VARCHAR2 := null
450     , p1_a13  VARCHAR2 := null
451     , p1_a14  VARCHAR2 := null
452     , p1_a15  VARCHAR2 := null
453     , p1_a16  VARCHAR2 := null
454     , p1_a17  VARCHAR2 := null
455     , p1_a18  VARCHAR2 := null
456     , p1_a19  VARCHAR2 := null
457     , p1_a20  VARCHAR2 := null
458     , p1_a21  VARCHAR2 := null
459     , p1_a22  NUMBER := null
460   )
461   as
462     ddp_role_responsibility_rec hz_cust_account_role_v2pub.role_responsibility_rec_type;
463     ddindx binary_integer; indx binary_integer;
464   begin
465 
466     -- copy data to the local IN or IN-OUT args, if any
467 
468     ddp_role_responsibility_rec.responsibility_id := rosetta_g_miss_num_map(p1_a0);
469     ddp_role_responsibility_rec.cust_account_role_id := rosetta_g_miss_num_map(p1_a1);
470     ddp_role_responsibility_rec.responsibility_type := p1_a2;
471     ddp_role_responsibility_rec.primary_flag := p1_a3;
472     ddp_role_responsibility_rec.attribute_category := p1_a4;
473     ddp_role_responsibility_rec.attribute1 := p1_a5;
474     ddp_role_responsibility_rec.attribute2 := p1_a6;
475     ddp_role_responsibility_rec.attribute3 := p1_a7;
476     ddp_role_responsibility_rec.attribute4 := p1_a8;
477     ddp_role_responsibility_rec.attribute5 := p1_a9;
478     ddp_role_responsibility_rec.attribute6 := p1_a10;
479     ddp_role_responsibility_rec.attribute7 := p1_a11;
480     ddp_role_responsibility_rec.attribute8 := p1_a12;
481     ddp_role_responsibility_rec.attribute9 := p1_a13;
482     ddp_role_responsibility_rec.attribute10 := p1_a14;
483     ddp_role_responsibility_rec.attribute11 := p1_a15;
484     ddp_role_responsibility_rec.attribute12 := p1_a16;
485     ddp_role_responsibility_rec.attribute13 := p1_a17;
486     ddp_role_responsibility_rec.attribute14 := p1_a18;
487     ddp_role_responsibility_rec.attribute15 := p1_a19;
488     ddp_role_responsibility_rec.orig_system_reference := p1_a20;
489     ddp_role_responsibility_rec.created_by_module := p1_a21;
490     ddp_role_responsibility_rec.application_id := rosetta_g_miss_num_map(p1_a22);
491 
492 
493 
494 
495 
496     -- here's the delegated call to the old PL/SQL routine
497     hz_cust_account_role_v2pub.update_role_responsibility(p_init_msg_list,
498       ddp_role_responsibility_rec,
499       p_object_version_number,
500       x_return_status,
501       x_msg_count,
502       x_msg_data);
503 
504     -- copy data back from the local OUT or IN-OUT args, if any
505 
506 
507 
508 
509 
510   end;
511 
512   procedure get_role_responsibility_rec_6(p_init_msg_list  VARCHAR2
513     , p_responsibility_id  NUMBER
514     , p2_a0 out nocopy  NUMBER
515     , p2_a1 out nocopy  NUMBER
516     , p2_a2 out nocopy  VARCHAR2
517     , p2_a3 out nocopy  VARCHAR2
518     , p2_a4 out nocopy  VARCHAR2
519     , p2_a5 out nocopy  VARCHAR2
520     , p2_a6 out nocopy  VARCHAR2
521     , p2_a7 out nocopy  VARCHAR2
522     , p2_a8 out nocopy  VARCHAR2
523     , p2_a9 out nocopy  VARCHAR2
524     , p2_a10 out nocopy  VARCHAR2
525     , p2_a11 out nocopy  VARCHAR2
526     , p2_a12 out nocopy  VARCHAR2
527     , p2_a13 out nocopy  VARCHAR2
528     , p2_a14 out nocopy  VARCHAR2
529     , p2_a15 out nocopy  VARCHAR2
530     , p2_a16 out nocopy  VARCHAR2
531     , p2_a17 out nocopy  VARCHAR2
532     , p2_a18 out nocopy  VARCHAR2
533     , p2_a19 out nocopy  VARCHAR2
534     , p2_a20 out nocopy  VARCHAR2
535     , p2_a21 out nocopy  VARCHAR2
536     , p2_a22 out nocopy  NUMBER
537     , x_return_status out nocopy  VARCHAR2
538     , x_msg_count out nocopy  NUMBER
539     , x_msg_data out nocopy  VARCHAR2
540   )
541   as
542     ddx_role_responsibility_rec hz_cust_account_role_v2pub.role_responsibility_rec_type;
543     ddindx binary_integer; indx binary_integer;
544   begin
545 
546     -- copy data to the local IN or IN-OUT args, if any
547 
548 
549 
550 
551 
552 
553     -- here's the delegated call to the old PL/SQL routine
554     hz_cust_account_role_v2pub.get_role_responsibility_rec(p_init_msg_list,
555       p_responsibility_id,
556       ddx_role_responsibility_rec,
557       x_return_status,
558       x_msg_count,
559       x_msg_data);
560 
561     -- copy data back from the local OUT or IN-OUT args, if any
562 
563 
564     p2_a0 := rosetta_g_miss_num_map(ddx_role_responsibility_rec.responsibility_id);
565     p2_a1 := rosetta_g_miss_num_map(ddx_role_responsibility_rec.cust_account_role_id);
566     p2_a2 := ddx_role_responsibility_rec.responsibility_type;
567     p2_a3 := ddx_role_responsibility_rec.primary_flag;
568     p2_a4 := ddx_role_responsibility_rec.attribute_category;
569     p2_a5 := ddx_role_responsibility_rec.attribute1;
570     p2_a6 := ddx_role_responsibility_rec.attribute2;
571     p2_a7 := ddx_role_responsibility_rec.attribute3;
572     p2_a8 := ddx_role_responsibility_rec.attribute4;
573     p2_a9 := ddx_role_responsibility_rec.attribute5;
574     p2_a10 := ddx_role_responsibility_rec.attribute6;
575     p2_a11 := ddx_role_responsibility_rec.attribute7;
576     p2_a12 := ddx_role_responsibility_rec.attribute8;
577     p2_a13 := ddx_role_responsibility_rec.attribute9;
578     p2_a14 := ddx_role_responsibility_rec.attribute10;
579     p2_a15 := ddx_role_responsibility_rec.attribute11;
580     p2_a16 := ddx_role_responsibility_rec.attribute12;
581     p2_a17 := ddx_role_responsibility_rec.attribute13;
582     p2_a18 := ddx_role_responsibility_rec.attribute14;
583     p2_a19 := ddx_role_responsibility_rec.attribute15;
584     p2_a20 := ddx_role_responsibility_rec.orig_system_reference;
585     p2_a21 := ddx_role_responsibility_rec.created_by_module;
586     p2_a22 := rosetta_g_miss_num_map(ddx_role_responsibility_rec.application_id);
587 
588 
589 
590   end;
591 
592 end hz_cust_account_role_v2pub_jw;