%
% send customer info back to shooter app
% from customer sms to shooter sms
%
%   <newnumber proc="AddNumber==ready">
%    <ssssssssss last="h(lllll" first="h(llll" email="h(eee" mode="normal" />
%   </newnumber>
%

_Cust.Last "last" attrx$
_Cust.Xfirst "first" attrx&
_Cust.Xemail "email" attrx&
"normal" "mode" attr&
_Cust.Phone yelattr/$

"AddNumber==ready"
"newnumber"
prelem$

%
% record and send the message to shooter
%
/*
dup "TM" &_Shooter.Phone &"_" _Sms.Filed js$ &
&".ptp" ofconn writeb
*/

"newnumber" empty *fcmpushs
"pushs" log)(
{
}
{
%
% stack: push-xml status proc
%
 3 popoff
} ifelse