198: OPEN C;
199: FETCH C INTO Recinfo;
200: If (C%NOTFOUND) then
201: CLOSE C;
202: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
203: APP_EXCEPTION.RAISE_EXCEPTION;
204: End If;
205: CLOSE C;
206: if ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER ) then
205: CLOSE C;
206: if ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER ) then
207: return;
208: else
209: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
210: APP_EXCEPTION.RAISE_EXCEPTION;
211: End If;
212: END Lock_Row;
213: