[Home] [Help]
278: FETCH C INTO Recinfo;
279: IF (C%NOTFOUND) THEN
280: CLOSE C;
281: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
282: APP_EXCEPTION.Raise_Exception;
283: END IF;
284: CLOSE C;
285:
286: IF (
378: THEN
379: RETURN;
380: ELSE
381: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
382: APP_EXCEPTION.Raise_Exception;
383: END IF;
384:
385: END Lock_Row;
386: