[Home] [Help]
1: PACKAGE BODY LNS_APPROVAL_ACTIONS_PKG AS
2: /* $Header: LNS_APACT_TBLH_B.pls 120.0 2005/05/31 18:06:55 appldev noship $ */
3:
4: /* Insert_Row procedure */
5: PROCEDURE Insert_Row(
36: ,P_ATTRIBUTE19 IN VARCHAR2 DEFAULT NULL
37: ,P_ATTRIBUTE20 IN VARCHAR2 DEFAULT NULL
38: ) IS
39: BEGIN
40: INSERT INTO LNS_APPROVAL_ACTIONS
41: (
42: ACTION_ID
43: ,LAST_UPDATE_DATE
44: ,LAST_UPDATED_BY
71: ,ATTRIBUTE18
72: ,ATTRIBUTE19
73: ,ATTRIBUTE20
74: ) VALUES (
75: DECODE(X_ACTION_ID, FND_API.G_MISS_NUM, LNS_APPROVAL_ACTIONS_S.NEXTVAL, NULL, LNS_APPROVAL_ACTIONS_S.NEXTVAL, X_ACTION_ID)
76: ,LNS_UTILITY_PUB.LAST_UPDATE_DATE
77: ,LNS_UTILITY_PUB.LAST_UPDATED_BY
78: ,LNS_UTILITY_PUB.LAST_UPDATE_LOGIN
79: ,LNS_UTILITY_PUB.CREATION_DATE
143: ,P_ATTRIBUTE19 IN VARCHAR2 DEFAULT NULL
144: ,P_ATTRIBUTE20 IN VARCHAR2 DEFAULT NULL
145: ) IS
146: BEGIN
147: UPDATE LNS_APPROVAL_ACTIONS SET
148: ACTION_ID = DECODE(X_ACTION_ID, NULL, ACTION_ID, FND_API.G_MISS_NUM, NULL, X_ACTION_ID)
149: ,LAST_UPDATE_DATE = LNS_UTILITY_PUB.LAST_UPDATE_DATE
150: ,LAST_UPDATED_BY = LNS_UTILITY_PUB.LAST_UPDATED_BY
151: ,LAST_UPDATE_LOGIN = LNS_UTILITY_PUB.LAST_UPDATE_LOGIN
184:
185: /* Delete_Row procedure */
186: PROCEDURE Delete_Row(P_ACTION_ID IN NUMBER) IS
187: BEGIN
188: DELETE FROM LNS_APPROVAL_ACTIONS
189: WHERE ACTION_ID = P_ACTION_ID;
190:
191: if (sql%notfound) then
192: raise no_data_found;
227: ,P_ATTRIBUTE18 IN VARCHAR2 DEFAULT NULL
228: ,P_ATTRIBUTE19 IN VARCHAR2 DEFAULT NULL
229: ,P_ATTRIBUTE20 IN VARCHAR2 DEFAULT NULL
230: ) IS
231: CURSOR C IS SELECT * FROM LNS_APPROVAL_ACTIONS
232: WHERE ACTION_ID = P_ACTION_ID
233: FOR UPDATE of ACTION_ID NOWAIT;
234: Recinfo C%ROWTYPE;
235: BEGIN