[Home] [Help]
1: package body ozf_offer_performance_pvt_w as
2: /* $Header: ozfwperb.pls 120.1 2005/10/04 20:48 julou 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_p3(t out nocopy ozf_offer_performance_pvt.offer_perf_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_DATE_TABLE
25: , a3 JTF_NUMBER_TABLE
26: , a4 JTF_DATE_TABLE
107: end loop;
108: end if;
109: end if;
110: end rosetta_table_copy_in_p3;
111: procedure rosetta_table_copy_out_p3(t ozf_offer_performance_pvt.offer_perf_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
112: , a1 out nocopy JTF_NUMBER_TABLE
113: , a2 out nocopy JTF_DATE_TABLE
114: , a3 out nocopy JTF_NUMBER_TABLE
115: , a4 out nocopy JTF_DATE_TABLE
353: , p7_a35 VARCHAR2 := fnd_api.g_miss_char
354: )
355:
356: as
357: ddp_offer_perf_rec ozf_offer_performance_pvt.offer_perf_rec_type;
358: ddindx binary_integer; indx binary_integer;
359: begin
360:
361: -- copy data to the local IN or IN-OUT args, if any
404: ddp_offer_perf_rec.description := p7_a35;
405:
406:
407: -- here's the delegated call to the old PL/SQL routine
408: ozf_offer_performance_pvt.create_offer_performance(p_api_version_number,
409: p_init_msg_list,
410: p_commit,
411: p_validation_level,
412: x_return_status,
472: , p7_a35 VARCHAR2 := fnd_api.g_miss_char
473: )
474:
475: as
476: ddp_offer_perf_rec ozf_offer_performance_pvt.offer_perf_rec_type;
477: ddindx binary_integer; indx binary_integer;
478: begin
479:
480: -- copy data to the local IN or IN-OUT args, if any
523: ddp_offer_perf_rec.description := p7_a35;
524:
525:
526: -- here's the delegated call to the old PL/SQL routine
527: ozf_offer_performance_pvt.update_offer_performance(p_api_version_number,
528: p_init_msg_list,
529: p_commit,
530: p_validation_level,
531: x_return_status,
590: , p3_a35 VARCHAR2 := fnd_api.g_miss_char
591: )
592:
593: as
594: ddp_offer_perf_rec ozf_offer_performance_pvt.offer_perf_rec_type;
595: ddindx binary_integer; indx binary_integer;
596: begin
597:
598: -- copy data to the local IN or IN-OUT args, if any
640:
641:
642:
643: -- here's the delegated call to the old PL/SQL routine
644: ozf_offer_performance_pvt.validate_offer_performance(p_api_version_number,
645: p_init_msg_list,
646: p_validation_level,
647: ddp_offer_perf_rec,
648: p_validation_mode,
700: , p0_a35 VARCHAR2 := fnd_api.g_miss_char
701: )
702:
703: as
704: ddp_offer_perf_rec ozf_offer_performance_pvt.offer_perf_rec_type;
705: ddindx binary_integer; indx binary_integer;
706: begin
707:
708: -- copy data to the local IN or IN-OUT args, if any
745:
746:
747:
748: -- here's the delegated call to the old PL/SQL routine
749: ozf_offer_performance_pvt.check_offer_perf_items(ddp_offer_perf_rec,
750: p_validation_mode,
751: x_return_status);
752:
753: -- copy data back from the local variables to OUT or IN-OUT args, if any
798: , p5_a35 VARCHAR2 := fnd_api.g_miss_char
799: )
800:
801: as
802: ddp_offer_perf_rec ozf_offer_performance_pvt.offer_perf_rec_type;
803: ddindx binary_integer; indx binary_integer;
804: begin
805:
806: -- copy data to the local IN or IN-OUT args, if any
846: ddp_offer_perf_rec.uom_code := p5_a34;
847: ddp_offer_perf_rec.description := p5_a35;
848:
849: -- here's the delegated call to the old PL/SQL routine
850: ozf_offer_performance_pvt.validate_offer_perf_rec(p_api_version_number,
851: p_init_msg_list,
852: x_return_status,
853: x_msg_count,
854: x_msg_data,
861:
862:
863: end;
864:
865: end ozf_offer_performance_pvt_w;