[Home] [Help]
PACKAGE BODY: APPS.PV_GE_PARTY_NOTIF_PKG
Source
1 PACKAGE BODY PV_Ge_Party_Notif_PKG as
2 /* $Header: pvxtgpnb.pls 115.4 2002/12/10 10:42:57 rdsharma ship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 -- PV_Ge_Party_Notif_PKG
7 -- Purpose
8 --
9 -- History
10 --
11 -- NOTE
12 --
13 -- This Api is generated with Latest version of
14 -- Rosetta, where g_miss indicates NULL and
15 -- NULL indicates missing value. Rosetta Version 1.55
16 -- End of Comments
17 -- ===============================================================
18
19
20 G_PKG_NAME CONSTANT VARCHAR2(30):= 'PV_Ge_Party_Notif_PKG';
21 G_FILE_NAME CONSTANT VARCHAR2(12) := 'pvxtgpnb.pls';
22
23
24
25
26 -- ========================================================
27 --
28 -- NAME
29 -- Insert_Row
30 --
31 -- PURPOSE
32 --
33 -- NOTES
34 --
35 -- HISTORY
36 --
37 -- ========================================================
38 PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
39 PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
40 PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
41
42 PROCEDURE Insert_Row(
43 px_party_notification_id IN OUT NOCOPY NUMBER,
44 p_notification_id NUMBER,
45 px_object_version_number IN OUT NOCOPY NUMBER,
46 p_partner_id NUMBER,
47 p_recipient_user_id NUMBER,
48 p_notif_for_entity_id NUMBER,
49 p_arc_notif_for_entity_code VARCHAR2,
50 p_notif_type_code VARCHAR2,
51 p_created_by NUMBER,
52 p_creation_date DATE,
53 p_last_updated_by NUMBER,
54 p_last_update_date DATE,
55 p_last_update_login NUMBER)
56
57 IS
58 x_rowid VARCHAR2(30);
59
60
61 BEGIN
62
63
64 px_object_version_number := nvl(px_object_version_number, 1);
65
66
67 INSERT INTO pv_ge_party_notifications(
68 party_notification_id,
69 notification_id,
70 object_version_number,
71 partner_id,
72 recipient_user_id,
73 notif_for_entity_id,
74 arc_notif_for_entity_code,
75 notif_type_code,
76 created_by,
77 creation_date,
78 last_updated_by,
79 last_update_date,
80 last_update_login
81 ) VALUES (
82 DECODE( px_party_notification_id, FND_API.G_MISS_NUM, NULL, px_party_notification_id),
83 DECODE( p_notification_id, FND_API.G_MISS_NUM, NULL, p_notification_id),
84 DECODE( px_object_version_number, FND_API.G_MISS_NUM, 1, px_object_version_number),
85 DECODE( p_partner_id, FND_API.G_MISS_NUM, NULL, p_partner_id),
86 DECODE( p_recipient_user_id, FND_API.G_MISS_NUM, NULL, p_recipient_user_id),
87 DECODE( p_notif_for_entity_id, FND_API.G_MISS_NUM, NULL, p_notif_for_entity_id),
88 DECODE( p_arc_notif_for_entity_code, FND_API.g_miss_char, NULL, p_arc_notif_for_entity_code),
89 DECODE( p_notif_type_code, FND_API.g_miss_char, NULL, p_notif_type_code),
90 DECODE( p_created_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_created_by),
91 DECODE( p_creation_date, FND_API.G_MISS_DATE, SYSDATE, p_creation_date),
92 DECODE( p_last_updated_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_last_updated_by),
93 DECODE( p_last_update_date, FND_API.G_MISS_DATE, SYSDATE, p_last_update_date),
94 DECODE( p_last_update_login, FND_API.G_MISS_NUM, FND_GLOBAL.CONC_LOGIN_ID, p_last_update_login));
95
96 END Insert_Row;
97
98
99
100
101 -- ========================================================
102 --
103 -- NAME
104 -- Update_Row
105 --
106 -- PURPOSE
107 --
108 -- NOTES
109 --
110 -- HISTORY
111 --
112 -- ========================================================
113 PROCEDURE Update_Row(
114 p_party_notification_id NUMBER,
115 p_notification_id NUMBER,
116 p_object_version_number IN NUMBER,
117 p_partner_id NUMBER,
118 p_recipient_user_id NUMBER,
119 p_notif_for_entity_id NUMBER,
120 p_arc_notif_for_entity_code VARCHAR2,
121 p_notif_type_code VARCHAR2,
122 p_last_updated_by NUMBER,
123 p_last_update_date DATE,
124 p_last_update_login NUMBER)
125
126 IS
127 BEGIN
128 Update pv_ge_party_notifications
129 SET
130 party_notification_id = DECODE( p_party_notification_id, null, party_notification_id, FND_API.G_MISS_NUM, null, p_party_notification_id),
131 notification_id = DECODE( p_notification_id, null, notification_id, FND_API.G_MISS_NUM, null, p_notification_id),
132 object_version_number = nvl(p_object_version_number,0) + 1 ,
133 partner_id = DECODE( p_partner_id, null, partner_id, FND_API.G_MISS_NUM, null, p_partner_id),
134 recipient_user_id = DECODE( p_recipient_user_id, null, recipient_user_id, FND_API.G_MISS_NUM, null, p_recipient_user_id),
135 notif_for_entity_id = DECODE( p_notif_for_entity_id, null, notif_for_entity_id, FND_API.G_MISS_NUM, null, p_notif_for_entity_id),
136 arc_notif_for_entity_code = DECODE( p_arc_notif_for_entity_code, null, arc_notif_for_entity_code, FND_API.g_miss_char, null, p_arc_notif_for_entity_code),
137 notif_type_code = DECODE( p_notif_type_code, null, notif_type_code, FND_API.g_miss_char, null, p_notif_type_code),
138 last_updated_by = DECODE( p_last_updated_by, null, last_updated_by, FND_API.G_MISS_NUM, null, p_last_updated_by),
139 last_update_date = DECODE( p_last_update_date, null, last_update_date, FND_API.G_MISS_DATE, null, p_last_update_date),
140 last_update_login = DECODE( p_last_update_login, null, last_update_login, FND_API.G_MISS_NUM, null, p_last_update_login)
141 WHERE party_notification_id = p_party_notification_id
142 AND object_version_number = p_object_version_number;
143
144
145 IF (SQL%NOTFOUND) THEN
146 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
147 END IF;
148
149
150 END Update_Row;
151
152
153
154
155 -- ========================================================
156 --
157 -- NAME
158 -- Delete_Row
159 --
160 -- PURPOSE
161 --
162 -- NOTES
163 --
164 -- HISTORY
165 --
166 -- ========================================================
167 PROCEDURE Delete_Row(
168 p_party_notification_id NUMBER,
169 p_object_version_number NUMBER)
170 IS
171 BEGIN
172 DELETE FROM pv_ge_party_notifications
173 WHERE party_notification_id = p_party_notification_id
174 AND object_version_number = p_object_version_number;
175 If (SQL%NOTFOUND) then
176 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
177 End If;
178 END Delete_Row ;
179
180
181
182
183
184 -- ========================================================
185 --
186 -- NAME
187 -- Lock_Row
188 --
189 -- PURPOSE
190 --
191 -- NOTES
192 --
193 -- HISTORY
194 --
195 -- ========================================================
196 PROCEDURE Lock_Row(
197 p_party_notification_id NUMBER,
198 p_object_version_number NUMBER)
199 IS
200 CURSOR C IS
201 SELECT *
202 FROM pv_ge_party_notifications
203 WHERE party_notification_id = p_party_notification_id
204 AND object_version_number = p_object_version_number
205 FOR UPDATE OF party_notification_id NOWAIT;
206 Recinfo C%ROWTYPE;
207 BEGIN
208
209 OPEN c;
210 FETCH c INTO Recinfo;
211 IF (c%NOTFOUND) THEN
212 CLOSE c;
213 AMS_Utility_PVT.error_message ('AMS_API_RECORD_NOT_FOUND');
214 RAISE FND_API.g_exc_error;
215 END IF;
216 CLOSE c;
217 END Lock_Row;
218
219 END PV_Ge_Party_Notif_PKG;