Google
 
Trailing-Edge - PDP-10 Archives - SRI_NIC_PERM_SRC_1_19910112 - 5-galaxy/ornmac.unv
There are 80 other files named ornmac.unv in the archive. Click here to see a list.
x
,5
@P Cv)6Q @CBd)3P'CJ9ip CRn:=P @EV6:=P @G"uZQ ~G"v<[P G4ulQ @G>ih6P G>ihvp G>ilp G>ilwp G>il}p G>imp GHv8;P GHv:=P IvLuP I<[P @I1h7p I1i{p I1kp I1k2p I1lp I1l}p I1mp Ir%lP Ir5lP It[:P ItkQ xIu

xP IulwP Iv;PP Iv;wP IvLP'IvLVP IX-]P IX.MP IXtPQ  IXt:P'IXt: Q IXvX;Q @J:

9VP J:{SP J:/
:P J:MlP J:MmQP J:lP J:u|VP J:~SP J:~]P J;LsP KK9 ak
	XLIST

	X	AON,<Applica!tion object blockQ and object type pblock not allowed	 together in WTOR	0/WTO/ACK message>	P
	X	CMI,<Command	p message invalid>

	X	UPO,<Unknown
0 processor object
P>
	X	UPT,<Uniden
ptified processor type>
	X	IPE,<OP0ERATOR privilegesP required>
	X	IOpE,<Invalid OPR en

try>
	X	IFC,<Ill

0egally formatted 

Pcommand message>

p
	X	IRS,<Illegald
	X	MTS,<Message 
	X	BMd message length>
	X	CSU,<Ca0nnot send to specPified terminal/usper>
	X	NOM,<No outstanding messag0es>
	X	ICS,<InvaPlid argument counpt specified in command>
	X	IAL,<I0nvalid argument lPength specified>
	X	ITM,<Invalid type argument in 0message>
	X	ONS,P<OPR not setup ..p command ignored>
	X	DTM,<Duplica0te type specifiedP in message>
	X	pWJP,<WTO, WTOR, or ACK job number 0field requires prPivileges>
	X	WTPp,<WTO, WTOR or ACK object type fie0ld requires priviPleges>
	X	IWF,<Ipnvalid WTO or WTOR field>
	X	WOP,0<WTO, WTOR, or ACPK object block fipeld requires privileges>
	X	IOU,<0Invalid object unPit specified in opbject block>
	X	RIW,<Range invali0d in WTO, WTOR orP ACK object blockp>
	X	OPD,<OPR pid already defined0>
	X	ISM,<OPR sePtup message invalpid .. OPR did not send hello>
	X	0OAS,<OPR already Psetup .. OPR delepted>
	X	ANI,<Application name inv0alid in applicatiPon hello message>p
	X	ODE,<OPR Does not exist .. me0ssage not sent>
P	X	MTF,<WTO messapge type field required with WT.SJI0 set>
	X	IAC,<InPvalid acknowledgepment code .. code was zero>
	X	CN0I,<Command not yePt implemented>
	pX	IPS,<Invalid pid for sender .. p0id was zero>
	X	PISC,<Invalid switpch specified in command>
	X	WNA,<0Write to operatorP function not allpowed for this job >
	X	LNI,<Loggin 0g not enabled>
	 PX	RNA,<Range not  pallowed in START !command with /DEV!0ICE>
	X	IQS,<Inv!Palid queue specif!pied in command>
"	X	SUF,<ERROR.SYS"0 entry failed on "PREPORT command>
"p	X	IUM,<Invalid u#ser specified in #0message>
	X	ARP,#P<ACK messages req#puire WHEEL or OPE$RATOR privileges>$0
	X	NRW,<Notify $Pmessage requires $pWHEEL or OPERATOR% privileges>
	X	%0JDE,<Job to be no%Ptified no longer %pexists>
	X	NJD,<&Job to be notifie&0d is DETACHED .. &Pnotify ignored>
&p	X	BNR,<Batch com'mands not allowed'0 from remote node'Ps>
	X	NOD,<No op'perators defined>
	X	DOL,<Device a(0lready online .. (Pcommand ignored>
	X	SFF,<Schedule)r functions faile)0d for SHOW SCHEDU)PLER command>
	X	)pORS,<SYSTEM, HOST* or REMOTE operat*0or privilege requ*Pired>
	X	OHS,<SY*pSTEM or HOST oper+ator privilege re+0quired>
	X	OSY,<+PSYSTEM operator p+privilege required,>
	X	SAF,<Send t,0o ACTDAE failed f,Por SET USAGE comm,pand>
	X	CLO,<Can-'t locate operato-0r>

	LIST
	SALL

	LIST
	SALKK| s)_
	XLIST
s	X	E.NORM,<OPR terriminated normally>u9
TOPS20 <
X	E.OuXPNF,<Unable to opuxen ^T/DCNDAT/>
Xv	E.CONF,<Unable tv8o get connects fovXr ^T/DCNDAT/>
X	vxE.ACFL,<Unable tow accept connects w8for server links>wX
X	E.OUTF,<Outpuwxt over link ^T/DCxNDAT/ failed .. lx8ink aborted>
X	ExX.INPF,<Input overxx server link failyed .. link abortey8d>
X	E.STSF,<StayXtus return for inyxput server link fzailed .. link aboz8rted>
X	E.INVC,<zXInvalid connect szxtatus ^O/ARG1/ ..{ link aborted>
>{8 ;END TOPS20
X	E{X.EXIT,<EXIT comma{xnd issued>

	LIST
	SALL

	LIKK9: Yqa
		EXTERNZAL TXTTBL
		EXTEZ0RNAL STSTBL
		EXZPTERNAL ERRTBL
		ZpEXTERNAL RPTERR
[		DEFINE	X(SUFFIX[0,TEXT),<
		EXTER[PNAL	E$'SUFFIX
		[p> ;END X
		ERRCD\S
		ERRTXT
		ORNMSG
	XT
		ORKKN -q
		XLIST
	X	ACI,<Applicat.0ion code ^D/G$ARG.P1/ invalid .. WTO.p rejected>
	X	AH/F,<^T/@G$ARG1/ he/0llo acknowledgeme/Pnt failed .. hell/po ignored>
	X	AN0S,<Application ^T00/@G$ARG1/ not sig0Pned on yet .. WTO0p/WTOR/ACK rejecte1d>
	X	CPM,<WTO/W10TOR/ACK request f1Por ^T/@G$ARG1/ ha1ps different pid f2rom hello .. WTO 20rejected>
	X	CSF2P,<Class scheduler2p error: ^E/G$ARG13/>
	X	DDI,<Disk 30drive number ^D/G3P$ARG1/ invalid on3p SET command>
	X4	DJF,<SET ONLINE 40failed because ^E4P/G$ARG1/>
	X	IAP4p,<^T/@G$ARG1/ is 5not running>
	X	50ICN,<Channel numb5Per ^D/G$ARG1/ inv5palid on SET comma6nd>
	X	IDD,<^T/@60G$ARG1/ is not a 6Pvalid disk struct6pure .. command ig7nored>
	X	IDS,<^70T/@G$ARG1/ is not7P supported for /D7pEVICE .. command 8ignored>
	X	IMT,80<Illegal message 8Ptype ^O/G$ARG1/>
	X	INS,<Operator9 at node ^N/G$ARG901/ not enabled fo9Pr node ^N/G$ARG2/9p>
	X	INT,<Invali:d node or no term:0inal lines for no:Pde ^N/G$ARG1/>
	:pX	ION,<OPR hello ;message node ^N/G;0$ARG1/ invalid ..;P OPR ignored>
	X;p	IOT,<Invalid obj<ect type ^O/G$ARG<01/ specified in m<Pessage>
	X	ITD,<<p^T/@G$ARG1/ is no=t a valid tape dr=0ive .. command ig=Pnored>
	X	LAO,<O=pRION log file ^F/>LOGFD/ already op>0en .. command ign>Pored>
	X	LFE,<OR>pION log error ^E/?[-1]/ .. logging ?0disabled>
	X	MNV?P,<Message ^D/G$AR?pG1/ no longer val@id .. sender has @0gone away>
	X	NM@PC,<No messages fo@pund with code ^O/AG$ARG1/>
	X	NMN,A0<No messages for APnode ^N/G$ARG1/>
	X	NON,<No operaBtors at node ^N/GB0$ARG1/>
	X	NSM,<BPMessage ^D/G$ARG1Bp/ does not exist>C
	X	NTD,<^T/@G$AC0RG1/ is not a tapCPe drive or valid Cpstructure .. commDand ignored>
	X	D0OAE,<DN60 OPR at DPnode ^N/G$ARG1/ aDplready exists>
	EX	ONE,<OPR not enE0abled for messageEP ^D/G$ARG1/ at noEpde ^N/G$ARG2/>
	FX	OSF,<OPR setup F0failure for pid ^FPO/G$ARG1/ .. OPR Fpignored>
	X	PER,G<Command error: ^G0T/@G$ARG1/>
	X	RGPWF,<^T/@G$ARG1/ fGpile retrieval waiHts failed  ^E/[-2H0]/>
	X	SIC,<SET HPONLINE ^T/@G$ARG1Hp/ channel number I^O/G$ARG2/ invaliI0d>
	X	SID,<SET OIPNLINE ^T/@G$ARG1/Ip device number ^OJ/G$ARG2/ invalid>J0
	X	SJF,<SET JOBJP scheduler error:Jp ^E/G$ARG1/>
	X	KSJN,<SET JOB invaK0lid .. job ^D/G$AKPRG1/ not logged iKpn>
	X	SPI,<SET pLriority value ^D/L0G$ARG1/ invalid .LP. 63 is maximum>
	X	SSF,<SET SCHEMDULER error: ^E/GM0$ARG1/>
	X	TAB,<MPTAKE command aborMpted because ^T/@GN$ARG1/ not runninN0g
		on command "NP^T/@G$ARG2/">
	XNp	WTL,<WTO/WTOR meOssage length ^D/GO0$ARG1/ exceeds maOPx of ^D/[WTOMAX]/Op>
		LIST
		SALL
	LIST
		SALLL;<rP L;<YP L;<I9P!L;<MP @L;<\YP  L;<kP'@L;=+qP @L;=xUP"L;=xrP L;>-P L;>NP$L;>N8P M:=P M2

pP MR%eHQ MR6L`P MRV>9Q MS) Q MS.[yP N$  	

N%IwTX-SYSTEMOPERATON:n+SP N:}KsQ O*6:=P S;:P SBI;P U
IjQp U
Ikp U
Il}p WMX4 +a:
	X	ALIGN,,ALI		
	X	BACKSP,AACE,BKS		
	X	CAN,aCEL,CNC		
	X	CLO-SE,CLO		
	X	CONT- INUE,CNT		
	X	DE-@LETE,DEL		
IFN	F-`TDN60,<
	X	DEFIN.E,DEF		
> ;END F. TDN60
	X	DISABLE.@,DIS		
	X	DISMOU.`NT,DSM		
	X	ENAB/LE,ENA		
	X	ENTE/ R,ENT		
	X	EXIT,/@EXT		
	X	FORWARD/`SPACE,FWS	
	X	HE0LP,HLP		
	X	HOLD0 ,HLD		
	X	IDENTI0@FY,IDN		
	X	MODI0`FY,MOD		
	X	MOUN1T,MTN		
	X	PAUSE1 ,PAU		
TOPS20<	X1@	PUSH,PUS>		
	X	1`PRINT,PRT		
TOPS210<	X	RECOGNIZE,R2 EC >		
	X	RELEAS2@E,REL		
	X	REPOR2`T,RPT		
	X	REQUE3UE,REQ		
	X	RESP3 OND,RSP		
	X	RET3@URN,RTN		
	X	ROU3`TE,RTE		
	X	SEND4,SND		
	X	SET,SE4 T			
	X	SHOW,SHW4@		
	X	SHUTDOWN,S4`HD		
	X	START,ST5A		
	X	SUBMIT,SU5 B		
	X	SUPPRESS,5@SUP		
	X	TAKE,TA5`K		
	X	UNLOAD,UN6L		
	X	WAIT,WAI	6 	


	X	SWITCH,6@SWI		


	X	LOC6`K,LOC		
	X	UNLOC7K,ULC		


	X	<7 \"32>,CTZ		
	X	NEXT,NXT		

	NWMxU 7aB
X	JOB,JO8B				
X	OPERATOR8 ,OPR			
X	TERMINAL,TRM			
RMINWN{y ?Ah
X	AFTER,?aAFT			
X	ALL,ALL@				
X <ALL-MESS@ AGES>,ALM			
X <@@ALL-NODES>,ALG			@`
X	ASK,ASK				
AX	ATTRIBUTE,ATR		A 	
X(<BEGINNING-OA@F>,BEG)			
X <BUA`GCHK-MESSAGES>,CHBK			
X <BUGINF-MB ESSAGES>,INF			
B@X	CI,CI				
X <CB`ONTROL-FILE>,CTL	C		
X	COPY,CPY			C 
X(<CURRENT-POSIC@TION>,CUR)		
X <C`CURRENT-REQUEST>,DACR			
X	DAYTIMED ,DAY			
X <ERRORD@-MESSAGES>,ERM			D`
X <EVERY-REQUESET>,AER			
X	FILEE ,FIL			
X (<FORME@S-TYPE>,FOT)			
E`X	IGNORE,IGN			
FX	IMMEDIATELY,IMMF 			
X	<JOB-MESSAF@GES>,JOM		
X	KEYF`PAD,KPD			
X (<LGIMIT-EXCEEDED-ACTG ION>,LEA)		
X	LIG@NE,LIN			
X	LOG,G`LOG				
X	LOGGINHG,LGG			
X (<MEMH ORY-LIMITS>,MEM)	H@		
X	MESSAGES,MSH`G			
X	NODE,NOD	I		
X	NOKEYPAD,NKI P			
X	NOREMOVALI@,NRM			
X(<NOOPRI`-INTERVENTION>,NOJI)		
X <OPR-ACTIJ ON-MESSAGES>,OAM	J@	
X	<OFFLINE>,OFJ`L			
X	<ONLINE>,KONL			
X(<OPR-INK TERVENTION>,OIA)	K@	
X	OTHER,OTH			K`
X <OUTPUT-DISPLLAY>,OPD			
X(<OUL TPUT-LIMITS>,OPL)L@			
X (<PAGE-LIML`ITS>,PGL)			
X	PMARAMETERS,PRM			
x	PORT,POR			
XM@	PRIORITY,PRI			
X (<PRIORITY-LIMNITS>,PRL)		
X	REN MOVAL,REM			
X	RN@EQUEST,RQN			
X	N`QUEUE,QUE			
X	SOITGO,SIT			
X	STO ATUS,STS			
X	SYO@STEM,SYS			
X <SO`YSTEM-MESSAGES>,SPYM			
X <TAKE-COP MMANDS>,TAC			
XP@ (<TIME-LIMITS>,TP`IM)			
X	TO,TO		Q		
X	TYPE,TYP			Q 
X	UNDEFINE,UDF	Q@		

;DN60 KEYWOQ`RDS

IFN	FTDN60R,<

X	<BYTES-PER R-MESSAGE>,BPM		
X	<CLEAR-SEND-DER`LAY>,CSD		
X	<DASTA-TERMINAL-READYS >,DTR 
X	<EMULATS@ION>,EMU			
X	HAS`SP,HSP			
X	OFF,TOFF				
X	ON,ON	T 			
X	<RECORDS-PT@ER-MESSAGE>,RPM 
X	SECONDARY,SEC	U		
X	<SILO-WARNIU NG-LEVEL>,SWL 
U@



X	<TIMEOUTU`-CATEGORY>,TOU		
X	<TRANSPARENCY>V ,TRA		
X	2780,27V@8			
X	3780,378	V`		

> ;END FTDNW60



X	<ACCEW SS-NAME>,ACC		
XW@	<APPLICATION>,PLW`U		
X	<CHARACTERX-SET>,CHS		
X	<CX IRCUIT>,CIR			
XX@	<DATA>,DAT			
XX`	<DESTINATION>,DSYT		
X	<GATEWAY>,Y GWY			
X	<LOGON-Y@MODE>,LOM		
X	<SY`NA-WORKSTATION>,SZNA		



X	<ACZ KNOWLEDGED>,ACK		Z@
X	<ALL-TAPE-DRIZ`VES>,ATP		
X	<AN[SI>,ANS			
X	<AU[ TOMATIC-VOLUME-RE[@COGNITION>,AVR	
[`X	<AVAILABLE>,AVA\			
X	<CHANNEL>,\ CHN			
X	<CONTRO\@LLER>,CON		
X	<D\`RIVE>,DRV			
X	<]DISK-DRIVE>,DSK		] 
X	<DOMESTIC>,DO]@M			
X	<EBCDIC>,]`EBC			
X	<EXCLUS^IVE>,EXL			
X	<F^ OREIGN>,FOR			
X^@	<INITIALIZE>,INI^`		
X	NO,NO				
_X	<REGULATED>,REG_ 			
X	<SCRATCH>,_@SCR			
X	<SHARED_`>,SHR			
X	<STRU`CTURE>,STR			
X	` <TAPE-DRIVE>,TAP	`@	
X	<TOPS20>,T20``			
X	<UNAVAILABaLE>,UAV		
X	UNITa ,UNI			
X	<ACTIVa@E-SWAPPING-LIST>,a`ASL 
X	<CRASH-DUbMP-LIST>,CDL		
Xb 	<SYSTEM-SEARCH-Lb@IST>,SSL 

;X	<b`UNLABELED>,UNL		
X	<UNREGULATED>,c URG		
X	<VOLUME-c@ID>,VID			
X	YESc`,YES				
X	200,2d00				
X	556,556d 				
X	800,800		d@		
X	160,160				d`
X	625,625				
e



X	<BIAS-Ce ONTROL>,BIA		
X	e@<SCHEDULER>,SCH		e`	
X	<NONE>,NON		f	
X	<BACKGROUND>f ,BCK		
X	<CLASS>f@,CLS			
X	<ACCOUf`NTS>,ACT			
X	<AgLLOCATED>,ALO			
X	<WITHHELD>,WHDg@			
X	<POLICY-PRg`OGRAM>,PPR		
IFNh NICSW,<
X	<DEFAh ULT>,DFT			
X	<Ph@RINTER-VERIFICATIh`ON>,PFV	
>;IFN NiICSW



X	<AUi TOMATIC-STRUCTUREi@-RECOGNITION>,ASRi`	
X	<SYSTEM-LISTjS>,SLS		
X	<INCLj UDE>,INC			
X	<Ej@XCLUDE>,EXC			
Xj`	<ALLOCATION>,ALCk		
X	<BATCH-REQUk EST>,BRQ		


k@
X	<USAGE>,USG			k`
X	<BILLING-CLOSlURE>,UBC		
X	<FIl LE-CLOSURE>,UFC		l@
X	<EVERY>,WKY		l`	
X	<NOW>,NOW			m
X	<DAILY>,DLY			

ILY>,DLY		Y

um6Q@[$PF[<P<[LuiP[LvI9P>[NF:=pE[Nahrp=[NaiVpH[Naj2p[NajQp[NajZp9[NakRp[Nalp[Nal}p[PvNP'[b|*YP]ah2p]aiVp]akVp]akZp]al}p]Fp ]>!iVp ]>!k6p ]>!kVp ]>!kZp ]>!k\P ]>!kqp ]>!kxp ]>!l}p ]>!mp ]Pu[Q @]VlP ]Vn<[P ^eyw  	G$$LGN	^:d[PQ ,,yQ .}Q `t,yQ v}Q `
QkRp _
Ql}p _
Qmp _
Qm7p _
U|W 8ax
X	(<BATC9H>,BAT)			

X	<9 CARD-READER-INTER9@PRETER>,BIN	
IFN9` FTFTS,<
X	<FAL>:,FAL			
> ;End o: f FTFTS condition:@al
TOPS20 <
X	<:`FILE-RETRIEVAL>,R;ET 		
> ;END TOP; S20
IFN NICSW,<
X	<FOREIGN-PRINT;`ER>,PLT		
>;IFN <NICSW
IFN FTFTS,< <
X	<FTS>,FTS			<@
> ;End of FTFTS<` conditional
X	<=LASER-PRINTER>,CD= P		
X	<MOUNT>,MN=@T			
X	(<PAPER-T=`APE-PUNCH>,PTP) 
IFE NICSW,<
X	P> LOTTER,PLT			
>;>@IFE NICSW
X	PRIN>`TER,LPT			
X	REA?DER,RDR			;READER
RDR			;READER_
V:=pP6I;PQ6YP E6X7P@u

zQ @_@uHvQ _@ulzQ @_@v)6Q  _@v+:Q @_@v>9Q _@vH5Q _BAkRp _BAk{p _BAl}p _BAmWp _Cip _Cip _CiVp _Cj1p _CjQp _Ckp _CkRp _Ckqp _Cksp _Clp _Clp _Cl}p _Cmp _Cmp _Cm9p _JtLx a
	DSPTAB(aA,.KYC,B,D)
,.KYC,B,D)
_Ju9< mAl
	KEYTAB(.KYB,A,C)
(_Ju\s P1K
		XLIST
	X	CSE,<Class scPpheduler ^T/@G$ARGQ1/>
	X	CWM,<MessQ0age ^D/G$ARG1/ caQPnceled^I/@G$ARG3/Qp>
	X	FRW,<File rRetrieval waits ^TR0/@G$ARG1/d>
	X	JRPLO,<Message ^D/G$RpARG1/ canceled ..S job ^D/G$JOB/ loS0gged out>
	X	LFCSP,<ORION logging dSpisabled by ^I/@JOTBTXT/>
	X	MCJ,<^T0D/G$ARG2/ messageTP(s) canceled>
	XTp	ODM,<Output dispUlay for OPR modifU0ied>
	X	OLO,<ORIUPON logging enableUpd by ^I/@JOBTXT/>V
	X	SCC,<SEND coV0mmand completed>
	X	SEM,<Entry maVpde in ERROR.SYS>
	X	SJM,<Job ^D/GW0$ARG1/ modified>
	X	SOA,<SET ONLIWpNE accepted>
	X	XSSJ,<Job ^D/G$ARGX01/ now in class ^XPD/G$ARG2/>
	X	SSXpS,<Scheduler settYing modified>
		Y0LIST
		SALL
		IST
		SALL
		_Jv9 "
	DSPTAB(!A,.SWC,B,D)
,.SWC,B,D)
_Jv=t np
	KEYTAB(.SWB,A,C)
(_W$:P _W&:=P >`:

=Q `:[sQ `:H5Q  `:$\YQ `:&<Q @`:-iQ  `:.,WQ `:MmQ `:v

WQ `;\Q `;$rQ @ahvp alp alyp al}p amp a9: \Q
	EXTERNA\qL	P$GPDB		;GET TH]E PDB BLOCK
	EXT]0ERNAL	P$PNXT		;GE]PT NEXT PDB GIVEN ]pA PDB BLOCK
	EXT^ERNAL	P$PERR		;GE^0T ERROR BLOCK FRO^PM PDB GIVEN A PDB^p
	EXTERNAL	P$PDE_F		;GET DEFAULT F_0ILLING ROUTINE GI_PVEN A PDB
	EXTER_pNAL	P$PACT		;GET `ACTION ROUTINE GI`0VEN A PDB

	EXT`PERNAL	P$NARG		;NE`pXT ARGUMENT TYPE aTO PROCESS
	EXTEa0RNAL	P$SETU		;SETaPUP POINTER TO PARapSER BLOCKS
	EXTEbRNAL	P$CURR		;GETb0 THE CURRENT LOCAbPTION
	EXTERNAL	Pbp$PREV		;SET THE PcREVIOUS TO CURRENc0T
	EXTERNAL	P$FLcPOT		;FLOATING POIcpNT NUMBER
	EXTERdNAL	P$INIT		;PARSd0ER INIT
	EXTERNAdPL	P$INTR		;PARSERdp INTERRUPTS
	EXTeERNAL	P$TINT		;TIe0MER INTERRUPTS
	ePEXTERNAL	P$NFLD		ep;NEXT FIELD TYPE fAND BLOCK ADDRESSf0
	EXTERNAL	P$DIRfP		;DIRECTORY FIELfpD
	EXTERNAL	P$NEgXT		;GET NEXT FIEg0LD
	EXTERNAL	P$TgPIME		;TIME/DATE CgpHECK
	EXTERNAL	Ph$COMMA		;COMMA CHh0ECK
	EXTERNAL	P$hPCFM		;CONFIRM CHEhpCK
	EXTERNAL	P$KiEYW		;KEYWORD CHEi0CK
	EXTERNAL	P$SiPWIT		;SWITCH CHECipK
	EXTERNAL	P$USjER		;USER CHECK
j0	EXTERNAL	P$NUM		jP;NUMBER CHECK
	EjpXTERNAL	P$FILE		;kFILE SPEC CHECK
k0	EXTERNAL	P$IFIL	kP	;INPUT FILE SPECkp
	EXTERNAL	P$OFIlL		;OUTPUT FILE Sl0PEC
	EXTERNAL	P$lPFLD		;FIELD CHECKlp
	EXTERNAL	P$TOKm		;TOKEN CHECK
	m0EXTERNAL	P$NODE		mP;NODE CHECK
	EXTmpERNAL	P$SIXF		;SInXBIT FIELD CHECK
	EXTERNAL	P$RNGEnP		;RANGE OF NUMBEnpRS
	EXTERNAL	P$ToEXT		;TEXT CHECK
	EXTERNAL	P$DEV	oP	;DEVICE CHECK
	opEXTERNAL	P$QSTR		p;QUOTED STRING
	p0EXTERNAL	P$UQST		pP;UNQUOTED STRING
	EXTERNAL	P$TAKEq		;Take processinq0g
	EXTERNAL	P$ACqPCT		;Account striqpng
	EXTERNAL	P$NrPRO		;No process required
cess a

v:=P auI7Q xavN8P'a!ip a!i	p a!jp a!l}p aK!hsp aK!hvp aK!i1p aK!i6p aK!iVp aK!k9p aK!lvp aK!l}p d:v;ZQ  d;Q d;|Q d;yQ d;<:Q @eLuI7Q xeN!hzp eN!iVp eN!jp eN!k9p eN!lp eN!lZp eN!l}p eN!mp f:

:wP f:h6P f:%{9P f:/vP f:5|WP f:L{WP f;YzP f;9P f;,VP f;.)3P gahzp galp gal}p g0tvP g0t9P g0v<vP g0vHrP g0vK7P g0vK<P gK1hwp gK1iUp gK1j7p gK1jSp gK1l}p gK6LuP gPtyQ  gPt9Q gPtQ @gPtPQ  gPt:Q gPu6Q @gPu[ZQ gPuySP gPu{@P gPv

TP gPv91P gPv\yQ @gSmp gSmp g^NHt o!

	X	<ALL>oA,ALL		
	X	<APPENoaD>,APD		
	X	<AVApILABLE>,AVA		
	Xp 	<CHARACTERISTICSp@>,CHR	
	X	<COPIEp`S:>,CPY		
	X	<CRqEATE>,CRE		
	X	<q DEVICE:>,DEV		
	q@X	<FILE:>,FIL		
q`	X	<FREE>,FRE		
r	X	<LINES>,LNS		
	X	<PAGES:>,PAG	r@	
	X	<JOBNAME:>,r`JOB		
	X	<MOUNTEsD>,MNT		
	X	<NODs E:>,NOD		
	X	<NOs@-SIGNON-REQUIRED>s`,NSN;NO-SIGNON-REtQUIRED
	X	<NOUNLt OAD>,NUL		
	X	<Pt@AUSE:>,PAU		
	X	t`<REQUEST-ID:>,REQu	
	X	<REPEAT-COUu NT:>,RPT	
	X	<SEu@QUENCE:>,SEQ		
	u`X	<SHORT>,SHT		
v	X	<STOP>,STP		
v 	X	<JOB>,JBX		
	v@X	<SIGNON-REQUIREv`D>,SON	
	X	<SUPEwRSEDE>,SPR		
	X	w <PURGE>,PUR		
	Xw@	<ERROR-PROCESSINw`G>,ERR	
	X	<NOERxROR-PROCESSING>,Nx ER;/NOERROR-PROCEx@SSING
	X	<REASONx`:>,RSN		
	X	<REMyOVE>,REM		
	X	<Dy ISPLAY>,DSP		
	Xy@	<NODISPLAY>,NDP	y`	
	X	<OPR-ACTIONz-MESSAGE>,OAM 
	z X	<OTHER>,OTH		
z@	X	<USERS>,USR		
	X	<WRITE-LOCKED{>,WLK	
	X	<STRUC{ TURE-ID>,SID	

{@
	X	<COUNT:>,CNT{`		
	X	<DENSITY:>|,DEN		
	X	<INCRE| MENT:>,INC	
	X	<|@LABEL-TYPE:>,LBT	|`
	X	<OVERIDE-EXP}IRATION:>,OVR 
	} X	<OWNER:>,OWN		
	X	<PROTECTION>,}`PRO	
	X	<STARTIN~G-VOLUME-ID:>,SVI~ ;/START-VOLUME-ID~@:
	X	<TAPE-DISPO~`SITION:>,TDP	
	X	<VOLUME-ID>,VID	 	



	X	<WIND@FALL:>,WFL		
	X	`<CLASS-ASSIGNMENTS:>,CAS 
	X	<NOC HECK>,NCK		

	X@	<NO-SESSION-ENTR`IES>,NOS 


	X	<NOTRANSLATE>,NT L	
	X	<SPOOL>,SPL		

POOL>,SPgg

V ^P-{
	IFNB <^pB>,<TOPS10<A==B_>>
	IFNB <C>,<T_0OPS20<A==C>>
PS20<A==C>>
ijp ij7p ij|p il}p i nA
;THIS TAnaBLE MUST BE IN ALPAHABETICAL ORDER! BY THE FIRST ARG@UMENT
;	X	NAME,C`ODE,TABLE NAME

	G$$ATB				;GET  TABLE VALUES

	BLE VALUES

	iuI7P'inL}P 

i?kpp i?lp'i?l}p i?4(ux-IFNkFTUUOS,v=3P[v|Wi?4H `8.IFN FTJSYS,?7m8[Lt;ZigP igX<P 
	IFG  <~AMAN-ADEV>,<AED~0T==:AMAN>
	IFLE~P <AMAN-ADEV>,<AEDT==:ADEV>
o<tQ po<t]VQ @o<u+qQ  o<ux1Q oPu+qQ oPu86Q oPu:6Q @oPu[yQ  oPuiQ  oPuiWQ @oPui\Q oPv

[Q #hoPv:TQ oPv;RQ oR}X<P ap a
	XLIST
A	A==.ZZ
	.ZZ==.r1ZZ+1
	LIST
	SALL
	NOD.NXq@ 0 
	A==:B
	A==:BE=P;PP$:2PEh6P @FN8P `dLuP  f:P  f,P  f=P !f=P  fH8P  h6P {p )1P  `6)1P  `

SP S@P 4+P  mhuQ  ml[Q n+;Q @uyP 9P  4VP   5TP  !5]P 6MP 6X;P   V-P *|*2P @/JHP"8/J$P"6/J%lP""/J5lP"#/JU+P"7/JdJP"8/KP"7/LqP"#/LuP"(/LyP"/LzP";/L9P"/LZP"/LP"@/LP"/LP!/LP"/LP"/LP"</LYP")/LuP"/LvP"3/LyP">/LP"(/LP"/LPP"*/LYP")/L(:@ /L(uP":/L)3P"/L*0P"9/L*7@ /L*yP!/L,P"/L,XP"A/L9P"4/L9@ /L:P"/L:P"*/L:P"$/L: P"/L:9P"%/L;P!/L;P";/L;QP!/L;ZP!/L;wP"+/L<P"/L<rP"/L=P"/L=P!/L=9P"/LH:P"%/LH<P"/LI3P!/LI6P!/LIZP"=/LJ9P!/LKP"D/LKvP",/LL[P"+/LLuP",/LLvP!/LLzP"&/LMP"/LXQP"-/L[:P"/L[PP!/L[ZP!/L\VP"/L^P"@/L^P"-/L^P!/Lj6P"/LkyP"./LkzP"	/LmyP!/L}|P"&/MP!/MP!/M

xP"/MP!/MwP"	/M6P"
/MQP"?/MSP"/MTP"./M+q@ /M+vP"
/M<P"/MI0P"/MIsP"

/MKqP!/MKsP"

/MKvP"'/ML@!/MY6P"/M]P!/MjxP"/Mk`P"//MkrP"/MktP"/MkwP":/Mk{P"C/MlVP"/MnP!/Mx6P"/MySP"/MyVP"/Mz0P"/M{@P"/M{VP"/M|P"/M|P"/M|@ /M}P"/N:P!	/N	[P">/N	vP"/N@ /NP"$/NyP"/N

P"=/N

TP"/N

VP"/N

VP"/N

ZP!
/N!/N2P"/N)@ /N)3P"//N)6P!
/N)6P"/N)8P!/N):@ /N,P" /N,P!/N,7P"/N,xP!

/N-P!

/N8tP"9/N8yP"0/N91P"1/N9:P!/N:P!/N:P"0/N:P!/N::P"/N;P"?/N;PP"'/N;RP!2/NH1P"/NH5P!/NH8P"1/NJ6P"/NK`P"/NKzP"!/NLPP""/NLV@ /NN8P"/NX;P"2/NXQP"B/NYP"/NYQP"B/N[P!/N[TP"3/N[VP!/N\SP"5/N\sP"A/N\yP /Nj2P"5/Nx4P!/NzP"</Nz|P"C/O9P"66~

TP @7&:2Q 7&{Q ;&=1P @>+P >+RP >-P >-7P >KxP >+xP >;xP >$<vP"	>$J9P">$K:P">$LvP">$[PP">%P">%KqP">%Y9P">%]P">&)1P">&86P"
>&9P">&:P">&:P">&<P"
>&<vP"	>&<zP">&=P">&=P">&=tP">&YP">&[P">&[VP">DLYp">luP">lyP">lP">lP"

>m1P">m	tP">mP">mKsP">m[rP">mi\P">mnP">mySP">mzP">m|yP">m|zP">n:P">n

ZP">nP">n2P">n)6P">n)8P"
>n,xP">n-P">n-P">n9:P">n:P">n:P">n:P">n:P">n:P">n:P">n:P">n;RP">n<P">n<wP">n=P">n=P">n=1P">n=8P"	?%[ZP ?%|P ?&P ?&

(xP K

)VP K

*QP K

=9P K$YVP K$]P N-P !ND;P @NL=P !%NLI7P !!NMP !#NMQP !%NMHZP ! NMk{P !$NM}YP !#NM}wP !!NN

WP !"NN=TP !$NN[VP !"Nf=P ! NfN8P NuyP O<P  Oj6P !O3P  O$zP @O$P BO$P !O$uP O$P O$,P O$87P O$:P  @O$:P 	O$:9P 	O$<rP O$H:P 
O$LzP O$MP O$[RP 

O$lVP O%P AO%wP O%I0P O%KvP 
O%Y6P O%ktP O%lwP O%mP 

O%z0P O%|P O&	vP O&P O&

TP O&)P  O&,P O&;wP O&<P 

O&=vP O&J6P O&KzP O&LPP O&x:P AO.	VP @O.
QP @O.

zPjAO<P$O<P$O<PP$O<89P$O<:P$O<;ZP$O<<P$O<<RP$O<I7P$O<I;P$O<LxP$O<\YP$

WP$O>

O>)6P$O>)8P$O>,P$	O>,wP$O>98P$	O>:P$
O>:2P$O>;wP$O><P$O><P$

O>=P$
O>=TP$O>IP$O>\yP$O>j2P$O>yVP$O>{P$R	P  Z}J2P !_$rP _$YP _$I9P _$MP _$\YP _%+qP _%LzP _%kxP _%xUP _%xrP _&-P _&NP _&N8P kPP >}{woP