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 ams_dm_target_pvt.dm_target_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_DATE_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_DATE_TABLE
26: , a4 JTF_NUMBER_TABLE
20: end;
21:
22: procedure rosetta_table_copy_in_p3(t out nocopy ams_dm_target_pvt.dm_target_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_DATE_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_DATE_TABLE
26: , a4 JTF_NUMBER_TABLE
27: , a5 JTF_NUMBER_TABLE
28: , a6 JTF_NUMBER_TABLE
22: procedure rosetta_table_copy_in_p3(t out nocopy ams_dm_target_pvt.dm_target_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_DATE_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_DATE_TABLE
26: , a4 JTF_NUMBER_TABLE
27: , a5 JTF_NUMBER_TABLE
28: , a6 JTF_NUMBER_TABLE
29: , a7 JTF_VARCHAR2_TABLE_100
30: , a8 JTF_VARCHAR2_TABLE_100
23: , a1 JTF_DATE_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_DATE_TABLE
26: , a4 JTF_NUMBER_TABLE
27: , a5 JTF_NUMBER_TABLE
28: , a6 JTF_NUMBER_TABLE
29: , a7 JTF_VARCHAR2_TABLE_100
30: , a8 JTF_VARCHAR2_TABLE_100
31: , a9 JTF_NUMBER_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_DATE_TABLE
26: , a4 JTF_NUMBER_TABLE
27: , a5 JTF_NUMBER_TABLE
28: , a6 JTF_NUMBER_TABLE
29: , a7 JTF_VARCHAR2_TABLE_100
30: , a8 JTF_VARCHAR2_TABLE_100
31: , a9 JTF_NUMBER_TABLE
32: , a10 JTF_NUMBER_TABLE
27: , a5 JTF_NUMBER_TABLE
28: , a6 JTF_NUMBER_TABLE
29: , a7 JTF_VARCHAR2_TABLE_100
30: , a8 JTF_VARCHAR2_TABLE_100
31: , a9 JTF_NUMBER_TABLE
32: , a10 JTF_NUMBER_TABLE
33: , a11 JTF_VARCHAR2_TABLE_300
34: , a12 JTF_VARCHAR2_TABLE_4000
35: , a13 JTF_NUMBER_TABLE
28: , a6 JTF_NUMBER_TABLE
29: , a7 JTF_VARCHAR2_TABLE_100
30: , a8 JTF_VARCHAR2_TABLE_100
31: , a9 JTF_NUMBER_TABLE
32: , a10 JTF_NUMBER_TABLE
33: , a11 JTF_VARCHAR2_TABLE_300
34: , a12 JTF_VARCHAR2_TABLE_4000
35: , a13 JTF_NUMBER_TABLE
36: ) as
31: , a9 JTF_NUMBER_TABLE
32: , a10 JTF_NUMBER_TABLE
33: , a11 JTF_VARCHAR2_TABLE_300
34: , a12 JTF_VARCHAR2_TABLE_4000
35: , a13 JTF_NUMBER_TABLE
36: ) as
37: ddindx binary_integer; indx binary_integer;
38: begin
39: if a0 is not null and a0.count > 0 then
63: end loop;
64: end if;
65: end if;
66: end rosetta_table_copy_in_p3;
67: procedure rosetta_table_copy_out_p3(t ams_dm_target_pvt.dm_target_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
68: , a1 out nocopy JTF_DATE_TABLE
69: , a2 out nocopy JTF_NUMBER_TABLE
70: , a3 out nocopy JTF_DATE_TABLE
71: , a4 out nocopy JTF_NUMBER_TABLE
65: end if;
66: end rosetta_table_copy_in_p3;
67: procedure rosetta_table_copy_out_p3(t ams_dm_target_pvt.dm_target_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
68: , a1 out nocopy JTF_DATE_TABLE
69: , a2 out nocopy JTF_NUMBER_TABLE
70: , a3 out nocopy JTF_DATE_TABLE
71: , a4 out nocopy JTF_NUMBER_TABLE
72: , a5 out nocopy JTF_NUMBER_TABLE
73: , a6 out nocopy JTF_NUMBER_TABLE
67: procedure rosetta_table_copy_out_p3(t ams_dm_target_pvt.dm_target_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
68: , a1 out nocopy JTF_DATE_TABLE
69: , a2 out nocopy JTF_NUMBER_TABLE
70: , a3 out nocopy JTF_DATE_TABLE
71: , a4 out nocopy JTF_NUMBER_TABLE
72: , a5 out nocopy JTF_NUMBER_TABLE
73: , a6 out nocopy JTF_NUMBER_TABLE
74: , a7 out nocopy JTF_VARCHAR2_TABLE_100
75: , a8 out nocopy JTF_VARCHAR2_TABLE_100
68: , a1 out nocopy JTF_DATE_TABLE
69: , a2 out nocopy JTF_NUMBER_TABLE
70: , a3 out nocopy JTF_DATE_TABLE
71: , a4 out nocopy JTF_NUMBER_TABLE
72: , a5 out nocopy JTF_NUMBER_TABLE
73: , a6 out nocopy JTF_NUMBER_TABLE
74: , a7 out nocopy JTF_VARCHAR2_TABLE_100
75: , a8 out nocopy JTF_VARCHAR2_TABLE_100
76: , a9 out nocopy JTF_NUMBER_TABLE
69: , a2 out nocopy JTF_NUMBER_TABLE
70: , a3 out nocopy JTF_DATE_TABLE
71: , a4 out nocopy JTF_NUMBER_TABLE
72: , a5 out nocopy JTF_NUMBER_TABLE
73: , a6 out nocopy JTF_NUMBER_TABLE
74: , a7 out nocopy JTF_VARCHAR2_TABLE_100
75: , a8 out nocopy JTF_VARCHAR2_TABLE_100
76: , a9 out nocopy JTF_NUMBER_TABLE
77: , a10 out nocopy JTF_NUMBER_TABLE
72: , a5 out nocopy JTF_NUMBER_TABLE
73: , a6 out nocopy JTF_NUMBER_TABLE
74: , a7 out nocopy JTF_VARCHAR2_TABLE_100
75: , a8 out nocopy JTF_VARCHAR2_TABLE_100
76: , a9 out nocopy JTF_NUMBER_TABLE
77: , a10 out nocopy JTF_NUMBER_TABLE
78: , a11 out nocopy JTF_VARCHAR2_TABLE_300
79: , a12 out nocopy JTF_VARCHAR2_TABLE_4000
80: , a13 out nocopy JTF_NUMBER_TABLE
73: , a6 out nocopy JTF_NUMBER_TABLE
74: , a7 out nocopy JTF_VARCHAR2_TABLE_100
75: , a8 out nocopy JTF_VARCHAR2_TABLE_100
76: , a9 out nocopy JTF_NUMBER_TABLE
77: , a10 out nocopy JTF_NUMBER_TABLE
78: , a11 out nocopy JTF_VARCHAR2_TABLE_300
79: , a12 out nocopy JTF_VARCHAR2_TABLE_4000
80: , a13 out nocopy JTF_NUMBER_TABLE
81: ) as
76: , a9 out nocopy JTF_NUMBER_TABLE
77: , a10 out nocopy JTF_NUMBER_TABLE
78: , a11 out nocopy JTF_VARCHAR2_TABLE_300
79: , a12 out nocopy JTF_VARCHAR2_TABLE_4000
80: , a13 out nocopy JTF_NUMBER_TABLE
81: ) as
82: ddindx binary_integer; indx binary_integer;
83: begin
84: if t is null or t.count = 0 then
81: ) as
82: ddindx binary_integer; indx binary_integer;
83: begin
84: if t is null or t.count = 0 then
85: a0 := JTF_NUMBER_TABLE();
86: a1 := JTF_DATE_TABLE();
87: a2 := JTF_NUMBER_TABLE();
88: a3 := JTF_DATE_TABLE();
89: a4 := JTF_NUMBER_TABLE();
83: begin
84: if t is null or t.count = 0 then
85: a0 := JTF_NUMBER_TABLE();
86: a1 := JTF_DATE_TABLE();
87: a2 := JTF_NUMBER_TABLE();
88: a3 := JTF_DATE_TABLE();
89: a4 := JTF_NUMBER_TABLE();
90: a5 := JTF_NUMBER_TABLE();
91: a6 := JTF_NUMBER_TABLE();
85: a0 := JTF_NUMBER_TABLE();
86: a1 := JTF_DATE_TABLE();
87: a2 := JTF_NUMBER_TABLE();
88: a3 := JTF_DATE_TABLE();
89: a4 := JTF_NUMBER_TABLE();
90: a5 := JTF_NUMBER_TABLE();
91: a6 := JTF_NUMBER_TABLE();
92: a7 := JTF_VARCHAR2_TABLE_100();
93: a8 := JTF_VARCHAR2_TABLE_100();
86: a1 := JTF_DATE_TABLE();
87: a2 := JTF_NUMBER_TABLE();
88: a3 := JTF_DATE_TABLE();
89: a4 := JTF_NUMBER_TABLE();
90: a5 := JTF_NUMBER_TABLE();
91: a6 := JTF_NUMBER_TABLE();
92: a7 := JTF_VARCHAR2_TABLE_100();
93: a8 := JTF_VARCHAR2_TABLE_100();
94: a9 := JTF_NUMBER_TABLE();
87: a2 := JTF_NUMBER_TABLE();
88: a3 := JTF_DATE_TABLE();
89: a4 := JTF_NUMBER_TABLE();
90: a5 := JTF_NUMBER_TABLE();
91: a6 := JTF_NUMBER_TABLE();
92: a7 := JTF_VARCHAR2_TABLE_100();
93: a8 := JTF_VARCHAR2_TABLE_100();
94: a9 := JTF_NUMBER_TABLE();
95: a10 := JTF_NUMBER_TABLE();
90: a5 := JTF_NUMBER_TABLE();
91: a6 := JTF_NUMBER_TABLE();
92: a7 := JTF_VARCHAR2_TABLE_100();
93: a8 := JTF_VARCHAR2_TABLE_100();
94: a9 := JTF_NUMBER_TABLE();
95: a10 := JTF_NUMBER_TABLE();
96: a11 := JTF_VARCHAR2_TABLE_300();
97: a12 := JTF_VARCHAR2_TABLE_4000();
98: a13 := JTF_NUMBER_TABLE();
91: a6 := JTF_NUMBER_TABLE();
92: a7 := JTF_VARCHAR2_TABLE_100();
93: a8 := JTF_VARCHAR2_TABLE_100();
94: a9 := JTF_NUMBER_TABLE();
95: a10 := JTF_NUMBER_TABLE();
96: a11 := JTF_VARCHAR2_TABLE_300();
97: a12 := JTF_VARCHAR2_TABLE_4000();
98: a13 := JTF_NUMBER_TABLE();
99: else
94: a9 := JTF_NUMBER_TABLE();
95: a10 := JTF_NUMBER_TABLE();
96: a11 := JTF_VARCHAR2_TABLE_300();
97: a12 := JTF_VARCHAR2_TABLE_4000();
98: a13 := JTF_NUMBER_TABLE();
99: else
100: a0 := JTF_NUMBER_TABLE();
101: a1 := JTF_DATE_TABLE();
102: a2 := JTF_NUMBER_TABLE();
96: a11 := JTF_VARCHAR2_TABLE_300();
97: a12 := JTF_VARCHAR2_TABLE_4000();
98: a13 := JTF_NUMBER_TABLE();
99: else
100: a0 := JTF_NUMBER_TABLE();
101: a1 := JTF_DATE_TABLE();
102: a2 := JTF_NUMBER_TABLE();
103: a3 := JTF_DATE_TABLE();
104: a4 := JTF_NUMBER_TABLE();
98: a13 := JTF_NUMBER_TABLE();
99: else
100: a0 := JTF_NUMBER_TABLE();
101: a1 := JTF_DATE_TABLE();
102: a2 := JTF_NUMBER_TABLE();
103: a3 := JTF_DATE_TABLE();
104: a4 := JTF_NUMBER_TABLE();
105: a5 := JTF_NUMBER_TABLE();
106: a6 := JTF_NUMBER_TABLE();
100: a0 := JTF_NUMBER_TABLE();
101: a1 := JTF_DATE_TABLE();
102: a2 := JTF_NUMBER_TABLE();
103: a3 := JTF_DATE_TABLE();
104: a4 := JTF_NUMBER_TABLE();
105: a5 := JTF_NUMBER_TABLE();
106: a6 := JTF_NUMBER_TABLE();
107: a7 := JTF_VARCHAR2_TABLE_100();
108: a8 := JTF_VARCHAR2_TABLE_100();
101: a1 := JTF_DATE_TABLE();
102: a2 := JTF_NUMBER_TABLE();
103: a3 := JTF_DATE_TABLE();
104: a4 := JTF_NUMBER_TABLE();
105: a5 := JTF_NUMBER_TABLE();
106: a6 := JTF_NUMBER_TABLE();
107: a7 := JTF_VARCHAR2_TABLE_100();
108: a8 := JTF_VARCHAR2_TABLE_100();
109: a9 := JTF_NUMBER_TABLE();
102: a2 := JTF_NUMBER_TABLE();
103: a3 := JTF_DATE_TABLE();
104: a4 := JTF_NUMBER_TABLE();
105: a5 := JTF_NUMBER_TABLE();
106: a6 := JTF_NUMBER_TABLE();
107: a7 := JTF_VARCHAR2_TABLE_100();
108: a8 := JTF_VARCHAR2_TABLE_100();
109: a9 := JTF_NUMBER_TABLE();
110: a10 := JTF_NUMBER_TABLE();
105: a5 := JTF_NUMBER_TABLE();
106: a6 := JTF_NUMBER_TABLE();
107: a7 := JTF_VARCHAR2_TABLE_100();
108: a8 := JTF_VARCHAR2_TABLE_100();
109: a9 := JTF_NUMBER_TABLE();
110: a10 := JTF_NUMBER_TABLE();
111: a11 := JTF_VARCHAR2_TABLE_300();
112: a12 := JTF_VARCHAR2_TABLE_4000();
113: a13 := JTF_NUMBER_TABLE();
106: a6 := JTF_NUMBER_TABLE();
107: a7 := JTF_VARCHAR2_TABLE_100();
108: a8 := JTF_VARCHAR2_TABLE_100();
109: a9 := JTF_NUMBER_TABLE();
110: a10 := JTF_NUMBER_TABLE();
111: a11 := JTF_VARCHAR2_TABLE_300();
112: a12 := JTF_VARCHAR2_TABLE_4000();
113: a13 := JTF_NUMBER_TABLE();
114: if t.count > 0 then
109: a9 := JTF_NUMBER_TABLE();
110: a10 := JTF_NUMBER_TABLE();
111: a11 := JTF_VARCHAR2_TABLE_300();
112: a12 := JTF_VARCHAR2_TABLE_4000();
113: a13 := JTF_NUMBER_TABLE();
114: if t.count > 0 then
115: a0.extend(t.count);
116: a1.extend(t.count);
117: a2.extend(t.count);