failat 9999999

rx "exit show('p','JAMMAIL')"
if ${RC} eq 1
 rx "Address 'JAMMAIL' 'Abort'"
 echo "Already running a copy of JAMMAIL aborted"
endif
rx "exit show('p','LOGPROC')"
if ${RC} eq 0
  run <NIL: >nil: logproc
  wait 2
  echo "Waiting for LogProc"
  rx "Address 'LOGPROC' 'OpenLog jammailfile f logs:jammail.log'"
  rx "Address 'LOGPROC' 'OpenLog jammailwind w RAW:0/21/716/190/JamMail Log Window/inactive/SCREENJamLogs'"
  rx "Address 'LOGPROC' 'AddLogGroup jammaillogs jammailwind jammailfile'"

  rx "Address 'LOGPROC' 'OpenLog jm-phonefile f logs:Phone.log'"
  rx "Address 'LOGPROC' 'AddLogGroup jammailphone jm-phonefile'"
else
  Echo "Logging system already active"
endif
if NOT EXISTS logs:Phone.log
  echo  >logs:Phone.log "   Date     Time   Duration      Number    Type      Address        Location"
  echo >>logs:Phone.log "--------- -------- -------- -------------- ---- ------------------- ---------"
endif
echo "Launching JAMMAIL"

newshell window=con:0/213/357/70/JamMail/inactive/SCREENJamLogs from s:setup.cli