pa_yokogawa_meg_set_parm

 sets meg parameters to yokogawa meg gui.
 [USAGE]
    pa_yokogawa_meg_set_parm(<fig>, [,yokogawa_meg_parm]);
 [IN]
                  fig : figure handle of yokogawa meg gui.
    yokogawa_meg_parm : to be set meg_parm[default:vb_set_yokogawa_meg_parm()]
 [OUT]
    none

 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

0001 function pa_yokogawa_meg_set_parm(fig, yokogawa_meg_parm)
0002 % sets meg parameters to yokogawa meg gui.
0003 % [USAGE]
0004 %    pa_yokogawa_meg_set_parm(<fig>, [,yokogawa_meg_parm]);
0005 % [IN]
0006 %                  fig : figure handle of yokogawa meg gui.
0007 %    yokogawa_meg_parm : to be set meg_parm[default:vb_set_yokogawa_meg_parm()]
0008 % [OUT]
0009 %    none
0010 %
0011 % Copyright (C) 2011, ATR All Rights Reserved.
0012 % License : New BSD License(see VBMEG_LICENSE.txt)
0013 
0014 %
0015 % --- Previous check
0016 %
0017 if ~exist('fig', 'var') || isempty(fig) || ~ishandle(fig)
0018     error('invalid figure handle.');
0019 end
0020 
0021 if isempty(yokogawa_meg_parm)
0022     % default value
0023     yokogawa_meg_parm = vb_set_yokogawa_meg_parm;
0024 end
0025 
0026 %
0027 % --- Main Procedure
0028 %
0029 
0030 % load data(@see pa_yokogawa_meg_create)
0031 data = guidata(fig);
0032 H = data.H; % component handles
0033 
0034 % data file
0035 set(H.meg_file_edit, 'String', yokogawa_meg_parm.yokogawa_file);
0036 
0037 % position file
0038 set(H.position_file_edit, 'String', yokogawa_meg_parm.pos_file);
0039 
0040 % Ext gain
0041 if isempty(yokogawa_meg_parm.ex_ch_gain)
0042     set(H.gain_setting_text, 'String', 'None');
0043 else
0044     set(H.gain_setting_text, 'String', 'Specified');
0045 end
0046 
0047 % keyword
0048 if isfield(yokogawa_meg_parm, 'keyword')
0049     set(H.keyword_edit, 'String', yokogawa_meg_parm.keyword);
0050 end
0051 
0052 % comment
0053 if isfield(yokogawa_meg_parm, 'comment')
0054     set(H.comment_edit, 'String', yokogawa_meg_parm.comment);
0055 end
0056 
0057 % save dir
0058 %[save_dir] = fileparts(yokogawa_meg_parm.meg_file);
0059 [save_dir] = vb_get_file_parts(yokogawa_meg_parm.meg_file);
0060 set(H.save_dir_edit, 'String', save_dir);
0061 
0062 % binary dir
0063 set(H.binary_dir_edit, 'String', yokogawa_meg_parm.saveman.data_dir);
0064 
0065 % MEG-MAT file(output)
0066 set(H.megmat_file_edit, 'String', yokogawa_meg_parm.meg_file);
0067 
0068 % save data
0069 data.yokogawa_meg_parm = yokogawa_meg_parm;
0070 guidata(fig, data);
0071 
0072 % view update
0073 pa_yokogawa_meg_util(fig, 'update_exec_push_status');