12: if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13: return d;
14: end;
15:
16: procedure rosetta_table_copy_in_p4(t out nocopy jtf_task_wf_util.nlist_tbl_type, a0 JTF_VARCHAR2_TABLE_400
17: , a1 JTF_VARCHAR2_TABLE_400
18: , a2 JTF_VARCHAR2_TABLE_400
19: ) as
20: ddindx binary_integer; indx binary_integer;
13: return d;
14: end;
15:
16: procedure rosetta_table_copy_in_p4(t out nocopy jtf_task_wf_util.nlist_tbl_type, a0 JTF_VARCHAR2_TABLE_400
17: , a1 JTF_VARCHAR2_TABLE_400
18: , a2 JTF_VARCHAR2_TABLE_400
19: ) as
20: ddindx binary_integer; indx binary_integer;
21: begin
14: end;
15:
16: procedure rosetta_table_copy_in_p4(t out nocopy jtf_task_wf_util.nlist_tbl_type, a0 JTF_VARCHAR2_TABLE_400
17: , a1 JTF_VARCHAR2_TABLE_400
18: , a2 JTF_VARCHAR2_TABLE_400
19: ) as
20: ddindx binary_integer; indx binary_integer;
21: begin
22: if a0 is not null and a0.count > 0 then
35: end loop;
36: end if;
37: end if;
38: end rosetta_table_copy_in_p4;
39: procedure rosetta_table_copy_out_p4(t jtf_task_wf_util.nlist_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_400
40: , a1 out nocopy JTF_VARCHAR2_TABLE_400
41: , a2 out nocopy JTF_VARCHAR2_TABLE_400
42: ) as
43: ddindx binary_integer; indx binary_integer;
36: end if;
37: end if;
38: end rosetta_table_copy_in_p4;
39: procedure rosetta_table_copy_out_p4(t jtf_task_wf_util.nlist_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_400
40: , a1 out nocopy JTF_VARCHAR2_TABLE_400
41: , a2 out nocopy JTF_VARCHAR2_TABLE_400
42: ) as
43: ddindx binary_integer; indx binary_integer;
44: begin
37: end if;
38: end rosetta_table_copy_in_p4;
39: procedure rosetta_table_copy_out_p4(t jtf_task_wf_util.nlist_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_400
40: , a1 out nocopy JTF_VARCHAR2_TABLE_400
41: , a2 out nocopy JTF_VARCHAR2_TABLE_400
42: ) as
43: ddindx binary_integer; indx binary_integer;
44: begin
45: if t is null or t.count = 0 then
42: ) as
43: ddindx binary_integer; indx binary_integer;
44: begin
45: if t is null or t.count = 0 then
46: a0 := JTF_VARCHAR2_TABLE_400();
47: a1 := JTF_VARCHAR2_TABLE_400();
48: a2 := JTF_VARCHAR2_TABLE_400();
49: else
50: a0 := JTF_VARCHAR2_TABLE_400();
43: ddindx binary_integer; indx binary_integer;
44: begin
45: if t is null or t.count = 0 then
46: a0 := JTF_VARCHAR2_TABLE_400();
47: a1 := JTF_VARCHAR2_TABLE_400();
48: a2 := JTF_VARCHAR2_TABLE_400();
49: else
50: a0 := JTF_VARCHAR2_TABLE_400();
51: a1 := JTF_VARCHAR2_TABLE_400();
44: begin
45: if t is null or t.count = 0 then
46: a0 := JTF_VARCHAR2_TABLE_400();
47: a1 := JTF_VARCHAR2_TABLE_400();
48: a2 := JTF_VARCHAR2_TABLE_400();
49: else
50: a0 := JTF_VARCHAR2_TABLE_400();
51: a1 := JTF_VARCHAR2_TABLE_400();
52: a2 := JTF_VARCHAR2_TABLE_400();
46: a0 := JTF_VARCHAR2_TABLE_400();
47: a1 := JTF_VARCHAR2_TABLE_400();
48: a2 := JTF_VARCHAR2_TABLE_400();
49: else
50: a0 := JTF_VARCHAR2_TABLE_400();
51: a1 := JTF_VARCHAR2_TABLE_400();
52: a2 := JTF_VARCHAR2_TABLE_400();
53: if t.count > 0 then
54: a0.extend(t.count);
47: a1 := JTF_VARCHAR2_TABLE_400();
48: a2 := JTF_VARCHAR2_TABLE_400();
49: else
50: a0 := JTF_VARCHAR2_TABLE_400();
51: a1 := JTF_VARCHAR2_TABLE_400();
52: a2 := JTF_VARCHAR2_TABLE_400();
53: if t.count > 0 then
54: a0.extend(t.count);
55: a1.extend(t.count);
48: a2 := JTF_VARCHAR2_TABLE_400();
49: else
50: a0 := JTF_VARCHAR2_TABLE_400();
51: a1 := JTF_VARCHAR2_TABLE_400();
52: a2 := JTF_VARCHAR2_TABLE_400();
53: if t.count > 0 then
54: a0.extend(t.count);
55: a1.extend(t.count);
56: a2.extend(t.count);