%
% events here are generated by the Xomm subform
%
@Xomm

*panlevnt

%
% perform the response to the event
%
<
%
% issued by Xomm form to indicate ready for PS ops
%
|Start
%%% *pshpconn(
 5538 !tick
 
|Ready
_Pshop.Ready logs
_Arching.Vm { "phodesk" } { "phosend" } ifelse
%%% "phodesk"
 @^PSon

%
% executable instructions sent by communicators
%
|Data
 _Pshop.Data unescape
"pshdat" log)(
 "Operational" found?
 {
  5542 !tick
 } if
 !Ent.ExitData
 *panldata

|Msg
 _Ent.ExitData entdec execstr

|Xml
%
% seed the original xml string ahead of the exec for xml*(
%
 


> pop