%
% Customer Service application section intercepts,
% sub-trees of the Customer Service pep have these default intercepts
%
|Select
 pop
%
% perform Click setting
%
 @@

 dup !\ zero
 {
 }
 {
  \_Type
  <
  |Subject
%
% update the sawing Rcust fields
%
   \_Subject !Subject
   *custsawu

  |Xact
   \_Xact !Xact
   *xactninf
   empty !Subject
   empty !Last
   empty !First
   empty !Email

   *xactsubj
   {
    _Shooter.Subject !Subject
%
% get the customer info from the public accessible portal
%
    "user" &"&subject=" &_Shooter.Subject
    *webhpulo
    *webtelln
    *tellresy
   } if
   _Shooter.Number !Shooter
   _Shooter.Venue !Venue
%
% set edit fields in Help
%
   *custsawu

  > pop
 } ifelse
 "PostSel" vector()
 true

|Init
 pop
 "aamgqing" .!_Queing
%
% load tree contents if not activated already
%
 *norminiu
%
% set pshop related variables for current task tree
%
 fork@)?
 {
%
% viewing based on sub-tree
%
%
% init of sub-tree, float the new help tree on top of prior
%
  taskup
 }
 {
%
% viewing based on master tree
%
% top level, first time init
%
% clear the nodes below root from last tree usage
%
%%%  *unrootch

/*
%
% eliminate the stake of the cloud message listener
%
  *cloudoff
%
% wait for the message listeners to fully load
%
  *cloudjsg(

*/
"BackPro.html?color=darkgreen&msg="
"Xact BackOps" asc2hex &
"neararea" "Customr"
*helplopn
%%% *helpabov

 } ifelse

 @@
 true

|PostSel
 pop
 @@
 true