25: p_LOCATOR_ID NUMBER)
26: IS
27: CURSOR C2 IS SELECT CSP_EXCESS_LIST_SERIAL_LOTS_S1.nextval FROM sys.dual;
28: BEGIN
29: If (px_EXCESS_LIST_SERIAL_LOT_ID IS NULL) OR (px_EXCESS_LIST_SERIAL_LOT_ID = FND_API.G_MISS_NUM) then
30: OPEN C2;
31: FETCH C2 INTO px_EXCESS_LIST_SERIAL_LOT_ID;
32: CLOSE C2;
33: End If;
46: LOCATOR_ID
47: ) VALUES (
48: px_EXCESS_LIST_SERIAL_LOT_ID,
49: G_USER_ID,
50: decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_CREATION_DATE),
51: G_USER_ID,
52: decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE),
53: G_LOGIN_ID,
54: decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, NULL, p_EXCESS_LINE_ID),
48: px_EXCESS_LIST_SERIAL_LOT_ID,
49: G_USER_ID,
50: decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_CREATION_DATE),
51: G_USER_ID,
52: decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE),
53: G_LOGIN_ID,
54: decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, NULL, p_EXCESS_LINE_ID),
55: decode( p_QUANTITY, FND_API.G_MISS_NUM, NULL, p_QUANTITY),
56: decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, NULL, p_LOT_NUMBER),
50: decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_CREATION_DATE),
51: G_USER_ID,
52: decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE),
53: G_LOGIN_ID,
54: decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, NULL, p_EXCESS_LINE_ID),
55: decode( p_QUANTITY, FND_API.G_MISS_NUM, NULL, p_QUANTITY),
56: decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, NULL, p_LOT_NUMBER),
57: decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, NULL, p_SERIAL_NUMBER),
58: decode( p_REVISION, FND_API.G_MISS_CHAR, NULL, p_REVISION),
51: G_USER_ID,
52: decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE),
53: G_LOGIN_ID,
54: decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, NULL, p_EXCESS_LINE_ID),
55: decode( p_QUANTITY, FND_API.G_MISS_NUM, NULL, p_QUANTITY),
56: decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, NULL, p_LOT_NUMBER),
57: decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, NULL, p_SERIAL_NUMBER),
58: decode( p_REVISION, FND_API.G_MISS_CHAR, NULL, p_REVISION),
59: decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, NULL, p_LOCATOR_ID));
52: decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE),
53: G_LOGIN_ID,
54: decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, NULL, p_EXCESS_LINE_ID),
55: decode( p_QUANTITY, FND_API.G_MISS_NUM, NULL, p_QUANTITY),
56: decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, NULL, p_LOT_NUMBER),
57: decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, NULL, p_SERIAL_NUMBER),
58: decode( p_REVISION, FND_API.G_MISS_CHAR, NULL, p_REVISION),
59: decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, NULL, p_LOCATOR_ID));
60:
53: G_LOGIN_ID,
54: decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, NULL, p_EXCESS_LINE_ID),
55: decode( p_QUANTITY, FND_API.G_MISS_NUM, NULL, p_QUANTITY),
56: decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, NULL, p_LOT_NUMBER),
57: decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, NULL, p_SERIAL_NUMBER),
58: decode( p_REVISION, FND_API.G_MISS_CHAR, NULL, p_REVISION),
59: decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, NULL, p_LOCATOR_ID));
60:
61: End Insert_Row;
54: decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, NULL, p_EXCESS_LINE_ID),
55: decode( p_QUANTITY, FND_API.G_MISS_NUM, NULL, p_QUANTITY),
56: decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, NULL, p_LOT_NUMBER),
57: decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, NULL, p_SERIAL_NUMBER),
58: decode( p_REVISION, FND_API.G_MISS_CHAR, NULL, p_REVISION),
59: decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, NULL, p_LOCATOR_ID));
60:
61: End Insert_Row;
62: PROCEDURE Update_Row(
55: decode( p_QUANTITY, FND_API.G_MISS_NUM, NULL, p_QUANTITY),
56: decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, NULL, p_LOT_NUMBER),
57: decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, NULL, p_SERIAL_NUMBER),
58: decode( p_REVISION, FND_API.G_MISS_CHAR, NULL, p_REVISION),
59: decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, NULL, p_LOCATOR_ID));
60:
61: End Insert_Row;
62: PROCEDURE Update_Row(
63: p_EXCESS_LIST_SERIAL_LOT_ID NUMBER,
75:
76: IS
77: BEGIN
78: Update CSP_EXCESS_LIST_SERIAL_LOTS
79: SET CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY),
80: CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),
81: LAST_UPDATED_BY = G_USER_ID,
82: LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
83: LAST_UPDATE_LOGIN = G_LOGIN_ID,
76: IS
77: BEGIN
78: Update CSP_EXCESS_LIST_SERIAL_LOTS
79: SET CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY),
80: CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),
81: LAST_UPDATED_BY = G_USER_ID,
82: LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
83: LAST_UPDATE_LOGIN = G_LOGIN_ID,
84: EXCESS_LINE_ID = decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, EXCESS_LINE_ID, p_EXCESS_LINE_ID),
78: Update CSP_EXCESS_LIST_SERIAL_LOTS
79: SET CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY),
80: CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),
81: LAST_UPDATED_BY = G_USER_ID,
82: LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
83: LAST_UPDATE_LOGIN = G_LOGIN_ID,
84: EXCESS_LINE_ID = decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, EXCESS_LINE_ID, p_EXCESS_LINE_ID),
85: QUANTITY = decode( p_QUANTITY, FND_API.G_MISS_NUM, QUANTITY, p_QUANTITY),
86: LOT_NUMBER = decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, LOT_NUMBER, p_LOT_NUMBER),
80: CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),
81: LAST_UPDATED_BY = G_USER_ID,
82: LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
83: LAST_UPDATE_LOGIN = G_LOGIN_ID,
84: EXCESS_LINE_ID = decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, EXCESS_LINE_ID, p_EXCESS_LINE_ID),
85: QUANTITY = decode( p_QUANTITY, FND_API.G_MISS_NUM, QUANTITY, p_QUANTITY),
86: LOT_NUMBER = decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, LOT_NUMBER, p_LOT_NUMBER),
87: SERIAL_NUMBER = decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, SERIAL_NUMBER, p_SERIAL_NUMBER),
88: REVISION = decode( p_REVISION, FND_API.G_MISS_CHAR, REVISION, p_REVISION),
81: LAST_UPDATED_BY = G_USER_ID,
82: LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
83: LAST_UPDATE_LOGIN = G_LOGIN_ID,
84: EXCESS_LINE_ID = decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, EXCESS_LINE_ID, p_EXCESS_LINE_ID),
85: QUANTITY = decode( p_QUANTITY, FND_API.G_MISS_NUM, QUANTITY, p_QUANTITY),
86: LOT_NUMBER = decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, LOT_NUMBER, p_LOT_NUMBER),
87: SERIAL_NUMBER = decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, SERIAL_NUMBER, p_SERIAL_NUMBER),
88: REVISION = decode( p_REVISION, FND_API.G_MISS_CHAR, REVISION, p_REVISION),
89: LOCATOR_ID = decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, LOCATOR_ID, p_LOCATOR_ID)
82: LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
83: LAST_UPDATE_LOGIN = G_LOGIN_ID,
84: EXCESS_LINE_ID = decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, EXCESS_LINE_ID, p_EXCESS_LINE_ID),
85: QUANTITY = decode( p_QUANTITY, FND_API.G_MISS_NUM, QUANTITY, p_QUANTITY),
86: LOT_NUMBER = decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, LOT_NUMBER, p_LOT_NUMBER),
87: SERIAL_NUMBER = decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, SERIAL_NUMBER, p_SERIAL_NUMBER),
88: REVISION = decode( p_REVISION, FND_API.G_MISS_CHAR, REVISION, p_REVISION),
89: LOCATOR_ID = decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, LOCATOR_ID, p_LOCATOR_ID)
90: where EXCESS_LIST_SERIAL_LOT_ID = p_EXCESS_LIST_SERIAL_LOT_ID;
83: LAST_UPDATE_LOGIN = G_LOGIN_ID,
84: EXCESS_LINE_ID = decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, EXCESS_LINE_ID, p_EXCESS_LINE_ID),
85: QUANTITY = decode( p_QUANTITY, FND_API.G_MISS_NUM, QUANTITY, p_QUANTITY),
86: LOT_NUMBER = decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, LOT_NUMBER, p_LOT_NUMBER),
87: SERIAL_NUMBER = decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, SERIAL_NUMBER, p_SERIAL_NUMBER),
88: REVISION = decode( p_REVISION, FND_API.G_MISS_CHAR, REVISION, p_REVISION),
89: LOCATOR_ID = decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, LOCATOR_ID, p_LOCATOR_ID)
90: where EXCESS_LIST_SERIAL_LOT_ID = p_EXCESS_LIST_SERIAL_LOT_ID;
91: If (SQL%NOTFOUND) then
84: EXCESS_LINE_ID = decode( p_EXCESS_LINE_ID, FND_API.G_MISS_NUM, EXCESS_LINE_ID, p_EXCESS_LINE_ID),
85: QUANTITY = decode( p_QUANTITY, FND_API.G_MISS_NUM, QUANTITY, p_QUANTITY),
86: LOT_NUMBER = decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, LOT_NUMBER, p_LOT_NUMBER),
87: SERIAL_NUMBER = decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, SERIAL_NUMBER, p_SERIAL_NUMBER),
88: REVISION = decode( p_REVISION, FND_API.G_MISS_CHAR, REVISION, p_REVISION),
89: LOCATOR_ID = decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, LOCATOR_ID, p_LOCATOR_ID)
90: where EXCESS_LIST_SERIAL_LOT_ID = p_EXCESS_LIST_SERIAL_LOT_ID;
91: If (SQL%NOTFOUND) then
92: RAISE NO_DATA_FOUND;
85: QUANTITY = decode( p_QUANTITY, FND_API.G_MISS_NUM, QUANTITY, p_QUANTITY),
86: LOT_NUMBER = decode( p_LOT_NUMBER, FND_API.G_MISS_CHAR, LOT_NUMBER, p_LOT_NUMBER),
87: SERIAL_NUMBER = decode( p_SERIAL_NUMBER, FND_API.G_MISS_CHAR, SERIAL_NUMBER, p_SERIAL_NUMBER),
88: REVISION = decode( p_REVISION, FND_API.G_MISS_CHAR, REVISION, p_REVISION),
89: LOCATOR_ID = decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, LOCATOR_ID, p_LOCATOR_ID)
90: where EXCESS_LIST_SERIAL_LOT_ID = p_EXCESS_LIST_SERIAL_LOT_ID;
91: If (SQL%NOTFOUND) then
92: RAISE NO_DATA_FOUND;
93: End If;