48: FETCH C INTO Recinfo;
49: if (C%NOTFOUND) then
50: CLOSE C;
51: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
52: APP_EXCEPTION.Raise_Exception;
53: end if;
54: CLOSE C;
55: if (
56: (Recinfo.client_id = p_client_id)
110: ) then
111: return;
112: else
113: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
114: APP_EXCEPTION.RAISE_EXCEPTION;
115: end if;
116: END Lock_Row;
117:
118: