1: PACKAGE BODY GMD_INVENTORY_SPEC_VRS_PVT AS
2: /* $Header: GMDVIVRB.pls 120.1 2005/10/04 06:52:11 svankada noship $ */
3:
4: -- Start of comments
5: --+==========================================================================+
7: --| Redwood Shores, CA, USA |
8: --| All rights reserved. |
9: --+==========================================================================+
10: --| File Name : GMDVIVRB.pls |
11: --| Package Name : GMD_INVENTORY_SPEC_VRS_PVT |
12: --| Type : Private |
13: --| |
14: --| Notes |
15: --| This package contains private layer APIs for Inventory VR. |
177: END IF;
178:
179: EXCEPTION
180: WHEN OTHERS THEN
181: fnd_msg_pub.add_exc_msg ('GMD_INVENTORY_SPEC_VRS_PVT', 'INSERT_ROW');
182: RETURN FALSE;
183:
184: END insert_row;
185:
231: 'KEY', p_spec_vr_id);
232: RETURN FALSE;
233:
234: WHEN OTHERS THEN
235: fnd_msg_pub.add_exc_msg ('GMD_INVENTORY_SPEC_VRS_PVT', 'DELETE_ROW');
236: RETURN FALSE;
237:
238: END delete_row;
239:
269: 'KEY', p_spec_vr_id);
270: RETURN FALSE;
271:
272: WHEN OTHERS THEN
273: fnd_msg_pub.add_exc_msg ('GMD_INVENTORY_SPEC_VRS_PVT', 'DELETE_ROW');
274: RETURN FALSE;
275:
276: END lock_row;
277:
304: gmd_api_pub.log_message('GMD_NO_DATA_FOUND','TABLE_NAME', 'GMD_INVENTORY_SPEC_VRS');
305: RETURN FALSE;
306: WHEN OTHERS
307: THEN
308: fnd_msg_pub.add_exc_msg ('GMD_INVENTORY_SPEC_VRS_PVT', 'FETCH_ROW');
309: RETURN FALSE;
310:
311: END fetch_row;
312:
309: RETURN FALSE;
310:
311: END fetch_row;
312:
313: END GMD_INVENTORY_SPEC_VRS_PVT;