DBA Data[Home] [Help]

PACKAGE BODY: APPS.CSP_MOVEORDER_HEADERS_PKG

Source


1 PACKAGE BODY CSP_MOVEORDER_HEADERS_PKG AS
2 /* $Header: cspttmhb.pls 115.17 2002/11/26 07:47:54 hhaugeru ship $ */
3 -- Start of Comments
4 -- Package name     : CSP_MOVEORDER_HEADERS_PKG
5 -- Purpose          :
6 -- History          :
7 -- NOTE             :
8 -- End of Comments
9 
10 
11 G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_MOVEORDER_HEADERS_PKG';
12 G_FILE_NAME CONSTANT VARCHAR2(12) := 'cspttmhb.pls';
13 
14 PROCEDURE Insert_Row(
15           p_HEADER_ID   NUMBER,    -- change IN-OUT px_HEADER_ID to an IN parameter only. 12/06/99 VL
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_CARRIER    VARCHAR2,
22           p_SHIPMENT_METHOD    VARCHAR2,
23           p_AUTORECEIPT_FLAG    VARCHAR2,
24           p_ATTRIBUTE_CATEGORY    VARCHAR2,
25           p_ATTRIBUTE1    VARCHAR2,
26           p_ATTRIBUTE2    VARCHAR2,
27           p_ATTRIBUTE3    VARCHAR2,
28           p_ATTRIBUTE4    VARCHAR2,
29           p_ATTRIBUTE5    VARCHAR2,
30           p_ATTRIBUTE6    VARCHAR2,
31           p_ATTRIBUTE7    VARCHAR2,
32           p_ATTRIBUTE8    VARCHAR2,
33           p_ATTRIBUTE9    VARCHAR2,
34           p_ATTRIBUTE10    VARCHAR2,
35           p_ATTRIBUTE11    VARCHAR2,
36           p_ATTRIBUTE12    VARCHAR2,
37           p_ATTRIBUTE13    VARCHAR2,
38           p_ATTRIBUTE14    VARCHAR2,
39           p_ATTRIBUTE15    VARCHAR2,
40           -- changed phegde 02/28
41           p_location_id     NUMBER,
42           -- changed phegde 12/07/2000
43           p_party_site_id   NUMBER
44 
45           )
46 
47  IS
48 -- Removed by VL, 12/06/99
49 --  CURSOR C2 IS SELECT CSP_MOVEORDER_HEADERS_S.nextval FROM sys.dual;
50 
51 BEGIN
52 /*   If (px_HEADER_ID IS NULL) OR (px_HEADER_ID = FND_API.G_MISS_NUM) then
53        OPEN C2;
54        FETCH C2 INTO px_HEADER_ID;
55        CLOSE C2;
56    End If;*/
57 
58    INSERT INTO CSP_MOVEORDER_HEADERS(
59            HEADER_ID,
60            CREATED_BY,
61            CREATION_DATE,
62            LAST_UPDATED_BY,
63            LAST_UPDATE_DATE,
64            LAST_UPDATE_LOGIN,
65            CARRIER,
66            SHIPMENT_METHOD,
67            AUTORECEIPT_FLAG,
68            ATTRIBUTE_CATEGORY,
69            ATTRIBUTE1,
70            ATTRIBUTE2,
71            ATTRIBUTE3,
72            ATTRIBUTE4,
73            ATTRIBUTE5,
74            ATTRIBUTE6,
75            ATTRIBUTE7,
76            ATTRIBUTE8,
77            ATTRIBUTE9,
78            ATTRIBUTE10,
79            ATTRIBUTE11,
80            ATTRIBUTE12,
81            ATTRIBUTE13,
82            ATTRIBUTE14,
83            ATTRIBUTE15,
84 -- changed phegde 02/28
85            LOCATION_ID,
86 -- changed Arul 12/07
87            PARTY_SITE_ID
88            --ADDRESS1,
89            --ADDRESS2,
90            --ADDRESS3,
91            --ADDRESS4,
92            --CITY,
93            --POSTAL_CODE,
94            --STATE,
95            --PROVINCE,
96            --COUNTRY
97           ) VALUES (
98            p_HEADER_ID,
99            decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY),
100            decode( nvl(p_creation_date, fnd_api.g_miss_date),fnd_api.g_miss_date,sysdate,p_creation_date),
101            decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATED_BY),
102            decode( nvl(p_LAST_UPDATE_DATE, fnd_api.g_miss_date),fnd_api.g_miss_date,sysdate,p_last_update_date),
103            decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN),
104            decode( p_CARRIER, FND_API.G_MISS_CHAR, NULL, p_CARRIER),
105            decode( p_SHIPMENT_METHOD, FND_API.G_MISS_CHAR, NULL, p_SHIPMENT_METHOD),
106            decode( p_AUTORECEIPT_FLAG, FND_API.G_MISS_CHAR, NULL, p_AUTORECEIPT_FLAG),
107            decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE_CATEGORY),
108            decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1),
109            decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2),
110            decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3),
111            decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4),
112            decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5),
113            decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6),
114            decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7),
115            decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8),
116            decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9),
117            decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10),
118            decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11),
119            decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12),
120            decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13),
121            decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14),
122            decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15),
123            --changed phegde 02/28
124            decode( p_LOCATION_ID, FND_API.G_MISS_NUM, NULL, p_LOCATION_ID),
125 -- changed Arul 12/07
126            decode( p_PARTY_SITE_ID, FND_API.G_MISS_NUM, NULL, p_PARTY_SITE_ID)
127            /*decode( p_ADDRESS1, FND_API.G_MISS_CHAR, NULL, p_ADDRESS1),
128            decode( p_ADDRESS2, FND_API.G_MISS_CHAR, NULL, p_ADDRESS2),
129            decode( p_ADDRESS3, FND_API.G_MISS_CHAR, NULL, p_ADDRESS3),
130            decode( p_ADDRESS4, FND_API.G_MISS_CHAR, NULL, p_ADDRESS4),
131            decode( p_CITY, FND_API.G_MISS_CHAR, NULL, p_CITY),
132            decode( p_POSTAL_CODE, FND_API.G_MISS_CHAR, NULL, p_POSTAL_CODE),
133            decode( p_STATE, FND_API.G_MISS_CHAR, NULL, p_STATE),
134            decode( p_PROVINCE, FND_API.G_MISS_CHAR, NULL, p_PROVINCE),
135            decode( p_COUNTRY, FND_API.G_MISS_CHAR, NULL, p_COUNTRY) */
136            );
137 
138 End Insert_Row;
139 
140 PROCEDURE Update_Row(
141           p_HEADER_ID    NUMBER,
142           p_CREATED_BY    NUMBER,
143           p_CREATION_DATE    DATE,
144           p_LAST_UPDATED_BY    NUMBER,
145           p_LAST_UPDATE_DATE    DATE,
146           p_LAST_UPDATE_LOGIN    NUMBER,
147           p_CARRIER    VARCHAR2,
148           p_SHIPMENT_METHOD    VARCHAR2,
149           p_AUTORECEIPT_FLAG    VARCHAR2,
150           p_ATTRIBUTE_CATEGORY    VARCHAR2,
151           p_ATTRIBUTE1    VARCHAR2,
152           p_ATTRIBUTE2    VARCHAR2,
153           p_ATTRIBUTE3    VARCHAR2,
154           p_ATTRIBUTE4    VARCHAR2,
155           p_ATTRIBUTE5    VARCHAR2,
156           p_ATTRIBUTE6    VARCHAR2,
157           p_ATTRIBUTE7    VARCHAR2,
158           p_ATTRIBUTE8    VARCHAR2,
159           p_ATTRIBUTE9    VARCHAR2,
160           p_ATTRIBUTE10    VARCHAR2,
161           p_ATTRIBUTE11    VARCHAR2,
162           p_ATTRIBUTE12    VARCHAR2,
163           p_ATTRIBUTE13    VARCHAR2,
164           p_ATTRIBUTE14    VARCHAR2,
165           p_ATTRIBUTE15    VARCHAR2,
166           -- changed phegde 02/28
167           p_location_id     NUMBER,
168 -- changed Arul 12/07
169           P_PARTY_SITE_ID  NUMBER
170           )
171 
172  IS
173  BEGIN
174     Update CSP_MOVEORDER_HEADERS
175     SET
176               CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY),
177               CREATION_DATE = decode(p_CREATION_DATE,fnd_api.g_miss_date,creation_date,p_creation_date),
178               LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY),
179               LAST_UPDATE_DATE = decode(p_LAST_UPDATE_DATE,fnd_api.g_miss_date,last_update_date,p_last_update_date),
180               LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN),
181               CARRIER = decode( p_CARRIER, FND_API.G_MISS_CHAR, CARRIER, p_CARRIER),
182               SHIPMENT_METHOD = decode( p_SHIPMENT_METHOD, FND_API.G_MISS_CHAR, SHIPMENT_METHOD, p_SHIPMENT_METHOD),
183               AUTORECEIPT_FLAG = decode( p_AUTORECEIPT_FLAG, FND_API.G_MISS_CHAR, AUTORECEIPT_FLAG, p_AUTORECEIPT_FLAG),
184               ATTRIBUTE_CATEGORY = decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, ATTRIBUTE_CATEGORY, p_ATTRIBUTE_CATEGORY),
185               ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1, p_ATTRIBUTE1),
186               ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2, p_ATTRIBUTE2),
187               ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3, p_ATTRIBUTE3),
188               ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4, p_ATTRIBUTE4),
189               ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5, p_ATTRIBUTE5),
190               ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6, p_ATTRIBUTE6),
191               ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7, p_ATTRIBUTE7),
192               ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8, p_ATTRIBUTE8),
193               ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9, p_ATTRIBUTE9),
194               ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10, p_ATTRIBUTE10),
195               ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11, p_ATTRIBUTE11),
196               ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12, p_ATTRIBUTE12),
197               ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13, p_ATTRIBUTE13),
198               ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14, p_ATTRIBUTE14),
199               ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15, p_ATTRIBUTE15),
200               -- changed phegde 02/28
201               LOCATION_ID = decode( p_LOCATION_ID, FND_API.G_MISS_NUM, LOCATION_ID, p_LOCATION_ID),
202 -- changed Arul 12/07
203               PARTY_SITE_ID = decode( p_PARTY_SITE_ID, FND_API.G_MISS_NUM, PARTY_SITE_ID, p_PARTY_SITE_ID)
204 
205               /* ADDRESS1 = decode( p_ADDRESS1, FND_API.G_MISS_CHAR, ADDRESS1, p_ADDRESS1),
206               ADDRESS2 = decode( p_ADDRESS2, FND_API.G_MISS_CHAR, ADDRESS2, p_ADDRESS2),
207               ADDRESS3 = decode( p_ADDRESS3, FND_API.G_MISS_CHAR, ADDRESS3, p_ADDRESS3),
208               ADDRESS4 = decode( p_ADDRESS4, FND_API.G_MISS_CHAR, ADDRESS4, p_ADDRESS4),
209               CITY = decode( p_CITY, FND_API.G_MISS_CHAR, CITY, p_CITY),
210               POSTAL_CODE = decode( p_POSTAL_CODE, FND_API.G_MISS_CHAR, POSTAL_CODE, p_POSTAL_CODE),
211               STATE = decode( p_STATE, FND_API.G_MISS_CHAR, STATE, p_STATE),
212               PROVINCE = decode( p_PROVINCE, FND_API.G_MISS_CHAR, PROVINCE, p_PROVINCE),
213               COUNTRY = decode( p_COUNTRY, FND_API.G_MISS_CHAR, COUNTRY, p_COUNTRY) */
214     where HEADER_ID = p_HEADER_ID;
215 
216     If (SQL%NOTFOUND) then
217         RAISE NO_DATA_FOUND;
218     End If;
219 END Update_Row;
220 
221 PROCEDURE Delete_Row(
222     p_HEADER_ID  NUMBER)
223  IS
224  BEGIN
225    DELETE FROM CSP_MOVEORDER_HEADERS
226     WHERE HEADER_ID = p_HEADER_ID;
227    If (SQL%NOTFOUND) then
228        RAISE NO_DATA_FOUND;
229    End If;
230  END Delete_Row;
231 
232 PROCEDURE Lock_Row(
233           p_HEADER_ID    NUMBER,
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_CARRIER    VARCHAR2,
240           p_SHIPMENT_METHOD    VARCHAR2,
241           p_AUTORECEIPT_FLAG    VARCHAR2,
242           p_ATTRIBUTE_CATEGORY    VARCHAR2,
243           p_ATTRIBUTE1    VARCHAR2,
244           p_ATTRIBUTE2    VARCHAR2,
245           p_ATTRIBUTE3    VARCHAR2,
246           p_ATTRIBUTE4    VARCHAR2,
247           p_ATTRIBUTE5    VARCHAR2,
248           p_ATTRIBUTE6    VARCHAR2,
249           p_ATTRIBUTE7    VARCHAR2,
250           p_ATTRIBUTE8    VARCHAR2,
251           p_ATTRIBUTE9    VARCHAR2,
252           p_ATTRIBUTE10    VARCHAR2,
253           p_ATTRIBUTE11    VARCHAR2,
254           p_ATTRIBUTE12    VARCHAR2,
255           p_ATTRIBUTE13    VARCHAR2,
256           p_ATTRIBUTE14    VARCHAR2,
257           p_ATTRIBUTE15    VARCHAR2,
258           -- changed phegde 02/28
259           p_LOCATION_ID     NUMBER,
260 -- changed Arul 12/07
261           P_PARTY_SITE_ID  NUMBER
262           )
263 
264  IS
265    CURSOR C IS
266         SELECT *
267          FROM CSP_MOVEORDER_HEADERS
268         WHERE HEADER_ID =  p_HEADER_ID
269         FOR UPDATE of HEADER_ID NOWAIT;
270    Recinfo C%ROWTYPE;
271  BEGIN
272     OPEN C;
273     FETCH C INTO Recinfo;
274     If (C%NOTFOUND) then
275         CLOSE C;
276         FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
277         APP_EXCEPTION.RAISE_EXCEPTION;
278     End If;
279     CLOSE C;
280 
281     if (
282            (      Recinfo.HEADER_ID = p_HEADER_ID)
283        AND (    ( Recinfo.CREATED_BY = p_CREATED_BY)
284             OR (    ( Recinfo.CREATED_BY IS NULL )
285                 AND (  p_CREATED_BY IS NULL )))
286        AND (    ( Recinfo.CREATION_DATE = p_CREATION_DATE)
290             OR (    ( Recinfo.LAST_UPDATED_BY IS NULL )
287             OR (    ( Recinfo.CREATION_DATE IS NULL )
288                 AND (  p_CREATION_DATE IS NULL )))
289        AND (    ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
291                 AND (  p_LAST_UPDATED_BY IS NULL )))
292        AND (    ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
293             OR (    ( Recinfo.LAST_UPDATE_DATE IS NULL )
294                 AND (  p_LAST_UPDATE_DATE IS NULL )))
295        AND (    ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
296             OR (    ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
297                 AND (  p_LAST_UPDATE_LOGIN IS NULL )))
298        AND (    ( Recinfo.CARRIER = p_CARRIER)
299             OR (    ( Recinfo.CARRIER IS NULL )
300                 AND (  p_CARRIER IS NULL )))
301        AND (    ( Recinfo.SHIPMENT_METHOD = p_SHIPMENT_METHOD)
302             OR (    ( Recinfo.SHIPMENT_METHOD IS NULL )
303                 AND (  p_SHIPMENT_METHOD IS NULL )))
304        AND (    ( Recinfo.AUTORECEIPT_FLAG = p_AUTORECEIPT_FLAG)
305             OR (    ( Recinfo.AUTORECEIPT_FLAG IS NULL )
306                 AND (  p_AUTORECEIPT_FLAG IS NULL )))
307        AND (    ( Recinfo.ATTRIBUTE_CATEGORY = p_ATTRIBUTE_CATEGORY)
308             OR (    ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
309                 AND (  p_ATTRIBUTE_CATEGORY IS NULL )))
310        AND (    ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
311             OR (    ( Recinfo.ATTRIBUTE1 IS NULL )
312                 AND (  p_ATTRIBUTE1 IS NULL )))
313        AND (    ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
314             OR (    ( Recinfo.ATTRIBUTE2 IS NULL )
315                 AND (  p_ATTRIBUTE2 IS NULL )))
316        AND (    ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
317             OR (    ( Recinfo.ATTRIBUTE3 IS NULL )
318                 AND (  p_ATTRIBUTE3 IS NULL )))
319        AND (    ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
320             OR (    ( Recinfo.ATTRIBUTE4 IS NULL )
321                 AND (  p_ATTRIBUTE4 IS NULL )))
322        AND (    ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
323             OR (    ( Recinfo.ATTRIBUTE5 IS NULL )
324                 AND (  p_ATTRIBUTE5 IS NULL )))
325        AND (    ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
326             OR (    ( Recinfo.ATTRIBUTE6 IS NULL )
327                 AND (  p_ATTRIBUTE6 IS NULL )))
328        AND (    ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
329             OR (    ( Recinfo.ATTRIBUTE7 IS NULL )
330                 AND (  p_ATTRIBUTE7 IS NULL )))
331        AND (    ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
332             OR (    ( Recinfo.ATTRIBUTE8 IS NULL )
333                 AND (  p_ATTRIBUTE8 IS NULL )))
334        AND (    ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
335             OR (    ( Recinfo.ATTRIBUTE9 IS NULL )
336                 AND (  p_ATTRIBUTE9 IS NULL )))
337        AND (    ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
338             OR (    ( Recinfo.ATTRIBUTE10 IS NULL )
339                 AND (  p_ATTRIBUTE10 IS NULL )))
340        AND (    ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
341             OR (    ( Recinfo.ATTRIBUTE11 IS NULL )
342                 AND (  p_ATTRIBUTE11 IS NULL )))
343        AND (    ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
344             OR (    ( Recinfo.ATTRIBUTE12 IS NULL )
345                 AND (  p_ATTRIBUTE12 IS NULL )))
346        AND (    ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
347             OR (    ( Recinfo.ATTRIBUTE13 IS NULL )
348                 AND (  p_ATTRIBUTE13 IS NULL )))
349        AND (    ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
350             OR (    ( Recinfo.ATTRIBUTE14 IS NULL )
351                 AND (  p_ATTRIBUTE14 IS NULL )))
352        AND (    ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
353             OR (    ( Recinfo.ATTRIBUTE15 IS NULL )
354                 AND (  p_ATTRIBUTE15 IS NULL )))
355        -- changed phegde 02/28
356        AND (    ( Recinfo.LOCATION_ID = p_LOCATION_ID)
357             OR (    ( Recinfo.LOCATION_ID IS NULL )
358                 AND (  p_LOCATION_ID IS NULL )))
359 -- changed Arul 12/07
360        AND (    ( Recinfo.PARTY_SITE_ID = p_PARTY_SITE_ID)
361             OR (    ( Recinfo.PARTY_SITE_ID IS NULL )
362                 AND (  p_PARTY_SITE_ID IS NULL )))
363        ) then
364        return;
365    else
366        FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
367        APP_EXCEPTION.RAISE_EXCEPTION;
368    End If;
369 END Lock_Row;
370 
371 End CSP_MOVEORDER_HEADERS_PKG;