DBA Data[Home] [Help]

PACKAGE BODY: APPS.ASO_QUOTE_PARTIES_PKG

Source


1 PACKAGE BODY ASO_QUOTE_PARTIES_PKG as
2 /* $Header: asotqptb.pls 120.0 2005/05/31 12:03:26 appldev noship $ */
3 -- Start of Comments
4 -- Package name     : ASO_QUOTE_PARTIES_PKG
5 -- Purpose          :
6 -- History          :
7 -- NOTE             :
8 -- End of Comments
9 
10 
11 G_PKG_NAME CONSTANT VARCHAR2(30):= 'ASO_QUOTE_PARTIES_PKG';
12 G_FILE_NAME CONSTANT VARCHAR2(12) := 'asotqptb.pls';
13 
14 PROCEDURE Insert_Row(
15           px_QUOTE_PARTY_ID   IN OUT NOCOPY  NUMBER,
16           p_CREATION_DATE    DATE,
17           p_CREATED_BY    NUMBER,
18           p_LAST_UPDATE_DATE    DATE,
19           p_LAST_UPDATE_LOGIN    NUMBER,
20           p_LAST_UPDATED_BY    NUMBER,
21           p_REQUEST_ID    NUMBER,
22           p_PROGRAM_APPLICATION_ID    NUMBER,
23           p_PROGRAM_ID    NUMBER,
24           p_PROGRAM_UPDATE_DATE    DATE,
25           p_QUOTE_HEADER_ID    NUMBER,
26           p_QUOTE_LINE_ID    NUMBER,
27           p_QUOTE_SHIPMENT_ID    NUMBER,
28           p_PARTY_TYPE    VARCHAR2,
29           p_PARTY_ID    NUMBER,
30           p_PARTY_OBJECT_TYPE    VARCHAR2,
31           p_PARTY_OBJECT_ID    VARCHAR2,
32           p_ATTRIBUTE_CATEGORY    VARCHAR2,
33           p_ATTRIBUTE1    VARCHAR2,
34           p_ATTRIBUTE2    VARCHAR2,
35           p_ATTRIBUTE3    VARCHAR2,
36           p_ATTRIBUTE4    VARCHAR2,
37           p_ATTRIBUTE5    VARCHAR2,
38           p_ATTRIBUTE6    VARCHAR2,
39           p_ATTRIBUTE7    VARCHAR2,
40           p_ATTRIBUTE8    VARCHAR2,
41           p_ATTRIBUTE9    VARCHAR2,
42           p_ATTRIBUTE10    VARCHAR2,
43           p_ATTRIBUTE11    VARCHAR2,
44           p_ATTRIBUTE12    VARCHAR2,
45           p_ATTRIBUTE13    VARCHAR2,
46           p_ATTRIBUTE14    VARCHAR2,
47           p_ATTRIBUTE15    VARCHAR2,
48           p_OBJECT_VERSION_NUMBER  NUMBER
49 		)
50  --         p_SECURITY_GROUP_ID    NUMBER,
51 
52  IS
53    CURSOR C2 IS SELECT ASO_QUOTE_PARTIES_S.nextval FROM sys.dual;
54 BEGIN
55    If (px_QUOTE_PARTY_ID IS NULL) OR (px_QUOTE_PARTY_ID = FND_API.G_MISS_NUM) then
56        OPEN C2;
57        FETCH C2 INTO px_QUOTE_PARTY_ID;
58        CLOSE C2;
59    End If;
60    INSERT INTO ASO_QUOTE_PARTIES(
61            QUOTE_PARTY_ID,
62            CREATION_DATE,
63            CREATED_BY,
64            LAST_UPDATE_DATE,
65            LAST_UPDATE_LOGIN,
66            LAST_UPDATED_BY,
67            REQUEST_ID,
68            PROGRAM_APPLICATION_ID,
69            PROGRAM_ID,
70            PROGRAM_UPDATE_DATE,
71            QUOTE_HEADER_ID,
72            QUOTE_LINE_ID,
73            QUOTE_SHIPMENT_ID,
74            PARTY_TYPE,
75            PARTY_ID,
76            PARTY_OBJECT_TYPE,
77            PARTY_OBJECT_ID,
78            ATTRIBUTE_CATEGORY,
79            ATTRIBUTE1,
80            ATTRIBUTE2,
81            ATTRIBUTE3,
82            ATTRIBUTE4,
83            ATTRIBUTE5,
84            ATTRIBUTE6,
85            ATTRIBUTE7,
86            ATTRIBUTE8,
87            ATTRIBUTE9,
88            ATTRIBUTE10,
89            ATTRIBUTE11,
90            ATTRIBUTE12,
91            ATTRIBUTE13,
92            ATTRIBUTE14,
93            ATTRIBUTE15,
94            OBJECT_VERSION_NUMBER
95          --  SECURITY_GROUP_ID,
96           ) VALUES (
97            px_QUOTE_PARTY_ID,
98            decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_CREATION_DATE),
99            decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY),
100            decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE),
101            decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN),
102            decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATED_BY),
103            decode( p_REQUEST_ID, FND_API.G_MISS_NUM, NULL, p_REQUEST_ID),
104            decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, NULL, p_PROGRAM_APPLICATION_ID),
105            decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, NULL, p_PROGRAM_ID),
106            decode( p_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_PROGRAM_UPDATE_DATE),
107            decode( p_QUOTE_HEADER_ID, FND_API.G_MISS_NUM, NULL, p_QUOTE_HEADER_ID),
108            decode( p_QUOTE_LINE_ID, FND_API.G_MISS_NUM, NULL, p_QUOTE_LINE_ID),
109            decode( p_QUOTE_SHIPMENT_ID, FND_API.G_MISS_NUM, NULL, p_QUOTE_SHIPMENT_ID),
110            decode( p_PARTY_TYPE, FND_API.G_MISS_CHAR, NULL, p_PARTY_TYPE),
111            decode( p_PARTY_ID, FND_API.G_MISS_NUM, NULL, p_PARTY_ID),
112            decode( p_PARTY_OBJECT_TYPE, FND_API.G_MISS_CHAR, NULL, p_PARTY_OBJECT_TYPE),
113            decode( p_PARTY_OBJECT_ID, FND_API.G_MISS_CHAR, NULL, p_PARTY_OBJECT_ID),
114            decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE_CATEGORY),
115            decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1),
116            decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2),
117            decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3),
118            decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4),
119            decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5),
120            decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6),
121            decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7),
122            decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8),
123            decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9),
124            decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10),
125            decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11),
126            decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12),
127            decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13),
128            decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14),
129            decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15),
130 		 decode ( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM,1,NULL,1, p_OBJECT_VERSION_NUMBER)
131 		 );
132     --       decode( p_SECURITY_GROUP_ID, FND_API.G_MISS_NUM, NULL, p_SECURITY_GROUP_ID),
133 End Insert_Row;
134 
135 PROCEDURE Update_Row(
136           p_QUOTE_PARTY_ID    NUMBER,
137           p_CREATION_DATE    DATE,
138           p_CREATED_BY    NUMBER,
139           p_LAST_UPDATE_DATE    DATE,
140           p_LAST_UPDATE_LOGIN    NUMBER,
141           p_LAST_UPDATED_BY    NUMBER,
142           p_REQUEST_ID    NUMBER,
143           p_PROGRAM_APPLICATION_ID    NUMBER,
144           p_PROGRAM_ID    NUMBER,
145           p_PROGRAM_UPDATE_DATE    DATE,
146           p_QUOTE_HEADER_ID    NUMBER,
147           p_QUOTE_LINE_ID    NUMBER,
148           p_QUOTE_SHIPMENT_ID    NUMBER,
149           p_PARTY_TYPE    VARCHAR2,
150           p_PARTY_ID    NUMBER,
151           p_PARTY_OBJECT_TYPE    VARCHAR2,
152           p_PARTY_OBJECT_ID    VARCHAR2,
153           p_ATTRIBUTE_CATEGORY    VARCHAR2,
154           p_ATTRIBUTE1    VARCHAR2,
155           p_ATTRIBUTE2    VARCHAR2,
156           p_ATTRIBUTE3    VARCHAR2,
157           p_ATTRIBUTE4    VARCHAR2,
158           p_ATTRIBUTE5    VARCHAR2,
159           p_ATTRIBUTE6    VARCHAR2,
160           p_ATTRIBUTE7    VARCHAR2,
161           p_ATTRIBUTE8    VARCHAR2,
162           p_ATTRIBUTE9    VARCHAR2,
163           p_ATTRIBUTE10    VARCHAR2,
164           p_ATTRIBUTE11    VARCHAR2,
165           p_ATTRIBUTE12    VARCHAR2,
166           p_ATTRIBUTE13    VARCHAR2,
167           p_ATTRIBUTE14    VARCHAR2,
168           p_ATTRIBUTE15    VARCHAR2,
169           p_OBJECT_VERSION_NUMBER  NUMBER
170 		)
171     --      p_SECURITY_GROUP_ID    NUMBER,
172 
173  IS
174  BEGIN
175     Update ASO_QUOTE_PARTIES
176     SET
177              /* CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),
178               CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_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               LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY),
182               REQUEST_ID = decode( p_REQUEST_ID, FND_API.G_MISS_NUM, REQUEST_ID, p_REQUEST_ID),
183               PROGRAM_APPLICATION_ID = decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, PROGRAM_APPLICATION_ID, p_PROGRAM_APPLICATION_ID),
184               PROGRAM_ID = decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, PROGRAM_ID, p_PROGRAM_ID),
185               PROGRAM_UPDATE_DATE = decode( p_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, PROGRAM_UPDATE_DATE, p_PROGRAM_UPDATE_DATE),
186               QUOTE_HEADER_ID = decode( p_QUOTE_HEADER_ID, FND_API.G_MISS_NUM, QUOTE_HEADER_ID, p_QUOTE_HEADER_ID),
187               QUOTE_LINE_ID = decode( p_QUOTE_LINE_ID, FND_API.G_MISS_NUM, QUOTE_LINE_ID, p_QUOTE_LINE_ID),
188               QUOTE_SHIPMENT_ID = decode( p_QUOTE_SHIPMENT_ID, FND_API.G_MISS_NUM, QUOTE_SHIPMENT_ID, p_QUOTE_SHIPMENT_ID),
189               PARTY_TYPE = decode( p_PARTY_TYPE, FND_API.G_MISS_CHAR, PARTY_TYPE, p_PARTY_TYPE),
190               PARTY_ID = decode( p_PARTY_ID, FND_API.G_MISS_NUM, PARTY_ID, p_PARTY_ID),
191               PARTY_OBJECT_TYPE = decode( p_PARTY_OBJECT_TYPE, FND_API.G_MISS_CHAR, PARTY_OBJECT_TYPE, p_PARTY_OBJECT_TYPE),
192               PARTY_OBJECT_ID = decode( p_PARTY_OBJECT_ID, FND_API.G_MISS_CHAR, PARTY_OBJECT_ID, p_PARTY_OBJECT_ID),
193               ATTRIBUTE_CATEGORY = decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, ATTRIBUTE_CATEGORY, p_ATTRIBUTE_CATEGORY),
194               ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1, p_ATTRIBUTE1),
195               ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2, p_ATTRIBUTE2),
196               ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3, p_ATTRIBUTE3),
197               ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4, p_ATTRIBUTE4),
198               ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5, p_ATTRIBUTE5),
199               ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6, p_ATTRIBUTE6),
200               ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7, p_ATTRIBUTE7),
201               ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8, p_ATTRIBUTE8),
202               ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9, p_ATTRIBUTE9),
203               ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10, p_ATTRIBUTE10),
204               ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11, p_ATTRIBUTE11),
205               ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12, p_ATTRIBUTE12),
206               ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13, p_ATTRIBUTE13),
207               ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14, p_ATTRIBUTE14),
208               ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15, p_ATTRIBUTE15),
209 		    OBJECT_VERSION_NUMBER = decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, nvl(OBJECT_VERSION_NUMBER,0)+1, nvl(p_OBJECT_VERSION_NUMBER, nvl(OBJECT_VERSION_NUMBER,0))+1)
210         --      SECURITY_GROUP_ID = decode( p_SECURITY_GROUP_ID, FND_API.G_MISS_NUM, SECURITY_GROUP_ID, p_SECURITY_GROUP_ID),
211     where QUOTE_PARTY_ID = p_QUOTE_PARTY_ID;
212 
213     If (SQL%NOTFOUND) then
214         RAISE NO_DATA_FOUND;
215     End If;
216 END Update_Row;
217 
218 PROCEDURE Delete_Row(
219     p_QUOTE_PARTY_ID  NUMBER)
220  IS
221  BEGIN
222    DELETE FROM ASO_QUOTE_PARTIES
223     WHERE QUOTE_PARTY_ID = p_QUOTE_PARTY_ID;
224    If (SQL%NOTFOUND) then
225        RAISE NO_DATA_FOUND;
226    End If;
227  END Delete_Row;
228 
229 PROCEDURE Lock_Row(
230           --p_OBJECT_VERSION_NUMBER  NUMBER,
231           p_QUOTE_PARTY_ID    NUMBER,
232           p_CREATION_DATE    DATE,
233           p_CREATED_BY    NUMBER,
234           p_LAST_UPDATE_DATE    DATE,
235           p_LAST_UPDATE_LOGIN    NUMBER,
236           p_LAST_UPDATED_BY    NUMBER,
237           p_REQUEST_ID    NUMBER,
238           p_PROGRAM_APPLICATION_ID    NUMBER,
239           p_PROGRAM_ID    NUMBER,
240           p_PROGRAM_UPDATE_DATE    DATE,
241           p_QUOTE_HEADER_ID    NUMBER,
242           p_QUOTE_LINE_ID    NUMBER,
243           p_QUOTE_SHIPMENT_ID    NUMBER,
244           p_PARTY_TYPE    VARCHAR2,
245           p_PARTY_ID    NUMBER,
246           p_PARTY_OBJECT_TYPE    VARCHAR2,
247           p_PARTY_OBJECT_ID    VARCHAR2,
248           p_ATTRIBUTE_CATEGORY    VARCHAR2,
249           p_ATTRIBUTE1    VARCHAR2,
250           p_ATTRIBUTE2    VARCHAR2,
251           p_ATTRIBUTE3    VARCHAR2,
252           p_ATTRIBUTE4    VARCHAR2,
253           p_ATTRIBUTE5    VARCHAR2,
254           p_ATTRIBUTE6    VARCHAR2,
255           p_ATTRIBUTE7    VARCHAR2,
256           p_ATTRIBUTE8    VARCHAR2,
257           p_ATTRIBUTE9    VARCHAR2,
258           p_ATTRIBUTE10    VARCHAR2,
259           p_ATTRIBUTE11    VARCHAR2,
260           p_ATTRIBUTE12    VARCHAR2,
261           p_ATTRIBUTE13    VARCHAR2,
262           p_ATTRIBUTE14    VARCHAR2,
263           p_ATTRIBUTE15    VARCHAR2)
264       --    p_SECURITY_GROUP_ID    NUMBER,
265 
266  IS
267    CURSOR C IS
268         SELECT
269          --OBJECT_VERSION_NUMBER,
270            QUOTE_PARTY_ID,
271            CREATION_DATE,
272            CREATED_BY,
273            LAST_UPDATE_DATE,
274            LAST_UPDATE_LOGIN,
275            LAST_UPDATED_BY,
276            REQUEST_ID,
277            PROGRAM_APPLICATION_ID,
278            PROGRAM_ID,
279            PROGRAM_UPDATE_DATE,
280            QUOTE_HEADER_ID,
281            QUOTE_LINE_ID,
282            QUOTE_SHIPMENT_ID,
283            PARTY_TYPE,
284            PARTY_ID,
285            PARTY_OBJECT_TYPE,
286            PARTY_OBJECT_ID,
287            ATTRIBUTE_CATEGORY,
288            ATTRIBUTE1,
289            ATTRIBUTE2,
290            ATTRIBUTE3,
291            ATTRIBUTE4,
292            ATTRIBUTE5,
293            ATTRIBUTE6,
294            ATTRIBUTE7,
295            ATTRIBUTE8,
296            ATTRIBUTE9,
297            ATTRIBUTE10,
298            ATTRIBUTE11,
299            ATTRIBUTE12,
300            ATTRIBUTE13,
301            ATTRIBUTE14,
302            ATTRIBUTE15
303          --  SECURITY_GROUP_ID,
304          FROM ASO_QUOTE_PARTIES
305         WHERE QUOTE_PARTY_ID =  p_QUOTE_PARTY_ID
306         FOR UPDATE of QUOTE_PARTY_ID NOWAIT;
307    Recinfo C%ROWTYPE;
308  BEGIN
309     OPEN C;
310     FETCH C INTO Recinfo;
311     If (C%NOTFOUND) then
312         CLOSE C;
313         FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
314         APP_EXCEPTION.RAISE_EXCEPTION;
315     End If;
316     CLOSE C;
317     if (
318 /*
319            (      Recinfo.QUOTE_PARTY_ID = p_QUOTE_PARTY_ID)
320        AND (    ( Recinfo.CREATION_DATE = p_CREATION_DATE)
321             OR (    ( Recinfo.CREATION_DATE IS NULL )
322                 AND (  p_CREATION_DATE IS NULL )))
323        AND (    ( Recinfo.CREATED_BY = p_CREATED_BY)
324             OR (    ( Recinfo.CREATED_BY IS NULL )
325                 AND (  p_CREATED_BY IS NULL )))
326        AND
327 */
328 	  (    ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
329             OR (    ( Recinfo.LAST_UPDATE_DATE IS NULL )
330                 AND (  p_LAST_UPDATE_DATE IS NULL )))
331 /*
332        AND
333 	   (    ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER)
334 	      OR (    ( Recinfo.OBJECT_VERSION_NUMBER IS NULL )
335 		         AND (  p_OBJECT_VERSION_NUMBER IS NULL )))
336        AND (    ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
337             OR (    ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
338                 AND (  p_LAST_UPDATE_LOGIN IS NULL )))
339        AND (    ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
340             OR (    ( Recinfo.LAST_UPDATED_BY IS NULL )
341                 AND (  p_LAST_UPDATED_BY IS NULL )))
345        AND (    ( Recinfo.PROGRAM_APPLICATION_ID = p_PROGRAM_APPLICATION_ID)
342        AND (    ( Recinfo.REQUEST_ID = p_REQUEST_ID)
343             OR (    ( Recinfo.REQUEST_ID IS NULL )
344                 AND (  p_REQUEST_ID IS NULL )))
346             OR (    ( Recinfo.PROGRAM_APPLICATION_ID IS NULL )
347                 AND (  p_PROGRAM_APPLICATION_ID IS NULL )))
348        AND (    ( Recinfo.PROGRAM_ID = p_PROGRAM_ID)
349             OR (    ( Recinfo.PROGRAM_ID IS NULL )
350                 AND (  p_PROGRAM_ID IS NULL )))
351        AND (    ( Recinfo.PROGRAM_UPDATE_DATE = p_PROGRAM_UPDATE_DATE)
352             OR (    ( Recinfo.PROGRAM_UPDATE_DATE IS NULL )
353                 AND (  p_PROGRAM_UPDATE_DATE IS NULL )))
354        AND (    ( Recinfo.QUOTE_HEADER_ID = p_QUOTE_HEADER_ID)
355             OR (    ( Recinfo.QUOTE_HEADER_ID IS NULL )
356                 AND (  p_QUOTE_HEADER_ID IS NULL )))
357        AND (    ( Recinfo.QUOTE_LINE_ID = p_QUOTE_LINE_ID)
358             OR (    ( Recinfo.QUOTE_LINE_ID IS NULL )
359                 AND (  p_QUOTE_LINE_ID IS NULL )))
360        AND (    ( Recinfo.QUOTE_SHIPMENT_ID = p_QUOTE_SHIPMENT_ID)
361             OR (    ( Recinfo.QUOTE_SHIPMENT_ID IS NULL )
362                 AND (  p_QUOTE_SHIPMENT_ID IS NULL )))
363        AND (    ( Recinfo.PARTY_TYPE = p_PARTY_TYPE)
364             OR (    ( Recinfo.PARTY_TYPE IS NULL )
365                 AND (  p_PARTY_TYPE IS NULL )))
366        AND (    ( Recinfo.PARTY_ID = p_PARTY_ID)
367             OR (    ( Recinfo.PARTY_ID IS NULL )
368                 AND (  p_PARTY_ID IS NULL )))
369        AND (    ( Recinfo.PARTY_OBJECT_TYPE = p_PARTY_OBJECT_TYPE)
370             OR (    ( Recinfo.PARTY_OBJECT_TYPE IS NULL )
371                 AND (  p_PARTY_OBJECT_TYPE IS NULL )))
372        AND (    ( Recinfo.PARTY_OBJECT_ID = p_PARTY_OBJECT_ID)
373             OR (    ( Recinfo.PARTY_OBJECT_ID IS NULL )
374                 AND (  p_PARTY_OBJECT_ID IS NULL )))
375        AND (    ( Recinfo.ATTRIBUTE_CATEGORY = p_ATTRIBUTE_CATEGORY)
376             OR (    ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
377                 AND (  p_ATTRIBUTE_CATEGORY IS NULL )))
378        AND (    ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
379             OR (    ( Recinfo.ATTRIBUTE1 IS NULL )
380                 AND (  p_ATTRIBUTE1 IS NULL )))
381        AND (    ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
382             OR (    ( Recinfo.ATTRIBUTE2 IS NULL )
383                 AND (  p_ATTRIBUTE2 IS NULL )))
384        AND (    ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
385             OR (    ( Recinfo.ATTRIBUTE3 IS NULL )
386                 AND (  p_ATTRIBUTE3 IS NULL )))
387        AND (    ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
388             OR (    ( Recinfo.ATTRIBUTE4 IS NULL )
389                 AND (  p_ATTRIBUTE4 IS NULL )))
390        AND (    ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
391             OR (    ( Recinfo.ATTRIBUTE5 IS NULL )
392                 AND (  p_ATTRIBUTE5 IS NULL )))
393        AND (    ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
394             OR (    ( Recinfo.ATTRIBUTE6 IS NULL )
395                 AND (  p_ATTRIBUTE6 IS NULL )))
396        AND (    ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
397             OR (    ( Recinfo.ATTRIBUTE7 IS NULL )
398                 AND (  p_ATTRIBUTE7 IS NULL )))
399        AND (    ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
400             OR (    ( Recinfo.ATTRIBUTE8 IS NULL )
401                 AND (  p_ATTRIBUTE8 IS NULL )))
402        AND (    ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
403             OR (    ( Recinfo.ATTRIBUTE9 IS NULL )
404                 AND (  p_ATTRIBUTE9 IS NULL )))
405        AND (    ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
406             OR (    ( Recinfo.ATTRIBUTE10 IS NULL )
407                 AND (  p_ATTRIBUTE10 IS NULL )))
408        AND (    ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
409             OR (    ( Recinfo.ATTRIBUTE11 IS NULL )
410                 AND (  p_ATTRIBUTE11 IS NULL )))
411        AND (    ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
412             OR (    ( Recinfo.ATTRIBUTE12 IS NULL )
413                 AND (  p_ATTRIBUTE12 IS NULL )))
414        AND (    ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
415             OR (    ( Recinfo.ATTRIBUTE13 IS NULL )
416                 AND (  p_ATTRIBUTE13 IS NULL )))
417        AND (    ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
418             OR (    ( Recinfo.ATTRIBUTE14 IS NULL )
419                 AND (  p_ATTRIBUTE14 IS NULL )))
420        AND (    ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
421             OR (    ( Recinfo.ATTRIBUTE15 IS NULL )
422                 AND (  p_ATTRIBUTE15 IS NULL )))
423 */
424 /*       AND (    ( Recinfo.SECURITY_GROUP_ID = p_SECURITY_GROUP_ID)
425             OR (    ( Recinfo.SECURITY_GROUP_ID IS NULL )
426                 AND (  p_SECURITY_GROUP_ID IS NULL )))
427        AND (    ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER)
428             OR (    ( Recinfo.OBJECT_VERSION_NUMBER IS NULL )
429                 AND (  p_OBJECT_VERSION_NUMBER IS NULL )))*/
430        ) then
431        return;
432    else
433        FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
434        APP_EXCEPTION.RAISE_EXCEPTION;
435    End If;
436 END Lock_Row;
437 
438 PROCEDURE Delete_Row(
439     p_QUOTE_LINE_ID  NUMBER)
440 IS
441 BEGIN
442   DELETE FROM ASO_QUOTE_PARTIES
443     WHERE QUOTE_LINE_ID = p_QUOTE_LINE_ID;
444    If (SQL%NOTFOUND) then
445        null;
446    End If;
447 END;
448 
449 PROCEDURE Delete_Row(
450     p_QUOTE_HEADER_ID  NUMBER)
451 IS
452 BEGIN
453   DELETE FROM ASO_QUOTE_PARTIES
454     WHERE QUOTE_HEADER_ID = p_QUOTE_HEADER_ID;
455    If (SQL%NOTFOUND) then
456        null;
457    End If;
458 END;
459 
460 PROCEDURE Delete_Row(
461     p_QUOTE_SHIPMENT_ID  NUMBER)
462 IS
463 BEGIN
464   DELETE FROM ASO_QUOTE_PARTIES
465     WHERE QUOTE_SHIPMENT_ID = p_QUOTE_SHIPMENT_ID;
466    If (SQL%NOTFOUND) then
467        null;
468    End If;
469 END;
470 
471 
472 
473 End ASO_QUOTE_PARTIES_PKG;