323: OPEN C;
324: FETCH C INTO Recinfo;
325: if (C%NOTFOUND) then
326: CLOSE C;
327: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
328: APP_EXCEPTION.Raise_Exception;
329: end if;
330: CLOSE C;
331:
429:
430: ) THEN
431: RETURN;
432: ELSE
433: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
434: APP_EXCEPTION.Raise_Exception;
435: END IF;
436: END Lock_Row;
437: