[Info-vax] login information capture

[Gotfryd Smolik]

On Tue, 18 Feb 2014, Stephen Hoffman wrote:

> $ if f$mode() .eqs. "INTERACTIVE"
> $ then
> $   read/prompt="Why are you here? " sys$command reason

  Ensures occurrence of Murphy's laws.
  Paul goes on vacation, someone tries X-windows session :)
  Interactive session does not mean "terminal session" (not only).

  IMO the only safe resolution is a double IF: one checking for existence
of "TT:" *or* interactive mode, and second for DEVCLASS of TT:

$ if f$getdvi("TT:","EXISTS") then -	! or: $ if f$mode().eqs."INTERACTIVE")
     if f$getdvi("TT:","DEVCLASS").eq.66 then [...the action...]

  Preventing the question - in detached mode "TT" is not defined.
  Yes, checked sometime also by Murphy law ;>

best regards, Gotfryd