[Home] [Help]
PACKAGE BODY: APPS.PVX_MDF_OWNERS_PVT_W
Source
1 package body pvx_mdf_owners_pvt_w as
2 /* $Header: pvxwmdfb.pls 115.8 2002/12/11 12:22:25 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 create_mdf_owner(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_mdf_owner_id out nocopy NUMBER
30 , p7_a0 NUMBER := 0-1962.0724
31 , p7_a1 VARCHAR2 := fnd_api.g_miss_char
32 , p7_a2 VARCHAR2 := fnd_api.g_miss_char
33 , p7_a3 VARCHAR2 := fnd_api.g_miss_char
34 , p7_a4 NUMBER := 0-1962.0724
35 , p7_a5 DATE := fnd_api.g_miss_date
36 , p7_a6 NUMBER := 0-1962.0724
37 , p7_a7 DATE := fnd_api.g_miss_date
38 , p7_a8 NUMBER := 0-1962.0724
39 , p7_a9 NUMBER := 0-1962.0724
40 , p7_a10 NUMBER := 0-1962.0724
41 , p7_a11 NUMBER := 0-1962.0724
42 , p7_a12 NUMBER := 0-1962.0724
43 , p7_a13 NUMBER := 0-1962.0724
44 , p7_a14 DATE := fnd_api.g_miss_date
45 )
46 as
47 ddp_mdf_owner_rec pvx_mdf_owners_pvt.mdf_owner_rec_type;
48 ddindx binary_integer; indx binary_integer;
49 begin
50
51 -- copy data to the local IN or IN-OUT args, if any
52
53
54
55
56
57
58
59 ddp_mdf_owner_rec.mdf_owner_id := rosetta_g_miss_num_map(p7_a0);
60 ddp_mdf_owner_rec.country := p7_a1;
61 ddp_mdf_owner_rec.from_postal_code := p7_a2;
62 ddp_mdf_owner_rec.to_postal_code := p7_a3;
63 ddp_mdf_owner_rec.cmm_resource_id := rosetta_g_miss_num_map(p7_a4);
64 ddp_mdf_owner_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a5);
65 ddp_mdf_owner_rec.last_updated_by := rosetta_g_miss_num_map(p7_a6);
66 ddp_mdf_owner_rec.creation_date := rosetta_g_miss_date_in_map(p7_a7);
67 ddp_mdf_owner_rec.created_by := rosetta_g_miss_num_map(p7_a8);
68 ddp_mdf_owner_rec.last_update_login := rosetta_g_miss_num_map(p7_a9);
69 ddp_mdf_owner_rec.object_version_number := rosetta_g_miss_num_map(p7_a10);
70 ddp_mdf_owner_rec.request_id := rosetta_g_miss_num_map(p7_a11);
71 ddp_mdf_owner_rec.program_application_id := rosetta_g_miss_num_map(p7_a12);
72 ddp_mdf_owner_rec.program_id := rosetta_g_miss_num_map(p7_a13);
73 ddp_mdf_owner_rec.program_update_date := rosetta_g_miss_date_in_map(p7_a14);
74
75
76 -- here's the delegated call to the old PL/SQL routine
77 pvx_mdf_owners_pvt.create_mdf_owner(p_api_version,
78 p_init_msg_list,
79 p_commit,
80 p_validation_level,
81 x_return_status,
82 x_msg_count,
83 x_msg_data,
84 ddp_mdf_owner_rec,
85 x_mdf_owner_id);
86
87 -- copy data back from the local OUT or IN-OUT args, if any
88
89
90
91
92
93
94
95
96 end;
97
98 procedure update_mdf_owner(p_api_version NUMBER
99 , p_init_msg_list VARCHAR2
100 , p_commit VARCHAR2
101 , p_validation_level NUMBER
102 , x_return_status out nocopy VARCHAR2
103 , x_msg_count out nocopy NUMBER
104 , x_msg_data out nocopy VARCHAR2
105 , p7_a0 NUMBER := 0-1962.0724
106 , p7_a1 VARCHAR2 := fnd_api.g_miss_char
107 , p7_a2 VARCHAR2 := fnd_api.g_miss_char
108 , p7_a3 VARCHAR2 := fnd_api.g_miss_char
109 , p7_a4 NUMBER := 0-1962.0724
110 , p7_a5 DATE := fnd_api.g_miss_date
111 , p7_a6 NUMBER := 0-1962.0724
112 , p7_a7 DATE := fnd_api.g_miss_date
113 , p7_a8 NUMBER := 0-1962.0724
114 , p7_a9 NUMBER := 0-1962.0724
115 , p7_a10 NUMBER := 0-1962.0724
116 , p7_a11 NUMBER := 0-1962.0724
117 , p7_a12 NUMBER := 0-1962.0724
118 , p7_a13 NUMBER := 0-1962.0724
119 , p7_a14 DATE := fnd_api.g_miss_date
120 )
121 as
122 ddp_mdf_owner_rec pvx_mdf_owners_pvt.mdf_owner_rec_type;
123 ddindx binary_integer; indx binary_integer;
124 begin
125
126 -- copy data to the local IN or IN-OUT args, if any
127
128
129
130
131
132
133
134 ddp_mdf_owner_rec.mdf_owner_id := rosetta_g_miss_num_map(p7_a0);
135 ddp_mdf_owner_rec.country := p7_a1;
136 ddp_mdf_owner_rec.from_postal_code := p7_a2;
137 ddp_mdf_owner_rec.to_postal_code := p7_a3;
138 ddp_mdf_owner_rec.cmm_resource_id := rosetta_g_miss_num_map(p7_a4);
139 ddp_mdf_owner_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a5);
140 ddp_mdf_owner_rec.last_updated_by := rosetta_g_miss_num_map(p7_a6);
141 ddp_mdf_owner_rec.creation_date := rosetta_g_miss_date_in_map(p7_a7);
142 ddp_mdf_owner_rec.created_by := rosetta_g_miss_num_map(p7_a8);
143 ddp_mdf_owner_rec.last_update_login := rosetta_g_miss_num_map(p7_a9);
144 ddp_mdf_owner_rec.object_version_number := rosetta_g_miss_num_map(p7_a10);
145 ddp_mdf_owner_rec.request_id := rosetta_g_miss_num_map(p7_a11);
146 ddp_mdf_owner_rec.program_application_id := rosetta_g_miss_num_map(p7_a12);
147 ddp_mdf_owner_rec.program_id := rosetta_g_miss_num_map(p7_a13);
148 ddp_mdf_owner_rec.program_update_date := rosetta_g_miss_date_in_map(p7_a14);
149
150 -- here's the delegated call to the old PL/SQL routine
151 pvx_mdf_owners_pvt.update_mdf_owner(p_api_version,
152 p_init_msg_list,
153 p_commit,
154 p_validation_level,
155 x_return_status,
156 x_msg_count,
157 x_msg_data,
158 ddp_mdf_owner_rec);
159
160 -- copy data back from the local OUT or IN-OUT args, if any
161
162
163
164
165
166
167
168 end;
169
170 procedure validate_mdf_owner(p_api_version NUMBER
171 , p_init_msg_list VARCHAR2
172 , p_validation_level NUMBER
173 , x_return_status out nocopy VARCHAR2
174 , x_msg_count out nocopy NUMBER
175 , x_msg_data out nocopy VARCHAR2
176 , p6_a0 NUMBER := 0-1962.0724
177 , p6_a1 VARCHAR2 := fnd_api.g_miss_char
178 , p6_a2 VARCHAR2 := fnd_api.g_miss_char
179 , p6_a3 VARCHAR2 := fnd_api.g_miss_char
180 , p6_a4 NUMBER := 0-1962.0724
181 , p6_a5 DATE := fnd_api.g_miss_date
182 , p6_a6 NUMBER := 0-1962.0724
183 , p6_a7 DATE := fnd_api.g_miss_date
184 , p6_a8 NUMBER := 0-1962.0724
185 , p6_a9 NUMBER := 0-1962.0724
186 , p6_a10 NUMBER := 0-1962.0724
187 , p6_a11 NUMBER := 0-1962.0724
188 , p6_a12 NUMBER := 0-1962.0724
189 , p6_a13 NUMBER := 0-1962.0724
190 , p6_a14 DATE := fnd_api.g_miss_date
191 )
192 as
193 ddp_mdf_owner_rec pvx_mdf_owners_pvt.mdf_owner_rec_type;
194 ddindx binary_integer; indx binary_integer;
195 begin
196
197 -- copy data to the local IN or IN-OUT args, if any
198
199
200
201
202
203
204 ddp_mdf_owner_rec.mdf_owner_id := rosetta_g_miss_num_map(p6_a0);
205 ddp_mdf_owner_rec.country := p6_a1;
206 ddp_mdf_owner_rec.from_postal_code := p6_a2;
207 ddp_mdf_owner_rec.to_postal_code := p6_a3;
208 ddp_mdf_owner_rec.cmm_resource_id := rosetta_g_miss_num_map(p6_a4);
209 ddp_mdf_owner_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a5);
210 ddp_mdf_owner_rec.last_updated_by := rosetta_g_miss_num_map(p6_a6);
211 ddp_mdf_owner_rec.creation_date := rosetta_g_miss_date_in_map(p6_a7);
212 ddp_mdf_owner_rec.created_by := rosetta_g_miss_num_map(p6_a8);
213 ddp_mdf_owner_rec.last_update_login := rosetta_g_miss_num_map(p6_a9);
214 ddp_mdf_owner_rec.object_version_number := rosetta_g_miss_num_map(p6_a10);
215 ddp_mdf_owner_rec.request_id := rosetta_g_miss_num_map(p6_a11);
216 ddp_mdf_owner_rec.program_application_id := rosetta_g_miss_num_map(p6_a12);
217 ddp_mdf_owner_rec.program_id := rosetta_g_miss_num_map(p6_a13);
218 ddp_mdf_owner_rec.program_update_date := rosetta_g_miss_date_in_map(p6_a14);
219
220 -- here's the delegated call to the old PL/SQL routine
221 pvx_mdf_owners_pvt.validate_mdf_owner(p_api_version,
222 p_init_msg_list,
223 p_validation_level,
224 x_return_status,
225 x_msg_count,
226 x_msg_data,
227 ddp_mdf_owner_rec);
228
229 -- copy data back from the local OUT or IN-OUT args, if any
230
231
232
233
234
235
236 end;
237
238 procedure check_mdf_owner_items(p_validation_mode VARCHAR2
239 , x_return_status out nocopy VARCHAR2
240 , p2_a0 NUMBER := 0-1962.0724
241 , p2_a1 VARCHAR2 := fnd_api.g_miss_char
242 , p2_a2 VARCHAR2 := fnd_api.g_miss_char
243 , p2_a3 VARCHAR2 := fnd_api.g_miss_char
244 , p2_a4 NUMBER := 0-1962.0724
245 , p2_a5 DATE := fnd_api.g_miss_date
246 , p2_a6 NUMBER := 0-1962.0724
247 , p2_a7 DATE := fnd_api.g_miss_date
248 , p2_a8 NUMBER := 0-1962.0724
249 , p2_a9 NUMBER := 0-1962.0724
250 , p2_a10 NUMBER := 0-1962.0724
251 , p2_a11 NUMBER := 0-1962.0724
252 , p2_a12 NUMBER := 0-1962.0724
253 , p2_a13 NUMBER := 0-1962.0724
254 , p2_a14 DATE := fnd_api.g_miss_date
255 )
256 as
257 ddp_mdf_owner_rec pvx_mdf_owners_pvt.mdf_owner_rec_type;
258 ddindx binary_integer; indx binary_integer;
259 begin
260
261 -- copy data to the local IN or IN-OUT args, if any
262
263
264 ddp_mdf_owner_rec.mdf_owner_id := rosetta_g_miss_num_map(p2_a0);
265 ddp_mdf_owner_rec.country := p2_a1;
266 ddp_mdf_owner_rec.from_postal_code := p2_a2;
267 ddp_mdf_owner_rec.to_postal_code := p2_a3;
268 ddp_mdf_owner_rec.cmm_resource_id := rosetta_g_miss_num_map(p2_a4);
269 ddp_mdf_owner_rec.last_update_date := rosetta_g_miss_date_in_map(p2_a5);
270 ddp_mdf_owner_rec.last_updated_by := rosetta_g_miss_num_map(p2_a6);
271 ddp_mdf_owner_rec.creation_date := rosetta_g_miss_date_in_map(p2_a7);
272 ddp_mdf_owner_rec.created_by := rosetta_g_miss_num_map(p2_a8);
273 ddp_mdf_owner_rec.last_update_login := rosetta_g_miss_num_map(p2_a9);
274 ddp_mdf_owner_rec.object_version_number := rosetta_g_miss_num_map(p2_a10);
275 ddp_mdf_owner_rec.request_id := rosetta_g_miss_num_map(p2_a11);
276 ddp_mdf_owner_rec.program_application_id := rosetta_g_miss_num_map(p2_a12);
277 ddp_mdf_owner_rec.program_id := rosetta_g_miss_num_map(p2_a13);
278 ddp_mdf_owner_rec.program_update_date := rosetta_g_miss_date_in_map(p2_a14);
279
280 -- here's the delegated call to the old PL/SQL routine
281 pvx_mdf_owners_pvt.check_mdf_owner_items(p_validation_mode,
282 x_return_status,
283 ddp_mdf_owner_rec);
284
285 -- copy data back from the local OUT or IN-OUT args, if any
286
287
288 end;
289
290 procedure check_mdf_owner_rec(p_mode VARCHAR2
291 , x_return_status out nocopy VARCHAR2
292 , p0_a0 NUMBER := 0-1962.0724
293 , p0_a1 VARCHAR2 := fnd_api.g_miss_char
294 , p0_a2 VARCHAR2 := fnd_api.g_miss_char
295 , p0_a3 VARCHAR2 := fnd_api.g_miss_char
296 , p0_a4 NUMBER := 0-1962.0724
297 , p0_a5 DATE := fnd_api.g_miss_date
298 , p0_a6 NUMBER := 0-1962.0724
299 , p0_a7 DATE := fnd_api.g_miss_date
300 , p0_a8 NUMBER := 0-1962.0724
301 , p0_a9 NUMBER := 0-1962.0724
302 , p0_a10 NUMBER := 0-1962.0724
303 , p0_a11 NUMBER := 0-1962.0724
304 , p0_a12 NUMBER := 0-1962.0724
305 , p0_a13 NUMBER := 0-1962.0724
306 , p0_a14 DATE := fnd_api.g_miss_date
307 , p1_a0 NUMBER := 0-1962.0724
308 , p1_a1 VARCHAR2 := fnd_api.g_miss_char
309 , p1_a2 VARCHAR2 := fnd_api.g_miss_char
310 , p1_a3 VARCHAR2 := fnd_api.g_miss_char
311 , p1_a4 NUMBER := 0-1962.0724
312 , p1_a5 DATE := fnd_api.g_miss_date
313 , p1_a6 NUMBER := 0-1962.0724
314 , p1_a7 DATE := fnd_api.g_miss_date
315 , p1_a8 NUMBER := 0-1962.0724
316 , p1_a9 NUMBER := 0-1962.0724
317 , p1_a10 NUMBER := 0-1962.0724
318 , p1_a11 NUMBER := 0-1962.0724
319 , p1_a12 NUMBER := 0-1962.0724
320 , p1_a13 NUMBER := 0-1962.0724
321 , p1_a14 DATE := fnd_api.g_miss_date
322 )
323 as
324 ddp_mdf_owner_rec pvx_mdf_owners_pvt.mdf_owner_rec_type;
325 ddp_complete_rec pvx_mdf_owners_pvt.mdf_owner_rec_type;
326 ddindx binary_integer; indx binary_integer;
327 begin
328
329 -- copy data to the local IN or IN-OUT args, if any
330 ddp_mdf_owner_rec.mdf_owner_id := rosetta_g_miss_num_map(p0_a0);
331 ddp_mdf_owner_rec.country := p0_a1;
332 ddp_mdf_owner_rec.from_postal_code := p0_a2;
333 ddp_mdf_owner_rec.to_postal_code := p0_a3;
334 ddp_mdf_owner_rec.cmm_resource_id := rosetta_g_miss_num_map(p0_a4);
335 ddp_mdf_owner_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a5);
336 ddp_mdf_owner_rec.last_updated_by := rosetta_g_miss_num_map(p0_a6);
337 ddp_mdf_owner_rec.creation_date := rosetta_g_miss_date_in_map(p0_a7);
338 ddp_mdf_owner_rec.created_by := rosetta_g_miss_num_map(p0_a8);
339 ddp_mdf_owner_rec.last_update_login := rosetta_g_miss_num_map(p0_a9);
340 ddp_mdf_owner_rec.object_version_number := rosetta_g_miss_num_map(p0_a10);
341 ddp_mdf_owner_rec.request_id := rosetta_g_miss_num_map(p0_a11);
342 ddp_mdf_owner_rec.program_application_id := rosetta_g_miss_num_map(p0_a12);
343 ddp_mdf_owner_rec.program_id := rosetta_g_miss_num_map(p0_a13);
344 ddp_mdf_owner_rec.program_update_date := rosetta_g_miss_date_in_map(p0_a14);
345
346 ddp_complete_rec.mdf_owner_id := rosetta_g_miss_num_map(p1_a0);
347 ddp_complete_rec.country := p1_a1;
348 ddp_complete_rec.from_postal_code := p1_a2;
349 ddp_complete_rec.to_postal_code := p1_a3;
350 ddp_complete_rec.cmm_resource_id := rosetta_g_miss_num_map(p1_a4);
351 ddp_complete_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a5);
352 ddp_complete_rec.last_updated_by := rosetta_g_miss_num_map(p1_a6);
353 ddp_complete_rec.creation_date := rosetta_g_miss_date_in_map(p1_a7);
354 ddp_complete_rec.created_by := rosetta_g_miss_num_map(p1_a8);
355 ddp_complete_rec.last_update_login := rosetta_g_miss_num_map(p1_a9);
356 ddp_complete_rec.object_version_number := rosetta_g_miss_num_map(p1_a10);
357 ddp_complete_rec.request_id := rosetta_g_miss_num_map(p1_a11);
358 ddp_complete_rec.program_application_id := rosetta_g_miss_num_map(p1_a12);
359 ddp_complete_rec.program_id := rosetta_g_miss_num_map(p1_a13);
360 ddp_complete_rec.program_update_date := rosetta_g_miss_date_in_map(p1_a14);
361
362
363
364 -- here's the delegated call to the old PL/SQL routine
365 pvx_mdf_owners_pvt.check_mdf_owner_rec(ddp_mdf_owner_rec,
366 ddp_complete_rec,
367 p_mode,
368 x_return_status);
369
370 -- copy data back from the local OUT or IN-OUT args, if any
371
372
373
374 end;
375
376 procedure init_mdf_owner_rec(p0_a0 out nocopy NUMBER
377 , p0_a1 out nocopy VARCHAR2
378 , p0_a2 out nocopy VARCHAR2
379 , p0_a3 out nocopy VARCHAR2
380 , p0_a4 out nocopy NUMBER
381 , p0_a5 out nocopy DATE
382 , p0_a6 out nocopy NUMBER
383 , p0_a7 out nocopy DATE
384 , p0_a8 out nocopy NUMBER
385 , p0_a9 out nocopy NUMBER
386 , p0_a10 out nocopy NUMBER
387 , p0_a11 out nocopy NUMBER
388 , p0_a12 out nocopy NUMBER
389 , p0_a13 out nocopy NUMBER
390 , p0_a14 out nocopy DATE
391 )
392 as
393 ddx_mdf_owner_rec pvx_mdf_owners_pvt.mdf_owner_rec_type;
394 ddindx binary_integer; indx binary_integer;
395 begin
396
397 -- copy data to the local IN or IN-OUT args, if any
398
399 -- here's the delegated call to the old PL/SQL routine
400 pvx_mdf_owners_pvt.init_mdf_owner_rec(ddx_mdf_owner_rec);
401
402 -- copy data back from the local OUT or IN-OUT args, if any
403 p0_a0 := rosetta_g_miss_num_map(ddx_mdf_owner_rec.mdf_owner_id);
404 p0_a1 := ddx_mdf_owner_rec.country;
405 p0_a2 := ddx_mdf_owner_rec.from_postal_code;
406 p0_a3 := ddx_mdf_owner_rec.to_postal_code;
407 p0_a4 := rosetta_g_miss_num_map(ddx_mdf_owner_rec.cmm_resource_id);
408 p0_a5 := ddx_mdf_owner_rec.last_update_date;
409 p0_a6 := rosetta_g_miss_num_map(ddx_mdf_owner_rec.last_updated_by);
410 p0_a7 := ddx_mdf_owner_rec.creation_date;
411 p0_a8 := rosetta_g_miss_num_map(ddx_mdf_owner_rec.created_by);
412 p0_a9 := rosetta_g_miss_num_map(ddx_mdf_owner_rec.last_update_login);
413 p0_a10 := rosetta_g_miss_num_map(ddx_mdf_owner_rec.object_version_number);
414 p0_a11 := rosetta_g_miss_num_map(ddx_mdf_owner_rec.request_id);
415 p0_a12 := rosetta_g_miss_num_map(ddx_mdf_owner_rec.program_application_id);
416 p0_a13 := rosetta_g_miss_num_map(ddx_mdf_owner_rec.program_id);
417 p0_a14 := ddx_mdf_owner_rec.program_update_date;
418 end;
419
420 procedure complete_mdf_owner_rec(p1_a0 out nocopy NUMBER
421 , p1_a1 out nocopy VARCHAR2
422 , p1_a2 out nocopy VARCHAR2
423 , p1_a3 out nocopy VARCHAR2
424 , p1_a4 out nocopy NUMBER
425 , p1_a5 out nocopy DATE
426 , p1_a6 out nocopy NUMBER
427 , p1_a7 out nocopy DATE
428 , p1_a8 out nocopy NUMBER
429 , p1_a9 out nocopy NUMBER
430 , p1_a10 out nocopy NUMBER
431 , p1_a11 out nocopy NUMBER
432 , p1_a12 out nocopy NUMBER
433 , p1_a13 out nocopy NUMBER
434 , p1_a14 out nocopy DATE
435 , p0_a0 NUMBER := 0-1962.0724
436 , p0_a1 VARCHAR2 := fnd_api.g_miss_char
437 , p0_a2 VARCHAR2 := fnd_api.g_miss_char
438 , p0_a3 VARCHAR2 := fnd_api.g_miss_char
439 , p0_a4 NUMBER := 0-1962.0724
440 , p0_a5 DATE := fnd_api.g_miss_date
441 , p0_a6 NUMBER := 0-1962.0724
442 , p0_a7 DATE := fnd_api.g_miss_date
443 , p0_a8 NUMBER := 0-1962.0724
444 , p0_a9 NUMBER := 0-1962.0724
445 , p0_a10 NUMBER := 0-1962.0724
446 , p0_a11 NUMBER := 0-1962.0724
447 , p0_a12 NUMBER := 0-1962.0724
448 , p0_a13 NUMBER := 0-1962.0724
449 , p0_a14 DATE := fnd_api.g_miss_date
450 )
451 as
452 ddp_mdf_owner_rec pvx_mdf_owners_pvt.mdf_owner_rec_type;
453 ddx_complete_rec pvx_mdf_owners_pvt.mdf_owner_rec_type;
454 ddindx binary_integer; indx binary_integer;
455 begin
456
457 -- copy data to the local IN or IN-OUT args, if any
458 ddp_mdf_owner_rec.mdf_owner_id := rosetta_g_miss_num_map(p0_a0);
459 ddp_mdf_owner_rec.country := p0_a1;
460 ddp_mdf_owner_rec.from_postal_code := p0_a2;
461 ddp_mdf_owner_rec.to_postal_code := p0_a3;
462 ddp_mdf_owner_rec.cmm_resource_id := rosetta_g_miss_num_map(p0_a4);
463 ddp_mdf_owner_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a5);
464 ddp_mdf_owner_rec.last_updated_by := rosetta_g_miss_num_map(p0_a6);
465 ddp_mdf_owner_rec.creation_date := rosetta_g_miss_date_in_map(p0_a7);
466 ddp_mdf_owner_rec.created_by := rosetta_g_miss_num_map(p0_a8);
467 ddp_mdf_owner_rec.last_update_login := rosetta_g_miss_num_map(p0_a9);
468 ddp_mdf_owner_rec.object_version_number := rosetta_g_miss_num_map(p0_a10);
469 ddp_mdf_owner_rec.request_id := rosetta_g_miss_num_map(p0_a11);
470 ddp_mdf_owner_rec.program_application_id := rosetta_g_miss_num_map(p0_a12);
471 ddp_mdf_owner_rec.program_id := rosetta_g_miss_num_map(p0_a13);
472 ddp_mdf_owner_rec.program_update_date := rosetta_g_miss_date_in_map(p0_a14);
473
474
475 -- here's the delegated call to the old PL/SQL routine
476 pvx_mdf_owners_pvt.complete_mdf_owner_rec(ddp_mdf_owner_rec,
477 ddx_complete_rec);
478
479 -- copy data back from the local OUT or IN-OUT args, if any
480
481 p1_a0 := rosetta_g_miss_num_map(ddx_complete_rec.mdf_owner_id);
482 p1_a1 := ddx_complete_rec.country;
483 p1_a2 := ddx_complete_rec.from_postal_code;
484 p1_a3 := ddx_complete_rec.to_postal_code;
485 p1_a4 := rosetta_g_miss_num_map(ddx_complete_rec.cmm_resource_id);
486 p1_a5 := ddx_complete_rec.last_update_date;
487 p1_a6 := rosetta_g_miss_num_map(ddx_complete_rec.last_updated_by);
488 p1_a7 := ddx_complete_rec.creation_date;
489 p1_a8 := rosetta_g_miss_num_map(ddx_complete_rec.created_by);
490 p1_a9 := rosetta_g_miss_num_map(ddx_complete_rec.last_update_login);
491 p1_a10 := rosetta_g_miss_num_map(ddx_complete_rec.object_version_number);
492 p1_a11 := rosetta_g_miss_num_map(ddx_complete_rec.request_id);
493 p1_a12 := rosetta_g_miss_num_map(ddx_complete_rec.program_application_id);
494 p1_a13 := rosetta_g_miss_num_map(ddx_complete_rec.program_id);
495 p1_a14 := ddx_complete_rec.program_update_date;
496 end;
497
498 end pvx_mdf_owners_pvt_w;