AM3270 Management Programming Manual

AM3270 SUBSYSTEM DDL
?PAGE "AM3270 STRUCT definitions for PROCESS object"
!--------------------------------------------------------------!
!
! ! STRUCTs definition for PROCESS object.
! !
!
!--------------------------------------------------------------
! ?PAGE "AM3270 ALTER command STRUCT for LINE object"
!-------------------------------------------------------------!
!
! ! STRUCTs/MAP definition for LINE object.
! !
!
!--------------------------------------------------------------!
?SECTION ZAM3-DDL-ALTER-LINE
?SETSECTION ZAM3-DDL-ALTER-LINE
?TALBOUND 0
!
! ZAM3-DDL-ALTER-LINE :
!
! This DDL is sent to AM3270 whenever a ALTER LINE command
! requested.
!
DEF ZAM3-DDL-ALTER-LINE.
02 ZAutoload TYPE ZSPI-DDL-Boolean.
02 ZBCCType TYPE ZSPI-DDL-Enum SPI-NULL 255.
02 ZCharset TYPE ZSPI-DDL-Enum SPI-NULL 255.
02 ZConf-Write TYPE ZSPI-DDL-Boolean.
02 ZConsl-msg TYPE ZSPI-DDL-Boolean.
02 ZCtl-RTS TYPE ZSPI-DDL-Boolean.
02 ZCtl-set TYPE ZSPI-DDL-Enum SPI-NULL 255.
02 ZDebug TYPE ZSPI-DDL-Boolean.
02 ZDrop-RTS TYPE ZSPI-DDL-Boolean.
02 ZEot-If-No-Read TYPE ZSPI-DDL-Boolean.
02 ZNo-GP-After-Wack TYPE ZSPI-DDL-Boolean.
02 ZPace TYPE ZSPI-DDL-Int SPI-NULL 255.
02 ZPolltype TYPE ZSPI-DDL-Enum SPI-NULL 255.
02 ZProg TYPE ZSPI-DDL-FName.
02 ZRetry TYPE ZSPI-DDL-Int SPI-NULL 255.
02 ZSyncs TYPE ZSPI-DDL-Int SPI-NULL 255.
02 ZTest-Intvl TYPE ZSPI-DDL-TimeStamp.
02 ZThres TYPE ZSPI-DDL-Int SPI-NULL 255.
02 ZTimeout TYPE ZSPI-DDL-TimeStamp.
02 ZXlate TYPE ZSPI-DDL-Boolean.
02 ZXlate-in TYPE ZSPI-DDL-Char OCCURS 256 TIMES.
02 ZXlate-out TYPE ZSPI-DDL-Char OCCURS 256 TIMES.
END.
TOKEN-MAP ZAM3-MAP-ALTER-LINE VALUE IS ZAM3-TNM-ALTER-LINE
DEF IS ZAM3-DDL-ALTER-LINE.
VERSION "C20" FOR
ZAutoload THRU ZXlate-out.
END.
B-7