MACRO 00010000 @CSW 00020000 @CSW_CD EQU X'80' * CHAIN DATA 00030000 @CSW_CC EQU X'40' * COMMAND CHAIN 00040000 @CSW_SLI EQU X'20' * SUPPRESS LENGTH INDICATION 00050000 @CSW_SKP EQU X'10' * SKIP 00060000 @CSW_PCI EQU X'08' * PROGRAM CONTROLLED INTERRUPT 00070000 @CSW_IDA EQU X'04' * INDIRECT ADDRESS 00080000 * 00090000 * 00100000 @CSW DSECT , 00110000 @CSWCMD DS X - COMMAND CODE 00120000 @CSWDATA DS AL3 - DATA ADDRESS 00130000 @CSWFLAG DS X - FLAGS 00140000 DS X - RESERVED (ZERO) 00150000 @CSWLEN DS AL2 N - LENGTH 00160000 * 00170000 MEND , 00180000