110: FETCH C INTO Recinfo;
111: If (C%NOTFOUND) then
112: CLOSE C;
113: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
114: APP_EXCEPTION.RAISE_EXCEPTION;
115: End If;
116: CLOSE C;
117:
118: IF ( (Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER)
121: ) then
122: return;
123: else
124: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
125: APP_EXCEPTION.RAISE_EXCEPTION;
126: End If;
127:
128: END Lock_Row;
129: