[Home] [Help]
PACKAGE BODY: APPS.AMS_LIST_RULES_ALL_PVT_W
Source
1 package body ams_list_rules_all_pvt_w as
2 /* $Header: amswruab.pls 115.5 2002/11/22 08:57:47 jieli 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_list_rule(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_list_rule_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 NUMBER := 0-1962.0724
39 , p7_a9 DATE := fnd_api.g_miss_date
40 , p7_a10 DATE := fnd_api.g_miss_date
41 , p7_a11 VARCHAR2 := fnd_api.g_miss_char
42 , p7_a12 NUMBER := 0-1962.0724
43 , p7_a13 VARCHAR := fnd_api.g_miss_char
44 )
45 as
46 ddp_list_rule_rec ams_list_rules_all_pvt.list_rule_rec_type;
47 ddindx binary_integer; indx binary_integer;
48 begin
49
50 -- copy data to the local IN or IN-OUT args, if any
51
52
53
54
55
56
57
58 ddp_list_rule_rec.list_rule_id := rosetta_g_miss_num_map(p7_a0);
59 ddp_list_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
60 ddp_list_rule_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
61 ddp_list_rule_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
62 ddp_list_rule_rec.created_by := rosetta_g_miss_num_map(p7_a4);
63 ddp_list_rule_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
64 ddp_list_rule_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
65 ddp_list_rule_rec.list_rule_name := p7_a7;
66 ddp_list_rule_rec.weightage_for_dedupe := rosetta_g_miss_num_map(p7_a8);
67 ddp_list_rule_rec.active_from_date := rosetta_g_miss_date_in_map(p7_a9);
68 ddp_list_rule_rec.active_to_date := rosetta_g_miss_date_in_map(p7_a10);
69 ddp_list_rule_rec.description := p7_a11;
70 ddp_list_rule_rec.org_id := rosetta_g_miss_num_map(p7_a12);
71 ddp_list_rule_rec.list_rule_type := p7_a13;
72
73
74 -- here's the delegated call to the old PL/SQL routine
75 ams_list_rules_all_pvt.create_list_rule(p_api_version,
76 p_init_msg_list,
77 p_commit,
78 p_validation_level,
79 x_return_status,
80 x_msg_count,
81 x_msg_data,
82 ddp_list_rule_rec,
83 x_list_rule_id);
84
85 -- copy data back from the local OUT or IN-OUT args, if any
86
87
88
89
90
91
92
93
94 end;
95
96 procedure update_list_rule(p_api_version NUMBER
97 , p_init_msg_list VARCHAR2
98 , p_commit VARCHAR2
99 , p_validation_level NUMBER
100 , x_return_status OUT NOCOPY VARCHAR2
101 , x_msg_count OUT NOCOPY NUMBER
102 , x_msg_data OUT NOCOPY VARCHAR2
103 , p7_a0 NUMBER := 0-1962.0724
104 , p7_a1 DATE := fnd_api.g_miss_date
105 , p7_a2 NUMBER := 0-1962.0724
106 , p7_a3 DATE := fnd_api.g_miss_date
107 , p7_a4 NUMBER := 0-1962.0724
108 , p7_a5 NUMBER := 0-1962.0724
109 , p7_a6 NUMBER := 0-1962.0724
110 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
111 , p7_a8 NUMBER := 0-1962.0724
112 , p7_a9 DATE := fnd_api.g_miss_date
113 , p7_a10 DATE := fnd_api.g_miss_date
114 , p7_a11 VARCHAR2 := fnd_api.g_miss_char
115 , p7_a12 NUMBER := 0-1962.0724
116 , p7_a13 VARCHAR := fnd_api.g_miss_char
117 )
118 as
119 ddp_list_rule_rec ams_list_rules_all_pvt.list_rule_rec_type;
120 ddindx binary_integer; indx binary_integer;
121 begin
122
123 -- copy data to the local IN or IN-OUT args, if any
124
125
126
127
128
129
130
131 ddp_list_rule_rec.list_rule_id := rosetta_g_miss_num_map(p7_a0);
132 ddp_list_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
133 ddp_list_rule_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
134 ddp_list_rule_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
135 ddp_list_rule_rec.created_by := rosetta_g_miss_num_map(p7_a4);
136 ddp_list_rule_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
137 ddp_list_rule_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
138 ddp_list_rule_rec.list_rule_name := p7_a7;
139 ddp_list_rule_rec.weightage_for_dedupe := rosetta_g_miss_num_map(p7_a8);
140 ddp_list_rule_rec.active_from_date := rosetta_g_miss_date_in_map(p7_a9);
141 ddp_list_rule_rec.active_to_date := rosetta_g_miss_date_in_map(p7_a10);
142 ddp_list_rule_rec.description := p7_a11;
143 ddp_list_rule_rec.org_id := rosetta_g_miss_num_map(p7_a12);
144 ddp_list_rule_rec.list_rule_type := p7_a13;
145
146 -- here's the delegated call to the old PL/SQL routine
147 ams_list_rules_all_pvt.update_list_rule(p_api_version,
148 p_init_msg_list,
149 p_commit,
150 p_validation_level,
151 x_return_status,
152 x_msg_count,
153 x_msg_data,
154 ddp_list_rule_rec);
155
156 -- copy data back from the local OUT or IN-OUT args, if any
157
158
159
160
161
162
163
164 end;
165
166 procedure validate_list_rule(p_api_version NUMBER
167 , p_init_msg_list VARCHAR2
168 , p_validation_level NUMBER
169 , x_return_status OUT NOCOPY VARCHAR2
170 , x_msg_count OUT NOCOPY NUMBER
171 , x_msg_data OUT NOCOPY VARCHAR2
172 , p6_a0 NUMBER := 0-1962.0724
173 , p6_a1 DATE := fnd_api.g_miss_date
174 , p6_a2 NUMBER := 0-1962.0724
175 , p6_a3 DATE := fnd_api.g_miss_date
176 , p6_a4 NUMBER := 0-1962.0724
177 , p6_a5 NUMBER := 0-1962.0724
178 , p6_a6 NUMBER := 0-1962.0724
179 , p6_a7 VARCHAR2 := fnd_api.g_miss_char
180 , p6_a8 NUMBER := 0-1962.0724
181 , p6_a9 DATE := fnd_api.g_miss_date
182 , p6_a10 DATE := fnd_api.g_miss_date
183 , p6_a11 VARCHAR2 := fnd_api.g_miss_char
184 , p6_a12 NUMBER := 0-1962.0724
185 , p6_a13 VARCHAR := fnd_api.g_miss_char
186 )
187 as
188 ddp_list_rule_rec ams_list_rules_all_pvt.list_rule_rec_type;
189 ddindx binary_integer; indx binary_integer;
190 begin
191
192 -- copy data to the local IN or IN-OUT args, if any
193
194
195
196
197
198
199 ddp_list_rule_rec.list_rule_id := rosetta_g_miss_num_map(p6_a0);
200 ddp_list_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a1);
201 ddp_list_rule_rec.last_updated_by := rosetta_g_miss_num_map(p6_a2);
202 ddp_list_rule_rec.creation_date := rosetta_g_miss_date_in_map(p6_a3);
203 ddp_list_rule_rec.created_by := rosetta_g_miss_num_map(p6_a4);
204 ddp_list_rule_rec.last_update_login := rosetta_g_miss_num_map(p6_a5);
205 ddp_list_rule_rec.object_version_number := rosetta_g_miss_num_map(p6_a6);
206 ddp_list_rule_rec.list_rule_name := p6_a7;
207 ddp_list_rule_rec.weightage_for_dedupe := rosetta_g_miss_num_map(p6_a8);
208 ddp_list_rule_rec.active_from_date := rosetta_g_miss_date_in_map(p6_a9);
209 ddp_list_rule_rec.active_to_date := rosetta_g_miss_date_in_map(p6_a10);
210 ddp_list_rule_rec.description := p6_a11;
211 ddp_list_rule_rec.org_id := rosetta_g_miss_num_map(p6_a12);
212 ddp_list_rule_rec.list_rule_type := p6_a13;
213
214 -- here's the delegated call to the old PL/SQL routine
215 ams_list_rules_all_pvt.validate_list_rule(p_api_version,
216 p_init_msg_list,
217 p_validation_level,
218 x_return_status,
219 x_msg_count,
220 x_msg_data,
221 ddp_list_rule_rec);
222
223 -- copy data back from the local OUT or IN-OUT args, if any
224
225
226
227
228
229
230 end;
231
232 procedure check_items(p_validation_mode VARCHAR2
233 , x_return_status OUT NOCOPY VARCHAR2
234 , p2_a0 NUMBER := 0-1962.0724
235 , p2_a1 DATE := fnd_api.g_miss_date
236 , p2_a2 NUMBER := 0-1962.0724
237 , p2_a3 DATE := fnd_api.g_miss_date
238 , p2_a4 NUMBER := 0-1962.0724
239 , p2_a5 NUMBER := 0-1962.0724
240 , p2_a6 NUMBER := 0-1962.0724
241 , p2_a7 VARCHAR2 := fnd_api.g_miss_char
242 , p2_a8 NUMBER := 0-1962.0724
243 , p2_a9 DATE := fnd_api.g_miss_date
244 , p2_a10 DATE := fnd_api.g_miss_date
245 , p2_a11 VARCHAR2 := fnd_api.g_miss_char
246 , p2_a12 NUMBER := 0-1962.0724
247 , p2_a13 VARCHAR := fnd_api.g_miss_char
248 )
249 as
250 ddp_list_rule_rec ams_list_rules_all_pvt.list_rule_rec_type;
251 ddindx binary_integer; indx binary_integer;
252 begin
253
254 -- copy data to the local IN or IN-OUT args, if any
255
256
257 ddp_list_rule_rec.list_rule_id := rosetta_g_miss_num_map(p2_a0);
258 ddp_list_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p2_a1);
259 ddp_list_rule_rec.last_updated_by := rosetta_g_miss_num_map(p2_a2);
260 ddp_list_rule_rec.creation_date := rosetta_g_miss_date_in_map(p2_a3);
261 ddp_list_rule_rec.created_by := rosetta_g_miss_num_map(p2_a4);
262 ddp_list_rule_rec.last_update_login := rosetta_g_miss_num_map(p2_a5);
263 ddp_list_rule_rec.object_version_number := rosetta_g_miss_num_map(p2_a6);
264 ddp_list_rule_rec.list_rule_name := p2_a7;
265 ddp_list_rule_rec.weightage_for_dedupe := rosetta_g_miss_num_map(p2_a8);
266 ddp_list_rule_rec.active_from_date := rosetta_g_miss_date_in_map(p2_a9);
267 ddp_list_rule_rec.active_to_date := rosetta_g_miss_date_in_map(p2_a10);
268 ddp_list_rule_rec.description := p2_a11;
269 ddp_list_rule_rec.org_id := rosetta_g_miss_num_map(p2_a12);
270 ddp_list_rule_rec.list_rule_type := p2_a13;
271
272 -- here's the delegated call to the old PL/SQL routine
273 ams_list_rules_all_pvt.check_items(p_validation_mode,
274 x_return_status,
275 ddp_list_rule_rec);
276
277 -- copy data back from the local OUT or IN-OUT args, if any
278
279
280 end;
281
282 procedure check_req_items(p_validation_mode VARCHAR2
283 , x_return_status OUT NOCOPY VARCHAR2
284 , p1_a0 NUMBER := 0-1962.0724
285 , p1_a1 DATE := fnd_api.g_miss_date
286 , p1_a2 NUMBER := 0-1962.0724
287 , p1_a3 DATE := fnd_api.g_miss_date
288 , p1_a4 NUMBER := 0-1962.0724
289 , p1_a5 NUMBER := 0-1962.0724
290 , p1_a6 NUMBER := 0-1962.0724
291 , p1_a7 VARCHAR2 := fnd_api.g_miss_char
292 , p1_a8 NUMBER := 0-1962.0724
293 , p1_a9 DATE := fnd_api.g_miss_date
294 , p1_a10 DATE := fnd_api.g_miss_date
295 , p1_a11 VARCHAR2 := fnd_api.g_miss_char
296 , p1_a12 NUMBER := 0-1962.0724
297 , p1_a13 VARCHAR := fnd_api.g_miss_char
298 )
299 as
300 ddp_list_rule_rec ams_list_rules_all_pvt.list_rule_rec_type;
301 ddindx binary_integer; indx binary_integer;
302 begin
303
304 -- copy data to the local IN or IN-OUT args, if any
305
306 ddp_list_rule_rec.list_rule_id := rosetta_g_miss_num_map(p1_a0);
307 ddp_list_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
308 ddp_list_rule_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
309 ddp_list_rule_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
310 ddp_list_rule_rec.created_by := rosetta_g_miss_num_map(p1_a4);
311 ddp_list_rule_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
312 ddp_list_rule_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
313 ddp_list_rule_rec.list_rule_name := p1_a7;
314 ddp_list_rule_rec.weightage_for_dedupe := rosetta_g_miss_num_map(p1_a8);
315 ddp_list_rule_rec.active_from_date := rosetta_g_miss_date_in_map(p1_a9);
316 ddp_list_rule_rec.active_to_date := rosetta_g_miss_date_in_map(p1_a10);
317 ddp_list_rule_rec.description := p1_a11;
318 ddp_list_rule_rec.org_id := rosetta_g_miss_num_map(p1_a12);
319 ddp_list_rule_rec.list_rule_type := p1_a13;
320
321
322 -- here's the delegated call to the old PL/SQL routine
323 ams_list_rules_all_pvt.check_req_items(p_validation_mode,
324 ddp_list_rule_rec,
325 x_return_status);
326
327 -- copy data back from the local OUT or IN-OUT args, if any
328
329
330 end;
331
332 procedure check_uk_items(p_validation_mode VARCHAR2
333 , x_return_status OUT NOCOPY VARCHAR2
334 , p1_a0 NUMBER := 0-1962.0724
335 , p1_a1 DATE := fnd_api.g_miss_date
336 , p1_a2 NUMBER := 0-1962.0724
337 , p1_a3 DATE := fnd_api.g_miss_date
338 , p1_a4 NUMBER := 0-1962.0724
339 , p1_a5 NUMBER := 0-1962.0724
340 , p1_a6 NUMBER := 0-1962.0724
341 , p1_a7 VARCHAR2 := fnd_api.g_miss_char
342 , p1_a8 NUMBER := 0-1962.0724
343 , p1_a9 DATE := fnd_api.g_miss_date
344 , p1_a10 DATE := fnd_api.g_miss_date
345 , p1_a11 VARCHAR2 := fnd_api.g_miss_char
346 , p1_a12 NUMBER := 0-1962.0724
347 , p1_a13 VARCHAR := fnd_api.g_miss_char
348 )
349 as
350 ddp_list_rule_rec ams_list_rules_all_pvt.list_rule_rec_type;
351 ddindx binary_integer; indx binary_integer;
352 begin
353
354 -- copy data to the local IN or IN-OUT args, if any
355
356 ddp_list_rule_rec.list_rule_id := rosetta_g_miss_num_map(p1_a0);
357 ddp_list_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
358 ddp_list_rule_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
359 ddp_list_rule_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
360 ddp_list_rule_rec.created_by := rosetta_g_miss_num_map(p1_a4);
361 ddp_list_rule_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
362 ddp_list_rule_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
363 ddp_list_rule_rec.list_rule_name := p1_a7;
364 ddp_list_rule_rec.weightage_for_dedupe := rosetta_g_miss_num_map(p1_a8);
365 ddp_list_rule_rec.active_from_date := rosetta_g_miss_date_in_map(p1_a9);
366 ddp_list_rule_rec.active_to_date := rosetta_g_miss_date_in_map(p1_a10);
367 ddp_list_rule_rec.description := p1_a11;
368 ddp_list_rule_rec.org_id := rosetta_g_miss_num_map(p1_a12);
369 ddp_list_rule_rec.list_rule_type := p1_a13;
370
371
372 -- here's the delegated call to the old PL/SQL routine
373 ams_list_rules_all_pvt.check_uk_items(p_validation_mode,
374 ddp_list_rule_rec,
375 x_return_status);
376
377 -- copy data back from the local OUT or IN-OUT args, if any
378
379
380 end;
381
382 procedure check_lookup_items(x_return_status OUT NOCOPY VARCHAR2
383 , p0_a0 NUMBER := 0-1962.0724
384 , p0_a1 DATE := fnd_api.g_miss_date
385 , p0_a2 NUMBER := 0-1962.0724
386 , p0_a3 DATE := fnd_api.g_miss_date
387 , p0_a4 NUMBER := 0-1962.0724
388 , p0_a5 NUMBER := 0-1962.0724
389 , p0_a6 NUMBER := 0-1962.0724
390 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
391 , p0_a8 NUMBER := 0-1962.0724
392 , p0_a9 DATE := fnd_api.g_miss_date
393 , p0_a10 DATE := fnd_api.g_miss_date
394 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
395 , p0_a12 NUMBER := 0-1962.0724
396 , p0_a13 VARCHAR := fnd_api.g_miss_char
397 )
398 as
399 ddp_list_rule_rec ams_list_rules_all_pvt.list_rule_rec_type;
400 ddindx binary_integer; indx binary_integer;
401 begin
402
406 ddp_list_rule_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
403 -- copy data to the local IN or IN-OUT args, if any
404 ddp_list_rule_rec.list_rule_id := rosetta_g_miss_num_map(p0_a0);
405 ddp_list_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
407 ddp_list_rule_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
408 ddp_list_rule_rec.created_by := rosetta_g_miss_num_map(p0_a4);
409 ddp_list_rule_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
410 ddp_list_rule_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
411 ddp_list_rule_rec.list_rule_name := p0_a7;
412 ddp_list_rule_rec.weightage_for_dedupe := rosetta_g_miss_num_map(p0_a8);
413 ddp_list_rule_rec.active_from_date := rosetta_g_miss_date_in_map(p0_a9);
414 ddp_list_rule_rec.active_to_date := rosetta_g_miss_date_in_map(p0_a10);
415 ddp_list_rule_rec.description := p0_a11;
416 ddp_list_rule_rec.org_id := rosetta_g_miss_num_map(p0_a12);
417 ddp_list_rule_rec.list_rule_type := p0_a13;
418
419
420 -- here's the delegated call to the old PL/SQL routine
421 ams_list_rules_all_pvt.check_lookup_items(ddp_list_rule_rec,
422 x_return_status);
423
424 -- copy data back from the local OUT or IN-OUT args, if any
425
426 end;
427
428 procedure check_record(x_return_status OUT NOCOPY VARCHAR2
429 , p0_a0 NUMBER := 0-1962.0724
430 , p0_a1 DATE := fnd_api.g_miss_date
431 , p0_a2 NUMBER := 0-1962.0724
432 , p0_a3 DATE := fnd_api.g_miss_date
433 , p0_a4 NUMBER := 0-1962.0724
434 , p0_a5 NUMBER := 0-1962.0724
435 , p0_a6 NUMBER := 0-1962.0724
436 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
437 , p0_a8 NUMBER := 0-1962.0724
438 , p0_a9 DATE := fnd_api.g_miss_date
439 , p0_a10 DATE := fnd_api.g_miss_date
440 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
441 , p0_a12 NUMBER := 0-1962.0724
442 , p0_a13 VARCHAR := fnd_api.g_miss_char
443 , p1_a0 NUMBER := 0-1962.0724
444 , p1_a1 DATE := fnd_api.g_miss_date
445 , p1_a2 NUMBER := 0-1962.0724
446 , p1_a3 DATE := fnd_api.g_miss_date
447 , p1_a4 NUMBER := 0-1962.0724
448 , p1_a5 NUMBER := 0-1962.0724
449 , p1_a6 NUMBER := 0-1962.0724
450 , p1_a7 VARCHAR2 := fnd_api.g_miss_char
451 , p1_a8 NUMBER := 0-1962.0724
452 , p1_a9 DATE := fnd_api.g_miss_date
453 , p1_a10 DATE := fnd_api.g_miss_date
454 , p1_a11 VARCHAR2 := fnd_api.g_miss_char
455 , p1_a12 NUMBER := 0-1962.0724
456 , p1_a13 VARCHAR := fnd_api.g_miss_char
457 )
458 as
459 ddp_list_rule_rec ams_list_rules_all_pvt.list_rule_rec_type;
460 ddp_complete_rec ams_list_rules_all_pvt.list_rule_rec_type;
461 ddindx binary_integer; indx binary_integer;
462 begin
463
464 -- copy data to the local IN or IN-OUT args, if any
465 ddp_list_rule_rec.list_rule_id := rosetta_g_miss_num_map(p0_a0);
466 ddp_list_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
467 ddp_list_rule_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
468 ddp_list_rule_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
469 ddp_list_rule_rec.created_by := rosetta_g_miss_num_map(p0_a4);
470 ddp_list_rule_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
471 ddp_list_rule_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
472 ddp_list_rule_rec.list_rule_name := p0_a7;
473 ddp_list_rule_rec.weightage_for_dedupe := rosetta_g_miss_num_map(p0_a8);
474 ddp_list_rule_rec.active_from_date := rosetta_g_miss_date_in_map(p0_a9);
475 ddp_list_rule_rec.active_to_date := rosetta_g_miss_date_in_map(p0_a10);
476 ddp_list_rule_rec.description := p0_a11;
477 ddp_list_rule_rec.org_id := rosetta_g_miss_num_map(p0_a12);
478 ddp_list_rule_rec.list_rule_type := p0_a13;
479
480 ddp_complete_rec.list_rule_id := rosetta_g_miss_num_map(p1_a0);
481 ddp_complete_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
482 ddp_complete_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
483 ddp_complete_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
484 ddp_complete_rec.created_by := rosetta_g_miss_num_map(p1_a4);
485 ddp_complete_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
486 ddp_complete_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
487 ddp_complete_rec.list_rule_name := p1_a7;
488 ddp_complete_rec.weightage_for_dedupe := rosetta_g_miss_num_map(p1_a8);
489 ddp_complete_rec.active_from_date := rosetta_g_miss_date_in_map(p1_a9);
490 ddp_complete_rec.active_to_date := rosetta_g_miss_date_in_map(p1_a10);
491 ddp_complete_rec.description := p1_a11;
492 ddp_complete_rec.org_id := rosetta_g_miss_num_map(p1_a12);
493 ddp_complete_rec.list_rule_type := p1_a13;
494
495
496 -- here's the delegated call to the old PL/SQL routine
497 ams_list_rules_all_pvt.check_record(ddp_list_rule_rec,
498 ddp_complete_rec,
499 x_return_status);
500
501 -- copy data back from the local OUT or IN-OUT args, if any
502
503
504 end;
505
506 procedure complete_rec(p1_a0 OUT NOCOPY NUMBER
507 , p1_a1 OUT NOCOPY DATE
508 , p1_a2 OUT NOCOPY NUMBER
509 , p1_a3 OUT NOCOPY DATE
510 , p1_a4 OUT NOCOPY NUMBER
511 , p1_a5 OUT NOCOPY NUMBER
512 , p1_a6 OUT NOCOPY NUMBER
513 , p1_a7 OUT NOCOPY VARCHAR2
517 , p1_a11 OUT NOCOPY VARCHAR2
514 , p1_a8 OUT NOCOPY NUMBER
515 , p1_a9 OUT NOCOPY DATE
516 , p1_a10 OUT NOCOPY DATE
518 , p1_a12 OUT NOCOPY NUMBER
519 , p1_a13 OUT NOCOPY VARCHAR
520 , p0_a0 NUMBER := 0-1962.0724
521 , p0_a1 DATE := fnd_api.g_miss_date
522 , p0_a2 NUMBER := 0-1962.0724
523 , p0_a3 DATE := fnd_api.g_miss_date
524 , p0_a4 NUMBER := 0-1962.0724
525 , p0_a5 NUMBER := 0-1962.0724
526 , p0_a6 NUMBER := 0-1962.0724
527 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
528 , p0_a8 NUMBER := 0-1962.0724
529 , p0_a9 DATE := fnd_api.g_miss_date
530 , p0_a10 DATE := fnd_api.g_miss_date
531 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
532 , p0_a12 NUMBER := 0-1962.0724
533 , p0_a13 VARCHAR := fnd_api.g_miss_char
534 )
535 as
536 ddp_list_rule_rec ams_list_rules_all_pvt.list_rule_rec_type;
537 ddx_complete_rec ams_list_rules_all_pvt.list_rule_rec_type;
538 ddindx binary_integer; indx binary_integer;
539 begin
540
541 -- copy data to the local IN or IN-OUT args, if any
542 ddp_list_rule_rec.list_rule_id := rosetta_g_miss_num_map(p0_a0);
543 ddp_list_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
544 ddp_list_rule_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
545 ddp_list_rule_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
546 ddp_list_rule_rec.created_by := rosetta_g_miss_num_map(p0_a4);
547 ddp_list_rule_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
548 ddp_list_rule_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
549 ddp_list_rule_rec.list_rule_name := p0_a7;
550 ddp_list_rule_rec.weightage_for_dedupe := rosetta_g_miss_num_map(p0_a8);
551 ddp_list_rule_rec.active_from_date := rosetta_g_miss_date_in_map(p0_a9);
552 ddp_list_rule_rec.active_to_date := rosetta_g_miss_date_in_map(p0_a10);
553 ddp_list_rule_rec.description := p0_a11;
554 ddp_list_rule_rec.org_id := rosetta_g_miss_num_map(p0_a12);
555 ddp_list_rule_rec.list_rule_type := p0_a13;
556
557
558 -- here's the delegated call to the old PL/SQL routine
559 ams_list_rules_all_pvt.complete_rec(ddp_list_rule_rec,
560 ddx_complete_rec);
561
562 -- copy data back from the local OUT or IN-OUT args, if any
563
564 p1_a0 := rosetta_g_miss_num_map(ddx_complete_rec.list_rule_id);
565 p1_a1 := ddx_complete_rec.last_update_date;
566 p1_a2 := rosetta_g_miss_num_map(ddx_complete_rec.last_updated_by);
567 p1_a3 := ddx_complete_rec.creation_date;
568 p1_a4 := rosetta_g_miss_num_map(ddx_complete_rec.created_by);
569 p1_a5 := rosetta_g_miss_num_map(ddx_complete_rec.last_update_login);
570 p1_a6 := rosetta_g_miss_num_map(ddx_complete_rec.object_version_number);
571 p1_a7 := ddx_complete_rec.list_rule_name;
572 p1_a8 := rosetta_g_miss_num_map(ddx_complete_rec.weightage_for_dedupe);
573 p1_a9 := ddx_complete_rec.active_from_date;
577 p1_a13 := ddx_complete_rec.list_rule_type;
574 p1_a10 := ddx_complete_rec.active_to_date;
575 p1_a11 := ddx_complete_rec.description;
576 p1_a12 := rosetta_g_miss_num_map(ddx_complete_rec.org_id);
578 end;
579
580 procedure init_rec(p0_a0 OUT NOCOPY NUMBER
581 , p0_a1 OUT NOCOPY DATE
582 , p0_a2 OUT NOCOPY NUMBER
583 , p0_a3 OUT NOCOPY DATE
584 , p0_a4 OUT NOCOPY NUMBER
585 , p0_a5 OUT NOCOPY NUMBER
586 , p0_a6 OUT NOCOPY NUMBER
587 , p0_a7 OUT NOCOPY VARCHAR2
588 , p0_a8 OUT NOCOPY NUMBER
589 , p0_a9 OUT NOCOPY DATE
590 , p0_a10 OUT NOCOPY DATE
591 , p0_a11 OUT NOCOPY VARCHAR2
592 , p0_a12 OUT NOCOPY NUMBER
593 , p0_a13 OUT NOCOPY VARCHAR
594 )
595 as
596 ddx_list_rule_rec ams_list_rules_all_pvt.list_rule_rec_type;
597 ddindx binary_integer; indx binary_integer;
598 begin
599
600 -- copy data to the local IN or IN-OUT args, if any
601
602 -- here's the delegated call to the old PL/SQL routine
603 ams_list_rules_all_pvt.init_rec(ddx_list_rule_rec);
604
605 -- copy data back from the local OUT or IN-OUT args, if any
606 p0_a0 := rosetta_g_miss_num_map(ddx_list_rule_rec.list_rule_id);
607 p0_a1 := ddx_list_rule_rec.last_update_date;
608 p0_a2 := rosetta_g_miss_num_map(ddx_list_rule_rec.last_updated_by);
609 p0_a3 := ddx_list_rule_rec.creation_date;
610 p0_a4 := rosetta_g_miss_num_map(ddx_list_rule_rec.created_by);
611 p0_a5 := rosetta_g_miss_num_map(ddx_list_rule_rec.last_update_login);
612 p0_a6 := rosetta_g_miss_num_map(ddx_list_rule_rec.object_version_number);
613 p0_a7 := ddx_list_rule_rec.list_rule_name;
614 p0_a8 := rosetta_g_miss_num_map(ddx_list_rule_rec.weightage_for_dedupe);
615 p0_a9 := ddx_list_rule_rec.active_from_date;
616 p0_a10 := ddx_list_rule_rec.active_to_date;
617 p0_a11 := ddx_list_rule_rec.description;
618 p0_a12 := rosetta_g_miss_num_map(ddx_list_rule_rec.org_id);
619 p0_a13 := ddx_list_rule_rec.list_rule_type;
620 end;
621
622 end ams_list_rules_all_pvt_w;