%
% process the tracker profile record
%
dup !passon
execstr
_Sim.Track
<
%
% get the specific camera database record of user id
%
|Status
 _UserId _UserGuid eq$
 {
%
% this is a camera of the user we are seeking
%
  "|" &_TrackName &" " _RowID quo&cr
  "|" &_RowID &" " _TrackName quo&cr
  &
  ^:bulder
 } if

|Photographer
 _IMEI length 10 eq
 {
%
% this is a photographer we are seeking
%
  _UserGuid !UserId
  _UserId any)?
"userid" log)(
  {
%
% this is the user id connected to the phone number
% for a photographer entity
%
   empty
   "UserId" sval
   "IMEI" sval
   "TrackName" sval
   "DeviceName" sval
   "DeviceMode" sval
   "TrackMode" sval
   "RowID" sval
   "HardwareVersion" sval
   dup
   "Ident_" &_IMEI text ofphog write
   dup
   "Photog/Ident_" &_IMEI "Public" *tellpush
   dup
   "Numbers/Primary_" &_TrackName "Public" *tellpush
   "Primary_" &_TrackName text ofnumb write
  } if
 } if

|Phone
 _Shooter.Phone _TrackName eq$
 {
%
% this is the user we are seeking
%
  _UserGuid !UserId

 } if

|Sms
 _UserId _UserGuid eq$
%%%"smsr" log)(
 {
%
% this is the user we are seeking
%
  _UserGuid !UserId
  _TrackName !UserSms

 } if

> pop