%
% run tree code vectors
%
% perform the descent to the target tree
%
|Via
%
% stack: child-tree-name
%
 pop
%%% *pshpvias
 true

|Back
 pop
 fork@)?
 {
 }
 {
 } ifelse
 false

|Select
 pop
%
% perform Click setting
%
 *taskcise
 {
%
% display node's sub-trees if at top level,
% selected node's jsx if at sub-tree level
%
  fork@)?
  {
%%%   *jsphviez
  }
  {
%
% display node's sub-trees if at top level,
% selected node's run tree if at sub-tree level
%
   *valsrept
   _report *entertre
   Help.!
  } ifelse
 } if
 "PostSel" vector()
 true

|Init
 pop

%
% load tree contents init is vectored when StdFree form notifies
% that Bpanel is loaded
%
 *norminiu
%
% set pshop related variables for current task tree
%
% Run tree groups, first time init
%
 "Themes.html" "helparea" "Themx"
 *helplopn
%
% make sure our help is above prior
%
 *helpabov
 @@

 true

|Run
 pop
 "#" _owner Str.Found
 <
 |0

 |1
 > not
 {
 } if

 true

|View
 pop
 @@
 true