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