9: if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10: return d;
11: end;
12:
13: procedure rosetta_table_copy_in_p1(t out nocopy ahl_fmp_progtype_subtype_pvt.p_x_prog_type_subtype_tbl, a0 JTF_NUMBER_TABLE
14: , a1 JTF_NUMBER_TABLE
15: , a2 JTF_VARCHAR2_TABLE_100
16: , a3 JTF_VARCHAR2_TABLE_100
17: , a4 JTF_VARCHAR2_TABLE_100
10: return d;
11: end;
12:
13: procedure rosetta_table_copy_in_p1(t out nocopy ahl_fmp_progtype_subtype_pvt.p_x_prog_type_subtype_tbl, a0 JTF_NUMBER_TABLE
14: , a1 JTF_NUMBER_TABLE
15: , a2 JTF_VARCHAR2_TABLE_100
16: , a3 JTF_VARCHAR2_TABLE_100
17: , a4 JTF_VARCHAR2_TABLE_100
18: , a5 JTF_VARCHAR2_TABLE_100
72: end loop;
73: end if;
74: end if;
75: end rosetta_table_copy_in_p1;
76: procedure rosetta_table_copy_out_p1(t ahl_fmp_progtype_subtype_pvt.p_x_prog_type_subtype_tbl, a0 out nocopy JTF_NUMBER_TABLE
77: , a1 out nocopy JTF_NUMBER_TABLE
78: , a2 out nocopy JTF_VARCHAR2_TABLE_100
79: , a3 out nocopy JTF_VARCHAR2_TABLE_100
80: , a4 out nocopy JTF_VARCHAR2_TABLE_100
73: end if;
74: end if;
75: end rosetta_table_copy_in_p1;
76: procedure rosetta_table_copy_out_p1(t ahl_fmp_progtype_subtype_pvt.p_x_prog_type_subtype_tbl, a0 out nocopy JTF_NUMBER_TABLE
77: , a1 out nocopy JTF_NUMBER_TABLE
78: , a2 out nocopy JTF_VARCHAR2_TABLE_100
79: , a3 out nocopy JTF_VARCHAR2_TABLE_100
80: , a4 out nocopy JTF_VARCHAR2_TABLE_100
81: , a5 out nocopy JTF_VARCHAR2_TABLE_100
99: ) as
100: ddindx binary_integer; indx binary_integer;
101: begin
102: if t is null or t.count = 0 then
103: a0 := JTF_NUMBER_TABLE();
104: a1 := JTF_NUMBER_TABLE();
105: a2 := JTF_VARCHAR2_TABLE_100();
106: a3 := JTF_VARCHAR2_TABLE_100();
107: a4 := JTF_VARCHAR2_TABLE_100();
100: ddindx binary_integer; indx binary_integer;
101: begin
102: if t is null or t.count = 0 then
103: a0 := JTF_NUMBER_TABLE();
104: a1 := JTF_NUMBER_TABLE();
105: a2 := JTF_VARCHAR2_TABLE_100();
106: a3 := JTF_VARCHAR2_TABLE_100();
107: a4 := JTF_VARCHAR2_TABLE_100();
108: a5 := JTF_VARCHAR2_TABLE_100();
123: a20 := JTF_VARCHAR2_TABLE_200();
124: a21 := JTF_VARCHAR2_TABLE_200();
125: a22 := JTF_VARCHAR2_TABLE_100();
126: else
127: a0 := JTF_NUMBER_TABLE();
128: a1 := JTF_NUMBER_TABLE();
129: a2 := JTF_VARCHAR2_TABLE_100();
130: a3 := JTF_VARCHAR2_TABLE_100();
131: a4 := JTF_VARCHAR2_TABLE_100();
124: a21 := JTF_VARCHAR2_TABLE_200();
125: a22 := JTF_VARCHAR2_TABLE_100();
126: else
127: a0 := JTF_NUMBER_TABLE();
128: a1 := JTF_NUMBER_TABLE();
129: a2 := JTF_VARCHAR2_TABLE_100();
130: a3 := JTF_VARCHAR2_TABLE_100();
131: a4 := JTF_VARCHAR2_TABLE_100();
132: a5 := JTF_VARCHAR2_TABLE_100();
215: , p_module_type VARCHAR2
216: , x_return_status out nocopy VARCHAR2
217: , x_msg_count out nocopy NUMBER
218: , x_msg_data out nocopy VARCHAR2
219: , p9_a0 in out nocopy JTF_NUMBER_TABLE
220: , p9_a1 in out nocopy JTF_NUMBER_TABLE
221: , p9_a2 in out nocopy JTF_VARCHAR2_TABLE_100
222: , p9_a3 in out nocopy JTF_VARCHAR2_TABLE_100
223: , p9_a4 in out nocopy JTF_VARCHAR2_TABLE_100
216: , x_return_status out nocopy VARCHAR2
217: , x_msg_count out nocopy NUMBER
218: , x_msg_data out nocopy VARCHAR2
219: , p9_a0 in out nocopy JTF_NUMBER_TABLE
220: , p9_a1 in out nocopy JTF_NUMBER_TABLE
221: , p9_a2 in out nocopy JTF_VARCHAR2_TABLE_100
222: , p9_a3 in out nocopy JTF_VARCHAR2_TABLE_100
223: , p9_a4 in out nocopy JTF_VARCHAR2_TABLE_100
224: , p9_a5 in out nocopy JTF_VARCHAR2_TABLE_100