%
% acceptance vectors for Fire code
%
page@sel
<

|Rcust
%
% note that the case for the first tab is derived from the tab # in E4
% to derive startup, use a separate lookup for prior tab 'name' in E5
%
 wireop(
">Rcust " log)(
 < 
 |Initial
  "Customer" *helpface
%
% initialize customer service operations
%
  *custinit

 |Rcust
  wired(
"Cust" log)(
"," 0 11 1 parse
hex2asc zeronull !Xact
hex2asc !Venue
hex2asc !Shooter
hex2asc !Barcode
hex2asc !EndTime
hex2asc !StartTime
hex2asc !Email
hex2asc !First
hex2asc !Last
hex2asc !Subject
hex2asc !Op
/*
naver
Subject
Last
First
Email
Stime
Etime
Barcode
Shooter
Venue
Xact
*/
  _Op
"op" log)(
  <
  |LowNav1
%
% exit Rcust operations
%
   *custsave
   *custends

  |LowNav2
%
% previous subject
%
   *custsave

  |LowNav3
%
% next subject
%
   *custsave

  |LowNav4
%
% insert a new subject at the selected area in the tree
%
   *custsave

  |Sidebar1 % search
%
% show the gallery for the Xact listed
%
   *custsave
   *xactsubj
   {
%
% show the this xact's entire subject gallery
%
    *custsawv
   } if

  |Sidebar2 % editing
   *custsave
%
% go to image editing interactive assistant
%
   nonroot
   {
    _Xact positive
    {
     _Xact !Customer.Xact
     "Minimize" *sawinger
     *phocedtr
     true !Aamg.Inhib
    } if
   } if

  |Sidebar3 % ecomm
%
% summarize ecomm reporting by venue, shooter, subjects
%
   *custsave

  |Sidebar4 % print
%
% direct images to printed output
%
   *custsave

%
% back to Rcust
%
   *sawingna

  |Sidebar5 % Services
%
% control of access and additional services
%
   *custsave

  |Sidebar6 % buy now
%
% open or move back to TacZh, virtual cash register
%
   *custsave
   "/Tell?command=show&hotel=true"
   *sawingnb

  |FindEmail
   *custsave
%
% portal iframe is loaded with search of email
%

  |Select
   *custsave
%
% an entry was selected in the reduced member list
% filter the tree selection for all xacts of subject
%
   "All" _Subject *custrtre

  |FindPhone
%
% portal iframe is loaded with search of phone number
%
   *custsave

  |FindBarcode
%
% filter the tree selection for all xacts of barcode
%
   *custsave

  |FindShooter
%
% filter the tree selection for all xacts of shooter
%
   *custsave
   "Shooter" empty *custrtre

  |FindVenue
%
% filter the tree selection for all xacts of venue
%
   *custsave
   "Venue" empty *custrtre

  |FindFirst
%
% portal iframe is loaded with search of first name
%
   *custsave

  |FindLast
%
% portal iframe is loaded with search of last name
%
   *custsave

  |FindTime
%
% set the time filter to Stime back for Etime past that time
% format is D:H:M, zero or blank end time is to current time
%
   *custsave
   _Stime *timedecd !Time.Begin
   _Etime *timedecd !Time.End

  |FindXact
%
% filter the tree selection to the subject of this xact
% select the xact that matches the last N digits
%
   *custsave

  |LoadInfo
%
% reload info previously saved, restores any edited field
%
   "Saved_Rcust" text*snap
   *custsawu
   *custsave

  |SaveInfo
%
% save first and last name, email to the subject selected
% must be on a subject entry of tree
%
   *custsave
  > pop

 > pop

>

*acceptun

%
% stack: found
%