75: end if;
76: end if;
77: end rosetta_table_copy_out_p23;
78:
79: procedure rosetta_table_copy_in_p25(t out nocopy okl_execute_formula_pvt.ctxt_val_tbl_type, a0 JTF_VARCHAR2_TABLE_200
80: , a1 JTF_VARCHAR2_TABLE_300
81: ) as
82: ddindx binary_integer; indx binary_integer;
83: begin
96: end loop;
97: end if;
98: end if;
99: end rosetta_table_copy_in_p25;
100: procedure rosetta_table_copy_out_p25(t okl_execute_formula_pvt.ctxt_val_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_200
101: , a1 out nocopy JTF_VARCHAR2_TABLE_300
102: ) as
103: ddindx binary_integer; indx binary_integer;
104: begin
102: ) as
103: ddindx binary_integer; indx binary_integer;
104: begin
105: if t is null or t.count = 0 then
106: a0 := JTF_VARCHAR2_TABLE_200();
107: a1 := JTF_VARCHAR2_TABLE_300();
108: else
109: a0 := JTF_VARCHAR2_TABLE_200();
110: a1 := JTF_VARCHAR2_TABLE_300();
105: if t is null or t.count = 0 then
106: a0 := JTF_VARCHAR2_TABLE_200();
107: a1 := JTF_VARCHAR2_TABLE_300();
108: else
109: a0 := JTF_VARCHAR2_TABLE_200();
110: a1 := JTF_VARCHAR2_TABLE_300();
111: if t.count > 0 then
112: a0.extend(t.count);
113: a1.extend(t.count);
133: , x_msg_data out nocopy VARCHAR2
134: , p_formula_name VARCHAR2
135: , p_contract_id NUMBER
136: , p_line_id NUMBER
137: , p8_a0 JTF_VARCHAR2_TABLE_200
138: , p8_a1 JTF_VARCHAR2_TABLE_300
139: , x_value out nocopy NUMBER
140: )
141:
189: , x_msg_data out nocopy VARCHAR2
190: , p_formula_name VARCHAR2
191: , p_contract_id NUMBER
192: , p_line_id NUMBER
193: , p8_a0 JTF_VARCHAR2_TABLE_200
194: , p8_a1 JTF_VARCHAR2_TABLE_300
195: , p9_a0 out nocopy JTF_NUMBER_TABLE
196: , p9_a1 out nocopy JTF_VARCHAR2_TABLE_800
197: , p9_a2 out nocopy JTF_VARCHAR2_TABLE_300