vb_signal_processor_set_file_type

 Set file type for input file.
 [USAGE]
    data = vb_signal_processor_set_file_type(data);
 [IN]
    data : application data.
 [OUT]
    data : Updated application data.

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

0001 function [data] = vb_signal_processor_set_file_type(data, file_type)
0002 % Set file type for input file.
0003 % [USAGE]
0004 %    data = vb_signal_processor_set_file_type(data);
0005 % [IN]
0006 %    data : application data.
0007 % [OUT]
0008 %    data : Updated application data.
0009 %
0010 % Copyright (C) 2011, ATR All Rights Reserved.
0011 % License : New BSD License(see VBMEG_LICENSE.txt)
0012 
0013 %
0014 % --- Previous check
0015 %
0016 if ~exist('data', 'var')
0017     error('data is a required parameter.');
0018 end
0019 
0020 %
0021 % --- Main Procedure
0022 %
0023 data.file_type = file_type;
0024 
0025 d = vb_define_signal_processor;
0026 %
0027 % --- Processing list
0028 %
0029 strs = cell(0);
0030 if strcmpi(file_type, 'MEG')
0031     data.process_template = d.process_template_MEG;
0032 elseif strcmpi(file_type, 'EEG')
0033     data.process_template = d.process_template_EEG;
0034 else
0035     error('Unknown file type was specified.');
0036 end
0037 for k=1:length(data.process_template)
0038     strs{k, 1} = vb_table_query_value(d.type_str_table, data.process_template{k});
0039 end
0040 set(data.H.process_type_listbox, 'String', strs, 'Value', 1);
0041 data = vb_signal_processor_update_screen(data);
0042 
0043 %
0044 % --- After check
0045 %
0046 if nargout ~= 1
0047     error('function caller should receive data object.');
0048 end