18: if n=b then return a; end if;
19: return n;
20: end;
21:
22: procedure rosetta_table_copy_in_p1(t out nocopy okl_inv_format_delete_pvt.inf_del_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_VARCHAR2_TABLE_200
25: , a3 JTF_VARCHAR2_TABLE_2000
26: , a4 JTF_VARCHAR2_TABLE_100
19: return n;
20: end;
21:
22: procedure rosetta_table_copy_in_p1(t out nocopy okl_inv_format_delete_pvt.inf_del_tbl_type, a0 JTF_NUMBER_TABLE
23: , a1 JTF_NUMBER_TABLE
24: , a2 JTF_VARCHAR2_TABLE_200
25: , a3 JTF_VARCHAR2_TABLE_2000
26: , a4 JTF_VARCHAR2_TABLE_100
27: , a5 JTF_DATE_TABLE
49: end loop;
50: end if;
51: end if;
52: end rosetta_table_copy_in_p1;
53: procedure rosetta_table_copy_out_p1(t okl_inv_format_delete_pvt.inf_del_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
54: , a1 out nocopy JTF_NUMBER_TABLE
55: , a2 out nocopy JTF_VARCHAR2_TABLE_200
56: , a3 out nocopy JTF_VARCHAR2_TABLE_2000
57: , a4 out nocopy JTF_VARCHAR2_TABLE_100
50: end if;
51: end if;
52: end rosetta_table_copy_in_p1;
53: procedure rosetta_table_copy_out_p1(t okl_inv_format_delete_pvt.inf_del_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
54: , a1 out nocopy JTF_NUMBER_TABLE
55: , a2 out nocopy JTF_VARCHAR2_TABLE_200
56: , a3 out nocopy JTF_VARCHAR2_TABLE_2000
57: , a4 out nocopy JTF_VARCHAR2_TABLE_100
58: , a5 out nocopy JTF_DATE_TABLE
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_VARCHAR2_TABLE_200();
67: a3 := JTF_VARCHAR2_TABLE_2000();
68: a4 := JTF_VARCHAR2_TABLE_100();
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_VARCHAR2_TABLE_200();
67: a3 := JTF_VARCHAR2_TABLE_2000();
68: a4 := JTF_VARCHAR2_TABLE_100();
69: a5 := JTF_DATE_TABLE();
68: a4 := JTF_VARCHAR2_TABLE_100();
69: a5 := JTF_DATE_TABLE();
70: a6 := JTF_DATE_TABLE();
71: else
72: a0 := JTF_NUMBER_TABLE();
73: a1 := JTF_NUMBER_TABLE();
74: a2 := JTF_VARCHAR2_TABLE_200();
75: a3 := JTF_VARCHAR2_TABLE_2000();
76: a4 := JTF_VARCHAR2_TABLE_100();
69: a5 := JTF_DATE_TABLE();
70: a6 := JTF_DATE_TABLE();
71: else
72: a0 := JTF_NUMBER_TABLE();
73: a1 := JTF_NUMBER_TABLE();
74: a2 := JTF_VARCHAR2_TABLE_200();
75: a3 := JTF_VARCHAR2_TABLE_2000();
76: a4 := JTF_VARCHAR2_TABLE_100();
77: a5 := JTF_DATE_TABLE();
157: , p_init_msg_list VARCHAR2
158: , x_return_status out nocopy VARCHAR2
159: , x_msg_count out nocopy NUMBER
160: , x_msg_data out nocopy VARCHAR2
161: , p5_a0 JTF_NUMBER_TABLE
162: , p5_a1 JTF_NUMBER_TABLE
163: , p5_a2 JTF_VARCHAR2_TABLE_200
164: , p5_a3 JTF_VARCHAR2_TABLE_2000
165: , p5_a4 JTF_VARCHAR2_TABLE_100
158: , x_return_status out nocopy VARCHAR2
159: , x_msg_count out nocopy NUMBER
160: , x_msg_data out nocopy VARCHAR2
161: , p5_a0 JTF_NUMBER_TABLE
162: , p5_a1 JTF_NUMBER_TABLE
163: , p5_a2 JTF_VARCHAR2_TABLE_200
164: , p5_a3 JTF_VARCHAR2_TABLE_2000
165: , p5_a4 JTF_VARCHAR2_TABLE_100
166: , p5_a5 JTF_DATE_TABLE