1 # ----------------------------------
2 # - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
3 # - /home/davila/Creatis/C8/creatools_source/bbtk/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbs
4 # ----------------------------------
11 define LstDicomSerieInfoDir gdcmvtk
14 description "Description ??"
18 new gdcmvtk:DicomSerieInfoDir Box00
21 new std:FilesFromDirectory Box01
22 set Box01.In "/home/davila/CreatisWorks/tmpMonica/SegCal/Benoit-Test-Dicom"
23 set Box01.Recursive "true"
26 new std:ConcatStrings Box03
33 new gdcmvtk:DicomSerieInfoDir Box04
36 new std:ConcatStrings Box06
43 new std:ConcatStrings Box07
50 new gdcmvtk:DicomSerieInfoDir Box09
53 new gdcmvtk:DicomSerieInfoDir Box11
56 new gdcmvtk:DicomSerieInfoDir Box12
59 new gdcmvtk:DicomSerieInfoDir Box13
62 new gdcmvtk:DicomSerieInfoDir Box14
65 new gdcmvtk:DicomSerieInfoDir Box15
68 new gdcmvtk:DicomSerieInfoDir Box16
71 new gdcmvtk:DicomSerieInfoDir Box17
74 new gdcmvtk:DicomSerieInfoDir Box18
77 new gdcmvtk:DicomSerieInfoDir Box19
80 new gdcmvtk:DicomSerieInfoDir Box20
83 new gdcmvtk:DicomSerieInfoDir Box21
86 new gdcmvtk:DicomSerieInfoDir Box22
89 new gdcmvtk:DicomSerieInfoDir Box23
92 new gdcmvtk:DicomSerieInfoDir Box24
95 new gdcmvtk:DicomSerieInfoDir Box25
98 new std:ConcatStrings Box26
105 new gdcmvtk:DicomSerieInfoDir Box27
108 new std:ConcatStrings Box28
116 connect Box01.OutSimple Box00.LstSimpleDirName
117 connect Box01.Out Box00.LstPaths
118 connect Box01.OutSimple Box04.LstSimpleDirName
119 connect Box01.Out Box04.LstPaths
120 connect Box04.OutString Box03.In3
121 connect Box00.OutString Box03.In1
122 connect Box03.Out Box06.In1
123 connect Box06.Out Box07.In1
124 connect Box01.OutSimple Box09.LstSimpleDirName
125 connect Box09.OutString Box03.In5
126 connect Box01.Out Box09.LstPaths
127 connect Box01.Out Box11.LstPaths
128 connect Box01.OutSimple Box11.LstSimpleDirName
129 connect Box01.Out Box12.LstPaths
130 connect Box01.OutSimple Box12.LstSimpleDirName
131 connect Box01.Out Box13.LstPaths
132 connect Box01.OutSimple Box13.LstSimpleDirName
133 connect Box11.OutString Box03.In7
134 connect Box12.OutString Box03.In9
135 connect Box13.OutString Box06.In3
136 connect Box14.OutString Box06.In5
137 connect Box15.OutString Box06.In7
138 connect Box16.OutString Box06.In9
139 connect Box01.Out Box14.LstPaths
140 connect Box01.OutSimple Box14.LstSimpleDirName
141 connect Box01.Out Box15.LstPaths
142 connect Box01.OutSimple Box15.LstSimpleDirName
143 connect Box01.Out Box16.LstPaths
144 connect Box01.OutSimple Box16.LstSimpleDirName
145 connect Box01.Out Box17.LstPaths
146 connect Box01.OutSimple Box17.LstSimpleDirName
147 connect Box01.Out Box18.LstPaths
148 connect Box01.OutSimple Box18.LstSimpleDirName
149 connect Box01.Out Box19.LstPaths
150 connect Box01.OutSimple Box19.LstSimpleDirName
151 connect Box01.Out Box20.LstPaths
152 connect Box01.OutSimple Box20.LstSimpleDirName
153 connect Box01.Out Box22.LstPaths
154 connect Box01.OutSimple Box22.LstSimpleDirName
155 connect Box01.Out Box21.LstPaths
156 connect Box01.OutSimple Box21.LstSimpleDirName
157 connect Box01.Out Box23.LstPaths
158 connect Box01.OutSimple Box23.LstSimpleDirName
159 connect Box01.Out Box24.LstPaths
160 connect Box01.OutSimple Box24.LstSimpleDirName
161 connect Box01.Out Box25.LstPaths
162 connect Box01.OutSimple Box25.LstSimpleDirName
163 connect Box17.OutString Box07.In2
164 connect Box18.OutString Box07.In4
165 connect Box19.OutString Box07.In6
166 connect Box20.OutString Box07.In8
167 connect Box22.OutString Box07.In10
168 connect Box07.Out Box26.In1
169 connect Box21.OutString Box26.In2
170 connect Box23.OutString Box26.In4
171 connect Box24.OutString Box26.In6
172 connect Box25.OutString Box26.In8
173 connect Box01.Out Box27.LstPaths
174 connect Box01.OutSimple Box27.LstSimpleDirName
175 connect Box26.Out Box28.In1
176 connect Box27.OutString Box28.In2
178 # Complex input ports
179 input DirName Box01.In " "
181 # Complex output ports
182 output lst Box28.Out " "
183 output lstPath Box01.Out " "