[Home] [Help]
257: FETCH C INTO Recinfo;
258: IF (C%NOTFOUND) THEN
259: CLOSE C;
260: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
261: APP_EXCEPTION.Raise_Exception;
262: END IF;
263: CLOSE C;
264:
265: IF (
363: ) THEN
364: return;
365: ELSE
366: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
367: APP_EXCEPTION.Raise_Exception;
368: END IF;
369: END Lock_Row;
370: END;
371: