265: OPEN C;
266: FETCH C INTO Recinfo;
267: if (C%NOTFOUND) then
268: CLOSE C;
269: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
270: APP_EXCEPTION.Raise_Exception;
271: end if;
272: CLOSE C;
273: if (
346: OR ( (Recinfo.deprn_basis_rule_id IS NULL)
347: AND (X_Deprn_Basis_Rule_Id is NULL))) ) then
348: return;
349: else
350: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
351: APP_EXCEPTION.Raise_Exception;
352: end if;
353: END Lock_Row;
354: