$save nolist

/*
    BIOS EXCEPTION CODE LITERALS
*/

        /*  Environmental Exceptions  */

DECLARE
    E$FEXIST                LITERALLY '0020h',		
    E$FNEXIST               LITERALLY '0021h',		
    E$DEVFD                 LITERALLY '0022h',		
    E$SUPPORT               LITERALLY '0023h',		
    E$EMPTY$ENTRY           LITERALLY '0024h',		
    E$DIR$END               LITERALLY '0025h',		
    E$FACCESS               LITERALLY '0026h',		
    E$FTYPE                 LITERALLY '0027h',		
    E$SHARE                 LITERALLY '0028h',		
    E$SPACE                 LITERALLY '0029h',		
    E$IDD                   LITERALLY '002Ah',		
    E$IO                    LITERALLY '002Bh',		
    E$FLUSHING              LITERALLY '002Ch',		
    E$ILLVOL                LITERALLY '002Dh',		
    E$DEV$OFF$LINE          LITERALLY '002Eh',		
    E$IFDR                  LITERALLY '002Fh',		
    E$FRAGMENTATION         LITERALLY '0030h',		
    E$DIR$NOT$EMPTY         LITERALLY '0031h',		
    E$NOT$FILE$CONN         LITERALLY '0032h',		
    E$NOT$DEVICE$CONN       LITERALLY '0033h',		
    E$CONN$NOT$OPEN         LITERALLY '0034h',		
    E$CONN$OPEN             LITERALLY '0035h',		
    E$BUFFERED$CONN         LITERALLY '0036h',		
    E$OUTSTANDING$CONNS     LITERALLY '0037h',		
    E$ALREADY$ATTACHED      LITERALLY '0038h',     
    E$DEV$DETACHING         LITERALLY '0039h',     
    E$NOT$SAME$DEVICE       LITERALLY '003Ah',		
    E$ILLOGICAL$RENAME      LITERALLY '003Bh',		
    E$STREAM$SPECIAL        LITERALLY '003Ch',		
    E$INVALID$FNODE         LITERALLY '003Dh',		
    E$PATHNAME$SYNTAX       LITERALLY '003Eh',		
    E$FNODE$LIMIT           LITERALLY '003Fh';
    
		/* E$IO expanded with unitstatus codes */

DECLARE
    E$IO$UNCLASS            LITERALLY '0050h',		
    E$IO$SOFT               LITERALLY '0051h',		
    E$IO$HARD               LITERALLY '0052h',		
    E$IO$OPRINT             LITERALLY '0053h',		
    E$IO$WRPROT             LITERALLY '0054h';		


        /*  Programming Exceptions  */

DECLARE
    E$NOUSER                LITERALLY '8021h',		
    E$NOPREFIX              LITERALLY '8022h';		

$restore