PARAMETER DIB$B_DEVCLASS = '00000004'X PARAMETER DIB$B_DEVTYPE = '00000005'X PARAMETER DIB$B_SECTORS = '00000008'X PARAMETER DIB$B_TRACKS = '00000009'X PARAMETER DIB$C_LENGTH = '00000074'X PARAMETER DIB$K_LENGTH = '00000074'X PARAMETER DIB$L_DEVCHAR = '00000000'X PARAMETER DIB$L_DEVDEPEND = '00000008'X PARAMETER DIB$L_MAXBLOCK = '00000070'X PARAMETER DIB$L_OPCNT = '0000001C'X PARAMETER DIB$L_OWNUIC = '00000014'X PARAMETER DIB$L_PID = '00000010'X PARAMETER DIB$T_DEVNAME = '00000024'X PARAMETER DIB$W_CYLINDERS = '0000000A'X PARAMETER DIB$W_DEVBUFSIZ = '00000006'X PARAMETER DIB$W_DEVNAMOFF = '0000000E'X PARAMETER DIB$W_ERRCNT = '0000001A'X PARAMETER DIB$W_RECSIZ = '00000022'X PARAMETER DIB$W_UNIT = '0000000C'X PARAMETER DIB$W_VOLNAMOFF = '00000020'X PARAMETER DIB$W_VPROT = '00000018'X