1: PACKAGE BODY CSP_SUPERSEDE_ITEMS_PKG as
2: /* $Header: csptsupb.pls 115.2 2002/11/26 07:05:03 hhaugeru noship $ */
3: -- Start of Comments
4: -- Package name : CSP_SUPERSEDE_ITEMS_PKG
5: -- Purpose :
1: PACKAGE BODY CSP_SUPERSEDE_ITEMS_PKG as
2: /* $Header: csptsupb.pls 115.2 2002/11/26 07:05:03 hhaugeru noship $ */
3: -- Start of Comments
4: -- Package name : CSP_SUPERSEDE_ITEMS_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_SUPERSEDE_ITEMS_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csptsupb.pls';
13:
14: PROCEDURE Insert_Row(
15: px_SUPERSEDE_ID IN OUT NOCOPY NUMBER
306: APP_EXCEPTION.RAISE_EXCEPTION;
307: End If;
308: END Lock_Row;
309:
310: End CSP_SUPERSEDE_ITEMS_PKG;