21: if n=b then return a; end if;
22: return n;
23: end;
24:
25: procedure rosetta_table_copy_in_p23(t out nocopy okl_blk_ast_upd_pvt.okl_loc_tbl_type, a0 JTF_NUMBER_TABLE
26: , a1 JTF_NUMBER_TABLE
27: , a2 JTF_NUMBER_TABLE
28: , a3 JTF_NUMBER_TABLE
29: , a4 JTF_VARCHAR2_TABLE_100
22: return n;
23: end;
24:
25: procedure rosetta_table_copy_in_p23(t out nocopy okl_blk_ast_upd_pvt.okl_loc_tbl_type, a0 JTF_NUMBER_TABLE
26: , a1 JTF_NUMBER_TABLE
27: , a2 JTF_NUMBER_TABLE
28: , a3 JTF_NUMBER_TABLE
29: , a4 JTF_VARCHAR2_TABLE_100
30: , a5 JTF_NUMBER_TABLE
23: end;
24:
25: procedure rosetta_table_copy_in_p23(t out nocopy okl_blk_ast_upd_pvt.okl_loc_tbl_type, a0 JTF_NUMBER_TABLE
26: , a1 JTF_NUMBER_TABLE
27: , a2 JTF_NUMBER_TABLE
28: , a3 JTF_NUMBER_TABLE
29: , a4 JTF_VARCHAR2_TABLE_100
30: , a5 JTF_NUMBER_TABLE
31: , a6 JTF_VARCHAR2_TABLE_100
24:
25: procedure rosetta_table_copy_in_p23(t out nocopy okl_blk_ast_upd_pvt.okl_loc_tbl_type, a0 JTF_NUMBER_TABLE
26: , a1 JTF_NUMBER_TABLE
27: , a2 JTF_NUMBER_TABLE
28: , a3 JTF_NUMBER_TABLE
29: , a4 JTF_VARCHAR2_TABLE_100
30: , a5 JTF_NUMBER_TABLE
31: , a6 JTF_VARCHAR2_TABLE_100
32: , a7 JTF_DATE_TABLE
26: , a1 JTF_NUMBER_TABLE
27: , a2 JTF_NUMBER_TABLE
28: , a3 JTF_NUMBER_TABLE
29: , a4 JTF_VARCHAR2_TABLE_100
30: , a5 JTF_NUMBER_TABLE
31: , a6 JTF_VARCHAR2_TABLE_100
32: , a7 JTF_DATE_TABLE
33: ) as
34: ddindx binary_integer; indx binary_integer;
54: end loop;
55: end if;
56: end if;
57: end rosetta_table_copy_in_p23;
58: procedure rosetta_table_copy_out_p23(t okl_blk_ast_upd_pvt.okl_loc_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
59: , a1 out nocopy JTF_NUMBER_TABLE
60: , a2 out nocopy JTF_NUMBER_TABLE
61: , a3 out nocopy JTF_NUMBER_TABLE
62: , a4 out nocopy JTF_VARCHAR2_TABLE_100
55: end if;
56: end if;
57: end rosetta_table_copy_in_p23;
58: procedure rosetta_table_copy_out_p23(t okl_blk_ast_upd_pvt.okl_loc_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
59: , a1 out nocopy JTF_NUMBER_TABLE
60: , a2 out nocopy JTF_NUMBER_TABLE
61: , a3 out nocopy JTF_NUMBER_TABLE
62: , a4 out nocopy JTF_VARCHAR2_TABLE_100
63: , a5 out nocopy JTF_NUMBER_TABLE
56: end if;
57: end rosetta_table_copy_in_p23;
58: procedure rosetta_table_copy_out_p23(t okl_blk_ast_upd_pvt.okl_loc_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
59: , a1 out nocopy JTF_NUMBER_TABLE
60: , a2 out nocopy JTF_NUMBER_TABLE
61: , a3 out nocopy JTF_NUMBER_TABLE
62: , a4 out nocopy JTF_VARCHAR2_TABLE_100
63: , a5 out nocopy JTF_NUMBER_TABLE
64: , a6 out nocopy JTF_VARCHAR2_TABLE_100
57: end rosetta_table_copy_in_p23;
58: procedure rosetta_table_copy_out_p23(t okl_blk_ast_upd_pvt.okl_loc_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
59: , a1 out nocopy JTF_NUMBER_TABLE
60: , a2 out nocopy JTF_NUMBER_TABLE
61: , a3 out nocopy JTF_NUMBER_TABLE
62: , a4 out nocopy JTF_VARCHAR2_TABLE_100
63: , a5 out nocopy JTF_NUMBER_TABLE
64: , a6 out nocopy JTF_VARCHAR2_TABLE_100
65: , a7 out nocopy JTF_DATE_TABLE
59: , a1 out nocopy JTF_NUMBER_TABLE
60: , a2 out nocopy JTF_NUMBER_TABLE
61: , a3 out nocopy JTF_NUMBER_TABLE
62: , a4 out nocopy JTF_VARCHAR2_TABLE_100
63: , a5 out nocopy JTF_NUMBER_TABLE
64: , a6 out nocopy JTF_VARCHAR2_TABLE_100
65: , a7 out nocopy JTF_DATE_TABLE
66: ) as
67: ddindx binary_integer; indx binary_integer;
66: ) as
67: ddindx binary_integer; indx binary_integer;
68: begin
69: if t is null or t.count = 0 then
70: a0 := JTF_NUMBER_TABLE();
71: a1 := JTF_NUMBER_TABLE();
72: a2 := JTF_NUMBER_TABLE();
73: a3 := JTF_NUMBER_TABLE();
74: a4 := JTF_VARCHAR2_TABLE_100();
67: ddindx binary_integer; indx binary_integer;
68: begin
69: if t is null or t.count = 0 then
70: a0 := JTF_NUMBER_TABLE();
71: a1 := JTF_NUMBER_TABLE();
72: a2 := JTF_NUMBER_TABLE();
73: a3 := JTF_NUMBER_TABLE();
74: a4 := JTF_VARCHAR2_TABLE_100();
75: a5 := JTF_NUMBER_TABLE();
68: begin
69: if t is null or t.count = 0 then
70: a0 := JTF_NUMBER_TABLE();
71: a1 := JTF_NUMBER_TABLE();
72: a2 := JTF_NUMBER_TABLE();
73: a3 := JTF_NUMBER_TABLE();
74: a4 := JTF_VARCHAR2_TABLE_100();
75: a5 := JTF_NUMBER_TABLE();
76: a6 := JTF_VARCHAR2_TABLE_100();
69: if t is null or t.count = 0 then
70: a0 := JTF_NUMBER_TABLE();
71: a1 := JTF_NUMBER_TABLE();
72: a2 := JTF_NUMBER_TABLE();
73: a3 := JTF_NUMBER_TABLE();
74: a4 := JTF_VARCHAR2_TABLE_100();
75: a5 := JTF_NUMBER_TABLE();
76: a6 := JTF_VARCHAR2_TABLE_100();
77: a7 := JTF_DATE_TABLE();
71: a1 := JTF_NUMBER_TABLE();
72: a2 := JTF_NUMBER_TABLE();
73: a3 := JTF_NUMBER_TABLE();
74: a4 := JTF_VARCHAR2_TABLE_100();
75: a5 := JTF_NUMBER_TABLE();
76: a6 := JTF_VARCHAR2_TABLE_100();
77: a7 := JTF_DATE_TABLE();
78: else
79: a0 := JTF_NUMBER_TABLE();
75: a5 := JTF_NUMBER_TABLE();
76: a6 := JTF_VARCHAR2_TABLE_100();
77: a7 := JTF_DATE_TABLE();
78: else
79: a0 := JTF_NUMBER_TABLE();
80: a1 := JTF_NUMBER_TABLE();
81: a2 := JTF_NUMBER_TABLE();
82: a3 := JTF_NUMBER_TABLE();
83: a4 := JTF_VARCHAR2_TABLE_100();
76: a6 := JTF_VARCHAR2_TABLE_100();
77: a7 := JTF_DATE_TABLE();
78: else
79: a0 := JTF_NUMBER_TABLE();
80: a1 := JTF_NUMBER_TABLE();
81: a2 := JTF_NUMBER_TABLE();
82: a3 := JTF_NUMBER_TABLE();
83: a4 := JTF_VARCHAR2_TABLE_100();
84: a5 := JTF_NUMBER_TABLE();
77: a7 := JTF_DATE_TABLE();
78: else
79: a0 := JTF_NUMBER_TABLE();
80: a1 := JTF_NUMBER_TABLE();
81: a2 := JTF_NUMBER_TABLE();
82: a3 := JTF_NUMBER_TABLE();
83: a4 := JTF_VARCHAR2_TABLE_100();
84: a5 := JTF_NUMBER_TABLE();
85: a6 := JTF_VARCHAR2_TABLE_100();
78: else
79: a0 := JTF_NUMBER_TABLE();
80: a1 := JTF_NUMBER_TABLE();
81: a2 := JTF_NUMBER_TABLE();
82: a3 := JTF_NUMBER_TABLE();
83: a4 := JTF_VARCHAR2_TABLE_100();
84: a5 := JTF_NUMBER_TABLE();
85: a6 := JTF_VARCHAR2_TABLE_100();
86: a7 := JTF_DATE_TABLE();
80: a1 := JTF_NUMBER_TABLE();
81: a2 := JTF_NUMBER_TABLE();
82: a3 := JTF_NUMBER_TABLE();
83: a4 := JTF_VARCHAR2_TABLE_100();
84: a5 := JTF_NUMBER_TABLE();
85: a6 := JTF_VARCHAR2_TABLE_100();
86: a7 := JTF_DATE_TABLE();
87: if t.count > 0 then
88: a0.extend(t.count);
166: end;
167:
168: procedure update_location(p_api_version NUMBER
169: , p_init_msg_list VARCHAR2
170: , p2_a0 JTF_NUMBER_TABLE
171: , p2_a1 JTF_NUMBER_TABLE
172: , p2_a2 JTF_NUMBER_TABLE
173: , p2_a3 JTF_NUMBER_TABLE
174: , p2_a4 JTF_VARCHAR2_TABLE_100
167:
168: procedure update_location(p_api_version NUMBER
169: , p_init_msg_list VARCHAR2
170: , p2_a0 JTF_NUMBER_TABLE
171: , p2_a1 JTF_NUMBER_TABLE
172: , p2_a2 JTF_NUMBER_TABLE
173: , p2_a3 JTF_NUMBER_TABLE
174: , p2_a4 JTF_VARCHAR2_TABLE_100
175: , p2_a5 JTF_NUMBER_TABLE
168: procedure update_location(p_api_version NUMBER
169: , p_init_msg_list VARCHAR2
170: , p2_a0 JTF_NUMBER_TABLE
171: , p2_a1 JTF_NUMBER_TABLE
172: , p2_a2 JTF_NUMBER_TABLE
173: , p2_a3 JTF_NUMBER_TABLE
174: , p2_a4 JTF_VARCHAR2_TABLE_100
175: , p2_a5 JTF_NUMBER_TABLE
176: , p2_a6 JTF_VARCHAR2_TABLE_100
169: , p_init_msg_list VARCHAR2
170: , p2_a0 JTF_NUMBER_TABLE
171: , p2_a1 JTF_NUMBER_TABLE
172: , p2_a2 JTF_NUMBER_TABLE
173: , p2_a3 JTF_NUMBER_TABLE
174: , p2_a4 JTF_VARCHAR2_TABLE_100
175: , p2_a5 JTF_NUMBER_TABLE
176: , p2_a6 JTF_VARCHAR2_TABLE_100
177: , p2_a7 JTF_DATE_TABLE
171: , p2_a1 JTF_NUMBER_TABLE
172: , p2_a2 JTF_NUMBER_TABLE
173: , p2_a3 JTF_NUMBER_TABLE
174: , p2_a4 JTF_VARCHAR2_TABLE_100
175: , p2_a5 JTF_NUMBER_TABLE
176: , p2_a6 JTF_VARCHAR2_TABLE_100
177: , p2_a7 JTF_DATE_TABLE
178: , x_return_status out nocopy VARCHAR2
179: , x_msg_count out nocopy NUMBER