1: package body pv_attribute_usage_pvt_w as
2: /* $Header: pvxwatub.pls 115.3 2002/12/10 19:34:34 amaram 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:
18: if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
19: return d;
20: end;
21:
22: procedure rosetta_table_copy_in_p2(t out nocopy pv_attribute_usage_pvt.attribute_usage_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
65: end loop;
66: end if;
67: end if;
68: end rosetta_table_copy_in_p2;
69: procedure rosetta_table_copy_out_p2(t pv_attribute_usage_pvt.attribute_usage_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
70: , a1 out nocopy JTF_DATE_TABLE
71: , a2 out nocopy JTF_NUMBER_TABLE
72: , a3 out nocopy JTF_DATE_TABLE
73: , a4 out nocopy JTF_NUMBER_TABLE
184: , p7_a13 NUMBER := 0-1962.0724
185: , p7_a14 VARCHAR2 := fnd_api.g_miss_char
186: )
187: as
188: ddp_attribute_usage_rec pv_attribute_usage_pvt.attribute_usage_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
214: ddp_attribute_usage_rec.enabled_flag := p7_a14;
215:
216:
217: -- here's the delegated call to the old PL/SQL routine
218: pv_attribute_usage_pvt.create_attribute_usage(p_api_version_number,
219: p_init_msg_list,
220: p_commit,
221: p_validation_level,
222: x_return_status,
260: , p7_a13 NUMBER := 0-1962.0724
261: , p7_a14 VARCHAR2 := fnd_api.g_miss_char
262: )
263: as
264: ddp_attribute_usage_rec pv_attribute_usage_pvt.attribute_usage_rec_type;
265: ddindx binary_integer; indx binary_integer;
266: begin
267:
268: -- copy data to the local IN or IN-OUT args, if any
290: ddp_attribute_usage_rec.enabled_flag := p7_a14;
291:
292:
293: -- here's the delegated call to the old PL/SQL routine
294: pv_attribute_usage_pvt.update_attribute_usage(p_api_version_number,
295: p_init_msg_list,
296: p_commit,
297: p_validation_level,
298: x_return_status,
335: , p4_a13 NUMBER := 0-1962.0724
336: , p4_a14 VARCHAR2 := fnd_api.g_miss_char
337: )
338: as
339: ddp_attribute_usage_rec pv_attribute_usage_pvt.attribute_usage_rec_type;
340: ddindx binary_integer; indx binary_integer;
341: begin
342:
343: -- copy data to the local IN or IN-OUT args, if any
364:
365:
366:
367: -- here's the delegated call to the old PL/SQL routine
368: pv_attribute_usage_pvt.validate_attribute_usage(p_api_version_number,
369: p_init_msg_list,
370: p_validation_level,
371: p_validation_mode,
372: ddp_attribute_usage_rec,
402: , p0_a13 NUMBER := 0-1962.0724
403: , p0_a14 VARCHAR2 := fnd_api.g_miss_char
404: )
405: as
406: ddp_attribute_usage_rec pv_attribute_usage_pvt.attribute_usage_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
426:
427:
428:
429: -- here's the delegated call to the old PL/SQL routine
430: pv_attribute_usage_pvt.check_attr_usage_items(ddp_attribute_usage_rec,
431: p_validation_mode,
432: x_return_status);
433:
434: -- copy data back from the local OUT or IN-OUT args, if any
458: , p5_a13 NUMBER := 0-1962.0724
459: , p5_a14 VARCHAR2 := fnd_api.g_miss_char
460: )
461: as
462: ddp_attribute_usage_rec pv_attribute_usage_pvt.attribute_usage_rec_type;
463: ddindx binary_integer; indx binary_integer;
464: begin
465:
466: -- copy data to the local IN or IN-OUT args, if any
486: ddp_attribute_usage_rec.enabled_flag := p5_a14;
487:
488:
489: -- here's the delegated call to the old PL/SQL routine
490: pv_attribute_usage_pvt.validate_attr_usage_rec(p_api_version_number,
491: p_init_msg_list,
492: x_return_status,
493: x_msg_count,
494: x_msg_data,
503:
504:
505: end;
506:
507: end pv_attribute_usage_pvt_w;