#3421 template_creaPatientsSystem

[creaMiniTools.git] / appli / template_creaPatientsSystem / scripts / Report.bbs

diff --git a/appli/template_creaPatientsSystem/scripts/Report.bbs b/appli/template_creaPatientsSystem/scripts/Report.bbs
new file mode 100644 (file)
index 0000000..ef7e5ce
--- /dev/null
+++ b/appli/template_creaPatientsSystem/scripts/Report.bbs
@@ -0,0 +1,247 @@
+# ----------------------------------
+# - BBTKGEditor v 1.4 BBS BlackBox Script
+# - /Users/davila/CreatisWork/tmpCharly/creaBrainGrayMatter/appli/Appli_creaGM/scripts/Report.bbs
+# ----------------------------------
+
+# BBTK GEditor Script
+# ----------------------
+
+include std
+include itkvtk
+include wx
+include std
+include creaMiniTools
+
+author "Author ??"
+description "Description ??"
+category "<VOID>"
+
+new wx:LayoutSplit Box02
+  set Box02.Proportion "90"
+  set Box02.WinWidth "1000"
+
+new std:MagicBox Box03
+
+new wx:OutputText Box04
+
+new wx:CommandButton Box05
+  set Box05.Label "Refresh"
+
+new wx:LayoutLine Box06
+
+new wx:LayoutLine Box08
+  set Box08.Orientation "H"
+
+new wx:OutputText Box09
+
+new wx:CommandButton Box10
+  set Box10.Label "Exit"
+
+new wx:OutputText Box11
+
+new std:Exit Box12
+
+new std:ConcatStrings Box13
+  set Box13.In2 "/results"
+
+new wx:OutputText Box14
+
+new creaMiniTools:CreateReport01 Box15
+  set Box15.LstPatientsID "P01 P02 P03"
+  set Box15.LstTitles1 "+            Step01         Step02     Step03  Step04       Step05     Step06  General    Scientific  Informatic"
+  set Box15.LstTitles2 "Patient Insert_Date InitValues Filter      Correction Validation PushDB Comment Comment Comment"
+
+new wx:ListCtrl Box16
+  set Box16.Column00 " Patient _ P1 _ _ _ P2 _ _ _  P3 _ _ _  P4 _ _ _ "
+  set Box16.Column01 "Initial_point _ Eduardo 12/12 12h34 _ Eduardo 12/12 12h34 _  Eduardo 12/12 12h34 _  Eduardo 12/12 12h34 _ "
+  set Box16.Column02 "Segmentaiton _ Eduardo 12/12 12h34 _ Eduardo 12/12 12h34 _  Eduardo 12/12 12h34 _  Eduardo 12/12 12h34 _ "
+  set Box16.Column03 "Validateion _ Eduardo 12/12 12h34 _ Eduardo 12/12 12h34 _  Eduardo 12/12 12h34 _  Eduardo 12/12 12h34 _ "
+  set Box16.Column04 "Correction _ Eduardo 12/12 12h34 _ Eduardo 12/12 12h34 _  Eduardo 12/12 12h34 _  Eduardo 12/12 12h34 _ "
+  set Box16.Column05 "Scientific _ Coment_1 _ _ _ Coment_AAAA _ _ _  Comment_BBBB _ _ _  Coment_CCC _ _ _ "
+  set Box16.Titles "_ Step1 Step2 Step3 Comments Comments"
+
+new wx:ListCtrl Box17
+
+new std:ConcatStrings Box18
+  set Box18.In1 "/<CORE>/davila/<ALGO>/Test_01/<PATIENT>/Condition_01"
+
+new std:ReplaceString Box20
+  set Box20.Search "<CORE>"
+
+new std:MagicBox Box21
+
+new std:ReplaceString Box22
+  set Box22.Replace "00100_OriginalImages"
+  set Box22.Search "<ALGO>"
+
+new std:ReplaceString Box23
+  set Box23.Replace "00200_InitialParameters"
+  set Box23.Search "<ALGO>"
+
+new std:ReplaceString Box24
+  set Box24.Replace "00300_Filter"
+  set Box24.Search "<ALGO>"
+
+new std:ConcatStrings Box25
+  set Box25.In3 "/Step001.txt  "
+
+new std:ConcatStrings Box26
+  set Box26.In2 "/results"
+
+new std:ConcatStrings Box27
+  set Box27.In3 "/Step002.txt  "
+
+new std:ConcatStrings Box28
+  set Box28.In3 "/Step03.txt  "
+
+new std:ConcatStrings Box29
+
+new std:ConcatStrings Box30
+  set Box30.In3 "/Comments_General.txt  "
+
+new std:ConcatStrings Box31
+  set Box31.In3 "/Comments_Informatic.txt  "
+
+new std:ConcatStrings Box32
+  set Box32.In3 "/Comments_Scientific.txt  "
+
+new std:ConcatStrings Box33
+
+new std:ConcatStrings Box34
+  set Box34.In3 "/Step04.txt  "
+
+new std:ConcatStrings Box35
+  set Box35.In3 "/Step05.txt  "
+
+new std:ConcatStrings Box36
+  set Box36.In3 "/Step06.txt  "
+
+
+
+connect Box04.Widget Box06.Widget1
+
+connect Box06.Widget Box02.Widget2
+
+connect Box08.Widget Box06.Widget2
+
+connect Box09.Widget Box08.Widget1
+
+connect Box05.Widget Box08.Widget2
+
+connect Box11.Widget Box08.Widget3
+
+connect Box10.Widget Box08.Widget4
+
+connect Box10.BoxChange Box12.BoxExecute
+
+connect Box03.Out Box13.In1
+
+connect Box14.Widget Box08.Widget5
+
+connect Box17.Widget Box02.Widget1
+
+connect Box15.LstTitles Box17.Titles
+
+connect Box15.Out00 Box17.Column00
+
+connect Box18.Out Box20.In
+
+
+connect Box21.Out Box20.Replace
+
+connect Box20.Out Box22.In
+
+connect Box20.Out Box23.In
+
+connect Box20.Out Box24.In
+
+connect Box13.Out Box25.In1
+
+connect Box22.Out Box25.In2
+
+connect Box13.Out Box26.In1
+
+connect Box21.Out Box26.In3
+
+connect Box26.Out Box04.In
+
+connect Box23.Out Box27.In2
+
+connect Box13.Out Box27.In1
+
+connect Box24.Out Box28.In2
+
+connect Box13.Out Box28.In1
+
+connect Box25.Out Box29.In1
+
+connect Box27.Out Box29.In2
+
+connect Box28.Out Box29.In3
+
+connect Box29.Out Box15.LstStepsPath
+
+connect Box24.Out Box30.In2
+
+connect Box13.Out Box30.In1
+
+connect Box13.Out Box31.In1
+
+connect Box24.Out Box31.In2
+
+connect Box13.Out Box32.In1
+
+connect Box24.Out Box32.In2
+
+connect Box30.Out Box33.In1
+
+connect Box31.Out Box33.In2
+
+connect Box32.Out Box33.In3
+
+connect Box33.Out Box15.LstCommentsPath
+
+connect Box13.Out Box34.In1
+
+connect Box24.Out Box34.In2
+
+connect Box13.Out Box35.In1
+
+connect Box24.Out Box35.In2
+
+connect Box34.Out Box29.In4
+
+connect Box35.Out Box29.In5
+
+connect Box36.Out Box29.In6
+
+connect Box15.Out01 Box17.Column01
+
+connect Box15.Out02 Box17.Column02
+
+connect Box15.Out03 Box17.Column03
+
+connect Box15.Out04 Box17.Column04
+
+connect Box15.Out05 Box17.Column05
+
+connect Box15.Out06 Box17.Column06
+
+connect Box15.Out07 Box17.Column07
+
+connect Box15.Out08 Box17.Column08
+
+connect Box15.Out09 Box17.Column09
+
+connect Box15.Out10 Box17.Column10
+
+connect Box24.Out Box36.In2
+
+connect Box13.Out Box36.In1
+
+
+
+# Complex input ports
+input BaseDir Box03.In " "
+input CoreID Box21.In " "
+exec Box02