457: OPEN C;
458: FETCH C INTO Recinfo;
459: if (C%NOTFOUND) then
460: CLOSE C;
461: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
462: APP_EXCEPTION.Raise_Exception;
463: end if;
464: CLOSE C;
465: if ((Recinfo.retirement_id = X_Retirement_Id)
609: OR ( (Recinfo.recapture_amount IS NULL)
610: AND (X_Recapture_Amount IS NULL)))) then
611: return;
612: else
613: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
614: APP_EXCEPTION.Raise_Exception;
615: end if;
616: END Lock_Row;
617: