1 # ----------------------------------
2 # - BBTKGEditor v 1.4 BBS BlackBox Script
3 # - /Users/davila/Creatis/C11/creatools_source/creaMiniTools/appli/template_creaPatientsSystem/scripts/Report.bbs
4 # ----------------------------------
7 # ----------------------
16 description "Description ??"
19 new wx:LayoutSplit Box02
20 set Box02.Proportion "90"
21 set Box02.WinWidth "1000"
23 new std:MagicBox Box03
25 new wx:OutputText Box04
27 new wx:CommandButton Box05
28 set Box05.Label "Refresh"
30 new wx:LayoutLine Box06
32 new wx:LayoutLine Box08
33 set Box08.Orientation "H"
35 new wx:OutputText Box09
37 new wx:CommandButton Box10
38 set Box10.Label "Close"
40 new wx:OutputText Box11
44 new std:ConcatStrings Box13
45 set Box13.In2 "/results"
47 new wx:OutputText Box14
49 new creaMiniTools:CreateReport01 Box15
50 set Box15.LstPatientsID "P01 P02 P03"
51 set Box15.LstTitles1 "+ Step01 Step02 Step03 Step04 Step05 Step06 General Scientific Informatic"
52 set Box15.LstTitles2 "Patient Insert_Data InitValues Filter Correction Validation PushDB Comment Comment Comment"
56 new std:ConcatStrings Box18
57 set Box18.In1 "/<CORE>/davila/<ALGO>/Test_01/<PATIENT>/Condition_01"
59 new std:ReplaceString Box20
60 set Box20.Search "<CORE>"
62 new std:MagicBox Box21
64 new std:ReplaceString Box22
65 set Box22.Replace "00100_OriginalImages"
66 set Box22.Search "<ALGO>"
68 new std:ReplaceString Box23
69 set Box23.Replace "00200_InitialParameters"
70 set Box23.Search "<ALGO>"
72 new std:ReplaceString Box24
73 set Box24.Replace "00300_Filter"
74 set Box24.Search "<ALGO>"
76 new std:ConcatStrings Box25
77 set Box25.In3 "/Step01_Insert_Data.txt "
79 new std:ConcatStrings Box26
80 set Box26.In2 "/results"
82 new std:ConcatStrings Box27
83 set Box27.In3 "/Step002.txt "
85 new std:ConcatStrings Box28
86 set Box28.In3 "/Step03.txt "
88 new std:ConcatStrings Box29
90 new std:ConcatStrings Box30
91 set Box30.In3 "/Comments_General.txt "
93 new std:ConcatStrings Box31
94 set Box31.In3 "/Comments_Informatic.txt "
96 new std:ConcatStrings Box32
97 set Box32.In3 "/Comments_Scientific.txt "
99 new std:ConcatStrings Box33
101 new std:ConcatStrings Box34
102 set Box34.In3 "/Step04.txt "
104 new std:ConcatStrings Box35
105 set Box35.In3 "/Step05.txt "
107 new std:ConcatStrings Box36
108 set Box36.In3 "/Step06.txt "
110 new std:ReplaceString Box38
111 set Box38.Search "<PATIENT>/Condition_01"
113 new wx:OutputText Box39
115 new std:ConcatStrings Box40
119 connect Box04.Widget Box06.Widget1
121 connect Box06.Widget Box02.Widget2
123 connect Box08.Widget Box06.Widget2
125 connect Box09.Widget Box08.Widget1
127 connect Box05.Widget Box08.Widget2
129 connect Box11.Widget Box08.Widget3
131 connect Box10.Widget Box08.Widget4
133 connect Box10.BoxChange Box12.BoxExecute
135 connect Box03.Out Box13.In1
137 connect Box14.Widget Box08.Widget5
139 connect Box17.Widget Box02.Widget1
141 connect Box15.LstTitles Box17.Titles
143 connect Box15.Out00 Box17.Column00
145 connect Box18.Out Box20.In
148 connect Box21.Out Box20.Replace
150 connect Box20.Out Box22.In
152 connect Box20.Out Box23.In
154 connect Box20.Out Box24.In
156 connect Box13.Out Box25.In1
158 connect Box22.Out Box25.In2
160 connect Box13.Out Box26.In1
162 connect Box21.Out Box26.In3
164 connect Box26.Out Box04.In
166 connect Box23.Out Box27.In2
168 connect Box13.Out Box27.In1
170 connect Box24.Out Box28.In2
172 connect Box13.Out Box28.In1
174 connect Box25.Out Box29.In1
176 connect Box27.Out Box29.In2
178 connect Box28.Out Box29.In3
180 connect Box29.Out Box15.LstStepsPath
182 connect Box24.Out Box30.In2
184 connect Box13.Out Box30.In1
186 connect Box13.Out Box31.In1
188 connect Box24.Out Box31.In2
190 connect Box13.Out Box32.In1
192 connect Box24.Out Box32.In2
194 connect Box30.Out Box33.In1
196 connect Box31.Out Box33.In2
198 connect Box32.Out Box33.In3
200 connect Box33.Out Box15.LstCommentsPath
202 connect Box13.Out Box34.In1
204 connect Box24.Out Box34.In2
206 connect Box13.Out Box35.In1
208 connect Box24.Out Box35.In2
210 connect Box34.Out Box29.In4
212 connect Box35.Out Box29.In5
214 connect Box36.Out Box29.In6
216 connect Box15.Out01 Box17.Column01
218 connect Box15.Out02 Box17.Column02
220 connect Box15.Out03 Box17.Column03
222 connect Box15.Out04 Box17.Column04
224 connect Box15.Out05 Box17.Column05
226 connect Box15.Out06 Box17.Column06
228 connect Box15.Out07 Box17.Column07
230 connect Box15.Out08 Box17.Column08
232 connect Box15.Out09 Box17.Column09
234 connect Box15.Out10 Box17.Column10
236 connect Box24.Out Box36.In2
238 connect Box13.Out Box36.In1
240 connect Box22.Out Box38.In
242 connect Box38.Out Box39.In
244 connect Box39.Widget Box06.Widget5
246 connect Box03.Out Box40.In1
248 connect Box38.Out Box40.In2
252 # Complex input ports
253 input BaseDir Box03.In " "
254 input CoreID Box21.In " "