#3309 BBTK Bug New Normal - Bug gdcmvtk - GetXCoherentInfoGdcmReader std - FilesFro...

diff --git a/packages/gdcmvtk/bbs/boxes/DicomSerieInfoDir.bbg b/packages/gdcmvtk/bbs/boxes/DicomSerieInfoDir.bbg
new file mode 100644 (file)
index 0000000..234bb1e
--- /dev/null
+++ b/packages/gdcmvtk/bbs/boxes/DicomSerieInfoDir.bbg
@@ -0,0 +1,196 @@
+# ----------------------------------
+# - BBTKGEditor v 1.4 BBG BlackBox Diagram file
+# - /home/davila/Creatis/C8/creatools_source/bbtk/packages/gdcmvtk/bbs/boxes/DicomSerieInfoDir.bbg
+# ----------------------------------
+
+APP_START
+CATEGORY:<VOID>
+DESCRIPTION:Description ??
+AUTHOR:Author ??
+COMPLEXBOX:TRUE
+COMPLEXBOXNAME:DicomSerieInfoDir
+PACKAGENAME:gdcmvtk
+COMPLEXOUTPUTS:1
+COMPLEX_PORT
+OutString
+23.123899:-155.606672:-900.000000
+FIN_COMPLEX_PORT
+COMPLEXINPUTS:3
+COMPLEX_PORT
+LstPaths
+-39.489376:120.816144:-900.000000
+FIN_COMPLEX_PORT
+COMPLEX_PORT
+LstSimpleDirName
+87.730451:116.973935:-900.000000
+FIN_COMPLEX_PORT
+COMPLEX_PORT
+idDir
+15.155382:119.108496:-900.000000
+FIN_COMPLEX_PORT
+BOXES:13
+BOX
+std:FilesFromDirectory:Box03
+ISEXEC:FALSE
+10.731660:9.163982:-900.000000
+54.606660:-0.836018:-900.000000
+PORT
+Type:"0"
+FIN_BOX
+BOX
+std:GetVectorStringElement:Box04
+ISEXEC:FALSE
+8.013459:29.757210:-900.000000
+57.413459:19.757210:-900.000000
+PORT
+I:"0"
+FIN_BOX
+BOX
+std:GetVectorStringElement:Box05
+ISEXEC:FALSE
+-13.647988:-9.810019:-900.000000
+35.752012:-19.810019:-900.000000
+PORT
+I:"0"
+FIN_BOX
+BOX
+gdcmvtk:GetXCoherentInfoGdcmReader:Box06
+ISEXEC:FALSE
+84.539379:-29.755153:-900.000000
+141.514379:-39.755153:-900.000000
+PORT
+DicomTags:"D0028_0030"
+FIN_BOX
+BOX
+creaImageIO:GetDicomAttributesFromMaps:Box07
+ISEXEC:FALSE
+92.540130:-48.258085:-900.000000
+147.865130:-58.258085:-900.000000
+PORT
+KeyDicom:"D0028_0030"
+FIN_BOX
+BOX
+std:ConcatStrings:Box08
+ISEXEC:FALSE
+116.064960:12.082463:-900.000000
+155.789960:2.082463:-900.000000
+PORT
+In1:"D0008_103e"
+FIN_BOX
+BOX
+std:ConcatStrings:Box09
+ISEXEC:FALSE
+66.680200:-83.660762:-900.000000
+106.405200:-93.660762:-900.000000
+PORT
+In2:"  "
+PORT
+In4:"  ("
+PORT
+In6:"imgs)"
+FIN_BOX
+BOX
+std:GetVectorStringElement:Box10
+ISEXEC:FALSE
+71.763136:28.235191:-900.000000
+121.163136:18.235191:-900.000000
+PORT
+I:"0"
+FIN_BOX
+BOX
+std:GetDoubleVectorSize:Box11
+ISEXEC:FALSE
+99.766716:-68.094255:-900.000000
+146.791716:-78.094255:-900.000000
+FIN_BOX
+BOX
+std:ReplaceCleanString:Box13
+ISEXEC:FALSE
+58.467387:-101.909474:-900.000000
+104.017387:-111.909474:-900.000000
+PORT
+Replace:"_"
+PORT
+Search:" "
+FIN_BOX
+BOX
+std:MagicBox:Box15
+ISEXEC:FALSE
+18.570679:86.236258:-900.000000
+54.645679:76.236258:-900.000000
+FIN_BOX
+BOX
+std:ReplaceCleanString:Box16
+ISEXEC:FALSE
+44.220452:-136.277407:-900.000000
+89.770452:-146.277407:-900.000000
+PORT
+Search:"____(0imgs)"
+FIN_BOX
+BOX
+std:ReplaceCleanString:Box17
+ISEXEC:FALSE
+67.219157:-118.466223:-900.000000
+112.769157:-128.466223:-900.000000
+PORT
+Search:","
+FIN_BOX
+CONNECTIONS:19
+CONNECTION
+Box04:Out:Box03:In
+NumberOfControlPoints:0
+CONNECTION
+Box03:Out:Box05:In
+NumberOfControlPoints:0
+CONNECTION
+Box05:Out:Box06:In
+NumberOfControlPoints:0
+CONNECTION
+Box06:DicomInfo:Box07:In
+NumberOfControlPoints:0
+CONNECTION
+Box08:Out:Box06:DicomTags
+NumberOfControlPoints:0
+CONNECTION
+Box08:Out:Box07:KeyDicom
+NumberOfControlPoints:0
+CONNECTION
+Box07:Out:Box09:In3
+NumberOfControlPoints:0
+CONNECTION
+Box03:OutSimple:Box11:In
+NumberOfControlPoints:0
+CONNECTION
+Box11:VectorSize:Box09:In5
+NumberOfControlPoints:0
+CONNECTION
+Box09:Out:Box13:In
+NumberOfControlPoints:0
+CONNECTION
+Box10:Out:Box09:In1
+NumberOfControlPoints:0
+CONNECTION
+LstPaths:LstPaths:Box04:In
+NumberOfControlPoints:0
+CONNECTION
+LstSimpleDirName:LstSimpleDirName:Box10:In
+NumberOfControlPoints:0
+CONNECTION
+idDir:idDir:Box15:In
+NumberOfControlPoints:0
+CONNECTION
+Box15:Out:Box10:I
+NumberOfControlPoints:0
+CONNECTION
+Box15:Out:Box04:I
+NumberOfControlPoints:0
+CONNECTION
+Box16:Out:OutString:OutString
+NumberOfControlPoints:0
+CONNECTION
+Box13:Out:Box17:In
+NumberOfControlPoints:0
+CONNECTION
+Box17:Out:Box16:In
+NumberOfControlPoints:0
+APP_END

diff --git a/packages/gdcmvtk/bbs/boxes/DicomSerieInfoDir.bbs b/packages/gdcmvtk/bbs/boxes/DicomSerieInfoDir.bbs
new file mode 100644 (file)
index 0000000..9967d14
--- /dev/null
+++ b/packages/gdcmvtk/bbs/boxes/DicomSerieInfoDir.bbs
@@ -0,0 +1,85 @@
+# ----------------------------------
+# - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
+# - /home/davila/Creatis/C8/creatools_source/bbtk/packages/gdcmvtk/bbs/boxes/DicomSerieInfoDir.bbs
+# ----------------------------------
+
+include std
+include itkvtk
+include std
+include gdcmvtk
+include creaImageIO
+
+define DicomSerieInfoDir gdcmvtk
+
+author "Author ??"
+description "Description ??"
+
+category "<VOID>"
+
+new std:FilesFromDirectory Box03
+  set Box03.Type "0"
+
+new std:GetVectorStringElement Box04
+  set Box04.I "0"
+
+new std:GetVectorStringElement Box05
+  set Box05.I "0"
+
+new gdcmvtk:GetXCoherentInfoGdcmReader Box06
+  set Box06.DicomTags "D0028_0030"
+
+new creaImageIO:GetDicomAttributesFromMaps Box07
+  set Box07.KeyDicom "D0028_0030"
+
+new std:ConcatStrings Box08
+  set Box08.In1 "D0008_103e"
+
+new std:ConcatStrings Box09
+  set Box09.In2 "  "
+  set Box09.In4 "  ("
+  set Box09.In6 "imgs)"
+
+new std:GetVectorStringElement Box10
+  set Box10.I "0"
+
+new std:GetDoubleVectorSize Box11
+
+new std:ReplaceCleanString Box13
+  set Box13.Replace "_"
+  set Box13.Search " "
+
+new std:MagicBox Box15
+
+new std:ReplaceCleanString Box16
+  set Box16.Search "____(0imgs)"
+
+new std:ReplaceCleanString Box17
+  set Box17.Search ","
+
+
+connect Box04.Out Box03.In
+connect Box03.Out Box05.In
+connect Box05.Out Box06.In
+connect Box06.DicomInfo Box07.In
+connect Box08.Out Box06.DicomTags
+connect Box08.Out Box07.KeyDicom
+connect Box07.Out Box09.In3
+connect Box03.OutSimple Box11.In
+connect Box11.VectorSize Box09.In5
+connect Box09.Out Box13.In
+connect Box10.Out Box09.In1
+connect Box15.Out Box10.I
+connect Box15.Out Box04.I
+connect Box13.Out Box17.In
+connect Box17.Out Box16.In
+
+# Complex input ports
+input LstPaths Box04.In " "
+input LstSimpleDirName Box10.In " "
+input idDir Box15.In " "
+
+# Complex output ports
+output OutString Box16.Out " "
+
+
+endefine

diff --git a/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbg b/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbg
new file mode 100644 (file)
index 0000000..b9684bb
--- /dev/null
+++ b/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbg
@@ -0,0 +1,465 @@
+# ----------------------------------
+# - BBTKGEditor v 1.4 BBG BlackBox Diagram file
+# - /home/davila/Creatis/C8/creatools_source/bbtk/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbg
+# ----------------------------------
+
+APP_START
+CATEGORY:<VOID>
+DESCRIPTION:Description ??
+AUTHOR:Author ??
+COMPLEXBOX:TRUE
+COMPLEXBOXNAME:LstDicomSerieInfoDir
+PACKAGENAME:gdcmvtk
+COMPLEXOUTPUTS:2
+COMPLEX_PORT
+lst
+-176.080762:-249.552015:-900.000000
+FIN_COMPLEX_PORT
+COMPLEX_PORT
+lstPath
+-443.760527:-238.330689:-900.000000
+FIN_COMPLEX_PORT
+COMPLEXINPUTS:1
+COMPLEX_PORT
+DirName
+-426.791489:149.063269:-900.000000
+FIN_COMPLEX_PORT
+BOXES:25
+BOX
+gdcmvtk:DicomSerieInfoDir:Box00
+ISEXEC:FALSE
+-951.940026:-10.508085:-900.000000
+-908.490026:-20.508085:-900.000000
+PORT
+idDir:"0"
+FIN_BOX
+BOX
+std:FilesFromDirectory:Box01
+ISEXEC:FALSE
+-437.823023:79.064069:-900.000000
+-393.948023:69.064069:-900.000000
+PORT
+In:"/home/davila/CreatisWorks/tmpMonica/SegCal/Benoit-Test-Dicom"
+PORT
+Recursive:"true"
+PORT
+Type:"2"
+FIN_BOX
+BOX
+std:ConcatStrings:Box03
+ISEXEC:FALSE
+-779.393451:-57.817697:-900.000000
+-739.668451:-67.817697:-900.000000
+PORT
+In10:" "
+PORT
+In2:" "
+PORT
+In4:" "
+PORT
+In6:" "
+PORT
+In8:" "
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box04
+ISEXEC:FALSE
+-904.389074:-11.844139:-900.000000
+-860.939074:-21.844139:-900.000000
+PORT
+idDir:"1"
+FIN_BOX
+BOX
+std:ConcatStrings:Box06
+ISEXEC:FALSE
+-578.642500:-95.299663:-900.000000
+-538.917500:-105.299663:-900.000000
+PORT
+In10:" "
+PORT
+In2:" "
+PORT
+In4:" "
+PORT
+In6:" "
+PORT
+In8:" "
+FIN_BOX
+BOX
+std:ConcatStrings:Box07
+ISEXEC:FALSE
+-379.672231:-130.515916:-900.000000
+-339.947231:-140.515916:-900.000000
+PORT
+In10:" "
+PORT
+In3:" "
+PORT
+In5:" "
+PORT
+In7:" "
+PORT
+In9:" "
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box09
+ISEXEC:FALSE
+-857.352025:-11.053807:-900.000000
+-813.902025:-21.053807:-900.000000
+PORT
+idDir:"2"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box11
+ISEXEC:FALSE
+-809.641036:-10.188896:-900.000000
+-766.191036:-20.188896:-900.000000
+PORT
+idDir:"3"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box12
+ISEXEC:FALSE
+-751.374640:-10.240842:-900.000000
+-707.924640:-20.240842:-900.000000
+PORT
+idDir:"4"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box13
+ISEXEC:FALSE
+-696.533498:-8.521817:-900.000000
+-653.083498:-18.521817:-900.000000
+PORT
+idDir:"5"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box14
+ISEXEC:FALSE
+-645.364774:-7.348775:-900.000000
+-601.914774:-17.348775:-900.000000
+PORT
+idDir:"6"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box15
+ISEXEC:FALSE
+-589.672506:-5.439898:-900.000000
+-546.222506:-15.439898:-900.000000
+PORT
+idDir:"7"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box16
+ISEXEC:FALSE
+-537.084637:-3.207460:-900.000000
+-493.634637:-13.207460:-900.000000
+PORT
+idDir:"8"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box17
+ISEXEC:FALSE
+-476.106578:-7.697690:-900.000000
+-432.656578:-17.697690:-900.000000
+PORT
+idDir:"9"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box18
+ISEXEC:FALSE
+-428.555625:-9.033745:-900.000000
+-385.105625:-19.033745:-900.000000
+PORT
+idDir:"10"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box19
+ISEXEC:FALSE
+-381.518577:-8.243412:-900.000000
+-338.068577:-18.243412:-900.000000
+PORT
+idDir:"11"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box20
+ISEXEC:FALSE
+-333.807587:-7.378501:-900.000000
+-290.357587:-17.378501:-900.000000
+PORT
+idDir:"12"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box21
+ISEXEC:FALSE
+-221.615538:-4.216335:-900.000000
+-178.165538:-14.216335:-900.000000
+PORT
+idDir:"14"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box22
+ISEXEC:FALSE
+-271.706735:-3.925805:-900.000000
+-228.256735:-13.925805:-900.000000
+PORT
+idDir:"13"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box23
+ISEXEC:FALSE
+-169.531325:-4.538380:-900.000000
+-126.081325:-14.538380:-900.000000
+PORT
+idDir:"15"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box24
+ISEXEC:FALSE
+-112.650730:3.122007:-900.000000
+-69.200730:-6.877993:-900.000000
+PORT
+idDir:"16"
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box25
+ISEXEC:FALSE
+-62.448267:4.245541:-900.000000
+-18.998267:-5.754459:-900.000000
+PORT
+idDir:"17"
+FIN_BOX
+BOX
+std:ConcatStrings:Box26
+ISEXEC:FALSE
+-252.521011:-157.121798:-900.000000
+-212.796011:-167.121798:-900.000000
+PORT
+In10:" "
+PORT
+In3:" "
+PORT
+In5:" "
+PORT
+In7:" "
+PORT
+In9:" "
+FIN_BOX
+BOX
+gdcmvtk:DicomSerieInfoDir:Box27
+ISEXEC:FALSE
+-10.137281:3.328842:-900.000000
+33.312719:-6.671158:-900.000000
+PORT
+idDir:"17"
+FIN_BOX
+BOX
+std:ConcatStrings:Box28
+ISEXEC:FALSE
+-179.215105:-180.086181:-900.000000
+-139.490105:-190.086181:-900.000000
+PORT
+In10:" "
+PORT
+In3:" "
+PORT
+In5:" "
+PORT
+In7:" "
+PORT
+In9:" "
+FIN_BOX
+CONNECTIONS:64
+CONNECTION
+Box01:OutSimple:Box00:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box00:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box04:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box04:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box04:OutString:Box03:In3
+NumberOfControlPoints:0
+CONNECTION
+Box00:OutString:Box03:In1
+NumberOfControlPoints:0
+CONNECTION
+Box03:Out:Box06:In1
+NumberOfControlPoints:0
+CONNECTION
+Box06:Out:Box07:In1
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box09:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box09:OutString:Box03:In5
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box09:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box11:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box11:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box12:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box12:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box13:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box13:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box11:OutString:Box03:In7
+NumberOfControlPoints:0
+CONNECTION
+Box12:OutString:Box03:In9
+NumberOfControlPoints:0
+CONNECTION
+Box13:OutString:Box06:In3
+NumberOfControlPoints:0
+CONNECTION
+Box14:OutString:Box06:In5
+NumberOfControlPoints:0
+CONNECTION
+Box15:OutString:Box06:In7
+NumberOfControlPoints:0
+CONNECTION
+Box16:OutString:Box06:In9
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box14:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box14:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box15:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box15:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box16:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box16:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box17:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box17:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box18:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box18:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box19:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box19:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box20:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box20:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box22:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box22:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box21:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box21:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box23:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box23:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box24:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box24:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box25:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box25:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box17:OutString:Box07:In2
+NumberOfControlPoints:0
+CONNECTION
+Box18:OutString:Box07:In4
+NumberOfControlPoints:0
+CONNECTION
+Box19:OutString:Box07:In6
+NumberOfControlPoints:0
+CONNECTION
+Box20:OutString:Box07:In8
+NumberOfControlPoints:0
+CONNECTION
+Box22:OutString:Box07:In10
+NumberOfControlPoints:0
+CONNECTION
+Box07:Out:Box26:In1
+NumberOfControlPoints:0
+CONNECTION
+Box21:OutString:Box26:In2
+NumberOfControlPoints:0
+CONNECTION
+Box23:OutString:Box26:In4
+NumberOfControlPoints:0
+CONNECTION
+Box24:OutString:Box26:In6
+NumberOfControlPoints:0
+CONNECTION
+Box25:OutString:Box26:In8
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:Box27:LstPaths
+NumberOfControlPoints:0
+CONNECTION
+Box01:OutSimple:Box27:LstSimpleDirName
+NumberOfControlPoints:0
+CONNECTION
+Box26:Out:Box28:In1
+NumberOfControlPoints:0
+CONNECTION
+Box27:OutString:Box28:In2
+NumberOfControlPoints:0
+CONNECTION
+DirName:DirName:Box01:In
+NumberOfControlPoints:0
+CONNECTION
+Box28:Out:lst:lst
+NumberOfControlPoints:0
+CONNECTION
+Box01:Out:lstPath:lstPath
+NumberOfControlPoints:0
+APP_END

diff --git a/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbs b/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbs
new file mode 100644 (file)
index 0000000..a9d7e81
--- /dev/null
+++ b/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbs
@@ -0,0 +1,186 @@
+# ----------------------------------
+# - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
+# - /home/davila/Creatis/C8/creatools_source/bbtk/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbs
+# ----------------------------------
+
+include std
+include itkvtk
+include gdcmvtk
+include std
+
+define LstDicomSerieInfoDir gdcmvtk
+
+author "Author ??"
+description "Description ??"
+
+category "<VOID>"
+
+new gdcmvtk:DicomSerieInfoDir Box00
+  set Box00.idDir "0"
+
+new std:FilesFromDirectory Box01
+  set Box01.In "/home/davila/CreatisWorks/tmpMonica/SegCal/Benoit-Test-Dicom"
+  set Box01.Recursive "true"
+  set Box01.Type "2"
+
+new std:ConcatStrings Box03
+  set Box03.In10 " "
+  set Box03.In2 " "
+  set Box03.In4 " "
+  set Box03.In6 " "
+  set Box03.In8 " "
+
+new gdcmvtk:DicomSerieInfoDir Box04
+  set Box04.idDir "1"
+
+new std:ConcatStrings Box06
+  set Box06.In10 " "
+  set Box06.In2 " "
+  set Box06.In4 " "
+  set Box06.In6 " "
+  set Box06.In8 " "
+
+new std:ConcatStrings Box07
+  set Box07.In10 " "
+  set Box07.In3 " "
+  set Box07.In5 " "
+  set Box07.In7 " "
+  set Box07.In9 " "
+
+new gdcmvtk:DicomSerieInfoDir Box09
+  set Box09.idDir "2"
+
+new gdcmvtk:DicomSerieInfoDir Box11
+  set Box11.idDir "3"
+
+new gdcmvtk:DicomSerieInfoDir Box12
+  set Box12.idDir "4"
+
+new gdcmvtk:DicomSerieInfoDir Box13
+  set Box13.idDir "5"
+
+new gdcmvtk:DicomSerieInfoDir Box14
+  set Box14.idDir "6"
+
+new gdcmvtk:DicomSerieInfoDir Box15
+  set Box15.idDir "7"
+
+new gdcmvtk:DicomSerieInfoDir Box16
+  set Box16.idDir "8"
+
+new gdcmvtk:DicomSerieInfoDir Box17
+  set Box17.idDir "9"
+
+new gdcmvtk:DicomSerieInfoDir Box18
+  set Box18.idDir "10"
+
+new gdcmvtk:DicomSerieInfoDir Box19
+  set Box19.idDir "11"
+
+new gdcmvtk:DicomSerieInfoDir Box20
+  set Box20.idDir "12"
+
+new gdcmvtk:DicomSerieInfoDir Box21
+  set Box21.idDir "14"
+
+new gdcmvtk:DicomSerieInfoDir Box22
+  set Box22.idDir "13"
+
+new gdcmvtk:DicomSerieInfoDir Box23
+  set Box23.idDir "15"
+
+new gdcmvtk:DicomSerieInfoDir Box24
+  set Box24.idDir "16"
+
+new gdcmvtk:DicomSerieInfoDir Box25
+  set Box25.idDir "17"
+
+new std:ConcatStrings Box26
+  set Box26.In10 " "
+  set Box26.In3 " "
+  set Box26.In5 " "
+  set Box26.In7 " "
+  set Box26.In9 " "
+
+new gdcmvtk:DicomSerieInfoDir Box27
+  set Box27.idDir "17"
+
+new std:ConcatStrings Box28
+  set Box28.In10 " "
+  set Box28.In3 " "
+  set Box28.In5 " "
+  set Box28.In7 " "
+  set Box28.In9 " "
+
+
+connect Box01.OutSimple Box00.LstSimpleDirName
+connect Box01.Out Box00.LstPaths
+connect Box01.OutSimple Box04.LstSimpleDirName
+connect Box01.Out Box04.LstPaths
+connect Box04.OutString Box03.In3
+connect Box00.OutString Box03.In1
+connect Box03.Out Box06.In1
+connect Box06.Out Box07.In1
+connect Box01.OutSimple Box09.LstSimpleDirName
+connect Box09.OutString Box03.In5
+connect Box01.Out Box09.LstPaths
+connect Box01.Out Box11.LstPaths
+connect Box01.OutSimple Box11.LstSimpleDirName
+connect Box01.Out Box12.LstPaths
+connect Box01.OutSimple Box12.LstSimpleDirName
+connect Box01.Out Box13.LstPaths
+connect Box01.OutSimple Box13.LstSimpleDirName
+connect Box11.OutString Box03.In7
+connect Box12.OutString Box03.In9
+connect Box13.OutString Box06.In3
+connect Box14.OutString Box06.In5
+connect Box15.OutString Box06.In7
+connect Box16.OutString Box06.In9
+connect Box01.Out Box14.LstPaths
+connect Box01.OutSimple Box14.LstSimpleDirName
+connect Box01.Out Box15.LstPaths
+connect Box01.OutSimple Box15.LstSimpleDirName
+connect Box01.Out Box16.LstPaths
+connect Box01.OutSimple Box16.LstSimpleDirName
+connect Box01.Out Box17.LstPaths
+connect Box01.OutSimple Box17.LstSimpleDirName
+connect Box01.Out Box18.LstPaths
+connect Box01.OutSimple Box18.LstSimpleDirName
+connect Box01.Out Box19.LstPaths
+connect Box01.OutSimple Box19.LstSimpleDirName
+connect Box01.Out Box20.LstPaths
+connect Box01.OutSimple Box20.LstSimpleDirName
+connect Box01.Out Box22.LstPaths
+connect Box01.OutSimple Box22.LstSimpleDirName
+connect Box01.Out Box21.LstPaths
+connect Box01.OutSimple Box21.LstSimpleDirName
+connect Box01.Out Box23.LstPaths
+connect Box01.OutSimple Box23.LstSimpleDirName
+connect Box01.Out Box24.LstPaths
+connect Box01.OutSimple Box24.LstSimpleDirName
+connect Box01.Out Box25.LstPaths
+connect Box01.OutSimple Box25.LstSimpleDirName
+connect Box17.OutString Box07.In2
+connect Box18.OutString Box07.In4
+connect Box19.OutString Box07.In6
+connect Box20.OutString Box07.In8
+connect Box22.OutString Box07.In10
+connect Box07.Out Box26.In1
+connect Box21.OutString Box26.In2
+connect Box23.OutString Box26.In4
+connect Box24.OutString Box26.In6
+connect Box25.OutString Box26.In8
+connect Box01.Out Box27.LstPaths
+connect Box01.OutSimple Box27.LstSimpleDirName
+connect Box26.Out Box28.In1
+connect Box27.OutString Box28.In2
+
+# Complex input ports
+input DirName Box01.In " "
+
+# Complex output ports
+output lst Box28.Out " "
+output lstPath Box01.Out " "
+
+
+endefine