%
% send the EntWel or Making response
%
_Xact
*xactsubj
"wlrgthsubj" log)(
{
%
% there is a subject, we can check for reg
% does the xact have registration data
%
% this xact of course has a subject, check if incoming registration
% the _reg for the subject is used by the incoming monitor
% to update the Tack
%
 *custjreg
 dup !Xact
 *xactqreg
"wlrgthreg" log)(
 {
%
% user is registered
%
% check for a customized mms to be sent
% thumbnails would be constructed before this point
%
  _Aamg.Wnotif
  {
   *custhnkq
   {
%
% thanks message of some type already sent
%
% go ahead and build the composites next
%
    dup !Xact
    "Subject" *shootern
   }
   {
%
% has image, true mms originally, tell user to wait
%
    "Please wait for your Photo Creations, takes a few minutes" !Customer.Message
    "ThWait" *custvirz
    dup !Xact

%
% go ahead and build the composites next
%
    "Subject" *shootern
    *custthnk
   } ifelse
  } if
  dup !Xact
 }
 {
%
% make sure the registration Via (Filling) document exists in Tack
% 
  _Aamg.ContrA
  {
%
% no matter how registration is next handled,
% we must still initiate the tack to public server
%
   *camezflr
  } if
  _Aamg.Rnotif
  {
%
% users are required to fully register before compositing
%
   "Please register here"
%%% "plsregurl" log)(
   !Customer.Message
%
% send the please register message to customer
%
   "ThReg" *custvirz
  }
  {
%
% users will automatically be registered keyed upon phone number
% enact a registration request through portal
%
   'yuser'
   &'&first=' _Shooter.Subject 3 left ^"From" asc2hex &
   &'&last=' _Shooter.Subject -3 left ^"Phone" asc2hex &
   &'&email=' _Arching.AttrEmail asc2hex &
   &'&xact=' &_Xact
   &'&tack=' &_Tack
   &'&sms=' &_Shooter.Sms
   &'&subject=' &_Shooter.Subject
   &'&userid='
dup logs
   "Public" *webportl
   dup !Xact
%
% send the auto registered message to customer
%
   "ThAuto" *custvirz

  } ifelse
  dup !Xact
%
% wait for the response from customer
%
  "Response" *shootern
 } ifelse
} if
!Xact