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 okl_loss_prov_pvt.bucket_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_VARCHAR2_TABLE_100
26: , a4 JTF_NUMBER_TABLE
19: return n;
20: end;
21:
22: procedure rosetta_table_copy_in_p3(t out nocopy okl_loss_prov_pvt.bucket_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_VARCHAR2_TABLE_100
26: , a4 JTF_NUMBER_TABLE
27: , a5 JTF_NUMBER_TABLE
20: end;
21:
22: procedure rosetta_table_copy_in_p3(t out nocopy okl_loss_prov_pvt.bucket_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_VARCHAR2_TABLE_100
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 okl_loss_prov_pvt.bucket_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_VARCHAR2_TABLE_100
26: , a4 JTF_NUMBER_TABLE
27: , a5 JTF_NUMBER_TABLE
28: , a6 JTF_NUMBER_TABLE
29: ) as
30: ddindx binary_integer; indx binary_integer;
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_VARCHAR2_TABLE_100
26: , a4 JTF_NUMBER_TABLE
27: , a5 JTF_NUMBER_TABLE
28: , a6 JTF_NUMBER_TABLE
29: ) as
30: ddindx binary_integer; indx binary_integer;
31: begin
24: , a2 JTF_NUMBER_TABLE
25: , a3 JTF_VARCHAR2_TABLE_100
26: , a4 JTF_NUMBER_TABLE
27: , a5 JTF_NUMBER_TABLE
28: , a6 JTF_NUMBER_TABLE
29: ) as
30: ddindx binary_integer; indx binary_integer;
31: begin
32: if a0 is not null and a0.count > 0 then
49: end loop;
50: end if;
51: end if;
52: end rosetta_table_copy_in_p3;
53: procedure rosetta_table_copy_out_p3(t okl_loss_prov_pvt.bucket_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
54: , a1 out nocopy JTF_NUMBER_TABLE
55: , a2 out nocopy JTF_NUMBER_TABLE
56: , a3 out nocopy JTF_VARCHAR2_TABLE_100
57: , a4 out nocopy JTF_NUMBER_TABLE
50: end if;
51: end if;
52: end rosetta_table_copy_in_p3;
53: procedure rosetta_table_copy_out_p3(t okl_loss_prov_pvt.bucket_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
54: , a1 out nocopy JTF_NUMBER_TABLE
55: , a2 out nocopy JTF_NUMBER_TABLE
56: , a3 out nocopy JTF_VARCHAR2_TABLE_100
57: , a4 out nocopy JTF_NUMBER_TABLE
58: , a5 out nocopy JTF_NUMBER_TABLE
51: end if;
52: end rosetta_table_copy_in_p3;
53: procedure rosetta_table_copy_out_p3(t okl_loss_prov_pvt.bucket_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
54: , a1 out nocopy JTF_NUMBER_TABLE
55: , a2 out nocopy JTF_NUMBER_TABLE
56: , a3 out nocopy JTF_VARCHAR2_TABLE_100
57: , a4 out nocopy JTF_NUMBER_TABLE
58: , a5 out nocopy JTF_NUMBER_TABLE
59: , a6 out nocopy JTF_NUMBER_TABLE
53: procedure rosetta_table_copy_out_p3(t okl_loss_prov_pvt.bucket_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
54: , a1 out nocopy JTF_NUMBER_TABLE
55: , a2 out nocopy JTF_NUMBER_TABLE
56: , a3 out nocopy JTF_VARCHAR2_TABLE_100
57: , a4 out nocopy JTF_NUMBER_TABLE
58: , a5 out nocopy JTF_NUMBER_TABLE
59: , a6 out nocopy JTF_NUMBER_TABLE
60: ) as
61: ddindx binary_integer; indx binary_integer;
54: , a1 out nocopy JTF_NUMBER_TABLE
55: , a2 out nocopy JTF_NUMBER_TABLE
56: , a3 out nocopy JTF_VARCHAR2_TABLE_100
57: , a4 out nocopy JTF_NUMBER_TABLE
58: , a5 out nocopy JTF_NUMBER_TABLE
59: , a6 out nocopy JTF_NUMBER_TABLE
60: ) as
61: ddindx binary_integer; indx binary_integer;
62: begin
55: , a2 out nocopy JTF_NUMBER_TABLE
56: , a3 out nocopy JTF_VARCHAR2_TABLE_100
57: , a4 out nocopy JTF_NUMBER_TABLE
58: , a5 out nocopy JTF_NUMBER_TABLE
59: , a6 out nocopy JTF_NUMBER_TABLE
60: ) as
61: ddindx binary_integer; indx binary_integer;
62: begin
63: if t is null or t.count = 0 then
60: ) as
61: ddindx binary_integer; indx binary_integer;
62: begin
63: if t is null or t.count = 0 then
64: a0 := JTF_NUMBER_TABLE();
65: a1 := JTF_NUMBER_TABLE();
66: a2 := JTF_NUMBER_TABLE();
67: a3 := JTF_VARCHAR2_TABLE_100();
68: a4 := JTF_NUMBER_TABLE();
61: ddindx binary_integer; indx binary_integer;
62: begin
63: if t is null or t.count = 0 then
64: a0 := JTF_NUMBER_TABLE();
65: a1 := JTF_NUMBER_TABLE();
66: a2 := JTF_NUMBER_TABLE();
67: a3 := JTF_VARCHAR2_TABLE_100();
68: a4 := JTF_NUMBER_TABLE();
69: a5 := JTF_NUMBER_TABLE();
62: begin
63: if t is null or t.count = 0 then
64: a0 := JTF_NUMBER_TABLE();
65: a1 := JTF_NUMBER_TABLE();
66: a2 := JTF_NUMBER_TABLE();
67: a3 := JTF_VARCHAR2_TABLE_100();
68: a4 := JTF_NUMBER_TABLE();
69: a5 := JTF_NUMBER_TABLE();
70: a6 := JTF_NUMBER_TABLE();
64: a0 := JTF_NUMBER_TABLE();
65: a1 := JTF_NUMBER_TABLE();
66: a2 := JTF_NUMBER_TABLE();
67: a3 := JTF_VARCHAR2_TABLE_100();
68: a4 := JTF_NUMBER_TABLE();
69: a5 := JTF_NUMBER_TABLE();
70: a6 := JTF_NUMBER_TABLE();
71: else
72: a0 := JTF_NUMBER_TABLE();
65: a1 := JTF_NUMBER_TABLE();
66: a2 := JTF_NUMBER_TABLE();
67: a3 := JTF_VARCHAR2_TABLE_100();
68: a4 := JTF_NUMBER_TABLE();
69: a5 := JTF_NUMBER_TABLE();
70: a6 := JTF_NUMBER_TABLE();
71: else
72: a0 := JTF_NUMBER_TABLE();
73: a1 := JTF_NUMBER_TABLE();
66: a2 := JTF_NUMBER_TABLE();
67: a3 := JTF_VARCHAR2_TABLE_100();
68: a4 := JTF_NUMBER_TABLE();
69: a5 := JTF_NUMBER_TABLE();
70: a6 := JTF_NUMBER_TABLE();
71: else
72: a0 := JTF_NUMBER_TABLE();
73: a1 := JTF_NUMBER_TABLE();
74: a2 := JTF_NUMBER_TABLE();
68: a4 := JTF_NUMBER_TABLE();
69: a5 := JTF_NUMBER_TABLE();
70: a6 := JTF_NUMBER_TABLE();
71: else
72: a0 := JTF_NUMBER_TABLE();
73: a1 := JTF_NUMBER_TABLE();
74: a2 := JTF_NUMBER_TABLE();
75: a3 := JTF_VARCHAR2_TABLE_100();
76: a4 := JTF_NUMBER_TABLE();
69: a5 := JTF_NUMBER_TABLE();
70: a6 := JTF_NUMBER_TABLE();
71: else
72: a0 := JTF_NUMBER_TABLE();
73: a1 := JTF_NUMBER_TABLE();
74: a2 := JTF_NUMBER_TABLE();
75: a3 := JTF_VARCHAR2_TABLE_100();
76: a4 := JTF_NUMBER_TABLE();
77: a5 := JTF_NUMBER_TABLE();
70: a6 := JTF_NUMBER_TABLE();
71: else
72: a0 := JTF_NUMBER_TABLE();
73: a1 := JTF_NUMBER_TABLE();
74: a2 := JTF_NUMBER_TABLE();
75: a3 := JTF_VARCHAR2_TABLE_100();
76: a4 := JTF_NUMBER_TABLE();
77: a5 := JTF_NUMBER_TABLE();
78: a6 := JTF_NUMBER_TABLE();
72: a0 := JTF_NUMBER_TABLE();
73: a1 := JTF_NUMBER_TABLE();
74: a2 := JTF_NUMBER_TABLE();
75: a3 := JTF_VARCHAR2_TABLE_100();
76: a4 := JTF_NUMBER_TABLE();
77: a5 := JTF_NUMBER_TABLE();
78: a6 := JTF_NUMBER_TABLE();
79: if t.count > 0 then
80: a0.extend(t.count);
73: a1 := JTF_NUMBER_TABLE();
74: a2 := JTF_NUMBER_TABLE();
75: a3 := JTF_VARCHAR2_TABLE_100();
76: a4 := JTF_NUMBER_TABLE();
77: a5 := JTF_NUMBER_TABLE();
78: a6 := JTF_NUMBER_TABLE();
79: if t.count > 0 then
80: a0.extend(t.count);
81: a1.extend(t.count);
74: a2 := JTF_NUMBER_TABLE();
75: a3 := JTF_VARCHAR2_TABLE_100();
76: a4 := JTF_NUMBER_TABLE();
77: a5 := JTF_NUMBER_TABLE();
78: a6 := JTF_NUMBER_TABLE();
79: if t.count > 0 then
80: a0.extend(t.count);
81: a1.extend(t.count);
82: a2.extend(t.count);
103: end if;
104: end if;
105: end rosetta_table_copy_out_p3;
106:
107: procedure rosetta_table_copy_in_p4(t out nocopy okl_loss_prov_pvt.slpv_tbl_type, a0 JTF_NUMBER_TABLE
108: , a1 JTF_NUMBER_TABLE
109: , a2 JTF_NUMBER_TABLE
110: , a3 JTF_VARCHAR2_TABLE_2000
111: , a4 JTF_VARCHAR2_TABLE_100
104: end if;
105: end rosetta_table_copy_out_p3;
106:
107: procedure rosetta_table_copy_in_p4(t out nocopy okl_loss_prov_pvt.slpv_tbl_type, a0 JTF_NUMBER_TABLE
108: , a1 JTF_NUMBER_TABLE
109: , a2 JTF_NUMBER_TABLE
110: , a3 JTF_VARCHAR2_TABLE_2000
111: , a4 JTF_VARCHAR2_TABLE_100
112: , a5 JTF_VARCHAR2_TABLE_100
105: end rosetta_table_copy_out_p3;
106:
107: procedure rosetta_table_copy_in_p4(t out nocopy okl_loss_prov_pvt.slpv_tbl_type, a0 JTF_NUMBER_TABLE
108: , a1 JTF_NUMBER_TABLE
109: , a2 JTF_NUMBER_TABLE
110: , a3 JTF_VARCHAR2_TABLE_2000
111: , a4 JTF_VARCHAR2_TABLE_100
112: , a5 JTF_VARCHAR2_TABLE_100
113: , a6 JTF_VARCHAR2_TABLE_100
136: end loop;
137: end if;
138: end if;
139: end rosetta_table_copy_in_p4;
140: procedure rosetta_table_copy_out_p4(t okl_loss_prov_pvt.slpv_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
141: , a1 out nocopy JTF_NUMBER_TABLE
142: , a2 out nocopy JTF_NUMBER_TABLE
143: , a3 out nocopy JTF_VARCHAR2_TABLE_2000
144: , a4 out nocopy JTF_VARCHAR2_TABLE_100
137: end if;
138: end if;
139: end rosetta_table_copy_in_p4;
140: procedure rosetta_table_copy_out_p4(t okl_loss_prov_pvt.slpv_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
141: , a1 out nocopy JTF_NUMBER_TABLE
142: , a2 out nocopy JTF_NUMBER_TABLE
143: , a3 out nocopy JTF_VARCHAR2_TABLE_2000
144: , a4 out nocopy JTF_VARCHAR2_TABLE_100
145: , a5 out nocopy JTF_VARCHAR2_TABLE_100
138: end if;
139: end rosetta_table_copy_in_p4;
140: procedure rosetta_table_copy_out_p4(t okl_loss_prov_pvt.slpv_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
141: , a1 out nocopy JTF_NUMBER_TABLE
142: , a2 out nocopy JTF_NUMBER_TABLE
143: , a3 out nocopy JTF_VARCHAR2_TABLE_2000
144: , a4 out nocopy JTF_VARCHAR2_TABLE_100
145: , a5 out nocopy JTF_VARCHAR2_TABLE_100
146: , a6 out nocopy JTF_VARCHAR2_TABLE_100
148: ) as
149: ddindx binary_integer; indx binary_integer;
150: begin
151: if t is null or t.count = 0 then
152: a0 := JTF_NUMBER_TABLE();
153: a1 := JTF_NUMBER_TABLE();
154: a2 := JTF_NUMBER_TABLE();
155: a3 := JTF_VARCHAR2_TABLE_2000();
156: a4 := JTF_VARCHAR2_TABLE_100();
149: ddindx binary_integer; indx binary_integer;
150: begin
151: if t is null or t.count = 0 then
152: a0 := JTF_NUMBER_TABLE();
153: a1 := JTF_NUMBER_TABLE();
154: a2 := JTF_NUMBER_TABLE();
155: a3 := JTF_VARCHAR2_TABLE_2000();
156: a4 := JTF_VARCHAR2_TABLE_100();
157: a5 := JTF_VARCHAR2_TABLE_100();
150: begin
151: if t is null or t.count = 0 then
152: a0 := JTF_NUMBER_TABLE();
153: a1 := JTF_NUMBER_TABLE();
154: a2 := JTF_NUMBER_TABLE();
155: a3 := JTF_VARCHAR2_TABLE_2000();
156: a4 := JTF_VARCHAR2_TABLE_100();
157: a5 := JTF_VARCHAR2_TABLE_100();
158: a6 := JTF_VARCHAR2_TABLE_100();
157: a5 := JTF_VARCHAR2_TABLE_100();
158: a6 := JTF_VARCHAR2_TABLE_100();
159: a7 := JTF_DATE_TABLE();
160: else
161: a0 := JTF_NUMBER_TABLE();
162: a1 := JTF_NUMBER_TABLE();
163: a2 := JTF_NUMBER_TABLE();
164: a3 := JTF_VARCHAR2_TABLE_2000();
165: a4 := JTF_VARCHAR2_TABLE_100();
158: a6 := JTF_VARCHAR2_TABLE_100();
159: a7 := JTF_DATE_TABLE();
160: else
161: a0 := JTF_NUMBER_TABLE();
162: a1 := JTF_NUMBER_TABLE();
163: a2 := JTF_NUMBER_TABLE();
164: a3 := JTF_VARCHAR2_TABLE_2000();
165: a4 := JTF_VARCHAR2_TABLE_100();
166: a5 := JTF_VARCHAR2_TABLE_100();
159: a7 := JTF_DATE_TABLE();
160: else
161: a0 := JTF_NUMBER_TABLE();
162: a1 := JTF_NUMBER_TABLE();
163: a2 := JTF_NUMBER_TABLE();
164: a3 := JTF_VARCHAR2_TABLE_2000();
165: a4 := JTF_VARCHAR2_TABLE_100();
166: a5 := JTF_VARCHAR2_TABLE_100();
167: a6 := JTF_VARCHAR2_TABLE_100();