1: package body cn_role_pmt_plans_pvt_w as
2: /* $Header: cnwrptpb.pls 120.5 2005/09/14 03:42 vensrini noship $ */
3: procedure rosetta_table_copy_in_p1(t out nocopy cn_role_pmt_plans_pvt.role_pmt_plan_rec_tbl_type, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_VARCHAR2_TABLE_100
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
1: package body cn_role_pmt_plans_pvt_w as
2: /* $Header: cnwrptpb.pls 120.5 2005/09/14 03:42 vensrini noship $ */
3: procedure rosetta_table_copy_in_p1(t out nocopy cn_role_pmt_plans_pvt.role_pmt_plan_rec_tbl_type, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_VARCHAR2_TABLE_100
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
8: , a5 JTF_DATE_TABLE
3: procedure rosetta_table_copy_in_p1(t out nocopy cn_role_pmt_plans_pvt.role_pmt_plan_rec_tbl_type, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_VARCHAR2_TABLE_100
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
8: , a5 JTF_DATE_TABLE
9: , a6 JTF_DATE_TABLE
10: , a7 JTF_NUMBER_TABLE
11: , a8 JTF_VARCHAR2_TABLE_100
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
8: , a5 JTF_DATE_TABLE
9: , a6 JTF_DATE_TABLE
10: , a7 JTF_NUMBER_TABLE
11: , a8 JTF_VARCHAR2_TABLE_100
12: , a9 JTF_VARCHAR2_TABLE_200
13: , a10 JTF_VARCHAR2_TABLE_200
14: , a11 JTF_VARCHAR2_TABLE_200
64: end loop;
65: end if;
66: end if;
67: end rosetta_table_copy_in_p1;
68: procedure rosetta_table_copy_out_p1(t cn_role_pmt_plans_pvt.role_pmt_plan_rec_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
69: , a1 out nocopy JTF_NUMBER_TABLE
70: , a2 out nocopy JTF_VARCHAR2_TABLE_100
71: , a3 out nocopy JTF_VARCHAR2_TABLE_100
72: , a4 out nocopy JTF_NUMBER_TABLE
65: end if;
66: end if;
67: end rosetta_table_copy_in_p1;
68: procedure rosetta_table_copy_out_p1(t cn_role_pmt_plans_pvt.role_pmt_plan_rec_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
69: , a1 out nocopy JTF_NUMBER_TABLE
70: , a2 out nocopy JTF_VARCHAR2_TABLE_100
71: , a3 out nocopy JTF_VARCHAR2_TABLE_100
72: , a4 out nocopy JTF_NUMBER_TABLE
73: , a5 out nocopy JTF_DATE_TABLE
68: procedure rosetta_table_copy_out_p1(t cn_role_pmt_plans_pvt.role_pmt_plan_rec_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
69: , a1 out nocopy JTF_NUMBER_TABLE
70: , a2 out nocopy JTF_VARCHAR2_TABLE_100
71: , a3 out nocopy JTF_VARCHAR2_TABLE_100
72: , a4 out nocopy JTF_NUMBER_TABLE
73: , a5 out nocopy JTF_DATE_TABLE
74: , a6 out nocopy JTF_DATE_TABLE
75: , a7 out nocopy JTF_NUMBER_TABLE
76: , a8 out nocopy JTF_VARCHAR2_TABLE_100
71: , a3 out nocopy JTF_VARCHAR2_TABLE_100
72: , a4 out nocopy JTF_NUMBER_TABLE
73: , a5 out nocopy JTF_DATE_TABLE
74: , a6 out nocopy JTF_DATE_TABLE
75: , a7 out nocopy JTF_NUMBER_TABLE
76: , a8 out nocopy JTF_VARCHAR2_TABLE_100
77: , a9 out nocopy JTF_VARCHAR2_TABLE_200
78: , a10 out nocopy JTF_VARCHAR2_TABLE_200
79: , a11 out nocopy JTF_VARCHAR2_TABLE_200
92: ) as
93: ddindx binary_integer; indx binary_integer;
94: begin
95: if t is null or t.count = 0 then
96: a0 := JTF_NUMBER_TABLE();
97: a1 := JTF_NUMBER_TABLE();
98: a2 := JTF_VARCHAR2_TABLE_100();
99: a3 := JTF_VARCHAR2_TABLE_100();
100: a4 := JTF_NUMBER_TABLE();
93: ddindx binary_integer; indx binary_integer;
94: begin
95: if t is null or t.count = 0 then
96: a0 := JTF_NUMBER_TABLE();
97: a1 := JTF_NUMBER_TABLE();
98: a2 := JTF_VARCHAR2_TABLE_100();
99: a3 := JTF_VARCHAR2_TABLE_100();
100: a4 := JTF_NUMBER_TABLE();
101: a5 := JTF_DATE_TABLE();
96: a0 := JTF_NUMBER_TABLE();
97: a1 := JTF_NUMBER_TABLE();
98: a2 := JTF_VARCHAR2_TABLE_100();
99: a3 := JTF_VARCHAR2_TABLE_100();
100: a4 := JTF_NUMBER_TABLE();
101: a5 := JTF_DATE_TABLE();
102: a6 := JTF_DATE_TABLE();
103: a7 := JTF_NUMBER_TABLE();
104: a8 := JTF_VARCHAR2_TABLE_100();
99: a3 := JTF_VARCHAR2_TABLE_100();
100: a4 := JTF_NUMBER_TABLE();
101: a5 := JTF_DATE_TABLE();
102: a6 := JTF_DATE_TABLE();
103: a7 := JTF_NUMBER_TABLE();
104: a8 := JTF_VARCHAR2_TABLE_100();
105: a9 := JTF_VARCHAR2_TABLE_200();
106: a10 := JTF_VARCHAR2_TABLE_200();
107: a11 := JTF_VARCHAR2_TABLE_200();
117: a21 := JTF_VARCHAR2_TABLE_200();
118: a22 := JTF_VARCHAR2_TABLE_200();
119: a23 := JTF_VARCHAR2_TABLE_200();
120: else
121: a0 := JTF_NUMBER_TABLE();
122: a1 := JTF_NUMBER_TABLE();
123: a2 := JTF_VARCHAR2_TABLE_100();
124: a3 := JTF_VARCHAR2_TABLE_100();
125: a4 := JTF_NUMBER_TABLE();
118: a22 := JTF_VARCHAR2_TABLE_200();
119: a23 := JTF_VARCHAR2_TABLE_200();
120: else
121: a0 := JTF_NUMBER_TABLE();
122: a1 := JTF_NUMBER_TABLE();
123: a2 := JTF_VARCHAR2_TABLE_100();
124: a3 := JTF_VARCHAR2_TABLE_100();
125: a4 := JTF_NUMBER_TABLE();
126: a5 := JTF_DATE_TABLE();
121: a0 := JTF_NUMBER_TABLE();
122: a1 := JTF_NUMBER_TABLE();
123: a2 := JTF_VARCHAR2_TABLE_100();
124: a3 := JTF_VARCHAR2_TABLE_100();
125: a4 := JTF_NUMBER_TABLE();
126: a5 := JTF_DATE_TABLE();
127: a6 := JTF_DATE_TABLE();
128: a7 := JTF_NUMBER_TABLE();
129: a8 := JTF_VARCHAR2_TABLE_100();
124: a3 := JTF_VARCHAR2_TABLE_100();
125: a4 := JTF_NUMBER_TABLE();
126: a5 := JTF_DATE_TABLE();
127: a6 := JTF_DATE_TABLE();
128: a7 := JTF_NUMBER_TABLE();
129: a8 := JTF_VARCHAR2_TABLE_100();
130: a9 := JTF_VARCHAR2_TABLE_200();
131: a10 := JTF_VARCHAR2_TABLE_200();
132: a11 := JTF_VARCHAR2_TABLE_200();