[Home] [Help]
PACKAGE BODY: APPS.CSI_I_VERSION_LABELS_PKG
Source
1 PACKAGE BODY CSI_I_VERSION_LABELS_PKG as
2 /* $Header: csitverb.pls 115.12 2003/09/04 00:23:50 sguthiva ship $ */
3
4
5 G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSI_I_VERSION_LABELS_PKG';
6 G_FILE_NAME CONSTANT VARCHAR2(12) := 'csitverb.pls';
7
8 PROCEDURE Insert_Row(
9 p_VERSION_LABEL_ID IN OUT NOCOPY NUMBER,
10 p_INSTANCE_ID NUMBER,
11 p_VERSION_LABEL VARCHAR2,
12 p_DATE_TIME_STAMP DATE,
13 p_DESCRIPTION VARCHAR2,
14 p_ACTIVE_START_DATE DATE,
15 p_ACTIVE_END_DATE DATE,
16 p_CONTEXT VARCHAR2,
17 p_ATTRIBUTE1 VARCHAR2,
18 p_ATTRIBUTE2 VARCHAR2,
19 p_ATTRIBUTE3 VARCHAR2,
20 p_ATTRIBUTE4 VARCHAR2,
21 p_ATTRIBUTE5 VARCHAR2,
22 p_ATTRIBUTE6 VARCHAR2,
23 p_ATTRIBUTE7 VARCHAR2,
24 p_ATTRIBUTE8 VARCHAR2,
25 p_ATTRIBUTE9 VARCHAR2,
26 p_ATTRIBUTE10 VARCHAR2,
27 p_ATTRIBUTE11 VARCHAR2,
28 p_ATTRIBUTE12 VARCHAR2,
29 p_ATTRIBUTE13 VARCHAR2,
30 p_ATTRIBUTE14 VARCHAR2,
31 p_ATTRIBUTE15 VARCHAR2,
32 p_CREATED_BY NUMBER,
33 p_CREATION_DATE DATE,
34 p_LAST_UPDATED_BY NUMBER,
35 p_LAST_UPDATE_DATE DATE,
36 p_LAST_UPDATE_LOGIN NUMBER,
37 p_OBJECT_VERSION_NUMBER NUMBER)
38
39 IS
40 CURSOR C2 IS SELECT CSI_I_VERSION_LABELS_S.nextval FROM sys.dual;
41 BEGIN
42 If (p_VERSION_LABEL_ID IS NULL) OR (p_VERSION_LABEL_ID = FND_API.G_MISS_NUM) then
43 OPEN C2;
44 FETCH C2 INTO p_VERSION_LABEL_ID;
45 CLOSE C2;
46 End If;
47 INSERT INTO CSI_I_VERSION_LABELS(
48 VERSION_LABEL_ID,
49 INSTANCE_ID,
50 VERSION_LABEL,
51 DATE_TIME_STAMP,
52 DESCRIPTION,
53 ACTIVE_START_DATE,
54 ACTIVE_END_DATE,
55 CONTEXT,
56 ATTRIBUTE1,
57 ATTRIBUTE2,
58 ATTRIBUTE3,
59 ATTRIBUTE4,
60 ATTRIBUTE5,
61 ATTRIBUTE6,
62 ATTRIBUTE7,
63 ATTRIBUTE8,
64 ATTRIBUTE9,
65 ATTRIBUTE10,
66 ATTRIBUTE11,
67 ATTRIBUTE12,
68 ATTRIBUTE13,
69 ATTRIBUTE14,
70 ATTRIBUTE15,
71 CREATED_BY,
72 CREATION_DATE,
73 LAST_UPDATED_BY,
74 LAST_UPDATE_DATE,
75 LAST_UPDATE_LOGIN,
76 OBJECT_VERSION_NUMBER
77 ) VALUES (
78 p_VERSION_LABEL_ID,
79 decode( p_INSTANCE_ID, FND_API.G_MISS_NUM, NULL, p_INSTANCE_ID),
80 decode( p_VERSION_LABEL, FND_API.G_MISS_CHAR, NULL, p_VERSION_LABEL),
81 decode( p_DATE_TIME_STAMP, FND_API.G_MISS_DATE, TO_DATE(NULL), p_DATE_TIME_STAMP),
82 decode( p_DESCRIPTION, FND_API.G_MISS_CHAR, NULL, p_DESCRIPTION),
83 decode( p_ACTIVE_START_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_ACTIVE_START_DATE),
84 decode( p_ACTIVE_END_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_ACTIVE_END_DATE),
85 decode( p_CONTEXT, FND_API.G_MISS_CHAR, NULL, p_CONTEXT),
86 decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1),
87 decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2),
88 decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3),
89 decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4),
90 decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5),
91 decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6),
92 decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7),
93 decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8),
94 decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9),
95 decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10),
96 decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11),
97 decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12),
98 decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13),
99 decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14),
100 decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15),
101 decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY),
102 decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_CREATION_DATE),
103 decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATED_BY),
104 decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE),
105 decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN),
106 decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, p_OBJECT_VERSION_NUMBER));
107 End Insert_Row;
108
109 PROCEDURE Update_Row(
110 p_VERSION_LABEL_ID NUMBER,
111 p_INSTANCE_ID NUMBER,
112 p_VERSION_LABEL VARCHAR2,
113 p_DATE_TIME_STAMP DATE,
114 p_DESCRIPTION VARCHAR2,
115 p_ACTIVE_START_DATE DATE,
116 p_ACTIVE_END_DATE DATE,
117 p_CONTEXT VARCHAR2,
118 p_ATTRIBUTE1 VARCHAR2,
119 p_ATTRIBUTE2 VARCHAR2,
120 p_ATTRIBUTE3 VARCHAR2,
121 p_ATTRIBUTE4 VARCHAR2,
122 p_ATTRIBUTE5 VARCHAR2,
123 p_ATTRIBUTE6 VARCHAR2,
124 p_ATTRIBUTE7 VARCHAR2,
125 p_ATTRIBUTE8 VARCHAR2,
126 p_ATTRIBUTE9 VARCHAR2,
127 p_ATTRIBUTE10 VARCHAR2,
128 p_ATTRIBUTE11 VARCHAR2,
129 p_ATTRIBUTE12 VARCHAR2,
130 p_ATTRIBUTE13 VARCHAR2,
131 p_ATTRIBUTE14 VARCHAR2,
132 p_ATTRIBUTE15 VARCHAR2,
133 p_CREATED_BY NUMBER,
134 p_CREATION_DATE DATE,
135 p_LAST_UPDATED_BY NUMBER,
136 p_LAST_UPDATE_DATE DATE,
137 p_LAST_UPDATE_LOGIN NUMBER,
138 p_OBJECT_VERSION_NUMBER NUMBER)
139
140 IS
141 BEGIN
142 Update CSI_I_VERSION_LABELS
143 SET
144 INSTANCE_ID = decode( p_INSTANCE_ID, FND_API.G_MISS_NUM, INSTANCE_ID, p_INSTANCE_ID),
145 VERSION_LABEL = decode( p_VERSION_LABEL, FND_API.G_MISS_CHAR, VERSION_LABEL, p_VERSION_LABEL),
146 DATE_TIME_STAMP = decode( p_DATE_TIME_STAMP, FND_API.G_MISS_DATE, DATE_TIME_STAMP, p_DATE_TIME_STAMP),
147 DESCRIPTION = decode( p_DESCRIPTION, FND_API.G_MISS_CHAR, DESCRIPTION, p_DESCRIPTION),
148 ACTIVE_START_DATE = decode( p_ACTIVE_START_DATE, FND_API.G_MISS_DATE, ACTIVE_START_DATE, p_ACTIVE_START_DATE),
149 ACTIVE_END_DATE = decode( p_ACTIVE_END_DATE, FND_API.G_MISS_DATE, ACTIVE_END_DATE, p_ACTIVE_END_DATE),
150 CONTEXT = decode( p_CONTEXT, FND_API.G_MISS_CHAR, CONTEXT, p_CONTEXT),
151 ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1, p_ATTRIBUTE1),
152 ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2, p_ATTRIBUTE2),
153 ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3, p_ATTRIBUTE3),
154 ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4, p_ATTRIBUTE4),
155 ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5, p_ATTRIBUTE5),
156 ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6, p_ATTRIBUTE6),
157 ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7, p_ATTRIBUTE7),
158 ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8, p_ATTRIBUTE8),
159 ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9, p_ATTRIBUTE9),
160 ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10, p_ATTRIBUTE10),
161 ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11, p_ATTRIBUTE11),
162 ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12, p_ATTRIBUTE12),
163 ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13, p_ATTRIBUTE13),
164 ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14, p_ATTRIBUTE14),
165 ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15, p_ATTRIBUTE15),
166 CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY),
167 CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),
168 LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY),
169 LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
170 LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN),
171 OBJECT_VERSION_NUMBER = decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, OBJECT_VERSION_NUMBER, p_OBJECT_VERSION_NUMBER)
172 where VERSION_LABEL_ID = p_VERSION_LABEL_ID;
173
174 If (SQL%NOTFOUND) then
175 RAISE NO_DATA_FOUND;
176 End If;
177 END Update_Row;
178
179 PROCEDURE Delete_Row(
180 p_VERSION_LABEL_ID NUMBER)
181 IS
182 BEGIN
183 DELETE FROM CSI_I_VERSION_LABELS
184 WHERE VERSION_LABEL_ID = p_VERSION_LABEL_ID;
185 If (SQL%NOTFOUND) then
186 RAISE NO_DATA_FOUND;
187 End If;
188 END Delete_Row;
189
190 PROCEDURE Lock_Row(
191 p_VERSION_LABEL_ID NUMBER,
192 p_INSTANCE_ID NUMBER,
193 p_VERSION_LABEL VARCHAR2,
194 p_DATE_TIME_STAMP DATE,
195 p_DESCRIPTION VARCHAR2,
196 p_ACTIVE_START_DATE DATE,
197 p_ACTIVE_END_DATE DATE,
198 p_CONTEXT VARCHAR2,
199 p_ATTRIBUTE1 VARCHAR2,
200 p_ATTRIBUTE2 VARCHAR2,
201 p_ATTRIBUTE3 VARCHAR2,
202 p_ATTRIBUTE4 VARCHAR2,
203 p_ATTRIBUTE5 VARCHAR2,
204 p_ATTRIBUTE6 VARCHAR2,
205 p_ATTRIBUTE7 VARCHAR2,
206 p_ATTRIBUTE8 VARCHAR2,
207 p_ATTRIBUTE9 VARCHAR2,
208 p_ATTRIBUTE10 VARCHAR2,
209 p_ATTRIBUTE11 VARCHAR2,
210 p_ATTRIBUTE12 VARCHAR2,
211 p_ATTRIBUTE13 VARCHAR2,
212 p_ATTRIBUTE14 VARCHAR2,
213 p_ATTRIBUTE15 VARCHAR2,
214 p_CREATED_BY NUMBER,
215 p_CREATION_DATE DATE,
216 p_LAST_UPDATED_BY NUMBER,
217 p_LAST_UPDATE_DATE DATE,
218 p_LAST_UPDATE_LOGIN NUMBER,
219 p_OBJECT_VERSION_NUMBER NUMBER)
220
221 IS
222 CURSOR C IS
223 SELECT *
224 FROM CSI_I_VERSION_LABELS
225 WHERE VERSION_LABEL_ID = p_VERSION_LABEL_ID
226 FOR UPDATE of VERSION_LABEL_ID NOWAIT;
227 Recinfo C%ROWTYPE;
228 BEGIN
229 OPEN C;
230 FETCH C INTO Recinfo;
231 If (C%NOTFOUND) then
232 CLOSE C;
233 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
234 APP_EXCEPTION.RAISE_EXCEPTION;
235 End If;
236 CLOSE C;
237 if (
238 ( Recinfo.VERSION_LABEL_ID = p_VERSION_LABEL_ID)
239 AND ( ( Recinfo.INSTANCE_ID = p_INSTANCE_ID)
240 OR ( ( Recinfo.INSTANCE_ID IS NULL )
241 AND ( p_INSTANCE_ID IS NULL )))
242 AND ( ( Recinfo.VERSION_LABEL = p_VERSION_LABEL)
243 OR ( ( Recinfo.VERSION_LABEL IS NULL )
244 AND ( p_VERSION_LABEL IS NULL )))
245 AND ( ( Recinfo.DATE_TIME_STAMP = p_DATE_TIME_STAMP)
246 OR ( ( Recinfo.DATE_TIME_STAMP IS NULL )
247 AND ( p_DATE_TIME_STAMP IS NULL )))
248 AND ( ( Recinfo.DESCRIPTION = p_DESCRIPTION)
249 OR ( ( Recinfo.DESCRIPTION IS NULL )
250 AND ( p_DESCRIPTION IS NULL )))
251 AND ( ( Recinfo.ACTIVE_START_DATE = p_ACTIVE_START_DATE)
252 OR ( ( Recinfo.ACTIVE_START_DATE IS NULL )
253 AND ( p_ACTIVE_START_DATE IS NULL )))
254 AND ( ( Recinfo.ACTIVE_END_DATE = p_ACTIVE_END_DATE)
255 OR ( ( Recinfo.ACTIVE_END_DATE IS NULL )
256 AND ( p_ACTIVE_END_DATE IS NULL )))
257 AND ( ( Recinfo.CONTEXT = p_CONTEXT)
258 OR ( ( Recinfo.CONTEXT IS NULL )
259 AND ( p_CONTEXT IS NULL )))
260 AND ( ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
261 OR ( ( Recinfo.ATTRIBUTE1 IS NULL )
262 AND ( p_ATTRIBUTE1 IS NULL )))
263 AND ( ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
264 OR ( ( Recinfo.ATTRIBUTE2 IS NULL )
265 AND ( p_ATTRIBUTE2 IS NULL )))
266 AND ( ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
270 OR ( ( Recinfo.ATTRIBUTE4 IS NULL )
267 OR ( ( Recinfo.ATTRIBUTE3 IS NULL )
268 AND ( p_ATTRIBUTE3 IS NULL )))
269 AND ( ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
271 AND ( p_ATTRIBUTE4 IS NULL )))
272 AND ( ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
273 OR ( ( Recinfo.ATTRIBUTE5 IS NULL )
274 AND ( p_ATTRIBUTE5 IS NULL )))
275 AND ( ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
276 OR ( ( Recinfo.ATTRIBUTE6 IS NULL )
277 AND ( p_ATTRIBUTE6 IS NULL )))
278 AND ( ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
279 OR ( ( Recinfo.ATTRIBUTE7 IS NULL )
280 AND ( p_ATTRIBUTE7 IS NULL )))
281 AND ( ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
282 OR ( ( Recinfo.ATTRIBUTE8 IS NULL )
283 AND ( p_ATTRIBUTE8 IS NULL )))
284 AND ( ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
285 OR ( ( Recinfo.ATTRIBUTE9 IS NULL )
286 AND ( p_ATTRIBUTE9 IS NULL )))
287 AND ( ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
288 OR ( ( Recinfo.ATTRIBUTE10 IS NULL )
289 AND ( p_ATTRIBUTE10 IS NULL )))
290 AND ( ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
291 OR ( ( Recinfo.ATTRIBUTE11 IS NULL )
292 AND ( p_ATTRIBUTE11 IS NULL )))
293 AND ( ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
294 OR ( ( Recinfo.ATTRIBUTE12 IS NULL )
295 AND ( p_ATTRIBUTE12 IS NULL )))
296 AND ( ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
297 OR ( ( Recinfo.ATTRIBUTE13 IS NULL )
298 AND ( p_ATTRIBUTE13 IS NULL )))
299 AND ( ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
300 OR ( ( Recinfo.ATTRIBUTE14 IS NULL )
301 AND ( p_ATTRIBUTE14 IS NULL )))
302 AND ( ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
303 OR ( ( Recinfo.ATTRIBUTE15 IS NULL )
304 AND ( p_ATTRIBUTE15 IS NULL )))
305 AND ( ( Recinfo.CREATED_BY = p_CREATED_BY)
306 OR ( ( Recinfo.CREATED_BY IS NULL )
307 AND ( p_CREATED_BY IS NULL )))
308 AND ( ( Recinfo.CREATION_DATE = p_CREATION_DATE)
309 OR ( ( Recinfo.CREATION_DATE IS NULL )
310 AND ( p_CREATION_DATE IS NULL )))
311 AND ( ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
312 OR ( ( Recinfo.LAST_UPDATED_BY IS NULL )
313 AND ( p_LAST_UPDATED_BY IS NULL )))
314 AND ( ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
315 OR ( ( Recinfo.LAST_UPDATE_DATE IS NULL )
316 AND ( p_LAST_UPDATE_DATE IS NULL )))
317 AND ( ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
318 OR ( ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
319 AND ( p_LAST_UPDATE_LOGIN IS NULL )))
320 AND ( ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER)
321 OR ( ( Recinfo.OBJECT_VERSION_NUMBER IS NULL )
322 AND ( p_OBJECT_VERSION_NUMBER IS NULL )))
323 ) then
324 return;
325 else
326 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
327 APP_EXCEPTION.RAISE_EXCEPTION;
328 End If;
329 END Lock_Row;
330
331 End CSI_I_VERSION_LABELS_PKG;
332