;
; CSI INTERFACE DATA BASE FOR ERROR MESSAGE DOCUMENTER 'ERS'
;
;ASSEMBLY COMMAND LINE:
; MAC CSIERS=[200,201]CSINTFDEF/ML,CSINTF,[X,Y]CSIERS
;
NSTLVL=4			;MAXIMUM IND COMMAND FILE NESTING
CMDLUN=5			;GCML COMMAND LUN NUMBER
TILUN=4				;LUN ASSIGNED TO TI:
QIOEFG=1			;ERROR MESSAGE QIO EVENT FLAG
LOCASE=1			;DEFINE THIS SYMBOL TO PERMIT LOWER CASE
	.PSECT	$VARS
	GCMLDF	ERS,$VARS
	TMSGDF	ERS,$VARS
	CERRDF	ERS,$VARS	;USED ONLY FOR CSINTF ASSEMBLIES
	FTYPDF	<$$$,ERS,LST>,$VARS ;
;				;   THE DEFAULT INPUT FILE TYPE '$$$'
;				;   IS NOT LEGAL.  IT IS THERE TO
;				;   ALLOW DETECTION OF THE DEFAULT
;				;   SO IT CAN BE CHANGED BY THE USER
;				;   PROGRAM ACCORDING TO A POSSIBLE 
;				;   SWITCH.
;
; SWITCH TABLES START HERE
;
	SWTSRT	$VARS
	SWTVAL	SS,<<ASCII,20.,1>>,$VARS
	SWTVAL	MN,<<ASCII,8.,1>>,$VARS
	SWTVAL	CM,<<ASCII,1,1>>,$VARS
	SWTEND	$VARS
;
; SWITCH TABLES END HERE
;
	.END