HP TR3271 Programming Manual page 284

?PAGE "TR3271 STATUS command STRUCT for LINE object"
?SECTION ZTR3-DDL-STATUS-LINE
?SETSECTION ZTR3-DDL-STATUS-LINE
?TALBOUND 0
!
! ZTR3-DDL-STATUS-LINE :
!
! This DDL is returned to requester from TR3271 whenever a
! STATUS LINE command is processed.
!
DEF ZTR3-DDL-STATUS-LINE.
02 ZState
02 ZLdev
02 ZPpid.
04 Zcpu
04 Zpin
02 ZBpid.
04 Zcpu
04 Zpin
02 ZPath
02 ZCSM-Ldev
02 ZCU-Prim
02 ZCU-Bkup
02 ZDebug
02 ZTrace
02 ZTotal-SU
02 ZTotal-Su-Opened
02 zio-addr-prim
02 zio-addr-bkup
END.
TOKEN-MAP ZTR3-MAP-STATUS-LINE
TR3271 SUBSYSTEM DDL
TYPE ZSPI-DDL-Enum.
TYPE ZSPI-DDL-INT.
TYPE ZSPI-DDL-Int.
TYPE ZSPI-DDL-Int.
TYPE ZSPI-DDL-Int.
TYPE ZSPI-DDL-Int.
TYPE ZSPI-DDL-Enum.
TYPE ZSPI-DDL-Int.
TYPE ZSPI-DDL-Int.
TYPE ZSPI-DDL-Int.
TYPE ZSPI-DDL-Boolean.
TYPE ZSPI-DDL-Boolean.
TYPE ZSPI-DDL-Int.
TYPE ZSPI-DDL-Int.
TYPE ZSPI-DDL-EXIOADDR.
TYPE ZSPI-DDL-EXIOADDR.
VALUE IS ZTR3-TNM-STATUS-LINE
DEF IS ZTR3-DDL-STATUS-LINE.
VERSION "C20" FOR
ZState THRU
Zio-addr-bkup.
END.
B-9