GNS_GTN - Get terminal name

Description:

The physical device name of the terminal attached to the current process (or its parents) is returned. If there is no terminal available (for example in batch, network or detached processes) the name is set to blanks and the length set to zero.

If the name is longer than the supplied character variable the name is truncated but the length returned is the length of the actual name.

Invocation:

CALL GNS_GTN( NAME, LNAME, STATUS )

Arguments:

NAME = CHARACTER*(GNS__SZTER) (Returned)

The device name of the terminal attached to the process

LNAME = INTEGER (Returned)

The number of characters in the terminal name

STATUS = INTEGER (Given and Returned)

The global status