# ---------------------------------- # - 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 "" 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 "//davila//Test_01//Condition_01" new std:ReplaceString Box20 set Box20.Search "" new std:MagicBox Box21 new std:ReplaceString Box22 set Box22.Replace "00100_OriginalImages" set Box22.Search "" new std:ReplaceString Box23 set Box23.Replace "00200_InitialParameters" set Box23.Search "" new std:ReplaceString Box24 set Box24.Replace "00300_Filter" set Box24.Search "" 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