DBA Data[Home] [Help]

PACKAGE BODY: APPS.AMS_USER_STATUSES_PVT_W

Source


1 package body ams_user_statuses_pvt_w as
2   /* $Header: amswustb.pls 120.1 2005/09/30 06:55 mayjain 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   -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7   function rosetta_g_miss_date_in_map(d date) return date as
8   begin
9     if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10     return d;
11   end;
12 
13   function rosetta_g_miss_num_map(n number) return number as
14     a number := fnd_api.g_miss_num;
15     b number := 0-1962.0724;
16   begin
17     if n=a then return b; end if;
18     if n=b then return a; end if;
19     return n;
20   end;
21 
22   procedure create_user_status(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     , x_user_status_id out nocopy  NUMBER
30     , p7_a0  NUMBER := 0-1962.0724
31     , p7_a1  DATE := fnd_api.g_miss_date
32     , p7_a2  NUMBER := 0-1962.0724
33     , p7_a3  DATE := fnd_api.g_miss_date
34     , p7_a4  NUMBER := 0-1962.0724
35     , p7_a5  NUMBER := 0-1962.0724
36     , p7_a6  NUMBER := 0-1962.0724
37     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
38     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
39     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
40     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
41     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
42     , p7_a12  DATE := fnd_api.g_miss_date
43     , p7_a13  DATE := fnd_api.g_miss_date
44     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
45     , p7_a15  VARCHAR2 := fnd_api.g_miss_char
46   )
47 
48   as
49     ddp_user_status_rec ams_user_statuses_pvt.user_status_rec_type;
50     ddindx binary_integer; indx binary_integer;
51   begin
52 
53     -- copy data to the local IN or IN-OUT args, if any
54 
55 
56 
57 
58 
59 
60 
61     ddp_user_status_rec.user_status_id := rosetta_g_miss_num_map(p7_a0);
62     ddp_user_status_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
63     ddp_user_status_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
64     ddp_user_status_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
65     ddp_user_status_rec.created_by := rosetta_g_miss_num_map(p7_a4);
66     ddp_user_status_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
67     ddp_user_status_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
68     ddp_user_status_rec.system_status_type := p7_a7;
69     ddp_user_status_rec.system_status_code := p7_a8;
70     ddp_user_status_rec.default_flag := p7_a9;
71     ddp_user_status_rec.enabled_flag := p7_a10;
72     ddp_user_status_rec.seeded_flag := p7_a11;
73     ddp_user_status_rec.start_date_active := rosetta_g_miss_date_in_map(p7_a12);
74     ddp_user_status_rec.end_date_active := rosetta_g_miss_date_in_map(p7_a13);
75     ddp_user_status_rec.name := p7_a14;
76     ddp_user_status_rec.description := p7_a15;
77 
78 
79     -- here's the delegated call to the old PL/SQL routine
80     ams_user_statuses_pvt.create_user_status(p_api_version,
81       p_init_msg_list,
82       p_commit,
83       p_validation_level,
84       x_return_status,
85       x_msg_count,
86       x_msg_data,
87       ddp_user_status_rec,
88       x_user_status_id);
89 
90     -- copy data back from the local variables to OUT or IN-OUT args, if any
91 
92 
93 
94 
95 
96 
97 
98 
99   end;
100 
101   procedure update_user_status(p_api_version  NUMBER
102     , p_init_msg_list  VARCHAR2
103     , p_commit  VARCHAR2
104     , p_validation_level  NUMBER
105     , x_return_status out nocopy  VARCHAR2
106     , x_msg_count out nocopy  NUMBER
107     , x_msg_data out nocopy  VARCHAR2
108     , p7_a0  NUMBER := 0-1962.0724
109     , p7_a1  DATE := fnd_api.g_miss_date
110     , p7_a2  NUMBER := 0-1962.0724
111     , p7_a3  DATE := fnd_api.g_miss_date
112     , p7_a4  NUMBER := 0-1962.0724
113     , p7_a5  NUMBER := 0-1962.0724
114     , p7_a6  NUMBER := 0-1962.0724
115     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
116     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
117     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
118     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
119     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
120     , p7_a12  DATE := fnd_api.g_miss_date
121     , p7_a13  DATE := fnd_api.g_miss_date
122     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
123     , p7_a15  VARCHAR2 := fnd_api.g_miss_char
124   )
125 
126   as
127     ddp_user_status_rec ams_user_statuses_pvt.user_status_rec_type;
128     ddindx binary_integer; indx binary_integer;
129   begin
130 
131     -- copy data to the local IN or IN-OUT args, if any
132 
133 
134 
135 
136 
137 
138 
139     ddp_user_status_rec.user_status_id := rosetta_g_miss_num_map(p7_a0);
140     ddp_user_status_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
141     ddp_user_status_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
142     ddp_user_status_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
143     ddp_user_status_rec.created_by := rosetta_g_miss_num_map(p7_a4);
144     ddp_user_status_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
145     ddp_user_status_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
146     ddp_user_status_rec.system_status_type := p7_a7;
147     ddp_user_status_rec.system_status_code := p7_a8;
148     ddp_user_status_rec.default_flag := p7_a9;
149     ddp_user_status_rec.enabled_flag := p7_a10;
150     ddp_user_status_rec.seeded_flag := p7_a11;
151     ddp_user_status_rec.start_date_active := rosetta_g_miss_date_in_map(p7_a12);
152     ddp_user_status_rec.end_date_active := rosetta_g_miss_date_in_map(p7_a13);
153     ddp_user_status_rec.name := p7_a14;
154     ddp_user_status_rec.description := p7_a15;
155 
156     -- here's the delegated call to the old PL/SQL routine
157     ams_user_statuses_pvt.update_user_status(p_api_version,
158       p_init_msg_list,
159       p_commit,
160       p_validation_level,
161       x_return_status,
162       x_msg_count,
163       x_msg_data,
164       ddp_user_status_rec);
165 
166     -- copy data back from the local variables to OUT or IN-OUT args, if any
167 
168 
169 
170 
171 
172 
173 
174   end;
175 
176   procedure validate_user_status(p_api_version  NUMBER
177     , p_init_msg_list  VARCHAR2
178     , p_commit  VARCHAR2
179     , p_validation_level  NUMBER
180     , x_return_status out nocopy  VARCHAR2
181     , x_msg_count out nocopy  NUMBER
182     , x_msg_data out nocopy  VARCHAR2
183     , p7_a0  NUMBER := 0-1962.0724
184     , p7_a1  DATE := fnd_api.g_miss_date
185     , p7_a2  NUMBER := 0-1962.0724
186     , p7_a3  DATE := fnd_api.g_miss_date
187     , p7_a4  NUMBER := 0-1962.0724
188     , p7_a5  NUMBER := 0-1962.0724
189     , p7_a6  NUMBER := 0-1962.0724
190     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
191     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
192     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
193     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
194     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
195     , p7_a12  DATE := fnd_api.g_miss_date
196     , p7_a13  DATE := fnd_api.g_miss_date
197     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
198     , p7_a15  VARCHAR2 := fnd_api.g_miss_char
199   )
200 
201   as
202     ddp_user_status_rec ams_user_statuses_pvt.user_status_rec_type;
203     ddindx binary_integer; indx binary_integer;
204   begin
205 
206     -- copy data to the local IN or IN-OUT args, if any
207 
208 
209 
210 
211 
212 
213 
214     ddp_user_status_rec.user_status_id := rosetta_g_miss_num_map(p7_a0);
215     ddp_user_status_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
216     ddp_user_status_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
217     ddp_user_status_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
218     ddp_user_status_rec.created_by := rosetta_g_miss_num_map(p7_a4);
219     ddp_user_status_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
220     ddp_user_status_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
221     ddp_user_status_rec.system_status_type := p7_a7;
222     ddp_user_status_rec.system_status_code := p7_a8;
223     ddp_user_status_rec.default_flag := p7_a9;
224     ddp_user_status_rec.enabled_flag := p7_a10;
225     ddp_user_status_rec.seeded_flag := p7_a11;
226     ddp_user_status_rec.start_date_active := rosetta_g_miss_date_in_map(p7_a12);
227     ddp_user_status_rec.end_date_active := rosetta_g_miss_date_in_map(p7_a13);
228     ddp_user_status_rec.name := p7_a14;
229     ddp_user_status_rec.description := p7_a15;
230 
231     -- here's the delegated call to the old PL/SQL routine
232     ams_user_statuses_pvt.validate_user_status(p_api_version,
233       p_init_msg_list,
234       p_commit,
235       p_validation_level,
236       x_return_status,
237       x_msg_count,
238       x_msg_data,
239       ddp_user_status_rec);
240 
241     -- copy data back from the local variables to OUT or IN-OUT args, if any
242 
243 
244 
245 
246 
247 
248 
249   end;
250 
251   procedure check_user_status_items(p_validation_mode  VARCHAR2
252     , x_return_status out nocopy  VARCHAR2
253     , p0_a0  NUMBER := 0-1962.0724
254     , p0_a1  DATE := fnd_api.g_miss_date
255     , p0_a2  NUMBER := 0-1962.0724
256     , p0_a3  DATE := fnd_api.g_miss_date
257     , p0_a4  NUMBER := 0-1962.0724
258     , p0_a5  NUMBER := 0-1962.0724
259     , p0_a6  NUMBER := 0-1962.0724
260     , p0_a7  VARCHAR2 := fnd_api.g_miss_char
261     , p0_a8  VARCHAR2 := fnd_api.g_miss_char
262     , p0_a9  VARCHAR2 := fnd_api.g_miss_char
263     , p0_a10  VARCHAR2 := fnd_api.g_miss_char
264     , p0_a11  VARCHAR2 := fnd_api.g_miss_char
265     , p0_a12  DATE := fnd_api.g_miss_date
266     , p0_a13  DATE := fnd_api.g_miss_date
267     , p0_a14  VARCHAR2 := fnd_api.g_miss_char
268     , p0_a15  VARCHAR2 := fnd_api.g_miss_char
269   )
270 
271   as
272     ddp_user_status_rec ams_user_statuses_pvt.user_status_rec_type;
273     ddindx binary_integer; indx binary_integer;
274   begin
275 
276     -- copy data to the local IN or IN-OUT args, if any
277     ddp_user_status_rec.user_status_id := rosetta_g_miss_num_map(p0_a0);
278     ddp_user_status_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
279     ddp_user_status_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
280     ddp_user_status_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
281     ddp_user_status_rec.created_by := rosetta_g_miss_num_map(p0_a4);
282     ddp_user_status_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
283     ddp_user_status_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
284     ddp_user_status_rec.system_status_type := p0_a7;
285     ddp_user_status_rec.system_status_code := p0_a8;
286     ddp_user_status_rec.default_flag := p0_a9;
287     ddp_user_status_rec.enabled_flag := p0_a10;
288     ddp_user_status_rec.seeded_flag := p0_a11;
289     ddp_user_status_rec.start_date_active := rosetta_g_miss_date_in_map(p0_a12);
290     ddp_user_status_rec.end_date_active := rosetta_g_miss_date_in_map(p0_a13);
291     ddp_user_status_rec.name := p0_a14;
292     ddp_user_status_rec.description := p0_a15;
293 
294 
295 
296     -- here's the delegated call to the old PL/SQL routine
297     ams_user_statuses_pvt.check_user_status_items(ddp_user_status_rec,
298       p_validation_mode,
299       x_return_status);
300 
301     -- copy data back from the local variables to OUT or IN-OUT args, if any
302 
303 
304   end;
305 
306   procedure check_user_status_record(x_return_status out nocopy  VARCHAR2
307     , p0_a0  NUMBER := 0-1962.0724
308     , p0_a1  DATE := fnd_api.g_miss_date
309     , p0_a2  NUMBER := 0-1962.0724
310     , p0_a3  DATE := fnd_api.g_miss_date
311     , p0_a4  NUMBER := 0-1962.0724
312     , p0_a5  NUMBER := 0-1962.0724
313     , p0_a6  NUMBER := 0-1962.0724
314     , p0_a7  VARCHAR2 := fnd_api.g_miss_char
315     , p0_a8  VARCHAR2 := fnd_api.g_miss_char
316     , p0_a9  VARCHAR2 := fnd_api.g_miss_char
317     , p0_a10  VARCHAR2 := fnd_api.g_miss_char
318     , p0_a11  VARCHAR2 := fnd_api.g_miss_char
319     , p0_a12  DATE := fnd_api.g_miss_date
320     , p0_a13  DATE := fnd_api.g_miss_date
321     , p0_a14  VARCHAR2 := fnd_api.g_miss_char
322     , p0_a15  VARCHAR2 := fnd_api.g_miss_char
323     , p1_a0  NUMBER := 0-1962.0724
324     , p1_a1  DATE := fnd_api.g_miss_date
325     , p1_a2  NUMBER := 0-1962.0724
326     , p1_a3  DATE := fnd_api.g_miss_date
327     , p1_a4  NUMBER := 0-1962.0724
328     , p1_a5  NUMBER := 0-1962.0724
329     , p1_a6  NUMBER := 0-1962.0724
330     , p1_a7  VARCHAR2 := fnd_api.g_miss_char
331     , p1_a8  VARCHAR2 := fnd_api.g_miss_char
332     , p1_a9  VARCHAR2 := fnd_api.g_miss_char
333     , p1_a10  VARCHAR2 := fnd_api.g_miss_char
334     , p1_a11  VARCHAR2 := fnd_api.g_miss_char
335     , p1_a12  DATE := fnd_api.g_miss_date
336     , p1_a13  DATE := fnd_api.g_miss_date
337     , p1_a14  VARCHAR2 := fnd_api.g_miss_char
338     , p1_a15  VARCHAR2 := fnd_api.g_miss_char
339   )
340 
341   as
342     ddp_user_status_rec ams_user_statuses_pvt.user_status_rec_type;
343     ddp_complete_rec ams_user_statuses_pvt.user_status_rec_type;
344     ddindx binary_integer; indx binary_integer;
345   begin
346 
347     -- copy data to the local IN or IN-OUT args, if any
348     ddp_user_status_rec.user_status_id := rosetta_g_miss_num_map(p0_a0);
349     ddp_user_status_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
350     ddp_user_status_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
351     ddp_user_status_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
352     ddp_user_status_rec.created_by := rosetta_g_miss_num_map(p0_a4);
353     ddp_user_status_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
354     ddp_user_status_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
355     ddp_user_status_rec.system_status_type := p0_a7;
356     ddp_user_status_rec.system_status_code := p0_a8;
357     ddp_user_status_rec.default_flag := p0_a9;
358     ddp_user_status_rec.enabled_flag := p0_a10;
359     ddp_user_status_rec.seeded_flag := p0_a11;
360     ddp_user_status_rec.start_date_active := rosetta_g_miss_date_in_map(p0_a12);
361     ddp_user_status_rec.end_date_active := rosetta_g_miss_date_in_map(p0_a13);
362     ddp_user_status_rec.name := p0_a14;
363     ddp_user_status_rec.description := p0_a15;
364 
365     ddp_complete_rec.user_status_id := rosetta_g_miss_num_map(p1_a0);
366     ddp_complete_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
367     ddp_complete_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
368     ddp_complete_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
369     ddp_complete_rec.created_by := rosetta_g_miss_num_map(p1_a4);
370     ddp_complete_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
371     ddp_complete_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
372     ddp_complete_rec.system_status_type := p1_a7;
373     ddp_complete_rec.system_status_code := p1_a8;
374     ddp_complete_rec.default_flag := p1_a9;
378     ddp_complete_rec.end_date_active := rosetta_g_miss_date_in_map(p1_a13);
375     ddp_complete_rec.enabled_flag := p1_a10;
376     ddp_complete_rec.seeded_flag := p1_a11;
377     ddp_complete_rec.start_date_active := rosetta_g_miss_date_in_map(p1_a12);
379     ddp_complete_rec.name := p1_a14;
380     ddp_complete_rec.description := p1_a15;
381 
382 
383     -- here's the delegated call to the old PL/SQL routine
384     ams_user_statuses_pvt.check_user_status_record(ddp_user_status_rec,
385       ddp_complete_rec,
386       x_return_status);
387 
388     -- copy data back from the local variables to OUT or IN-OUT args, if any
389 
390 
391   end;
392 
393   procedure init_user_status_rec(p0_a0 out nocopy  NUMBER
394     , p0_a1 out nocopy  DATE
395     , p0_a2 out nocopy  NUMBER
396     , p0_a3 out nocopy  DATE
397     , p0_a4 out nocopy  NUMBER
398     , p0_a5 out nocopy  NUMBER
399     , p0_a6 out nocopy  NUMBER
400     , p0_a7 out nocopy  VARCHAR2
401     , p0_a8 out nocopy  VARCHAR2
402     , p0_a9 out nocopy  VARCHAR2
403     , p0_a10 out nocopy  VARCHAR2
404     , p0_a11 out nocopy  VARCHAR2
405     , p0_a12 out nocopy  DATE
406     , p0_a13 out nocopy  DATE
407     , p0_a14 out nocopy  VARCHAR2
408     , p0_a15 out nocopy  VARCHAR2
409   )
410 
411   as
412     ddx_user_status_rec ams_user_statuses_pvt.user_status_rec_type;
413     ddindx binary_integer; indx binary_integer;
414   begin
415 
416     -- copy data to the local IN or IN-OUT args, if any
417 
418     -- here's the delegated call to the old PL/SQL routine
419     ams_user_statuses_pvt.init_user_status_rec(ddx_user_status_rec);
420 
421     -- copy data back from the local variables to OUT or IN-OUT args, if any
422     p0_a0 := rosetta_g_miss_num_map(ddx_user_status_rec.user_status_id);
423     p0_a1 := ddx_user_status_rec.last_update_date;
424     p0_a2 := rosetta_g_miss_num_map(ddx_user_status_rec.last_updated_by);
425     p0_a3 := ddx_user_status_rec.creation_date;
426     p0_a4 := rosetta_g_miss_num_map(ddx_user_status_rec.created_by);
427     p0_a5 := rosetta_g_miss_num_map(ddx_user_status_rec.last_update_login);
428     p0_a6 := rosetta_g_miss_num_map(ddx_user_status_rec.object_version_number);
429     p0_a7 := ddx_user_status_rec.system_status_type;
430     p0_a8 := ddx_user_status_rec.system_status_code;
431     p0_a9 := ddx_user_status_rec.default_flag;
432     p0_a10 := ddx_user_status_rec.enabled_flag;
433     p0_a11 := ddx_user_status_rec.seeded_flag;
434     p0_a12 := ddx_user_status_rec.start_date_active;
435     p0_a13 := ddx_user_status_rec.end_date_active;
436     p0_a14 := ddx_user_status_rec.name;
437     p0_a15 := ddx_user_status_rec.description;
438   end;
439 
440   procedure complete_user_status_rec(p1_a0 out nocopy  NUMBER
441     , p1_a1 out nocopy  DATE
442     , p1_a2 out nocopy  NUMBER
443     , p1_a3 out nocopy  DATE
444     , p1_a4 out nocopy  NUMBER
445     , p1_a5 out nocopy  NUMBER
446     , p1_a6 out nocopy  NUMBER
447     , p1_a7 out nocopy  VARCHAR2
448     , p1_a8 out nocopy  VARCHAR2
449     , p1_a9 out nocopy  VARCHAR2
450     , p1_a10 out nocopy  VARCHAR2
451     , p1_a11 out nocopy  VARCHAR2
452     , p1_a12 out nocopy  DATE
453     , p1_a13 out nocopy  DATE
454     , p1_a14 out nocopy  VARCHAR2
455     , p1_a15 out nocopy  VARCHAR2
456     , p0_a0  NUMBER := 0-1962.0724
457     , p0_a1  DATE := fnd_api.g_miss_date
458     , p0_a2  NUMBER := 0-1962.0724
459     , p0_a3  DATE := fnd_api.g_miss_date
460     , p0_a4  NUMBER := 0-1962.0724
461     , p0_a5  NUMBER := 0-1962.0724
462     , p0_a6  NUMBER := 0-1962.0724
463     , p0_a7  VARCHAR2 := fnd_api.g_miss_char
464     , p0_a8  VARCHAR2 := fnd_api.g_miss_char
465     , p0_a9  VARCHAR2 := fnd_api.g_miss_char
466     , p0_a10  VARCHAR2 := fnd_api.g_miss_char
467     , p0_a11  VARCHAR2 := fnd_api.g_miss_char
468     , p0_a12  DATE := fnd_api.g_miss_date
469     , p0_a13  DATE := fnd_api.g_miss_date
470     , p0_a14  VARCHAR2 := fnd_api.g_miss_char
471     , p0_a15  VARCHAR2 := fnd_api.g_miss_char
472   )
473 
474   as
475     ddp_user_status_rec ams_user_statuses_pvt.user_status_rec_type;
476     ddx_complete_rec ams_user_statuses_pvt.user_status_rec_type;
477     ddindx binary_integer; indx binary_integer;
478   begin
479 
480     -- copy data to the local IN or IN-OUT args, if any
481     ddp_user_status_rec.user_status_id := rosetta_g_miss_num_map(p0_a0);
482     ddp_user_status_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
483     ddp_user_status_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
484     ddp_user_status_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
485     ddp_user_status_rec.created_by := rosetta_g_miss_num_map(p0_a4);
486     ddp_user_status_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
487     ddp_user_status_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
488     ddp_user_status_rec.system_status_type := p0_a7;
489     ddp_user_status_rec.system_status_code := p0_a8;
490     ddp_user_status_rec.default_flag := p0_a9;
491     ddp_user_status_rec.enabled_flag := p0_a10;
492     ddp_user_status_rec.seeded_flag := p0_a11;
493     ddp_user_status_rec.start_date_active := rosetta_g_miss_date_in_map(p0_a12);
494     ddp_user_status_rec.end_date_active := rosetta_g_miss_date_in_map(p0_a13);
495     ddp_user_status_rec.name := p0_a14;
496     ddp_user_status_rec.description := p0_a15;
497 
498 
499     -- here's the delegated call to the old PL/SQL routine
500     ams_user_statuses_pvt.complete_user_status_rec(ddp_user_status_rec,
501       ddx_complete_rec);
502 
503     -- copy data back from the local variables to OUT or IN-OUT args, if any
504 
505     p1_a0 := rosetta_g_miss_num_map(ddx_complete_rec.user_status_id);
506     p1_a1 := ddx_complete_rec.last_update_date;
507     p1_a2 := rosetta_g_miss_num_map(ddx_complete_rec.last_updated_by);
508     p1_a3 := ddx_complete_rec.creation_date;
509     p1_a4 := rosetta_g_miss_num_map(ddx_complete_rec.created_by);
510     p1_a5 := rosetta_g_miss_num_map(ddx_complete_rec.last_update_login);
511     p1_a6 := rosetta_g_miss_num_map(ddx_complete_rec.object_version_number);
512     p1_a7 := ddx_complete_rec.system_status_type;
513     p1_a8 := ddx_complete_rec.system_status_code;
514     p1_a9 := ddx_complete_rec.default_flag;
515     p1_a10 := ddx_complete_rec.enabled_flag;
516     p1_a11 := ddx_complete_rec.seeded_flag;
517     p1_a12 := ddx_complete_rec.start_date_active;
518     p1_a13 := ddx_complete_rec.end_date_active;
519     p1_a14 := ddx_complete_rec.name;
520     p1_a15 := ddx_complete_rec.description;
521   end;
522 
523 end ams_user_statuses_pvt_w;