DBA Data[Home] [Help]

PACKAGE BODY: APPS.PV_PG_MEMBERSHIPS_PKG

Source


1 PACKAGE BODY PV_Pg_Memberships_PKG as
2 /* $Header: pvxtmemb.pls 120.1 2005/10/24 09:36:12 dgottlie noship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 --          PV_Pg_Memberships_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_Pg_Memberships_PKG';
21 G_FILE_NAME CONSTANT VARCHAR2(12) := 'pvxtmemb.pls';
22 
23 
24 
25 
26 --  ========================================================
27 --
28 --  NAME
29 --  Insert_Row
30 --
31 --  PURPOSE
32 --
33 --  NOTES
34 --
35 --  HISTORY
36 --
37 --  ========================================================
38 PROCEDURE Insert_Row(
39           px_membership_id   IN OUT NOCOPY NUMBER,
40           px_object_version_number   IN OUT NOCOPY NUMBER,
41           p_partner_id    NUMBER,
42           p_program_id    NUMBER,
43           p_start_date    DATE,
44           p_original_end_date    DATE,
45           p_actual_end_date    DATE,
46           p_membership_status_code    VARCHAR2,
47           p_status_reason_code    VARCHAR2,
48           p_enrl_request_id    NUMBER,
49           p_created_by    NUMBER,
50           p_creation_date    DATE,
51           p_last_updated_by    NUMBER,
52           p_last_update_date    DATE,
53           p_last_update_login    NUMBER,
54 	  p_attribute1	VARCHAR2,
55 	  p_attribute2	VARCHAR2,
56 	  p_attribute3	VARCHAR2,
57 	  p_attribute4	VARCHAR2,
58 	  p_attribute5	VARCHAR2,
59 	  p_attribute6	VARCHAR2,
60 	  p_attribute7	VARCHAR2,
61 	  p_attribute8	VARCHAR2,
62 	  p_attribute9	VARCHAR2,
63 	  p_attribute10	VARCHAR2,
64 	  p_attribute11	VARCHAR2,
65 	  p_attribute12	VARCHAR2,
66 	  p_attribute13	VARCHAR2,
67 	  p_attribute14	VARCHAR2,
68 	  p_attribute15	VARCHAR2)
69 
70  IS
71    x_rowid    VARCHAR2(30);
72 
73 
74 BEGIN
75 
76 
77    px_object_version_number := nvl(px_object_version_number, 1);
78 
79 
80    INSERT INTO pv_pg_memberships(
81            membership_id,
82            object_version_number,
83            partner_id,
84            program_id,
85            start_date,
86            original_end_date,
87            actual_end_date,
88            membership_status_code,
89            status_reason_code,
90            enrl_request_id,
91            created_by,
92            creation_date,
93            last_updated_by,
94            last_update_date,
95            last_update_login,
96 	   attribute1,
97 	   attribute2,
98 	   attribute3,
99 	   attribute4,
100 	   attribute5,
101 	   attribute6,
102 	   attribute7,
103 	   attribute8,
104 	   attribute9,
105 	   attribute10,
106 	   attribute11,
107 	   attribute12,
108 	   attribute13,
109 	   attribute14,
110 	   attribute15
111    ) VALUES (
112            DECODE( px_membership_id, FND_API.G_MISS_NUM, NULL, px_membership_id),
113            DECODE( px_object_version_number, FND_API.G_MISS_NUM, 1, px_object_version_number),
114            DECODE( p_partner_id, FND_API.G_MISS_NUM, NULL, p_partner_id),
115            DECODE( p_program_id, FND_API.G_MISS_NUM, NULL, p_program_id),
116            DECODE( p_start_date, FND_API.G_MISS_DATE, NULL, p_start_date),
117            DECODE( p_original_end_date, FND_API.G_MISS_DATE, NULL, p_original_end_date),
118            DECODE( p_actual_end_date, FND_API.G_MISS_DATE, NULL, p_actual_end_date),
119            DECODE( p_membership_status_code, FND_API.g_miss_char, NULL, p_membership_status_code),
120            DECODE( p_status_reason_code, FND_API.g_miss_char, NULL, p_status_reason_code),
121            DECODE( p_enrl_request_id, FND_API.G_MISS_NUM, NULL, p_enrl_request_id),
122            DECODE( p_created_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_created_by),
123            DECODE( p_creation_date, FND_API.G_MISS_DATE, SYSDATE, p_creation_date),
124            DECODE( p_last_updated_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_last_updated_by),
125            DECODE( p_last_update_date, FND_API.G_MISS_DATE, SYSDATE, p_last_update_date),
126            DECODE( p_last_update_login, FND_API.G_MISS_NUM, FND_GLOBAL.CONC_LOGIN_ID, p_last_update_login),
127 	   DECODE( p_attribute1, FND_API.G_MISS_CHAR, NULL, p_attribute1),
128 	   DECODE( p_attribute2, FND_API.G_MISS_CHAR, NULL, p_attribute2),
129 	   DECODE( p_attribute3, FND_API.G_MISS_CHAR, NULL, p_attribute3),
130 	   DECODE( p_attribute4, FND_API.G_MISS_CHAR, NULL, p_attribute4),
131 	   DECODE( p_attribute5, FND_API.G_MISS_CHAR, NULL, p_attribute5),
132 	   DECODE( p_attribute6, FND_API.G_MISS_CHAR, NULL, p_attribute6),
133 	   DECODE( p_attribute7, FND_API.G_MISS_CHAR, NULL, p_attribute7),
134 	   DECODE( p_attribute8, FND_API.G_MISS_CHAR, NULL, p_attribute8),
135 	   DECODE( p_attribute9, FND_API.G_MISS_CHAR, NULL, p_attribute9),
136 	   DECODE( p_attribute10, FND_API.G_MISS_CHAR, NULL, p_attribute10),
137 	   DECODE( p_attribute11, FND_API.G_MISS_CHAR, NULL, p_attribute11),
138 	   DECODE( p_attribute12, FND_API.G_MISS_CHAR, NULL, p_attribute12),
139 	   DECODE( p_attribute13, FND_API.G_MISS_CHAR, NULL, p_attribute13),
140 	   DECODE( p_attribute14, FND_API.G_MISS_CHAR, NULL, p_attribute14),
141 	   DECODE( p_attribute15, FND_API.G_MISS_CHAR, NULL, p_attribute15));
142 
143 END Insert_Row;
144 
145 
146 
147 
148 --  ========================================================
149 --
150 --  NAME
151 --  Update_Row
152 --
153 --  PURPOSE
154 --
155 --  NOTES
156 --
157 --  HISTORY
158 --
159 --  ========================================================
160 PROCEDURE Update_Row(
161           p_membership_id    NUMBER,
162           p_object_version_number   IN NUMBER,
163           p_partner_id    NUMBER,
164           p_program_id    NUMBER,
165           p_start_date    DATE,
166           p_original_end_date    DATE,
167           p_actual_end_date    DATE,
168           p_membership_status_code    VARCHAR2,
169           p_status_reason_code    VARCHAR2,
170           p_enrl_request_id    NUMBER,
171           p_last_updated_by    NUMBER,
172           p_last_update_date    DATE,
173           p_last_update_login    NUMBER,
174 	  p_attribute1	VARCHAR2,
175 	  p_attribute2	VARCHAR2,
176 	  p_attribute3	VARCHAR2,
177 	  p_attribute4	VARCHAR2,
178 	  p_attribute5	VARCHAR2,
179 	  p_attribute6	VARCHAR2,
180 	  p_attribute7	VARCHAR2,
181 	  p_attribute8	VARCHAR2,
182 	  p_attribute9	VARCHAR2,
183 	  p_attribute10	VARCHAR2,
184 	  p_attribute11	VARCHAR2,
185 	  p_attribute12	VARCHAR2,
186 	  p_attribute13	VARCHAR2,
187 	  p_attribute14	VARCHAR2,
188 	  p_attribute15	VARCHAR2)
189 
190  IS
191  BEGIN
192     Update pv_pg_memberships
193     SET
194               membership_id = DECODE( p_membership_id, null, membership_id, FND_API.G_MISS_NUM, null, p_membership_id),
195             object_version_number = nvl(p_object_version_number,0) + 1 ,
196               partner_id = DECODE( p_partner_id, null, partner_id, FND_API.G_MISS_NUM, null, p_partner_id),
197               program_id = DECODE( p_program_id, null, program_id, FND_API.G_MISS_NUM, null, p_program_id),
198               start_date = DECODE( p_start_date, null, start_date, FND_API.G_MISS_DATE, null, p_start_date),
199               original_end_date = DECODE( p_original_end_date, null, original_end_date, FND_API.G_MISS_DATE, null, p_original_end_date),
200               actual_end_date = DECODE( p_actual_end_date, null, actual_end_date, FND_API.G_MISS_DATE, null, p_actual_end_date),
201               membership_status_code = DECODE( p_membership_status_code, null, membership_status_code, FND_API.g_miss_char, null, p_membership_status_code),
202               status_reason_code = DECODE( p_status_reason_code, null, status_reason_code, FND_API.g_miss_char, null, p_status_reason_code),
203               enrl_request_id = DECODE( p_enrl_request_id, null, enrl_request_id, FND_API.G_MISS_NUM, null, p_enrl_request_id),
204               last_updated_by = DECODE( p_last_updated_by, null, last_updated_by, FND_API.G_MISS_NUM, null, p_last_updated_by),
205               last_update_date = DECODE( p_last_update_date, null, last_update_date, FND_API.G_MISS_DATE, null, p_last_update_date),
206               last_update_login = DECODE( p_last_update_login, null, last_update_login, FND_API.G_MISS_NUM, null, p_last_update_login),
207 	      attribute1 = DECODE( p_attribute1, null, attribute1, FND_API.G_MISS_NUM, null, p_attribute1),
208 	      attribute2 = DECODE( p_attribute2, null, attribute2, FND_API.G_MISS_NUM, null, p_attribute2),
209 	      attribute3 = DECODE( p_attribute3, null, attribute3, FND_API.G_MISS_NUM, null, p_attribute3),
210 	      attribute4 = DECODE( p_attribute4, null, attribute4, FND_API.G_MISS_NUM, null, p_attribute4),
211 	      attribute5 = DECODE( p_attribute5, null, attribute5, FND_API.G_MISS_NUM, null, p_attribute5),
212 	      attribute6 = DECODE( p_attribute6, null, attribute6, FND_API.G_MISS_NUM, null, p_attribute6),
213 	      attribute7 = DECODE( p_attribute7, null, attribute7, FND_API.G_MISS_NUM, null, p_attribute7),
214 	      attribute8 = DECODE( p_attribute8, null, attribute8, FND_API.G_MISS_NUM, null, p_attribute8),
215 	      attribute9 = DECODE( p_attribute9, null, attribute9, FND_API.G_MISS_NUM, null, p_attribute9),
216 	      attribute10 = DECODE( p_attribute10, null, attribute10, FND_API.G_MISS_NUM, null, p_attribute10),
217 	      attribute11 = DECODE( p_attribute11, null, attribute11, FND_API.G_MISS_NUM, null, p_attribute11),
218 	      attribute12 = DECODE( p_attribute12, null, attribute12, FND_API.G_MISS_NUM, null, p_attribute12),
219 	      attribute13 = DECODE( p_attribute13, null, attribute13, FND_API.G_MISS_NUM, null, p_attribute13),
220 	      attribute14 = DECODE( p_attribute14, null, attribute14, FND_API.G_MISS_NUM, null, p_attribute14),
221 	      attribute15 = DECODE( p_attribute15, null, attribute15, FND_API.G_MISS_NUM, null, p_attribute15)
222    WHERE membership_id = p_membership_id
223    AND   object_version_number = p_object_version_number;
224 
225 
226    IF (SQL%NOTFOUND) THEN
227       RAISE  FND_API.G_EXC_UNEXPECTED_ERROR;
228    END IF;
229 
230 
231 END Update_Row;
232 
233 
234 
235 
236 --  ========================================================
237 --
238 --  NAME
239 --  Delete_Row
240 --
241 --  PURPOSE
242 --
243 --  NOTES
244 --
245 --  HISTORY
246 --
247 --  ========================================================
248 PROCEDURE Delete_Row(
249     p_membership_id  NUMBER,
250     p_object_version_number  NUMBER)
251  IS
252  BEGIN
253    DELETE FROM pv_pg_memberships
254     WHERE membership_id = p_membership_id
255     AND object_version_number = p_object_version_number;
256    If (SQL%NOTFOUND) then
257       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
258    End If;
259  END Delete_Row ;
260 
261 
262 
263 
264 
265 --  ========================================================
266 --
267 --  NAME
268 --  Lock_Row
269 --
270 --  PURPOSE
271 --
272 --  NOTES
273 --
274 --  HISTORY
275 --
276 --  ========================================================
277 PROCEDURE Lock_Row(
278     p_membership_id  NUMBER,
279     p_object_version_number  NUMBER)
280  IS
281    CURSOR C IS
282         SELECT *
283          FROM pv_pg_memberships
284         WHERE membership_id =  p_membership_id
285         AND object_version_number = p_object_version_number
286         FOR UPDATE OF membership_id NOWAIT;
287    Recinfo C%ROWTYPE;
288  BEGIN
289 
290    OPEN c;
291    FETCH c INTO Recinfo;
292    IF (c%NOTFOUND) THEN
293       CLOSE c;
294       AMS_Utility_PVT.error_message ('AMS_API_RECORD_NOT_FOUND');
295       RAISE FND_API.g_exc_error;
296    END IF;
297    CLOSE c;
298 END Lock_Row;
299 
300 
301 
302 END PV_Pg_Memberships_PKG;