job_edit_act_select_file

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

0001 function job_edit_act_select_file(inst_id)
0002 %
0003 % Copyright (C) 2011, ATR All Rights Reserved.
0004 % License : New BSD License(see VBMEG_LICENSE.txt)
0005 
0006 global vbmeg_inst; 
0007 
0008 % Global variables
0009 actfile = vbmeg_inst.editact{inst_id}.actfile; 
0010 lb1 = vbmeg_inst.editact{inst_id}.lb1;
0011 
0012 % Select file
0013 h = file_dialog;
0014 h.save_mode = 0; 
0015 h.file_extensions = {'.act.mat'};
0016 h = set(h,'current_dir',pwd);
0017 [dirname, filename] = visible(h);
0018 actfile = [dirname '/' filename{1}];
0019 vbmeg_inst.editact{inst_id}.actfile = actfile;
0020 
0021 % Update list box
0022 set(lb1,'Value',1);
0023 set(lb1,'String',vb_get_keyset_act(actfile));