INTEGER*4 AT$_DR INTEGER*4 AT$_MBA INTEGER*4 AT$_MPM INTEGER*4 AT$_NULL INTEGER*4 AT$_UBA INTEGER*4 DC$_CARD INTEGER*4 DC$_DISK INTEGER*4 DC$_LP INTEGER*4 DC$_MAILBOX INTEGER*4 DC$_REALTIME INTEGER*4 DC$_SCOM INTEGER*4 DC$_TAPE INTEGER*4 DC$_TERM INTEGER*4 DEV$M_ALL INTEGER*4 DEV$M_AVL INTEGER*4 DEV$M_CCL INTEGER*4 DEV$M_DIR INTEGER*4 DEV$M_DMT INTEGER*4 DEV$M_ELG INTEGER*4 DEV$M_FOD INTEGER*4 DEV$M_FOR INTEGER*4 DEV$M_GEN INTEGER*4 DEV$M_IDV INTEGER*4 DEV$M_MBX INTEGER*4 DEV$M_MNT INTEGER*4 DEV$M_NET INTEGER*4 DEV$M_ODV INTEGER*4 DEV$M_RCK INTEGER*4 DEV$M_REC INTEGER*4 DEV$M_RND INTEGER*4 DEV$M_RTM INTEGER*4 DEV$M_SDI INTEGER*4 DEV$M_SHR INTEGER*4 DEV$M_SPL INTEGER*4 DEV$M_SQD INTEGER*4 DEV$M_SWL INTEGER*4 DEV$M_TRM INTEGER*4 DEV$M_WCK INTEGER*4 DEV$V_ALL INTEGER*4 DEV$V_AVL INTEGER*4 DEV$V_CCL INTEGER*4 DEV$V_DIR INTEGER*4 DEV$V_DMT INTEGER*4 DEV$V_ELG INTEGER*4 DEV$V_FOD INTEGER*4 DEV$V_FOR INTEGER*4 DEV$V_GEN INTEGER*4 DEV$V_IDV INTEGER*4 DEV$V_MBX INTEGER*4 DEV$V_MNT INTEGER*4 DEV$V_NET INTEGER*4 DEV$V_ODV INTEGER*4 DEV$V_RCK INTEGER*4 DEV$V_REC INTEGER*4 DEV$V_RND INTEGER*4 DEV$V_RTM INTEGER*4 DEV$V_SDI INTEGER*4 DEV$V_SHR INTEGER*4 DEV$V_SPL INTEGER*4 DEV$V_SQD INTEGER*4 DEV$V_SWL INTEGER*4 DEV$V_TRM INTEGER*4 DEV$V_WCK INTEGER*4 DIB$B_DEVCLASS INTEGER*4 DIB$B_DEVTYPE INTEGER*4 DIB$B_SECTORS INTEGER*4 DIB$B_TRACKS INTEGER*4 DIB$C_LENGTH INTEGER*4 DIB$K_LENGTH INTEGER*4 DIB$L_DEVCHAR INTEGER*4 DIB$L_DEVDEPEND INTEGER*4 DIB$L_MAXBLOCK INTEGER*4 DIB$L_OPCNT INTEGER*4 DIB$L_OWNUIC INTEGER*4 DIB$L_PID INTEGER*4 DIB$T_DEVNAME INTEGER*4 DIB$W_CYLINDERS INTEGER*4 DIB$W_DEVBUFSIZ INTEGER*4 DIB$W_DEVNAMOFF INTEGER*4 DIB$W_ERRCNT INTEGER*4 DIB$W_RECSIZ INTEGER*4 DIB$W_UNIT INTEGER*4 DIB$W_VOLNAMOFF INTEGER*4 DIB$W_VPROT INTEGER*4 DT$_CR11 INTEGER*4 DT$_DR11W INTEGER*4 DT$_DR750 INTEGER*4 DT$_DR780 INTEGER*4 DT$_FT1 INTEGER*4 DT$_FT2 INTEGER*4 DT$_FT3 INTEGER*4 DT$_FT4 INTEGER*4 DT$_FT5 INTEGER*4 DT$_FT6 INTEGER*4 DT$_FT7 INTEGER*4 DT$_FT8 INTEGER*4 DT$_LA11 INTEGER*4 DT$_LA120 INTEGER*4 DT$_LA180 INTEGER*4 DT$_LA36 INTEGER*4 DT$_LAX INTEGER*4 DT$_LP11 INTEGER*4 DT$_LPA11 INTEGER*4 DT$_MBX INTEGER*4 DT$_RK06 INTEGER*4 DT$_RK07 INTEGER*4 DT$_RL01 INTEGER*4 DT$_RL02 INTEGER*4 DT$_RM03 INTEGER*4 DT$_RM05 INTEGER*4 DT$_RM80 INTEGER*4 DT$_RP04 INTEGER*4 DT$_RP05 INTEGER*4 DT$_RP06 INTEGER*4 DT$_RP07 INTEGER*4 DT$_RP07HT INTEGER*4 DT$_RX01 INTEGER*4 DT$_RX02 INTEGER*4 DT$_RX03 INTEGER*4 DT$_TE16 INTEGER*4 DT$_TS11 INTEGER*4 DT$_TTYUNKN INTEGER*4 DT$_TU45 INTEGER*4 DT$_TU58 INTEGER*4 DT$_TU77 INTEGER*4 DT$_TU78 INTEGER*4 DT$_VT05 INTEGER*4 DT$_VT100 INTEGER*4 DT$_VT52 INTEGER*4 DT$_VT55 INTEGER*4 DT$_VT5X INTEGER*4 DT$_XM_ALMA INTEGER*4 DT$_XM_ALMD INTEGER*4 DT$_XM_ARDA INTEGER*4 DT$_XM_ARFA INTEGER*4 TT$C_BAUD_110 INTEGER*4 TT$C_BAUD_1200 INTEGER*4 TT$C_BAUD_134 INTEGER*4 TT$C_BAUD_150 INTEGER*4 TT$C_BAUD_1800 INTEGER*4 TT$C_BAUD_2000 INTEGER*4 TT$C_BAUD_2400 INTEGER*4 TT$C_BAUD_300 INTEGER*4 TT$C_BAUD_3600 INTEGER*4 TT$C_BAUD_4800 INTEGER*4 TT$C_BAUD_50 INTEGER*4 TT$C_BAUD_600 INTEGER*4 TT$C_BAUD_7200 INTEGER*4 TT$C_BAUD_75 INTEGER*4 TT$C_BAUD_9600 INTEGER*4 TT$M_ALTRPAR INTEGER*4 TT$M_CRFILL INTEGER*4 TT$M_EIGHTBIT INTEGER*4 TT$M_ESCAPE INTEGER*4 TT$M_HALFDUP INTEGER*4 TT$M_HOLDSCREEN INTEGER*4 TT$M_HOSTSYNC INTEGER*4 TT$M_LFFILL INTEGER*4 TT$M_LOWER INTEGER*4 TT$M_MBXDSABL INTEGER*4 TT$M_MECHFORM INTEGER*4 TT$M_MECHTAB INTEGER*4 TT$M_NOBRDCST INTEGER*4 TT$M_NOECHO INTEGER*4 TT$M_NOTYPEAHD INTEGER*4 TT$M_ODD INTEGER*4 TT$M_PAGE INTEGER*4 TT$M_PARITY INTEGER*4 TT$M_PASSALL INTEGER*4 TT$M_READSYNC INTEGER*4 TT$M_REMOTE INTEGER*4 TT$M_SCOPE INTEGER*4 TT$M_SCRIPT INTEGER*4 TT$M_TTSYNC INTEGER*4 TT$M_WRAP INTEGER*4 TT$S_PAGE INTEGER*4 TT$V_ALTRPAR INTEGER*4 TT$V_CRFILL INTEGER*4 TT$V_EIGHTBIT INTEGER*4 TT$V_ESCAPE INTEGER*4 TT$V_HALFDUP INTEGER*4 TT$V_HOLDSCREEN INTEGER*4 TT$V_HOSTSYNC INTEGER*4 TT$V_LFFILL INTEGER*4 TT$V_LOWER INTEGER*4 TT$V_MBXDSABL INTEGER*4 TT$V_MECHFORM INTEGER*4 TT$V_MECHTAB INTEGER*4 TT$V_NOBRDCST INTEGER*4 TT$V_NOECHO INTEGER*4 TT$V_NOTYPEAHD INTEGER*4 TT$V_ODD INTEGER*4 TT$V_PAGE INTEGER*4 TT$V_PARITY INTEGER*4 TT$V_PASSALL INTEGER*4 TT$V_READSYNC INTEGER*4 TT$V_REMOTE INTEGER*4 TT$V_SCOPE INTEGER*4 TT$V_SCRIPT INTEGER*4 TT$V_TTSYNC INTEGER*4 TT$V_WRAP INTEGER*4 TT$_FT1 INTEGER*4 TT$_FT2 INTEGER*4 TT$_FT3 INTEGER*4 TT$_FT4 INTEGER*4 TT$_FT5 INTEGER*4 TT$_FT6 INTEGER*4 TT$_FT7 INTEGER*4 TT$_FT8 INTEGER*4 TT$_LA120 INTEGER*4 TT$_LA36 INTEGER*4 TT$_LAX INTEGER*4 TT$_UNKNOWN INTEGER*4 TT$_VT05 INTEGER*4 TT$_VT100 INTEGER*4 TT$_VT52 INTEGER*4 TT$_VT55 INTEGER*4 TT$_VT5X PARAMETER (AT$_DR = '00000002'X) PARAMETER (AT$_MBA = '00000000'X) PARAMETER (AT$_MPM = '00000003'X) PARAMETER (AT$_NULL = '00000004'X) PARAMETER (AT$_UBA = '00000001'X) PARAMETER (DC$_CARD = '00000041'X) PARAMETER (DC$_DISK = '00000001'X) PARAMETER (DC$_LP = '00000043'X) PARAMETER (DC$_MAILBOX = '000000A0'X) PARAMETER (DC$_REALTIME = '00000060'X) PARAMETER (DC$_SCOM = '00000020'X) PARAMETER (DC$_TAPE = '00000002'X) PARAMETER (DC$_TERM = '00000042'X) PARAMETER (DEV$M_ALL = '00800000'X) PARAMETER (DEV$M_AVL = '00040000'X) PARAMETER (DEV$M_CCL = '00000002'X) PARAMETER (DEV$M_DIR = '00000008'X) PARAMETER (DEV$M_DMT = '00200000'X) PARAMETER (DEV$M_ELG = '00400000'X) PARAMETER (DEV$M_FOD = '00004000'X) PARAMETER (DEV$M_FOR = '01000000'X) PARAMETER (DEV$M_GEN = '00020000'X) PARAMETER (DEV$M_IDV = '04000000'X) PARAMETER (DEV$M_MBX = '00100000'X) PARAMETER (DEV$M_MNT = '00080000'X) PARAMETER (DEV$M_NET = '00002000'X) PARAMETER (DEV$M_ODV = '08000000'X) PARAMETER (DEV$M_RCK = '40000000'X) PARAMETER (DEV$M_REC = '00000001'X) PARAMETER (DEV$M_RND = '10000000'X) PARAMETER (DEV$M_RTM = '20000000'X) PARAMETER (DEV$M_SDI = '00000010'X) PARAMETER (DEV$M_SHR = '00010000'X) PARAMETER (DEV$M_SPL = '00000040'X) PARAMETER (DEV$M_SQD = '00000020'X) PARAMETER (DEV$M_SWL = '02000000'X) PARAMETER (DEV$M_TRM = '00000004'X) PARAMETER (DEV$M_WCK = '80000000'X) PARAMETER (DEV$V_ALL = '00000017'X) PARAMETER (DEV$V_AVL = '00000012'X) PARAMETER (DEV$V_CCL = '00000001'X) PARAMETER (DEV$V_DIR = '00000003'X) PARAMETER (DEV$V_DMT = '00000015'X) PARAMETER (DEV$V_ELG = '00000016'X) PARAMETER (DEV$V_FOD = '0000000E'X) PARAMETER (DEV$V_FOR = '00000018'X) PARAMETER (DEV$V_GEN = '00000011'X) PARAMETER (DEV$V_IDV = '0000001A'X) PARAMETER (DEV$V_MBX = '00000014'X) PARAMETER (DEV$V_MNT = '00000013'X) PARAMETER (DEV$V_NET = '0000000D'X) PARAMETER (DEV$V_ODV = '0000001B'X) PARAMETER (DEV$V_RCK = '0000001E'X) PARAMETER (DEV$V_REC = '00000000'X) PARAMETER (DEV$V_RND = '0000001C'X) PARAMETER (DEV$V_RTM = '0000001D'X) PARAMETER (DEV$V_SDI = '00000004'X) PARAMETER (DEV$V_SHR = '00000010'X) PARAMETER (DEV$V_SPL = '00000006'X) PARAMETER (DEV$V_SQD = '00000005'X) PARAMETER (DEV$V_SWL = '00000019'X) PARAMETER (DEV$V_TRM = '00000002'X) PARAMETER (DEV$V_WCK = '0000001F'X) 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) PARAMETER (DT$_CR11 = '00000001'X) PARAMETER (DT$_DR11W = '00000004'X) PARAMETER (DT$_DR750 = '00000003'X) PARAMETER (DT$_DR780 = '00000002'X) PARAMETER (DT$_FT1 = '00000010'X) PARAMETER (DT$_FT2 = '00000011'X) PARAMETER (DT$_FT3 = '00000012'X) PARAMETER (DT$_FT4 = '00000013'X) PARAMETER (DT$_FT5 = '00000014'X) PARAMETER (DT$_FT6 = '00000015'X) PARAMETER (DT$_FT7 = '00000016'X) PARAMETER (DT$_FT8 = '00000017'X) PARAMETER (DT$_LA11 = '00000002'X) PARAMETER (DT$_LA120 = '00000021'X) PARAMETER (DT$_LA180 = '00000003'X) PARAMETER (DT$_LA36 = '00000020'X) PARAMETER (DT$_LAX = '00000020'X) PARAMETER (DT$_LP11 = '00000001'X) PARAMETER (DT$_LPA11 = '00000001'X) PARAMETER (DT$_MBX = '00000001'X) PARAMETER (DT$_RK06 = '00000001'X) PARAMETER (DT$_RK07 = '00000002'X) PARAMETER (DT$_RL01 = '00000009'X) PARAMETER (DT$_RL02 = '0000000A'X) PARAMETER (DT$_RM03 = '00000006'X) PARAMETER (DT$_RM05 = '0000000F'X) PARAMETER (DT$_RM80 = '0000000D'X) PARAMETER (DT$_RP04 = '00000003'X) PARAMETER (DT$_RP05 = '00000004'X) PARAMETER (DT$_RP06 = '00000005'X) PARAMETER (DT$_RP07 = '00000007'X) PARAMETER (DT$_RP07HT = '00000008'X) PARAMETER (DT$_RX01 = '00000010'X) PARAMETER (DT$_RX02 = '0000000B'X) PARAMETER (DT$_RX03 = '0000000C'X) PARAMETER (DT$_TE16 = '00000001'X) PARAMETER (DT$_TS11 = '00000004'X) PARAMETER (DT$_TTYUNKN = '00000000'X) PARAMETER (DT$_TU45 = '00000002'X) PARAMETER (DT$_TU58 = '0000000E'X) PARAMETER (DT$_TU77 = '00000003'X) PARAMETER (DT$_TU78 = '00000005'X) PARAMETER (DT$_VT05 = '00000001'X) PARAMETER (DT$_VT100 = '00000060'X) PARAMETER (DT$_VT52 = '00000040'X) PARAMETER (DT$_VT55 = '00000041'X) PARAMETER (DT$_VT5X = '00000040'X) PARAMETER (DT$_XM_ALMA = '00000009'X) PARAMETER (DT$_XM_ALMD = '0000000A'X) PARAMETER (DT$_XM_ARDA = '00000001'X) PARAMETER (DT$_XM_ARFA = '00000002'X) PARAMETER (TT$C_BAUD_110 = '00000003'X) PARAMETER (TT$C_BAUD_1200 = '00000008'X) PARAMETER (TT$C_BAUD_134 = '00000004'X) PARAMETER (TT$C_BAUD_150 = '00000005'X) PARAMETER (TT$C_BAUD_1800 = '00000009'X) PARAMETER (TT$C_BAUD_2000 = '0000000A'X) PARAMETER (TT$C_BAUD_2400 = '0000000B'X) PARAMETER (TT$C_BAUD_300 = '00000006'X) PARAMETER (TT$C_BAUD_3600 = '0000000C'X) PARAMETER (TT$C_BAUD_4800 = '0000000D'X) PARAMETER (TT$C_BAUD_50 = '00000001'X) PARAMETER (TT$C_BAUD_600 = '00000007'X) PARAMETER (TT$C_BAUD_7200 = '0000000E'X) PARAMETER (TT$C_BAUD_75 = '00000002'X) PARAMETER (TT$C_BAUD_9600 = '0000000F'X) PARAMETER (TT$M_ALTRPAR = '00000020'X) PARAMETER (TT$M_CRFILL = '00000400'X) PARAMETER (TT$M_EIGHTBIT = '00008000'X) PARAMETER (TT$M_ESCAPE = '00000008'X) PARAMETER (TT$M_HALFDUP = '00100000'X) PARAMETER (TT$M_HOLDSCREEN = '00004000'X) PARAMETER (TT$M_HOSTSYNC = '00000010'X) PARAMETER (TT$M_LFFILL = '00000800'X) PARAMETER (TT$M_LOWER = '00000080'X) PARAMETER (TT$M_MBXDSABL = '00010000'X) PARAMETER (TT$M_MECHFORM = '00080000'X) PARAMETER (TT$M_MECHTAB = '00000100'X) PARAMETER (TT$M_NOBRDCST = '00020000'X) PARAMETER (TT$M_NOECHO = '00000002'X) PARAMETER (TT$M_NOTYPEAHD = '00000004'X) PARAMETER (TT$M_ODD = '00000080'X) PARAMETER (TT$M_PAGE = 'FF000000'X) PARAMETER (TT$M_PARITY = '00000040'X) PARAMETER (TT$M_PASSALL = '00000001'X) PARAMETER (TT$M_READSYNC = '00040000'X) PARAMETER (TT$M_REMOTE = '00002000'X) PARAMETER (TT$M_SCOPE = '00001000'X) PARAMETER (TT$M_SCRIPT = '00000040'X) PARAMETER (TT$M_TTSYNC = '00000020'X) PARAMETER (TT$M_WRAP = '00000200'X) PARAMETER (TT$S_PAGE = '00000008'X) PARAMETER (TT$V_ALTRPAR = '00000005'X) PARAMETER (TT$V_CRFILL = '0000000A'X) PARAMETER (TT$V_EIGHTBIT = '0000000F'X) PARAMETER (TT$V_ESCAPE = '00000003'X) PARAMETER (TT$V_HALFDUP = '00000014'X) PARAMETER (TT$V_HOLDSCREEN = '0000000E'X) PARAMETER (TT$V_HOSTSYNC = '00000004'X) PARAMETER (TT$V_LFFILL = '0000000B'X) PARAMETER (TT$V_LOWER = '00000007'X) PARAMETER (TT$V_MBXDSABL = '00000010'X) PARAMETER (TT$V_MECHFORM = '00000013'X) PARAMETER (TT$V_MECHTAB = '00000008'X) PARAMETER (TT$V_NOBRDCST = '00000011'X) PARAMETER (TT$V_NOECHO = '00000001'X) PARAMETER (TT$V_NOTYPEAHD = '00000002'X) PARAMETER (TT$V_ODD = '00000007'X) PARAMETER (TT$V_PAGE = '00000018'X) PARAMETER (TT$V_PARITY = '00000006'X) PARAMETER (TT$V_PASSALL = '00000000'X) PARAMETER (TT$V_READSYNC = '00000012'X) PARAMETER (TT$V_REMOTE = '0000000D'X) PARAMETER (TT$V_SCOPE = '0000000C'X) PARAMETER (TT$V_SCRIPT = '00000006'X) PARAMETER (TT$V_TTSYNC = '00000005'X) PARAMETER (TT$V_WRAP = '00000009'X) PARAMETER (TT$_FT1 = '00000010'X) PARAMETER (TT$_FT2 = '00000011'X) PARAMETER (TT$_FT3 = '00000012'X) PARAMETER (TT$_FT4 = '00000013'X) PARAMETER (TT$_FT5 = '00000014'X) PARAMETER (TT$_FT6 = '00000015'X) PARAMETER (TT$_FT7 = '00000016'X) PARAMETER (TT$_FT8 = '00000017'X) PARAMETER (TT$_LA120 = '00000021'X) PARAMETER (TT$_LA36 = '00000020'X) PARAMETER (TT$_LAX = '00000020'X) PARAMETER (TT$_UNKNOWN = '00000000'X) PARAMETER (TT$_VT05 = '00000001'X) PARAMETER (TT$_VT100 = '00000060'X) PARAMETER (TT$_VT52 = '00000040'X) PARAMETER (TT$_VT55 = '00000041'X) PARAMETER (TT$_VT5X = '00000040'X)