Title:			Run *Modal* and *Modeless* Versions of Teamstudio for Notes Products from a Single Smarticon
Contributing Author:	Chad Schelfhout
Posted:			April 2002


I created one SmartIcon that makes it less confusing for me as to which SmarIcon to use. I know that there are pictures but I always found myself clicking on the wrong one. This also takes up less space on the smarticon bar

This updated entry now includes Linkchecker

[Editorial note: The modeless (or non-modal) versions of these Teamstudio for Notes products are not supported by the company.
Also note, Linkchecker is now Validator and Librarian is now Design Manager]

Path := "";
Option := @Prompt( [OKCANCELLIST] ; "Select Option" ; "What would you like to do:" ; "CIAO! Modal" ; "Analyzer Modal" : "Analyzer" : "Configurator
Modal" : "Configurator" : "CIAO! Modal" : "CIAO!" : "Delta Modal" : "Delta": "Form Snippet" : "Librarian Modal" : "Librarian" : "Linkchecker" :"Snapper" ) ;

DB := @Implode( @Name( [CN] ; @Explode( @DbName ; ";" ; @False )) ; "!!" );
File := "Nothing";
@If(
Option = "Analyzer" ; @Set( File ; @DbLookup( "TMS" : "NoCache"; "DEAN" )
);
Option = "Analyzer Modal" ; @Set( File ; @Command([Execute]; path +
"ndean.exe " ; DB ) );
Option = "Configurator" ; @Set( File ; @DbLookup( "TMS" : "NoCache";
"STAR") ) ;
Option = "Configurator Modal" ; @Set( File ; @Command([Execute]; path +
"nconfy.exe " ; DB ) );
Option = "Delta" ; @Set( File ; @DbLookup( "TMS" : "NoCache"; "DIFF" ) ) ;
Option = "Delta Modal" ; @Set( File ; @Command([Execute]; path +
"ndelta.exe " ; DB ) );
Option = "CIAO!" ; @Set( File ; @DbLookup( "TMS" : "NoCache"; "CIAO" ) ) ;
Option = "CIAO! Modal" ; @Set( File ; @Command([Execute]; path + "nciao.exe
" ; DB ) );
Option = "Librarian" ; @Set( File ; @DbLookup( "TMS" : "NoCache"; "LIBR" )
);
Option = "Librarian Modal" ; @Set( File ; @Command([Execute]; path +
"nlibr.exe " ; DB ) );
Option = "Snapper" ; @Set( File ; @DbColumn( "TMS":"NoCache" ; "SNAP") ) ;
Option = "Form Snippet" ; @Command( [FileImport]; "Form Snippet";"") ;
Option = "Linkchecker" ; @Set( File ; @DbLookup( "TMS" :
"NoCache";"LINKCHK" ) ) ;
"" );

@If ( File != "Nothing" & Option = "Analyzer":"Linkchecker";
@Do(
@PostedCommand( [AddDatabase]; File );
@PostedCommand( [FileOpenDatabase]; File )
);
"" )