TCP/IP TELNET Management Programming Manual

Telnet Subsystem DDL
53474 Tandem Computers Incorporated B–3
* loc_port Local Port *
* forgn_port Foreign Port *
*---------------------------------------------------------------*
?SECTION zTNT-ddl-info-win
?TALBOUND 0
DEF zTNT-ddl-info-win.
02 zerase-char TYPE zspi-ddl-char.
02 zkill-char TYPE zspi-ddl-char.
02 zeof-char TYPE zspi-ddl-char.
02 zeol-char TYPE zspi-ddl-char.
02 zintrpt-char TYPE zspi-ddl-char.
02 zloc-addr TYPE zspi-ddl-int2.
02 zforgn-addr TYPE zspi-ddl-int2.
02 zloc-port TYPE zspi-ddl-int.
02 zforgn-port TYPE zspi-ddl-int.
02 zservname TYPE zspi-ddl-char50.
END.
*---------------------------------------------------------------*
* zbkup_cpu and zprim_cpu are the CPU numbers in which the *
* backup and primary TELNET servers are executing. *
* zbkup_pin and zprim_pin are the process identifications of *
* the back-up and primary TELNET processes. *
* ztimeout_val is the time in minutes after which they are *
* logged off. *
* if the value is 0, then they are never timed-out. *
* zprogname is the name of the file from which the *
* TELNET server is running. *
* zmax_term is the maximum number of pseudoterminals allowed *
* in the system. *
* zcurr_term is the current total number of terminals in the *
* system. *
*---------------------------------------------------------------*
?SECTION zTNT-ddl-alter-proc
?TALBOUND 0
DEF zTNT-ddl-alter-proc.
02 zterm-timeout TYPE zspi-ddl-int.
02 zmax-term TYPE zspi-ddl-int.
END.
?SECTION zTNT-ddl-info-proc
?TALBOUND 0
DEF zTNT-ddl-info-proc.
02 ztimeout-val TYPE zspi-ddl-int.
02 zcurr-term TYPE zspi-ddl-int.
02 zmax-term TYPE zspi-ddl-int.
02 zbkup-cpu TYPE zspi-ddl-int.
02 zbkup-pin TYPE zspi-ddl-int.
02 zprim-cpu TYPE zspi-ddl-int.
02 zprim-pin TYPE zspi-ddl-int.
02 zprogname TYPE zspi-ddl-fname32.
END.
*---------------------------------------------------------------*
* The status of pseudoterminal contains the following: *
* status If started or stopped (zcom_val_sumstate_xxx) *