DBA Data[Home] [Help]

PACKAGE BODY: APPS.AS_LEAD_DECISION_FACTORS_PKG

Source


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