[Home] [Help]
PACKAGE BODY: APPS.CSP_INV_LOC_ASSIGNMENTS_PKG
Source
1 PACKAGE BODY CSP_INV_LOC_ASSIGNMENTS_PKG AS
2 /* $Header: cspttreb.pls 120.0 2005/05/25 11:37:41 appldev noship $ */
3 -- Start of Comments
4 -- Package name : CSP_INV_LOC_ASSIGNMENTS_PKG
5 -- Purpose :
6 -- History :
7 -- NOTE :
8 -- End of Comments
9
10
11 G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_INV_LOC_ASSIGNMENTS_PKG';
12 G_FILE_NAME CONSTANT VARCHAR2(12) := 'cspttreb.pls';
13
14 PROCEDURE Insert_Row(
15 px_CSP_INV_LOC_ASSIGNMENT_ID IN OUT NOCOPY NUMBER,
16 p_CREATED_BY NUMBER,
17 p_CREATION_DATE DATE,
18 p_LAST_UPDATED_BY NUMBER,
19 p_LAST_UPDATE_DATE DATE,
20 p_LAST_UPDATE_LOGIN NUMBER,
21 p_RESOURCE_ID NUMBER,
22 p_ORGANIZATION_ID NUMBER,
23 p_SUBINVENTORY_CODE VARCHAR2,
24 p_LOCATOR_ID NUMBER,
25 p_RESOURCE_TYPE VARCHAR2,
26 p_EFFECTIVE_DATE_START DATE,
27 p_EFFECTIVE_DATE_END DATE,
28 p_DEFAULT_CODE VARCHAR2,
29 p_ATTRIBUTE_CATEGORY VARCHAR2,
30 p_ATTRIBUTE1 VARCHAR2,
31 p_ATTRIBUTE2 VARCHAR2,
32 p_ATTRIBUTE3 VARCHAR2,
33 p_ATTRIBUTE4 VARCHAR2,
34 p_ATTRIBUTE5 VARCHAR2,
35 p_ATTRIBUTE6 VARCHAR2,
36 p_ATTRIBUTE7 VARCHAR2,
37 p_ATTRIBUTE8 VARCHAR2,
38 p_ATTRIBUTE9 VARCHAR2,
39 p_ATTRIBUTE10 VARCHAR2,
40 p_ATTRIBUTE11 VARCHAR2,
41 p_ATTRIBUTE12 VARCHAR2,
42 p_ATTRIBUTE13 VARCHAR2,
43 p_ATTRIBUTE14 VARCHAR2,
44 p_ATTRIBUTE15 VARCHAR2)
45
46 IS
47 CURSOR C2 IS SELECT CSP_INV_LOC_ASSIGNMENTS_S1.nextval FROM sys.dual;
48 l_inv_loc_assignment CSP_INV_LOC_ASSIGNMENTS_PKG.inv_loc_assignments_rec_type;
49 l_return_status varchar2(100);
50 l_msg_count NUMBER;
51 l_msg_data varchar2(1000);
52 l_api_name_full varchar2(50) := 'CSP_INV_LOC_ASSIGNMENTS_PKG.INSERT_ROW';
53 BEGIN
54 l_inv_loc_assignment.CSP_INV_LOC_ASSIGNMENT_ID := px_CSP_INV_LOC_ASSIGNMENT_ID;
55 l_inv_loc_assignment.CREATED_BY := p_CREATED_BY ;
56 l_inv_loc_assignment.CREATION_DATE := p_CREATION_DATE ;
57 l_inv_loc_assignment.LAST_UPDATED_BY := p_LAST_UPDATED_BY ;
58 l_inv_loc_assignment.LAST_UPDATE_DATE := p_LAST_UPDATE_DATE ;
59 l_inv_loc_assignment.LAST_UPDATE_LOGIN := p_LAST_UPDATE_LOGIN ;
60 l_inv_loc_assignment.RESOURCE_ID := p_RESOURCE_ID ;
61 l_inv_loc_assignment.ORGANIZATION_ID := p_ORGANIZATION_ID ;
62 l_inv_loc_assignment.SUBINVENTORY_CODE := p_SUBINVENTORY_CODE ;
63 l_inv_loc_assignment.LOCATOR_ID := p_LOCATOR_ID ;
64 l_inv_loc_assignment.RESOURCE_TYPE := p_RESOURCE_TYPE ;
65 l_inv_loc_assignment.EFFECTIVE_DATE_START := p_EFFECTIVE_DATE_START ;
66 l_inv_loc_assignment.EFFECTIVE_DATE_END := p_EFFECTIVE_DATE_END ;
67 l_inv_loc_assignment.DEFAULT_CODE := p_DEFAULT_CODE ;
68 l_inv_loc_assignment.ATTRIBUTE_CATEGORY := p_ATTRIBUTE_CATEGORY ;
69 l_inv_loc_assignment.ATTRIBUTE1 := p_ATTRIBUTE1 ;
70 l_inv_loc_assignment.ATTRIBUTE2 := p_ATTRIBUTE2 ;
71 l_inv_loc_assignment.ATTRIBUTE3 := p_ATTRIBUTE3 ;
72 l_inv_loc_assignment.ATTRIBUTE4 := p_ATTRIBUTE4;
73 l_inv_loc_assignment.ATTRIBUTE5 := p_ATTRIBUTE5;
74 l_inv_loc_assignment.ATTRIBUTE6 := p_ATTRIBUTE6;
75 l_inv_loc_assignment.ATTRIBUTE7 := p_ATTRIBUTE7;
76 l_inv_loc_assignment.ATTRIBUTE8 := p_ATTRIBUTE8;
77 l_inv_loc_assignment.ATTRIBUTE9 := p_ATTRIBUTE9;
78 l_inv_loc_assignment.ATTRIBUTE10 := p_ATTRIBUTE10;
79 l_inv_loc_assignment.ATTRIBUTE11 := p_ATTRIBUTE11;
80 l_inv_loc_assignment.ATTRIBUTE12 := p_ATTRIBUTE12;
81 l_inv_loc_assignment.ATTRIBUTE13 := p_ATTRIBUTE13;
82 l_inv_loc_assignment.ATTRIBUTE14 := p_ATTRIBUTE14;
83 l_inv_loc_assignment.ATTRIBUTE15 := p_ATTRIBUTE15;
84
85 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
86 'Insert_Row',
87 'B', 'C') THEN
88 csp_inv_loc_assignments_cuhk.create_inventory_location_Pre
89 ( px_inv_loc_assignment => l_inv_loc_assignment ,
90 x_return_status => l_return_status,
91 x_msg_count => l_msg_count,
92 x_msg_data => l_msg_data
93 ) ;
94
95 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
96 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
97 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
98 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
99 FND_MSG_PUB.Add;
100 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
101 END IF;
102 END IF;
103 -- Pre call to the Vertical Type User Hook
104 --
105 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
106 'Insert_Row',
107 'B', 'V') THEN
108 csp_inv_loc_assignments_vuhk.create_inventory_location_Pre
109 ( px_inv_loc_assignment => l_inv_loc_assignment ,
110 x_return_status => l_return_status,
111 x_msg_count => l_msg_count,
112 x_msg_data => l_msg_data
113 ) ;
114
115 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
116 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
117 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
118 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
119 FND_MSG_PUB.Add;
120 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
121 END IF;
122 END IF;
123
124 csp_inv_loc_assignments_iuhk.create_inventory_location_Pre
125 ( x_return_status => l_return_status
126 ) ;
127
128 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
129 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
130 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
131 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
132 FND_MSG_PUB.Add;
133 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
134 END IF;
135
136
137 If (l_inv_loc_assignment.CSP_INV_LOC_ASSIGNMENT_ID IS NULL) OR (l_inv_loc_assignment.CSP_INV_LOC_ASSIGNMENT_ID = FND_API.G_MISS_NUM) then
138 OPEN C2;
139 FETCH C2 INTO px_CSP_INV_LOC_ASSIGNMENT_ID;
140 CLOSE C2;
141 End If;
142 l_inv_loc_assignment.CSP_INV_LOC_ASSIGNMENT_ID := px_CSP_INV_LOC_ASSIGNMENT_ID;
143 user_hooks_rec.CSP_INV_LOC_ASSIGNMENT_ID := l_inv_loc_assignment.CSP_INV_LOC_ASSIGNMENT_ID ;
144 INSERT INTO CSP_INV_LOC_ASSIGNMENTS(
145 CSP_INV_LOC_ASSIGNMENT_ID,
146 CREATED_BY,
147 CREATION_DATE,
148 LAST_UPDATED_BY,
149 LAST_UPDATE_DATE,
150 LAST_UPDATE_LOGIN,
151 RESOURCE_ID,
152 ORGANIZATION_ID,
153 SUBINVENTORY_CODE,
154 LOCATOR_ID,
155 RESOURCE_TYPE,
156 EFFECTIVE_DATE_START,
157 EFFECTIVE_DATE_END,
158 DEFAULT_CODE,
159 ATTRIBUTE_CATEGORY,
160 ATTRIBUTE1,
161 ATTRIBUTE2,
162 ATTRIBUTE3,
163 ATTRIBUTE4,
164 ATTRIBUTE5,
165 ATTRIBUTE6,
166 ATTRIBUTE7,
167 ATTRIBUTE8,
168 ATTRIBUTE9,
169 ATTRIBUTE10,
170 ATTRIBUTE11,
171 ATTRIBUTE12,
172 ATTRIBUTE13,
173 ATTRIBUTE14,
174 ATTRIBUTE15
175 ) VALUES (
176 px_CSP_INV_LOC_ASSIGNMENT_ID,
177 decode( l_inv_loc_assignment.CREATED_BY, FND_API.G_MISS_NUM, NULL, l_inv_loc_assignment.CREATED_BY),
178 decode(l_inv_loc_assignment.CREATION_DATE,fnd_api.g_miss_date,to_date(null),l_inv_loc_assignment.creation_date),
179 decode( l_inv_loc_assignment.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, l_inv_loc_assignment.LAST_UPDATED_BY),
180 decode(l_inv_loc_assignment.LAST_UPDATE_DATE,fnd_api.g_miss_date,to_date(null),l_inv_loc_assignment.last_update_date),
181 decode( l_inv_loc_assignment.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, l_inv_loc_assignment.LAST_UPDATE_LOGIN),
182 decode( l_inv_loc_assignment.RESOURCE_ID, FND_API.G_MISS_NUM, NULL, l_inv_loc_assignment.RESOURCE_ID),
183 decode( l_inv_loc_assignment.ORGANIZATION_ID, FND_API.G_MISS_NUM, NULL, l_inv_loc_assignment.ORGANIZATION_ID),
184 decode( l_inv_loc_assignment.SUBINVENTORY_CODE, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.SUBINVENTORY_CODE),
185 decode( l_inv_loc_assignment.LOCATOR_ID, FND_API.G_MISS_NUM, NULL, l_inv_loc_assignment.LOCATOR_ID),
186 decode( l_inv_loc_assignment.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.RESOURCE_TYPE),
187 decode( l_inv_loc_assignment.EFFECTIVE_DATE_START, FND_API.G_MISS_DATE, to_date(null), l_inv_loc_assignment.EFFECTIVE_DATE_START),
188 decode( l_inv_loc_assignment.EFFECTIVE_DATE_END, FND_API.G_MISS_DATE, to_date(null), l_inv_loc_assignment.EFFECTIVE_DATE_END),
189 decode( l_inv_loc_assignment.DEFAULT_CODE, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.DEFAULT_CODE),
190 decode( l_inv_loc_assignment.ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE_CATEGORY),
191 decode( l_inv_loc_assignment.ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE1),
192 decode( l_inv_loc_assignment.ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE2),
193 decode( l_inv_loc_assignment.ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE3),
194 decode( l_inv_loc_assignment.ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE4),
195 decode( l_inv_loc_assignment.ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE5),
196 decode( l_inv_loc_assignment.ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE6),
197 decode( l_inv_loc_assignment.ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE7),
198 decode( l_inv_loc_assignment.ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE8),
199 decode( l_inv_loc_assignment.ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE9),
200 decode( l_inv_loc_assignment.ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE10),
201 decode( l_inv_loc_assignment.ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE11),
202 decode( l_inv_loc_assignment.ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE12),
203 decode( l_inv_loc_assignment.ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE13),
204 decode( l_inv_loc_assignment.ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE14),
205 decode( l_inv_loc_assignment.ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, l_inv_loc_assignment.ATTRIBUTE15));
206
207 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
208 'Insert_Row',
209 'A', 'C') THEN
210 csp_inv_loc_assignments_cuhk.create_inventory_location_Post
211 ( px_inv_loc_assignment => l_inv_loc_assignment ,
212 x_return_status => l_return_status,
213 x_msg_count => l_msg_count,
214 x_msg_data => l_msg_data
215 ) ;
216
217 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
218 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
219 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');
220 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
221 FND_MSG_PUB.Add;
222 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
223 END IF;
224 END IF;
225 -- Pre call to the Vertical Type User Hook
226 --
227 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
228 'Insert_Row',
229 'A', 'V') THEN
230 csp_inv_loc_assignments_vuhk.create_inventory_location_Post
231 ( px_inv_loc_assignment => l_inv_loc_assignment ,
232 x_return_status => l_return_status,
233 x_msg_count => l_msg_count,
234 x_msg_data => l_msg_data
235 ) ;
236
237 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
238 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
239 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
240 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
241 FND_MSG_PUB.Add;
242 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
243 END IF;
244 END IF;
245 csp_inv_loc_assignments_iuhk.create_inventory_location_post
246 ( x_return_status => l_return_status
247 ) ;
248
249 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
250 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
251 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
252 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
253 FND_MSG_PUB.Add;
254 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
255 END IF;
256 End Insert_Row;
257
258 PROCEDURE Update_Row(
259 p_CSP_INV_LOC_ASSIGNMENT_ID NUMBER,
260 p_CREATED_BY NUMBER,
261 p_CREATION_DATE DATE,
262 p_LAST_UPDATED_BY NUMBER,
263 p_LAST_UPDATE_DATE DATE,
264 p_LAST_UPDATE_LOGIN NUMBER,
265 p_RESOURCE_ID NUMBER,
266 p_ORGANIZATION_ID NUMBER,
267 p_SUBINVENTORY_CODE VARCHAR2,
268 p_LOCATOR_ID NUMBER,
269 p_RESOURCE_TYPE VARCHAR2,
270 p_EFFECTIVE_DATE_START DATE,
271 p_EFFECTIVE_DATE_END DATE,
272 p_DEFAULT_CODE VARCHAR2,
273 p_ATTRIBUTE_CATEGORY VARCHAR2,
274 p_ATTRIBUTE1 VARCHAR2,
275 p_ATTRIBUTE2 VARCHAR2,
276 p_ATTRIBUTE3 VARCHAR2,
277 p_ATTRIBUTE4 VARCHAR2,
278 p_ATTRIBUTE5 VARCHAR2,
279 p_ATTRIBUTE6 VARCHAR2,
280 p_ATTRIBUTE7 VARCHAR2,
281 p_ATTRIBUTE8 VARCHAR2,
282 p_ATTRIBUTE9 VARCHAR2,
283 p_ATTRIBUTE10 VARCHAR2,
284 p_ATTRIBUTE11 VARCHAR2,
285 p_ATTRIBUTE12 VARCHAR2,
286 p_ATTRIBUTE13 VARCHAR2,
287 p_ATTRIBUTE14 VARCHAR2,
288 p_ATTRIBUTE15 VARCHAR2)
289
290 IS
291 l_inv_loc_assignment CSP_INV_LOC_ASSIGNMENTS_PKG.inv_loc_assignments_rec_type;
292 l_return_status varchar2(100);
293 l_msg_count NUMBER;
294 l_msg_data varchar2(1000);
295 l_api_name_full varchar2(50) := 'CSP_INV_LOC_ASSIGNMENTS_PKG.UPDATE_ROW';
296 BEGIN
297
298
299 l_inv_loc_assignment.CSP_INV_LOC_ASSIGNMENT_ID := p_CSP_INV_LOC_ASSIGNMENT_ID;
300 l_inv_loc_assignment.CREATED_BY := p_CREATED_BY ;
301 l_inv_loc_assignment.CREATION_DATE := p_CREATION_DATE ;
302 l_inv_loc_assignment.LAST_UPDATED_BY := p_LAST_UPDATED_BY ;
303 l_inv_loc_assignment.LAST_UPDATE_DATE := p_LAST_UPDATE_DATE ;
304 l_inv_loc_assignment.LAST_UPDATE_LOGIN := p_LAST_UPDATE_LOGIN ;
305 l_inv_loc_assignment.RESOURCE_ID := p_RESOURCE_ID ;
306 l_inv_loc_assignment.ORGANIZATION_ID := p_ORGANIZATION_ID ;
307 l_inv_loc_assignment.SUBINVENTORY_CODE := p_SUBINVENTORY_CODE ;
308 l_inv_loc_assignment.LOCATOR_ID := p_LOCATOR_ID ;
309 l_inv_loc_assignment.RESOURCE_TYPE := p_RESOURCE_TYPE ;
310 l_inv_loc_assignment.EFFECTIVE_DATE_START := p_EFFECTIVE_DATE_START ;
311 l_inv_loc_assignment.EFFECTIVE_DATE_END := p_EFFECTIVE_DATE_END ;
312 l_inv_loc_assignment.DEFAULT_CODE := p_DEFAULT_CODE ;
313 l_inv_loc_assignment.ATTRIBUTE_CATEGORY := p_ATTRIBUTE_CATEGORY ;
314 l_inv_loc_assignment.ATTRIBUTE1 := p_ATTRIBUTE1 ;
315 l_inv_loc_assignment.ATTRIBUTE2 := p_ATTRIBUTE2 ;
316 l_inv_loc_assignment.ATTRIBUTE3 := p_ATTRIBUTE3 ;
317 l_inv_loc_assignment.ATTRIBUTE4 := p_ATTRIBUTE4;
318 l_inv_loc_assignment.ATTRIBUTE5 := p_ATTRIBUTE5;
319 l_inv_loc_assignment.ATTRIBUTE6 := p_ATTRIBUTE6;
320 l_inv_loc_assignment.ATTRIBUTE7 := p_ATTRIBUTE7;
321 l_inv_loc_assignment.ATTRIBUTE8 := p_ATTRIBUTE8;
322 l_inv_loc_assignment.ATTRIBUTE9 := p_ATTRIBUTE9;
323 l_inv_loc_assignment.ATTRIBUTE10 := p_ATTRIBUTE10;
324 l_inv_loc_assignment.ATTRIBUTE11 := p_ATTRIBUTE11;
325 l_inv_loc_assignment.ATTRIBUTE12 := p_ATTRIBUTE12;
326 l_inv_loc_assignment.ATTRIBUTE13 := p_ATTRIBUTE13;
327 l_inv_loc_assignment.ATTRIBUTE14 := p_ATTRIBUTE14;
328 l_inv_loc_assignment.ATTRIBUTE15 := p_ATTRIBUTE15;
329 user_hooks_rec.CSP_INV_LOC_ASSIGNMENT_ID := l_inv_loc_assignment.CSP_INV_LOC_ASSIGNMENT_ID ;
330 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
331 'Update_Row',
332 'B', 'C') THEN
333 csp_inv_loc_assignments_cuhk.update_inventory_location_Pre
334 ( px_inv_loc_assignment => l_inv_loc_assignment ,
335 x_return_status => l_return_status,
336 x_msg_count => l_msg_count,
337 x_msg_data => l_msg_data
338 ) ;
339
340 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
341 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
342 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
343 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
344 FND_MSG_PUB.Add;
345 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
346 END IF;
347 END IF;
348 -- Pre call to the Vertical Type User Hook
349 --
350 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
351 'Update_Row',
352 'B', 'V') THEN
353 csp_inv_loc_assignments_vuhk.update_inventory_location_Pre
354 ( px_inv_loc_assignment => l_inv_loc_assignment ,
355 x_return_status => l_return_status,
356 x_msg_count => l_msg_count,
357 x_msg_data => l_msg_data
358 ) ;
359
360 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
361 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
362 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
363 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
364 FND_MSG_PUB.Add;
365 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
366 END IF;
367 END IF;
368
369 csp_inv_loc_assignments_iuhk.update_inventory_location_Pre
370 ( x_return_status => l_return_status
371 ) ;
372
373 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
374 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
375 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
376 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
377 FND_MSG_PUB.Add;
378 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
379 END IF;
380
381 Update CSP_INV_LOC_ASSIGNMENTS
382 SET
383 CREATED_BY = decode( l_inv_loc_assignment.CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, l_inv_loc_assignment.CREATED_BY),
384 CREATION_DATE = decode(l_inv_loc_assignment.CREATION_DATE,fnd_api.g_miss_date,creation_date,l_inv_loc_assignment.creation_date),
385 LAST_UPDATED_BY = decode( l_inv_loc_assignment.LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, l_inv_loc_assignment.LAST_UPDATED_BY),
386 LAST_UPDATE_DATE = decode(l_inv_loc_assignment.LAST_UPDATE_DATE,fnd_api.g_miss_date,last_update_date,l_inv_loc_assignment.last_update_date),
387 LAST_UPDATE_LOGIN = decode( l_inv_loc_assignment.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, LAST_UPDATE_LOGIN, l_inv_loc_assignment.LAST_UPDATE_LOGIN),
388 RESOURCE_ID = decode( l_inv_loc_assignment.RESOURCE_ID, FND_API.G_MISS_NUM, RESOURCE_ID, l_inv_loc_assignment.RESOURCE_ID),
389 ORGANIZATION_ID = decode( l_inv_loc_assignment.ORGANIZATION_ID, FND_API.G_MISS_NUM, ORGANIZATION_ID, l_inv_loc_assignment.ORGANIZATION_ID),
390 SUBINVENTORY_CODE = decode( l_inv_loc_assignment.SUBINVENTORY_CODE, FND_API.G_MISS_CHAR, SUBINVENTORY_CODE, l_inv_loc_assignment.SUBINVENTORY_CODE),
391 LOCATOR_ID = decode( l_inv_loc_assignment.LOCATOR_ID, FND_API.G_MISS_NUM, LOCATOR_ID, l_inv_loc_assignment.LOCATOR_ID),
392 RESOURCE_TYPE = decode( l_inv_loc_assignment.RESOURCE_TYPE, FND_API.G_MISS_CHAR, RESOURCE_TYPE, l_inv_loc_assignment.RESOURCE_TYPE),
393 EFFECTIVE_DATE_START = decode( l_inv_loc_assignment.EFFECTIVE_DATE_START, FND_API.G_MISS_DATE, EFFECTIVE_DATE_START, l_inv_loc_assignment.EFFECTIVE_DATE_START),
394 EFFECTIVE_DATE_END = decode( l_inv_loc_assignment.EFFECTIVE_DATE_END, FND_API.G_MISS_DATE, EFFECTIVE_DATE_END, l_inv_loc_assignment.EFFECTIVE_DATE_END),
395 DEFAULT_CODE = decode( l_inv_loc_assignment.DEFAULT_CODE, FND_API.G_MISS_CHAR, DEFAULT_CODE, l_inv_loc_assignment.DEFAULT_CODE),
396 ATTRIBUTE_CATEGORY = decode( l_inv_loc_assignment.ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, ATTRIBUTE_CATEGORY, l_inv_loc_assignment.ATTRIBUTE_CATEGORY),
397 ATTRIBUTE1 = decode( l_inv_loc_assignment.ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1, l_inv_loc_assignment.ATTRIBUTE1),
398 ATTRIBUTE2 = decode( l_inv_loc_assignment.ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2, l_inv_loc_assignment.ATTRIBUTE2),
399 ATTRIBUTE3 = decode( l_inv_loc_assignment.ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3, l_inv_loc_assignment.ATTRIBUTE3),
400 ATTRIBUTE4 = decode( l_inv_loc_assignment.ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4, l_inv_loc_assignment.ATTRIBUTE4),
401 ATTRIBUTE5 = decode( l_inv_loc_assignment.ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5, l_inv_loc_assignment.ATTRIBUTE5),
402 ATTRIBUTE6 = decode( l_inv_loc_assignment.ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6, l_inv_loc_assignment.ATTRIBUTE6),
403 ATTRIBUTE7 = decode( l_inv_loc_assignment.ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7, l_inv_loc_assignment.ATTRIBUTE7),
404 ATTRIBUTE8 = decode( l_inv_loc_assignment.ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8, l_inv_loc_assignment.ATTRIBUTE8),
405 ATTRIBUTE9 = decode( l_inv_loc_assignment.ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9, l_inv_loc_assignment.ATTRIBUTE9),
406 ATTRIBUTE10 = decode( l_inv_loc_assignment.ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10, l_inv_loc_assignment.ATTRIBUTE10),
407 ATTRIBUTE11 = decode( l_inv_loc_assignment.ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11, l_inv_loc_assignment.ATTRIBUTE11),
408 ATTRIBUTE12 = decode( l_inv_loc_assignment.ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12, l_inv_loc_assignment.ATTRIBUTE12),
409 ATTRIBUTE13 = decode( l_inv_loc_assignment.ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13, l_inv_loc_assignment.ATTRIBUTE13),
410 ATTRIBUTE14 = decode( l_inv_loc_assignment.ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14, l_inv_loc_assignment.ATTRIBUTE14),
411 ATTRIBUTE15 = decode( l_inv_loc_assignment.ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15, l_inv_loc_assignment.ATTRIBUTE15)
412 where CSP_INV_LOC_ASSIGNMENT_ID = l_inv_loc_assignment.CSP_INV_LOC_ASSIGNMENT_ID;
413
414 If (SQL%NOTFOUND) then
415 RAISE NO_DATA_FOUND;
416 End If;
417
418 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
419 'Update_Row',
420 'A', 'C') THEN
421 csp_inv_loc_assignments_cuhk.update_inventory_location_post
422 ( px_inv_loc_assignment => l_inv_loc_assignment ,
423 x_return_status => l_return_status,
424 x_msg_count => l_msg_count,
425 x_msg_data => l_msg_data
426 ) ;
427
428 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
429 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
430 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');
431 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
432 FND_MSG_PUB.Add;
433 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
434 END IF;
435 END IF;
436 -- Pre call to the Vertical Type User Hook
437 --
438 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
439 'Update_Row',
440 'A', 'V') THEN
441 csp_inv_loc_assignments_vuhk.update_inventory_location_Post
442 ( px_inv_loc_assignment => l_inv_loc_assignment ,
443 x_return_status => l_return_status,
444 x_msg_count => l_msg_count,
445 x_msg_data => l_msg_data
446 ) ;
447
448 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
449 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
450 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
451 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
452 FND_MSG_PUB.Add;
453 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
454 END IF;
455 END IF;
456 csp_inv_loc_assignments_iuhk.update_inventory_location_post
457 ( x_return_status => l_return_status
458 ) ;
459
460 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
461 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
462 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
463 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
464 FND_MSG_PUB.Add;
465 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
466 END IF;
467 END Update_Row;
468
469 PROCEDURE Delete_Row(
470 p_CSP_INV_LOC_ASSIGNMENT_ID NUMBER)
471 IS
472 l_inv_loc_assignment_id NUMBER;
473 l_return_status varchar2(100);
474 l_msg_count NUMBER;
475 l_msg_data varchar2(1000);
476 l_api_name_full varchar2(50) := 'CSP_INV_LOC_ASSIGNMENTS_PKG.DELETE_ROW';
477 BEGIN
478 user_hooks_rec.CSP_INV_LOC_ASSIGNMENT_ID := p_CSP_INV_LOC_ASSIGNMENT_ID ;
479 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
480 'Delete_Row',
481 'B', 'C') THEN
482 csp_inv_loc_assignments_cuhk.delete_inventory_location_pre
483 ( p_inv_loc_assignment_id => p_CSP_INV_LOC_ASSIGNMENT_ID ,
484 x_return_status => l_return_status,
485 x_msg_count => l_msg_count,
486 x_msg_data => l_msg_data
487 ) ;
488
489 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
490 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
491 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
492 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
493 FND_MSG_PUB.Add;
494 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
495 END IF;
496 END IF;
497 -- Pre call to the Vertical Type User Hook
498 --
499 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
500 'Update_Row',
501 'B', 'V') THEN
502 csp_inv_loc_assignments_vuhk.delete_inventory_location_pre
503 ( p_inv_loc_assignment_id => p_CSP_INV_LOC_ASSIGNMENT_ID ,
504 x_return_status => l_return_status,
505 x_msg_count => l_msg_count,
506 x_msg_data => l_msg_data
507 ) ;
508
509 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
510 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
511 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
512 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
513 FND_MSG_PUB.Add;
514 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
515 END IF;
516 END IF;
517 csp_inv_loc_assignments_iuhk.delete_inventory_location_Pre
518 ( x_return_status => l_return_status
519 ) ;
520
521 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
522 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
523 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
524 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
525 FND_MSG_PUB.Add;
526 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
527 END IF;
528
529 DELETE FROM CSP_INV_LOC_ASSIGNMENTS
530 WHERE CSP_INV_LOC_ASSIGNMENT_ID = p_CSP_INV_LOC_ASSIGNMENT_ID;
531 If (SQL%NOTFOUND) then
532 RAISE NO_DATA_FOUND;
533 End If;
534
535 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
536 'Delete_Row',
537 'A', 'C') THEN
538 csp_inv_loc_assignments_cuhk.delete_inventory_location_post
539 ( p_inv_loc_assignment_id => p_CSP_INV_LOC_ASSIGNMENT_ID ,
540 x_return_status => l_return_status,
541 x_msg_count => l_msg_count,
542 x_msg_data => l_msg_data
543 ) ;
544
545 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
546 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
547 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
548 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
549 FND_MSG_PUB.Add;
550 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
551 END IF;
552 END IF;
553 -- Pre call to the Vertical Type User Hook
554 --
555 IF jtf_usr_hks.Ok_To_Execute('CSP_INV_LOC_ASSIGNMENTS_PKG',
556 'Delete_Row',
557 'A', 'V') THEN
558 csp_inv_loc_assignments_vuhk.delete_inventory_location_Post
559 ( p_inv_loc_assignment_id => p_CSP_INV_LOC_ASSIGNMENT_ID ,
560 x_return_status => l_return_status,
561 x_msg_count => l_msg_count,
562 x_msg_data => l_msg_data
563 ) ;
564
565 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
566 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
567 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
568 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
569 FND_MSG_PUB.Add;
570 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
571 END IF;
572 END IF;
573
574 csp_inv_loc_assignments_iuhk.delete_inventory_location_post
575 ( x_return_status => l_return_status
576 ) ;
577
578 IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
579 --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
580 FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
581 FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
582 FND_MSG_PUB.Add;
583 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
584 END IF;
585
586 END Delete_Row;
587
588 PROCEDURE Lock_Row(
589 p_CSP_INV_LOC_ASSIGNMENT_ID NUMBER,
590 p_CREATED_BY NUMBER,
591 p_CREATION_DATE DATE,
592 p_LAST_UPDATED_BY NUMBER,
593 p_LAST_UPDATE_DATE DATE,
594 p_LAST_UPDATE_LOGIN NUMBER,
595 p_RESOURCE_ID NUMBER,
596 p_ORGANIZATION_ID NUMBER,
597 p_SUBINVENTORY_CODE VARCHAR2,
598 p_LOCATOR_ID NUMBER,
599 p_RESOURCE_TYPE VARCHAR2,
600 p_EFFECTIVE_DATE_START DATE,
601 p_EFFECTIVE_DATE_END DATE,
602 p_DEFAULT_CODE VARCHAR2,
603 p_ATTRIBUTE_CATEGORY VARCHAR2,
604 p_ATTRIBUTE1 VARCHAR2,
605 p_ATTRIBUTE2 VARCHAR2,
606 p_ATTRIBUTE3 VARCHAR2,
607 p_ATTRIBUTE4 VARCHAR2,
608 p_ATTRIBUTE5 VARCHAR2,
609 p_ATTRIBUTE6 VARCHAR2,
610 p_ATTRIBUTE7 VARCHAR2,
611 p_ATTRIBUTE8 VARCHAR2,
612 p_ATTRIBUTE9 VARCHAR2,
613 p_ATTRIBUTE10 VARCHAR2,
614 p_ATTRIBUTE11 VARCHAR2,
615 p_ATTRIBUTE12 VARCHAR2,
616 p_ATTRIBUTE13 VARCHAR2,
617 p_ATTRIBUTE14 VARCHAR2,
618 p_ATTRIBUTE15 VARCHAR2)
619
620 IS
621 CURSOR C IS
622 SELECT *
623 FROM CSP_INV_LOC_ASSIGNMENTS
624 WHERE CSP_INV_LOC_ASSIGNMENT_ID = p_CSP_INV_LOC_ASSIGNMENT_ID
625 FOR UPDATE of CSP_INV_LOC_ASSIGNMENT_ID NOWAIT;
626 Recinfo C%ROWTYPE;
627 BEGIN
628 OPEN C;
629 FETCH C INTO Recinfo;
630 If (C%NOTFOUND) then
631 CLOSE C;
632 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
633 APP_EXCEPTION.RAISE_EXCEPTION;
634 End If;
635 CLOSE C;
636 if (
637 ( Recinfo.CSP_INV_LOC_ASSIGNMENT_ID = p_CSP_INV_LOC_ASSIGNMENT_ID)
638 AND ( ( Recinfo.CREATED_BY = p_CREATED_BY)
639 OR ( ( Recinfo.CREATED_BY IS NULL )
640 AND ( p_CREATED_BY IS NULL )))
641 AND ( ( Recinfo.CREATION_DATE = p_CREATION_DATE)
642 OR ( ( Recinfo.CREATION_DATE IS NULL )
643 AND ( p_CREATION_DATE IS NULL )))
644 AND ( ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
645 OR ( ( Recinfo.LAST_UPDATED_BY IS NULL )
646 AND ( p_LAST_UPDATED_BY IS NULL )))
647 AND ( ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
648 OR ( ( Recinfo.LAST_UPDATE_DATE IS NULL )
649 AND ( p_LAST_UPDATE_DATE IS NULL )))
650 AND ( ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
651 OR ( ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
652 AND ( p_LAST_UPDATE_LOGIN IS NULL )))
653 AND ( ( Recinfo.RESOURCE_ID = p_RESOURCE_ID)
654 OR ( ( Recinfo.RESOURCE_ID IS NULL )
655 AND ( p_RESOURCE_ID IS NULL )))
656 AND ( ( Recinfo.ORGANIZATION_ID = p_ORGANIZATION_ID)
657 OR ( ( Recinfo.ORGANIZATION_ID IS NULL )
658 AND ( p_ORGANIZATION_ID IS NULL )))
659 AND ( ( Recinfo.SUBINVENTORY_CODE = p_SUBINVENTORY_CODE)
660 OR ( ( Recinfo.SUBINVENTORY_CODE IS NULL )
661 AND ( p_SUBINVENTORY_CODE IS NULL )))
662 AND ( ( Recinfo.LOCATOR_ID = p_LOCATOR_ID)
663 OR ( ( Recinfo.LOCATOR_ID IS NULL )
664 AND ( p_LOCATOR_ID IS NULL )))
665 AND ( ( Recinfo.RESOURCE_TYPE = p_RESOURCE_TYPE)
666 OR ( ( Recinfo.RESOURCE_TYPE IS NULL )
667 AND ( p_RESOURCE_TYPE IS NULL )))
668 AND ( ( Recinfo.EFFECTIVE_DATE_START = p_EFFECTIVE_DATE_START)
669 OR ( ( Recinfo.EFFECTIVE_DATE_START IS NULL )
670 AND ( p_EFFECTIVE_DATE_START IS NULL )))
671 AND ( ( Recinfo.EFFECTIVE_DATE_END = p_EFFECTIVE_DATE_END)
672 OR ( ( Recinfo.EFFECTIVE_DATE_END IS NULL )
673 AND ( p_EFFECTIVE_DATE_END IS NULL )))
674 AND ( ( Recinfo.DEFAULT_CODE = p_DEFAULT_CODE)
675 OR ( ( Recinfo.DEFAULT_CODE IS NULL )
676 AND ( p_DEFAULT_CODE IS NULL )))
677 AND ( ( Recinfo.ATTRIBUTE_CATEGORY = p_ATTRIBUTE_CATEGORY)
678 OR ( ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
679 AND ( p_ATTRIBUTE_CATEGORY IS NULL )))
680 AND ( ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
681 OR ( ( Recinfo.ATTRIBUTE1 IS NULL )
682 AND ( p_ATTRIBUTE1 IS NULL )))
683 AND ( ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
684 OR ( ( Recinfo.ATTRIBUTE2 IS NULL )
685 AND ( p_ATTRIBUTE2 IS NULL )))
686 AND ( ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
687 OR ( ( Recinfo.ATTRIBUTE3 IS NULL )
688 AND ( p_ATTRIBUTE3 IS NULL )))
689 AND ( ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
690 OR ( ( Recinfo.ATTRIBUTE4 IS NULL )
691 AND ( p_ATTRIBUTE4 IS NULL )))
692 AND ( ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
693 OR ( ( Recinfo.ATTRIBUTE5 IS NULL )
694 AND ( p_ATTRIBUTE5 IS NULL )))
695 AND ( ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
696 OR ( ( Recinfo.ATTRIBUTE6 IS NULL )
697 AND ( p_ATTRIBUTE6 IS NULL )))
698 AND ( ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
699 OR ( ( Recinfo.ATTRIBUTE7 IS NULL )
700 AND ( p_ATTRIBUTE7 IS NULL )))
701 AND ( ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
702 OR ( ( Recinfo.ATTRIBUTE8 IS NULL )
703 AND ( p_ATTRIBUTE8 IS NULL )))
704 AND ( ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
705 OR ( ( Recinfo.ATTRIBUTE9 IS NULL )
706 AND ( p_ATTRIBUTE9 IS NULL )))
707 AND ( ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
708 OR ( ( Recinfo.ATTRIBUTE10 IS NULL )
709 AND ( p_ATTRIBUTE10 IS NULL )))
710 AND ( ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
711 OR ( ( Recinfo.ATTRIBUTE11 IS NULL )
712 AND ( p_ATTRIBUTE11 IS NULL )))
713 AND ( ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
714 OR ( ( Recinfo.ATTRIBUTE12 IS NULL )
715 AND ( p_ATTRIBUTE12 IS NULL )))
716 AND ( ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
717 OR ( ( Recinfo.ATTRIBUTE13 IS NULL )
718 AND ( p_ATTRIBUTE13 IS NULL )))
719 AND ( ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
720 OR ( ( Recinfo.ATTRIBUTE14 IS NULL )
721 AND ( p_ATTRIBUTE14 IS NULL )))
722 AND ( ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
723 OR ( ( Recinfo.ATTRIBUTE15 IS NULL )
724 AND ( p_ATTRIBUTE15 IS NULL )))
725 ) then
726 return;
727 else
728 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
729 APP_EXCEPTION.RAISE_EXCEPTION;
730 End If;
731 END Lock_Row;
732
733 End CSP_INV_LOC_ASSIGNMENTS_PKG;