vb_batch_mgr_edit_table

 Edit variable table

 [USAGE]
    [obj] = vb_batch_mgr_edit_table(<obj>);
 [IN]
    obj : vb_batch_mgr object
 [OUT]
    obj : vb_batch_mgr object

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

0001 function [obj] = vb_batch_mgr_edit_table(obj)
0002 % Edit variable table
0003 %
0004 % [USAGE]
0005 %    [obj] = vb_batch_mgr_edit_table(<obj>);
0006 % [IN]
0007 %    obj : vb_batch_mgr object
0008 % [OUT]
0009 %    obj : vb_batch_mgr object
0010 %
0011 % Copyright (C) 2011, ATR All Rights Reserved.
0012 % License : New BSD License(see VBMEG_LICENSE.txt)
0013 
0014 
0015 %
0016 % --- Previous check
0017 %
0018 if ~exist('obj', 'var')
0019     error('obj is a required parameter.');
0020 end
0021 
0022 %
0023 % --- Main Procedure
0024 %
0025 
0026 % get table data
0027 [column_name_list, data] = vb_batch_variable_table_get_data(obj.table);
0028 
0029 % launch editor
0030 h = figure;
0031 set(h, 'Menubar', 'none', 'Name', 'Edit table', 'NumberTitle', 'off');
0032 mtable = createTable([], column_name_list, data);
0033 set(h, 'closereq', 'set(gcf, ''visible'', ''off'')');
0034 
0035 % wait for close editor
0036 waitfor(h, 'visible', 'off');
0037 
0038 % get data from editor
0039 data = cell(mtable.getData);
0040 
0041 % deblank is applied.
0042 [M, N] = size(data);
0043 for k=1:M
0044     for j=1:N
0045         if ischar(data{k, j})
0046             data{k, j} = deblank(data{k, j});
0047         end
0048     end
0049 end
0050 
0051 if ishandle(h), delete(h); end
0052 
0053 % set data to table
0054 [obj.table] = ...
0055    vb_batch_variable_table_set_data(obj.table, column_name_list, data);
0056 
0057 
0058 %
0059 % --- After check
0060 %
0061 if nargout < 1
0062     error('function caller should receive obj.');
0063 end