%
% this xact already has a subject, check if incoming registration
% the _reg for the subject is used by the incoming monitor
% to update any xact with that subject assigned
%
_Xact
*custireg
"jreg" log)(
{
 "Profile.txt" oftack exists not
 second !Xact
 {
%
% this subject and xact are just now properly registered
%
  _Shooter.Subject &"_reg" dup text*subj
%
% put the profile information into the Tack for this subject
%
  text_subj "Profile" text!tack
  dup !Xact

 } if
}
{
%
% no reg file in subject dir
%


} ifelse
!Xact