[Home] [Help]
1: package body pv_enty_attr_value_pvt_w as
2: /* $Header: pvxweavb.pls 120.1 2005/11/11 15:27 amaram noship $ */
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 n=b then return a; end if;
19: return n;
20: end;
21:
22: procedure rosetta_table_copy_in_p2(t out nocopy pv_enty_attr_value_pvt.enty_attr_value_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
71: end loop;
72: end if;
73: end if;
74: end rosetta_table_copy_in_p2;
75: procedure rosetta_table_copy_out_p2(t pv_enty_attr_value_pvt.enty_attr_value_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
76: , a1 out nocopy JTF_DATE_TABLE
77: , a2 out nocopy JTF_NUMBER_TABLE
78: , a3 out nocopy JTF_DATE_TABLE
79: , a4 out nocopy JTF_NUMBER_TABLE
209: , p7_a17 NUMBER := 0-1962.0724
210: )
211:
212: as
213: ddp_enty_attr_val_rec pv_enty_attr_value_pvt.enty_attr_val_rec_type;
214: ddindx binary_integer; indx binary_integer;
215: begin
216:
217: -- copy data to the local IN or IN-OUT args, if any
242: ddp_enty_attr_val_rec.validation_id := rosetta_g_miss_num_map(p7_a17);
243:
244:
245: -- here's the delegated call to the old PL/SQL routine
246: pv_enty_attr_value_pvt.create_attr_value(p_api_version_number,
247: p_init_msg_list,
248: p_commit,
249: p_validation_level,
250: x_return_status,
292: , p7_a17 NUMBER := 0-1962.0724
293: )
294:
295: as
296: ddp_enty_attr_val_rec pv_enty_attr_value_pvt.enty_attr_val_rec_type;
297: ddindx binary_integer; indx binary_integer;
298: begin
299:
300: -- copy data to the local IN or IN-OUT args, if any
325: ddp_enty_attr_val_rec.validation_id := rosetta_g_miss_num_map(p7_a17);
326:
327:
328: -- here's the delegated call to the old PL/SQL routine
329: pv_enty_attr_value_pvt.update_attr_value(p_api_version_number,
330: p_init_msg_list,
331: p_commit,
332: p_validation_level,
333: x_return_status,
374: , p4_a17 NUMBER := 0-1962.0724
375: )
376:
377: as
378: ddp_enty_attr_val_rec pv_enty_attr_value_pvt.enty_attr_val_rec_type;
379: ddindx binary_integer; indx binary_integer;
380: begin
381:
382: -- copy data to the local IN or IN-OUT args, if any
406:
407:
408:
409: -- here's the delegated call to the old PL/SQL routine
410: pv_enty_attr_value_pvt.validate_attr_value(p_api_version_number,
411: p_init_msg_list,
412: p_validation_level,
413: p_validation_mode,
414: ddp_enty_attr_val_rec,
448: , p0_a17 NUMBER := 0-1962.0724
449: )
450:
451: as
452: ddp_enty_attr_val_rec pv_enty_attr_value_pvt.enty_attr_val_rec_type;
453: ddindx binary_integer; indx binary_integer;
454: begin
455:
456: -- copy data to the local IN or IN-OUT args, if any
475:
476:
477:
478: -- here's the delegated call to the old PL/SQL routine
479: pv_enty_attr_value_pvt.check_attr_value_items(ddp_enty_attr_val_rec,
480: p_validation_mode,
481: x_return_status);
482:
483: -- copy data back from the local variables to OUT or IN-OUT args, if any
511: , p5_a17 NUMBER := 0-1962.0724
512: )
513:
514: as
515: ddp_enty_attr_val_rec pv_enty_attr_value_pvt.enty_attr_val_rec_type;
516: ddindx binary_integer; indx binary_integer;
517: begin
518:
519: -- copy data to the local IN or IN-OUT args, if any
542: ddp_enty_attr_val_rec.validation_id := rosetta_g_miss_num_map(p5_a17);
543:
544:
545: -- here's the delegated call to the old PL/SQL routine
546: pv_enty_attr_value_pvt.validate_attr_val_rec(p_api_version_number,
547: p_init_msg_list,
548: x_return_status,
549: x_msg_count,
550: x_msg_data,
559:
560:
561: end;
562:
563: end pv_enty_attr_value_pvt_w;