[Home] [Help]
PACKAGE BODY: APPS.WMS_RULE_PUT_PKG1
Source
1 PACKAGE BODY WMS_RULE_PUT_PKG1 AS
2
3 ---- For Opening the Putaway CURSOR ----
4 ----
5 PROCEDURE EXECUTE_OPEN_RULE(
6 p_cursor IN OUT NOCOPY WMS_RULE_PVT.cv_put_type,
7 p_rule_id IN NUMBER,
8 p_organization_id IN NUMBER,
9 p_inventory_item_id IN NUMBER,
10 p_transaction_type_id IN NUMBER,
11 p_subinventory_code IN VARCHAR2,
12 p_locator_id IN NUMBER,
13 p_pp_transaction_temp_id IN NUMBER,
14 p_restrict_subs_code IN NUMBER,
15 p_restrict_locs_code IN NUMBER,
16 p_project_id IN NUMBER,
17 p_task_id IN NUMBER,
18 x_result OUT NOCOPY NUMBER) is
19
20 BEGIN
21 IF p_rule_id = 7 THEN
22 WMS_RULE_7.open_curs(
23 p_cursor,
24 p_organization_id,
25 p_inventory_item_id,
26 p_transaction_type_id,
27 p_subinventory_code,
28 p_locator_id,
29 p_pp_transaction_temp_id,
30 p_restrict_subs_code,
31 p_restrict_locs_code,
32 p_project_id,
33 p_task_id,
34 x_result );
35 ELSIF p_rule_id = 8 THEN
36 WMS_RULE_8.open_curs(
37 p_cursor,
38 p_organization_id,
39 p_inventory_item_id,
40 p_transaction_type_id,
41 p_subinventory_code,
42 p_locator_id,
43 p_pp_transaction_temp_id,
44 p_restrict_subs_code,
45 p_restrict_locs_code,
46 p_project_id,
47 p_task_id,
48 x_result );
49 ELSIF p_rule_id = 9 THEN
50 WMS_RULE_9.open_curs(
51 p_cursor,
52 p_organization_id,
53 p_inventory_item_id,
54 p_transaction_type_id,
55 p_subinventory_code,
56 p_locator_id,
57 p_pp_transaction_temp_id,
58 p_restrict_subs_code,
59 p_restrict_locs_code,
60 p_project_id,
61 p_task_id,
62 x_result );
63 ELSIF p_rule_id = 10 THEN
64 WMS_RULE_10.open_curs(
65 p_cursor,
66 p_organization_id,
67 p_inventory_item_id,
68 p_transaction_type_id,
69 p_subinventory_code,
70 p_locator_id,
71 p_pp_transaction_temp_id,
72 p_restrict_subs_code,
73 p_restrict_locs_code,
74 p_project_id,
75 p_task_id,
76 x_result );
77 ELSIF p_rule_id = 11 THEN
78 WMS_RULE_11.open_curs(
79 p_cursor,
80 p_organization_id,
81 p_inventory_item_id,
82 p_transaction_type_id,
83 p_subinventory_code,
84 p_locator_id,
85 p_pp_transaction_temp_id,
86 p_restrict_subs_code,
87 p_restrict_locs_code,
88 p_project_id,
89 p_task_id,
90 x_result );
91 ELSIF p_rule_id = 13 THEN
92 WMS_RULE_13.open_curs(
93 p_cursor,
94 p_organization_id,
95 p_inventory_item_id,
96 p_transaction_type_id,
97 p_subinventory_code,
98 p_locator_id,
99 p_pp_transaction_temp_id,
100 p_restrict_subs_code,
101 p_restrict_locs_code,
102 p_project_id,
103 p_task_id,
104 x_result );
105
106 END IF;
107 END EXECUTE_OPEN_RULE;
108
109 PROCEDURE EXECUTE_FETCH_RULE (
110 p_cursor IN WMS_RULE_PVT.cv_put_type,
111 p_rule_id IN NUMBER,
112 x_subinventory_code OUT NOCOPY VARCHAR2,
113 x_locator_id OUT NOCOPY NUMBER,
114 x_project_id OUT NOCOPY NUMBER,
115 x_task_id OUT NOCOPY NUMBER,
116 x_return_status OUT NOCOPY NUMBER) is
117
118 BEGIN
119 IF p_rule_id = 7 THEN
120 WMS_RULE_7.fetch_one_row(
121 p_cursor,
122 x_subinventory_code,
123 x_locator_id,
124 x_project_id,
125 x_task_id,
126 x_return_status );
127 ELSIF p_rule_id = 8 THEN
128 WMS_RULE_8.fetch_one_row(
129 p_cursor,
130 x_subinventory_code,
131 x_locator_id,
132 x_project_id,
133 x_task_id,
134 x_return_status );
135 ELSIF p_rule_id = 9 THEN
136 WMS_RULE_9.fetch_one_row(
137 p_cursor,
138 x_subinventory_code,
139 x_locator_id,
140 x_project_id,
141 x_task_id,
142 x_return_status );
143 ELSIF p_rule_id = 10 THEN
144 WMS_RULE_10.fetch_one_row(
145 p_cursor,
146 x_subinventory_code,
147 x_locator_id,
148 x_project_id,
149 x_task_id,
150 x_return_status );
151 ELSIF p_rule_id = 11 THEN
152 WMS_RULE_11.fetch_one_row(
153 p_cursor,
154 x_subinventory_code,
155 x_locator_id,
156 x_project_id,
157 x_task_id,
158 x_return_status );
159 ELSIF p_rule_id = 13 THEN
160 WMS_RULE_13.fetch_one_row(
161 p_cursor,
162 x_subinventory_code,
163 x_locator_id,
164 x_project_id,
165 x_task_id,
166 x_return_status );
167
168 END IF;
169
170 END EXECUTE_FETCH_RULE;
171
172 PROCEDURE EXECUTE_CLOSE_RULE (p_rule_id IN NUMBER,
173 p_cursor IN WMS_RULE_PVT.cv_put_type) is
174 BEGIN
175 IF p_rule_id = 7 THEN
176 WMS_RULE_7.close_curs(p_cursor);
177 ELSIF p_rule_id = 8 THEN
178 WMS_RULE_8.close_curs(p_cursor);
179 ELSIF p_rule_id = 9 THEN
180 WMS_RULE_9.close_curs(p_cursor);
181 ELSIF p_rule_id = 10 THEN
182 WMS_RULE_10.close_curs(p_cursor);
183 ELSIF p_rule_id = 11 THEN
184 WMS_RULE_11.close_curs(p_cursor);
185 ELSIF p_rule_id = 13 THEN
186 WMS_RULE_13.close_curs(p_cursor);
187
188 END IF;
189 END EXECUTE_CLOSE_RULE;
190 END WMS_RULE_PUT_PKG1;
191 --COMMIT;
192 --EXIT;