Mercurial > hg > ltpda
comparison m-toolbox/classes/@LTPDAworkbench/cb_report.m @ 0:f0afece42f48
Import.
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Wed, 23 Nov 2011 19:22:13 +0100 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:f0afece42f48 |
---|---|
1 % CB_REPORT opens a report about the outputs of the currently selected blocks. | |
2 % | |
3 % CALL: wb.cb_report | |
4 % | |
5 % M Hewitson 13-11-08 | |
6 % | |
7 % $Id: cb_report.m,v 1.3 2010/08/06 19:10:48 ingo Exp $ | |
8 % | |
9 function cb_report(varargin) | |
10 | |
11 wb = varargin{1}; | |
12 | |
13 % Get all selected blocks | |
14 sbs = awtinvoke(wb.mp, 'getSelectedBlocks'); | |
15 | |
16 outvars = {}; | |
17 for ii=0:sbs.size()-1 | |
18 block = sbs.get(ii); | |
19 | |
20 % if this is a MElementWithPorts | |
21 if isa(block, 'mpipeline.canvas.MElementWithPorts') | |
22 | |
23 % loop over all outputs | |
24 outports = block.getOutputs(); | |
25 for kk=0:outports.size()-1 | |
26 op = outports.get(kk); | |
27 % get variable name | |
28 outvar = LTPDAworkbench.getWS_VarName(wb.UUID, block, op.getNumber); | |
29 outvars = [outvars {outvar}]; | |
30 end | |
31 end | |
32 end | |
33 | |
34 % Check if each var exists in the workspace, and then launch in | |
35 % ltpda_explorer | |
36 | |
37 if ~isempty(outvars) | |
38 cmd = 'report('; | |
39 for kk=1:numel(outvars) | |
40 cmd = [cmd outvars{kk} ',']; | |
41 end | |
42 | |
43 if cmd(end)==',' | |
44 cmd = cmd(1:end-1); | |
45 end | |
46 cmd = [cmd ')']; | |
47 try | |
48 evalin('base', cmd); | |
49 catch | |
50 lasterr | |
51 utils.helper.errorDlg('Unable to report on selected objects. Has the pipeline been executed?', 'Report block outputs error'); | |
52 end | |
53 end | |
54 | |
55 end | |
56 |