MACRO MDM_RTN = BLISS ADDRESSING_MODE (GENERAL)%; EXTERNAL ROUTINE MDM_CLOSEF : MDM_RTN, MDM_MKDATE : MDM_RTN, MDM_OPENF : MDM_RTN, MDM_PARSE : MDM_RTN, MDM_READF : MDM_RTN, MDM_RWNDF : MDM_RTN, MDM_STRANS : MDM_RTN, MDM_SYS_TRNLNM : MDM_RTN, MDM_WRITEF : MDM_RTN; UNDECLARE %QUOTE MDM_RTN; EXTERNAL LITERAL MDM__INVFUNC, MDM__INVFSPEC; LITERAL MDM_M_READ = 1, MDM_M_WRITE = 2, MDM_M_ASCEBC = 1, MDM_M_EBCASC = 2, MDM_M_ASCPRI = 3, MDM_M_PRIASC = 4, MDM_M_NODE = 1, MDM_M_DEV = 2, MDM_M_DIR = 4, MDM_M_NAME = 8, MDM_M_TYPE = 16, MDM_M_VER = 32, MDM_M_ALL = MDM_M_NODE + MDM_M_DEV + MDM_M_DIR + MDM_M_NAME + MDM_M_TYPE + MDM_M_VER, MDM_M_SYNCHK = 256, MDM_M_PWD = 512, MDM_M_NOCONCEAL = 1024;