18: if n=b then return a; end if;
19: return n;
20: end;
21:
22: procedure rosetta_table_copy_in_p6(t out nocopy as_utility_pub.profile_tbl_type, a0 JTF_VARCHAR2_TABLE_100
23: , a1 JTF_VARCHAR2_TABLE_300
24: ) as
25: ddindx binary_integer; indx binary_integer;
26: begin
39: end loop;
40: end if;
41: end if;
42: end rosetta_table_copy_in_p6;
43: procedure rosetta_table_copy_out_p6(t as_utility_pub.profile_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
44: , a1 out nocopy JTF_VARCHAR2_TABLE_300
45: ) as
46: ddindx binary_integer; indx binary_integer;
47: begin
45: ) as
46: ddindx binary_integer; indx binary_integer;
47: begin
48: if t is null or t.count = 0 then
49: a0 := JTF_VARCHAR2_TABLE_100();
50: a1 := JTF_VARCHAR2_TABLE_300();
51: else
52: a0 := JTF_VARCHAR2_TABLE_100();
53: a1 := JTF_VARCHAR2_TABLE_300();
48: if t is null or t.count = 0 then
49: a0 := JTF_VARCHAR2_TABLE_100();
50: a1 := JTF_VARCHAR2_TABLE_300();
51: else
52: a0 := JTF_VARCHAR2_TABLE_100();
53: a1 := JTF_VARCHAR2_TABLE_300();
54: if t.count > 0 then
55: a0.extend(t.count);
56: a1.extend(t.count);
68: end if;
69: end if;
70: end rosetta_table_copy_out_p6;
71:
72: procedure rosetta_table_copy_in_p10(t out nocopy as_utility_pub.item_property_tbl_type, a0 JTF_VARCHAR2_TABLE_100
73: , a1 JTF_VARCHAR2_TABLE_100
74: , a2 JTF_VARCHAR2_TABLE_100
75: , a3 JTF_VARCHAR2_TABLE_400
76: , a4 JTF_NUMBER_TABLE
69: end if;
70: end rosetta_table_copy_out_p6;
71:
72: procedure rosetta_table_copy_in_p10(t out nocopy as_utility_pub.item_property_tbl_type, a0 JTF_VARCHAR2_TABLE_100
73: , a1 JTF_VARCHAR2_TABLE_100
74: , a2 JTF_VARCHAR2_TABLE_100
75: , a3 JTF_VARCHAR2_TABLE_400
76: , a4 JTF_NUMBER_TABLE
77: , a5 JTF_DATE_TABLE
70: end rosetta_table_copy_out_p6;
71:
72: procedure rosetta_table_copy_in_p10(t out nocopy as_utility_pub.item_property_tbl_type, a0 JTF_VARCHAR2_TABLE_100
73: , a1 JTF_VARCHAR2_TABLE_100
74: , a2 JTF_VARCHAR2_TABLE_100
75: , a3 JTF_VARCHAR2_TABLE_400
76: , a4 JTF_NUMBER_TABLE
77: , a5 JTF_DATE_TABLE
78: ) as
97: end loop;
98: end if;
99: end if;
100: end rosetta_table_copy_in_p10;
101: procedure rosetta_table_copy_out_p10(t as_utility_pub.item_property_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
102: , a1 out nocopy JTF_VARCHAR2_TABLE_100
103: , a2 out nocopy JTF_VARCHAR2_TABLE_100
104: , a3 out nocopy JTF_VARCHAR2_TABLE_400
105: , a4 out nocopy JTF_NUMBER_TABLE
98: end if;
99: end if;
100: end rosetta_table_copy_in_p10;
101: procedure rosetta_table_copy_out_p10(t as_utility_pub.item_property_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
102: , a1 out nocopy JTF_VARCHAR2_TABLE_100
103: , a2 out nocopy JTF_VARCHAR2_TABLE_100
104: , a3 out nocopy JTF_VARCHAR2_TABLE_400
105: , a4 out nocopy JTF_NUMBER_TABLE
106: , a5 out nocopy JTF_DATE_TABLE
99: end if;
100: end rosetta_table_copy_in_p10;
101: procedure rosetta_table_copy_out_p10(t as_utility_pub.item_property_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
102: , a1 out nocopy JTF_VARCHAR2_TABLE_100
103: , a2 out nocopy JTF_VARCHAR2_TABLE_100
104: , a3 out nocopy JTF_VARCHAR2_TABLE_400
105: , a4 out nocopy JTF_NUMBER_TABLE
106: , a5 out nocopy JTF_DATE_TABLE
107: ) as
107: ) as
108: ddindx binary_integer; indx binary_integer;
109: begin
110: if t is null or t.count = 0 then
111: a0 := JTF_VARCHAR2_TABLE_100();
112: a1 := JTF_VARCHAR2_TABLE_100();
113: a2 := JTF_VARCHAR2_TABLE_100();
114: a3 := JTF_VARCHAR2_TABLE_400();
115: a4 := JTF_NUMBER_TABLE();
108: ddindx binary_integer; indx binary_integer;
109: begin
110: if t is null or t.count = 0 then
111: a0 := JTF_VARCHAR2_TABLE_100();
112: a1 := JTF_VARCHAR2_TABLE_100();
113: a2 := JTF_VARCHAR2_TABLE_100();
114: a3 := JTF_VARCHAR2_TABLE_400();
115: a4 := JTF_NUMBER_TABLE();
116: a5 := JTF_DATE_TABLE();
109: begin
110: if t is null or t.count = 0 then
111: a0 := JTF_VARCHAR2_TABLE_100();
112: a1 := JTF_VARCHAR2_TABLE_100();
113: a2 := JTF_VARCHAR2_TABLE_100();
114: a3 := JTF_VARCHAR2_TABLE_400();
115: a4 := JTF_NUMBER_TABLE();
116: a5 := JTF_DATE_TABLE();
117: else
114: a3 := JTF_VARCHAR2_TABLE_400();
115: a4 := JTF_NUMBER_TABLE();
116: a5 := JTF_DATE_TABLE();
117: else
118: a0 := JTF_VARCHAR2_TABLE_100();
119: a1 := JTF_VARCHAR2_TABLE_100();
120: a2 := JTF_VARCHAR2_TABLE_100();
121: a3 := JTF_VARCHAR2_TABLE_400();
122: a4 := JTF_NUMBER_TABLE();
115: a4 := JTF_NUMBER_TABLE();
116: a5 := JTF_DATE_TABLE();
117: else
118: a0 := JTF_VARCHAR2_TABLE_100();
119: a1 := JTF_VARCHAR2_TABLE_100();
120: a2 := JTF_VARCHAR2_TABLE_100();
121: a3 := JTF_VARCHAR2_TABLE_400();
122: a4 := JTF_NUMBER_TABLE();
123: a5 := JTF_DATE_TABLE();
116: a5 := JTF_DATE_TABLE();
117: else
118: a0 := JTF_VARCHAR2_TABLE_100();
119: a1 := JTF_VARCHAR2_TABLE_100();
120: a2 := JTF_VARCHAR2_TABLE_100();
121: a3 := JTF_VARCHAR2_TABLE_400();
122: a4 := JTF_NUMBER_TABLE();
123: a5 := JTF_DATE_TABLE();
124: if t.count > 0 then