; ; CSI INTERFACE DATA BASE FOR FORMAT PROGRAM ; ;ASSEMBLY COMMAND LINE: ; MAC CSIFRM=[200,201]CSINTFDEF/ML,CSINTF,[X,Y]CSIFRM ; 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 .PSECT $VARS GCMLDF FRM,$VARS TMSGDF FRM,$VARS CERRDF FRM,$VARS ;USED ONLY FOR CSINTF ASSEMBLIES FTYPDF ,$VARS ; ; SWITCH TABLES START HERE ; SWTSRT $VARS ; SWTNEG ,$VARS ; SWTVAL BP,<>,$VARS ; SWTVAL FR,<>,$VARS ; SWTVAL LH,<>,$VARS ; SWTVAL LM,<>,$VARS ; SWTVAL LS,<>,$VARS ; SWTVAL MA,<>,$VARS ; SWTVAL PE,<>,$VARS ; SWTVAL PL,<>,$VARS ; SWTVAL RH,<>,$VARS ; SWTVAL RM,<>,$VARS ; SWTVAL TO,<>,$VARS SWTEND $VARS ; ; SWITCH TABLES END HERE ; .END