[Home] [Help]
PACKAGE BODY: APPS.JTF_QUAL_USGS_PKG
Source
1 PACKAGE BODY JTF_QUAL_USGS_PKG AS
2 /* $Header: jtfvqlub.pls 120.0 2005/06/02 18:22:14 appldev ship $ */
3
4 PROCEDURE Insert_Row(
5 x_Rowid IN OUT NOCOPY VARCHAR2,
6 x_QUAL_USG_ID IN OUT NOCOPY NUMBER,
7 x_LAST_UPDATE_DATE IN DATE,
8 x_LAST_UPDATED_BY IN NUMBER,
9 x_CREATION_DATE IN DATE,
10 x_CREATED_BY IN NUMBER,
11 x_LAST_UPDATE_LOGIN IN NUMBER,
12 x_APPLICATION_SHORT_NAME IN VARCHAR2,
13 x_SEEDED_QUAL_ID IN NUMBER,
14 x_QUAL_TYPE_USG_ID IN NUMBER,
15 x_ENABLED_FLAG IN VARCHAR2,
16 x_QUAL_COL1 IN VARCHAR2,
17 x_QUAL_COL1_ALIAS IN VARCHAR2,
18 x_QUAL_COL1_DATATYPE IN VARCHAR2,
19 x_QUAL_COL1_TABLE IN VARCHAR2,
20 x_QUAL_COL1_TABLE_ALIAS IN VARCHAR2,
21 x_PRIM_INT_CDE_COL IN VARCHAR2,
22 x_PRIM_INT_CDE_COL_DATATYPE IN VARCHAR2,
23 x_PRIM_INT_CDE_COL_ALIAS IN VARCHAR2,
24 x_SEC_INT_CDE_COL IN VARCHAR2,
25 x_SEC_INT_CDE_COL_ALIAS IN VARCHAR2,
26 x_SEC_INT_CDE_COL_DATATYPE IN VARCHAR2,
27 x_INT_CDE_COL_TABLE IN VARCHAR2,
28 x_INT_CDE_COL_TABLE_ALIAS IN VARCHAR2,
29 x_SEEDED_FLAG IN VARCHAR2,
30 x_DISPLAY_TYPE IN VARCHAR2,
31 x_LOV_SQL IN VARCHAR2,
32 x_CONVERT_TO_ID_FLAG IN VARCHAR2,
33 x_COLUMN_COUNT IN NUMBER,
34 x_FORMATTING_FUNCTION_FLAG IN VARCHAR2,
35 x_FORMATTING_FUNCTION_NAME IN VARCHAR2,
36 x_SPECIAL_FUNCTION_FLAG IN VARCHAR2,
37 x_SPECIAL_FUNCTION_NAME IN VARCHAR2,
38 x_ENABLE_LOV_VALIDATION IN VARCHAR2,
39 x_DISPLAY_SQL1 IN VARCHAR2,
40 x_LOV_SQL2 IN VARCHAR2,
41 x_DISPLAY_SQL2 IN VARCHAR2,
42 x_LOV_SQL3 IN VARCHAR2,
43 x_DISPLAY_SQL3 IN VARCHAR2,
44 x_Org_Id IN NUMBER,
45 x_RULE1 IN VARCHAR2,
46 x_RULE2 IN VARCHAR2,
47 x_DISPLAY_SEQUENCE IN NUMBER,
48 x_DISPLAY_LENGTH IN NUMBER,
49 x_JSP_LOV_SQL IN VARCHAR2,
50 x_use_in_lookup_flag IN VARCHAR2
51 ) IS
52 CURSOR C IS SELECT rowid FROM JTF_QUAL_USGS
53 WHERE QUAL_USG_ID = x_QUAL_USG_ID;
54 CURSOR C2 IS SELECT JTF_QUAL_USGS_s.nextval FROM sys.dual;
55 BEGIN
56 If (x_QUAL_USG_ID IS NULL) then
57 OPEN C2;
58 FETCH C2 INTO x_QUAL_USG_ID;
59 CLOSE C2;
60 End If;
61 INSERT INTO JTF_QUAL_USGS(
62 QUAL_USG_ID,
63 LAST_UPDATE_DATE,
64 LAST_UPDATED_BY,
65 CREATION_DATE,
66 CREATED_BY,
67 LAST_UPDATE_LOGIN,
68 APPLICATION_SHORT_NAME,
69 SEEDED_QUAL_ID,
70 QUAL_TYPE_USG_ID,
71 ENABLED_FLAG,
72 QUAL_COL1,
73 QUAL_COL1_ALIAS,
74 QUAL_COL1_DATATYPE,
75 QUAL_COL1_TABLE,
76 QUAL_COL1_TABLE_ALIAS,
77 PRIM_INT_CDE_COL,
78 PRIM_INT_CDE_COL_DATATYPE,
79 PRIM_INT_CDE_COL_ALIAS,
80 SEC_INT_CDE_COL,
81 SEC_INT_CDE_COL_ALIAS,
82 SEC_INT_CDE_COL_DATATYPE,
83 INT_CDE_COL_TABLE,
84 INT_CDE_COL_TABLE_ALIAS,
85 SEEDED_FLAG,
86 DISPLAY_TYPE,
87 LOV_SQL,
88 CONVERT_TO_ID_FLAG,
89 COLUMN_COUNT,
90 FORMATTING_FUNCTION_FLAG,
91 FORMATTING_FUNCTION_NAME,
92 SPECIAL_FUNCTION_FLAG,
93 SPECIAL_FUNCTION_NAME,
94 ENABLE_LOV_VALIDATION,
95 DISPLAY_SQL1,
96 LOV_SQL2,
97 DISPLAY_SQL2,
98 LOV_SQL3,
99 DISPLAY_SQL3,
100 ORG_ID,
101 RULE1,
102 RULE2,
103 DISPLAY_SEQUENCE,
104 DISPLAY_LENGTH,
105 JSP_LOV_SQL,
106 use_in_lookup_flag
107 ) VALUES (
108 x_QUAL_USG_ID,
109 decode( x_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),x_LAST_UPDATE_DATE),
110 decode( x_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,x_LAST_UPDATED_BY),
111 decode( x_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),x_CREATION_DATE),
112 decode( x_CREATED_BY, FND_API.G_MISS_NUM, NULL,x_CREATED_BY),
113 decode( x_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,x_LAST_UPDATE_LOGIN),
114 decode( x_APPLICATION_SHORT_NAME, FND_API.G_MISS_CHAR, NULL,x_APPLICATION_SHORT_NAME),
115 decode( x_SEEDED_QUAL_ID, FND_API.G_MISS_NUM, NULL,x_SEEDED_QUAL_ID),
116 decode( x_QUAL_TYPE_USG_ID, FND_API.G_MISS_NUM, NULL,x_QUAL_TYPE_USG_ID),
117 decode( x_ENABLED_FLAG, FND_API.G_MISS_CHAR, NULL,x_ENABLED_FLAG),
118 decode( x_QUAL_COL1, FND_API.G_MISS_CHAR, NULL,x_QUAL_COL1),
119 decode( x_QUAL_COL1_ALIAS, FND_API.G_MISS_CHAR, NULL,x_QUAL_COL1_ALIAS),
120 decode( x_QUAL_COL1_DATATYPE, FND_API.G_MISS_CHAR, NULL,x_QUAL_COL1_DATATYPE),
121 decode( x_QUAL_COL1_TABLE, FND_API.G_MISS_CHAR, NULL,x_QUAL_COL1_TABLE),
122 decode( x_QUAL_COL1_TABLE_ALIAS, FND_API.G_MISS_CHAR, NULL,x_QUAL_COL1_TABLE_ALIAS),
123 decode( x_PRIM_INT_CDE_COL, FND_API.G_MISS_CHAR, NULL,x_PRIM_INT_CDE_COL),
124 decode( x_PRIM_INT_CDE_COL_DATATYPE, FND_API.G_MISS_CHAR, NULL,x_PRIM_INT_CDE_COL_DATATYPE),
125 decode( x_PRIM_INT_CDE_COL_ALIAS, FND_API.G_MISS_CHAR, NULL,x_PRIM_INT_CDE_COL_ALIAS),
126 decode( x_SEC_INT_CDE_COL, FND_API.G_MISS_CHAR, NULL,x_SEC_INT_CDE_COL),
127 decode( x_SEC_INT_CDE_COL_ALIAS, FND_API.G_MISS_CHAR, NULL,x_SEC_INT_CDE_COL_ALIAS),
128 decode( x_SEC_INT_CDE_COL_DATATYPE, FND_API.G_MISS_CHAR, NULL,x_SEC_INT_CDE_COL_DATATYPE),
129 decode( x_INT_CDE_COL_TABLE, FND_API.G_MISS_CHAR, NULL,x_INT_CDE_COL_TABLE),
130 decode( x_INT_CDE_COL_TABLE_ALIAS, FND_API.G_MISS_CHAR, NULL,x_INT_CDE_COL_TABLE_ALIAS),
131 decode( x_SEEDED_FLAG, FND_API.G_MISS_CHAR, NULL,x_SEEDED_FLAG),
132 decode( x_DISPLAY_TYPE, FND_API.G_MISS_CHAR, NULL,x_DISPLAY_TYPE),
133 decode( x_LOV_SQL, FND_API.G_MISS_CHAR, NULL,x_LOV_SQL ),
134 decode( x_CONVERT_TO_ID_FLAG, FND_API.G_MISS_CHAR, NULL,x_CONVERT_TO_ID_FLAG ),
135 decode( x_COLUMN_COUNT, FND_API.G_MISS_NUM, NULL, X_COLUMN_COUNT ),
136 decode( x_FORMATTING_FUNCTION_FLAG, FND_API.G_MISS_CHAR, NULL, X_FORMATTING_FUNCTION_FLAG ),
137 decode( x_FORMATTING_FUNCTION_NAME, FND_API.G_MISS_CHAR, NULL, X_FORMATTING_FUNCTION_NAME ),
138 decode( x_SPECIAL_FUNCTION_FLAG, FND_API.G_MISS_CHAR, NULL, X_SPECIAL_FUNCTION_FLAG ),
139 decode( x_SPECIAL_FUNCTION_NAME, FND_API.G_MISS_CHAR, NULL, X_SPECIAL_FUNCTION_NAME ),
140 decode( x_ENABLE_LOV_VALIDATION, FND_API.G_MISS_CHAR, NULL, X_ENABLE_LOV_VALIDATION ),
141 decode( x_DISPLAY_SQL1, FND_API.G_MISS_CHAR, NULL, X_DISPLAY_SQL1 ),
142 decode( x_LOV_SQL2, FND_API.G_MISS_CHAR, NULL, X_LOV_SQL2 ),
143 decode( x_DISPLAY_SQL2, FND_API.G_MISS_CHAR, NULL, X_DISPLAY_SQL2 ),
144 decode( x_LOV_SQL3, FND_API.G_MISS_CHAR, NULL, X_LOV_SQL3 ),
145 decode( x_DISPLAY_SQL3, FND_API.G_MISS_CHAR, NULL, X_DISPLAY_SQL3 ),
146 decode( x_ORG_ID, FND_API.G_MISS_NUM, NULL, X_ORG_ID),
147 decode( x_RULE1, FND_API.G_MISS_CHAR, NULL, X_RULE1),
148 decode( x_RULE2, FND_API.G_MISS_CHAR, NULL, X_RULE2),
149 decode( x_DISPLAY_SEQUENCE, FND_API.G_MISS_NUM, NULL, X_DISPLAY_SEQUENCE),
150 decode( x_DISPLAY_LENGTH, FND_API.G_MISS_NUM, NULL, X_DISPLAY_LENGTH),
151 decode( x_JSP_LOV_SQL, FND_API.G_MISS_CHAR, NULL, X_JSP_LOV_SQL),
152 decode( x_use_in_lookup_flag, FND_API.G_MISS_CHAR, NULL, X_use_in_lookup_flag)
153 );
154 OPEN C;
155 FETCH C INTO x_Rowid;
156 If (C%NOTFOUND) then
157 CLOSE C;
158 RAISE NO_DATA_FOUND;
159 End If;
160 End Insert_Row;
161
162
163
164 PROCEDURE Delete_Row( x_QUAL_USG_ID IN NUMBER
165 ) IS
166 BEGIN
167 DELETE FROM JTF_QUAL_USGS
168 WHERE QUAL_USG_ID = x_QUAL_USG_ID;
169 If (SQL%NOTFOUND) then
170 RAISE NO_DATA_FOUND;
171 End If;
172 END Delete_Row;
173
174
175
176 PROCEDURE Update_Row(
177 x_Rowid IN VARCHAR2,
178 x_QUAL_USG_ID IN NUMBER,
179 x_LAST_UPDATE_DATE IN DATE,
180 x_LAST_UPDATED_BY IN NUMBER,
181 x_CREATION_DATE IN DATE,
182 x_CREATED_BY IN NUMBER,
183 x_LAST_UPDATE_LOGIN IN NUMBER,
184 x_APPLICATION_SHORT_NAME IN VARCHAR2,
185 x_SEEDED_QUAL_ID IN NUMBER,
186 x_QUAL_TYPE_USG_ID IN NUMBER,
187 x_ENABLED_FLAG IN VARCHAR2,
188 x_QUAL_COL1 IN VARCHAR2,
189 x_QUAL_COL1_ALIAS IN VARCHAR2,
190 x_QUAL_COL1_DATATYPE IN VARCHAR2,
191 x_QUAL_COL1_TABLE IN VARCHAR2,
192 x_QUAL_COL1_TABLE_ALIAS IN VARCHAR2,
193 x_PRIM_INT_CDE_COL IN VARCHAR2,
194 x_PRIM_INT_CDE_COL_DATATYPE IN VARCHAR2,
195 x_PRIM_INT_CDE_COL_ALIAS IN VARCHAR2,
196 x_SEC_INT_CDE_COL IN VARCHAR2,
197 x_SEC_INT_CDE_COL_ALIAS IN VARCHAR2,
198 x_SEC_INT_CDE_COL_DATATYPE IN VARCHAR2,
199 x_INT_CDE_COL_TABLE IN VARCHAR2,
200 x_INT_CDE_COL_TABLE_ALIAS IN VARCHAR2,
201 x_SEEDED_FLAG IN VARCHAR2,
202 x_DISPLAY_TYPE IN VARCHAR2,
203 x_LOV_SQL IN VARCHAR2,
204 x_CONVERT_TO_ID_FLAG IN VARCHAR2,
205 x_COLUMN_COUNT IN NUMBER,
206 x_FORMATTING_FUNCTION_FLAG IN VARCHAR2,
207 x_FORMATTING_FUNCTION_NAME IN VARCHAR2,
208 x_SPECIAL_FUNCTION_FLAG IN VARCHAR2,
209 x_SPECIAL_FUNCTION_NAME IN VARCHAR2,
210 x_ENABLE_LOV_VALIDATION IN VARCHAR2,
211 x_DISPLAY_SQL1 IN VARCHAR2,
212 x_LOV_SQL2 IN VARCHAR2,
213 x_DISPLAY_SQL2 IN VARCHAR2,
214 x_LOV_SQL3 IN VARCHAR2,
215 x_DISPLAY_SQL3 IN VARCHAR2,
216 x_Org_Id IN NUMBER,
217 x_RULE1 IN VARCHAR2,
218 x_RULE2 IN VARCHAR2,
219 x_DISPLAY_SEQUENCE IN NUMBER,
220 x_DISPLAY_LENGTH IN NUMBER,
221 x_JSP_LOV_SQL IN VARCHAR2,
222 x_use_in_lookup_flag IN VARCHAR2
223 ) IS
224 BEGIN
225 Update JTF_QUAL_USGS
226 SET
227 QUAL_USG_ID = decode( x_QUAL_USG_ID, FND_API.G_MISS_NUM,QUAL_USG_ID,x_QUAL_USG_ID),
228 LAST_UPDATE_DATE = decode( x_LAST_UPDATE_DATE, FND_API.G_MISS_DATE,LAST_UPDATE_DATE,x_LAST_UPDATE_DATE),
229 LAST_UPDATED_BY = decode( x_LAST_UPDATED_BY, FND_API.G_MISS_NUM,LAST_UPDATED_BY,x_LAST_UPDATED_BY),
230 CREATION_DATE = decode( x_CREATION_DATE, FND_API.G_MISS_DATE,CREATION_DATE,x_CREATION_DATE),
231 CREATED_BY = decode( x_CREATED_BY, FND_API.G_MISS_NUM,CREATED_BY,x_CREATED_BY),
232 LAST_UPDATE_LOGIN = decode( x_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM,LAST_UPDATE_LOGIN,x_LAST_UPDATE_LOGIN),
233 APPLICATION_SHORT_NAME = decode( x_APPLICATION_SHORT_NAME, FND_API.G_MISS_CHAR,APPLICATION_SHORT_NAME,x_APPLICATION_SHORT_NAME),
234 SEEDED_QUAL_ID = decode( x_SEEDED_QUAL_ID, FND_API.G_MISS_NUM,SEEDED_QUAL_ID,x_SEEDED_QUAL_ID),
235 QUAL_TYPE_USG_ID = decode( x_QUAL_TYPE_USG_ID, FND_API.G_MISS_NUM,QUAL_TYPE_USG_ID,x_QUAL_TYPE_USG_ID),
236 ENABLED_FLAG = decode( x_ENABLED_FLAG, FND_API.G_MISS_CHAR,ENABLED_FLAG,x_ENABLED_FLAG),
237 QUAL_COL1 = decode( x_QUAL_COL1, FND_API.G_MISS_CHAR,QUAL_COL1,x_QUAL_COL1),
238 QUAL_COL1_ALIAS = decode( x_QUAL_COL1_ALIAS, FND_API.G_MISS_CHAR,QUAL_COL1_ALIAS,x_QUAL_COL1_ALIAS),
239 QUAL_COL1_DATATYPE = decode( x_QUAL_COL1_DATATYPE, FND_API.G_MISS_CHAR,QUAL_COL1_DATATYPE,x_QUAL_COL1_DATATYPE),
240 QUAL_COL1_TABLE = decode( x_QUAL_COL1_TABLE, FND_API.G_MISS_CHAR,QUAL_COL1_TABLE,x_QUAL_COL1_TABLE),
241 QUAL_COL1_TABLE_ALIAS = decode( x_QUAL_COL1_TABLE_ALIAS, FND_API.G_MISS_CHAR,QUAL_COL1_TABLE_ALIAS,x_QUAL_COL1_TABLE_ALIAS),
242 PRIM_INT_CDE_COL = decode( x_PRIM_INT_CDE_COL, FND_API.G_MISS_CHAR,PRIM_INT_CDE_COL,x_PRIM_INT_CDE_COL),
243 PRIM_INT_CDE_COL_DATATYPE = decode( x_PRIM_INT_CDE_COL_DATATYPE, FND_API.G_MISS_CHAR,PRIM_INT_CDE_COL_DATATYPE,x_PRIM_INT_CDE_COL_DATATYPE),
244 PRIM_INT_CDE_COL_ALIAS = decode( x_PRIM_INT_CDE_COL_ALIAS, FND_API.G_MISS_CHAR,PRIM_INT_CDE_COL_ALIAS,x_PRIM_INT_CDE_COL_ALIAS),
245 SEC_INT_CDE_COL = decode( x_SEC_INT_CDE_COL, FND_API.G_MISS_CHAR,SEC_INT_CDE_COL,x_SEC_INT_CDE_COL),
246 SEC_INT_CDE_COL_ALIAS = decode( x_SEC_INT_CDE_COL_ALIAS, FND_API.G_MISS_CHAR,SEC_INT_CDE_COL_ALIAS,x_SEC_INT_CDE_COL_ALIAS),
247 SEC_INT_CDE_COL_DATATYPE = decode( x_SEC_INT_CDE_COL_DATATYPE, FND_API.G_MISS_CHAR,SEC_INT_CDE_COL_DATATYPE,x_SEC_INT_CDE_COL_DATATYPE),
248 INT_CDE_COL_TABLE = decode( x_INT_CDE_COL_TABLE, FND_API.G_MISS_CHAR,INT_CDE_COL_TABLE,x_INT_CDE_COL_TABLE),
249 INT_CDE_COL_TABLE_ALIAS = decode( x_INT_CDE_COL_TABLE_ALIAS, FND_API.G_MISS_CHAR,INT_CDE_COL_TABLE_ALIAS,x_INT_CDE_COL_TABLE_ALIAS),
250 SEEDED_FLAG = decode( x_SEEDED_FLAG, FND_API.G_MISS_CHAR,SEEDED_FLAG,x_SEEDED_FLAG),
251 DISPLAY_TYPE = decode( x_DISPLAY_TYPE, FND_API.G_MISS_CHAR,DISPLAY_TYPE,x_DISPLAY_TYPE),
252 LOV_SQL = decode( x_LOV_SQL, FND_API.G_MISS_CHAR,LOV_SQL,x_LOV_SQL),
253 CONVERT_TO_ID_FLAG = decode( x_CONVERT_TO_ID_FLAG, FND_API.G_MISS_CHAR,CONVERT_TO_ID_FLAG, x_CONVERT_TO_ID_FLAG),
254 COLUMN_COUNT = decode(x_COLUMN_COUNT, FND_API.G_MISS_NUM, COLUMN_COUNT, X_COLUMN_COUNT),
255 FORMATTING_FUNCTION_FLAG = decode(x_FORMATTING_FUNCTION_FLAG, FND_API.G_MISS_CHAR, FORMATTING_FUNCTION_FLAG, X_FORMATTING_FUNCTION_FLAG),
256 FORMATTING_FUNCTION_NAME = decode(x_FORMATTING_FUNCTION_NAME, FND_API.G_MISS_CHAR, FORMATTING_FUNCTION_NAME, X_FORMATTING_FUNCTION_NAME),
257 SPECIAL_FUNCTION_FLAG = decode(x_SPECIAL_FUNCTION_FLAG, FND_API.G_MISS_CHAR, SPECIAL_FUNCTION_FLAG, X_SPECIAL_FUNCTION_FLAG),
258 SPECIAL_FUNCTION_NAME = decode(x_SPECIAL_FUNCTION_NAME, FND_API.G_MISS_CHAR, SPECIAL_FUNCTION_NAME, X_SPECIAL_FUNCTION_NAME),
259 ENABLE_LOV_VALIDATION = decode(x_ENABLE_LOV_VALIDATION, FND_API.G_MISS_CHAR, ENABLE_LOV_VALIDATION, X_ENABLE_LOV_VALIDATION),
260 DISPLAY_SQL1 = decode(x_DISPLAY_SQL1, FND_API.G_MISS_CHAR, DISPLAY_SQL1, X_DISPLAY_SQL1),
261 LOV_SQL2 = decode(x_LOV_SQL2, FND_API.G_MISS_CHAR, LOV_SQL2, X_LOV_SQL2),
262 DISPLAY_SQL2 = decode(x_DISPLAY_SQL2, FND_API.G_MISS_CHAR, DISPLAY_SQL2, X_DISPLAY_SQL2),
263 LOV_SQL3 = decode(x_LOV_SQL3, FND_API.G_MISS_CHAR, LOV_SQL3, X_LOV_SQL3),
264 DISPLAY_SQL3 = decode(x_DISPLAY_SQL3, FND_API.G_MISS_CHAR, DISPLAY_SQL3, X_DISPLAY_SQL3),
265 ORG_ID = decode( x_ORG_ID, FND_API.G_MISS_NUM, ORG_ID, x_ORG_ID),
266 RULE1 = decode( x_RULE1, FND_API.G_MISS_CHAR, NULL, X_RULE1),
267 RULE2 = decode( x_RULE2, FND_API.G_MISS_CHAR, NULL, X_RULE2),
268 DISPLAY_SEQUENCE = decode( x_DISPLAY_SEQUENCE, FND_API.G_MISS_NUM, NULL, X_DISPLAY_SEQUENCE),
269 DISPLAY_LENGTH = decode( x_DISPLAY_LENGTH, FND_API.G_MISS_NUM, NULL, X_DISPLAY_LENGTH),
270 JSP_LOV_SQL = decode( x_JSP_LOV_SQL, FND_API.G_MISS_CHAR, NULL, X_JSP_LOV_SQL),
271 use_in_lookup_flag = decode( x_use_in_lookup_flag, FND_API.G_MISS_CHAR, NULL, X_use_in_lookup_flag)
272 where QUAL_USG_ID = x_QUAL_USG_ID and
273 ( ORG_ID = x_ORG_ID OR ( ORG_ID IS NULL AND X_ORG_ID IS NULL)) ;
274
275 If (SQL%NOTFOUND) then
276 RAISE NO_DATA_FOUND;
277 End If;
278 END Update_Row;
279
280
281
282 PROCEDURE Lock_Row(
283 x_Rowid IN VARCHAR2,
284 x_QUAL_USG_ID IN NUMBER,
285 x_LAST_UPDATE_DATE IN DATE,
286 x_LAST_UPDATED_BY IN NUMBER,
287 x_CREATION_DATE IN DATE,
288 x_CREATED_BY IN NUMBER,
289 x_LAST_UPDATE_LOGIN IN NUMBER,
290 x_APPLICATION_SHORT_NAME IN VARCHAR2,
291 x_SEEDED_QUAL_ID IN NUMBER,
292 x_QUAL_TYPE_USG_ID IN NUMBER,
293 x_ENABLED_FLAG IN VARCHAR2,
294 x_QUAL_COL1 IN VARCHAR2,
295 x_QUAL_COL1_ALIAS IN VARCHAR2,
296 x_QUAL_COL1_DATATYPE IN VARCHAR2,
297 x_QUAL_COL1_TABLE IN VARCHAR2,
298 x_QUAL_COL1_TABLE_ALIAS IN VARCHAR2,
299 x_PRIM_INT_CDE_COL IN VARCHAR2,
300 x_PRIM_INT_CDE_COL_DATATYPE IN VARCHAR2,
301 x_PRIM_INT_CDE_COL_ALIAS IN VARCHAR2,
302 x_SEC_INT_CDE_COL IN VARCHAR2,
303 x_SEC_INT_CDE_COL_ALIAS IN VARCHAR2,
304 x_SEC_INT_CDE_COL_DATATYPE IN VARCHAR2,
305 x_INT_CDE_COL_TABLE IN VARCHAR2,
306 x_INT_CDE_COL_TABLE_ALIAS IN VARCHAR2,
307 x_SEEDED_FLAG IN VARCHAR2,
308 x_DISPLAY_TYPE IN VARCHAR2,
309 x_LOV_SQL IN VARCHAR2,
310 x_CONVERT_TO_ID_FLAG IN VARCHAR2,
311 x_COLUMN_COUNT IN NUMBER,
312 x_FORMATTING_FUNCTION_FLAG IN VARCHAR2,
313 x_FORMATTING_FUNCTION_NAME IN VARCHAR2,
314 x_SPECIAL_FUNCTION_FLAG IN VARCHAR2,
315 x_SPECIAL_FUNCTION_NAME IN VARCHAR2,
316 x_ENABLE_LOV_VALIDATION IN VARCHAR2,
317 x_DISPLAY_SQL1 IN VARCHAR2,
318 x_LOV_SQL2 IN VARCHAR2,
319 x_DISPLAY_SQL2 IN VARCHAR2,
320 x_LOV_SQL3 IN VARCHAR2,
321 x_DISPLAY_SQL3 IN VARCHAR2,
322 x_Org_Id IN NUMBER,
323 x_RULE1 IN VARCHAR2,
324 x_RULE2 IN VARCHAR2,
325 x_DISPLAY_SEQUENCE IN NUMBER,
326 x_DISPLAY_LENGTH IN NUMBER,
327 x_JSP_LOV_SQL IN VARCHAR2,
328 x_use_in_lookup_flag IN VARCHAR2
329 ) IS
330 CURSOR C IS
331 SELECT *
332 FROM JTF_QUAL_USGS
333 WHERE QUAL_USG_ID = x_QUAL_USG_ID
334 FOR UPDATE of QUAL_USG_ID NOWAIT;
335 Recinfo C%ROWTYPE;
336 BEGIN
337 OPEN C;
338 FETCH C INTO Recinfo;
339 If (C%NOTFOUND) then
340 CLOSE C;
341 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
342 APP_EXCEPTION.RAISE_EXCEPTION;
343 End If;
344 CLOSE C;
345 if (
346 ( ( Recinfo.QUAL_USG_ID = x_QUAL_USG_ID)
347 OR ( ( Recinfo.QUAL_USG_ID is NULL )
348 AND ( x_QUAL_USG_ID is NULL )))
349 AND ( ( Recinfo.LAST_UPDATE_DATE = x_LAST_UPDATE_DATE)
350 OR ( ( Recinfo.LAST_UPDATE_DATE is NULL )
351 AND ( x_LAST_UPDATE_DATE is NULL )))
352 AND ( ( Recinfo.LAST_UPDATED_BY = x_LAST_UPDATED_BY)
353 OR ( ( Recinfo.LAST_UPDATED_BY is NULL )
354 AND ( x_LAST_UPDATED_BY is NULL )))
355 AND ( ( Recinfo.CREATION_DATE = x_CREATION_DATE)
356 OR ( ( Recinfo.CREATION_DATE is NULL )
357 AND ( x_CREATION_DATE is NULL )))
358 AND ( ( Recinfo.CREATED_BY = x_CREATED_BY)
359 OR ( ( Recinfo.CREATED_BY is NULL )
360 AND ( x_CREATED_BY is NULL )))
361 AND ( ( Recinfo.LAST_UPDATE_LOGIN = x_LAST_UPDATE_LOGIN)
362 OR ( ( Recinfo.LAST_UPDATE_LOGIN is NULL )
363 AND ( x_LAST_UPDATE_LOGIN is NULL )))
364 AND ( ( Recinfo.APPLICATION_SHORT_NAME = x_APPLICATION_SHORT_NAME)
365 OR ( ( Recinfo.APPLICATION_SHORT_NAME is NULL )
366 AND ( x_APPLICATION_SHORT_NAME is NULL )))
367 AND ( ( Recinfo.SEEDED_QUAL_ID = x_SEEDED_QUAL_ID)
368 OR ( ( Recinfo.SEEDED_QUAL_ID is NULL )
369 AND ( x_SEEDED_QUAL_ID is NULL )))
370 AND ( ( Recinfo.QUAL_TYPE_USG_ID = x_QUAL_TYPE_USG_ID)
371 OR ( ( Recinfo.QUAL_TYPE_USG_ID is NULL )
372 AND ( x_QUAL_TYPE_USG_ID is NULL )))
373 AND ( ( Recinfo.ENABLED_FLAG = x_ENABLED_FLAG)
374 OR ( ( Recinfo.ENABLED_FLAG is NULL )
375 AND ( x_ENABLED_FLAG is NULL )))
376 AND ( ( Recinfo.QUAL_COL1 = x_QUAL_COL1)
377 OR ( ( Recinfo.QUAL_COL1 is NULL )
378 AND ( x_QUAL_COL1 is NULL )))
379 AND ( ( Recinfo.QUAL_COL1_ALIAS = x_QUAL_COL1_ALIAS)
380 OR ( ( Recinfo.QUAL_COL1_ALIAS is NULL )
381 AND ( x_QUAL_COL1_ALIAS is NULL )))
382 AND ( ( Recinfo.QUAL_COL1_DATATYPE = x_QUAL_COL1_DATATYPE)
383 OR ( ( Recinfo.QUAL_COL1_DATATYPE is NULL )
384 AND ( x_QUAL_COL1_DATATYPE is NULL )))
385 AND ( ( Recinfo.QUAL_COL1_TABLE = x_QUAL_COL1_TABLE)
386 OR ( ( Recinfo.QUAL_COL1_TABLE is NULL )
387 AND ( x_QUAL_COL1_TABLE is NULL )))
388 AND ( ( Recinfo.QUAL_COL1_TABLE_ALIAS = x_QUAL_COL1_TABLE_ALIAS)
389 OR ( ( Recinfo.QUAL_COL1_TABLE_ALIAS is NULL )
390 AND ( x_QUAL_COL1_TABLE_ALIAS is NULL )))
391 AND ( ( Recinfo.PRIM_INT_CDE_COL = x_PRIM_INT_CDE_COL)
392 OR ( ( Recinfo.PRIM_INT_CDE_COL is NULL )
393 AND ( x_PRIM_INT_CDE_COL is NULL )))
394 AND ( ( Recinfo.PRIM_INT_CDE_COL_DATATYPE = x_PRIM_INT_CDE_COL_DATATYPE)
395 OR ( ( Recinfo.PRIM_INT_CDE_COL_DATATYPE is NULL )
396 AND ( x_PRIM_INT_CDE_COL_DATATYPE is NULL )))
397 AND ( ( Recinfo.PRIM_INT_CDE_COL_ALIAS = x_PRIM_INT_CDE_COL_ALIAS)
398 OR ( ( Recinfo.PRIM_INT_CDE_COL_ALIAS is NULL )
399 AND ( x_PRIM_INT_CDE_COL_ALIAS is NULL )))
400 AND ( ( Recinfo.SEC_INT_CDE_COL = x_SEC_INT_CDE_COL)
401 OR ( ( Recinfo.SEC_INT_CDE_COL is NULL )
402 AND ( x_SEC_INT_CDE_COL is NULL )))
403 AND ( ( Recinfo.SEC_INT_CDE_COL_ALIAS = x_SEC_INT_CDE_COL_ALIAS)
404 OR ( ( Recinfo.SEC_INT_CDE_COL_ALIAS is NULL )
405 AND ( x_SEC_INT_CDE_COL_ALIAS is NULL )))
406 AND ( ( Recinfo.SEC_INT_CDE_COL_DATATYPE = x_SEC_INT_CDE_COL_DATATYPE)
407 OR ( ( Recinfo.SEC_INT_CDE_COL_DATATYPE is NULL )
408 AND ( x_SEC_INT_CDE_COL_DATATYPE is NULL )))
409 AND ( ( Recinfo.INT_CDE_COL_TABLE = x_INT_CDE_COL_TABLE)
410 OR ( ( Recinfo.INT_CDE_COL_TABLE is NULL )
411 AND ( x_INT_CDE_COL_TABLE is NULL )))
412 AND ( ( Recinfo.INT_CDE_COL_TABLE_ALIAS = x_INT_CDE_COL_TABLE_ALIAS)
413 OR ( ( Recinfo.INT_CDE_COL_TABLE_ALIAS is NULL )
414 AND ( x_INT_CDE_COL_TABLE_ALIAS is NULL )))
415 AND ( ( Recinfo.SEEDED_FLAG = x_SEEDED_FLAG)
416 OR ( ( Recinfo.SEEDED_FLAG is NULL )
417 AND ( x_SEEDED_FLAG is NULL )))
418 AND ( ( Recinfo.DISPLAY_TYPE = x_DISPLAY_TYPE)
419 OR ( ( Recinfo.DISPLAY_TYPE is NULL )
420 AND ( x_DISPLAY_TYPE is NULL )))
421 AND ( ( Recinfo.LOV_SQL = x_LOV_SQL)
422 OR ( ( Recinfo.LOV_SQL is NULL )
423 AND ( x_LOV_SQL is NULL )))
424 AND ( ( Recinfo.CONVERT_TO_ID_FLAG = x_CONVERT_TO_ID_FLAG)
425 OR ( ( Recinfo.CONVERT_TO_ID_FLAG is NULL )
426 AND ( x_CONVERT_TO_ID_FLAG is NULL )))
427 AND ( ( Recinfo.COLUMN_COUNT = x_COLUMN_COUNT)
428 OR ( ( Recinfo.COLUMN_COUNT IS NULL )
429 AND ( X_COLUMN_COUNT IS NULL )))
430 AND ( ( Recinfo.FORMATTING_FUNCTION_FLAG = x_FORMATTING_FUNCTION_FLAG )
431 OR ( ( Recinfo.FORMATTING_FUNCTION_FLAG IS NULL )
432 AND ( X_FORMATTING_FUNCTION_FLAG IS NULL )))
433 AND ( ( Recinfo.FORMATTING_FUNCTION_NAME = x_FORMATTING_FUNCTION_NAME )
434 OR ( ( Recinfo.FORMATTING_FUNCTION_NAME IS NULL )
435 AND ( X_FORMATTING_FUNCTION_NAME IS NULL )))
436 AND ( ( Recinfo.SPECIAL_FUNCTION_FLAG = x_SPECIAL_FUNCTION_FLAG )
437 OR ( ( Recinfo.SPECIAL_FUNCTION_FLAG IS NULL )
438 AND ( X_SPECIAL_FUNCTION_FLAG IS NULL )))
439 AND ( ( Recinfo.SPECIAL_FUNCTION_NAME = x_SPECIAL_FUNCTION_NAME )
440 OR ( ( Recinfo.SPECIAL_FUNCTION_NAME IS NULL )
441 AND ( X_SPECIAL_FUNCTION_NAME IS NULL )))
442 AND ( ( Recinfo.ENABLE_LOV_VALIDATION = x_ENABLE_LOV_VALIDATION )
443 OR ( ( Recinfo.ENABLE_LOV_VALIDATION IS NULL )
444 AND ( X_ENABLE_LOV_VALIDATION IS NULL )))
445 AND ( ( Recinfo.DISPLAY_SQL1 = x_DISPLAY_SQL1 )
446 OR ( ( Recinfo.DISPLAY_SQL1 IS NULL )
447 AND ( X_DISPLAY_SQL1 IS NULL )))
448 AND ( ( Recinfo.LOV_SQL2 = x_LOV_SQL2 )
449 OR ( ( Recinfo.LOV_SQL2 IS NULL )
450 AND ( X_LOV_SQL2 IS NULL )))
451 AND ( ( Recinfo.DISPLAY_SQL2 = x_DISPLAY_SQL2)
452 OR ( ( Recinfo.DISPLAY_SQL2 IS NULL )
453 AND ( X_DISPLAY_SQL2 IS NULL )))
454 AND ( ( Recinfo.LOV_SQL3 = x_LOV_SQL3)
455 OR ( ( Recinfo.LOV_SQL3 IS NULL )
456 AND ( X_LOV_SQL3 IS NULL )))
457 AND ( ( Recinfo.DISPLAY_SQL3 = x_DISPLAY_SQL3)
458 OR ( ( Recinfo.DISPLAY_SQL3 IS NULL )
459 AND ( X_DISPLAY_SQL3 IS NULL )))
460 AND ( ( Recinfo.ORG_ID = x_ORG_ID)
461 OR ( ( Recinfo.ORG_ID is NULL )
462 AND ( x_ORG_ID is NULL )))
463 AND ( ( Recinfo.RULE1 = x_RULE1 )
464 OR ( ( Recinfo.RULE1 IS NULL )
465 AND ( X_RULE1 IS NULL )))
466 AND ( ( Recinfo.RULE2 = X_RULE2 )
467 OR ( ( Recinfo.RULE2 IS NULL )
468 AND ( X_RULE2 IS NULL )))
469 AND ( ( Recinfo.DISPLAY_SEQUENCE = x_DISPLAY_SEQUENCE)
470 OR ( ( Recinfo.DISPLAY_SEQUENCE IS NULL )
471 AND ( X_DISPLAY_SEQUENCE IS NULL )))
472 AND ( ( Recinfo.DISPLAY_LENGTH = x_DISPLAY_LENGTH)
473 OR ( ( Recinfo.DISPLAY_LENGTH IS NULL )
474 AND ( X_DISPLAY_LENGTH IS NULL )))
475 AND ( ( Recinfo.JSP_LOV_SQL = x_JSP_LOV_SQL)
476 OR ( ( Recinfo.JSP_LOV_SQL is NULL )
477 AND ( x_JSP_LOV_SQL is NULL )))
478 AND ( ( Recinfo.use_in_lookup_flag = x_use_in_lookup_flag)
479 OR ( ( Recinfo.use_in_lookup_flag is NULL )
480 AND ( x_use_in_lookup_flag is NULL ))) ) then
481 return;
482 else
483 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
484 APP_EXCEPTION.RAISE_EXCEPTION;
485 End If;
486 END Lock_Row;
487
488 END JTF_QUAL_USGS_PKG;