729: FETCH C INTO Recinfo;
730: if (C%NOTFOUND) then
731: CLOSE C;
732: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
733: APP_EXCEPTION.Raise_Exception;
734: end if;
735: CLOSE C;
736:
737: -- not finished. still need to add rest of columns from table.
746: AND (X_Period_Num IS NULL)))) then
747: return;
748: else
749: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
750: APP_EXCEPTION.Raise_Exception;
751: end if;
752:
753: END Lock_Row;
754: