%
% scan for associate connect entries from phosend website
%
"custjmon" log#
_Shooter.Subject email_ pop
%
% scan for Register incoming web transactions in Vias
%
empty ofvias
empty
{
 "Register_" textwild nextfile ?
%
% use the data for Templating of any landing plates within xacts
%
 *custiscu
 {
%
% valid incoming registration transaction
% set the most recent Register data in Subject
% and in the xact as Profile
%
  "reg" *custrgsn
 } if
 finaled
} loop
filing)
%
% scan for Landing incoming web transactions in Vias
%
empty ofvias
empty
{
 "Landing_" textwild nextfile ?
 empty !Cust.Stamp
 execing
 _Cust.Stamp any)?
 {
%
% set the most recent Landing data in Subject
%
  "land" *custrgsn
 } if
 finaled
} loop
filing)
%
% scan for Share incoming web transactions in Vias
%
0 !counter
empty ofvias
empty
{
 "Share_" textwild nextfile ?
"viashare" log)(
%%% false !Fup.PhoSend
 empty !Cust.Stamp
 execing
 _Cust.Stamp any)?
"dvp" log)(
 {
%
% send an Invite about photo creation sent to them
%
  *xactmmse
 } if
"end invite/share " &_wilder log)(
 finaled
 +counter 4 gt ?
} loop
filing)
%
% make a decision about actions needed
%
% does the template need building for the landing page
% a message is sent back to the customer afterwards
%