1: package body cn_rt_quota_asgn_pvt_w as
2: /* $Header: cnwrtqab.pls 120.2 2005/09/14 04:29 rarajara ship $ */
3: procedure rosetta_table_copy_in_p1(t out nocopy cn_rt_quota_asgn_pvt.calc_formulas_tbl_type, a0 JTF_VARCHAR2_TABLE_100
4: , a1 JTF_NUMBER_TABLE
5: ) as
1: package body cn_rt_quota_asgn_pvt_w as
2: /* $Header: cnwrtqab.pls 120.2 2005/09/14 04:29 rarajara ship $ */
3: procedure rosetta_table_copy_in_p1(t out nocopy cn_rt_quota_asgn_pvt.calc_formulas_tbl_type, a0 JTF_VARCHAR2_TABLE_100
4: , a1 JTF_NUMBER_TABLE
5: ) as
6: ddindx binary_integer; indx binary_integer;
7: begin
20: end loop;
21: end if;
22: end if;
23: end rosetta_table_copy_in_p1;
24: procedure rosetta_table_copy_out_p1(t cn_rt_quota_asgn_pvt.calc_formulas_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
25: , a1 out nocopy JTF_NUMBER_TABLE
26: ) as
27: ddindx binary_integer; indx binary_integer;
28: begin
49: end if;
50: end if;
51: end rosetta_table_copy_out_p1;
52:
53: procedure rosetta_table_copy_in_p3(t out nocopy cn_rt_quota_asgn_pvt.rt_quota_asgn_tbl_type, a0 JTF_VARCHAR2_TABLE_100
54: , a1 JTF_NUMBER_TABLE
55: , a2 JTF_NUMBER_TABLE
56: , a3 JTF_NUMBER_TABLE
57: , a4 JTF_DATE_TABLE
128: end loop;
129: end if;
130: end if;
131: end rosetta_table_copy_in_p3;
132: procedure rosetta_table_copy_out_p3(t cn_rt_quota_asgn_pvt.rt_quota_asgn_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
133: , a1 out nocopy JTF_NUMBER_TABLE
134: , a2 out nocopy JTF_NUMBER_TABLE
135: , a3 out nocopy JTF_NUMBER_TABLE
136: , a4 out nocopy JTF_DATE_TABLE
343: , x_msg_data out nocopy VARCHAR2
344: )
345:
346: as
347: ddp_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
348: ddindx binary_integer; indx binary_integer;
349: begin
350:
351: -- copy data to the local IN or IN-OUT args, if any
388:
389:
390:
391: -- here's the delegated call to the old PL/SQL routine
392: cn_rt_quota_asgn_pvt.create_rate_table_assignment(p_api_version,
393: p_init_msg_list,
394: p_commit,
395: p_validation_level,
396: ddp_rt_quota_asgn,
479: , x_msg_data out nocopy VARCHAR2
480: )
481:
482: as
483: ddp_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
484: ddindx binary_integer; indx binary_integer;
485: begin
486:
487: -- copy data to the local IN or IN-OUT args, if any
524:
525:
526:
527: -- here's the delegated call to the old PL/SQL routine
528: cn_rt_quota_asgn_pvt.update_rate_table_assignment(p_api_version,
529: p_init_msg_list,
530: p_commit,
531: p_validation_level,
532: ddp_rt_quota_asgn,
615: , x_msg_data out nocopy VARCHAR2
616: )
617:
618: as
619: ddp_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
620: ddindx binary_integer; indx binary_integer;
621: begin
622:
623: -- copy data to the local IN or IN-OUT args, if any
660:
661:
662:
663: -- here's the delegated call to the old PL/SQL routine
664: cn_rt_quota_asgn_pvt.delete_rate_table_assignment(p_api_version,
665: p_init_msg_list,
666: p_commit,
667: p_validation_level,
668: ddp_rt_quota_asgn,
756: , x_msg_data out nocopy VARCHAR2
757: )
758:
759: as
760: ddx_calc_formulas cn_rt_quota_asgn_pvt.calc_formulas_tbl_type;
761: ddx_rate_tables cn_rt_quota_asgn_pvt.rt_quota_asgn_tbl_type;
762: ddindx binary_integer; indx binary_integer;
763: begin
764:
757: )
758:
759: as
760: ddx_calc_formulas cn_rt_quota_asgn_pvt.calc_formulas_tbl_type;
761: ddx_rate_tables cn_rt_quota_asgn_pvt.rt_quota_asgn_tbl_type;
762: ddindx binary_integer; indx binary_integer;
763: begin
764:
765: -- copy data to the local IN or IN-OUT args, if any
775:
776:
777:
778: -- here's the delegated call to the old PL/SQL routine
779: cn_rt_quota_asgn_pvt.get_formula_rate_tables(p_api_version,
780: p_init_msg_list,
781: p_commit,
782: p_validation_level,
783: p_type,
796:
797:
798:
799:
800: cn_rt_quota_asgn_pvt_w.rosetta_table_copy_out_p1(ddx_calc_formulas, p7_a0
801: , p7_a1
802: );
803:
804: cn_rt_quota_asgn_pvt_w.rosetta_table_copy_out_p3(ddx_rate_tables, p8_a0
800: cn_rt_quota_asgn_pvt_w.rosetta_table_copy_out_p1(ddx_calc_formulas, p7_a0
801: , p7_a1
802: );
803:
804: cn_rt_quota_asgn_pvt_w.rosetta_table_copy_out_p3(ddx_rate_tables, p8_a0
805: , p8_a1
806: , p8_a2
807: , p8_a3
808: , p8_a4
910: , x_msg_data out nocopy VARCHAR2
911: )
912:
913: as
914: ddp_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
915: ddp_old_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
916: ddindx binary_integer; indx binary_integer;
917: begin
918:
911: )
912:
913: as
914: ddp_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
915: ddp_old_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
916: ddindx binary_integer; indx binary_integer;
917: begin
918:
919: -- copy data to the local IN or IN-OUT args, if any
989:
990:
991:
992: -- here's the delegated call to the old PL/SQL routine
993: cn_rt_quota_asgn_pvt.validate_rate_table_assignment(p_api_version,
994: p_init_msg_list,
995: p_commit,
996: p_validation_level,
997: p_action,
1043:
1044:
1045: end;
1046:
1047: end cn_rt_quota_asgn_pvt_w;