DBA Data[Home] [Help]

PACKAGE BODY: APPS.CSI_I_PARTIES_PKG

Source


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