232: OPEN C;
233: FETCH C INTO Recinfo;
234: If (C%NOTFOUND) then
235: CLOSE C;
236: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
237: APP_EXCEPTION.RAISE_EXCEPTION;
238: End If;
239: CLOSE C;
240:
246: IF (recinfo.object_version_number = p_OBJECT_VERSION_NUMBER)
247: THEN
248: NULL;
249: ELSE
250: fnd_message.set_name ('FND', 'FORM_RECORD_CHANGED');
251: APP_EXCEPTION.RAISE_EXCEPTION;
252: END IF;
253:
254: END Lock_Row;