AM3270 Management Programming Manual

AM3270 SUBSYSTEM DDL
?PAGE "AM3270 INFO command STRUCT for SUBDEVICE object"
?SECTION ZAM3-DDL-INFO-SU
?SETSECTION ZAM3-DDL-INFO-SU
?TALBOUND 0
!
! ZAM3-DDL-INFO-SU :
!
! This DDL is returned to requester from AM3270 whenever an
! INFO SU command is processed.
!
DEF ZAM3-DDL-INFO-SU TYPE ZAM3-DDL-ADD-SU.
TOKEN-MAP ZAM3-MAP-INFO-SU VALUE IS ZAM3-TNM-INFO-SU
DEF IS ZAM3-DDL-INFO-SU.
VERSION "C20" FOR
ZAddr THRU ZType.
END.
?PAGE "AM3270 RESETSTATS command STRUCT for SU object"
?SECTION ZAM3-DDL-RSTATS-SU
?SETSECTION ZAM3-DDL-RSTATS-SU
?TALBOUND 0
!
! ZAM3-DDL-RSTATS-SU :
!
! This DDL is returned to requester from AM3270 whenever a
! RESETSTATS SU command is processed.
!
DEF ZAM3-DDL-RSTATS-SU.
02 ZTmStp TYPE ZSPI-DDL-TimeStamp.
02 ZTmStp-Last 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 ZAM3-MAP-RSTATS-SU VALUE IS ZAM3-TNM-RSTATS-SU
DEF IS ZAM3-DDL-RSTATS-SU.
VERSION "C20" FOR
ZTmStp THRU ZMsg-Recved.
END.
B-13