Home > functions > gui > batch > batch_mgr > vb_batch_mgr_show_parm_contents.m

vb_batch_mgr_show_parm_contents

PURPOSE ^

Show parameter fields by using text area.

SYNOPSIS ^

function vb_batch_mgr_show_parm_contents(obj, ix_main, ix_sub)

DESCRIPTION ^

 Show parameter fields by using text area.
 [USAGE]
    vb_batch_mgr_show_parm_contents(<obj>, <ix_main>, <ix_sub>);
 [IN]
        obj : vb_batch_mgr object
    ix_main : parameter set specifier
              = 0 : template parameter set
              >=1 : batch parameter set
     ix_sub : index in the parameter set.
 [OUT]
    none

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

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function vb_batch_mgr_show_parm_contents(obj, ix_main, ix_sub)
0002 % Show parameter fields by using text area.
0003 % [USAGE]
0004 %    vb_batch_mgr_show_parm_contents(<obj>, <ix_main>, <ix_sub>);
0005 % [IN]
0006 %        obj : vb_batch_mgr object
0007 %    ix_main : parameter set specifier
0008 %              = 0 : template parameter set
0009 %              >=1 : batch parameter set
0010 %     ix_sub : index in the parameter set.
0011 % [OUT]
0012 %    none
0013 %
0014 % Copyright (C) 2011, ATR All Rights Reserved.
0015 % License : New BSD License(see VBMEG_LICENSE.txt)
0016 
0017 %
0018 % --- Previous check
0019 %
0020 if ~exist('obj', 'var')
0021     error('obj is a required parameter.');
0022 end
0023 if ~exist('ix_main', 'var')
0024     error('ix_main is a required parameter.');
0025 end
0026 if ~exist('ix_sub', 'var')
0027     error('ix_sub is a required parameter.');
0028 end
0029 
0030 %
0031 % --- Main Procedure
0032 %
0033 
0034 % get parameter set(template or batch parameter set)
0035 parm_set = vb_batch_mgr_get_parm_set(obj, ix_main);
0036 
0037 % get parameter from parameter set
0038 [parm, parm_type] = vb_batch_parm_set_get_parm(parm_set, ix_sub);
0039 
0040 file = vb_struct2file(parm);
0041 
0042 fid = fopen(file, 'rt');
0043 if fid == -1
0044     warning('temporary file cannot be created.');
0045     return;
0046 end
0047 
0048 parm_str = '';
0049 while(1)
0050     line = fgets(fid);
0051     if line == -1
0052         break;
0053     else
0054         parm_str = [parm_str, line];
0055     end
0056 end
0057 fclose(fid);
0058 
0059 [h, h_edit] = vb_text_area(parm_type, parm_str);

Generated on Tue 27-Aug-2013 11:46:04 by m2html © 2005