1: PACKAGE BODY CSP_EXCESS_LST_SERIAL_LOTS_PKG as
2: /* $Header: cspteslb.pls 115.6 2003/02/27 23:44:20 ajosephg ship $ */
3: -- Start of Comments
4: -- Package name : CSP_EXCESS_LST_SERIAL_LOTS_PKG
5: -- Purpose :
1: PACKAGE BODY CSP_EXCESS_LST_SERIAL_LOTS_PKG as
2: /* $Header: cspteslb.pls 115.6 2003/02/27 23:44:20 ajosephg ship $ */
3: -- Start of Comments
4: -- Package name : CSP_EXCESS_LST_SERIAL_LOTS_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
9: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_EXCESS_LST_SERIAL_LOTS_PKG';
10: G_FILE_NAME CONSTANT VARCHAR2(12) := 'cspteslb.pls';
11: G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
12: G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;
13: PROCEDURE Insert_Row(
173: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
174: APP_EXCEPTION.RAISE_EXCEPTION;
175: End If;
176: END Lock_Row;
177: End CSP_EXCESS_LST_SERIAL_LOTS_PKG;