%
% process the sim profile record
%
%%% "traksimr " log)(

!Sim.Data
"Sim" *trakdata pop

*trajfact

*trajinst

_Sim.Status "Active" eq$
_Sim.UniqueName length) 6 eq
and
{
 +Sim.Next ^"|" &" "
 "Sim.Next" sval
 "Sim.Sid" sval
 "Sim.UniqueName" sval
 catcr

 _Sim.UniqueName ^"|" &" "
 "Sim.Next" sval
 "Sim.Sid" sval
 "Sim.UniqueName" sval
 catcr
 &
 ^_trkbuld !trkbuld

} if