1: package body cn_comp_plan_pvt_w as
2: /* $Header: cnwcmpnb.pls 120.2.12010000.2 2009/08/04 17:22:15 rnagaraj ship $ */
3: procedure rosetta_table_copy_in_p1(t out nocopy cn_comp_plan_pvt.comp_plan_tbl_type, a0 JTF_NUMBER_TABLE
4: , a1 JTF_VARCHAR2_TABLE_100
5: , a2 JTF_VARCHAR2_TABLE_100
1: package body cn_comp_plan_pvt_w as
2: /* $Header: cnwcmpnb.pls 120.2.12010000.2 2009/08/04 17:22:15 rnagaraj ship $ */
3: procedure rosetta_table_copy_in_p1(t out nocopy cn_comp_plan_pvt.comp_plan_tbl_type, a0 JTF_NUMBER_TABLE
4: , a1 JTF_VARCHAR2_TABLE_100
5: , a2 JTF_VARCHAR2_TABLE_100
6: , a3 JTF_VARCHAR2_TABLE_1900
7: , a4 JTF_VARCHAR2_TABLE_100
74: end loop;
75: end if;
76: end if;
77: end rosetta_table_copy_in_p1;
78: procedure rosetta_table_copy_out_p1(t cn_comp_plan_pvt.comp_plan_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
79: , a1 out nocopy JTF_VARCHAR2_TABLE_100
80: , a2 out nocopy JTF_VARCHAR2_TABLE_100
81: , a3 out nocopy JTF_VARCHAR2_TABLE_1900
82: , a4 out nocopy JTF_VARCHAR2_TABLE_100
238: end if;
239: end if;
240: end rosetta_table_copy_out_p1;
241:
242: procedure rosetta_table_copy_in_p5(t out nocopy cn_comp_plan_pvt.sales_role_tbl_type, a0 JTF_NUMBER_TABLE
243: , a1 JTF_NUMBER_TABLE
244: , a2 JTF_NUMBER_TABLE
245: , a3 JTF_VARCHAR2_TABLE_100
246: , a4 JTF_VARCHAR2_TABLE_200
271: end loop;
272: end if;
273: end if;
274: end rosetta_table_copy_in_p5;
275: procedure rosetta_table_copy_out_p5(t cn_comp_plan_pvt.sales_role_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
276: , a1 out nocopy JTF_NUMBER_TABLE
277: , a2 out nocopy JTF_NUMBER_TABLE
278: , a3 out nocopy JTF_VARCHAR2_TABLE_100
279: , a4 out nocopy JTF_VARCHAR2_TABLE_200
330: end if;
331: end if;
332: end rosetta_table_copy_out_p5;
333:
334: procedure rosetta_table_copy_in_p7(t out nocopy cn_comp_plan_pvt.srp_plan_assign_tbl_type, a0 JTF_NUMBER_TABLE
335: , a1 JTF_NUMBER_TABLE
336: , a2 JTF_NUMBER_TABLE
337: , a3 JTF_VARCHAR2_TABLE_100
338: , a4 JTF_VARCHAR2_TABLE_400
363: end loop;
364: end if;
365: end if;
366: end rosetta_table_copy_in_p7;
367: procedure rosetta_table_copy_out_p7(t cn_comp_plan_pvt.srp_plan_assign_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
368: , a1 out nocopy JTF_NUMBER_TABLE
369: , a2 out nocopy JTF_NUMBER_TABLE
370: , a3 out nocopy JTF_VARCHAR2_TABLE_100
371: , a4 out nocopy JTF_VARCHAR2_TABLE_400
462: , x_msg_data out nocopy VARCHAR2
463: )
464:
465: as
466: ddp_comp_plan cn_comp_plan_pvt.comp_plan_rec_type;
467: ddindx binary_integer; indx binary_integer;
468: begin
469:
470: -- copy data to the local IN or IN-OUT args, if any
506:
507:
508:
509: -- here's the delegated call to the old PL/SQL routine
510: cn_comp_plan_pvt.create_comp_plan(p_api_version,
511: p_init_msg_list,
512: p_commit,
513: p_validation_level,
514: ddp_comp_plan,
595: , x_msg_data out nocopy VARCHAR2
596: )
597:
598: as
599: ddp_comp_plan cn_comp_plan_pvt.comp_plan_rec_type;
600: ddindx binary_integer; indx binary_integer;
601: begin
602:
603: -- copy data to the local IN or IN-OUT args, if any
638:
639:
640:
641: -- here's the delegated call to the old PL/SQL routine
642: cn_comp_plan_pvt.update_comp_plan(p_api_version,
643: p_init_msg_list,
644: p_commit,
645: p_validation_level,
646: ddp_comp_plan,
725: , x_msg_data out nocopy VARCHAR2
726: )
727:
728: as
729: ddp_comp_plan cn_comp_plan_pvt.comp_plan_rec_type;
730: ddindx binary_integer; indx binary_integer;
731: begin
732:
733: -- copy data to the local IN or IN-OUT args, if any
768:
769:
770:
771: -- here's the delegated call to the old PL/SQL routine
772: cn_comp_plan_pvt.delete_comp_plan(p_api_version,
773: p_init_msg_list,
774: p_commit,
775: p_validation_level,
776: ddp_comp_plan,
861: , x_msg_data out nocopy VARCHAR2
862: )
863:
864: as
865: ddx_comp_plan cn_comp_plan_pvt.comp_plan_tbl_type;
866: ddindx binary_integer; indx binary_integer;
867: begin
868:
869: -- copy data to the local IN or IN-OUT args, if any
881:
882:
883:
884: -- here's the delegated call to the old PL/SQL routine
885: cn_comp_plan_pvt.get_comp_plan_sum(p_api_version,
886: p_init_msg_list,
887: p_commit,
888: p_validation_level,
889: p_start_record,
906:
907:
908:
909:
910: cn_comp_plan_pvt_w.rosetta_table_copy_out_p1(ddx_comp_plan, p9_a0
911: , p9_a1
912: , p9_a2
913: , p9_a3
914: , p9_a4
982: , x_msg_data out nocopy VARCHAR2
983: )
984:
985: as
986: ddx_comp_plan cn_comp_plan_pvt.comp_plan_tbl_type;
987: ddindx binary_integer; indx binary_integer;
988: begin
989:
990: -- copy data to the local IN or IN-OUT args, if any
997:
998:
999:
1000: -- here's the delegated call to the old PL/SQL routine
1001: cn_comp_plan_pvt.get_comp_plan_dtl(p_api_version,
1002: p_init_msg_list,
1003: p_commit,
1004: p_validation_level,
1005: p_comp_plan_id,
1013:
1014:
1015:
1016:
1017: cn_comp_plan_pvt_w.rosetta_table_copy_out_p1(ddx_comp_plan, p5_a0
1018: , p5_a1
1019: , p5_a2
1020: , p5_a3
1021: , p5_a4
1067: , x_msg_data out nocopy VARCHAR2
1068: )
1069:
1070: as
1071: ddx_sales_role cn_comp_plan_pvt.sales_role_tbl_type;
1072: ddindx binary_integer; indx binary_integer;
1073: begin
1074:
1075: -- copy data to the local IN or IN-OUT args, if any
1082:
1083:
1084:
1085: -- here's the delegated call to the old PL/SQL routine
1086: cn_comp_plan_pvt.get_sales_role(p_api_version,
1087: p_init_msg_list,
1088: p_commit,
1089: p_validation_level,
1090: p_comp_plan_id,
1098:
1099:
1100:
1101:
1102: cn_comp_plan_pvt_w.rosetta_table_copy_out_p5(ddx_sales_role, p5_a0
1103: , p5_a1
1104: , p5_a2
1105: , p5_a3
1106: , p5_a4
1151: , x_msg_data out nocopy VARCHAR2
1152: )
1153:
1154: as
1155: ddp_comp_plan cn_comp_plan_pvt.comp_plan_rec_type;
1156: ddindx binary_integer; indx binary_integer;
1157: begin
1158:
1159: -- copy data to the local IN or IN-OUT args, if any
1194:
1195:
1196:
1197: -- here's the delegated call to the old PL/SQL routine
1198: cn_comp_plan_pvt.validate_comp_plan(p_api_version,
1199: p_init_msg_list,
1200: p_commit,
1201: p_validation_level,
1202: ddp_comp_plan,
1228: , p4_a7 out nocopy JTF_DATE_TABLE
1229: )
1230:
1231: as
1232: ddx_result_tbl cn_comp_plan_pvt.srp_plan_assign_tbl_type;
1233: ddindx binary_integer; indx binary_integer;
1234: begin
1235:
1236: -- copy data to the local IN or IN-OUT args, if any
1239:
1240:
1241:
1242: -- here's the delegated call to the old PL/SQL routine
1243: cn_comp_plan_pvt.get_assigned_salesreps(p_comp_plan_id,
1244: p_range_low,
1245: p_range_high,
1246: x_total_rows,
1247: ddx_result_tbl);
1250:
1251:
1252:
1253:
1254: cn_comp_plan_pvt_w.rosetta_table_copy_out_p7(ddx_result_tbl, p4_a0
1255: , p4_a1
1256: , p4_a2
1257: , p4_a3
1258: , p4_a4
1261: , p4_a7
1262: );
1263: end;
1264:
1265: end cn_comp_plan_pvt_w;