[Home] [Help]
161: FETCH C INTO Recinfo;
162: IF (C%NOTFOUND) THEN
163: CLOSE C;
164: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
165: APP_EXCEPTION.Raise_Exception;
166: END IF;
167: CLOSE C;
168:
169: IF (
219: ) THEN
220: return;
221: ELSE
222: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
223: APP_EXCEPTION.Raise_Exception;
224: END IF;
225: END Lock_Row;
226: END;
227: