103: IF (c%NOTFOUND)
104: THEN
105: CLOSE c;
106: FND_MESSAGE.Set_Name('FND','FORM_RECORD_DELETED');
107: APP_EXCEPTION.Raise_Exception;
108: END IF;
109: CLOSE c;
110:
111:
116: THEN
117: RETURN;
118: ELSE
119: FND_MESSAGE.Set_Name('FND','FORM_RECORD_CHANGED');
120: APP_EXCEPTION.Raise_Exception;
121: END IF;
122:
123: END LOCK_ROW;
124: