$save nolist

/*
    UNIVERSAL DEVELOPMENT INTERFACE EXCEPTION CODE LITERALS
*/

        /*  Environmental Exceptions  */

DECLARE
	E$UNKNOWN$EXIT	        LITERALLY	'00C0h',
	E$WARNING$EXIT	        LITERALLY	'00C1h',
	E$ERROR$EXIT	        LITERALLY	'00C2h',
	E$FATAL$EXIT	        LITERALLY	'00C3h',
	E$ABORT$EXIT	        LITERALLY	'00C4h',
    E$UDI$INTERNAL          LITERALLY   '00C5h';


        /*  Programming Exceptions  */
        
DECLARE
    E$RESERVE$PARAM         LITERALLY   '80C6h',
    E$OPEN$PARAM            LITERALLY   '80C7h';
        
$restore