current_gui_advanced_callback

 current advanced parameter gui callback function.
 [USAGE]
    current_gui_advanced_callback(fig, hObj);
 [IN]
     fig : current_gui_advanced parameter figure handle
    hObj : component handle
 [OUT]
    none

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

0001 function current_gui_advanced_callback(fig, hObj)
0002 % current advanced parameter gui callback function.
0003 % [USAGE]
0004 %    current_gui_advanced_callback(fig, hObj);
0005 % [IN]
0006 %     fig : current_gui_advanced parameter figure handle
0007 %    hObj : component handle
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'), error('fig is a required parameter.'); end
0018 if ~exist('hObj', 'var'), error('hObj is a required parameter.'); end
0019 
0020 %
0021 % --- Main Procedure
0022 %
0023 
0024 data = guidata(fig);
0025 H = data.H;
0026 
0027 switch(hObj)
0028     case {H.overlapped_radiobutton, H.concatenate_radiobutton}
0029         radiobutton_group = [H.overlapped_radiobutton, ...
0030                              H.concatenate_radiobutton];
0031         set(radiobutton_group, 'Value', 0);
0032         set(hObj, 'Value', 1);
0033     case H.cancel_push
0034         current_gui_advanced_delete(fig);
0035     case H.ok_push
0036         current_parm = current_gui_advanced_get_parm_gui(fig);
0037         current_gui(data.parent, 'merge_parm', current_parm);
0038         current_gui_advanced_delete(fig);
0039 end