PACKAGE BODY: APPS.LNS_EVT_ACTION_HISTORY_H_PKG

Source

1 PACKAGE BODY LNS_EVT_ACTION_HISTORY_H_PKG AS
2 /* $Header: LNS_EVHIS_TBLH_B.pls 120.0 2005/05/31 18:24:13 appldev noship $ */
3 
4 /* Insert_Row procedure */
5 PROCEDURE Insert_Row(
6         X_EVENT_ACTION_HISTORY_ID       IN OUT NOCOPY NUMBER
7         ,P_EVENT_ACTION_ID              IN NUMBER
8         ,P_LOAN_ID                      IN NUMBER
9         ,P_WF_ITEMKEY           	IN VARCHAR2     DEFAULT NULL
10         ,P_WF_ITEMTYPE          	IN VARCHAR2     DEFAULT NULL
11         ,P_ACTIVITY_DATE                IN DATE
12         ,P_CONCURRENT_REQUEST_ID        IN NUMBER 	DEFAULT NULL
13         ,P_CREATED_BY           	IN NUMBER       DEFAULT NULL
14         ,P_CREATION_DATE                IN DATE 	DEFAULT NULL
15         ,P_LAST_UPDATED_BY              IN NUMBER       DEFAULT NULL
16         ,P_LAST_UPDATE_DATE             IN DATE 	DEFAULT NULL
17         ,P_LAST_UPDATE_LOGIN            IN NUMBER       DEFAULT NULL
18         ,P_PROGRAM_UPDATE_DATE          IN DATE 	DEFAULT NULL
19         ,P_PROGRAM_APPLICATION_ID       IN NUMBER 	DEFAULT NULL
20         ,P_PROGRAM_ID                   IN NUMBER 	DEFAULT NULL
21         ,P_REQUEST_ID                   IN NUMBER 	DEFAULT NULL
22 ) IS
23 BEGIN
24 	INSERT INTO LNS_EVT_ACTION_HISTORY_H
25 	(
26 		EVENT_ACTION_HISTORY_ID
27 		,EVENT_ACTION_ID
28 		,LOAN_ID
29 		,WF_ITEMKEY
30 		,WF_ITEMTYPE
31 		,ACTIVITY_DATE
32 		,CONCURRENT_REQUEST_ID
33 		,CREATED_BY
34 		,CREATION_DATE
35 		,LAST_UPDATED_BY
36 		,LAST_UPDATE_DATE
37 		,LAST_UPDATE_LOGIN
38 		,PROGRAM_UPDATE_DATE
39 		,PROGRAM_APPLICATION_ID
40 		,PROGRAM_ID
41 		,REQUEST_ID
42 	) VALUES (
43 		LNS_EVT_ACTION_HISTORY_S.NEXTVAL
44 		,DECODE(P_EVENT_ACTION_ID, FND_API.G_MISS_NUM, NULL, P_EVENT_ACTION_ID)
45 		,DECODE(P_LOAN_ID, FND_API.G_MISS_NUM, NULL, P_LOAN_ID)
46 		,DECODE(P_WF_ITEMKEY, FND_API.G_MISS_CHAR, NULL, P_WF_ITEMKEY)
47 		,DECODE(P_WF_ITEMTYPE, FND_API.G_MISS_CHAR, NULL, P_WF_ITEMTYPE)
48 		,DECODE(P_ACTIVITY_DATE, FND_API.G_MISS_DATE, NULL, P_ACTIVITY_DATE)
49 		,DECODE(P_CONCURRENT_REQUEST_ID, FND_API.G_MISS_NUM, NULL, P_CONCURRENT_REQUEST_ID)
50 		,LNS_UTILITY_PUB.CREATED_BY
51 		,LNS_UTILITY_PUB.CREATION_DATE
52 		,LNS_UTILITY_PUB.LAST_UPDATED_BY
53 		,LNS_UTILITY_PUB.LAST_UPDATE_DATE
54 		,LNS_UTILITY_PUB.LAST_UPDATE_LOGIN
55 		,LNS_UTILITY_PUB.PROGRAM_UPDATE_DATE
56 		,LNS_UTILITY_PUB.PROGRAM_APPLICATION_ID
57 		,LNS_UTILITY_PUB.PROGRAM_ID
58 		,LNS_UTILITY_PUB.REQUEST_ID
59 
60 	) RETURNING
61 		 EVENT_ACTION_HISTORY_ID
62 	 INTO
63 		 X_EVENT_ACTION_HISTORY_ID;
64 END Insert_Row;
65 
66 END;
67