18: if n=b then return a; end if;
19: return n;
20: end;
21:
22: procedure rosetta_table_copy_in_p2(t out nocopy pv_pec_rules_pvt.pec_rules_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_NUMBER_TABLE
26: , a4 JTF_VARCHAR2_TABLE_100
19: return n;
20: end;
21:
22: procedure rosetta_table_copy_in_p2(t out nocopy pv_pec_rules_pvt.pec_rules_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_NUMBER_TABLE
26: , a4 JTF_VARCHAR2_TABLE_100
27: , a5 JTF_DATE_TABLE
20: end;
21:
22: procedure rosetta_table_copy_in_p2(t out nocopy pv_pec_rules_pvt.pec_rules_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_NUMBER_TABLE
26: , a4 JTF_VARCHAR2_TABLE_100
27: , a5 JTF_DATE_TABLE
28: , a6 JTF_DATE_TABLE
21:
22: procedure rosetta_table_copy_in_p2(t out nocopy pv_pec_rules_pvt.pec_rules_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_NUMBER_TABLE
26: , a4 JTF_VARCHAR2_TABLE_100
27: , a5 JTF_DATE_TABLE
28: , a6 JTF_DATE_TABLE
29: , a7 JTF_VARCHAR2_TABLE_100
26: , a4 JTF_VARCHAR2_TABLE_100
27: , a5 JTF_DATE_TABLE
28: , a6 JTF_DATE_TABLE
29: , a7 JTF_VARCHAR2_TABLE_100
30: , a8 JTF_NUMBER_TABLE
31: , a9 JTF_DATE_TABLE
32: , a10 JTF_NUMBER_TABLE
33: , a11 JTF_DATE_TABLE
34: , a12 JTF_NUMBER_TABLE
28: , a6 JTF_DATE_TABLE
29: , a7 JTF_VARCHAR2_TABLE_100
30: , a8 JTF_NUMBER_TABLE
31: , a9 JTF_DATE_TABLE
32: , a10 JTF_NUMBER_TABLE
33: , a11 JTF_DATE_TABLE
34: , a12 JTF_NUMBER_TABLE
35: ) as
36: ddindx binary_integer; indx binary_integer;
30: , a8 JTF_NUMBER_TABLE
31: , a9 JTF_DATE_TABLE
32: , a10 JTF_NUMBER_TABLE
33: , a11 JTF_DATE_TABLE
34: , a12 JTF_NUMBER_TABLE
35: ) as
36: ddindx binary_integer; indx binary_integer;
37: begin
38: if a0 is not null and a0.count > 0 then
61: end loop;
62: end if;
63: end if;
64: end rosetta_table_copy_in_p2;
65: procedure rosetta_table_copy_out_p2(t pv_pec_rules_pvt.pec_rules_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
66: , a1 out nocopy JTF_NUMBER_TABLE
67: , a2 out nocopy JTF_NUMBER_TABLE
68: , a3 out nocopy JTF_NUMBER_TABLE
69: , a4 out nocopy JTF_VARCHAR2_TABLE_100
62: end if;
63: end if;
64: end rosetta_table_copy_in_p2;
65: procedure rosetta_table_copy_out_p2(t pv_pec_rules_pvt.pec_rules_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
66: , a1 out nocopy JTF_NUMBER_TABLE
67: , a2 out nocopy JTF_NUMBER_TABLE
68: , a3 out nocopy JTF_NUMBER_TABLE
69: , a4 out nocopy JTF_VARCHAR2_TABLE_100
70: , a5 out nocopy JTF_DATE_TABLE
63: end if;
64: end rosetta_table_copy_in_p2;
65: procedure rosetta_table_copy_out_p2(t pv_pec_rules_pvt.pec_rules_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
66: , a1 out nocopy JTF_NUMBER_TABLE
67: , a2 out nocopy JTF_NUMBER_TABLE
68: , a3 out nocopy JTF_NUMBER_TABLE
69: , a4 out nocopy JTF_VARCHAR2_TABLE_100
70: , a5 out nocopy JTF_DATE_TABLE
71: , a6 out nocopy JTF_DATE_TABLE
64: end rosetta_table_copy_in_p2;
65: procedure rosetta_table_copy_out_p2(t pv_pec_rules_pvt.pec_rules_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
66: , a1 out nocopy JTF_NUMBER_TABLE
67: , a2 out nocopy JTF_NUMBER_TABLE
68: , a3 out nocopy JTF_NUMBER_TABLE
69: , a4 out nocopy JTF_VARCHAR2_TABLE_100
70: , a5 out nocopy JTF_DATE_TABLE
71: , a6 out nocopy JTF_DATE_TABLE
72: , a7 out nocopy JTF_VARCHAR2_TABLE_100
69: , a4 out nocopy JTF_VARCHAR2_TABLE_100
70: , a5 out nocopy JTF_DATE_TABLE
71: , a6 out nocopy JTF_DATE_TABLE
72: , a7 out nocopy JTF_VARCHAR2_TABLE_100
73: , a8 out nocopy JTF_NUMBER_TABLE
74: , a9 out nocopy JTF_DATE_TABLE
75: , a10 out nocopy JTF_NUMBER_TABLE
76: , a11 out nocopy JTF_DATE_TABLE
77: , a12 out nocopy JTF_NUMBER_TABLE
71: , a6 out nocopy JTF_DATE_TABLE
72: , a7 out nocopy JTF_VARCHAR2_TABLE_100
73: , a8 out nocopy JTF_NUMBER_TABLE
74: , a9 out nocopy JTF_DATE_TABLE
75: , a10 out nocopy JTF_NUMBER_TABLE
76: , a11 out nocopy JTF_DATE_TABLE
77: , a12 out nocopy JTF_NUMBER_TABLE
78: ) as
79: ddindx binary_integer; indx binary_integer;
73: , a8 out nocopy JTF_NUMBER_TABLE
74: , a9 out nocopy JTF_DATE_TABLE
75: , a10 out nocopy JTF_NUMBER_TABLE
76: , a11 out nocopy JTF_DATE_TABLE
77: , a12 out nocopy JTF_NUMBER_TABLE
78: ) as
79: ddindx binary_integer; indx binary_integer;
80: begin
81: if t is null or t.count = 0 then
78: ) as
79: ddindx binary_integer; indx binary_integer;
80: begin
81: if t is null or t.count = 0 then
82: a0 := JTF_NUMBER_TABLE();
83: a1 := JTF_NUMBER_TABLE();
84: a2 := JTF_NUMBER_TABLE();
85: a3 := JTF_NUMBER_TABLE();
86: a4 := JTF_VARCHAR2_TABLE_100();
79: ddindx binary_integer; indx binary_integer;
80: begin
81: if t is null or t.count = 0 then
82: a0 := JTF_NUMBER_TABLE();
83: a1 := JTF_NUMBER_TABLE();
84: a2 := JTF_NUMBER_TABLE();
85: a3 := JTF_NUMBER_TABLE();
86: a4 := JTF_VARCHAR2_TABLE_100();
87: a5 := JTF_DATE_TABLE();
80: begin
81: if t is null or t.count = 0 then
82: a0 := JTF_NUMBER_TABLE();
83: a1 := JTF_NUMBER_TABLE();
84: a2 := JTF_NUMBER_TABLE();
85: a3 := JTF_NUMBER_TABLE();
86: a4 := JTF_VARCHAR2_TABLE_100();
87: a5 := JTF_DATE_TABLE();
88: a6 := JTF_DATE_TABLE();
81: if t is null or t.count = 0 then
82: a0 := JTF_NUMBER_TABLE();
83: a1 := JTF_NUMBER_TABLE();
84: a2 := JTF_NUMBER_TABLE();
85: a3 := JTF_NUMBER_TABLE();
86: a4 := JTF_VARCHAR2_TABLE_100();
87: a5 := JTF_DATE_TABLE();
88: a6 := JTF_DATE_TABLE();
89: a7 := JTF_VARCHAR2_TABLE_100();
86: a4 := JTF_VARCHAR2_TABLE_100();
87: a5 := JTF_DATE_TABLE();
88: a6 := JTF_DATE_TABLE();
89: a7 := JTF_VARCHAR2_TABLE_100();
90: a8 := JTF_NUMBER_TABLE();
91: a9 := JTF_DATE_TABLE();
92: a10 := JTF_NUMBER_TABLE();
93: a11 := JTF_DATE_TABLE();
94: a12 := JTF_NUMBER_TABLE();
88: a6 := JTF_DATE_TABLE();
89: a7 := JTF_VARCHAR2_TABLE_100();
90: a8 := JTF_NUMBER_TABLE();
91: a9 := JTF_DATE_TABLE();
92: a10 := JTF_NUMBER_TABLE();
93: a11 := JTF_DATE_TABLE();
94: a12 := JTF_NUMBER_TABLE();
95: else
96: a0 := JTF_NUMBER_TABLE();
90: a8 := JTF_NUMBER_TABLE();
91: a9 := JTF_DATE_TABLE();
92: a10 := JTF_NUMBER_TABLE();
93: a11 := JTF_DATE_TABLE();
94: a12 := JTF_NUMBER_TABLE();
95: else
96: a0 := JTF_NUMBER_TABLE();
97: a1 := JTF_NUMBER_TABLE();
98: a2 := JTF_NUMBER_TABLE();
92: a10 := JTF_NUMBER_TABLE();
93: a11 := JTF_DATE_TABLE();
94: a12 := JTF_NUMBER_TABLE();
95: else
96: a0 := JTF_NUMBER_TABLE();
97: a1 := JTF_NUMBER_TABLE();
98: a2 := JTF_NUMBER_TABLE();
99: a3 := JTF_NUMBER_TABLE();
100: a4 := JTF_VARCHAR2_TABLE_100();
93: a11 := JTF_DATE_TABLE();
94: a12 := JTF_NUMBER_TABLE();
95: else
96: a0 := JTF_NUMBER_TABLE();
97: a1 := JTF_NUMBER_TABLE();
98: a2 := JTF_NUMBER_TABLE();
99: a3 := JTF_NUMBER_TABLE();
100: a4 := JTF_VARCHAR2_TABLE_100();
101: a5 := JTF_DATE_TABLE();
94: a12 := JTF_NUMBER_TABLE();
95: else
96: a0 := JTF_NUMBER_TABLE();
97: a1 := JTF_NUMBER_TABLE();
98: a2 := JTF_NUMBER_TABLE();
99: a3 := JTF_NUMBER_TABLE();
100: a4 := JTF_VARCHAR2_TABLE_100();
101: a5 := JTF_DATE_TABLE();
102: a6 := JTF_DATE_TABLE();
95: else
96: a0 := JTF_NUMBER_TABLE();
97: a1 := JTF_NUMBER_TABLE();
98: a2 := JTF_NUMBER_TABLE();
99: a3 := JTF_NUMBER_TABLE();
100: a4 := JTF_VARCHAR2_TABLE_100();
101: a5 := JTF_DATE_TABLE();
102: a6 := JTF_DATE_TABLE();
103: a7 := JTF_VARCHAR2_TABLE_100();
100: a4 := JTF_VARCHAR2_TABLE_100();
101: a5 := JTF_DATE_TABLE();
102: a6 := JTF_DATE_TABLE();
103: a7 := JTF_VARCHAR2_TABLE_100();
104: a8 := JTF_NUMBER_TABLE();
105: a9 := JTF_DATE_TABLE();
106: a10 := JTF_NUMBER_TABLE();
107: a11 := JTF_DATE_TABLE();
108: a12 := JTF_NUMBER_TABLE();
102: a6 := JTF_DATE_TABLE();
103: a7 := JTF_VARCHAR2_TABLE_100();
104: a8 := JTF_NUMBER_TABLE();
105: a9 := JTF_DATE_TABLE();
106: a10 := JTF_NUMBER_TABLE();
107: a11 := JTF_DATE_TABLE();
108: a12 := JTF_NUMBER_TABLE();
109: if t.count > 0 then
110: a0.extend(t.count);
104: a8 := JTF_NUMBER_TABLE();
105: a9 := JTF_DATE_TABLE();
106: a10 := JTF_NUMBER_TABLE();
107: a11 := JTF_DATE_TABLE();
108: a12 := JTF_NUMBER_TABLE();
109: if t.count > 0 then
110: a0.extend(t.count);
111: a1.extend(t.count);
112: a2.extend(t.count);