#3421 template_creaPatientsSystem

[creaMiniTools.git] / appli / template_creaPatientsSystem / scripts / 00010_Menu.bbs

diff --git a/appli/template_creaPatientsSystem/scripts/00010_Menu.bbs b/appli/template_creaPatientsSystem/scripts/00010_Menu.bbs
index 1f81269f27a78c55223418b3779e839ab50f22bf..f7393730faee0138b33739e1b25ec7a9a8b698d1 100644 (file)
--- a/appli/template_creaPatientsSystem/scripts/00010_Menu.bbs
+++ b/appli/template_creaPatientsSystem/scripts/00010_Menu.bbs
@@ -1,6 +1,6 @@
 # ----------------------------------
 # - BBTKGEditor v 1.4 BBS BlackBox Script
-# - /Users/davila/CreatisWork/tmpCharly/creaBrainGrayMatter/appli/Appli_creaGM/scripts/00010_Menu.bbs
+# - /Users/davila/Creatis/C11/creatools_source/creaMiniTools/appli/template_creaPatientsSystem/scripts/00010_Menu.bbs
 # ----------------------------------
 
 # BBTK GEditor Script
@@ -66,8 +66,7 @@ new std:ExecSystemCommand Box27
 
 new std:ConcatStrings Box28
   set Box28.In1 "bbi Report.bbs  "
-  set Box28.In2 "BaseDir="
-  set Box28.In4 "  &"
+  set Box28.In9 "  &"
 
 new wx:CommandButton Box29
   set Box29.Label "Comments"
@@ -174,6 +173,7 @@ new std:ConcatStrings Box93
   set Box93.In1 "bbi  "
   set Box93.In2 "00100_InsertDataA.bbs "
   set Box93.In4 " ProjectDir="
+  set Box93.In6 "  "
   set Box93.In9 " & "
 
 new std:StringSelect Box94
@@ -333,6 +333,10 @@ new std:ConcatStrings Box156
   set Box156.In1 "open"
   set Box156.In2 "  "
 
+new std:ConcatStrings Box157
+  set Box157.In1 "creaUser="
+  set Box157.In3 "  "
+
 
 connect Box06.Out Box05.In
 
@@ -350,8 +354,6 @@ connect Box21.BoxChange Box22.BoxExecute
 
 connect Box26.BoxChange Box27.BoxExecute
 
-connect Box11.Out Box28.In3
-
 connect Box29.BoxChange Box30.BoxExecute
 
 connect Box00.Widget Box33.Widget1
@@ -468,8 +470,6 @@ connect Box108.Widget Box99.Widget1
 
 connect Box11.Out Box93.In5
 
-connect Box73.Out Box90.In
-
 connect Box90.Out Box112.I
 
 connect Box113.OutSimple Box114.In3
@@ -580,8 +580,6 @@ connect Box142.Out Box113.In
 
 connect Box143.Out Box118.In2
 
-connect Box90.OutString Box143.In2
-
 connect Box146.Out Box126.In2
 
 connect Box131.Out Box146.In2
@@ -645,6 +643,20 @@ connect Box156.Out Box105.In2
 
 connect Box28.Out Box61.In2
 
+connect Box151.Out Box157.In2
+
+connect Box157.Out Box118.In4
+
+connect Box157.Out Box93.In7
+
+connect Box116.Out Box28.In2
+
+connect Box73.Out Box90.In
+
+connect Box143.Out Box28.In3
+
+connect Box90.OutString Box143.In2
+
 
 
 # Complex input ports