Writing a SCOadmin manager

Main window label and title

The main window label appears in the window frame and contains the name of the manager and the host name, for example:

   Account Manager on colossus

Here is the code used in the template:

   set mainlabel [VtLabel $vtMain.mainlabel \
       -label "$appvals(title) [IntlMsg ON] $appvals(managedhost)"]
   VxSetVar $appvals(vtMain) mainlabel $mainlabel
   
   # TODO: build main screen widgets here.
   # Basic drawnlist is provided as a sample
   # Pass main form and widget just above for attachments
   if {$appvals(who)} {
   	set mainList [UiBuildMainList $vtMain $mainlabel]
   }

In addition the main window label, the screen has a title displayed above the main list indicating the host being managed:

   if {$appvals(openhost)} {
   	set title \
   "$appvals(title) [IntlMsg ON] [SaHostExtractSystemName $appvals(managedhost)]"
   } else {
   	set title "$appvals(title)"
   }