; ; CSI INTERFACE DATA BASE FOR SCNSRC PROGRAM ; ;ASSEMBLY COMMAND LINE: ; MAC CSISCN=[200,201]CSINTFDEF/ML,CSINTF,[X,Y]CSISCN ; 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 IN COMMAND LINE .PSECT $VARS GCMLDF SCN,$VARS TMSGDF SCN,$VARS CERRDF SCN,$VARS ;USED ONLY FOR CSINTF ASSEMBLIES FTYPDF ,$VARS ; ; SWITCH TABLES START HERE ; SWTSRT $VARS SWTVAL SS,<>,$VARS SWTEND $VARS ; ; SWITCH TABLES END HERE ; .END