Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!seismo!husc6!think!ames!sdcsvax!ucbvax!UKANVAX.BITNET!SLOANE
From: SLOANE@UKANVAX.BITNET (Bob Sloane)
Newsgroups: comp.os.vms
Subject: Re: Physical terminal from DCL
Message-ID: <8706180045.AA04759@ucbvax.Berkeley.EDU>
Date: Mon, 15-Jun-87 11:25:00 EDT
Article-I.D.: ucbvax.8706180045.AA04759
Posted: Mon Jun 15 11:25:00 1987
Date-Received: Sun, 21-Jun-87 11:41:37 EDT
Sender: daemon@ucbvax.BERKELEY.EDU
Distribution: world
Organization: The ARPA Internet
Lines: 17

Tom O'Toole asks:

>Does anyone know of a way to obtain the physical terminal name of an
>interactive process from DCL? ...

The following .COM file should print out the physical terminal name
even if you are using virtual terminals.

$ tt = f$getjpi("","TERMINAL")
$ tt = f$getdvi(tt,"TT_PHYDEVNAM")
$ write sys$output tt

                      Bob Sloane
                      University of Kansas
                      Computer Center
                      (913) 864-4291
                      SLOANE@UKANVAX on BITNET