1: package body okl_quote_to_contract_pvt_w as
2: /* $Header: OKLELQCB.pls 120.0 2005/10/06 07:23:17 skgautam noship $ */
3: procedure rosetta_table_copy_in_p3(t out nocopy okl_quote_to_contract_pvt.link_asset_tbl_type, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_VARCHAR2_TABLE_100
6: ) as
7: ddindx binary_integer; indx binary_integer;
1: package body okl_quote_to_contract_pvt_w as
2: /* $Header: OKLELQCB.pls 120.0 2005/10/06 07:23:17 skgautam noship $ */
3: procedure rosetta_table_copy_in_p3(t out nocopy okl_quote_to_contract_pvt.link_asset_tbl_type, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_VARCHAR2_TABLE_100
6: ) as
7: ddindx binary_integer; indx binary_integer;
8: begin
22: end loop;
23: end if;
24: end if;
25: end rosetta_table_copy_in_p3;
26: procedure rosetta_table_copy_out_p3(t okl_quote_to_contract_pvt.link_asset_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
27: , a1 out nocopy JTF_NUMBER_TABLE
28: , a2 out nocopy JTF_VARCHAR2_TABLE_100
29: ) as
30: ddindx binary_integer; indx binary_integer;
23: end if;
24: end if;
25: end rosetta_table_copy_in_p3;
26: procedure rosetta_table_copy_out_p3(t okl_quote_to_contract_pvt.link_asset_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
27: , a1 out nocopy JTF_NUMBER_TABLE
28: , a2 out nocopy JTF_VARCHAR2_TABLE_100
29: ) as
30: ddindx binary_integer; indx binary_integer;
31: begin
29: ) as
30: ddindx binary_integer; indx binary_integer;
31: begin
32: if t is null or t.count = 0 then
33: a0 := JTF_NUMBER_TABLE();
34: a1 := JTF_NUMBER_TABLE();
35: a2 := JTF_VARCHAR2_TABLE_100();
36: else
37: a0 := JTF_NUMBER_TABLE();
30: ddindx binary_integer; indx binary_integer;
31: begin
32: if t is null or t.count = 0 then
33: a0 := JTF_NUMBER_TABLE();
34: a1 := JTF_NUMBER_TABLE();
35: a2 := JTF_VARCHAR2_TABLE_100();
36: else
37: a0 := JTF_NUMBER_TABLE();
38: a1 := JTF_NUMBER_TABLE();
33: a0 := JTF_NUMBER_TABLE();
34: a1 := JTF_NUMBER_TABLE();
35: a2 := JTF_VARCHAR2_TABLE_100();
36: else
37: a0 := JTF_NUMBER_TABLE();
38: a1 := JTF_NUMBER_TABLE();
39: a2 := JTF_VARCHAR2_TABLE_100();
40: if t.count > 0 then
41: a0.extend(t.count);
34: a1 := JTF_NUMBER_TABLE();
35: a2 := JTF_VARCHAR2_TABLE_100();
36: else
37: a0 := JTF_NUMBER_TABLE();
38: a1 := JTF_NUMBER_TABLE();
39: a2 := JTF_VARCHAR2_TABLE_100();
40: if t.count > 0 then
41: a0.extend(t.count);
42: a1.extend(t.count);
56: end if;
57: end if;
58: end rosetta_table_copy_out_p3;
59:
60: procedure rosetta_table_copy_in_p6(t out nocopy okl_quote_to_contract_pvt.payment_levels_tbl_type, a0 JTF_NUMBER_TABLE
61: , a1 JTF_DATE_TABLE
62: , a2 JTF_NUMBER_TABLE
63: , a3 JTF_NUMBER_TABLE
64: , a4 JTF_NUMBER_TABLE
58: end rosetta_table_copy_out_p3;
59:
60: procedure rosetta_table_copy_in_p6(t out nocopy okl_quote_to_contract_pvt.payment_levels_tbl_type, a0 JTF_NUMBER_TABLE
61: , a1 JTF_DATE_TABLE
62: , a2 JTF_NUMBER_TABLE
63: , a3 JTF_NUMBER_TABLE
64: , a4 JTF_NUMBER_TABLE
65: , a5 JTF_NUMBER_TABLE
66: , a6 JTF_NUMBER_TABLE
59:
60: procedure rosetta_table_copy_in_p6(t out nocopy okl_quote_to_contract_pvt.payment_levels_tbl_type, a0 JTF_NUMBER_TABLE
61: , a1 JTF_DATE_TABLE
62: , a2 JTF_NUMBER_TABLE
63: , a3 JTF_NUMBER_TABLE
64: , a4 JTF_NUMBER_TABLE
65: , a5 JTF_NUMBER_TABLE
66: , a6 JTF_NUMBER_TABLE
67: , a7 JTF_VARCHAR2_TABLE_100
60: procedure rosetta_table_copy_in_p6(t out nocopy okl_quote_to_contract_pvt.payment_levels_tbl_type, a0 JTF_NUMBER_TABLE
61: , a1 JTF_DATE_TABLE
62: , a2 JTF_NUMBER_TABLE
63: , a3 JTF_NUMBER_TABLE
64: , a4 JTF_NUMBER_TABLE
65: , a5 JTF_NUMBER_TABLE
66: , a6 JTF_NUMBER_TABLE
67: , a7 JTF_VARCHAR2_TABLE_100
68: , a8 JTF_VARCHAR2_TABLE_100
61: , a1 JTF_DATE_TABLE
62: , a2 JTF_NUMBER_TABLE
63: , a3 JTF_NUMBER_TABLE
64: , a4 JTF_NUMBER_TABLE
65: , a5 JTF_NUMBER_TABLE
66: , a6 JTF_NUMBER_TABLE
67: , a7 JTF_VARCHAR2_TABLE_100
68: , a8 JTF_VARCHAR2_TABLE_100
69: , a9 JTF_NUMBER_TABLE
62: , a2 JTF_NUMBER_TABLE
63: , a3 JTF_NUMBER_TABLE
64: , a4 JTF_NUMBER_TABLE
65: , a5 JTF_NUMBER_TABLE
66: , a6 JTF_NUMBER_TABLE
67: , a7 JTF_VARCHAR2_TABLE_100
68: , a8 JTF_VARCHAR2_TABLE_100
69: , a9 JTF_NUMBER_TABLE
70: , a10 JTF_VARCHAR2_TABLE_100
65: , a5 JTF_NUMBER_TABLE
66: , a6 JTF_NUMBER_TABLE
67: , a7 JTF_VARCHAR2_TABLE_100
68: , a8 JTF_VARCHAR2_TABLE_100
69: , a9 JTF_NUMBER_TABLE
70: , a10 JTF_VARCHAR2_TABLE_100
71: , a11 JTF_VARCHAR2_TABLE_100
72: ) as
73: ddindx binary_integer; indx binary_integer;
97: end loop;
98: end if;
99: end if;
100: end rosetta_table_copy_in_p6;
101: procedure rosetta_table_copy_out_p6(t okl_quote_to_contract_pvt.payment_levels_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
102: , a1 out nocopy JTF_DATE_TABLE
103: , a2 out nocopy JTF_NUMBER_TABLE
104: , a3 out nocopy JTF_NUMBER_TABLE
105: , a4 out nocopy JTF_NUMBER_TABLE
99: end if;
100: end rosetta_table_copy_in_p6;
101: procedure rosetta_table_copy_out_p6(t okl_quote_to_contract_pvt.payment_levels_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
102: , a1 out nocopy JTF_DATE_TABLE
103: , a2 out nocopy JTF_NUMBER_TABLE
104: , a3 out nocopy JTF_NUMBER_TABLE
105: , a4 out nocopy JTF_NUMBER_TABLE
106: , a5 out nocopy JTF_NUMBER_TABLE
107: , a6 out nocopy JTF_NUMBER_TABLE
100: end rosetta_table_copy_in_p6;
101: procedure rosetta_table_copy_out_p6(t okl_quote_to_contract_pvt.payment_levels_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
102: , a1 out nocopy JTF_DATE_TABLE
103: , a2 out nocopy JTF_NUMBER_TABLE
104: , a3 out nocopy JTF_NUMBER_TABLE
105: , a4 out nocopy JTF_NUMBER_TABLE
106: , a5 out nocopy JTF_NUMBER_TABLE
107: , a6 out nocopy JTF_NUMBER_TABLE
108: , a7 out nocopy JTF_VARCHAR2_TABLE_100
101: procedure rosetta_table_copy_out_p6(t okl_quote_to_contract_pvt.payment_levels_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
102: , a1 out nocopy JTF_DATE_TABLE
103: , a2 out nocopy JTF_NUMBER_TABLE
104: , a3 out nocopy JTF_NUMBER_TABLE
105: , a4 out nocopy JTF_NUMBER_TABLE
106: , a5 out nocopy JTF_NUMBER_TABLE
107: , a6 out nocopy JTF_NUMBER_TABLE
108: , a7 out nocopy JTF_VARCHAR2_TABLE_100
109: , a8 out nocopy JTF_VARCHAR2_TABLE_100
102: , a1 out nocopy JTF_DATE_TABLE
103: , a2 out nocopy JTF_NUMBER_TABLE
104: , a3 out nocopy JTF_NUMBER_TABLE
105: , a4 out nocopy JTF_NUMBER_TABLE
106: , a5 out nocopy JTF_NUMBER_TABLE
107: , a6 out nocopy JTF_NUMBER_TABLE
108: , a7 out nocopy JTF_VARCHAR2_TABLE_100
109: , a8 out nocopy JTF_VARCHAR2_TABLE_100
110: , a9 out nocopy JTF_NUMBER_TABLE
103: , a2 out nocopy JTF_NUMBER_TABLE
104: , a3 out nocopy JTF_NUMBER_TABLE
105: , a4 out nocopy JTF_NUMBER_TABLE
106: , a5 out nocopy JTF_NUMBER_TABLE
107: , a6 out nocopy JTF_NUMBER_TABLE
108: , a7 out nocopy JTF_VARCHAR2_TABLE_100
109: , a8 out nocopy JTF_VARCHAR2_TABLE_100
110: , a9 out nocopy JTF_NUMBER_TABLE
111: , a10 out nocopy JTF_VARCHAR2_TABLE_100
106: , a5 out nocopy JTF_NUMBER_TABLE
107: , a6 out nocopy JTF_NUMBER_TABLE
108: , a7 out nocopy JTF_VARCHAR2_TABLE_100
109: , a8 out nocopy JTF_VARCHAR2_TABLE_100
110: , a9 out nocopy JTF_NUMBER_TABLE
111: , a10 out nocopy JTF_VARCHAR2_TABLE_100
112: , a11 out nocopy JTF_VARCHAR2_TABLE_100
113: ) as
114: ddindx binary_integer; indx binary_integer;
113: ) as
114: ddindx binary_integer; indx binary_integer;
115: begin
116: if t is null or t.count = 0 then
117: a0 := JTF_NUMBER_TABLE();
118: a1 := JTF_DATE_TABLE();
119: a2 := JTF_NUMBER_TABLE();
120: a3 := JTF_NUMBER_TABLE();
121: a4 := JTF_NUMBER_TABLE();
115: begin
116: if t is null or t.count = 0 then
117: a0 := JTF_NUMBER_TABLE();
118: a1 := JTF_DATE_TABLE();
119: a2 := JTF_NUMBER_TABLE();
120: a3 := JTF_NUMBER_TABLE();
121: a4 := JTF_NUMBER_TABLE();
122: a5 := JTF_NUMBER_TABLE();
123: a6 := JTF_NUMBER_TABLE();
116: if t is null or t.count = 0 then
117: a0 := JTF_NUMBER_TABLE();
118: a1 := JTF_DATE_TABLE();
119: a2 := JTF_NUMBER_TABLE();
120: a3 := JTF_NUMBER_TABLE();
121: a4 := JTF_NUMBER_TABLE();
122: a5 := JTF_NUMBER_TABLE();
123: a6 := JTF_NUMBER_TABLE();
124: a7 := JTF_VARCHAR2_TABLE_100();
117: a0 := JTF_NUMBER_TABLE();
118: a1 := JTF_DATE_TABLE();
119: a2 := JTF_NUMBER_TABLE();
120: a3 := JTF_NUMBER_TABLE();
121: a4 := JTF_NUMBER_TABLE();
122: a5 := JTF_NUMBER_TABLE();
123: a6 := JTF_NUMBER_TABLE();
124: a7 := JTF_VARCHAR2_TABLE_100();
125: a8 := JTF_VARCHAR2_TABLE_100();
118: a1 := JTF_DATE_TABLE();
119: a2 := JTF_NUMBER_TABLE();
120: a3 := JTF_NUMBER_TABLE();
121: a4 := JTF_NUMBER_TABLE();
122: a5 := JTF_NUMBER_TABLE();
123: a6 := JTF_NUMBER_TABLE();
124: a7 := JTF_VARCHAR2_TABLE_100();
125: a8 := JTF_VARCHAR2_TABLE_100();
126: a9 := JTF_NUMBER_TABLE();
119: a2 := JTF_NUMBER_TABLE();
120: a3 := JTF_NUMBER_TABLE();
121: a4 := JTF_NUMBER_TABLE();
122: a5 := JTF_NUMBER_TABLE();
123: a6 := JTF_NUMBER_TABLE();
124: a7 := JTF_VARCHAR2_TABLE_100();
125: a8 := JTF_VARCHAR2_TABLE_100();
126: a9 := JTF_NUMBER_TABLE();
127: a10 := JTF_VARCHAR2_TABLE_100();
122: a5 := JTF_NUMBER_TABLE();
123: a6 := JTF_NUMBER_TABLE();
124: a7 := JTF_VARCHAR2_TABLE_100();
125: a8 := JTF_VARCHAR2_TABLE_100();
126: a9 := JTF_NUMBER_TABLE();
127: a10 := JTF_VARCHAR2_TABLE_100();
128: a11 := JTF_VARCHAR2_TABLE_100();
129: else
130: a0 := JTF_NUMBER_TABLE();
126: a9 := JTF_NUMBER_TABLE();
127: a10 := JTF_VARCHAR2_TABLE_100();
128: a11 := JTF_VARCHAR2_TABLE_100();
129: else
130: a0 := JTF_NUMBER_TABLE();
131: a1 := JTF_DATE_TABLE();
132: a2 := JTF_NUMBER_TABLE();
133: a3 := JTF_NUMBER_TABLE();
134: a4 := JTF_NUMBER_TABLE();
128: a11 := JTF_VARCHAR2_TABLE_100();
129: else
130: a0 := JTF_NUMBER_TABLE();
131: a1 := JTF_DATE_TABLE();
132: a2 := JTF_NUMBER_TABLE();
133: a3 := JTF_NUMBER_TABLE();
134: a4 := JTF_NUMBER_TABLE();
135: a5 := JTF_NUMBER_TABLE();
136: a6 := JTF_NUMBER_TABLE();
129: else
130: a0 := JTF_NUMBER_TABLE();
131: a1 := JTF_DATE_TABLE();
132: a2 := JTF_NUMBER_TABLE();
133: a3 := JTF_NUMBER_TABLE();
134: a4 := JTF_NUMBER_TABLE();
135: a5 := JTF_NUMBER_TABLE();
136: a6 := JTF_NUMBER_TABLE();
137: a7 := JTF_VARCHAR2_TABLE_100();
130: a0 := JTF_NUMBER_TABLE();
131: a1 := JTF_DATE_TABLE();
132: a2 := JTF_NUMBER_TABLE();
133: a3 := JTF_NUMBER_TABLE();
134: a4 := JTF_NUMBER_TABLE();
135: a5 := JTF_NUMBER_TABLE();
136: a6 := JTF_NUMBER_TABLE();
137: a7 := JTF_VARCHAR2_TABLE_100();
138: a8 := JTF_VARCHAR2_TABLE_100();
131: a1 := JTF_DATE_TABLE();
132: a2 := JTF_NUMBER_TABLE();
133: a3 := JTF_NUMBER_TABLE();
134: a4 := JTF_NUMBER_TABLE();
135: a5 := JTF_NUMBER_TABLE();
136: a6 := JTF_NUMBER_TABLE();
137: a7 := JTF_VARCHAR2_TABLE_100();
138: a8 := JTF_VARCHAR2_TABLE_100();
139: a9 := JTF_NUMBER_TABLE();
132: a2 := JTF_NUMBER_TABLE();
133: a3 := JTF_NUMBER_TABLE();
134: a4 := JTF_NUMBER_TABLE();
135: a5 := JTF_NUMBER_TABLE();
136: a6 := JTF_NUMBER_TABLE();
137: a7 := JTF_VARCHAR2_TABLE_100();
138: a8 := JTF_VARCHAR2_TABLE_100();
139: a9 := JTF_NUMBER_TABLE();
140: a10 := JTF_VARCHAR2_TABLE_100();
135: a5 := JTF_NUMBER_TABLE();
136: a6 := JTF_NUMBER_TABLE();
137: a7 := JTF_VARCHAR2_TABLE_100();
138: a8 := JTF_VARCHAR2_TABLE_100();
139: a9 := JTF_NUMBER_TABLE();
140: a10 := JTF_VARCHAR2_TABLE_100();
141: a11 := JTF_VARCHAR2_TABLE_100();
142: if t.count > 0 then
143: a0.extend(t.count);
176: end if;
177: end if;
178: end rosetta_table_copy_out_p6;
179:
180: procedure rosetta_table_copy_in_p8(t out nocopy okl_quote_to_contract_pvt.qte_cntrct_ast_tbl_type, a0 JTF_NUMBER_TABLE
181: , a1 JTF_NUMBER_TABLE
182: ) as
183: ddindx binary_integer; indx binary_integer;
184: begin
177: end if;
178: end rosetta_table_copy_out_p6;
179:
180: procedure rosetta_table_copy_in_p8(t out nocopy okl_quote_to_contract_pvt.qte_cntrct_ast_tbl_type, a0 JTF_NUMBER_TABLE
181: , a1 JTF_NUMBER_TABLE
182: ) as
183: ddindx binary_integer; indx binary_integer;
184: begin
185: if a0 is not null and a0.count > 0 then
197: end loop;
198: end if;
199: end if;
200: end rosetta_table_copy_in_p8;
201: procedure rosetta_table_copy_out_p8(t okl_quote_to_contract_pvt.qte_cntrct_ast_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
202: , a1 out nocopy JTF_NUMBER_TABLE
203: ) as
204: ddindx binary_integer; indx binary_integer;
205: begin
198: end if;
199: end if;
200: end rosetta_table_copy_in_p8;
201: procedure rosetta_table_copy_out_p8(t okl_quote_to_contract_pvt.qte_cntrct_ast_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
202: , a1 out nocopy JTF_NUMBER_TABLE
203: ) as
204: ddindx binary_integer; indx binary_integer;
205: begin
206: if t is null or t.count = 0 then
203: ) as
204: ddindx binary_integer; indx binary_integer;
205: begin
206: if t is null or t.count = 0 then
207: a0 := JTF_NUMBER_TABLE();
208: a1 := JTF_NUMBER_TABLE();
209: else
210: a0 := JTF_NUMBER_TABLE();
211: a1 := JTF_NUMBER_TABLE();
204: ddindx binary_integer; indx binary_integer;
205: begin
206: if t is null or t.count = 0 then
207: a0 := JTF_NUMBER_TABLE();
208: a1 := JTF_NUMBER_TABLE();
209: else
210: a0 := JTF_NUMBER_TABLE();
211: a1 := JTF_NUMBER_TABLE();
212: if t.count > 0 then
206: if t is null or t.count = 0 then
207: a0 := JTF_NUMBER_TABLE();
208: a1 := JTF_NUMBER_TABLE();
209: else
210: a0 := JTF_NUMBER_TABLE();
211: a1 := JTF_NUMBER_TABLE();
212: if t.count > 0 then
213: a0.extend(t.count);
214: a1.extend(t.count);
207: a0 := JTF_NUMBER_TABLE();
208: a1 := JTF_NUMBER_TABLE();
209: else
210: a0 := JTF_NUMBER_TABLE();
211: a1 := JTF_NUMBER_TABLE();
212: if t.count > 0 then
213: a0.extend(t.count);
214: a1.extend(t.count);
215: ddindx := t.first;