MACRO 00001000 FSCBD 00002000 FSCBD DSECT 00003000 FSCBCOMM DS CL8 FILE SYSTEM COMMAND (RDBUF,WRBUF,ETC) 00004000 FSCBFN DS CL8 FILENAME 00005000 FSCBFT DS CL8 FILETYPE 00006000 FSCBFM DS CL2 FILEMODE 00007000 FSCBITNO DS H RELATIVE RECORD NUMBER TO BE READ/WRITTEN 00008000 FSCBBUFF DS A ADDRESS OF R/W BUFFER OR OF STATEFST 00009000 FSCBSIZE DS F LENGTH OF BUFFER 00010000 FSCBFV DS CL2 RECFM - C'F' OR C'V' 00011000 FSCBFLG EQU FSCBFV+1 FLAG BYTE 00011100 FSCBNOIT DS H NUMBER OF RECORDS TO BE READ/WRITTEN 00012000 FSCBNORD DS A NUMBER OF BYTES ACTUALLY READ 00013000 MEND 00014000