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