%
% request user register
%
_Xact
%
% combine all info for next step decision, monitor incoming areas
%
*custimon
*xactsubj
"wlrgthsubj" log)(
{
}
{
 dup !Xact
%
% no subject yet, detect if MMS type of message,
% if the subject is known, insert into the xact
%
 _Camera.Original "_MMS_" found?
 {
%
% implant the MMS subject
%
  dup term3
  dup !Shooter.Subject
"mmrdysubj" log)(
  !Subject
  *xactosub
  second !Xact

 } if
 pop

} ifelse
dup !Xact
%
% check for a subject, if none, see if we can assign a subject
% for this xact
%
%%%  *xactsess
*xactsubj
{
 true !Arching.AutoReg
 _Arching.AutoReg
 {
%
% register the incoming user with temporary data
%
  *autoregs
 }
 {
%
% users are required to fully register before compositing
%
 "Please register here"
%%% "plsregurl" log)(
 !Customer.Message
%
% send the please register message to customer
%
 "R1" !Customer.Mailer
 "ThReg" *custvirz
 } ifelse
 dup !Xact
%
% wait for the response from customer
%
} if
dup !Xact
*xactmmtx
_Shooter.Tem
_Sms.Verf "MMS" eq$ *glotempz
pop pop2nd
"dropper" log)(
<
|Obj  "Dropout" *shootern
> not
{
 "Ready" *shootern
} if

!Xact