[Home] [Help]
PACKAGE BODY: APPS.AMS_LIST_SRC_FIELD_PVT_W
Source
1 package body ams_list_src_field_pvt_w as
2 /* $Header: amswlsfb.pls 115.13 2004/03/18 20:30:01 usingh 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 -- 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 rosetta_table_copy_in_p3(t out nocopy ams_list_src_field_pvt.list_src_field_tbl_type, a0 JTF_NUMBER_TABLE
23 , a1 JTF_DATE_TABLE
24 , a2 JTF_NUMBER_TABLE
25 , a3 JTF_DATE_TABLE
26 , a4 JTF_NUMBER_TABLE
27 , a5 JTF_NUMBER_TABLE
28 , a6 JTF_NUMBER_TABLE
29 , a7 JTF_VARCHAR2_TABLE_100
30 , a8 JTF_NUMBER_TABLE
31 , a9 JTF_VARCHAR2_TABLE_100
32 , a10 JTF_VARCHAR2_TABLE_100
33 , a11 JTF_VARCHAR2_TABLE_200
34 , a12 JTF_VARCHAR2_TABLE_200
35 , a13 JTF_VARCHAR2_TABLE_100
36 , a14 JTF_NUMBER_TABLE
37 , a15 JTF_NUMBER_TABLE
38 , a16 JTF_VARCHAR2_TABLE_100
39 , a17 JTF_VARCHAR2_TABLE_100
40 , a18 JTF_NUMBER_TABLE
41 , a19 JTF_VARCHAR2_TABLE_100
42 , a20 JTF_NUMBER_TABLE
43 , a21 JTF_VARCHAR2_TABLE_100
44 , a22 JTF_VARCHAR2_TABLE_100
45 , a23 JTF_VARCHAR2_TABLE_100
46 , a24 JTF_VARCHAR2_TABLE_100
47 , a25 JTF_VARCHAR2_TABLE_100
48 , a26 JTF_VARCHAR2_TABLE_100
49 , a27 JTF_NUMBER_TABLE
50 , a28 JTF_VARCHAR2_TABLE_100
51 ) as
52 ddindx binary_integer; indx binary_integer;
53 begin
54 if a0 is not null and a0.count > 0 then
55 if a0.count > 0 then
56 indx := a0.first;
57 ddindx := 1;
58 while true loop
59 t(ddindx).list_source_field_id := rosetta_g_miss_num_map(a0(indx));
60 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a1(indx));
61 t(ddindx).last_updated_by := rosetta_g_miss_num_map(a2(indx));
62 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a3(indx));
63 t(ddindx).created_by := rosetta_g_miss_num_map(a4(indx));
64 t(ddindx).last_update_login := rosetta_g_miss_num_map(a5(indx));
65 t(ddindx).object_version_number := rosetta_g_miss_num_map(a6(indx));
66 t(ddindx).de_list_source_type_code := a7(indx);
67 t(ddindx).list_source_type_id := rosetta_g_miss_num_map(a8(indx));
68 t(ddindx).field_table_name := a9(indx);
69 t(ddindx).field_column_name := a10(indx);
70 t(ddindx).source_column_name := a11(indx);
71 t(ddindx).source_column_meaning := a12(indx);
72 t(ddindx).enabled_flag := a13(indx);
73 t(ddindx).start_position := rosetta_g_miss_num_map(a14(indx));
74 t(ddindx).end_position := rosetta_g_miss_num_map(a15(indx));
75 t(ddindx).analytics_flag := a16(indx);
76 t(ddindx).auto_binning_flag := a17(indx);
77 t(ddindx).no_of_buckets := rosetta_g_miss_num_map(a18(indx));
78 t(ddindx).field_data_type := a19(indx);
79 t(ddindx).field_data_size := rosetta_g_miss_num_map(a20(indx));
80 t(ddindx).default_ui_control := a21(indx);
81 t(ddindx).field_lookup_type := a22(indx);
82 t(ddindx).field_lookup_type_view_name := a23(indx);
83 t(ddindx).allow_label_override := a24(indx);
84 t(ddindx).field_usage_type := a25(indx);
85 t(ddindx).dialog_enabled := a26(indx);
86 t(ddindx).attb_lov_id := rosetta_g_miss_num_map(a27(indx));
87 t(ddindx).lov_defined_flag := a28(indx);
88 ddindx := ddindx+1;
89 if a0.last =indx
90 then exit;
91 end if;
92 indx := a0.next(indx);
93 end loop;
94 end if;
95 end if;
96 end rosetta_table_copy_in_p3;
97 procedure rosetta_table_copy_out_p3(t ams_list_src_field_pvt.list_src_field_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
98 , a1 out nocopy JTF_DATE_TABLE
99 , a2 out nocopy JTF_NUMBER_TABLE
100 , a3 out nocopy JTF_DATE_TABLE
101 , a4 out nocopy JTF_NUMBER_TABLE
102 , a5 out nocopy JTF_NUMBER_TABLE
103 , a6 out nocopy JTF_NUMBER_TABLE
104 , a7 out nocopy JTF_VARCHAR2_TABLE_100
105 , a8 out nocopy JTF_NUMBER_TABLE
106 , a9 out nocopy JTF_VARCHAR2_TABLE_100
107 , a10 out nocopy JTF_VARCHAR2_TABLE_100
108 , a11 out nocopy JTF_VARCHAR2_TABLE_200
109 , a12 out nocopy JTF_VARCHAR2_TABLE_200
110 , a13 out nocopy JTF_VARCHAR2_TABLE_100
111 , a14 out nocopy JTF_NUMBER_TABLE
112 , a15 out nocopy JTF_NUMBER_TABLE
113 , a16 out nocopy JTF_VARCHAR2_TABLE_100
114 , a17 out nocopy JTF_VARCHAR2_TABLE_100
115 , a18 out nocopy JTF_NUMBER_TABLE
116 , a19 out nocopy JTF_VARCHAR2_TABLE_100
117 , a20 out nocopy JTF_NUMBER_TABLE
118 , a21 out nocopy JTF_VARCHAR2_TABLE_100
119 , a22 out nocopy JTF_VARCHAR2_TABLE_100
120 , a23 out nocopy JTF_VARCHAR2_TABLE_100
121 , a24 out nocopy JTF_VARCHAR2_TABLE_100
122 , a25 out nocopy JTF_VARCHAR2_TABLE_100
123 , a26 out nocopy JTF_VARCHAR2_TABLE_100
124 , a27 out nocopy JTF_NUMBER_TABLE
125 , a28 out nocopy JTF_VARCHAR2_TABLE_100
126 ) as
127 ddindx binary_integer; indx binary_integer;
128 begin
129 if t is null or t.count = 0 then
130 a0 := JTF_NUMBER_TABLE();
131 a1 := JTF_DATE_TABLE();
132 a2 := JTF_NUMBER_TABLE();
133 a3 := JTF_DATE_TABLE();
134 a4 := JTF_NUMBER_TABLE();
135 a5 := JTF_NUMBER_TABLE();
136 a6 := JTF_NUMBER_TABLE();
137 a7 := JTF_VARCHAR2_TABLE_100();
138 a8 := JTF_NUMBER_TABLE();
139 a9 := JTF_VARCHAR2_TABLE_100();
140 a10 := JTF_VARCHAR2_TABLE_100();
141 a11 := JTF_VARCHAR2_TABLE_200();
142 a12 := JTF_VARCHAR2_TABLE_200();
143 a13 := JTF_VARCHAR2_TABLE_100();
144 a14 := JTF_NUMBER_TABLE();
145 a15 := JTF_NUMBER_TABLE();
146 a16 := JTF_VARCHAR2_TABLE_100();
147 a17 := JTF_VARCHAR2_TABLE_100();
148 a18 := JTF_NUMBER_TABLE();
149 a19 := JTF_VARCHAR2_TABLE_100();
150 a20 := JTF_NUMBER_TABLE();
151 a21 := JTF_VARCHAR2_TABLE_100();
152 a22 := JTF_VARCHAR2_TABLE_100();
153 a23 := JTF_VARCHAR2_TABLE_100();
154 a24 := JTF_VARCHAR2_TABLE_100();
155 a25 := JTF_VARCHAR2_TABLE_100();
156 a26 := JTF_VARCHAR2_TABLE_100();
157 a27 := JTF_NUMBER_TABLE();
158 a28 := JTF_VARCHAR2_TABLE_100();
159 else
160 a0 := JTF_NUMBER_TABLE();
161 a1 := JTF_DATE_TABLE();
162 a2 := JTF_NUMBER_TABLE();
163 a3 := JTF_DATE_TABLE();
164 a4 := JTF_NUMBER_TABLE();
165 a5 := JTF_NUMBER_TABLE();
166 a6 := JTF_NUMBER_TABLE();
167 a7 := JTF_VARCHAR2_TABLE_100();
168 a8 := JTF_NUMBER_TABLE();
169 a9 := JTF_VARCHAR2_TABLE_100();
170 a10 := JTF_VARCHAR2_TABLE_100();
171 a11 := JTF_VARCHAR2_TABLE_200();
172 a12 := JTF_VARCHAR2_TABLE_200();
173 a13 := JTF_VARCHAR2_TABLE_100();
174 a14 := JTF_NUMBER_TABLE();
175 a15 := JTF_NUMBER_TABLE();
176 a16 := JTF_VARCHAR2_TABLE_100();
177 a17 := JTF_VARCHAR2_TABLE_100();
178 a18 := JTF_NUMBER_TABLE();
179 a19 := JTF_VARCHAR2_TABLE_100();
180 a20 := JTF_NUMBER_TABLE();
181 a21 := JTF_VARCHAR2_TABLE_100();
182 a22 := JTF_VARCHAR2_TABLE_100();
183 a23 := JTF_VARCHAR2_TABLE_100();
184 a24 := JTF_VARCHAR2_TABLE_100();
185 a25 := JTF_VARCHAR2_TABLE_100();
186 a26 := JTF_VARCHAR2_TABLE_100();
187 a27 := JTF_NUMBER_TABLE();
188 a28 := JTF_VARCHAR2_TABLE_100();
189 if t.count > 0 then
190 a0.extend(t.count);
191 a1.extend(t.count);
192 a2.extend(t.count);
193 a3.extend(t.count);
194 a4.extend(t.count);
195 a5.extend(t.count);
196 a6.extend(t.count);
197 a7.extend(t.count);
198 a8.extend(t.count);
199 a9.extend(t.count);
200 a10.extend(t.count);
201 a11.extend(t.count);
202 a12.extend(t.count);
203 a13.extend(t.count);
204 a14.extend(t.count);
205 a15.extend(t.count);
206 a16.extend(t.count);
207 a17.extend(t.count);
208 a18.extend(t.count);
209 a19.extend(t.count);
210 a20.extend(t.count);
211 a21.extend(t.count);
212 a22.extend(t.count);
213 a23.extend(t.count);
214 a24.extend(t.count);
215 a25.extend(t.count);
216 a26.extend(t.count);
217 a27.extend(t.count);
218 a28.extend(t.count);
219 ddindx := t.first;
220 indx := 1;
221 while true loop
222 a0(indx) := rosetta_g_miss_num_map(t(ddindx).list_source_field_id);
223 a1(indx) := t(ddindx).last_update_date;
224 a2(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
225 a3(indx) := t(ddindx).creation_date;
226 a4(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
227 a5(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
228 a6(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
229 a7(indx) := t(ddindx).de_list_source_type_code;
230 a8(indx) := rosetta_g_miss_num_map(t(ddindx).list_source_type_id);
231 a9(indx) := t(ddindx).field_table_name;
232 a10(indx) := t(ddindx).field_column_name;
233 a11(indx) := t(ddindx).source_column_name;
234 a12(indx) := t(ddindx).source_column_meaning;
235 a13(indx) := t(ddindx).enabled_flag;
236 a14(indx) := rosetta_g_miss_num_map(t(ddindx).start_position);
237 a15(indx) := rosetta_g_miss_num_map(t(ddindx).end_position);
238 a16(indx) := t(ddindx).analytics_flag;
239 a17(indx) := t(ddindx).auto_binning_flag;
240 a18(indx) := rosetta_g_miss_num_map(t(ddindx).no_of_buckets);
241 a19(indx) := t(ddindx).field_data_type;
242 a20(indx) := rosetta_g_miss_num_map(t(ddindx).field_data_size);
243 a21(indx) := t(ddindx).default_ui_control;
244 a22(indx) := t(ddindx).field_lookup_type;
245 a23(indx) := t(ddindx).field_lookup_type_view_name;
246 a24(indx) := t(ddindx).allow_label_override;
247 a25(indx) := t(ddindx).field_usage_type;
248 a26(indx) := t(ddindx).dialog_enabled;
249 a27(indx) := rosetta_g_miss_num_map(t(ddindx).attb_lov_id);
250 a28(indx) := t(ddindx).lov_defined_flag;
251 indx := indx+1;
252 if t.last =ddindx
253 then exit;
254 end if;
255 ddindx := t.next(ddindx);
256 end loop;
257 end if;
258 end if;
259 end rosetta_table_copy_out_p3;
260
261 procedure create_list_src_field(p_api_version_number NUMBER
262 , p_init_msg_list VARCHAR2
263 , p_commit VARCHAR2
264 , p_validation_level NUMBER
265 , x_return_status out nocopy VARCHAR2
266 , x_msg_count out nocopy NUMBER
267 , x_msg_data out nocopy VARCHAR2
268 , x_list_source_field_id out nocopy NUMBER
269 , p7_a0 NUMBER := 0-1962.0724
270 , p7_a1 DATE := fnd_api.g_miss_date
271 , p7_a2 NUMBER := 0-1962.0724
272 , p7_a3 DATE := fnd_api.g_miss_date
273 , p7_a4 NUMBER := 0-1962.0724
274 , p7_a5 NUMBER := 0-1962.0724
275 , p7_a6 NUMBER := 0-1962.0724
276 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
277 , p7_a8 NUMBER := 0-1962.0724
278 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
279 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
280 , p7_a11 VARCHAR2 := fnd_api.g_miss_char
281 , p7_a12 VARCHAR2 := fnd_api.g_miss_char
282 , p7_a13 VARCHAR2 := fnd_api.g_miss_char
283 , p7_a14 NUMBER := 0-1962.0724
284 , p7_a15 NUMBER := 0-1962.0724
285 , p7_a16 VARCHAR2 := fnd_api.g_miss_char
286 , p7_a17 VARCHAR2 := fnd_api.g_miss_char
287 , p7_a18 NUMBER := 0-1962.0724
288 , p7_a19 VARCHAR2 := fnd_api.g_miss_char
289 , p7_a20 NUMBER := 0-1962.0724
290 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
291 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
292 , p7_a23 VARCHAR2 := fnd_api.g_miss_char
293 , p7_a24 VARCHAR2 := fnd_api.g_miss_char
294 , p7_a25 VARCHAR2 := fnd_api.g_miss_char
295 , p7_a26 VARCHAR2 := fnd_api.g_miss_char
296 , p7_a27 NUMBER := 0-1962.0724
297 , p7_a28 VARCHAR2 := fnd_api.g_miss_char
298 )
299
300 as
301 ddp_list_src_field_rec ams_list_src_field_pvt.list_src_field_rec_type;
302 ddindx binary_integer; indx binary_integer;
303 begin
304
305 -- copy data to the local IN or IN-OUT args, if any
306
307
308
309
310
311
312
313 ddp_list_src_field_rec.list_source_field_id := rosetta_g_miss_num_map(p7_a0);
314 ddp_list_src_field_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
315 ddp_list_src_field_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
316 ddp_list_src_field_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
317 ddp_list_src_field_rec.created_by := rosetta_g_miss_num_map(p7_a4);
318 ddp_list_src_field_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
319 ddp_list_src_field_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
320 ddp_list_src_field_rec.de_list_source_type_code := p7_a7;
321 ddp_list_src_field_rec.list_source_type_id := rosetta_g_miss_num_map(p7_a8);
322 ddp_list_src_field_rec.field_table_name := p7_a9;
323 ddp_list_src_field_rec.field_column_name := p7_a10;
324 ddp_list_src_field_rec.source_column_name := p7_a11;
325 ddp_list_src_field_rec.source_column_meaning := p7_a12;
326 ddp_list_src_field_rec.enabled_flag := p7_a13;
327 ddp_list_src_field_rec.start_position := rosetta_g_miss_num_map(p7_a14);
328 ddp_list_src_field_rec.end_position := rosetta_g_miss_num_map(p7_a15);
329 ddp_list_src_field_rec.analytics_flag := p7_a16;
330 ddp_list_src_field_rec.auto_binning_flag := p7_a17;
331 ddp_list_src_field_rec.no_of_buckets := rosetta_g_miss_num_map(p7_a18);
332 ddp_list_src_field_rec.field_data_type := p7_a19;
336 ddp_list_src_field_rec.field_lookup_type_view_name := p7_a23;
333 ddp_list_src_field_rec.field_data_size := rosetta_g_miss_num_map(p7_a20);
334 ddp_list_src_field_rec.default_ui_control := p7_a21;
335 ddp_list_src_field_rec.field_lookup_type := p7_a22;
337 ddp_list_src_field_rec.allow_label_override := p7_a24;
338 ddp_list_src_field_rec.field_usage_type := p7_a25;
339 ddp_list_src_field_rec.dialog_enabled := p7_a26;
340 ddp_list_src_field_rec.attb_lov_id := rosetta_g_miss_num_map(p7_a27);
341 ddp_list_src_field_rec.lov_defined_flag := p7_a28;
342
343
344 -- here's the delegated call to the old PL/SQL routine
345 ams_list_src_field_pvt.create_list_src_field(p_api_version_number,
346 p_init_msg_list,
347 p_commit,
348 p_validation_level,
349 x_return_status,
350 x_msg_count,
351 x_msg_data,
352 ddp_list_src_field_rec,
353 x_list_source_field_id);
354
355 -- copy data back from the local variables to OUT or IN-OUT args, if any
356
357
358
359
360
361
362
363
364 end;
365
366 procedure update_list_src_field(p_api_version_number NUMBER
367 , p_init_msg_list VARCHAR2
368 , p_commit VARCHAR2
369 , p_validation_level NUMBER
370 , x_return_status out nocopy VARCHAR2
371 , x_msg_count out nocopy NUMBER
372 , x_msg_data out nocopy VARCHAR2
373 , x_object_version_number out nocopy NUMBER
374 , p7_a0 NUMBER := 0-1962.0724
375 , p7_a1 DATE := fnd_api.g_miss_date
376 , p7_a2 NUMBER := 0-1962.0724
377 , p7_a3 DATE := fnd_api.g_miss_date
378 , p7_a4 NUMBER := 0-1962.0724
379 , p7_a5 NUMBER := 0-1962.0724
380 , p7_a6 NUMBER := 0-1962.0724
381 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
382 , p7_a8 NUMBER := 0-1962.0724
383 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
384 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
385 , p7_a11 VARCHAR2 := fnd_api.g_miss_char
386 , p7_a12 VARCHAR2 := fnd_api.g_miss_char
387 , p7_a13 VARCHAR2 := fnd_api.g_miss_char
388 , p7_a14 NUMBER := 0-1962.0724
389 , p7_a15 NUMBER := 0-1962.0724
390 , p7_a16 VARCHAR2 := fnd_api.g_miss_char
391 , p7_a17 VARCHAR2 := fnd_api.g_miss_char
392 , p7_a18 NUMBER := 0-1962.0724
393 , p7_a19 VARCHAR2 := fnd_api.g_miss_char
394 , p7_a20 NUMBER := 0-1962.0724
395 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
396 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
397 , p7_a23 VARCHAR2 := fnd_api.g_miss_char
398 , p7_a24 VARCHAR2 := fnd_api.g_miss_char
399 , p7_a25 VARCHAR2 := fnd_api.g_miss_char
400 , p7_a26 VARCHAR2 := fnd_api.g_miss_char
401 , p7_a27 NUMBER := 0-1962.0724
402 , p7_a28 VARCHAR2 := fnd_api.g_miss_char
403 )
404
405 as
406 ddp_list_src_field_rec ams_list_src_field_pvt.list_src_field_rec_type;
407 ddindx binary_integer; indx binary_integer;
408 begin
409
410 -- copy data to the local IN or IN-OUT args, if any
411
412
413
414
415
416
417
418 ddp_list_src_field_rec.list_source_field_id := rosetta_g_miss_num_map(p7_a0);
419 ddp_list_src_field_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
420 ddp_list_src_field_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
421 ddp_list_src_field_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
422 ddp_list_src_field_rec.created_by := rosetta_g_miss_num_map(p7_a4);
423 ddp_list_src_field_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
424 ddp_list_src_field_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
425 ddp_list_src_field_rec.de_list_source_type_code := p7_a7;
426 ddp_list_src_field_rec.list_source_type_id := rosetta_g_miss_num_map(p7_a8);
427 ddp_list_src_field_rec.field_table_name := p7_a9;
428 ddp_list_src_field_rec.field_column_name := p7_a10;
429 ddp_list_src_field_rec.source_column_name := p7_a11;
430 ddp_list_src_field_rec.source_column_meaning := p7_a12;
431 ddp_list_src_field_rec.enabled_flag := p7_a13;
432 ddp_list_src_field_rec.start_position := rosetta_g_miss_num_map(p7_a14);
433 ddp_list_src_field_rec.end_position := rosetta_g_miss_num_map(p7_a15);
434 ddp_list_src_field_rec.analytics_flag := p7_a16;
435 ddp_list_src_field_rec.auto_binning_flag := p7_a17;
436 ddp_list_src_field_rec.no_of_buckets := rosetta_g_miss_num_map(p7_a18);
437 ddp_list_src_field_rec.field_data_type := p7_a19;
438 ddp_list_src_field_rec.field_data_size := rosetta_g_miss_num_map(p7_a20);
439 ddp_list_src_field_rec.default_ui_control := p7_a21;
440 ddp_list_src_field_rec.field_lookup_type := p7_a22;
441 ddp_list_src_field_rec.field_lookup_type_view_name := p7_a23;
442 ddp_list_src_field_rec.allow_label_override := p7_a24;
443 ddp_list_src_field_rec.field_usage_type := p7_a25;
444 ddp_list_src_field_rec.dialog_enabled := p7_a26;
445 ddp_list_src_field_rec.attb_lov_id := rosetta_g_miss_num_map(p7_a27);
446 ddp_list_src_field_rec.lov_defined_flag := p7_a28;
447
448
449 -- here's the delegated call to the old PL/SQL routine
450 ams_list_src_field_pvt.update_list_src_field(p_api_version_number,
451 p_init_msg_list,
452 p_commit,
453 p_validation_level,
454 x_return_status,
455 x_msg_count,
456 x_msg_data,
457 ddp_list_src_field_rec,
461
458 x_object_version_number);
459
460 -- copy data back from the local variables to OUT or IN-OUT args, if any
462
463
464
465
466
467
468
469 end;
470
471 procedure validate_list_src_field(p_api_version_number NUMBER
472 , p_init_msg_list VARCHAR2
473 , p_validation_level NUMBER
474 , x_return_status out nocopy VARCHAR2
475 , x_msg_count out nocopy NUMBER
476 , x_msg_data out nocopy VARCHAR2
477 , p3_a0 NUMBER := 0-1962.0724
478 , p3_a1 DATE := fnd_api.g_miss_date
479 , p3_a2 NUMBER := 0-1962.0724
480 , p3_a3 DATE := fnd_api.g_miss_date
481 , p3_a4 NUMBER := 0-1962.0724
482 , p3_a5 NUMBER := 0-1962.0724
483 , p3_a6 NUMBER := 0-1962.0724
484 , p3_a7 VARCHAR2 := fnd_api.g_miss_char
485 , p3_a8 NUMBER := 0-1962.0724
486 , p3_a9 VARCHAR2 := fnd_api.g_miss_char
487 , p3_a10 VARCHAR2 := fnd_api.g_miss_char
488 , p3_a11 VARCHAR2 := fnd_api.g_miss_char
489 , p3_a12 VARCHAR2 := fnd_api.g_miss_char
490 , p3_a13 VARCHAR2 := fnd_api.g_miss_char
491 , p3_a14 NUMBER := 0-1962.0724
492 , p3_a15 NUMBER := 0-1962.0724
493 , p3_a16 VARCHAR2 := fnd_api.g_miss_char
494 , p3_a17 VARCHAR2 := fnd_api.g_miss_char
495 , p3_a18 NUMBER := 0-1962.0724
496 , p3_a19 VARCHAR2 := fnd_api.g_miss_char
497 , p3_a20 NUMBER := 0-1962.0724
498 , p3_a21 VARCHAR2 := fnd_api.g_miss_char
499 , p3_a22 VARCHAR2 := fnd_api.g_miss_char
500 , p3_a23 VARCHAR2 := fnd_api.g_miss_char
501 , p3_a24 VARCHAR2 := fnd_api.g_miss_char
502 , p3_a25 VARCHAR2 := fnd_api.g_miss_char
503 , p3_a26 VARCHAR2 := fnd_api.g_miss_char
504 , p3_a27 NUMBER := 0-1962.0724
505 , p3_a28 VARCHAR2 := fnd_api.g_miss_char
506 )
507
508 as
509 ddp_list_src_field_rec ams_list_src_field_pvt.list_src_field_rec_type;
510 ddindx binary_integer; indx binary_integer;
511 begin
512
513 -- copy data to the local IN or IN-OUT args, if any
514
515
516
517 ddp_list_src_field_rec.list_source_field_id := rosetta_g_miss_num_map(p3_a0);
518 ddp_list_src_field_rec.last_update_date := rosetta_g_miss_date_in_map(p3_a1);
519 ddp_list_src_field_rec.last_updated_by := rosetta_g_miss_num_map(p3_a2);
520 ddp_list_src_field_rec.creation_date := rosetta_g_miss_date_in_map(p3_a3);
521 ddp_list_src_field_rec.created_by := rosetta_g_miss_num_map(p3_a4);
522 ddp_list_src_field_rec.last_update_login := rosetta_g_miss_num_map(p3_a5);
523 ddp_list_src_field_rec.object_version_number := rosetta_g_miss_num_map(p3_a6);
524 ddp_list_src_field_rec.de_list_source_type_code := p3_a7;
525 ddp_list_src_field_rec.list_source_type_id := rosetta_g_miss_num_map(p3_a8);
526 ddp_list_src_field_rec.field_table_name := p3_a9;
527 ddp_list_src_field_rec.field_column_name := p3_a10;
528 ddp_list_src_field_rec.source_column_name := p3_a11;
529 ddp_list_src_field_rec.source_column_meaning := p3_a12;
530 ddp_list_src_field_rec.enabled_flag := p3_a13;
531 ddp_list_src_field_rec.start_position := rosetta_g_miss_num_map(p3_a14);
532 ddp_list_src_field_rec.end_position := rosetta_g_miss_num_map(p3_a15);
533 ddp_list_src_field_rec.analytics_flag := p3_a16;
534 ddp_list_src_field_rec.auto_binning_flag := p3_a17;
535 ddp_list_src_field_rec.no_of_buckets := rosetta_g_miss_num_map(p3_a18);
536 ddp_list_src_field_rec.field_data_type := p3_a19;
537 ddp_list_src_field_rec.field_data_size := rosetta_g_miss_num_map(p3_a20);
538 ddp_list_src_field_rec.default_ui_control := p3_a21;
539 ddp_list_src_field_rec.field_lookup_type := p3_a22;
540 ddp_list_src_field_rec.field_lookup_type_view_name := p3_a23;
541 ddp_list_src_field_rec.allow_label_override := p3_a24;
542 ddp_list_src_field_rec.field_usage_type := p3_a25;
543 ddp_list_src_field_rec.dialog_enabled := p3_a26;
544 ddp_list_src_field_rec.attb_lov_id := rosetta_g_miss_num_map(p3_a27);
545 ddp_list_src_field_rec.lov_defined_flag := p3_a28;
546
547
548
549
550 -- here's the delegated call to the old PL/SQL routine
551 ams_list_src_field_pvt.validate_list_src_field(p_api_version_number,
552 p_init_msg_list,
553 p_validation_level,
554 ddp_list_src_field_rec,
555 x_return_status,
556 x_msg_count,
557 x_msg_data);
558
559 -- copy data back from the local variables to OUT or IN-OUT args, if any
560
561
562
563
564
565
566 end;
567
568 procedure check_list_src_field_items(p_validation_mode VARCHAR2
569 , x_return_status out nocopy VARCHAR2
570 , p0_a0 NUMBER := 0-1962.0724
571 , p0_a1 DATE := fnd_api.g_miss_date
572 , p0_a2 NUMBER := 0-1962.0724
573 , p0_a3 DATE := fnd_api.g_miss_date
574 , p0_a4 NUMBER := 0-1962.0724
575 , p0_a5 NUMBER := 0-1962.0724
576 , p0_a6 NUMBER := 0-1962.0724
577 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
578 , p0_a8 NUMBER := 0-1962.0724
579 , p0_a9 VARCHAR2 := fnd_api.g_miss_char
580 , p0_a10 VARCHAR2 := fnd_api.g_miss_char
581 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
582 , p0_a12 VARCHAR2 := fnd_api.g_miss_char
583 , p0_a13 VARCHAR2 := fnd_api.g_miss_char
584 , p0_a14 NUMBER := 0-1962.0724
585 , p0_a15 NUMBER := 0-1962.0724
589 , p0_a19 VARCHAR2 := fnd_api.g_miss_char
586 , p0_a16 VARCHAR2 := fnd_api.g_miss_char
587 , p0_a17 VARCHAR2 := fnd_api.g_miss_char
588 , p0_a18 NUMBER := 0-1962.0724
590 , p0_a20 NUMBER := 0-1962.0724
591 , p0_a21 VARCHAR2 := fnd_api.g_miss_char
592 , p0_a22 VARCHAR2 := fnd_api.g_miss_char
593 , p0_a23 VARCHAR2 := fnd_api.g_miss_char
594 , p0_a24 VARCHAR2 := fnd_api.g_miss_char
595 , p0_a25 VARCHAR2 := fnd_api.g_miss_char
596 , p0_a26 VARCHAR2 := fnd_api.g_miss_char
597 , p0_a27 NUMBER := 0-1962.0724
598 , p0_a28 VARCHAR2 := fnd_api.g_miss_char
599 )
600
601 as
602 ddp_list_src_field_rec ams_list_src_field_pvt.list_src_field_rec_type;
603 ddindx binary_integer; indx binary_integer;
604 begin
605
606 -- copy data to the local IN or IN-OUT args, if any
607 ddp_list_src_field_rec.list_source_field_id := rosetta_g_miss_num_map(p0_a0);
608 ddp_list_src_field_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
609 ddp_list_src_field_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
610 ddp_list_src_field_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
611 ddp_list_src_field_rec.created_by := rosetta_g_miss_num_map(p0_a4);
612 ddp_list_src_field_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
613 ddp_list_src_field_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
614 ddp_list_src_field_rec.de_list_source_type_code := p0_a7;
615 ddp_list_src_field_rec.list_source_type_id := rosetta_g_miss_num_map(p0_a8);
616 ddp_list_src_field_rec.field_table_name := p0_a9;
617 ddp_list_src_field_rec.field_column_name := p0_a10;
618 ddp_list_src_field_rec.source_column_name := p0_a11;
619 ddp_list_src_field_rec.source_column_meaning := p0_a12;
620 ddp_list_src_field_rec.enabled_flag := p0_a13;
621 ddp_list_src_field_rec.start_position := rosetta_g_miss_num_map(p0_a14);
622 ddp_list_src_field_rec.end_position := rosetta_g_miss_num_map(p0_a15);
623 ddp_list_src_field_rec.analytics_flag := p0_a16;
624 ddp_list_src_field_rec.auto_binning_flag := p0_a17;
625 ddp_list_src_field_rec.no_of_buckets := rosetta_g_miss_num_map(p0_a18);
626 ddp_list_src_field_rec.field_data_type := p0_a19;
627 ddp_list_src_field_rec.field_data_size := rosetta_g_miss_num_map(p0_a20);
628 ddp_list_src_field_rec.default_ui_control := p0_a21;
629 ddp_list_src_field_rec.field_lookup_type := p0_a22;
630 ddp_list_src_field_rec.field_lookup_type_view_name := p0_a23;
631 ddp_list_src_field_rec.allow_label_override := p0_a24;
632 ddp_list_src_field_rec.field_usage_type := p0_a25;
633 ddp_list_src_field_rec.dialog_enabled := p0_a26;
634 ddp_list_src_field_rec.attb_lov_id := rosetta_g_miss_num_map(p0_a27);
635 ddp_list_src_field_rec.lov_defined_flag := p0_a28;
636
637
638
639 -- here's the delegated call to the old PL/SQL routine
640 ams_list_src_field_pvt.check_list_src_field_items(ddp_list_src_field_rec,
641 p_validation_mode,
642 x_return_status);
643
644 -- copy data back from the local variables to OUT or IN-OUT args, if any
645
646
647 end;
648
649 procedure validate_list_src_field_rec(p_api_version_number NUMBER
650 , p_init_msg_list VARCHAR2
651 , x_return_status out nocopy VARCHAR2
652 , x_msg_count out nocopy NUMBER
653 , x_msg_data out nocopy VARCHAR2
654 , p5_a0 NUMBER := 0-1962.0724
655 , p5_a1 DATE := fnd_api.g_miss_date
656 , p5_a2 NUMBER := 0-1962.0724
657 , p5_a3 DATE := fnd_api.g_miss_date
658 , p5_a4 NUMBER := 0-1962.0724
659 , p5_a5 NUMBER := 0-1962.0724
660 , p5_a6 NUMBER := 0-1962.0724
661 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
662 , p5_a8 NUMBER := 0-1962.0724
663 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
664 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
665 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
666 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
667 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
668 , p5_a14 NUMBER := 0-1962.0724
669 , p5_a15 NUMBER := 0-1962.0724
670 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
671 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
672 , p5_a18 NUMBER := 0-1962.0724
673 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
674 , p5_a20 NUMBER := 0-1962.0724
675 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
676 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
677 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
678 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
679 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
680 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
681 , p5_a27 NUMBER := 0-1962.0724
682 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
683 )
684
685 as
686 ddp_list_src_field_rec ams_list_src_field_pvt.list_src_field_rec_type;
687 ddindx binary_integer; indx binary_integer;
688 begin
689
690 -- copy data to the local IN or IN-OUT args, if any
691
692
693
694
695
696 ddp_list_src_field_rec.list_source_field_id := rosetta_g_miss_num_map(p5_a0);
697 ddp_list_src_field_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a1);
698 ddp_list_src_field_rec.last_updated_by := rosetta_g_miss_num_map(p5_a2);
699 ddp_list_src_field_rec.creation_date := rosetta_g_miss_date_in_map(p5_a3);
700 ddp_list_src_field_rec.created_by := rosetta_g_miss_num_map(p5_a4);
701 ddp_list_src_field_rec.last_update_login := rosetta_g_miss_num_map(p5_a5);
702 ddp_list_src_field_rec.object_version_number := rosetta_g_miss_num_map(p5_a6);
703 ddp_list_src_field_rec.de_list_source_type_code := p5_a7;
704 ddp_list_src_field_rec.list_source_type_id := rosetta_g_miss_num_map(p5_a8);
705 ddp_list_src_field_rec.field_table_name := p5_a9;
706 ddp_list_src_field_rec.field_column_name := p5_a10;
707 ddp_list_src_field_rec.source_column_name := p5_a11;
708 ddp_list_src_field_rec.source_column_meaning := p5_a12;
709 ddp_list_src_field_rec.enabled_flag := p5_a13;
710 ddp_list_src_field_rec.start_position := rosetta_g_miss_num_map(p5_a14);
711 ddp_list_src_field_rec.end_position := rosetta_g_miss_num_map(p5_a15);
712 ddp_list_src_field_rec.analytics_flag := p5_a16;
713 ddp_list_src_field_rec.auto_binning_flag := p5_a17;
714 ddp_list_src_field_rec.no_of_buckets := rosetta_g_miss_num_map(p5_a18);
715 ddp_list_src_field_rec.field_data_type := p5_a19;
716 ddp_list_src_field_rec.field_data_size := rosetta_g_miss_num_map(p5_a20);
717 ddp_list_src_field_rec.default_ui_control := p5_a21;
718 ddp_list_src_field_rec.field_lookup_type := p5_a22;
719 ddp_list_src_field_rec.field_lookup_type_view_name := p5_a23;
720 ddp_list_src_field_rec.allow_label_override := p5_a24;
721 ddp_list_src_field_rec.field_usage_type := p5_a25;
722 ddp_list_src_field_rec.dialog_enabled := p5_a26;
723 ddp_list_src_field_rec.attb_lov_id := rosetta_g_miss_num_map(p5_a27);
724 ddp_list_src_field_rec.lov_defined_flag := p5_a28;
725
726 -- here's the delegated call to the old PL/SQL routine
727 ams_list_src_field_pvt.validate_list_src_field_rec(p_api_version_number,
728 p_init_msg_list,
729 x_return_status,
730 x_msg_count,
731 x_msg_data,
732 ddp_list_src_field_rec);
733
734 -- copy data back from the local variables to OUT or IN-OUT args, if any
735
736
737
738
739
740 end;
741
742 end ams_list_src_field_pvt_w;