96: OR p_organization_id IS NULL
97: /*OR p_inventory_item_id IS NULL --bug# 4916503 */
98: THEN
99: x_locator_type := 0;
100: x_return_status := FND_API.G_RET_STS_ERROR;
101: RAISE fnd_api.g_exc_unexpected_error;
102: END IF;
103:
104: x_return_status := FND_API.G_RET_STS_SUCCESS;
97: /*OR p_inventory_item_id IS NULL --bug# 4916503 */
98: THEN
99: x_locator_type := 0;
100: x_return_status := FND_API.G_RET_STS_ERROR;
101: RAISE fnd_api.g_exc_unexpected_error;
102: END IF;
103:
104: x_return_status := FND_API.G_RET_STS_SUCCESS;
105:
100: x_return_status := FND_API.G_RET_STS_ERROR;
101: RAISE fnd_api.g_exc_unexpected_error;
102: END IF;
103:
104: x_return_status := FND_API.G_RET_STS_SUCCESS;
105:
106:
107: OPEN cur_subinventory( p_subinventory );
108: FETCH cur_subinventory INTO subinventory_ctrl;
130: AND item_ctrl in (1,2,3) then
131: x_locator_type := item_ctrl;
132: ELSE
133: x_locator_type := 0;
134: x_return_status := FND_API.G_RET_STS_ERROR;
135: END IF;
136: gmd_debug.put_line('x_locator_type ='||x_locator_type);
137:
138: EXCEPTION
135: END IF;
136: gmd_debug.put_line('x_locator_type ='||x_locator_type);
137:
138: EXCEPTION
139: WHEN FND_API.G_EXC_ERROR THEN
140: x_return_status := FND_API.G_RET_STS_ERROR ;
141: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
143: WHEN OTHERS THEN
136: gmd_debug.put_line('x_locator_type ='||x_locator_type);
137:
138: EXCEPTION
139: WHEN FND_API.G_EXC_ERROR THEN
140: x_return_status := FND_API.G_RET_STS_ERROR ;
141: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
143: WHEN OTHERS THEN
144: x_locator_type := 0;
137:
138: EXCEPTION
139: WHEN FND_API.G_EXC_ERROR THEN
140: x_return_status := FND_API.G_RET_STS_ERROR ;
141: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
143: WHEN OTHERS THEN
144: x_locator_type := 0;
145: fnd_msg_pub.add_exc_msg (g_pkg_name );
138: EXCEPTION
139: WHEN FND_API.G_EXC_ERROR THEN
140: x_return_status := FND_API.G_RET_STS_ERROR ;
141: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
143: WHEN OTHERS THEN
144: x_locator_type := 0;
145: fnd_msg_pub.add_exc_msg (g_pkg_name );
146: x_return_status := FND_API.g_ret_sts_unexp_error;
142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
143: WHEN OTHERS THEN
144: x_locator_type := 0;
145: fnd_msg_pub.add_exc_msg (g_pkg_name );
146: x_return_status := FND_API.g_ret_sts_unexp_error;
147:
148: END item_is_locator_controlled;
149:
150:
168: --gmd_parameters GMD_PARAMETERS_DTL_PKG.parameter_rec_type;
169:
170: BEGIN
171:
172: x_return_status := FND_API.G_RET_STS_SUCCESS;
173:
174: OPEN Cur_get_lab_plant_ind;
175: FETCH Cur_get_lab_plant_ind INTO x_plant,
176: x_lab;
178:
179: EXCEPTION
180:
181: WHEN OTHERS THEN
182: x_return_status := FND_API.G_RET_STS_ERROR;
183: FND_MSG_PUB.ADD_EXC_MSG (g_pkg_name );
184: END get_organization_type;
185:
186:
213: p_lot_status_id NUMBER;
214:
215: BEGIN
216:
217: x_return_status := FND_API.G_RET_STS_SUCCESS;
218:
219: OPEN Cur_get_lot_attrib;
220: FETCH Cur_get_lot_attrib INTO p_lot_status_id,
221: x_grade_code;
237:
238: EXCEPTION
239:
240: WHEN OTHERS THEN
241: x_return_status := FND_API.G_RET_STS_ERROR;
242: FND_MSG_PUB.ADD_EXC_MSG (g_pkg_name );
243: END get_lot_attributes;
244:
245: END GMD_COMMON_GRP;