/*+                     

TITLE:	       	TERM_REC

FACILITY:   	WATCHER (and WATCHER_CONFIG)

ABSTRACT:   	A description of terminal(s) to be watched.

AUTHOR:	    	M. Madison
    	    	Copyright (c) 1988, M. Madison; all rights reserved.

-*/
    DECLARE 1 TERM_REC BASED,
    	    	2 NEXT POINTER,
    	    	2 TERMINAL CHARACTER (64) VARYING,
    	    	2 FLAGS,
    	    	    3 WATCH_CPU BIT (1),
    	    	    3 WATCH_TIO BIT (1),
    	    	    3 WATCH_PIO BIT (1),
    	    	    3 WARN BIT (1),
    	    	    3 LOGOUT BIT (1),
    	    	2 WARN_TIME VMS_DATE_TIME,
    	    	2 LOGOUT_TIME VMS_DATE_TIME;

/*+
    A note about the TERMINAL field.  The TERMINAL field is used 
    for comparison purposes and describes a terminal in one of two forms.

    For LAT (terminal server) terminals:    server::port
    For non-LAT terminals:  	    	    node$device <or> device

    "server" and "port" are the terminal server name and port name.
    "node" is the node name as obtained by $GETSYI (item SYI$_NODENAME).
    If that is not set, just the device name is used.  In either form, the
    device name is used without leading underscore and trailing colon.
-*/