197: end if;
198: end rosetta_table_copy_out_p8;
199:
200: procedure rosetta_table_copy_in_p9(t out nocopy amv_stock_pvt.amv_news_varray_type, a0 JTF_VARCHAR2_TABLE_100
201: , a1 JTF_VARCHAR2_TABLE_2000
202: , a2 JTF_VARCHAR2_TABLE_2000
203: , a3 JTF_VARCHAR2_TABLE_300
204: , a4 JTF_DATE_TABLE
205: ) as
198: end rosetta_table_copy_out_p8;
199:
200: procedure rosetta_table_copy_in_p9(t out nocopy amv_stock_pvt.amv_news_varray_type, a0 JTF_VARCHAR2_TABLE_100
201: , a1 JTF_VARCHAR2_TABLE_2000
202: , a2 JTF_VARCHAR2_TABLE_2000
203: , a3 JTF_VARCHAR2_TABLE_300
204: , a4 JTF_DATE_TABLE
205: ) as
206: ddindx binary_integer; indx binary_integer;
224: end if;
225: end if;
226: end rosetta_table_copy_in_p9;
227: procedure rosetta_table_copy_out_p9(t amv_stock_pvt.amv_news_varray_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
228: , a1 out nocopy JTF_VARCHAR2_TABLE_2000
229: , a2 out nocopy JTF_VARCHAR2_TABLE_2000
230: , a3 out nocopy JTF_VARCHAR2_TABLE_300
231: , a4 out nocopy JTF_DATE_TABLE
232: ) as
225: end if;
226: end rosetta_table_copy_in_p9;
227: procedure rosetta_table_copy_out_p9(t amv_stock_pvt.amv_news_varray_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
228: , a1 out nocopy JTF_VARCHAR2_TABLE_2000
229: , a2 out nocopy JTF_VARCHAR2_TABLE_2000
230: , a3 out nocopy JTF_VARCHAR2_TABLE_300
231: , a4 out nocopy JTF_DATE_TABLE
232: ) as
233: ddindx binary_integer; indx binary_integer;
233: ddindx binary_integer; indx binary_integer;
234: begin
235: if t is null or t.count = 0 then
236: a0 := JTF_VARCHAR2_TABLE_100();
237: a1 := JTF_VARCHAR2_TABLE_2000();
238: a2 := JTF_VARCHAR2_TABLE_2000();
239: a3 := JTF_VARCHAR2_TABLE_300();
240: a4 := JTF_DATE_TABLE();
241: else
234: begin
235: if t is null or t.count = 0 then
236: a0 := JTF_VARCHAR2_TABLE_100();
237: a1 := JTF_VARCHAR2_TABLE_2000();
238: a2 := JTF_VARCHAR2_TABLE_2000();
239: a3 := JTF_VARCHAR2_TABLE_300();
240: a4 := JTF_DATE_TABLE();
241: else
242: a0 := JTF_VARCHAR2_TABLE_100();
239: a3 := JTF_VARCHAR2_TABLE_300();
240: a4 := JTF_DATE_TABLE();
241: else
242: a0 := JTF_VARCHAR2_TABLE_100();
243: a1 := JTF_VARCHAR2_TABLE_2000();
244: a2 := JTF_VARCHAR2_TABLE_2000();
245: a3 := JTF_VARCHAR2_TABLE_300();
246: a4 := JTF_DATE_TABLE();
247: if t.count > 0 then
240: a4 := JTF_DATE_TABLE();
241: else
242: a0 := JTF_VARCHAR2_TABLE_100();
243: a1 := JTF_VARCHAR2_TABLE_2000();
244: a2 := JTF_VARCHAR2_TABLE_2000();
245: a3 := JTF_VARCHAR2_TABLE_300();
246: a4 := JTF_DATE_TABLE();
247: if t.count > 0 then
248: a0.extend(t.count);
689: , x_msg_count out nocopy NUMBER
690: , x_msg_data out nocopy VARCHAR2
691: , p_stock_id NUMBER
692: , p8_a0 out nocopy JTF_VARCHAR2_TABLE_100
693: , p8_a1 out nocopy JTF_VARCHAR2_TABLE_2000
694: , p8_a2 out nocopy JTF_VARCHAR2_TABLE_2000
695: , p8_a3 out nocopy JTF_VARCHAR2_TABLE_300
696: , p8_a4 out nocopy JTF_DATE_TABLE
697: )
690: , x_msg_data out nocopy VARCHAR2
691: , p_stock_id NUMBER
692: , p8_a0 out nocopy JTF_VARCHAR2_TABLE_100
693: , p8_a1 out nocopy JTF_VARCHAR2_TABLE_2000
694: , p8_a2 out nocopy JTF_VARCHAR2_TABLE_2000
695: , p8_a3 out nocopy JTF_VARCHAR2_TABLE_300
696: , p8_a4 out nocopy JTF_DATE_TABLE
697: )
698: