%
% check that Profile exists in xact
% use the data for Templating of any landing plates within xacts
%
_Xact
*xactsubj
"xsubj" log)(
{
%
% this xact of course has a subject, check if incoming registration
%
 *tacksubj
"xtack" log)(
 {
%
% already has tack
%
  *xactqreg
  {
%
% already registered
%
  }
  {
%
% check for incoming _reg
%
% the _reg for the subject is used by the incoming monitor
% to update the Tack
%
   *custjreg
  } ifelse
 }
 {
%
% no tack for subject, probably error
%
 } ifelse
}
{
%
% this xact does not belong to this subject
%
} ifelse
!Xact