INTERACTIVE AND BATCH modes

[David Stanley SICAS Center <stanledd@SNYONEVA.CC.ONEONTA.EDU>]

Hi...
   I'm working with an Alpha with VMS 6.1 with SQR 3.12...
   The problem I'm having is this:
        I would like to call the system to retrieve the F$MODE()
status to find if the env is "Ineractive or Batch". I've played
around with this a bit and seam to be getting puzzled. Has anyone
else worked thru this???

My code so far goes as follows:
  let $system_call = 'IF F$MODE() .NES. 'BATCH' THEN
MODE_TEST:="INTERACTIVE" '

  call system using $system_call #status

  let $mode = getenv('MODE_TEST')
..
..
..

 I've also tried  let $system_call = 'MODE_TEST:=F$MODE()'

  The main issue is that the SYMBOL MODE_TEST doesn't seam to be
getting assigned. I've debuged the code to see what's getting what
and everything appears to be fine.
    Thanx for any input in advance
David Stanley Lead Programmer
SICAS Center SUNY Oneonta
If you take a shovel and start digging, you will eventaully be standing in a hole.
stanledd@oneonta.edu
http://www.oneonta.edu/~stanledd/