1: package body eam_copy_bom_pkg_w as
2: /* $Header: EAMCPMRB.pls 120.2 2008/01/26 01:52:22 devijay ship $ */
3: procedure rosetta_table_copy_in_p2(t out nocopy eam_copy_bom_pkg.t_bom_table, a0 JTF_NUMBER_TABLE
4: , a1 JTF_VARCHAR2_TABLE_300
5: , a2 JTF_NUMBER_TABLE
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
1: package body eam_copy_bom_pkg_w as
2: /* $Header: EAMCPMRB.pls 120.2 2008/01/26 01:52:22 devijay ship $ */
3: procedure rosetta_table_copy_in_p2(t out nocopy eam_copy_bom_pkg.t_bom_table, a0 JTF_NUMBER_TABLE
4: , a1 JTF_VARCHAR2_TABLE_300
5: , a2 JTF_NUMBER_TABLE
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
8: ) as
9: ddindx binary_integer; indx binary_integer;
3: procedure rosetta_table_copy_in_p2(t out nocopy eam_copy_bom_pkg.t_bom_table, a0 JTF_NUMBER_TABLE
4: , a1 JTF_VARCHAR2_TABLE_300
5: , a2 JTF_NUMBER_TABLE
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
8: ) as
9: ddindx binary_integer; indx binary_integer;
10: begin
11: if a0 is not null and a0.count > 0 then
26: end loop;
27: end if;
28: end if;
29: end rosetta_table_copy_in_p2;
30: procedure rosetta_table_copy_out_p2(t eam_copy_bom_pkg.t_bom_table, a0 out nocopy JTF_NUMBER_TABLE
31: , a1 out nocopy JTF_VARCHAR2_TABLE_300
32: , a2 out nocopy JTF_NUMBER_TABLE
33: , a3 out nocopy JTF_VARCHAR2_TABLE_100
34: , a4 out nocopy JTF_NUMBER_TABLE
28: end if;
29: end rosetta_table_copy_in_p2;
30: procedure rosetta_table_copy_out_p2(t eam_copy_bom_pkg.t_bom_table, a0 out nocopy JTF_NUMBER_TABLE
31: , a1 out nocopy JTF_VARCHAR2_TABLE_300
32: , a2 out nocopy JTF_NUMBER_TABLE
33: , a3 out nocopy JTF_VARCHAR2_TABLE_100
34: , a4 out nocopy JTF_NUMBER_TABLE
35: ) as
36: ddindx binary_integer; indx binary_integer;
30: procedure rosetta_table_copy_out_p2(t eam_copy_bom_pkg.t_bom_table, a0 out nocopy JTF_NUMBER_TABLE
31: , a1 out nocopy JTF_VARCHAR2_TABLE_300
32: , a2 out nocopy JTF_NUMBER_TABLE
33: , a3 out nocopy JTF_VARCHAR2_TABLE_100
34: , a4 out nocopy JTF_NUMBER_TABLE
35: ) as
36: ddindx binary_integer; indx binary_integer;
37: begin
38: if t is null or t.count = 0 then
35: ) as
36: ddindx binary_integer; indx binary_integer;
37: begin
38: if t is null or t.count = 0 then
39: a0 := JTF_NUMBER_TABLE();
40: a1 := JTF_VARCHAR2_TABLE_300();
41: a2 := JTF_NUMBER_TABLE();
42: a3 := JTF_VARCHAR2_TABLE_100();
43: a4 := JTF_NUMBER_TABLE();
37: begin
38: if t is null or t.count = 0 then
39: a0 := JTF_NUMBER_TABLE();
40: a1 := JTF_VARCHAR2_TABLE_300();
41: a2 := JTF_NUMBER_TABLE();
42: a3 := JTF_VARCHAR2_TABLE_100();
43: a4 := JTF_NUMBER_TABLE();
44: else
45: a0 := JTF_NUMBER_TABLE();
39: a0 := JTF_NUMBER_TABLE();
40: a1 := JTF_VARCHAR2_TABLE_300();
41: a2 := JTF_NUMBER_TABLE();
42: a3 := JTF_VARCHAR2_TABLE_100();
43: a4 := JTF_NUMBER_TABLE();
44: else
45: a0 := JTF_NUMBER_TABLE();
46: a1 := JTF_VARCHAR2_TABLE_300();
47: a2 := JTF_NUMBER_TABLE();
41: a2 := JTF_NUMBER_TABLE();
42: a3 := JTF_VARCHAR2_TABLE_100();
43: a4 := JTF_NUMBER_TABLE();
44: else
45: a0 := JTF_NUMBER_TABLE();
46: a1 := JTF_VARCHAR2_TABLE_300();
47: a2 := JTF_NUMBER_TABLE();
48: a3 := JTF_VARCHAR2_TABLE_100();
49: a4 := JTF_NUMBER_TABLE();
43: a4 := JTF_NUMBER_TABLE();
44: else
45: a0 := JTF_NUMBER_TABLE();
46: a1 := JTF_VARCHAR2_TABLE_300();
47: a2 := JTF_NUMBER_TABLE();
48: a3 := JTF_VARCHAR2_TABLE_100();
49: a4 := JTF_NUMBER_TABLE();
50: if t.count > 0 then
51: a0.extend(t.count);
45: a0 := JTF_NUMBER_TABLE();
46: a1 := JTF_VARCHAR2_TABLE_300();
47: a2 := JTF_NUMBER_TABLE();
48: a3 := JTF_VARCHAR2_TABLE_100();
49: a4 := JTF_NUMBER_TABLE();
50: if t.count > 0 then
51: a0.extend(t.count);
52: a1.extend(t.count);
53: a2.extend(t.count);
71: end if;
72: end rosetta_table_copy_out_p2;
73:
74: procedure rosetta_table_copy_in_p3(t out nocopy eam_copy_bom_pkg.t_component_table, a0 JTF_VARCHAR2_TABLE_100
75: , a1 JTF_NUMBER_TABLE
76: , a2 JTF_NUMBER_TABLE
77: , a3 JTF_NUMBER_TABLE
78: , a4 JTF_NUMBER_TABLE
79: , a5 JTF_VARCHAR2_TABLE_100
72: end rosetta_table_copy_out_p2;
73:
74: procedure rosetta_table_copy_in_p3(t out nocopy eam_copy_bom_pkg.t_component_table, a0 JTF_VARCHAR2_TABLE_100
75: , a1 JTF_NUMBER_TABLE
76: , a2 JTF_NUMBER_TABLE
77: , a3 JTF_NUMBER_TABLE
78: , a4 JTF_NUMBER_TABLE
79: , a5 JTF_VARCHAR2_TABLE_100
80: , a6 JTF_NUMBER_TABLE
73:
74: procedure rosetta_table_copy_in_p3(t out nocopy eam_copy_bom_pkg.t_component_table, a0 JTF_VARCHAR2_TABLE_100
75: , a1 JTF_NUMBER_TABLE
76: , a2 JTF_NUMBER_TABLE
77: , a3 JTF_NUMBER_TABLE
78: , a4 JTF_NUMBER_TABLE
79: , a5 JTF_VARCHAR2_TABLE_100
80: , a6 JTF_NUMBER_TABLE
81: , a7 JTF_VARCHAR2_TABLE_100
74: procedure rosetta_table_copy_in_p3(t out nocopy eam_copy_bom_pkg.t_component_table, a0 JTF_VARCHAR2_TABLE_100
75: , a1 JTF_NUMBER_TABLE
76: , a2 JTF_NUMBER_TABLE
77: , a3 JTF_NUMBER_TABLE
78: , a4 JTF_NUMBER_TABLE
79: , a5 JTF_VARCHAR2_TABLE_100
80: , a6 JTF_NUMBER_TABLE
81: , a7 JTF_VARCHAR2_TABLE_100
82: ) as
76: , a2 JTF_NUMBER_TABLE
77: , a3 JTF_NUMBER_TABLE
78: , a4 JTF_NUMBER_TABLE
79: , a5 JTF_VARCHAR2_TABLE_100
80: , a6 JTF_NUMBER_TABLE
81: , a7 JTF_VARCHAR2_TABLE_100
82: ) as
83: ddindx binary_integer; indx binary_integer;
84: begin
104: end if;
105: end if;
106: end rosetta_table_copy_in_p3;
107: procedure rosetta_table_copy_out_p3(t eam_copy_bom_pkg.t_component_table, a0 out nocopy JTF_VARCHAR2_TABLE_100
108: , a1 out nocopy JTF_NUMBER_TABLE
109: , a2 out nocopy JTF_NUMBER_TABLE
110: , a3 out nocopy JTF_NUMBER_TABLE
111: , a4 out nocopy JTF_NUMBER_TABLE
112: , a5 out nocopy JTF_VARCHAR2_TABLE_100
105: end if;
106: end rosetta_table_copy_in_p3;
107: procedure rosetta_table_copy_out_p3(t eam_copy_bom_pkg.t_component_table, a0 out nocopy JTF_VARCHAR2_TABLE_100
108: , a1 out nocopy JTF_NUMBER_TABLE
109: , a2 out nocopy JTF_NUMBER_TABLE
110: , a3 out nocopy JTF_NUMBER_TABLE
111: , a4 out nocopy JTF_NUMBER_TABLE
112: , a5 out nocopy JTF_VARCHAR2_TABLE_100
113: , a6 out nocopy JTF_NUMBER_TABLE
106: end rosetta_table_copy_in_p3;
107: procedure rosetta_table_copy_out_p3(t eam_copy_bom_pkg.t_component_table, a0 out nocopy JTF_VARCHAR2_TABLE_100
108: , a1 out nocopy JTF_NUMBER_TABLE
109: , a2 out nocopy JTF_NUMBER_TABLE
110: , a3 out nocopy JTF_NUMBER_TABLE
111: , a4 out nocopy JTF_NUMBER_TABLE
112: , a5 out nocopy JTF_VARCHAR2_TABLE_100
113: , a6 out nocopy JTF_NUMBER_TABLE
114: , a7 out nocopy JTF_VARCHAR2_TABLE_100
107: procedure rosetta_table_copy_out_p3(t eam_copy_bom_pkg.t_component_table, a0 out nocopy JTF_VARCHAR2_TABLE_100
108: , a1 out nocopy JTF_NUMBER_TABLE
109: , a2 out nocopy JTF_NUMBER_TABLE
110: , a3 out nocopy JTF_NUMBER_TABLE
111: , a4 out nocopy JTF_NUMBER_TABLE
112: , a5 out nocopy JTF_VARCHAR2_TABLE_100
113: , a6 out nocopy JTF_NUMBER_TABLE
114: , a7 out nocopy JTF_VARCHAR2_TABLE_100
115: ) as
109: , a2 out nocopy JTF_NUMBER_TABLE
110: , a3 out nocopy JTF_NUMBER_TABLE
111: , a4 out nocopy JTF_NUMBER_TABLE
112: , a5 out nocopy JTF_VARCHAR2_TABLE_100
113: , a6 out nocopy JTF_NUMBER_TABLE
114: , a7 out nocopy JTF_VARCHAR2_TABLE_100
115: ) as
116: ddindx binary_integer; indx binary_integer;
117: begin
116: ddindx binary_integer; indx binary_integer;
117: begin
118: if t is null or t.count = 0 then
119: a0 := JTF_VARCHAR2_TABLE_100();
120: a1 := JTF_NUMBER_TABLE();
121: a2 := JTF_NUMBER_TABLE();
122: a3 := JTF_NUMBER_TABLE();
123: a4 := JTF_NUMBER_TABLE();
124: a5 := JTF_VARCHAR2_TABLE_100();
117: begin
118: if t is null or t.count = 0 then
119: a0 := JTF_VARCHAR2_TABLE_100();
120: a1 := JTF_NUMBER_TABLE();
121: a2 := JTF_NUMBER_TABLE();
122: a3 := JTF_NUMBER_TABLE();
123: a4 := JTF_NUMBER_TABLE();
124: a5 := JTF_VARCHAR2_TABLE_100();
125: a6 := JTF_NUMBER_TABLE();
118: if t is null or t.count = 0 then
119: a0 := JTF_VARCHAR2_TABLE_100();
120: a1 := JTF_NUMBER_TABLE();
121: a2 := JTF_NUMBER_TABLE();
122: a3 := JTF_NUMBER_TABLE();
123: a4 := JTF_NUMBER_TABLE();
124: a5 := JTF_VARCHAR2_TABLE_100();
125: a6 := JTF_NUMBER_TABLE();
126: a7 := JTF_VARCHAR2_TABLE_100();
119: a0 := JTF_VARCHAR2_TABLE_100();
120: a1 := JTF_NUMBER_TABLE();
121: a2 := JTF_NUMBER_TABLE();
122: a3 := JTF_NUMBER_TABLE();
123: a4 := JTF_NUMBER_TABLE();
124: a5 := JTF_VARCHAR2_TABLE_100();
125: a6 := JTF_NUMBER_TABLE();
126: a7 := JTF_VARCHAR2_TABLE_100();
127: else
121: a2 := JTF_NUMBER_TABLE();
122: a3 := JTF_NUMBER_TABLE();
123: a4 := JTF_NUMBER_TABLE();
124: a5 := JTF_VARCHAR2_TABLE_100();
125: a6 := JTF_NUMBER_TABLE();
126: a7 := JTF_VARCHAR2_TABLE_100();
127: else
128: a0 := JTF_VARCHAR2_TABLE_100();
129: a1 := JTF_NUMBER_TABLE();
125: a6 := JTF_NUMBER_TABLE();
126: a7 := JTF_VARCHAR2_TABLE_100();
127: else
128: a0 := JTF_VARCHAR2_TABLE_100();
129: a1 := JTF_NUMBER_TABLE();
130: a2 := JTF_NUMBER_TABLE();
131: a3 := JTF_NUMBER_TABLE();
132: a4 := JTF_NUMBER_TABLE();
133: a5 := JTF_VARCHAR2_TABLE_100();
126: a7 := JTF_VARCHAR2_TABLE_100();
127: else
128: a0 := JTF_VARCHAR2_TABLE_100();
129: a1 := JTF_NUMBER_TABLE();
130: a2 := JTF_NUMBER_TABLE();
131: a3 := JTF_NUMBER_TABLE();
132: a4 := JTF_NUMBER_TABLE();
133: a5 := JTF_VARCHAR2_TABLE_100();
134: a6 := JTF_NUMBER_TABLE();
127: else
128: a0 := JTF_VARCHAR2_TABLE_100();
129: a1 := JTF_NUMBER_TABLE();
130: a2 := JTF_NUMBER_TABLE();
131: a3 := JTF_NUMBER_TABLE();
132: a4 := JTF_NUMBER_TABLE();
133: a5 := JTF_VARCHAR2_TABLE_100();
134: a6 := JTF_NUMBER_TABLE();
135: a7 := JTF_VARCHAR2_TABLE_100();
128: a0 := JTF_VARCHAR2_TABLE_100();
129: a1 := JTF_NUMBER_TABLE();
130: a2 := JTF_NUMBER_TABLE();
131: a3 := JTF_NUMBER_TABLE();
132: a4 := JTF_NUMBER_TABLE();
133: a5 := JTF_VARCHAR2_TABLE_100();
134: a6 := JTF_NUMBER_TABLE();
135: a7 := JTF_VARCHAR2_TABLE_100();
136: if t.count > 0 then
130: a2 := JTF_NUMBER_TABLE();
131: a3 := JTF_NUMBER_TABLE();
132: a4 := JTF_NUMBER_TABLE();
133: a5 := JTF_VARCHAR2_TABLE_100();
134: a6 := JTF_NUMBER_TABLE();
135: a7 := JTF_VARCHAR2_TABLE_100();
136: if t.count > 0 then
137: a0.extend(t.count);
138: a1.extend(t.count);
167: , p_organization_code VARCHAR2
168: , p_asset_number VARCHAR2
169: , p_asset_group_id NUMBER
170: , p4_a0 JTF_VARCHAR2_TABLE_100
171: , p4_a1 JTF_NUMBER_TABLE
172: , p4_a2 JTF_NUMBER_TABLE
173: , p4_a3 JTF_NUMBER_TABLE
174: , p4_a4 JTF_NUMBER_TABLE
175: , p4_a5 JTF_VARCHAR2_TABLE_100
168: , p_asset_number VARCHAR2
169: , p_asset_group_id NUMBER
170: , p4_a0 JTF_VARCHAR2_TABLE_100
171: , p4_a1 JTF_NUMBER_TABLE
172: , p4_a2 JTF_NUMBER_TABLE
173: , p4_a3 JTF_NUMBER_TABLE
174: , p4_a4 JTF_NUMBER_TABLE
175: , p4_a5 JTF_VARCHAR2_TABLE_100
176: , p4_a6 JTF_NUMBER_TABLE
169: , p_asset_group_id NUMBER
170: , p4_a0 JTF_VARCHAR2_TABLE_100
171: , p4_a1 JTF_NUMBER_TABLE
172: , p4_a2 JTF_NUMBER_TABLE
173: , p4_a3 JTF_NUMBER_TABLE
174: , p4_a4 JTF_NUMBER_TABLE
175: , p4_a5 JTF_VARCHAR2_TABLE_100
176: , p4_a6 JTF_NUMBER_TABLE
177: , p4_a7 JTF_VARCHAR2_TABLE_100
170: , p4_a0 JTF_VARCHAR2_TABLE_100
171: , p4_a1 JTF_NUMBER_TABLE
172: , p4_a2 JTF_NUMBER_TABLE
173: , p4_a3 JTF_NUMBER_TABLE
174: , p4_a4 JTF_NUMBER_TABLE
175: , p4_a5 JTF_VARCHAR2_TABLE_100
176: , p4_a6 JTF_NUMBER_TABLE
177: , p4_a7 JTF_VARCHAR2_TABLE_100
178: , x_error_code out nocopy NUMBER
172: , p4_a2 JTF_NUMBER_TABLE
173: , p4_a3 JTF_NUMBER_TABLE
174: , p4_a4 JTF_NUMBER_TABLE
175: , p4_a5 JTF_VARCHAR2_TABLE_100
176: , p4_a6 JTF_NUMBER_TABLE
177: , p4_a7 JTF_VARCHAR2_TABLE_100
178: , x_error_code out nocopy NUMBER
179: )
180:
218: procedure retrieve_asset_bom(p_organization_id NUMBER
219: , p_wip_entity_id NUMBER
220: , p_operation_seq_num NUMBER
221: , p_department_id NUMBER
222: , p4_a0 JTF_NUMBER_TABLE
223: , p4_a1 JTF_VARCHAR2_TABLE_300
224: , p4_a2 JTF_NUMBER_TABLE
225: , p4_a3 JTF_VARCHAR2_TABLE_100
226: , p4_a4 JTF_NUMBER_TABLE
220: , p_operation_seq_num NUMBER
221: , p_department_id NUMBER
222: , p4_a0 JTF_NUMBER_TABLE
223: , p4_a1 JTF_VARCHAR2_TABLE_300
224: , p4_a2 JTF_NUMBER_TABLE
225: , p4_a3 JTF_VARCHAR2_TABLE_100
226: , p4_a4 JTF_NUMBER_TABLE
227: , x_error_code out nocopy VARCHAR2
228: )
222: , p4_a0 JTF_NUMBER_TABLE
223: , p4_a1 JTF_VARCHAR2_TABLE_300
224: , p4_a2 JTF_NUMBER_TABLE
225: , p4_a3 JTF_VARCHAR2_TABLE_100
226: , p4_a4 JTF_NUMBER_TABLE
227: , x_error_code out nocopy VARCHAR2
228: )
229:
230: as