eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.ASO_QUOTE_ACCESSES_PKG

Source


1 PACKAGE BODY ASO_QUOTE_ACCESSES_PKG AS
2 /* $Header: asotqacb.pls 120.1 2005/06/29 12:40:16 appldev ship $ */
3 
4 G_PKG_NAME  CONSTANT VARCHAR2(30) := 'ASO_QUOTE_ACCESSES_PKG';
5 G_FILE_NAME CONSTANT VARCHAR2(12) := 'asotqacb.pls';
6 
7 procedure INSERT_ROW (
8   PX_ACCESS_ID IN OUT NOCOPY /* file.sql.39 change */  NUMBER,
9   P_QUOTE_NUMBER in NUMBER,
10   P_RESOURCE_ID in NUMBER,
11   P_RESOURCE_GRP_ID in NUMBER,
12   P_CREATED_BY in NUMBER,
13   P_CREATION_DATE in DATE,
14   P_LAST_UPDATED_BY in NUMBER,
15   P_LAST_UPDATE_LOGIN in NUMBER,
16   P_LAST_UPDATE_DATE in DATE,
17   P_REQUEST_ID in NUMBER,
18   P_PROGRAM_APPLICATION_ID NUMBER,
19   P_PROGRAM_ID NUMBER,
20   P_PROGRAM_UPDATE_DATE DATE,
21   P_KEEP_FLAG in VARCHAR2,
22   P_UPDATE_ACCESS_FLAG in VARCHAR2,
23   P_CREATED_BY_TAP_FLAG in VARCHAR2,
24   P_TERRITORY_ID in NUMBER,
25   P_TERRITORY_SOURCE_FLAG in VARCHAR2,
26   P_ROLE_ID in NUMBER,
27   P_ATTRIBUTE_CATEGORY in VARCHAR2,
28   P_ATTRIBUTE1 in VARCHAR2,
29   P_ATTRIBUTE2 in VARCHAR2,
30   P_ATTRIBUTE3 in VARCHAR2,
31   P_ATTRIBUTE4 in VARCHAR2,
32   P_ATTRIBUTE5 in VARCHAR2,
33   P_ATTRIBUTE6 in VARCHAR2,
34   P_ATTRIBUTE7 in VARCHAR2,
35   P_ATTRIBUTE8 in VARCHAR2,
36   P_ATTRIBUTE9 in VARCHAR2,
37   P_ATTRIBUTE10 in VARCHAR2,
38   P_ATTRIBUTE11 in VARCHAR2,
39   P_ATTRIBUTE12 in VARCHAR2,
40   P_ATTRIBUTE13 in VARCHAR2,
41   P_ATTRIBUTE14 in VARCHAR2,
42   P_ATTRIBUTE15 in VARCHAR2,
43   p_ATTRIBUTE16    VARCHAR2,
44   p_ATTRIBUTE17    VARCHAR2,
45   p_ATTRIBUTE18    VARCHAR2,
46   p_ATTRIBUTE19    VARCHAR2,
47   p_ATTRIBUTE20    VARCHAR2,
48   p_OBJECT_VERSION_NUMBER NUMBER
49 )
50 IS
51 
52 CURSOR C2 IS SELECT ASO_QUOTE_ACCESSES_S.nextval FROM sys.dual;
53 
54 begin
55   If (PX_ACCESS_ID IS NULL) OR (PX_ACCESS_ID = FND_API.G_MISS_NUM) then
56        OPEN C2;
57        FETCH C2 INTO PX_ACCESS_ID;
58        CLOSE C2;
59    End If;
60 
61   insert into ASO_QUOTE_ACCESSES (
62     ACCESS_ID,
63     QUOTE_NUMBER,
64     RESOURCE_ID,
65     RESOURCE_GRP_ID,
66     CREATED_BY,
67     CREATION_DATE,
68     LAST_UPDATED_BY,
69     LAST_UPDATE_LOGIN,
70     LAST_UPDATE_DATE,
71     REQUEST_ID,
72     PROGRAM_APPLICATION_ID,
73     PROGRAM_ID,
74     PROGRAM_UPDATE_DATE,
75     KEEP_FLAG,
76     UPDATE_ACCESS_FLAG,
77     CREATED_BY_TAP_FLAG,
78     TERRITORY_ID,
79     TERRITORY_SOURCE_FLAG,
80     ROLE_ID,
81     ATTRIBUTE_CATEGORY,
82     ATTRIBUTE1,
83     ATTRIBUTE2,
84     ATTRIBUTE3,
85     ATTRIBUTE4,
86     ATTRIBUTE5,
87     ATTRIBUTE6,
88     ATTRIBUTE7,
89     ATTRIBUTE8,
90     ATTRIBUTE9,
91     ATTRIBUTE10,
92     ATTRIBUTE11,
93     ATTRIBUTE12,
94     ATTRIBUTE13,
95     ATTRIBUTE14,
96     ATTRIBUTE15,
97     ATTRIBUTE16,
98    ATTRIBUTE17,
99    ATTRIBUTE18,
100    ATTRIBUTE19,
101    ATTRIBUTE20,
102     OBJECT_VERSION_NUMBER
103 
104   ) VALUES
105   (
106     PX_ACCESS_ID,
107     decode( P_QUOTE_NUMBER, FND_API.G_MISS_NUM, NULL, P_QUOTE_NUMBER),
108     decode( p_RESOURCE_ID, FND_API.G_MISS_NUM, NULL, p_RESOURCE_ID),
109     decode( P_RESOURCE_GRP_ID, FND_API.G_MISS_NUM, NULL, P_RESOURCE_GRP_ID),
110     decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY),
111     ASO_UTILITY_PVT.decode( P_CREATION_DATE, FND_API.G_MISS_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_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN),
114     ASO_UTILITY_PVT.decode( P_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, NULL, p_LAST_UPDATE_DATE),
115     decode( P_REQUEST_ID, FND_API.G_MISS_NUM, NULL, P_REQUEST_ID),
116     decode( P_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, NULL, P_PROGRAM_APPLICATION_ID),
117     decode( P_PROGRAM_ID, FND_API.G_MISS_NUM, NULL, P_PROGRAM_ID),
118     ASO_UTILITY_PVT.decode( P_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, NULL, P_PROGRAM_UPDATE_DATE),
119     decode( P_KEEP_FLAG, FND_API.G_MISS_CHAR, NULL, P_KEEP_FLAG),
120     decode( P_UPDATE_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL, P_UPDATE_ACCESS_FLAG),
121     decode( P_CREATED_BY_TAP_FLAG, FND_API.G_MISS_CHAR, NULL, P_CREATED_BY_TAP_FLAG),
122     decode( P_TERRITORY_ID, FND_API.G_MISS_NUM, NULL, P_TERRITORY_ID),
123     decode( P_TERRITORY_SOURCE_FLAG, FND_API.G_MISS_CHAR, NULL, P_TERRITORY_SOURCE_FLAG),
124     decode( P_ROLE_ID, FND_API.G_MISS_NUM, NULL, P_ROLE_ID),
125     decode( P_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, P_ATTRIBUTE_CATEGORY),
126     decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1),
127     decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2),
128     decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3),
129     decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4),
130     decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5),
131     decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6),
132     decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7),
133     decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8),
134     decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9),
135     decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10),
136     decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11),
137     decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12),
138     decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13),
139     decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14),
140     decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15),
141     decode( p_ATTRIBUTE16, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE16),
142     decode( p_ATTRIBUTE17, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE17),
143     decode( p_ATTRIBUTE18, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE18),
144     decode( p_ATTRIBUTE19, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE19),
145     decode( p_ATTRIBUTE20, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE20),
146     decode ( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM,1,NULL,1, p_OBJECT_VERSION_NUMBER)
147    );
148 
149 end INSERT_ROW;
150 
151 procedure UPDATE_ROW (
152   P_ACCESS_ID in NUMBER,
153   P_QUOTE_NUMBER in NUMBER,
154   P_RESOURCE_ID in NUMBER,
155   P_RESOURCE_GRP_ID in NUMBER,
156   P_CREATED_BY in NUMBER,
157   P_CREATION_DATE in DATE,
158   P_LAST_UPDATED_BY in NUMBER,
159   P_LAST_UPDATE_LOGIN in NUMBER,
160   P_LAST_UPDATE_DATE in DATE,
161   P_REQUEST_ID in NUMBER,
162   P_PROGRAM_APPLICATION_ID NUMBER,
163   P_PROGRAM_ID NUMBER,
164   P_PROGRAM_UPDATE_DATE DATE,
165   P_KEEP_FLAG in VARCHAR2,
166   P_UPDATE_ACCESS_FLAG in VARCHAR2,
167   P_CREATED_BY_TAP_FLAG in VARCHAR2,
168   P_TERRITORY_ID in NUMBER,
169   P_TERRITORY_SOURCE_FLAG in VARCHAR2,
170   P_ROLE_ID in NUMBER,
171   P_ATTRIBUTE_CATEGORY in VARCHAR2,
172   P_ATTRIBUTE1 in VARCHAR2,
173   P_ATTRIBUTE2 in VARCHAR2,
174   P_ATTRIBUTE3 in VARCHAR2,
175   P_ATTRIBUTE4 in VARCHAR2,
176   P_ATTRIBUTE5 in VARCHAR2,
177   P_ATTRIBUTE6 in VARCHAR2,
178   P_ATTRIBUTE7 in VARCHAR2,
179   P_ATTRIBUTE8 in VARCHAR2,
180   P_ATTRIBUTE9 in VARCHAR2,
181   P_ATTRIBUTE10 in VARCHAR2,
182   P_ATTRIBUTE11 in VARCHAR2,
183   P_ATTRIBUTE12 in VARCHAR2,
184   P_ATTRIBUTE13 in VARCHAR2,
185   P_ATTRIBUTE14 in VARCHAR2,
186   P_ATTRIBUTE15 in VARCHAR2,
187   p_ATTRIBUTE16    VARCHAR2,
188   p_ATTRIBUTE17    VARCHAR2,
189   p_ATTRIBUTE18    VARCHAR2,
190   p_ATTRIBUTE19    VARCHAR2,
191   p_ATTRIBUTE20    VARCHAR2,
192   p_OBJECT_VERSION_NUMBER NUMBER
193 )
194 IS
195 BEGIN
196   update ASO_QUOTE_ACCESSES
197   set
198   QUOTE_NUMBER = decode( P_QUOTE_NUMBER, FND_API.G_MISS_NUM, QUOTE_NUMBER, P_QUOTE_NUMBER),
199   RESOURCE_ID = decode( p_RESOURCE_ID, FND_API.G_MISS_NUM, RESOURCE_ID, p_RESOURCE_ID),
200   RESOURCE_GRP_ID = decode( P_RESOURCE_GRP_ID, FND_API.G_MISS_NUM, RESOURCE_GRP_ID, P_RESOURCE_GRP_ID),
201   LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY),
202   LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN),
203   LAST_UPDATE_DATE = ASO_UTILITY_PVT.decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
204   REQUEST_ID = decode( p_REQUEST_ID, FND_API.G_MISS_NUM, REQUEST_ID, p_REQUEST_ID),
205   PROGRAM_APPLICATION_ID = decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM,PROGRAM_APPLICATION_ID, p_PROGRAM_APPLICATION_ID),
206   PROGRAM_ID = decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, PROGRAM_ID, p_PROGRAM_ID),
207   PROGRAM_UPDATE_DATE = ASO_UTILITY_PVT.decode( p_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, PROGRAM_UPDATE_DATE, p_PROGRAM_UPDATE_DATE),
208   KEEP_FLAG = decode( P_KEEP_FLAG, FND_API.G_MISS_CHAR, KEEP_FLAG, P_KEEP_FLAG),
209   UPDATE_ACCESS_FLAG = decode( P_UPDATE_ACCESS_FLAG, FND_API.G_MISS_CHAR, UPDATE_ACCESS_FLAG, P_UPDATE_ACCESS_FLAG),
210   CREATED_BY_TAP_FLAG = decode( P_CREATED_BY_TAP_FLAG, FND_API.G_MISS_CHAR, CREATED_BY_TAP_FLAG, P_CREATED_BY_TAP_FLAG),
211   TERRITORY_ID = decode( P_TERRITORY_ID, FND_API.G_MISS_NUM, TERRITORY_ID, P_TERRITORY_ID),
212   TERRITORY_SOURCE_FLAG = decode( p_TERRITORY_SOURCE_FLAG, FND_API.G_MISS_CHAR, TERRITORY_SOURCE_FLAG, p_TERRITORY_SOURCE_FLAG),
213   ROLE_ID = decode( P_ROLE_ID, FND_API.G_MISS_NUM, ROLE_ID, P_ROLE_ID),
214   ATTRIBUTE_CATEGORY = decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, ATTRIBUTE_CATEGORY, p_ATTRIBUTE_CATEGORY),
215   ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1, p_ATTRIBUTE1),
216   ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2, p_ATTRIBUTE2),
217   ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3, p_ATTRIBUTE3),
218   ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4, p_ATTRIBUTE4),
219   ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5, p_ATTRIBUTE5),
220   ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6, p_ATTRIBUTE6),
221   ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7, p_ATTRIBUTE7),
222   ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8, p_ATTRIBUTE8),
223   ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9, p_ATTRIBUTE9),
224   ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10, p_ATTRIBUTE10),
225   ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11, p_ATTRIBUTE11),
226   ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12, p_ATTRIBUTE12),
227   ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13, p_ATTRIBUTE13),
228   ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14, p_ATTRIBUTE14),
229   ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15, p_ATTRIBUTE15),
230   ATTRIBUTE16 = decode( p_ATTRIBUTE16, FND_API.G_MISS_CHAR, ATTRIBUTE16, p_ATTRIBUTE16),
231   ATTRIBUTE17 = decode( p_ATTRIBUTE17, FND_API.G_MISS_CHAR, ATTRIBUTE17, p_ATTRIBUTE17),
232   ATTRIBUTE18 = decode( p_ATTRIBUTE18, FND_API.G_MISS_CHAR, ATTRIBUTE18, p_ATTRIBUTE18),
233   ATTRIBUTE19 = decode( p_ATTRIBUTE19, FND_API.G_MISS_CHAR, ATTRIBUTE19, p_ATTRIBUTE19),
234   ATTRIBUTE20 = decode( p_ATTRIBUTE20, FND_API.G_MISS_CHAR, ATTRIBUTE20, p_ATTRIBUTE20),
235   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)
236   WHERE ACCESS_ID = P_ACCESS_ID;
237 
238   If (SQL%NOTFOUND) then
239         RAISE NO_DATA_FOUND;
240   End If;
241 
242 end UPDATE_ROW;
243 
244 procedure DELETE_ROW (
245   P_ACCESS_ID in NUMBER
246 ) is
247 begin
248   delete from ASO_QUOTE_ACCESSES
249   where ACCESS_ID = P_ACCESS_ID;
250 
251   if (sql%notfound) then
252     raise no_data_found;
253   end if;
254 
255 end DELETE_ROW;
256 
257 procedure LOCK_ROW (
258   P_ACCESS_ID in NUMBER,
259   P_QUOTE_NUMBER in NUMBER,
260   P_RESOURCE_ID in NUMBER,
261   P_RESOURCE_GRP_ID in NUMBER,
262   P_CREATED_BY in NUMBER,
263   P_CREATION_DATE in DATE,
264   P_LAST_UPDATED_BY in NUMBER,
265   P_LAST_UPDATE_LOGIN in NUMBER,
266   P_LAST_UPDATE_DATE in DATE,
267   P_REQUEST_ID in NUMBER,
268   P_PROGRAM_APPLICATION_ID NUMBER,
269   P_PROGRAM_ID NUMBER,
270   P_PROGRAM_UPDATE_DATE DATE,
271   P_KEEP_FLAG in VARCHAR2,
272   P_UPDATE_ACCESS_FLAG in VARCHAR2,
273   P_CREATED_BY_TAP_FLAG in VARCHAR2,
274   P_TERRITORY_ID in NUMBER,
275   P_TERRITORY_SOURCE_FLAG in VARCHAR2,
276   P_ROLE_ID in NUMBER,
277   P_ATTRIBUTE_CATEGORY in VARCHAR2,
278   P_ATTRIBUTE1 in VARCHAR2,
279   P_ATTRIBUTE2 in VARCHAR2,
280   P_ATTRIBUTE3 in VARCHAR2,
281   P_ATTRIBUTE4 in VARCHAR2,
282   P_ATTRIBUTE5 in VARCHAR2,
283   P_ATTRIBUTE6 in VARCHAR2,
284   P_ATTRIBUTE7 in VARCHAR2,
285   P_ATTRIBUTE8 in VARCHAR2,
286   P_ATTRIBUTE9 in VARCHAR2,
287   P_ATTRIBUTE10 in VARCHAR2,
288   P_ATTRIBUTE11 in VARCHAR2,
289   P_ATTRIBUTE12 in VARCHAR2,
290   P_ATTRIBUTE13 in VARCHAR2,
291   P_ATTRIBUTE14 in VARCHAR2,
292   P_ATTRIBUTE15 in VARCHAR2
293 )
294 IS
295   cursor c1 is select
296   ACCESS_ID,
297   QUOTE_NUMBER,
298   RESOURCE_ID,
299   RESOURCE_GRP_ID,
300   CREATED_BY,
301   CREATION_DATE,
302   LAST_UPDATED_BY,
303   LAST_UPDATE_LOGIN,
304   LAST_UPDATE_DATE,
305   REQUEST_ID,
306   PROGRAM_APPLICATION_ID,
307   PROGRAM_ID,
308   PROGRAM_UPDATE_DATE,
309   KEEP_FLAG,
310   UPDATE_ACCESS_FLAG,
311   CREATED_BY_TAP_FLAG,
312   TERRITORY_ID,
313   TERRITORY_SOURCE_FLAG,
314   ROLE_ID,
315   ATTRIBUTE_CATEGORY,
316   ATTRIBUTE1 ,
317   ATTRIBUTE2 ,
318   ATTRIBUTE3 ,
319   ATTRIBUTE4 ,
320   ATTRIBUTE5 ,
321   ATTRIBUTE6 ,
322   ATTRIBUTE7 ,
323   ATTRIBUTE8 ,
324   ATTRIBUTE9 ,
325   ATTRIBUTE10 ,
326   ATTRIBUTE11 ,
327   ATTRIBUTE12 ,
328   ATTRIBUTE13 ,
329   ATTRIBUTE14 ,
330   ATTRIBUTE15
331 
332   from ASO_QUOTE_ACCESSES
333     where ACCESS_ID = P_ACCESS_ID
334     for update of ACCESS_ID nowait;
335 
336    recinfo C1%ROWTYPE;
337 begin
338    OPEN C1;
339    FETCH C1 INTO recinfo;
340    IF (C1%NOTFOUND) THEN
341       CLOSE C1;
342       FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
343       APP_EXCEPTION.RAISE_EXCEPTION;
344    End If;
345    CLOSE C1;
346 
347 
348    if  (    ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
349             OR (    ( Recinfo.LAST_UPDATE_DATE IS NULL )
350                 AND (  p_LAST_UPDATE_DATE IS NULL ))) then
351        return;
352    else
353        fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
354        app_exception.raise_exception;
355    end if;
356 end LOCK_ROW;
357 
358 end ASO_QUOTE_ACCESSES_PKG;