[Home] [Help]
PACKAGE BODY: APPS.IEX_REPOSSESSIONS_PKG
Source
1 PACKAGE BODY IEX_REPOSSESSIONS_PKG as
2 /* $Header: iextrpsb.pls 120.1 2007/10/30 20:27:09 ehuh ship $ */
3 -- Start of Comments
4 -- Package name : IEX_REPOSSESSIONS_PKG
5 -- Purpose :
6 -- History :
7 -- NOTE :
8 -- End of Comments
9
10
11 G_PKG_NAME CONSTANT VARCHAR2(30):= 'IEX_REPOSSESSIONS_PKG';
12 G_FILE_NAME CONSTANT VARCHAR2(12) := 'iextrpsb.pls';
13
14 PG_DEBUG NUMBER(2) := TO_NUMBER(NVL(FND_PROFILE.value('IEX_DEBUG_LEVEL'), '20'));
15
16 PROCEDURE Insert_Row(
17 px_REPOSSESSION_ID IN OUT NOCOPY NUMBER
18 ,p_DELINQUENCY_ID NUMBER
19 ,p_PARTY_ID NUMBER
20 ,p_CUST_ACCOUNT_ID NUMBER
21 ,p_UNPAID_REASON_CODE VARCHAR2
22 ,p_REMARKET_FLAG VARCHAR2
23 ,p_REPOSSESSION_DATE DATE
24 ,p_ASSET_ID NUMBER
25 ,p_ASSET_VALUE NUMBER
26 ,p_ASSET_NUMBER NUMBER
27 ,p_REQUEST_ID NUMBER
28 ,p_PROGRAM_APPLICATION_ID NUMBER
29 ,p_PROGRAM_ID NUMBER
30 ,p_PROGRAM_UPDATE_DATE DATE
31 ,p_ATTRIBUTE_CATEGORY VARCHAR2
32 ,p_ATTRIBUTE1 VARCHAR2
33 ,p_ATTRIBUTE2 VARCHAR2
34 ,p_ATTRIBUTE3 VARCHAR2
35 ,p_ATTRIBUTE4 VARCHAR2
36 ,p_ATTRIBUTE5 VARCHAR2
37 ,p_ATTRIBUTE6 VARCHAR2
38 ,p_ATTRIBUTE7 VARCHAR2
39 ,p_ATTRIBUTE8 VARCHAR2
40 ,p_ATTRIBUTE9 VARCHAR2
41 ,p_ATTRIBUTE10 VARCHAR2
42 ,p_ATTRIBUTE11 VARCHAR2
43 ,p_ATTRIBUTE12 VARCHAR2
44 ,p_ATTRIBUTE13 VARCHAR2
45 ,p_ATTRIBUTE14 VARCHAR2
46 ,p_ATTRIBUTE15 VARCHAR2
47 ,p_CREATED_BY NUMBER
48 ,p_CREATION_DATE DATE
49 ,p_LAST_UPDATED_BY NUMBER
50 ,p_LAST_UPDATE_DATE DATE
51 ,p_LAST_UPDATE_LOGIN NUMBER
52 ,p_CREDIT_HOLD_REQUEST_FLAG VARCHAR2
53 ,p_CREDIT_HOLD_APPROVED_FLAG VARCHAR2
54 ,p_SERVICE_HOLD_REQUEST_FLAG VARCHAR2
55 ,p_SERVICE_HOLD_APPROVED_FLAG VARCHAR2
56 ,p_SUGGESTION_APPROVED_FLAG VARCHAR2
57 ,p_DISPOSITION_CODE VARCHAR2
58 ,p_CUSTOMER_SITE_USE_ID NUMBER
59 ,p_ORG_ID NUMBER
60 ,p_CONTRACT_ID NUMBER
61 ,p_CONTRACT_NUMBER VARCHAR2
62 )
63
64 IS
65 CURSOR C2 IS SELECT IEX_REPOSSESSIONS_S.nextval FROM sys.dual;
66 BEGIN
67 If (px_REPOSSESSION_ID IS NULL) OR (px_REPOSSESSION_ID = FND_API.G_MISS_NUM) then
68 OPEN C2;
69 FETCH C2 INTO px_REPOSSESSION_ID;
70 CLOSE C2;
71 End If;
72 INSERT INTO IEX_REPOSSESSIONS(
73 REPOSSESSION_ID
74 ,DELINQUENCY_ID
75 ,PARTY_ID
76 ,CUST_ACCOUNT_ID
77 ,UNPAID_REASON_CODE
78 ,REMARKET_FLAG
79 ,REPOSSESSION_DATE
80 ,ASSET_ID
81 ,ASSET_VALUE
82 ,ASSET_NUMBER
83 ,REQUEST_ID
84 ,PROGRAM_APPLICATION_ID
85 ,PROGRAM_ID
86 ,PROGRAM_UPDATE_DATE
87 ,ATTRIBUTE_CATEGORY
88 ,ATTRIBUTE1
89 ,ATTRIBUTE2
90 ,ATTRIBUTE3
91 ,ATTRIBUTE4
92 ,ATTRIBUTE5
93 ,ATTRIBUTE6
94 ,ATTRIBUTE7
95 ,ATTRIBUTE8
96 ,ATTRIBUTE9
97 ,ATTRIBUTE10
98 ,ATTRIBUTE11
99 ,ATTRIBUTE12
100 ,ATTRIBUTE13
101 ,ATTRIBUTE14
102 ,ATTRIBUTE15
103 ,CREATED_BY
104 ,CREATION_DATE
105 ,LAST_UPDATED_BY
106 ,LAST_UPDATE_DATE
107 ,LAST_UPDATE_LOGIN
108 ,CREDIT_HOLD_REQUEST_FLAG
109 ,CREDIT_HOLD_APPROVED_FLAG
110 ,SERVICE_HOLD_REQUEST_FLAG
111 ,SERVICE_HOLD_APPROVED_FLAG
112 ,SUGGESTION_APPROVED_FLAG
113 ,DISPOSITION_CODE
114 ,CUSTOMER_SITE_USE_ID
115 ,ORG_ID
116 ,CONTRACT_ID
117 ,CONTRACT_NUMBER
118
119 ) VALUES (
120 px_REPOSSESSION_ID
121 ,decode( p_DELINQUENCY_ID, FND_API.G_MISS_NUM, NULL, p_DELINQUENCY_ID)
122 ,decode( p_PARTY_ID, FND_API.G_MISS_NUM, NULL, p_PARTY_ID)
123 ,decode( p_CUST_ACCOUNT_ID, FND_API.G_MISS_NUM, NULL, p_CUST_ACCOUNT_ID)
124 ,decode( p_UNPAID_REASON_CODE, FND_API.G_MISS_CHAR, NULL, p_UNPAID_REASON_CODE)
125 ,decode( p_REMARKET_FLAG, FND_API.G_MISS_CHAR, NULL, p_REMARKET_FLAG)
126 ,decode( p_REPOSSESSION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_REPOSSESSION_DATE)
127 ,decode( p_ASSET_ID, FND_API.G_MISS_NUM, NULL, p_ASSET_ID)
128 ,decode( p_ASSET_VALUE, FND_API.G_MISS_NUM, NULL, p_ASSET_VALUE)
129 ,decode( p_ASSET_NUMBER, FND_API.G_MISS_NUM, NULL, p_ASSET_NUMBER)
130 ,decode( p_REQUEST_ID, FND_API.G_MISS_NUM, NULL, p_REQUEST_ID)
131 ,decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, NULL, p_PROGRAM_APPLICATION_ID)
132 ,decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, NULL, p_PROGRAM_ID)
133 ,decode( p_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_PROGRAM_UPDATE_DATE)
134 ,decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE_CATEGORY)
135 ,decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1)
136 ,decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2)
137 ,decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3)
138 ,decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4)
139 ,decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5)
140 ,decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6)
141 ,decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7)
142 ,decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8)
143 ,decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9)
144 ,decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10)
145 ,decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11)
146 ,decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12)
147 ,decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13)
148 ,decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14)
149 ,decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15)
150 ,decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY)
151 ,decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_CREATION_DATE)
152 ,decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATED_BY)
153 ,decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE)
154 ,decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN)
155 ,decode( p_CREDIT_HOLD_REQUEST_FLAG, FND_API.G_MISS_CHAR, NULL, p_CREDIT_HOLD_REQUEST_FLAG)
156 ,decode( p_CREDIT_HOLD_APPROVED_FLAG, FND_API.G_MISS_CHAR, NULL, p_CREDIT_HOLD_APPROVED_FLAG)
157 ,decode( p_SERVICE_HOLD_REQUEST_FLAG, FND_API.G_MISS_CHAR, NULL, p_SERVICE_HOLD_REQUEST_FLAG)
158 ,decode( p_SERVICE_HOLD_APPROVED_FLAG, FND_API.G_MISS_CHAR, NULL, p_SERVICE_HOLD_APPROVED_FLAG)
159 ,decode( p_SUGGESTION_APPROVED_FLAG, FND_API.G_MISS_CHAR, NULL, p_SUGGESTION_APPROVED_FLAG)
160 ,decode( p_DISPOSITION_CODE, FND_API.G_MISS_CHAR, NULL ,p_DISPOSITION_CODE)
161 ,decode( p_CUSTOMER_SITE_USE_ID, FND_API.G_MISS_NUM, NULL, p_CUSTOMER_SITE_USE_ID)
162 ,decode( p_ORG_ID, FND_API.G_MISS_NUM, NULL, p_ORG_ID)
163 ,decode( p_CONTRACT_ID, FND_API.G_MISS_NUM, NULL, p_CONTRACT_ID)
164 ,decode( p_CONTRACT_NUMBER, FND_API.G_MISS_CHAR, NULL, p_CONTRACT_NUMBER)
165 );
166 End Insert_Row;
167
168 PROCEDURE Update_Row(
169 p_REPOSSESSION_ID NUMBER
170 ,p_DELINQUENCY_ID NUMBER
171 ,p_PARTY_ID NUMBER
172 ,p_CUST_ACCOUNT_ID NUMBER
173 ,p_UNPAID_REASON_CODE VARCHAR2
174 ,p_REMARKET_FLAG VARCHAR2
175 ,p_REPOSSESSION_DATE DATE
176 ,p_ASSET_ID NUMBER
177 ,p_ASSET_VALUE NUMBER
178 ,p_ASSET_NUMBER NUMBER
179 ,p_REQUEST_ID NUMBER
180 ,p_PROGRAM_APPLICATION_ID NUMBER
181 ,p_PROGRAM_ID NUMBER
182 ,p_PROGRAM_UPDATE_DATE DATE
183 ,p_ATTRIBUTE_CATEGORY VARCHAR2
184 ,p_ATTRIBUTE1 VARCHAR2
185 ,p_ATTRIBUTE2 VARCHAR2
186 ,p_ATTRIBUTE3 VARCHAR2
187 ,p_ATTRIBUTE4 VARCHAR2
188 ,p_ATTRIBUTE5 VARCHAR2
189 ,p_ATTRIBUTE6 VARCHAR2
190 ,p_ATTRIBUTE7 VARCHAR2
191 ,p_ATTRIBUTE8 VARCHAR2
192 ,p_ATTRIBUTE9 VARCHAR2
193 ,p_ATTRIBUTE10 VARCHAR2
194 ,p_ATTRIBUTE11 VARCHAR2
195 ,p_ATTRIBUTE12 VARCHAR2
196 ,p_ATTRIBUTE13 VARCHAR2
197 ,p_ATTRIBUTE14 VARCHAR2
198 ,p_ATTRIBUTE15 VARCHAR2
199 ,p_CREATED_BY NUMBER
200 ,p_CREATION_DATE DATE
201 ,p_LAST_UPDATED_BY NUMBER
202 ,p_LAST_UPDATE_DATE DATE
203 ,p_LAST_UPDATE_LOGIN NUMBER
204 ,p_CREDIT_HOLD_REQUEST_FLAG VARCHAR2
205 ,p_CREDIT_HOLD_APPROVED_FLAG VARCHAR2
206 ,p_SERVICE_HOLD_REQUEST_FLAG VARCHAR2
207 ,p_SERVICE_HOLD_APPROVED_FLAG VARCHAR2
208 ,p_SUGGESTION_APPROVED_FLAG VARCHAR2
209 ,p_DISPOSITION_CODE VARCHAR2
210 ,p_CUSTOMER_SITE_USE_ID NUMBER
211 ,p_ORG_ID NUMBER
212 ,p_CONTRACT_ID NUMBER
213 ,p_CONTRACT_NUMBER VARCHAR2
214
215 )
216
217 IS
218 BEGIN
219 Update IEX_REPOSSESSIONS
220 SET
221 DELINQUENCY_ID = decode( p_DELINQUENCY_ID, FND_API.G_MISS_NUM, DELINQUENCY_ID, p_DELINQUENCY_ID)
222 ,PARTY_ID = decode( p_PARTY_ID, FND_API.G_MISS_NUM, PARTY_ID, p_PARTY_ID)
223 ,CUST_ACCOUNT_ID = decode( p_CUST_ACCOUNT_ID, FND_API.G_MISS_NUM, CUST_ACCOUNT_ID, p_CUST_ACCOUNT_ID)
224 ,UNPAID_REASON_CODE = decode( p_UNPAID_REASON_CODE, FND_API.G_MISS_CHAR, UNPAID_REASON_CODE, p_UNPAID_REASON_CODE)
225 ,REMARKET_FLAG = decode( p_REMARKET_FLAG, FND_API.G_MISS_CHAR, REMARKET_FLAG, p_REMARKET_FLAG)
226 ,REPOSSESSION_DATE = decode( p_REPOSSESSION_DATE, FND_API.G_MISS_DATE, REPOSSESSION_DATE, p_REPOSSESSION_DATE)
227 ,ASSET_ID = decode( p_ASSET_ID, FND_API.G_MISS_NUM, ASSET_ID, p_ASSET_ID)
228 ,ASSET_VALUE = decode( p_ASSET_VALUE, FND_API.G_MISS_NUM, ASSET_VALUE, p_ASSET_VALUE)
229 ,ASSET_NUMBER = decode( p_ASSET_NUMBER, FND_API.G_MISS_NUM, ASSET_NUMBER, p_ASSET_NUMBER)
230 ,REQUEST_ID = decode( p_REQUEST_ID, FND_API.G_MISS_NUM, REQUEST_ID, p_REQUEST_ID)
231 ,PROGRAM_APPLICATION_ID = decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, PROGRAM_APPLICATION_ID, p_PROGRAM_APPLICATION_ID)
232 ,PROGRAM_ID = decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, PROGRAM_ID, p_PROGRAM_ID)
233 ,PROGRAM_UPDATE_DATE = decode( p_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, PROGRAM_UPDATE_DATE, p_PROGRAM_UPDATE_DATE)
234 ,ATTRIBUTE_CATEGORY = decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, ATTRIBUTE_CATEGORY, p_ATTRIBUTE_CATEGORY)
235 ,ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1, p_ATTRIBUTE1)
236 ,ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2, p_ATTRIBUTE2)
237 ,ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3, p_ATTRIBUTE3)
238 ,ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4, p_ATTRIBUTE4)
239 ,ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5, p_ATTRIBUTE5)
240 ,ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6, p_ATTRIBUTE6)
241 ,ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7, p_ATTRIBUTE7)
242 ,ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8, p_ATTRIBUTE8)
243 ,ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9, p_ATTRIBUTE9)
244 ,ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10, p_ATTRIBUTE10)
245 ,ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11, p_ATTRIBUTE11)
246 ,ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12, p_ATTRIBUTE12)
247 ,ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13, p_ATTRIBUTE13)
248 ,ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14, p_ATTRIBUTE14)
249 ,ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15, p_ATTRIBUTE15)
250 ,CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY)
251 ,CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE)
252 ,LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY)
253 ,LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE)
254 ,LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN)
255 ,CREDIT_HOLD_REQUEST_FLAG = decode( p_CREDIT_HOLD_REQUEST_FLAG, FND_API.G_MISS_CHAR, CREDIT_HOLD_REQUEST_FLAG, p_CREDIT_HOLD_REQUEST_FLAG)
256 ,CREDIT_HOLD_APPROVED_FLAG = decode( p_CREDIT_HOLD_APPROVED_FLAG, FND_API.G_MISS_CHAR, CREDIT_HOLD_APPROVED_FLAG, p_CREDIT_HOLD_APPROVED_FLAG)
257 ,SERVICE_HOLD_REQUEST_FLAG = decode( p_SERVICE_HOLD_REQUEST_FLAG, FND_API.G_MISS_CHAR, SERVICE_HOLD_REQUEST_FLAG, p_SERVICE_HOLD_REQUEST_FLAG)
258 ,SERVICE_HOLD_APPROVED_FLAG = decode( p_SERVICE_HOLD_APPROVED_FLAG, FND_API.G_MISS_CHAR, SERVICE_HOLD_APPROVED_FLAG, p_SERVICE_HOLD_APPROVED_FLAG)
259 ,SUGGESTION_APPROVED_FLAG = decode( p_SUGGESTION_APPROVED_FLAG, FND_API.G_MISS_CHAR, SUGGESTION_APPROVED_FLAG, p_SUGGESTION_APPROVED_FLAG)
260 ,DISPOSITION_CODE = decode( p_DISPOSITION_CODE, FND_API.G_MISS_CHAR, DISPOSITION_CODE, p_DISPOSITION_CODE)
261 ,CUSTOMER_SITE_USE_ID = decode( p_CUSTOMER_SITE_USE_ID, FND_API.G_MISS_NUM, CUSTOMER_SITE_USE_ID, p_CUSTOMER_SITE_USE_ID)
262 ,ORG_ID = decode( p_ORG_ID, FND_API.G_MISS_NUM, ORG_ID, p_ORG_ID)
263 ,CONTRACT_ID = decode( p_CONTRACT_ID, FND_API.G_MISS_NUM, CONTRACT_ID, p_CONTRACT_ID)
264 ,CONTRACT_NUMBER = decode( p_CONTRACT_NUMBER, FND_API.G_MISS_CHAR, CONTRACT_NUMBER, p_CONTRACT_NUMBER)
265 where REPOSSESSION_ID = p_REPOSSESSION_ID;
266
267 If (SQL%NOTFOUND) then
268 RAISE NO_DATA_FOUND;
269 End If;
270 END Update_Row;
271
272 PROCEDURE Delete_Row(
273 p_REPOSSESSION_ID NUMBER)
274 IS
275 BEGIN
276 DELETE FROM IEX_REPOSSESSIONS
277 WHERE REPOSSESSION_ID = p_REPOSSESSION_ID;
278 If (SQL%NOTFOUND) then
279 RAISE NO_DATA_FOUND;
280 End If;
281 END Delete_Row;
282
283 PROCEDURE Lock_Row(
284 p_REPOSSESSION_ID NUMBER
285 ,p_DELINQUENCY_ID NUMBER
286 ,p_PARTY_ID NUMBER
287 ,p_CUST_ACCOUNT_ID NUMBER
288 ,p_UNPAID_REASON_CODE VARCHAR2
289 ,p_REMARKET_FLAG VARCHAR2
290 ,p_REPOSSESSION_DATE DATE
291 ,p_ASSET_ID NUMBER
292 ,p_ASSET_VALUE NUMBER
293 ,p_ASSET_NUMBER NUMBER
294 ,p_REQUEST_ID NUMBER
295 ,p_PROGRAM_APPLICATION_ID NUMBER
296 ,p_PROGRAM_ID NUMBER
297 ,p_PROGRAM_UPDATE_DATE DATE
298 ,p_ATTRIBUTE_CATEGORY VARCHAR2
299 ,p_ATTRIBUTE1 VARCHAR2
300 ,p_ATTRIBUTE2 VARCHAR2
301 ,p_ATTRIBUTE3 VARCHAR2
302 ,p_ATTRIBUTE4 VARCHAR2
303 ,p_ATTRIBUTE5 VARCHAR2
304 ,p_ATTRIBUTE6 VARCHAR2
305 ,p_ATTRIBUTE7 VARCHAR2
306 ,p_ATTRIBUTE8 VARCHAR2
307 ,p_ATTRIBUTE9 VARCHAR2
308 ,p_ATTRIBUTE10 VARCHAR2
309 ,p_ATTRIBUTE11 VARCHAR2
310 ,p_ATTRIBUTE12 VARCHAR2
311 ,p_ATTRIBUTE13 VARCHAR2
312 ,p_ATTRIBUTE14 VARCHAR2
313 ,p_ATTRIBUTE15 VARCHAR2
314 ,p_CREATED_BY NUMBER
315 ,p_CREATION_DATE DATE
316 ,p_LAST_UPDATED_BY NUMBER
317 ,p_LAST_UPDATE_DATE DATE
318 ,p_LAST_UPDATE_LOGIN NUMBER
319 ,p_CREDIT_HOLD_REQUEST_FLAG VARCHAR2
320 ,p_CREDIT_HOLD_APPROVED_FLAG VARCHAR2
321 ,p_SERVICE_HOLD_REQUEST_FLAG VARCHAR2
322 ,p_SERVICE_HOLD_APPROVED_FLAG VARCHAR2
326 ,p_ORG_ID NUMBER
323 ,p_SUGGESTION_APPROVED_FLAG VARCHAR2
324 ,p_DISPOSITION_CODE VARCHAR2
325 ,p_CUSTOMER_SITE_USE_ID NUMBER
327 ,p_CONTRACT_ID NUMBER
328 ,p_CONTRACT_NUMBER VARCHAR2
329 )
330
331 IS
332 CURSOR C IS
333 SELECT *
334 FROM IEX_REPOSSESSIONS
335 WHERE REPOSSESSION_ID = p_REPOSSESSION_ID
336 FOR UPDATE of REPOSSESSION_ID NOWAIT;
337 Recinfo C%ROWTYPE;
338 BEGIN
339 OPEN C;
340 FETCH C INTO Recinfo;
341 If (C%NOTFOUND) then
342 CLOSE C;
343 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
344 APP_EXCEPTION.RAISE_EXCEPTION;
345 End If;
346 CLOSE C;
347 if (
348 ( Recinfo.REPOSSESSION_ID = p_REPOSSESSION_ID)
349 AND ( ( Recinfo.DELINQUENCY_ID = p_DELINQUENCY_ID)
350 OR ( ( Recinfo.DELINQUENCY_ID IS NULL )
351 AND ( p_DELINQUENCY_ID IS NULL )))
352 AND ( ( Recinfo.PARTY_ID = p_PARTY_ID)
353 OR ( ( Recinfo.PARTY_ID IS NULL )
354 AND ( p_PARTY_ID IS NULL )))
355 AND ( ( Recinfo.CUST_ACCOUNT_ID = p_CUST_ACCOUNT_ID)
356 OR ( ( Recinfo.CUST_ACCOUNT_ID IS NULL )
357 AND ( p_CUST_ACCOUNT_ID IS NULL )))
358 AND ( ( Recinfo.UNPAID_REASON_CODE = p_UNPAID_REASON_CODE)
359 OR ( ( Recinfo.UNPAID_REASON_CODE IS NULL )
360 AND ( p_UNPAID_REASON_CODE IS NULL )))
361 AND ( ( Recinfo.REMARKET_FLAG = p_REMARKET_FLAG)
362 OR ( ( Recinfo.REMARKET_FLAG IS NULL )
363 AND ( p_REMARKET_FLAG IS NULL )))
364 AND ( ( Recinfo.REPOSSESSION_DATE = p_REPOSSESSION_DATE)
365 OR ( ( Recinfo.REPOSSESSION_DATE IS NULL )
366 AND ( p_REPOSSESSION_DATE IS NULL )))
367 AND ( ( Recinfo.ASSET_ID = p_ASSET_ID)
368 OR ( ( Recinfo.ASSET_ID IS NULL )
369 AND ( p_ASSET_ID IS NULL )))
370 AND ( ( Recinfo.ASSET_VALUE = p_ASSET_VALUE)
371 OR ( ( Recinfo.ASSET_VALUE IS NULL )
372 AND ( p_ASSET_VALUE IS NULL )))
373 AND ( ( Recinfo.ASSET_NUMBER = p_ASSET_NUMBER)
374 OR ( ( Recinfo.ASSET_NUMBER IS NULL )
375 AND ( p_ASSET_NUMBER IS NULL )))
376 AND ( ( Recinfo.REQUEST_ID = p_REQUEST_ID)
377 OR ( ( Recinfo.REQUEST_ID IS NULL )
378 AND ( p_REQUEST_ID IS NULL )))
379 AND ( ( Recinfo.PROGRAM_APPLICATION_ID = p_PROGRAM_APPLICATION_ID)
380 OR ( ( Recinfo.PROGRAM_APPLICATION_ID IS NULL )
381 AND ( p_PROGRAM_APPLICATION_ID IS NULL )))
382 AND ( ( Recinfo.PROGRAM_ID = p_PROGRAM_ID)
383 OR ( ( Recinfo.PROGRAM_ID IS NULL )
384 AND ( p_PROGRAM_ID IS NULL )))
385 AND ( ( Recinfo.PROGRAM_UPDATE_DATE = p_PROGRAM_UPDATE_DATE)
386 OR ( ( Recinfo.PROGRAM_UPDATE_DATE IS NULL )
387 AND ( p_PROGRAM_UPDATE_DATE IS NULL )))
388 AND ( ( Recinfo.ATTRIBUTE_CATEGORY = p_ATTRIBUTE_CATEGORY)
389 OR ( ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
390 AND ( p_ATTRIBUTE_CATEGORY IS NULL )))
391 AND ( ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
392 OR ( ( Recinfo.ATTRIBUTE1 IS NULL )
393 AND ( p_ATTRIBUTE1 IS NULL )))
394 AND ( ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
395 OR ( ( Recinfo.ATTRIBUTE2 IS NULL )
396 AND ( p_ATTRIBUTE2 IS NULL )))
397 AND ( ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
398 OR ( ( Recinfo.ATTRIBUTE3 IS NULL )
399 AND ( p_ATTRIBUTE3 IS NULL )))
400 AND ( ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
401 OR ( ( Recinfo.ATTRIBUTE4 IS NULL )
402 AND ( p_ATTRIBUTE4 IS NULL )))
403 AND ( ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
404 OR ( ( Recinfo.ATTRIBUTE5 IS NULL )
405 AND ( p_ATTRIBUTE5 IS NULL )))
406 AND ( ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
407 OR ( ( Recinfo.ATTRIBUTE6 IS NULL )
408 AND ( p_ATTRIBUTE6 IS NULL )))
409 AND ( ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
410 OR ( ( Recinfo.ATTRIBUTE7 IS NULL )
411 AND ( p_ATTRIBUTE7 IS NULL )))
412 AND ( ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
413 OR ( ( Recinfo.ATTRIBUTE8 IS NULL )
414 AND ( p_ATTRIBUTE8 IS NULL )))
415 AND ( ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
416 OR ( ( Recinfo.ATTRIBUTE9 IS NULL )
417 AND ( p_ATTRIBUTE9 IS NULL )))
418 AND ( ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
419 OR ( ( Recinfo.ATTRIBUTE10 IS NULL )
420 AND ( p_ATTRIBUTE10 IS NULL )))
421 AND ( ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
422 OR ( ( Recinfo.ATTRIBUTE11 IS NULL )
423 AND ( p_ATTRIBUTE11 IS NULL )))
424 AND ( ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
425 OR ( ( Recinfo.ATTRIBUTE12 IS NULL )
426 AND ( p_ATTRIBUTE12 IS NULL )))
427 AND ( ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
428 OR ( ( Recinfo.ATTRIBUTE13 IS NULL )
429 AND ( p_ATTRIBUTE13 IS NULL )))
430 AND ( ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
431 OR ( ( Recinfo.ATTRIBUTE14 IS NULL )
432 AND ( p_ATTRIBUTE14 IS NULL )))
433 AND ( ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
434 OR ( ( Recinfo.ATTRIBUTE15 IS NULL )
435 AND ( p_ATTRIBUTE15 IS NULL )))
436 AND ( ( Recinfo.CREATED_BY = p_CREATED_BY)
437 OR ( ( Recinfo.CREATED_BY IS NULL )
438 AND ( p_CREATED_BY IS NULL )))
439 AND ( ( Recinfo.CREATION_DATE = p_CREATION_DATE)
440 OR ( ( Recinfo.CREATION_DATE IS NULL )
441 AND ( p_CREATION_DATE IS NULL )))
442 AND ( ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
443 OR ( ( Recinfo.LAST_UPDATED_BY IS NULL )
444 AND ( p_LAST_UPDATED_BY IS NULL )))
445 AND ( ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
446 OR ( ( Recinfo.LAST_UPDATE_DATE IS NULL )
447 AND ( p_LAST_UPDATE_DATE IS NULL )))
448 AND ( ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
449 OR ( ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
450 AND ( p_LAST_UPDATE_LOGIN IS NULL )))
451 AND ( ( Recinfo.CREDIT_HOLD_REQUEST_FLAG = p_CREDIT_HOLD_REQUEST_FLAG)
452 OR ( ( Recinfo.CREDIT_HOLD_REQUEST_FLAG IS NULL )
453 AND ( p_CREDIT_HOLD_REQUEST_FLAG IS NULL )))
454 AND ( ( Recinfo.CREDIT_HOLD_APPROVED_FLAG = p_CREDIT_HOLD_APPROVED_FLAG)
455 OR ( ( Recinfo.CREDIT_HOLD_APPROVED_FLAG IS NULL )
456 AND ( p_CREDIT_HOLD_APPROVED_FLAG IS NULL )))
457 AND ( ( Recinfo.SERVICE_HOLD_REQUEST_FLAG = p_SERVICE_HOLD_REQUEST_FLAG)
458 OR ( ( Recinfo.SERVICE_HOLD_REQUEST_FLAG IS NULL )
459 AND ( p_SERVICE_HOLD_REQUEST_FLAG IS NULL )))
460 AND ( ( Recinfo.SERVICE_HOLD_APPROVED_FLAG = p_SERVICE_HOLD_APPROVED_FLAG)
461 OR ( ( Recinfo.SERVICE_HOLD_APPROVED_FLAG IS NULL )
462 AND ( p_SERVICE_HOLD_APPROVED_FLAG IS NULL )))
463 AND ( ( Recinfo.SUGGESTION_APPROVED_FLAG = p_SUGGESTION_APPROVED_FLAG)
464 OR ( ( Recinfo.SUGGESTION_APPROVED_FLAG IS NULL )
465 AND ( p_SUGGESTION_APPROVED_FLAG IS NULL )))
466 AND ( ( Recinfo.DISPOSITION_CODE = p_DISPOSITION_CODE)
467 OR ( ( Recinfo.DISPOSITION_CODE IS NULL )
468 AND ( p_DISPOSITION_CODE IS NULL )))
469 AND ( ( Recinfo.CUSTOMER_SITE_USE_ID = p_CUSTOMER_SITE_USE_ID)
470 OR ( ( Recinfo.CUSTOMER_SITE_USE_ID IS NULL )
471 AND ( p_CUSTOMER_SITE_USE_ID IS NULL )))
472 AND ( ( Recinfo.ORG_ID = p_ORG_ID)
473 OR ( ( Recinfo.ORG_ID IS NULL )
474 AND ( p_ORG_ID IS NULL )))
475 AND ( ( Recinfo.CONTRACT_ID = p_CONTRACT_ID)
476 OR ( ( Recinfo.CONTRACT_ID IS NULL )
477 AND ( p_CONTRACT_ID IS NULL )))
478 AND ( ( Recinfo.CONTRACT_NUMBER = p_CONTRACT_NUMBER)
479 OR ( ( Recinfo.CONTRACT_NUMBER IS NULL )
480 AND ( p_CONTRACT_NUMBER IS NULL )))
481 ) then
482 return;
483 else
484 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
485 APP_EXCEPTION.RAISE_EXCEPTION;
486 End If;
487 END Lock_Row;
488
489 End IEX_REPOSSESSIONS_PKG;