Google
 
Trailing-Edge - PDP-10 Archives - tops10_703a_sys_atpch16_bb-fr67f-bb - ornmac.unv
There are 80 other files named ornmac.unv in the archive. Click here to see a list.
x
,S-@PCv)6Q@CBd)3P'CJ9ipCRn:=P @EV6:=P @G"uZP @G"v<[P G4ulQ @G>ih6P G>ihvp G>ilp G>ilwp G>il}p G>imp GHv8;P GHv:=P IvLuP I<[P @I1kp I1k2p I1lp I1l}p I1mp I6

xP IulwP Iv;wP Iv<[P IvLP'IvLVP I	kRp I	kzp I	l7p I	l}p I	mp I	m7p I	m:p IX-]Q IX.MQ @IXu]Q IXvMQ @J:/
:P J:lP J:u|VP KK9 Eh~p
	XLIST
F
	X	AON,<ApplicaF(tion object blockFH and object type Fhblock not allowedG together in WTORG(/WTO/ACK message>GH
	X	CMI,<CommandGh message invalid>H
	X	UPO,<UnknownH( processor objectHH>
	X	UPT,<UnidenHhtified processor Itype>
	X	IPE,<OPI(ERATOR privilegesIH required>
	X	IOIhE,<Invalid OPR enJtry>
	X	IFC,<IllJ(egally formatted JHcommand message>
	X	IRS,<Illegal Krange specified>
	X	MTS,<Message KHtoo short>
	X	BMKhL,<Bad message leLngth>
	X	CSU,<CaL(nnot send to specLHified user>
	X	NLhOM,<No outstandinMg messages>
	X	IM(CS,<Invalid argumMHent count specifiMhed in command>
	NX	IAL,<Invalid arN(gument length speNHcified>
	X	ITM,<NhInvalid type arguOment in message>
	X	ONS,<OPR not OHsetup .. command Ohignored>
	X	DTM,P<Duplicate type sP(pecified in messaPHge>
	X	WJP,<WTO,Ph WTOR, or ACK jobQ number field reqQ(uires privileges>QH
	X	WTP,<WTO, WTQhOR or ACK object Rtype field requirR(es privileges>
	RHX	IWF,<Invalid WTRhO or WTOR field>
	X	WOP,<WTO, WTOS(R, or ACK object SHblock field requiShres privileges>
T	X	IOU,<Invalid oT(bject unit specifTHied in object bloThck>
	X	RIW,<RangUe invalid in WTO,U( WTOR or ACK objeUHct block>
	X	OPDUh,<OPR pid alreadyV defined>
	X	ISMV(,<OPR setup messaVHge invalid .. OPRVh did not send helWlo>
	X	OAS,<OPR W(already setup .. WHOPR deleted>
	X	WhANI,<Application Xname invalid in aX(pplication hello XHmessage>
	X	ODE,Xh<OPR Does not exiYst .. message notY( sent>
	X	MTF,<WYHTO message type fYhield required witZh WT.SJI set>
	XZ(	IAC,<Invalid ackZHnowledgement codeZh .. code was zero[>
	X	CNI,<Comman[(d not yet impleme[Hnted>
	X	IPS,<In[hvalid pid for sen\der .. pid was ze\(ro>
	X	ISC,<Inva\Hlid switch specif\hied in command>
]	X	WNA,<Write to ](operator function]H not allowed for ]hthis job>
	X	LNI^,<Logging not ena^(bled>
	X	RNA,<Ra^Hnge not allowed i^hn START command w_ith /DEVICE>
	X	_(IQS,<Invalid queu_He specified in co_hmmand>
	X	SUF,<E`RROR.SYS entry fa`(iled on REPORT co`Hmmand>
	X	IUM,<I`hnvalid user speciafied in message>
	X	ARP,<ACK messaHages require WHEEahL or OPERATOR pribvileges>
	X	NRW,b(<Notify message rbHequires WHEEL or bhOPERATOR privilegces>
	X	JDE,<Job c(to be notified nocH longer exists>
ch	X	NJD,<Job to bed notified is DETAd(CHED .. notify igdHnored>
	X	BNR,<Bdhatch commands note allowed from reme(ote nodes>
	X	NOeHD,<No operators dehefined>
	X	DOL,<fDevice already onf(line .. command ifHgnored>
	X	SFF,<fhScheduler functiogns failed for SHOg(W SCHEDULER commagHnd>
	X	ORS,<SYSTghEM, HOST or REMOThE operator privilh(ege required>
	XhH	OHS,<SYSTEM or HhhOST operator priviilege required>
i(	X	OSY,<SYSTEM opiHerator privilege ihrequired>
	X	SAFj,<Send to ACTDAE j(failed for SET USjHAGE command>
	X	jhCLO,<Can't locatek operator>
	X	SCk(N,< Specified CPUkH not running >
	khX	ICP,< Invalid ClPU number specifil(ed >
	X	NRN,< NolH CPUs will be abllhe to run jobs .. mcommand ignored >m(
	X	ACS,< All CPmHUs are already scmhhedulable .. commnand ignored >
	LIST
	SALL

	LKK| AM
	XLIST
@aX	E.NORM,<OPR ter@Aminated normally>C
TOPS20 <
X	E.OC0PNF,<Unable to opCPen ^T/DCNDAT/>
XCp	E.CONF,<Unable tDo get connects foD0r ^T/DCNDAT/>
X	DPE.ACFL,<Unable toDp accept connects Efor server links>E0
X	E.OUTF,<OutpuEPt over link ^T/DCEpNDAT/ failed .. lFink aborted>
X	EF0.INPF,<Input overFP server link failFped .. link aborteGd>
X	E.STSF,<StaG0tus return for inGPput server link fGpailed .. link aboHrted>
X	E.INVC,<H0Invalid connect sHPtatus ^O/ARG1/ ..Hp link aborted>
>I ;END TOPS20
X	EI0.EXIT,<EXIT commaIPnd issued>

	LIST
	SALL

	LIKK9: &iH
		EXTERN'	AL TXTTBL
		EXTE'(RNAL STSTBL
		EX'HTERNAL ERRTBL
		'hEXTERNAL RPTERR
(		DEFINE	X(SUFFIX((,TEXT),<
		EXTER(HNAL	E$'SUFFIX
		(h> ;END X
		ERRCD)S
		ERRTXT
		ORNMSG
	XT
		ORKKN nI\
		XLIST
	X	ACI,<Applicatoion code ^D/G$ARGo(1/ invalid .. WTOoH rejected>
	X	AHohF,<Application ^Tp/@APLNAM/ hello ap(cknowledgement fapHiled .. hello ignphored>
	X	ANS,<Apqplication ^T/@APLq(NAM/ not signed oqHn yet .. WTO/WTORqh/ACK rejected>
	rX	CAS,<^W/G$ARG2/r( is already runnirHng jobs .. commanrhd ignored>
	X	CDsE,<^W/G$ARG2/ does(s not exist>
	X	sHCDN,<^W/G$ARG2/ ishs down .. commandt ignored>
	X	CNMt(,<^W/G$ARG2/ is atHn invalid CPU namthe>
	X	CPM,<WTO/WuTOR/ACK request fu(or ^T/@APLNAM/ hauHs different pid fuhrom hello .. WTO vrejected>
	X	CSFv(,<Class schedulervH error: ^E/G$ARG1vh/>
	X	DDI,<Disk wdrive number ^D/Gw($ARG1/ invalid onwH SET command>
	Xwh	DJF,<SET ONLINE xfailed because ^Ex(/G$ARG1/>
	X	DUFxH,<DEVTYP UUO failxhed for device ^W/yG$ARG1/:>
	X	EDCy(,<Job scheduling yH^T/@G$ARG1/d for yhspecified CPU(s)>z
	X	IAP,<^T/@G$Az(RG1/ is not runnizHng>
	X	ICN,<Chanzhnel number ^D/G$A{RG1/ invalid on S{(ET command>
	X	I{HDD,<^T/@G$ARG1/ i{hs not a valid dis|k structure .. co|(mmand ignored>
	|HX	IDS,<^T/@G$ARG1|h/ is not supporte}d for /DEVICE .. }(command ignored>
	X	IMT,<Illegal }hmessage type ^O/G~$ARG1/>
	X	INS,<~(Operator at node ~H^N/G$ARG1/ not en~habled for node ^N/G$ARG2/>
	X	INT(,<Invalid node orH no terminal linehs for node ^N/G$ARG1/>
	X	ION,<OP(R hello message nHode ^N/G$ARG1/ inhvalid .. OPR ignored>
	X	IOT,<Inv(alid object type H^O/G$ARG1/ specifhied in message>
	X	ISP,<Insuffici(ent privileges toH set ^W/G$ARG1/>
	X	IRD,<Can't ^T/@G$ARG2/ a disk (device (^W/G$ARG1H/:)>
	X	ITD,<^T/h@G$ARG1/ is not a valid tape drive( .. command ignorHed>
	X	LAO,<ORIOhN log file ^F/LOGFD/ already open (.. command ignoreHd>
	X	LFE,<ORIONh log error ^E/[-1]/ .. logging dis(abled>
	X	MBP,<OHRION must be [1,2h] or JACCT to ^T/@G$ARG1/ CPU job (scheduling>
	X	MHDA,<Can't ^T/@G$AhRG2/ a device controlled by MDA (^(W/G$ARG1/:)>
	X	HMNV,<Message ^D/Gh$ARG1/ no longer 	valid .. sender h	(as gone away>
	X	H	NJA,<Can't ^T/@G	h$ARG2/ device, OR
ION not [1,2] or 
(JACCT>
	X	NMC,<N
Ho messages found 
hwith code ^O/G$ARG1/>
	X	NMN,<No (messages for nodeH ^N/G$ARG1/>
	X	hNON,<No operators

 at node ^N/G$ARG

(1/>
	X	NSM,<Mess

Hage ^D/G$ARG1/ do

hes not exist>
	XTD,<^T/@G$ARG1/ignored>
	X	OAE,(<DN60 OPR at nodeH ^N/G$ARG1/ alreahdy exists>
	X	ONE,<OPR not enable(d for message ^D/HG$ARG1/ at node ^hN/G$ARG2/>
	X	OSF,<OPR setup fail(ure for pid ^O/G$HARG1/ .. OPR ignohred>
	X	PER,<Command error: ^T/@G($ARG1/>
	X	RWF,<H^T/@G$ARG1/ file hretrieval waits failed  ^E/[-2]/>
	X	SIC,<SET ONLIHNE ^T/@G$ARG1/ chhannel number ^O/G$ARG2/ invalid>
(	X	SID,<SET ONLINHE ^T/@G$ARG1/ devhice number ^O/G$ARG2/ invalid>
	X(	SJF,<SET JOB schHeduler error: ^E/hG$ARG1/>
	X	SJN,<SET JOB invalid (.. job ^D/G$ARG1/H not logged in>
h	X	SPI,<SET priority value ^D/G$AR(G1/ invalid .. 63H is maximum>
	X	hSSF,<SET SCHEDULER error: ^E/G$ARG(1/>
	X	TAB,<TAKEH command aborted hbecause ^T/@G$ARG1/ not running
	(	on command "^T/@HG$ARG2/">
	X	UFRh,<UUO failed trying to ^T/@G$ARG2/( ^W/G$ARG1/:>
	XH	UUF,<SETUUO failhed trying to ^T/@G$ARG1/ CPU job s(cheduling>
	X	WTHL,<WTO/WTOR messahge length ^D/G$ARG1/ exceeds max o(f ^D/[WTOMAX]/>
H		LIST
		SALL
	LIST
		SALL
	L;<rP L;<YP L;<I9P!L;<\YP  L;<kP'@L;=+qP @L;=xUP"L;=xrP L;>-P L;>MP @L;>NP$L;>N8P M:=P MF:=p M2

pP MR%eHQ MR&`P MR6L`P MRV>9P MS) P MS.[yQ N$ {hl

X	<CAT|ALOG>,0,CATTAB,
|(
X	<CONFIG>,1,CN|HFTAB,CNFORN

X	|h<LCP>,2,LCPTAB,LC}PORN

X	<NCP>,3}(,NCPTAB,

X	<QU}HOTA>,4,QUOTAB,

>,4,QUOTAB,
N%Iw ~p	X	OPERAT	X	OPERATN:}KsQ O*6:=P Q\t9RP$Q\t: P"Q\t<P!Q\tLuP @Q\u[2P  Q\uj P Q\vH8P Q\vXPP Q\v\QP S;:P SBI;P U
IjQp U
Ikp U
Il}p WMX4 _v_
	X	ALIGN^`,ALI		
	X	BACKSP_8ACE,BKS		
	X	CAN_xCEL,CNC		
	X	CLO`SE,CLO		
	X	CONT`8INUE,CNT		
	X	DE`XLETE,DEL		
IFN	F`xTDN60,<
	X	DEFINaE,DEF		
> ;END Fa8TDN60
IFE	FTDN60aX,<
TOPS10<	X	DEFaxINE,DEF	>	
> ;ENbD FTDN60
	X	DISAb8BLE,DIS		
	X	DISbXMOUNT,DSM		
	X	EbxNABLE,ENA		
	X	EcNTER,ENT		
	X	EXc8IT,EXT		
	X	FORWcXARDSPACE,FWS	
	Xcx	HELP,HLP		
	X	HdOLD,HLD		
	X	IDEd8NTIFY,IDN		
	X	MdXODIFY,MOD		
	X	MdxOUNT,MTN		
	X	PAeUSE,PAU		
	X	PUSe8H,PUS		
	X	PRINTeX,PRT		
TOPS10<	Xex	RECOGNIZE,REC >	f	
	X	RELEASE,RELf8		
	X	REPORT,RPTfX		
	X	REQUEUE,REfxQ		
	X	RESPOND,RgSP		
TOPS10<	X	Rg8ESTRICT,RST >		
gX	X	RETURN,RTN		
gx	X	ROUTE,RTE		
	hX	SEND,SND		
	X	h8SET,SET			
	X	SHhXOW,SHW		
	X	SHUThxDOWN,SHD		
	X	STiART,STA		
	X	SUBi8MIT,SUB		
	X	SUPiXPRESS,SUP		
	X	TixAKE,TAK		
	X	UNLjOAD,UNL		
TOPS10j8<	X	UNRESTRICT,URjXS >	
	X	WAIT,WAIjx		


	X	SWITCHk,SWI		


	X	LOk8CK,LOC		
	X	UNLOkXCK,ULC		


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

	WMxU l8vg
X	JOB,JOlXB				
X	OPERATORlx,OPR			
X	TERMINAL,TRM			
RMINWN{y rxz
X	AFTER,sAFT			
X	<ANF-10s8>,ANF			
X	ALL,AsXLL				
X <ALL-MEsxSSAGES>,ALM			
Xt <ALL-NODES>,ALG	t8		
X	ASK,ASK				tX
X	ATTRIBUTE,ATRtx			
X(<BEGINNINGu-OF>,BEG)			
X <u8CONTROL-FILE>,CTLuX			
X	COPY,CPY		ux	
X(<CURRENT-POSvITION>,CUR)		
X v8<CURRENT-REQUEST>vX,ACR			
X	DAYTIMvxE,DAY			
X	DECNEwT,DCN			
X <DEFAw8ULT-PPN>,DPP			
wXX <ERROR-MESSAGESwx>,ERM			
X <EVERxY-REQUEST>,AER			x8
X	FILE,FIL			
xXX (<FORMS-TYPE>,FxxOT)			
X	IGNORE,yIGN			
X	IMMEDIAy8TELY,IMM			
X	<JyXOB-MESSAGES>,JOM	yx	
X	KEYPAD,KPD		z	
X (<LIMIT-EXCEz8EDED-ACTION>,LEA)zX		
X	LINE,LIN			zx
X	LOG,LOG				
{X	LOGGING,LGG			
X	(<LP20-SIMULAT{XION>,LP2)		
X (<{xMEMORY-LIMITS>,ME|M)			
X	MESSAGES|8,MSG			
X	(<NETW|XORK>,NET)			
X	N|xODE,NOD			
X	NOK}EYPAD,NKP			
X(<}8NOOPR-INTERVENTIO}XN>,NOI)		
X <OPR}x-ACTION-MESSAGES>~,OAM		
X	<ONLINE~8>,ONL			
X(<OPR-~XINTERVENTION>,OIA~x)		
X	OTHER,OTH			
X <OUTPUT-DIS8PLAY>,OPD			
X(<XOUTPUT-LIMITS>,OPxL)			
X (<PAGE-LIMITS>,PGL)			
X8	PARAMETERS,PRM		X	
X	PRIORITY,PRIx			
X (<PRIORITY-LIMITS>,PRL)		
8X <REJECTION-LISTX>,REJ			
X	REQUExST,RQN			
X	QUEUE,QUE			
X	<QUEU8E-NAME>,QNM		
IFXN FTDQS,<
X	SERVxER,SRV			
>
X	SITGO,SIT			
X	ST8ATUS,STS			
X	SYXSTEM,SYS			
X <SxYSTEM-OPR-INTERVENTION>,SOI		
X <8TAKE-COMMANDS>,TAXC			
X (<TIME-LIxMITS>,TIM)			
X	TIMESHARING,TSR		8	
X	TO,TO				
XX	TYPE,TYP			
X	(x<UNIT-TYPE>,UTY)		


X	<7>,7TK	8			
X	<9>,9TK			X	
X	<DEFAULT>,DFxL			
X	<EVEN>,EVN			
X	<MAGTAPE>8,MTA			
X	<ODD>,XODD			


X	<INxPUT>,NQI			
X	<OUTPUT>,NQO			
X	8<LOCAL>,LCL			
XX	<REMOTE>,RMT			

;DN60 KEYWORDS	

IFN	FTDN60,<

X	<BYTES-PER-M	XESSAGE>,BPM		
X		x<CLEAR-SEND-DELAY
>,CSD		
X	<DATA-
8TERMINAL-READY>,D
XTR 
X	<EMULATION
x>,EMU			
X	HASP,HSP			
X	OFF,OFF8				
X	ON,ON				X
X	<RECORDS-PER-xMESSAGE>,RPM 
X	

SECONDARY,SEC			

8
X	<SILO-WARNING-

XLEVEL>,SWL 




x

X	<TIMEOUT-CA
X	RANSPARENCY>,TR
X	2780,278		
X	3780,378			
X	CPU,CPU				
X8	<DL10-PORT>,D10	X		
X	DTE,D20				x

> ;END FTDN60



X	<ACKNOW8LEDGED>,ACK		
X	X<ALL-TAPE-DRIVES>x,ATP		
X	<ANSI>,ANS			
X	<AUTOMA8TIC-VOLUME-RECOGNXITION>,AVR	
X	<AxVAILABLE>,AVA			
X	<CHANNEL>,CHN	8		
X	<DRIVE>,DRVX			
X	<DISK-DRIVxE>,DSK		
X	<DOMESTIC>,DOM			
X	<8EBCDIC>,EBC			
XX	<FOREIGN>,FOR			x
X	<INITIALIZE>,INI		
X	NO,NO			8	
X	<REGULATED>,XREG			
X	<SCRATCxH>,SCR			
X	<STRUCTURE>,STR			
X8	<TAPE-DRIVE>,TAPX		
X	<TOPS20>,T2x0			
X	<UNAVAILABLE>,UAV		
X	UNI8T,UNI			
X	<ACTIXVE-SWAPPING-LIST>x,ASL 
X	<CRASH-DUMP-LIST>,CDL		
8X	<SYSTEM-SEARCH-XLIST>,SSL 

;X	x<UNLABELED>,UNL		
X	<UNREGULATED>8,URG		
X	<VOLUMEX-ID>,VID			
X	YExS,YES				
X	200,200				
X	556,5586				
X	800,800	X			
X	160,160			x	
X	625,625				




X	<BIAS-8CONTROL>,BIA		
XX	<SCHEDULER>,SCH	x		
X	<NONE>,NON			
X	<BACKGROUND8>,BCK		
X	<CLASSX>,CLS			
X	<ACCOxUNTS>,ACT			
X	<ALLOCATED>,ALO			8
X	<WITHHELD>,WHXD			
X	<POLICY-PxROGRAM>,PPR		




X	<AUTOMATI8C-STRUCTURE-RECOGXNITION>,ASR	
X	<xSYSTEM-LISTS>,SLS		
X	<INCLUDE>,I8NC			
X	<EXCLUDEX>,EXC			
X	<ALLOxCATION>,ALC		
X	<BATCH-REQUEST>,B8RQ		



X	<KSXYS>,KSY			


x
X	<USAGE>,USG			
X	<BILLING-CLOS8URE>,UBC		
X	<FIXLE-CLOSURE>,UFC		x
X	<EVERY>,WKY		 	
X	<NOW>,NOW			 8
X	<DAILY>,DLY		 X	



X	<BATMA xX>,BMX			
X	<BAT!MIN>,BMN			
X	<C!8ORMAX>,CMX			
X	!X<CORMIN>,CMN			
!xX	<DATE>,DAT			
"X	<LOGMAX>,LMX			"8
X	<SCHEDULE>,SC"XD			
X	<JOB-SCHE"xDULING>,JSC		
X	#<ALL-CPUs>,ACP			#8
X	<ONLY>,NLY			#X
X	<LISTS>,LST		#x	
X	<DISK-CACHE-SIZE>,CSZ		

Y

um6Q @[$P [<P [LuiP [LvI9P [NF:=p [Nahrp [NaiVp [Naj2p [NajQp [NajZp [NakRp [Nalp [Nal}p [PvNP']ah2p ]aiVp ]akVp ]akZp ]al}p ]tEHQ ]ukQ @]v>9Q  ]!iUp ]!kp ]!lp ]!lpp ]!l}p ]$,}P ]>!h4p ]>!h7p ]>!hzp ]>!iVp ]>!k6p ]>!kVp ]>!kZp ]>!k\P ]>!kqp ]>!kxp ]>!l}p ]>!mp ]Pu[Q @]VlP ]Vn<[P ^eyw r	G$$LGN	^:d[PQ _t,yQ _v}Q `_
QkRp _
Ql}p _
Qmp _
Qm7p _
U|W m8w
X	(<BATCmXH>,BAT)			
X	(<CmxARD-PUNCH>,CDP)		n
X	<CARD-READER-n8INTERPRETER>,BIN	nX
X	(<EVENT>,EVT)nx			
X	<FAL>,FAL	o		
TOPS20 <
X	<o8FILE-RETRIEVAL>,RoXET 		
> ;END TOPoxS20
IFN FTFTS,<
X	<FTS>,FTS			
p8> ;End of FTFTS cpXonditional
X	<MOpxUNT>,MNT			
X	(<qNQC>,NQC)			
X	(q8<PAPER-TAPE-PUNCHqX>,PTP)	
X	PLOTTEqxR,PLT			
X	PRINTrER,LPT			
X	READr8ER,RDR			;READER
RDR			;READER
V:=p _@rQ  _@rQ _@r Q _@r0Q _@r@Q _@t8Q >_@tZQ _@tEHQ _@u

zQ @_@uHvQ _@ulzQ @_@v)6Q  _@v+:Q @_@v>9Q _@vH5Q _BAkRp _BAk{p _BAl}p _BAmWp _Cip _CiVp _Cj1p _CjQp _Ckp _CkRp _Ckqp _Cksp _Clp _Clp _Cl}p _Cmp _Cmp _Cm7p _Cm9p _CYP _CZ7P _Ci9P _ClYQ _CzP _JtLx ?X{{
	DSPTAB(?8A,.KYC,B,D)
,.KYC,B,D)
_Ju9< $8z#
	KEYTAB(.KYB,A,C)
(_Ju\s 	2
		XLIST
	X	CSE,<Class scHheduler ^T/@G$ARGh1/>
	X	CWM,<Message ^D/G$ARG1/ ca(nceled^I/@G$ARG3/H>
	X	DRU,<Deviceh ^W/G$ARG1/: ^T/@G$ARG2/ed>
	X	FR(W,<File retrievalH waits ^T/@G$ARG1h/d>
	X	JLO,<Message ^D/G$ARG1/ ca(nceled .. job ^D/HG$JOB/ logged outh>
	X	LFC,<ORION  logging disabled  (by ^I/@JOBTXT/>
 H	X	MCJ,<^D/G$ARG2 h/ message(s) canc!eled>
	X	ODM,<Ou!(tput display for !HOPR modified>
	X!h	OLO,<ORION loggi"ng enabled by ^I/"(@JOBTXT/>
	X	SCC"H,<SEND command co"hmpleted>
	X	SEM,#<Entry made in ER#(ROR.SYS>
	X	SET,#H<Set accepted, ^W#h/G$ARG1/ is now ^$D/G$ARG2/>
	X	SJ$(M,<Job ^D/G$ARG1/$H modified>
	X	SO$hA,<SET ONLINE acc%epted>
	X	SSJ,<J%(ob ^D/G$ARG1/ now%H in class ^D/G$AR%hG2/>
	X	SSS,<Sch&eduler setting mo&(dified>
		LIST
		SALL
		IST
_Jv9 ?x|
	DSPTAB(@A,.SWC,B,D)
,.SWC,B,D)
_Jv=t $xz'
	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: )I~
	EXTERNA)iL	P$GPDB		;GET TH*E PDB BLOCK
	EXT*(ERNAL	P$PNXT		;GE*HT NEXT PDB GIVEN *hA PDB BLOCK
	EXT+ERNAL	P$PERR		;GE+(T ERROR BLOCK FRO+HM PDB GIVEN A PDB+h
	EXTERNAL	P$PDE,F		;GET DEFAULT F,(ILLING ROUTINE GI,HVEN A PDB
	EXTER,hNAL	P$PACT		;GET -ACTION ROUTINE GI-(VEN A PDB

	EXT-HERNAL	P$NARG		;NE-hXT ARGUMENT TYPE .TO PROCESS
	EXTE.(RNAL	P$SETU		;SET.HUP POINTER TO PAR.hSER BLOCKS
	EXTE/RNAL	P$CURR		;GET/( THE CURRENT LOCA/HTION
	EXTERNAL	P/h$PREV		;SET THE P0REVIOUS TO CURREN0(T
	EXTERNAL	P$FL0HOT		;FLOATING POI0hNT NUMBER
	EXTER1NAL	P$INIT		;PARS1(ER INIT
	EXTERNA1HL	P$INTR		;PARSER1h INTERRUPTS
	EXT2ERNAL	P$TINT		;TI2(MER INTERRUPTS
	2HEXTERNAL	P$NFLD		2h;NEXT FIELD TYPE 3AND BLOCK ADDRESS3(
	EXTERNAL	P$DIR3H		;DIRECTORY FIEL3hD
	EXTERNAL	P$NE4XT		;GET NEXT FIE4(LD
	EXTERNAL	P$T4HIME		;TIME/DATE C4hHECK
	EXTERNAL	P5$COMMA		;COMMA CH5(ECK
	EXTERNAL	P$5HCFM		;CONFIRM CHE5hCK
	EXTERNAL	P$K6EYW		;KEYWORD CHE6(CK
	EXTERNAL	P$S6HWIT		;SWITCH CHEC6hK
	EXTERNAL	P$US7ER		;USER CHECK
7(	EXTERNAL	P$NUM		7H;NUMBER CHECK
	E7hXTERNAL	P$FILE		;8FILE SPEC CHECK
8(	EXTERNAL	P$IFIL	8H	;INPUT FILE SPEC8h
	EXTERNAL	P$OFI9L		;OUTPUT FILE S9(PEC
	EXTERNAL	P$9HFLD		;FIELD CHECK9h
	EXTERNAL	P$TOK:		;TOKEN CHECK
	:(EXTERNAL	P$NODE		:H;NODE CHECK
	EXT:hERNAL	P$SIXF		;SI;XBIT FIELD CHECK
	EXTERNAL	P$RNGE;H		;RANGE OF NUMBE;hRS
	EXTERNAL	P$T<EXT		;TEXT CHECK
	EXTERNAL	P$DEV	<H	;DEVICE CHECK
	<hEXTERNAL	P$QSTR		=;QUOTED STRING
	=(EXTERNAL	P$UQST		=H;UNQUOTED STRING
	EXTERNAL	P$TAKE>		;Take processin>(g
	EXTERNAL	P$AC>HCT		;Account stri>hng
	EXTERNAL	P$N?PRO		;No process ?(required
	EXTERN?HAL	P$FIXP		;Fixup?h command pointer on error
nter 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 c:mI7P d:v;ZQ  d;Q d;|Q d;yQ d;<:Q @eQk5p eQkRp eQlp eQl}p 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:5|WP f:L{WP f;YzP 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 @gPtSP gPtPQ  gPt:Q gPtHwP gPu6Q @gPu[ZQ gPuySP gPu{@P gPv

TP gPv91P gPv\yQ @gSmp gSmp g^NHt &{w
	X	<ALL>&X,ALL		
	X	<APPEN&8D>,APD		
	X	<AVA&xILABLE>,AVA		
	X'	<CHARACTERISTICS'8>,CHR	
	X	<COPIE'XS:>,CPY		
	X	<CR'xEATE>,CRE		
	X	<(DEVICE:>,DEV		
	(8X	<FILE:>,FIL		
(X	X	<FREE>,FRE		
(x	X	<LINES>,LNS		
	X	<PAGES:>,PAG	)8	
	X	<JOBNAME:>,)XJOB		
	X	<MOUNTE)xD>,MNT		
	X	<NOD*E:>,NOD		
	X	<NO*8-SIGNON-REQUIRED>*X,NSN;NO-SIGNON-RE*xQUIRED
	X	<NOUNL+OAD>,NUL		
	X	<P+8AUSE:>,PAU		
	X	+X<REQUEST-ID:>,REQ+x	
	X	<REPEAT-COU,NT:>,RPT	
	X	<SE,8QUENCE:>,SEQ		
	,XX	<SHORT>,SHT		
,x	X	<STOP>,STP		
-	X	<JOB>,JBX		
	-8X	<SIGNON-REQUIRE-XD>,SON	
	X	<SUPE-xRSEDE>,SPR		
	X	.<PURGE>,PUR		
	X.8	<ERROR-PROCESSIN.XG>,ERR	
	X	<NOER.xROR-PROCESSING>,N/ER;/NOERROR-PROCE/8SSING
	X	<REASON/X:>,RSN		
	X	<REM/xOVE>,REM		
	X	<D0ISPLAY>,DSP		
	X08	<NODISPLAY>,NDP	0X	
	X	<OPR-ACTION0x-MESSAGE>,OAM 
	1X	<OTHER>,OTH		
18	X	<USERS>,USR		
	X	<WRITE-LOCKED1x>,WLK	
	X	<OVERR2IDE-SET-NUMBER>,O28SN 
	X	<REMOTE>,2XRMT		
	X	<SUMMAR2xY>,SUM		


	X	3<COUNT:>,CNT		
	38X	<DENSITY:>,DEN	3X	
	X	<INCREMENT:3x>,INC	
	X	<LABEL4-TYPE:>,LBT	
	X	48<OVERIDE-EXPIRATI4XON:>,OVR 
	X	<OW4xNER:>,OWN		
	X	<5PROTECTION>,PRO	
	X	<STARTING-VOL5XUME-ID:>,SVI;/STA5xRT-VOLUME-ID:
	X6	<TAPE-DISPOSITIO68N:>,TDP	
	X	<VOL6XUME-ID>,VID		

6x

	X	<WINDFALL:7>,WFL		
	X	<CLAS78S-ASSIGNMENTS:>,C7XAS 
	X	<NOCHECK>7x,NCK		



	X	8<NO-SESSION-ENTRI88ES>,NOS 



	8XX	<CANCEL>,KIL		
	X	<CM>,CM			
	9X	<NEW>,NEW		
	X98	<PM>,PM			
	X	<9XSA>,SA			
	X	<SC9xHED>,SCH		


:
	X	<FAILSOFT>,FS:8F		



	X	<DE:XNSITY:>,MDN		
	X:x	<DIRECTORY-FILE:;>,MDI	
	X	<LABEL;8-TYPE:>,MLT	
	X	;X<MULTI-REEL:>,MRL;x	
	X	<PARITY:>,M<PR		
	X	<TRACKS:<8>,MTK		
	X	<VOLU<XME-SET:>,MVS	

<x

	X	<CFE>,HCF	=	
	X	<CI>,HCI		
	X	<CPU>,HCP		
=X	X	<DISK>,HDI		
=x	X	<MONITOR-MEMOR>Y>,HMM	
	X	<NI>,>8HNI		
	X	<TAPE>,>XHTA		
	X	<UBAS>,>xHUB		
	X	<UNIT-RECORD>,HUR	

gg

V x!U
	IFNB <B>,<TOPS10<A==B8>>
	IFNB <C>,<TXOPS20<A==C>>
PS20<A==C>>
ijp ij7p ij|p il}p i %8z+



	G$$ATB				

	GiuI7P'inL}PLi?kppi?lpi?l}pLi?4(H!\IFNFTUUOS,B			;DEFINEUNi?4HK!`IFNFTJSYS,	INTERN(AEDT	igPigX<P)AEDTo<tQ po<t]VQ @o<u+qQ  o<ux1Q oPu+qQ oPu86Q oPu:6Q @oPu[yQ  oPuiQ  oPuiWQ @oPui\Q oPv

[Q #`oPv:TQ oPv;RQ oR}X<P ap AY
	XLIST
?	A==.ZZ
	.ZZ==.@ZZ+1
	LIST
	SALL
	NOD.NX q@ 0{
	A==:B
	A==:B	&

:` @X|
	IF2,<IF@xNDEF INTACK,<EXTEARN INTACK>>
	PUSA8HJ	P,INTACK
	JUMB(P	[ITEXT (A)]
	[ITEXT (A)]

u|P`E=P;PP$&:2PEh6P @FN8P `dLuP  f:P  f,P  f=P !f=P  fH8P  h6P {p )1P  `6)1P  `

SP S@P $p $=p %I7p %h6p &;Vp &=p &[p 'tp 4+P  6VP  mhuQ  m|wQ n+;Q @uyP 9P  4VP   5TP  !6X;P   &2P  p*i9P /*|*2P @/JP'/JP'/JHP"9/J P'/J$P"7/J%lP"(/J0P'/J5lP"(/J@P'/JU+P"8/JdJP"9/J}P"/KP"8/KP"/LuP"*/LxP"I/LyP"/LzP"</L9P"/LZP"/LP"@/LP"/LP!/LP"/LP"/LP"=/LSP"/LYP"+/LuP"/LvP"4/LyP">/LP"+/LP"/LPP",/LYP",/L(:P /L(uP";/L)3P"/L*0P":/L*7P /L*yP!/L+7P"E/L+<P"E/L,P""/L,XP"A/L9P"5/L9P /L:P"-/L;P!/L;P"</L;7P"F/L;<P"F/L;QP!/L;ZP!/L<P")/L<P"/L<rP""/L<}P"J/L=P"/L=P!/L=9P"/LD(P")/LDHP"*/LH:P"G/LH<P"/LHwP"/LI3P!/LI6P!/LIVP"/LJ9P!/LKP"D/LKvP"./LLP"/LL[P"-/LLuP"./LLvP!/LMP"#/LXQP"//L[:P"#/L[PP!/L[ZP!/L\VP"/L]WP"/L]ZP 	/L^P"@/L^P!/Lh6P 	/Lj6P"/LkyP"//LkzP"	/LmyP!/MP!/MP!/M

xP"$/MP!/MwP"	/M6P"
/MQP"?/MTP"0/M+qP /M+vP"
/M,qP"H/M<P"/M<|P"A/MHvP"!/MI0P"/MIsP"

/MK<P"G/MKqP!/MKsP"

/ML	P"/MLzP"J/MY6P"/M[ZP /M[rP!/M\sP"/M]P"/M]P!/Mi:P"/MjxP"/MkP"I/Mk`P"0/MkrP"/MktP"/MkwP";/Mk{P"D/Ml1P /Ml4P" /Ml7P" /MnP!/Mx6P"/MyP"/MySP"$/Mz0P"/M{@P"%/M{VP"/M|P"/M|P"/M|P /M}P"/N:P!	/N	vP"/NP /N

P">/N

TP"/N

VP"/N

VP"/N

ZP!
/N!/NVP"/N2P"/N)P /N)1P!
/N)3P"1/N)5P"/N)6P!/N)8P!

/N+:P"!/N,P"%/N,P!/N,7P"/N,xP!

/N,zP!/N-P!:/N8yP"1/N91P"&/N9:P!/N:P!/N:P!/N::P"/N;P"?/N;RP!/N;tP"/N<vP"5/N=P!/N=P"2/N=P"/N=1P!/N=8P!/N=tP!/N=vP"&/N>9P"/NDHP"3/NH1P"/NH5P!/NH8P"2/NJ6P"/NK`P"/NKzP"'/NLPP"'/NLVP /NLyP"/NN8P"/NX;P"3/NXQP"B/NYQP"C/N[P!/N[TP"4/N[VP!/N\SP"6/N\YP!/N\sP"B/N\yP /N]P"/Nj2P"6/Nx4P!/NzP"=/Nz|P"C/O9P"76~

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

>m1P">m	tP">mP">mKsP">m[rP">mi\P">mnP">myP">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<7P">n<wP">n=P">n=P">n=1P">n=8P"?%LP ?%X<P ?%[ZP ?%l1P ?%|P ?&P ?&

(xP K

)VP K

*QP K

=9P K$YVP K$]P N-P !ND;P @NLWP !&NL=P !%NLI7P !!NL\PP !&NMP !#NMQP !%NMHZP ! NMLzP !'NMi;P !'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$<rP O$MP O$[RP O$lVP O%P AO%wP O%I0P O%L	P 
O%Y6P O%]P 	O%ktP O%lwP O%mP 	O%z0P O%|P O&	vP O&

TP O&)P  O&,P O&;tP O&;wP O&=vP O&J6P O&KzP O&LPP O&]P 
O&x:P AO.	VP @O.
QP @O.

zPjAO<P$O<P$O<PP$O<89P$O<:P$O<;P$O<;ZP$O<<P$O<<RP$O<I7P$O<I;P$O<LxP$O<\YP$ O=]YP$!O=huP$O=iP$O=i9P$

WP$O>

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

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