1: PACKAGE BODY CSP_SEC_INVENTORIES_PKG as
2: /* $Header: csptpseb.pls 120.0 2005/05/24 18:35:18 appldev noship $ */
3: -- Start of Comments
4: -- Package name : CSP_SEC_INVENTORIES_PKG
5: -- Purpose :
1: PACKAGE BODY CSP_SEC_INVENTORIES_PKG as
2: /* $Header: csptpseb.pls 120.0 2005/05/24 18:35:18 appldev noship $ */
3: -- Start of Comments
4: -- Package name : CSP_SEC_INVENTORIES_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_SEC_INVENTORIES_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csptecib.pls';
13:
14: PROCEDURE Insert_Row(
15: px_SECONDARY_INVENTORY_ID IN OUT NOCOPY NUMBER,
387: APP_EXCEPTION.RAISE_EXCEPTION;
388: End If;
389: END Lock_Row;
390:
391: End CSP_SEC_INVENTORIES_PKG;