appli/template_creaPatientsSystem/scripts/ResetPatient.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script
   3 # - /Users/davila/CreatisWork/tmpCharly/creaBrainGrayMatter/appli/Appli_ceraGM/scripts/ResetPatient.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include wx
  12 include std
  13 include creaVtk
  14
  15 author "Author ??"
  16 description "Description ??"
  17 category "<VOID>"
  18
  19 new wx:CommandButton Box02
  20   set Box02.Label "Reset Patient and Exit"
  21
  22 new std:ConcatStrings Box03
  23   set Box03.In1 "rm -rf "
  24   set Box03.In2 "  "
  25   set Box03.In3 " "
  26
  27 new std:ExecSystemCommand Box04
  28
  29 new std:Exit Box05
  30
  31 new wx:LayoutCenter Box06
  32
  33 new creaVtk:OutputWindow Box07
  34
  35 new wx:LayoutLine Box08
  36   set Box08.WinHeight "300"
  37   set Box08.WinTitle "ResetPatient.bbs"
  38
  39 new std:ConcatStrings Box10
  40
  41 new wx:OutputText Box11
  42
  43 new std:ConcatStrings Box14
  44
  45 new std:ConcatStrings Box18
  46   set Box18.In1 "del  "
  47   set Box18.In3 " "
  48
  49 new std:StringSelect Box19
  50
  51 new std:Configuration Box20
  52
  53 new std:ReplaceString Box17
  54   set Box17.Replace "\"
  55   set Box17.Search "/"
  56
  57 new std:ConcatStrings Box21
  58
  59 new std:ConcatStrings Box22
  60   set Box22.In2 "/results/"
  61
  62 new std:ConcatStrings Box23
  63   set Box23.In1 "/<CORE>/davila/00300_Filter/Test_01/<PATIENT>/Condition_01"
  64
  65 new std:ReplaceCleanString Box24
  66   set Box24.Search "<CORE>"
  67
  68 new std:ReplaceCleanString Box25
  69   set Box25.Search "<PATIENT>"
  70
  71 new std:MultipleInputs Box26
  72
  73 new std:ExecSystemCommand Box27
  74
  75 new std:ConcatStrings Box28
  76   set Box28.In1 "rm -rf "
  77   set Box28.In2 "  "
  78   set Box28.In3 " "
  79
  80 new std:ConcatStrings Box29
  81   set Box29.In1 "del  "
  82   set Box29.In3 " "
  83
  84 new std:StringSelect Box30
  85
  86 new std:ReplaceString Box31
  87   set Box31.Replace "\"
  88   set Box31.Search "/"
  89
  90 new std:ReplaceCleanString Box33
  91   set Box33.Replace "00200_InitialParameters"
  92   set Box33.Search "00300_Filter"
  93
  94 new wx:OutputText Box34
  95
  96 new wx:LayoutLine Box35
  97
  98 new wx:OutputText Box36
  99
 100
 101 connect Box02.Widget Box06.Widget2
 102
 103 connect Box06.Widget Box08.Widget3
 104
 105 connect Box03.Out Box19.In0
 106
 107 connect Box20.SystemType Box19.In
 108
 109 connect Box18.Out Box17.In
 110
 111
 112
 113
 114 connect Box03.Out Box19.In2
 115
 116 connect Box23.Out Box24.In
 117
 118 connect Box21.Out Box24.Replace
 119
 120 connect Box24.Out Box25.In
 121
 122 connect Box10.Out Box25.Replace
 123
 124 connect Box14.Out Box22.In1
 125
 126 connect Box25.Out Box22.In3
 127
 128 connect Box19.Out Box04.In
 129
 130 connect Box22.Out Box03.In3
 131
 132 connect Box22.Out Box18.In4
 133
 134 connect Box17.Out Box19.In1
 135
 136 connect Box05.BoxChange Box26.In9
 137
 138 connect Box02.BoxChange Box26.BoxExecute
 139
 140 connect Box04.BoxChange Box26.In1
 141
 142 connect Box27.BoxChange Box26.In3
 143
 144 connect Box28.Out Box30.In0
 145
 146 connect Box29.Out Box31.In
 147
 148 connect Box28.Out Box30.In2
 149
 150 connect Box31.Out Box30.In1
 151
 152 connect Box20.SystemType Box30.In
 153
 154 connect Box30.Out Box27.In
 155
 156 connect Box22.Out Box33.In
 157
 158 connect Box33.Out Box28.In3
 159
 160 connect Box33.Out Box29.In4
 161
 162 connect Box35.Widget Box08.Widget2
 163
 164 connect Box22.Out Box11.In
 165
 166 connect Box33.Out Box34.In
 167
 168 connect Box36.Widget Box35.Widget1
 169
 170 connect Box34.Widget Box35.Widget3
 171
 172 connect Box11.Widget Box35.Widget5
 173
 174
 175
 176 # Complex input ports
 177 input BaseDir Box14.In1 " "
 178 input PatientID Box10.In1 " "
 179 input CoreID Box21.In1 " "
 180 exec Box07
 181 exec Box08