[Home] [Help]
PACKAGE BODY: APPS.PVX_MISC_PVT_W
Source
1 package body pvx_misc_pvt_w as
2 /* $Header: pvxwmisb.pls 115.18 2002/11/21 08:07:35 anubhavk 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 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 admin_access(p_api_version NUMBER
23 , p_init_msg_list VARCHAR2
24 , p_commit VARCHAR2
25 , p_validation_level NUMBER
26 , x_return_status out nocopy VARCHAR2
27 , x_msg_count out nocopy NUMBER
28 , x_msg_data out nocopy VARCHAR2
29 , p_mode VARCHAR2
30 , x_access_id out nocopy NUMBER
31 , p7_a0 NUMBER := 0-1962.0724
32 , p7_a1 NUMBER := 0-1962.0724
33 , p7_a2 NUMBER := 0-1962.0724
34 , p7_a3 NUMBER := 0-1962.0724
35 , p7_a4 NUMBER := 0-1962.0724
36 , p7_a5 NUMBER := 0-1962.0724
37 , p7_a6 NUMBER := 0-1962.0724
38 , p7_a7 NUMBER := 0-1962.0724
39 , p7_a8 NUMBER := 0-1962.0724
40 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
41 , p7_a10 NUMBER := 0-1962.0724
42 , p7_a11 VARCHAR2 := fnd_api.g_miss_char
43 , p7_a12 VARCHAR2 := fnd_api.g_miss_char
44 , p7_a13 VARCHAR2 := fnd_api.g_miss_char
45 , p7_a14 NUMBER := 0-1962.0724
46 , p7_a15 VARCHAR2 := fnd_api.g_miss_char
47 , p7_a16 VARCHAR2 := fnd_api.g_miss_char
48 , p7_a17 VARCHAR2 := fnd_api.g_miss_char
49 , p7_a18 VARCHAR2 := fnd_api.g_miss_char
50 , p7_a19 VARCHAR2 := fnd_api.g_miss_char
51 , p7_a20 NUMBER := 0-1962.0724
52 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
53 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
54 , p7_a23 VARCHAR2 := fnd_api.g_miss_char
55 , p7_a24 VARCHAR2 := fnd_api.g_miss_char
56 , p7_a25 NUMBER := 0-1962.0724
57 , p7_a26 NUMBER := 0-1962.0724
58 )
59
60 as
61 ddp_admin_rec pvx_misc_pvt.admin_rec_type;
62 ddindx binary_integer; indx binary_integer;
63 begin
64
65 -- copy data to the local IN or IN-OUT args, if any
66
67
68
69
70
71
72
73 ddp_admin_rec.partner_profile_id := rosetta_g_miss_num_map(p7_a0);
74 ddp_admin_rec.logged_resource_id := rosetta_g_miss_num_map(p7_a1);
75 ddp_admin_rec.cm_id := rosetta_g_miss_num_map(p7_a2);
76 ddp_admin_rec.ph_support_rep := rosetta_g_miss_num_map(p7_a3);
77 ddp_admin_rec.cmm_id := rosetta_g_miss_num_map(p7_a4);
78 ddp_admin_rec.partner_id := rosetta_g_miss_num_map(p7_a5);
79 ddp_admin_rec.partner_relationship_id := rosetta_g_miss_num_map(p7_a6);
80 ddp_admin_rec.contact_id := rosetta_g_miss_num_map(p7_a7);
81 ddp_admin_rec.user_id := rosetta_g_miss_num_map(p7_a8);
82 ddp_admin_rec.resource_type := p7_a9;
83 ddp_admin_rec.role_resource_id := rosetta_g_miss_num_map(p7_a10);
84 ddp_admin_rec.role_resource_type := p7_a11;
85 ddp_admin_rec.role_code := p7_a12;
86 ddp_admin_rec.resource_number := p7_a13;
87 ddp_admin_rec.group_id := rosetta_g_miss_num_map(p7_a14);
88 ddp_admin_rec.group_number := p7_a15;
89 ddp_admin_rec.group_usage := p7_a16;
90 ddp_admin_rec.source_name := p7_a17;
91 ddp_admin_rec.resource_name := p7_a18;
92 ddp_admin_rec.source_org_name := p7_a19;
93 ddp_admin_rec.source_org_id := rosetta_g_miss_num_map(p7_a20);
94 ddp_admin_rec.user_name := p7_a21;
95 ddp_admin_rec.source_first_name := p7_a22;
96 ddp_admin_rec.source_middle_name := p7_a23;
97 ddp_admin_rec.source_last_name := p7_a24;
98 ddp_admin_rec.party_site_id := rosetta_g_miss_num_map(p7_a25);
99 ddp_admin_rec.object_version_number := rosetta_g_miss_num_map(p7_a26);
100
101
102
103 -- here's the delegated call to the old PL/SQL routine
104 pvx_misc_pvt.admin_access(p_api_version,
105 p_init_msg_list,
106 p_commit,
107 p_validation_level,
108 x_return_status,
109 x_msg_count,
110 x_msg_data,
111 ddp_admin_rec,
112 p_mode,
113 x_access_id);
114
115 -- copy data back from the local variables to OUT or IN-OUT args, if any
116
117
118
119
120
121
122
123
124
125 end;
126
127 procedure admin_resource(p_api_version NUMBER
128 , p_init_msg_list VARCHAR2
129 , p_commit VARCHAR2
130 , x_return_status out nocopy VARCHAR2
131 , x_msg_count out nocopy NUMBER
132 , x_msg_data out nocopy VARCHAR2
133 , p_mode VARCHAR2
134 , x_resource_id out nocopy NUMBER
135 , x_resource_number out nocopy VARCHAR2
136 , p6_a0 NUMBER := 0-1962.0724
137 , p6_a1 NUMBER := 0-1962.0724
138 , p6_a2 NUMBER := 0-1962.0724
139 , p6_a3 NUMBER := 0-1962.0724
140 , p6_a4 NUMBER := 0-1962.0724
141 , p6_a5 NUMBER := 0-1962.0724
142 , p6_a6 NUMBER := 0-1962.0724
143 , p6_a7 NUMBER := 0-1962.0724
144 , p6_a8 NUMBER := 0-1962.0724
145 , p6_a9 VARCHAR2 := fnd_api.g_miss_char
146 , p6_a10 NUMBER := 0-1962.0724
147 , p6_a11 VARCHAR2 := fnd_api.g_miss_char
148 , p6_a12 VARCHAR2 := fnd_api.g_miss_char
149 , p6_a13 VARCHAR2 := fnd_api.g_miss_char
150 , p6_a14 NUMBER := 0-1962.0724
151 , p6_a15 VARCHAR2 := fnd_api.g_miss_char
152 , p6_a16 VARCHAR2 := fnd_api.g_miss_char
153 , p6_a17 VARCHAR2 := fnd_api.g_miss_char
154 , p6_a18 VARCHAR2 := fnd_api.g_miss_char
155 , p6_a19 VARCHAR2 := fnd_api.g_miss_char
156 , p6_a20 NUMBER := 0-1962.0724
157 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
158 , p6_a22 VARCHAR2 := fnd_api.g_miss_char
159 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
160 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
161 , p6_a25 NUMBER := 0-1962.0724
162 , p6_a26 NUMBER := 0-1962.0724
163 )
164
165 as
166 ddp_admin_rec pvx_misc_pvt.admin_rec_type;
167 ddindx binary_integer; indx binary_integer;
168 begin
169
170 -- copy data to the local IN or IN-OUT args, if any
171
172
173
174
175
176
177 ddp_admin_rec.partner_profile_id := rosetta_g_miss_num_map(p6_a0);
178 ddp_admin_rec.logged_resource_id := rosetta_g_miss_num_map(p6_a1);
179 ddp_admin_rec.cm_id := rosetta_g_miss_num_map(p6_a2);
180 ddp_admin_rec.ph_support_rep := rosetta_g_miss_num_map(p6_a3);
181 ddp_admin_rec.cmm_id := rosetta_g_miss_num_map(p6_a4);
182 ddp_admin_rec.partner_id := rosetta_g_miss_num_map(p6_a5);
183 ddp_admin_rec.partner_relationship_id := rosetta_g_miss_num_map(p6_a6);
184 ddp_admin_rec.contact_id := rosetta_g_miss_num_map(p6_a7);
185 ddp_admin_rec.user_id := rosetta_g_miss_num_map(p6_a8);
186 ddp_admin_rec.resource_type := p6_a9;
187 ddp_admin_rec.role_resource_id := rosetta_g_miss_num_map(p6_a10);
188 ddp_admin_rec.role_resource_type := p6_a11;
189 ddp_admin_rec.role_code := p6_a12;
190 ddp_admin_rec.resource_number := p6_a13;
191 ddp_admin_rec.group_id := rosetta_g_miss_num_map(p6_a14);
192 ddp_admin_rec.group_number := p6_a15;
193 ddp_admin_rec.group_usage := p6_a16;
194 ddp_admin_rec.source_name := p6_a17;
195 ddp_admin_rec.resource_name := p6_a18;
196 ddp_admin_rec.source_org_name := p6_a19;
197 ddp_admin_rec.source_org_id := rosetta_g_miss_num_map(p6_a20);
198 ddp_admin_rec.user_name := p6_a21;
199 ddp_admin_rec.source_first_name := p6_a22;
200 ddp_admin_rec.source_middle_name := p6_a23;
201 ddp_admin_rec.source_last_name := p6_a24;
202 ddp_admin_rec.party_site_id := rosetta_g_miss_num_map(p6_a25);
203 ddp_admin_rec.object_version_number := rosetta_g_miss_num_map(p6_a26);
204
205
206
207
208 -- here's the delegated call to the old PL/SQL routine
209 pvx_misc_pvt.admin_resource(p_api_version,
210 p_init_msg_list,
211 p_commit,
212 x_return_status,
213 x_msg_count,
214 x_msg_data,
215 ddp_admin_rec,
216 p_mode,
217 x_resource_id,
218 x_resource_number);
219
220 -- copy data back from the local variables to OUT or IN-OUT args, if any
221
222
223
224
225
226
227
228
229
230 end;
231
232 procedure admin_role(p_api_version NUMBER
233 , p_init_msg_list VARCHAR2
234 , p_commit VARCHAR2
235 , x_return_status out nocopy VARCHAR2
236 , x_msg_count out nocopy NUMBER
237 , x_msg_data out nocopy VARCHAR2
238 , p_mode VARCHAR2
239 , x_role_relate_id out nocopy NUMBER
240 , p6_a0 NUMBER := 0-1962.0724
241 , p6_a1 NUMBER := 0-1962.0724
242 , p6_a2 NUMBER := 0-1962.0724
243 , p6_a3 NUMBER := 0-1962.0724
244 , p6_a4 NUMBER := 0-1962.0724
245 , p6_a5 NUMBER := 0-1962.0724
246 , p6_a6 NUMBER := 0-1962.0724
247 , p6_a7 NUMBER := 0-1962.0724
248 , p6_a8 NUMBER := 0-1962.0724
249 , p6_a9 VARCHAR2 := fnd_api.g_miss_char
250 , p6_a10 NUMBER := 0-1962.0724
251 , p6_a11 VARCHAR2 := fnd_api.g_miss_char
252 , p6_a12 VARCHAR2 := fnd_api.g_miss_char
253 , p6_a13 VARCHAR2 := fnd_api.g_miss_char
254 , p6_a14 NUMBER := 0-1962.0724
255 , p6_a15 VARCHAR2 := fnd_api.g_miss_char
256 , p6_a16 VARCHAR2 := fnd_api.g_miss_char
257 , p6_a17 VARCHAR2 := fnd_api.g_miss_char
258 , p6_a18 VARCHAR2 := fnd_api.g_miss_char
259 , p6_a19 VARCHAR2 := fnd_api.g_miss_char
260 , p6_a20 NUMBER := 0-1962.0724
261 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
262 , p6_a22 VARCHAR2 := fnd_api.g_miss_char
263 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
264 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
265 , p6_a25 NUMBER := 0-1962.0724
266 , p6_a26 NUMBER := 0-1962.0724
267 )
268
269 as
270 ddp_admin_rec pvx_misc_pvt.admin_rec_type;
271 ddindx binary_integer; indx binary_integer;
272 begin
273
274 -- copy data to the local IN or IN-OUT args, if any
275
276
277
278
279
280
281 ddp_admin_rec.partner_profile_id := rosetta_g_miss_num_map(p6_a0);
282 ddp_admin_rec.logged_resource_id := rosetta_g_miss_num_map(p6_a1);
283 ddp_admin_rec.cm_id := rosetta_g_miss_num_map(p6_a2);
284 ddp_admin_rec.ph_support_rep := rosetta_g_miss_num_map(p6_a3);
285 ddp_admin_rec.cmm_id := rosetta_g_miss_num_map(p6_a4);
286 ddp_admin_rec.partner_id := rosetta_g_miss_num_map(p6_a5);
287 ddp_admin_rec.partner_relationship_id := rosetta_g_miss_num_map(p6_a6);
288 ddp_admin_rec.contact_id := rosetta_g_miss_num_map(p6_a7);
289 ddp_admin_rec.user_id := rosetta_g_miss_num_map(p6_a8);
290 ddp_admin_rec.resource_type := p6_a9;
291 ddp_admin_rec.role_resource_id := rosetta_g_miss_num_map(p6_a10);
292 ddp_admin_rec.role_resource_type := p6_a11;
293 ddp_admin_rec.role_code := p6_a12;
294 ddp_admin_rec.resource_number := p6_a13;
295 ddp_admin_rec.group_id := rosetta_g_miss_num_map(p6_a14);
296 ddp_admin_rec.group_number := p6_a15;
297 ddp_admin_rec.group_usage := p6_a16;
298 ddp_admin_rec.source_name := p6_a17;
299 ddp_admin_rec.resource_name := p6_a18;
300 ddp_admin_rec.source_org_name := p6_a19;
301 ddp_admin_rec.source_org_id := rosetta_g_miss_num_map(p6_a20);
302 ddp_admin_rec.user_name := p6_a21;
303 ddp_admin_rec.source_first_name := p6_a22;
304 ddp_admin_rec.source_middle_name := p6_a23;
305 ddp_admin_rec.source_last_name := p6_a24;
306 ddp_admin_rec.party_site_id := rosetta_g_miss_num_map(p6_a25);
307 ddp_admin_rec.object_version_number := rosetta_g_miss_num_map(p6_a26);
308
309
310
311 -- here's the delegated call to the old PL/SQL routine
312 pvx_misc_pvt.admin_role(p_api_version,
313 p_init_msg_list,
314 p_commit,
315 x_return_status,
316 x_msg_count,
317 x_msg_data,
318 ddp_admin_rec,
319 p_mode,
320 x_role_relate_id);
321
322 -- copy data back from the local variables to OUT or IN-OUT args, if any
323
324
325
326
327
328
329
330
331 end;
332
333 procedure admin_group(p_api_version NUMBER
334 , p_init_msg_list VARCHAR2
335 , p_commit VARCHAR2
336 , x_return_status out nocopy VARCHAR2
337 , x_msg_count out nocopy NUMBER
338 , x_msg_data out nocopy VARCHAR2
339 , p_mode VARCHAR2
340 , x_group_id out nocopy NUMBER
341 , x_group_number out nocopy VARCHAR2
342 , x_group_usage_id out nocopy NUMBER
343 , x_group_member_id out nocopy NUMBER
344 , p6_a0 NUMBER := 0-1962.0724
345 , p6_a1 NUMBER := 0-1962.0724
346 , p6_a2 NUMBER := 0-1962.0724
347 , p6_a3 NUMBER := 0-1962.0724
348 , p6_a4 NUMBER := 0-1962.0724
349 , p6_a5 NUMBER := 0-1962.0724
350 , p6_a6 NUMBER := 0-1962.0724
351 , p6_a7 NUMBER := 0-1962.0724
352 , p6_a8 NUMBER := 0-1962.0724
353 , p6_a9 VARCHAR2 := fnd_api.g_miss_char
354 , p6_a10 NUMBER := 0-1962.0724
355 , p6_a11 VARCHAR2 := fnd_api.g_miss_char
356 , p6_a12 VARCHAR2 := fnd_api.g_miss_char
357 , p6_a13 VARCHAR2 := fnd_api.g_miss_char
358 , p6_a14 NUMBER := 0-1962.0724
359 , p6_a15 VARCHAR2 := fnd_api.g_miss_char
360 , p6_a16 VARCHAR2 := fnd_api.g_miss_char
361 , p6_a17 VARCHAR2 := fnd_api.g_miss_char
362 , p6_a18 VARCHAR2 := fnd_api.g_miss_char
363 , p6_a19 VARCHAR2 := fnd_api.g_miss_char
364 , p6_a20 NUMBER := 0-1962.0724
365 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
366 , p6_a22 VARCHAR2 := fnd_api.g_miss_char
367 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
368 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
369 , p6_a25 NUMBER := 0-1962.0724
370 , p6_a26 NUMBER := 0-1962.0724
371 )
372
373 as
374 ddp_admin_rec pvx_misc_pvt.admin_rec_type;
375 ddindx binary_integer; indx binary_integer;
376 begin
377
378 -- copy data to the local IN or IN-OUT args, if any
379
380
381
382
383
384
385 ddp_admin_rec.partner_profile_id := rosetta_g_miss_num_map(p6_a0);
386 ddp_admin_rec.logged_resource_id := rosetta_g_miss_num_map(p6_a1);
387 ddp_admin_rec.cm_id := rosetta_g_miss_num_map(p6_a2);
388 ddp_admin_rec.ph_support_rep := rosetta_g_miss_num_map(p6_a3);
389 ddp_admin_rec.cmm_id := rosetta_g_miss_num_map(p6_a4);
390 ddp_admin_rec.partner_id := rosetta_g_miss_num_map(p6_a5);
391 ddp_admin_rec.partner_relationship_id := rosetta_g_miss_num_map(p6_a6);
392 ddp_admin_rec.contact_id := rosetta_g_miss_num_map(p6_a7);
393 ddp_admin_rec.user_id := rosetta_g_miss_num_map(p6_a8);
394 ddp_admin_rec.resource_type := p6_a9;
395 ddp_admin_rec.role_resource_id := rosetta_g_miss_num_map(p6_a10);
396 ddp_admin_rec.role_resource_type := p6_a11;
397 ddp_admin_rec.role_code := p6_a12;
398 ddp_admin_rec.resource_number := p6_a13;
399 ddp_admin_rec.group_id := rosetta_g_miss_num_map(p6_a14);
400 ddp_admin_rec.group_number := p6_a15;
401 ddp_admin_rec.group_usage := p6_a16;
402 ddp_admin_rec.source_name := p6_a17;
403 ddp_admin_rec.resource_name := p6_a18;
404 ddp_admin_rec.source_org_name := p6_a19;
405 ddp_admin_rec.source_org_id := rosetta_g_miss_num_map(p6_a20);
406 ddp_admin_rec.user_name := p6_a21;
407 ddp_admin_rec.source_first_name := p6_a22;
408 ddp_admin_rec.source_middle_name := p6_a23;
409 ddp_admin_rec.source_last_name := p6_a24;
410 ddp_admin_rec.party_site_id := rosetta_g_miss_num_map(p6_a25);
414
411 ddp_admin_rec.object_version_number := rosetta_g_miss_num_map(p6_a26);
412
413
415
416
417
418 -- here's the delegated call to the old PL/SQL routine
419 pvx_misc_pvt.admin_group(p_api_version,
420 p_init_msg_list,
421 p_commit,
422 x_return_status,
423 x_msg_count,
424 x_msg_data,
425 ddp_admin_rec,
426 p_mode,
427 x_group_id,
428 x_group_number,
429 x_group_usage_id,
430 x_group_member_id);
431
432 -- copy data back from the local variables to OUT or IN-OUT args, if any
433
434
435
436
437
438
439
440
441
442
443
444 end;
445
446 procedure admin_group_member(p_api_version NUMBER
447 , p_init_msg_list VARCHAR2
448 , p_commit VARCHAR2
449 , x_return_status out nocopy VARCHAR2
450 , x_msg_count out nocopy NUMBER
451 , x_msg_data out nocopy VARCHAR2
452 , p_mode VARCHAR2
453 , x_group_member_id out nocopy NUMBER
454 , p6_a0 NUMBER := 0-1962.0724
455 , p6_a1 NUMBER := 0-1962.0724
456 , p6_a2 NUMBER := 0-1962.0724
457 , p6_a3 NUMBER := 0-1962.0724
458 , p6_a4 NUMBER := 0-1962.0724
459 , p6_a5 NUMBER := 0-1962.0724
460 , p6_a6 NUMBER := 0-1962.0724
461 , p6_a7 NUMBER := 0-1962.0724
462 , p6_a8 NUMBER := 0-1962.0724
463 , p6_a9 VARCHAR2 := fnd_api.g_miss_char
464 , p6_a10 NUMBER := 0-1962.0724
465 , p6_a11 VARCHAR2 := fnd_api.g_miss_char
466 , p6_a12 VARCHAR2 := fnd_api.g_miss_char
467 , p6_a13 VARCHAR2 := fnd_api.g_miss_char
468 , p6_a14 NUMBER := 0-1962.0724
469 , p6_a15 VARCHAR2 := fnd_api.g_miss_char
470 , p6_a16 VARCHAR2 := fnd_api.g_miss_char
471 , p6_a17 VARCHAR2 := fnd_api.g_miss_char
472 , p6_a18 VARCHAR2 := fnd_api.g_miss_char
473 , p6_a19 VARCHAR2 := fnd_api.g_miss_char
474 , p6_a20 NUMBER := 0-1962.0724
475 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
476 , p6_a22 VARCHAR2 := fnd_api.g_miss_char
477 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
478 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
479 , p6_a25 NUMBER := 0-1962.0724
480 , p6_a26 NUMBER := 0-1962.0724
481 )
482
483 as
484 ddp_admin_rec pvx_misc_pvt.admin_rec_type;
485 ddindx binary_integer; indx binary_integer;
486 begin
487
488 -- copy data to the local IN or IN-OUT args, if any
489
490
491
492
493
494
495 ddp_admin_rec.partner_profile_id := rosetta_g_miss_num_map(p6_a0);
496 ddp_admin_rec.logged_resource_id := rosetta_g_miss_num_map(p6_a1);
497 ddp_admin_rec.cm_id := rosetta_g_miss_num_map(p6_a2);
498 ddp_admin_rec.ph_support_rep := rosetta_g_miss_num_map(p6_a3);
499 ddp_admin_rec.cmm_id := rosetta_g_miss_num_map(p6_a4);
500 ddp_admin_rec.partner_id := rosetta_g_miss_num_map(p6_a5);
501 ddp_admin_rec.partner_relationship_id := rosetta_g_miss_num_map(p6_a6);
502 ddp_admin_rec.contact_id := rosetta_g_miss_num_map(p6_a7);
503 ddp_admin_rec.user_id := rosetta_g_miss_num_map(p6_a8);
504 ddp_admin_rec.resource_type := p6_a9;
505 ddp_admin_rec.role_resource_id := rosetta_g_miss_num_map(p6_a10);
506 ddp_admin_rec.role_resource_type := p6_a11;
507 ddp_admin_rec.role_code := p6_a12;
508 ddp_admin_rec.resource_number := p6_a13;
509 ddp_admin_rec.group_id := rosetta_g_miss_num_map(p6_a14);
510 ddp_admin_rec.group_number := p6_a15;
511 ddp_admin_rec.group_usage := p6_a16;
512 ddp_admin_rec.source_name := p6_a17;
513 ddp_admin_rec.resource_name := p6_a18;
514 ddp_admin_rec.source_org_name := p6_a19;
515 ddp_admin_rec.source_org_id := rosetta_g_miss_num_map(p6_a20);
516 ddp_admin_rec.user_name := p6_a21;
517 ddp_admin_rec.source_first_name := p6_a22;
518 ddp_admin_rec.source_middle_name := p6_a23;
519 ddp_admin_rec.source_last_name := p6_a24;
520 ddp_admin_rec.party_site_id := rosetta_g_miss_num_map(p6_a25);
521 ddp_admin_rec.object_version_number := rosetta_g_miss_num_map(p6_a26);
522
523
524
525 -- here's the delegated call to the old PL/SQL routine
526 pvx_misc_pvt.admin_group_member(p_api_version,
527 p_init_msg_list,
528 p_commit,
529 x_return_status,
530 x_msg_count,
531 x_msg_data,
532 ddp_admin_rec,
533 p_mode,
534 x_group_member_id);
535
536 -- copy data back from the local variables to OUT or IN-OUT args, if any
537
538
539
540
541
542
543
544
545 end;
546
547 procedure update_user(p_api_version NUMBER
548 , p_init_msg_list VARCHAR2
549 , p_commit VARCHAR2
550 , x_return_status out nocopy VARCHAR2
551 , x_msg_count out nocopy NUMBER
552 , x_msg_data out nocopy VARCHAR2
553 , p6_a0 NUMBER := 0-1962.0724
554 , p6_a1 VARCHAR2 := fnd_api.g_miss_char
555 , p6_a2 VARCHAR2 := fnd_api.g_miss_char
556 , p6_a3 DATE := fnd_api.g_miss_date
557 , p6_a4 DATE := fnd_api.g_miss_date
558 , p6_a5 VARCHAR2 := fnd_api.g_miss_char
559 , p6_a6 VARCHAR2 := fnd_api.g_miss_char
563 , p6_a10 NUMBER := 0-1962.0724
560 , p6_a7 VARCHAR2 := fnd_api.g_miss_char
561 , p6_a8 VARCHAR2 := fnd_api.g_miss_char
562 , p6_a9 NUMBER := 0-1962.0724
564 )
565
566 as
567 ddp_fnd_rec pvx_misc_pvt.fnd_rec_type;
568 ddindx binary_integer; indx binary_integer;
569 begin
570
571 -- copy data to the local IN or IN-OUT args, if any
572
573
574
575
576
577
578 ddp_fnd_rec.user_id := rosetta_g_miss_num_map(p6_a0);
579 ddp_fnd_rec.user_name := p6_a1;
580 ddp_fnd_rec.owner := p6_a2;
581 ddp_fnd_rec.start_date := rosetta_g_miss_date_in_map(p6_a3);
582 ddp_fnd_rec.end_date := rosetta_g_miss_date_in_map(p6_a4);
583 ddp_fnd_rec.email_address := p6_a5;
584 ddp_fnd_rec.resp_app_short_name := p6_a6;
585 ddp_fnd_rec.resp_key := p6_a7;
586 ddp_fnd_rec.security_group := p6_a8;
587 ddp_fnd_rec.resp_id := rosetta_g_miss_num_map(p6_a9);
588 ddp_fnd_rec.resp_app_id := rosetta_g_miss_num_map(p6_a10);
589
590 -- here's the delegated call to the old PL/SQL routine
591 pvx_misc_pvt.update_user(p_api_version,
592 p_init_msg_list,
593 p_commit,
594 x_return_status,
595 x_msg_count,
596 x_msg_data,
597 ddp_fnd_rec);
598
599 -- copy data back from the local variables to OUT or IN-OUT args, if any
600
601
602
603
604
605
606 end;
607
608 procedure disable_responsibility(p_api_version NUMBER
609 , p_init_msg_list VARCHAR2
610 , p_commit VARCHAR2
611 , x_return_status out nocopy VARCHAR2
612 , x_msg_count out nocopy NUMBER
613 , x_msg_data out nocopy VARCHAR2
614 , p_mode VARCHAR2
615 , p6_a0 NUMBER := 0-1962.0724
616 , p6_a1 VARCHAR2 := fnd_api.g_miss_char
617 , p6_a2 VARCHAR2 := fnd_api.g_miss_char
618 , p6_a3 DATE := fnd_api.g_miss_date
619 , p6_a4 DATE := fnd_api.g_miss_date
620 , p6_a5 VARCHAR2 := fnd_api.g_miss_char
621 , p6_a6 VARCHAR2 := fnd_api.g_miss_char
622 , p6_a7 VARCHAR2 := fnd_api.g_miss_char
623 , p6_a8 VARCHAR2 := fnd_api.g_miss_char
624 , p6_a9 NUMBER := 0-1962.0724
625 , p6_a10 NUMBER := 0-1962.0724
626 )
627
628 as
629 ddp_fnd_rec pvx_misc_pvt.fnd_rec_type;
630 ddindx binary_integer; indx binary_integer;
631 begin
632
633 -- copy data to the local IN or IN-OUT args, if any
634
635
636
637
638
639
640 ddp_fnd_rec.user_id := rosetta_g_miss_num_map(p6_a0);
641 ddp_fnd_rec.user_name := p6_a1;
642 ddp_fnd_rec.owner := p6_a2;
643 ddp_fnd_rec.start_date := rosetta_g_miss_date_in_map(p6_a3);
644 ddp_fnd_rec.end_date := rosetta_g_miss_date_in_map(p6_a4);
645 ddp_fnd_rec.email_address := p6_a5;
646 ddp_fnd_rec.resp_app_short_name := p6_a6;
647 ddp_fnd_rec.resp_key := p6_a7;
648 ddp_fnd_rec.security_group := p6_a8;
649 ddp_fnd_rec.resp_id := rosetta_g_miss_num_map(p6_a9);
650 ddp_fnd_rec.resp_app_id := rosetta_g_miss_num_map(p6_a10);
651
652
653 -- here's the delegated call to the old PL/SQL routine
654 pvx_misc_pvt.disable_responsibility(p_api_version,
655 p_init_msg_list,
656 p_commit,
657 x_return_status,
658 x_msg_count,
659 x_msg_data,
660 ddp_fnd_rec,
661 p_mode);
662
663 -- copy data back from the local variables to OUT or IN-OUT args, if any
664
665
666
667
668
669
670
671 end;
672
673 end pvx_misc_pvt_w;