function g_pzmodelLoad(hObject, varargin)
   
   global params
   
   currParamIndex = get(hObject,'UserData');
   try [FileName,PathName] = uigetfile('*.xml','Select the .XML pzmodel file');
      FileAddress = strcat(PathName,FileName);
      pzObj = pzmodel(FileAddress);
      if isempty(pzObj), return; end
      params = pset(params,params.params(currParamIndex).key,pzObj);
   catch
   end
   set(findobj('Tag','apply'),'Enable','on');
   set(findobj('Tag','undo'),'Enable','on');
   
end