TCP/IP TELNET Management Programming Manual

Telnet Subsystem DDL
53474 Tandem Computers Incorporated B–7
CONSTANT zTNT-tnm-file-num VALUE 7.
CONSTANT zTNT-tnm-size VALUE 8.
CONSTANT zTNT-tnm-text VALUE 9.
CONSTANT zTNT-tnm-term VALUE 10.
CONSTANT zTNT-tnm-info-proc VALUE 11.
CONSTANT zTNT-tnm-info-win VALUE 12.
CONSTANT zTNT-tnm-stats-telnet VALUE 13.
CONSTANT zTNT-tnm-stats-win VALUE 14.
CONSTANT zTNT-tnm-status-win VALUE 15.
CONSTANT zTNT-tnm-opens-telnet VALUE 16.
DEF zTNT-val-ssid TACL ssid.
02 z-filler TYPE CHARACTER 8
VALUE zspi-val-tandem.
02 z-owner REDEFINES z-filler TYPE zspi-ddl-char8.
02 z-number TYPE zspi-ddl-int
VALUE zspi-ssn-zTNT.
02 z-version TYPE zspi-ddl-uint
VALUE zTNT-val-version.
END.
TOKEN-TYPE zTNT-typ-sev
VALUE zspi-TDT-enum DEF zspi-ddl-enum.
TOKEN-TYPE zTNT-typ-cause
VALUE zspi-TDT-enum DEF zspi-ddl-enum.
TOKEN-TYPE zTNT-typ-trace
VALUE zspi-TDT-enum DEF zspi-ddl-enum.
TOKEN-TYPE zTNT-typ-win-trace
VALUE zspi-TDT-enum DEF zspi-ddl-enum.
*---------------------------------------------------------------*
* Request Tokens *
* *
*---------------------------------------------------------------*
TOKEN-MAP zTNT-map-alter-proc
VALUE zTNT-tnm-alter-proc
DEF zTNT-ddl-alter-proc.
VERSION "C00" FOR zterm-timeout THROUGH zmax-term.
END.
TOKEN-MAP zTNT-map-add-win
VALUE zTNT-tnm-add-win
DEF zTNT-ddl-add-win.
VERSION "C00" FOR zerase-char THROUGH zservname.
END.
TOKEN-MAP zTNT-map-alter-win
VALUE zTNT-tnm-alter-win
DEF zTNT-ddl-alter-win.
VERSION "C00" FOR zerase-char THROUGH zintrpt-char.
END.
*---------------------------------------------------------------*
* Reply Tokens *
* *
* curr_time and reset_time are returned by the stats and *
* resetstats commands as timestamps. *
*---------------------------------------------------------------*