TR3271 SUBSYSTEM DDL
?PAGE "TR3271 INFO command STRUCT for SUBDEVICE object"
?SECTION ZTR3-DDL-INFO-SU
?SETSECTION ZTR3-DDL-INFO-SU
?TALBOUND 0
!
! ZTR3-DDL-INFO-SU :
!
! This DDL is returned to requester from TR3271, whenever an
! INFO SU command is processed.
!
DEF ZTR3-DDL-INFO-SU TYPE ZTR3-DDL-ADD-SU.
TOKEN-MAP ZTR3-MAP-INFO-SU VALUE IS ZTR3-TNM-INFO-SU
DEF IS ZTR3-DDL-INFO-SU.
VERSION "C20" FOR
ZAddr THRU ZType.
END.
?PAGE "TR3271 STATISTICS command STRUCT for SU object"
?SECTION ZTR3-DDL-STATS-SU
?SETSECTION ZTR3-DDL-STATS-SU
?TALBOUND 0
!
! ZTR3-DDL-STATS-SU :
!
! This DDL is returned to the requester from TR3271
! whenever a STATISTICS SU command is processed.
!
DEF ZTR3-DDL-STATS-SU.
02 Zreset-time TYPE ZSPI-DDL-TimeStamp.
02 Zsample-time TYPE ZSPI-DDL-TimeStamp.
02 Zerr TYPE ZSPI-DDL-Int.
02 Zmsg-sent TYPE ZSPI-DDL-Int.
02 Zmsg-recved TYPE ZSPI-DDL-Int.
END.
TOKEN-MAP ZTR3-MAP-STATS-SU VALUE IS ZTR3-TNM-STATS-SU
DEF IS ZTR3-DDL-STATS-SU.
VERSION "C20" FOR
Zreset-time THRU
Zmsg-recved.
END.
B-11