1 # ----------------------------------
2 # - BBTKGEditor v 1.4 BBS BlackBox Script
3 # - /Users/davila/CreatisWork/tmpCharly/creaBrainGrayMatter/appli/creaPatientsSystem_MG/scripts/Comments.bbs
4 # ----------------------------------
7 # ----------------------
16 description "Description ??"
19 new std:ConcatStrings Box15
21 new std:ConcatStrings Box07
22 set Box07.In2 "/Comment-Informatic.txt"
24 new wx:LayoutTab Box31
25 set Box31.WinHeight "500"
26 set Box31.WinTitle "Comments.bbs"
28 new wx:LayoutLine Box32
30 new wx:InputText Box33
31 set Box33.Title "Informatic Comment"
33 new wx:CommandButton Box34
34 set Box34.Label "Save and Exit"
36 new std:ReadLinesString Box11
38 new std:ReplaceString Box18
42 new std:StringWriter Box20
46 new wx:LayoutCenter Box25
48 new wx:LayoutLine Box26
50 new std:ConcatStrings Box27
51 set Box27.In1 "Patient:"
52 set Box27.In2 "/results/"
54 new std:ConcatStrings Box17
55 set Box17.In1 "/<CORE>/davila/00300_Filter/Test_01/<PATIENT>/Condition_01"
57 new std:ConcatStrings Box19
59 new std:ConcatStrings Box22
61 new std:ReplaceCleanString Box23
62 set Box23.Search "<CORE>"
64 new std:ReplaceCleanString Box28
65 set Box28.Search "<PATIENT>"
67 new std:ConcatStrings Box29
68 set Box29.In2 "/Comment-Scientific.txt"
70 new wx:InputText Box30
71 set Box30.Title "Scientific Comment"
73 new std:ReadLinesString Box35
75 new std:ReplaceString Box36
79 new std:StringWriter Box37
81 new std:ConcatStrings Box38
82 set Box38.In2 "/Comment-General.txt"
84 new wx:InputText Box39
85 set Box39.Title "General Comment"
87 new std:ReadLinesString Box40
89 new std:ReplaceString Box41
93 new std:StringWriter Box42
95 new creaMiniTools:WriteStatePatientSystem Box43
96 set Box43.State "Finish"
98 new std:ConcatStrings Box44
100 new std:ConcatStrings Box45
101 set Box45.In2 "/Step_Comment.txt"
103 new std:MultipleInputs Box46
105 new std:SplitFilePathVector Box47
107 new std:ConcatStrings Box48
108 set Box48.In1 "mkdir -p "
110 new std:ExecSystemCommand Box49
113 connect Box32.Widget Box31.Widget1
115 connect Box11.Out Box33.In
117 connect Box07.Out Box18.In
119 connect Box18.Out Box11.FileName
121 connect Box18.Out Box20.FileName
123 connect Box33.Out Box20.In0
125 connect Box34.Widget Box26.Widget1
127 connect Box26.Widget Box25.Widget2
130 connect Box15.Out Box27.In1
132 connect Box27.Out Box32.WinTitle
136 connect Box17.Out Box23.In
138 connect Box22.Out Box23.Replace
140 connect Box23.Out Box28.In
142 connect Box27.Out Box07.In1
144 connect Box19.Out Box28.Replace
146 connect Box28.Out Box27.In3
148 connect Box35.Out Box30.In
150 connect Box29.Out Box36.In
152 connect Box36.Out Box35.FileName
154 connect Box36.Out Box37.FileName
156 connect Box30.Out Box37.In0
158 connect Box40.Out Box39.In
160 connect Box38.Out Box41.In
162 connect Box41.Out Box40.FileName
164 connect Box41.Out Box42.FileName
166 connect Box39.Out Box42.In0
168 connect Box27.Out Box29.In1
170 connect Box27.Out Box38.In1
172 connect Box25.Widget Box32.Widget8
174 connect Box39.Widget Box32.Widget2
176 connect Box30.Widget Box32.Widget4
178 connect Box33.Widget Box32.Widget6
181 connect Box44.Out Box43.User
183 connect Box27.Out Box45.In1
185 connect Box45.Out Box43.Filename
187 connect Box34.BoxChange Box46.BoxExecute
189 connect Box21.BoxChange Box46.In9
191 connect Box41.Out Box47.In
193 connect Box47.Path Box48.In2
195 connect Box48.Out Box49.In
197 connect Box43.boxChange Box46.In7
199 connect Box20.BoxChange Box46.In5
201 connect Box37.BoxChange Box46.In4
203 connect Box42.BoxChange Box46.In2
205 connect Box49.BoxChange Box46.In1
209 # Complex input ports
210 input BaseDir Box15.In1 " "
211 input PatientID Box19.In1 " "
212 input CoreID Box22.In1 " "
213 input creaUser Box44.In1 " "