613: OPEN C;
614: FETCH C INTO Recinfo;
615: if (C%NOTFOUND) then
616: CLOSE C;
617: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
618: APP_EXCEPTION.Raise_Exception;
619: end if;
620: CLOSE C;
621:
706: AND (X_Attribute15 IS NULL)))
707: ) then
708: return;
709: else
710: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
711: APP_EXCEPTION.Raise_Exception;
712: end if;
713: END Lock_Row;
714: