476: FETCH C INTO Recinfo;
477: IF (C%NOTFOUND) THEN
478: CLOSE C;
479: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED'); 480: APP_EXCEPTION.Raise_Exception; 481: END IF;
482: CLOSE C;
483:
484: IF (
Line 493: APP_EXCEPTION.Raise_Exception;
489: ) THEN
490: return;
491: ELSE
492: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED'); 493: APP_EXCEPTION.Raise_Exception; 494: END IF;
495: END Lock_Row;
496:
497: