1: PACKAGE BODY CSTPACOV AS
2: /* $Header: CSTACOVB.pls 120.0.12010000.2 2008/10/22 14:13:54 smsasidh ship $ */
3:
4: PROCEDURE ins_overhead(
5: I_INVENTORY_ITEM_ID IN NUMBER,
35:
36: EXCEPTION
37: WHEN NO_DATA_FOUND THEN
38: O_RETURN_CODE := SQLCODE;
39: O_RETURN_ERR := 'CSTPACOV(1):' || substrb(SQLERRM,1,68);
40: RETURN;
41: WHEN OTHERS THEN
42: O_RETURN_CODE := SQLCODE;
43: O_RETURN_ERR := 'CSTPACOV(1):' || substrb(SQLERRM,1,68);
39: O_RETURN_ERR := 'CSTPACOV(1):' || substrb(SQLERRM,1,68);
40: RETURN;
41: WHEN OTHERS THEN
42: O_RETURN_CODE := SQLCODE;
43: O_RETURN_ERR := 'CSTPACOV(1):' || substrb(SQLERRM,1,68);
44: RETURN;
45: END;
46:
47: p_location := 10;
274: RETURN;
275:
276: END ins_overhead;
277:
278: END CSTPACOV;
279: