1: PACKAGE BODY csp_pick_serial_lots_PVT AS
2: /* $Header: cspvtslb.pls 120.1 2006/07/20 06:19:48 hhaugeru noship $ */
3: -- Start of Comments
4: -- Package name : csp_pick_serial_lots_PVT
5: -- Purpose :
1: PACKAGE BODY csp_pick_serial_lots_PVT AS
2: /* $Header: cspvtslb.pls 120.1 2006/07/20 06:19:48 hhaugeru noship $ */
3: -- Start of Comments
4: -- Package name : csp_pick_serial_lots_PVT
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_pick_serial_lots_PVT';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'cspvtslb.pls';
13:
14: G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
15: G_LOGIN_ID NUMBER := FND_GLOBAL.LOGIN_ID;
286: l_api_name CONSTANT VARCHAR2(30) := 'Update_pick_serial_lots';
287: l_api_version_number CONSTANT NUMBER := 1.0;
288: -- Local Variables
289: l_identity_sales_member_rec AS_SALES_MEMBER_PUB.Sales_member_rec_Type;
290: l_ref_psl_rec csp_pick_serial_lots_PVT.psl_Rec_Type;
291: l_tar_psl_rec csp_pick_serial_lots_PVT.psl_Rec_Type := P_psl_Rec;
292: l_rowid ROWID;
293: BEGIN
294: -- Standard Start of API savepoint
287: l_api_version_number CONSTANT NUMBER := 1.0;
288: -- Local Variables
289: l_identity_sales_member_rec AS_SALES_MEMBER_PUB.Sales_member_rec_Type;
290: l_ref_psl_rec csp_pick_serial_lots_PVT.psl_Rec_Type;
291: l_tar_psl_rec csp_pick_serial_lots_PVT.psl_Rec_Type := P_psl_Rec;
292: l_rowid ROWID;
293: BEGIN
294: -- Standard Start of API savepoint
295: SAVEPOINT UPDATE_pick_serial_lots_PVT;
1477: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'csp', 'Private API: ' || l_api_name || 'end');
1478:
1479: END Validate_pick_serial_lots;
1480:
1481: End csp_pick_serial_lots_PVT;