61: OPEN C;
62: FETCH C INTO Recinfo;
63: if (C%NOTFOUND) then
64: CLOSE C;
65: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
66: APP_EXCEPTION.Raise_Exception;
67: end if;
68: CLOSE C;
69:
213: /*
214: ** If we get to this point then a column has been changed.
215: */
216:
217: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
218: APP_EXCEPTION.RAISE_EXCEPTION;
219:
220: END Lock_Row;
221: