210: OPEN C;
211: FETCH C INTO Recinfo;
212: If (C%NOTFOUND) then
213: CLOSE C;
214: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
215: APP_EXCEPTION.RAISE_EXCEPTION;
216: End If;
217: CLOSE C;
218:
223:
224: If ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER) then
225: return;
226: else
227: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
228: APP_EXCEPTION.RAISE_EXCEPTION;
229: End If;
230:
231: END Lock_Row;