[Home] [Help]
1: package body ozf_offer_adjustment_pvt_w as
2: /* $Header: ozfwoadb.pls 120.1 2005/09/20 17:34 rssharma 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 ozf_offer_adjustment_pvt.offer_adj_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_DATE_TABLE
24: , a2 JTF_DATE_TABLE
25: , a3 JTF_VARCHAR2_TABLE_100
26: , a4 JTF_VARCHAR2_TABLE_100
97: end loop;
98: end if;
99: end if;
100: end rosetta_table_copy_in_p2;
101: procedure rosetta_table_copy_out_p2(t ozf_offer_adjustment_pvt.offer_adj_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
102: , a1 out nocopy JTF_DATE_TABLE
103: , a2 out nocopy JTF_DATE_TABLE
104: , a3 out nocopy JTF_VARCHAR2_TABLE_100
105: , a4 out nocopy JTF_VARCHAR2_TABLE_100
313: , p7_a30 VARCHAR2 := fnd_api.g_miss_char
314: )
315:
316: as
317: ddp_offer_adj_rec ozf_offer_adjustment_pvt.offer_adj_rec_type;
318: ddindx binary_integer; indx binary_integer;
319: begin
320:
321: -- copy data to the local IN or IN-OUT args, if any
359: ddp_offer_adj_rec.description := p7_a30;
360:
361:
362: -- here's the delegated call to the old PL/SQL routine
363: ozf_offer_adjustment_pvt.create_offer_adjustment(p_api_version_number,
364: p_init_msg_list,
365: p_commit,
366: p_validation_level,
367: x_return_status,
422: , p7_a30 VARCHAR2 := fnd_api.g_miss_char
423: )
424:
425: as
426: ddp_offer_adj_rec ozf_offer_adjustment_pvt.offer_adj_rec_type;
427: ddindx binary_integer; indx binary_integer;
428: begin
429:
430: -- copy data to the local IN or IN-OUT args, if any
468: ddp_offer_adj_rec.description := p7_a30;
469:
470:
471: -- here's the delegated call to the old PL/SQL routine
472: ozf_offer_adjustment_pvt.update_offer_adjustment(p_api_version_number,
473: p_init_msg_list,
474: p_commit,
475: p_validation_level,
476: x_return_status,
530: , p3_a30 VARCHAR2 := fnd_api.g_miss_char
531: )
532:
533: as
534: ddp_offer_adj_rec ozf_offer_adjustment_pvt.offer_adj_rec_type;
535: ddindx binary_integer; indx binary_integer;
536: begin
537:
538: -- copy data to the local IN or IN-OUT args, if any
575:
576:
577:
578: -- here's the delegated call to the old PL/SQL routine
579: ozf_offer_adjustment_pvt.validate_offer_adjustment(p_api_version_number,
580: p_init_msg_list,
581: p_validation_level,
582: ddp_offer_adj_rec,
583: p_validation_mode,
630: , p0_a30 VARCHAR2 := fnd_api.g_miss_char
631: )
632:
633: as
634: ddp_offer_adj_rec ozf_offer_adjustment_pvt.offer_adj_rec_type;
635: ddindx binary_integer; indx binary_integer;
636: begin
637:
638: -- copy data to the local IN or IN-OUT args, if any
670:
671:
672:
673: -- here's the delegated call to the old PL/SQL routine
674: ozf_offer_adjustment_pvt.check_offer_adj_items(ddp_offer_adj_rec,
675: p_validation_mode,
676: x_return_status);
677:
678: -- copy data back from the local variables to OUT or IN-OUT args, if any
718: , p5_a30 VARCHAR2 := fnd_api.g_miss_char
719: )
720:
721: as
722: ddp_offer_adj_rec ozf_offer_adjustment_pvt.offer_adj_rec_type;
723: ddindx binary_integer; indx binary_integer;
724: begin
725:
726: -- copy data to the local IN or IN-OUT args, if any
761: ddp_offer_adj_rec.offer_adjustment_name := p5_a29;
762: ddp_offer_adj_rec.description := p5_a30;
763:
764: -- here's the delegated call to the old PL/SQL routine
765: ozf_offer_adjustment_pvt.validate_offer_adj_rec(p_api_version_number,
766: p_init_msg_list,
767: x_return_status,
768: x_msg_count,
769: x_msg_data,
776:
777:
778: end;
779:
780: end ozf_offer_adjustment_pvt_w;