%
% Technical Service application section intercepts,
% sub-trees of the Technical Service pep have these default intercepts
%
|Back
 pop
 *xlsrloay
 @@
 true

|Select
 pop
%
% perform Click setting
%
 @@

 dup !\ zero
 {
%
% no run or view of root node
%
 }
 {
  \_Type
  <

  > not
  {
%
% for other nodes, show the run controls
%
   _\ *taskcise
  } if
 } ifelse
 "PostSel" vector()
 true

|Init
 pop
 "tsrvqing" .!_Queing
%
% load tree contents if not activated already
%
 *norminiu
%
% set pshop related variables for current task tree
%
 *jspklocs
 _@ _JS.Root eq$
 {
%
% top level, first time init
%
  
  "CustServe.html"
  "archarea" "Tecsrv"
  *helplopn
  *helpabov

 }
 {
%
% init of sub-tree, float the new help tree on top of prior
%
  taskup
 } ifelse
 @@
 true