113: FETCH C INTO Recinfo;
114:
115: if (C%NOTFOUND) then
116: CLOSE C;
117: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
118: APP_EXCEPTION.Raise_Exception;
119: end if;
120: CLOSE C;
121:
131: AND (Recinfo.description
132: = X_description)) then
133: return;
134: else
135: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
136: APP_EXCEPTION.Raise_Exception;
137: end if;
138: END Lock_Row;
139: