Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99h-bb - qsrmac.unv
There are 88 other files named qsrmac.unv in the archive. Click here to see a list.
x
,R@P C
yhrp C
yj2p C
yj:p C
ykWp C
yl}p C
ymp C
ym7p C
~\yP C
vlvP'pCjvP C,uh5Q C,vN8P'C4tQ pC4tPQ |C4t;P C4t;ZP C4tMZQ C4uI7Q xC4uXwP'~C4uh6P'C4v
VQ  C4v
YQC4v\rQu@C6
	X	(BAT,_I.TYTTY)
	X	(LPT,_).TYLPT)
	X	(PTP,ua.TYPTP)
	X	(CDP,uA.TYCDP)
	X	(PLT,_	.TYPLT)
	X	(RDR,.TYCDR)
	(RDR,C@P CNah9Q CNajQP CNakQQ  CNakXQ CNakYQ @CNalQ CNalVQ CNalpQ CNamvQ @CS&*1 ZYp			
	LSTOZ1F.
	X	<Invalid>,[I%INVLD,0	
	X	<LO\	WER>,%LOWER,.OTLP\(T	
	X	<UPPER>,%U\HPPER,.OTLPT	
	X	\h<PHYSICAL>,%PHYCL],<.OTLPT,.OTPTP,.](OTCDP,.OTPLT>
	X]H	<>,%GENRC,-1		
]h	X	<SITGO>,%SITGO^,.OTBAT	
	LSTON.OTBAT	
	LSTON.E-+qQ E4P GqhVp Gql}p  GSP GJ;P G=P G]6P G thtQ @G tlzQ  G u(WP'G")iVp G")j7p G")j:p G")k9p G")lzp G")l}p G0t(:P$G0t,2P'G0u+qQ xG2iiQp G2ijQp G2n:=p G4P G7
P G7
GPvG?)l}pzGDt+P:GDvN8P[GDv\rQxGLtIYPGLtiP'GLtkPGLu+qQxGLuKqP'~GNih1p 	GNih3p GNii7p GNiiRp GNiiVp GNiiXp GNiiYp GNijQp GNikp GNikZp GNiktp GNilWp GNim9p GNn:=p 
	RADIX 5^i+5
	IF1,<IFDEF LxI.A,<PRINTX Mult.xh defined limit payrameter A>>
	IFy(L <36-C>,<PRINTXyH Illegal C for lyhimit A>
	IFL <3z5-D>,<PRINTX Illz(egal position forzH limit A>
	IFLEzh <EQLMSZ-B>,<PRI{NTX Illegal B fo{(r limit A>
	L.{HA==<BYTE (18) B {h(9) C,D>
	RADIX 4+4
>
	RADII6LUP I62 A 

	X	BAT
a	X	LPT
	X	CDP
	X	PTP
	X	PLT
	X 	MNT
	X	RET
	X	EVT
X	RET
	X	Ir%lP Ir5lP ItI1P It[:P ItkQQ xIu
xP Iu+qP'Iv
WP IvLVP IjQp Ikzp Il}p I=Q INXI$v8:Q @I$vN8P'I&:=p I?: "	
	IFN <%%"I.MOD-<SIXBIT /QUA")SAR/>>,<EXTERN G$"iSCHD>
	SETOM	G$SCHD
	SETOM	G$SJP KDtzP!@KDtQ KDt:Q KDuWP KDu9P  KDu(QP KDuKtP'KDukzP KDum6P'KDv
TP KDv
WQ xKDv
[P KDv)P  KDv98Q |KDv<P @KDvlYQ xKDvx6P$KDvx6P"KF<}P KFF:=p ;KFN:=p 8KFe\}P KFu\}P KGF:=p ;KH$P KH$wP KH$+3P KH$9P 
KH$9P KH$9P 
KH$<SP KH$KVP KH$\]P KH$yP KH%9P 	KH%VP KH%rP KH%:P KH%SP KH%P KH%P KH%pP KH%wP KH%wP KH%yP KH%P KH%WP KH%YP KH%Z7P KH%\P 
KH%\RP KH%\XP KH%]P KH%]P KH%]QP KH%jqP KH%kyP KH%lrP KH%m0P KH%n7P KH&P KH&
QP 
KH&+YP KH&-P KH&9P KH&;\P KH&[yP KH&\9P KH&\zP KH&j2P KH&j:P KH&}WP KH'P KHt9P KK9 '
	LSTOF.

	X	BMG,<Bad MO&aDIFY Group>,MF.FA'1T
	X	ICM,<Illega'Pl CREATE Message>'p,MF.FAT
	X	IFS,<(Illegal File Spec(0ification>,MF.FAT(P
	X	ILM,<Illegal(p LIST Message>,MF).FAT
	X	IFD,<Ill)0egally Formatted )PDevice Name>,MF.F)pAT
	X	IMT,<Illeg*al Message Type>,*0MF.FAT
	X	INF,<I*Pllegal Number of *pFiles>,MF.FAT
	X+	IPE,<Insufficien+0t Privileges Enab+Pled>,MF.FAT
	X	M+pTL,<Message Too L,ong>,MF.FAT
	X	M,0TS,<Message is To,Po Short>,MF.FAT
,p	X	NKC,<Not a Kno-wn Component>,MF.-0FAT
	X	NOR,<Numb-Per Out of Range>,-pMF.FAT
	X	NYO,<N.ot Your Object>,M.0F.FAT
	X	SNY,<Sp.Pecified request i.ps Not Yours>,MF.F/AT
	X	UQS,<Unkno/0wn Queue Specifie/Pd>,MF.FAT
	X	UOS/p,<Unknown Object 0Specified>,MF.FAT00
	X	WVN,<Wrong V0Persion Number>,MF0p.FAT
	X	IAS,<Inv1alid Account Stri10ng Specified>,MF.1PFAT
	X	IMM,<Ille1pgal MOUNT Message2>,MF.FAT
	X	MPN,20<MOUNT Request Pr2Pocessor Not Runni2png>,MF.FAT
	X	CD3U,<Can't Default 30User Name>,MF.FAT3P
	X	CDD,<Can't D3pefault Connected 4Directory>,MF.FAT40
	X	NSD,<No such4P device>,MF.FAT
4p	X	CDA,<Can't Del5ete an Allocated 50request>,MF.FAT
5P	X	PRB,<Privilege5ps Required for By6pass Label Proces60sing>,MF.FAT
	X	6PICD,<Illegal Conn6pected Directory S7pecified>,MF.FAT
	X	IFC,<Invalid 7PFunction Code Spe7pcified>,MF.FAT
	8X	MDA,<MDA is not80 supported in thi8Ps monitor>,MF.FAT8p
	X	SDY,<Specifi9ed Device is not 90Yours>,MF.FAT
	X9P	IVN,<Invalid Vol9pume Set Name Spec:ified>,MF.FAT
	X:0	ISS,<Invalid Swi:Ptch Specified in :pa Structure Mount; Request>,MF.FAT
	X	MRP,<Mount Re;Pquest is not Pend;ping>,MF.WRN
	X	M<IN,<Mount Illegal<0 for 'No Operator<P Intervention' Re<pquest>,MF.FAT
	X=	IPB,<Invalid Pat=0h Block Specified=P>,MF.FAT
	X	IBL,=p<Invalid Block Le>ngth/Count Specif>0ied>,MF.FAT
	X	M>PVB,<Multiple Volu>pme Set Name Block?s is Illegal>,MF.?0FAT
	X	IMO,<Inva?Plid message recei?pved from ORION>,M@F.FAT
	X	NUA,<No@0 Units Available @Pfor Mounting this@p Request>,MF.FAT
	X	RTE,<Route TaA0ble Entry does noAPt Exist>,MF.FAT
Ap	X	ISO,<Invalid SBource Object SpecB0ified in Route CoBPmmand>,MF.FAT
	XBp	IDO,<Invalid DesCtination Object SC0pecified in RouteCP Command>,MF.FAT
	X	CRG,<Cannot RDoute a Generic UnD0it>,MF.FAT
	X	USDPT,<Unknown deviceDp or structure namEe>,MF.FAT
	X	ERZE0,<Ersatz devices EPmay not be mounteEpd>,MF.FAT
	X	DNMF,<Device may not F0be mounted>,MF.FAFPT
	X	VID,<VolumeFp identifier must Gbe specified>,MF.G0FAT
	X	VIU,<VoluGPme identifiers muGpst be unique>,MF.HFAT
	X	ISA,<IlleH0gal attribute forHP structure mount Hprequest>,MF.FAT
I	X	ITA,<Illegal aI0ttribute for tapeIP mount request>,MIpF.FAT
	X	ILN,<IlJlegal logical namJ0e>,MF.FAT
	X	IDEJP,<Invalid densityJp>,MF.FAT
	X	ILT,K<Invalid label tyK0pe>,MF.FAT
	X	RNKPS,<Reelid not speKpcified in mount cLommand>,MF.FAT
	L0X	APE,<Already peLPnding Event QueueLp entry>,MF.FAT
	MX	ASN,<Ambiguous M0structure name>,MMPF.FAT  		;[1226]
	X	ISN,<Invalid Nstructure name>,MN0F.FAT		;[1226]
	NPX	GDN,<Generic deNpvices may not be Omounted>,MF.FAT ;O0[1226]
	X	PLD,<POPathological name Opinvalid>,MF.FAT		P;[1226]
	X	IER,<P0Invalid EQ requesPPt message format>Pp,MF.FAT
	X	MRD,<QMulti-reel DECtapQ0e volume-sets areQP not permitted>,MQpF.FAT
	X	XXX,<ThRis is a text buffR0er for messages bRPuilt on the fly. RpMAX 70 charactersS>,MF.FAT

	LSTON..FAT

	LSTOKXt:Q  KXuZQ @KXvN8P KZ-m aqH

X	TMR,a1<TIMER >,.POPJ,.Pw1OPJ,<EV.INT>,<>	
X	KSY,<KSYS  >,Ib$SKSY,I$KKSY,<EV.bACHK>,<Timesharingb` will end> 
X	SPcL,<SPOOL >,.POPJ,c .POPJ,<EV.INT>,<>c@	
X	ATO,<TAKFIL>c`,Q$EVTR,.POPJ,<0>d,<Time-of-day OPRd  command file> 
d@X	USG,<USGFIL>,I$d`UFIL,.POPJ,<0>,<Uesage file closuree >	
X	BIL,<BILCLSe@>,I$UBIL,.POPJ,<0e`>,<Usage billing fclosure>	
X	OPR,f <OPRFIL>,I$OCLS,.f@POPJ,<0>,<ORION lf`og file closure>	g
X	LCK,<FSLOCK>,g .POPJ,.POPJ,<EV.Ig@NT>,<>	
X	IGN,<Ig`GNORE>,.POPJ,.POPhJ,<EV.INT>,<>	
Xh 	AFT,<AFTER >,.POh@PJ,.POPJ,<EV.INT>h`,<>	
X	NLC,<LOCKiED>,.POPJ,.POPJ,<EV.INT>,<>	

Malp Malzp Mal}p MemP MF:=p M2,zP M:mMP M@tI6P$M@th|P M@tiSQ ~M@tkP"M@tlQ |M@tlxQ xM@uI7Q xM@u\YP M@uiTP!M@vyP  M@v(sQ ~M@v(vP M@v)7P M@v)VQ |M@v<P @M@wP MBn:=p MCF:=p MJmkyQ ]?X6MJn:hQ pMJn:iP MJn[TP MO*yP @MO,P MO,P MOiP MOj1P MO[YP MO\YP MOj1P MO
ZP _MO[P MO=Q gN`MO|P MR%eHQ MR&`P MR5HUQ MRL+9Q MRMiWQ MRV>9P MS) P MS2P MS.[yQ N:LP N:LP N:$X2Q N:%kyQ ]?X6N:%m1P N:&
TP N:5I0P N:5mP N:L9P tN:L;yP N:MKsP N:MLP dN:NPN:N
TP 
O%J6 }	
	IFNDEF |iL.C,<PRINTX Unde|Ifined limit param|)eter C>
	..Z==~YB
	..O==<L.C&77~x7777000000>_-^D18
	..Z==..Z+..O
8	..S==<L.C&77700X0>_-^D9
	..P==<Lx.C&777>
	..P==^D35-..P
	..Z==..8Z+<..S>B11+<..P>BX5
	LDB	A,[EXP ..Z]
	A,[EXP .PP QtlVQ @Q
yiVp Q
ykzp Q
ylXp Q
yl}p Q4.2P$Q4kP'Q6i9Q xQaiVp QakVp QakWp Qakqp Qal}p 
QdQ;xQexUP'QuX<P'QukzQxS;9P&tS;97P&S;;yP&S;KsP&S;X<P&S;z8P&S;	yP&dS;P&S; W&al}p X:
=PX:KsQ](X:<PX:+qQ\$X:krQHX:|RQ$$X:J6Q$HX:$\P$$X:%KsQ+(X:46PKX:5Q=HX:5I0QjX:5|VPHX:MmYPX:t+Q$X:uyYPjX:u}QjHX:u}	QHX:}ZP X:}J6Q $X:}krQ  HX:~
Q  Y'
Q }PY'
(:Q @Y'
9Q Y'
]ZQY'QY'=P YC$SP YC$(7P YC$J;P YC%	P YC%=P YC%]6P YC&LVP YLtQ YLtlzQ  YLv=6Q YO%GP YO%yG 0H
	IFNDEF 0hLSTIN.,LSTIN.==0	1	
IFE LSTIN.,<
1(	IFIDN <XCREF><A1H>,<.XCREF>	
		  1h XLIST>		
	LSTIN.==LSTIN.+1STINYO%{G 2(
	IFG LST2HIN.,LSTIN.==LSTIN2h.-1	
	IFLE LSTIN3.,<.CREF		
		      LIST>
		   ZP [xU _i<
	X	BAT,I`INP,<<1,,77>,<0,,^`iD600>,0,<INPOIP,,`	0>,<1,,^D512>>
	`)X	LPT,LPT,<<1,,77ai>,<1,,^D500>,<FRMbNOR>,<FLEACT,,0>,b(0>
	X	PTP,PTP,<<bH1,,77>,<1,,^D500>bh,<FRMNOR>,<FLEACTc,,0>,0>
	X	CDP,Cc(DP,<<1,,77>,<1,,^cHD500>,<FRMNOR>,<FchLEACT,,0>,0>
	X	dPLT,PLT,<<1,,77>,d(<1,,^D30>,<FRMNORdH>,<FLEACT,,0>,0>
	X	RDR,RDR,<0,0,e0,0,0>
	X	BIN,BIe(N,<0,0,0,0,0>
	XeH	DBM,DBM,<0,0,0,0eh,0>
	X	EVT,EVT,<f0,0,0,0,0>
	X	FAf(L,FAL,<<FALNTY>,0fH,0,0,0>

   TOPfhS20 <
	X	RET,RETg,<0,0,0,0,0>
	X	g(NOT,NOT,<0,0,0,0,gH0>
          > ;END TOPS20

;[3@ 60<<<1_<A>>-1>B<B>>_<A>>[@ 7D
	IFB <B7(>,<MAXSIZ==0
		I7HRP A,<IFG <A-MA7hXSIZ>,<MAXSIZ==A8>>>
	IFNB <B>,<8(B==0
		IRP A,<8HIFG <A-B>,<B==A>>>
B>,<B==[EJ6 )<1_<WIDLIM(A)>>-1<WIDLIM[F)9P [F:=P [$::P [$H2P [$H:P [$IP 	[%P 	[%2P [%mTP [%mVP [&)P [&)P [&+P [&IP [&\QP [&\RP [&\VP [&\[P [&h:P [&j6P [&kRP [
H2Q [
\Y T
	LSTOF.

	X	NVM,<No VolTQume Mounted On DrTpive>
	X	VAU,<VolUume is Already inU0 Use>
	X	DAU,<DrUPive is Already inUp Use>
	X	VIL,<VoVlume on Drive is V0Labeled>
	X	RDM,VP<Reelid does not Vpmatch user's requWest>
	X	URB,<UseW0r Requested BypasWPs Label Volumes>
	X	URL,<User ReqXuested Labeled VoX0lumes>
	X	URW,<UXPser Requested WriXpte-Locked VolumesY>
	X	URE,<User RY0equested Write-EnYPabled Volumes>
	YpX	RDD,<Requested ZDensity Does not Z0Match Volume DensZPity>
	X	VND,<ReqZpuested Volume not[ on this Device>
	X	IUD,<Illegal [Pfor unavailable d[pevice>
	X	RLD,<R\equest Label Type\0 Doesn't Match Vo\Plume Label Type>
	X	DAD,<Drive is] already availabl]0e>
	X	NVI,<VOLID]P Required for Thi]ps Volume>
	X	CIU^,<Cannot identify^0 the Users Curren^Pt Volume>
	X	TDM^p,<Request Track t_ype Doesn't Match_0 Device Type>
	XP	DDD,<Device Allopcation Error - De`adlock Detected>
	X	IDD,<Illegal `Pdensity for drive>
	LSTON.drive[I7p 
[,Q [th:Q [4tKQ [4tyYQ [4ukzQ  [4v)6Q [4vx:Q @[>!iSp [>!irp [>!iwp [>!kzp [>!lXp [>!l}p [>${P'[>$|Q x[F5k( %9+SIXBIT\QSRMS1\SIXBIT\QSR[F5k) %Y-SIXBIT\QSRMS2\SIXBIT\QSR[HtuQ [Ht;ZP'[HtK7Q [HtyYQ [Hu+qQ [HuKUQ x[HukzQ  [Hv2P [HvKWP'[HvLRQ x[Hvx:Q @[NF:=p [c-j:P ?[c.
TP 
]n:=P ] O8}IF2,<IFDEFOX A,<A==A>> IFNDEF A,<A==B>]$Q ]$qp ]$(:p ]$,p ]$9p 	]$;p ]$;vp ]$<rp ]%VQ ]%p ]%Kqp ]%Lp ]%h6p ]%hYp ]%l{Q @]%m8Q ]%xUp ]%xVP ]%{VQ  ]&p 
]&
WQ @]&
]&,p ]&9wQ ]&:Q ]&:=p ]&<[Q  ]&=p ]&=vp ]'$[9@ ]CHVP ]CKP ]PtMP']PtkQ `]PuJ7P']Pu[rQ @]Pv
ZQ x]PvKzQ8]PvLPPp]PvN8Q ]Pw[Q u\Q 0u\VQ u]Q @v<wQ xvIWP'
%KQ  _
%M1Q _
Ql}p _
T8:p _
TH:p _
Up _
Ukrp _
V
2p _
V
Vp _
V*2p _
V8tp _
V:=p _
V=p 
V=p 
_
VN8p _
V[TpX<P' Z7Qx ,}PQ@-9Q H0Q htQ lVQ lYQ @=Q =8Q  h1p ip kzp :=p a&!h|P'~a&!jQP a&!jQP'a&!kP'a&!kQ xa&!kQ xa&%+qp a&%KUp a&%h6p a&&
2p a&&:=p a3$SP a3$J;P 2a3%=P a3%]6P aHukwQ @aHv*2P'aJn=P aNkp aNJ6p aNh6p aNxUp aN
2p aN:=p 
aN5kzP'aNd=9Q xaNeX<P'aSSP 
aSJ;P aS=P aS]6P ctLuQ ct^Q  cukqQ cv9Q @cv)6Q @cv8yQ  cvH8Q cvy7Q cv{Q ctzP!@ctQ ctTQ ctWQ ~ct*WQ xctKP'ctLQ xcuWP cu9P  cu(QP cukzP cv
TP cv
WQ xcv
[P'cvcv)P cv98Qv|cv<P @cvZWP'cvl}P'cvx6P$cvx6P"cF:=p cFl}p cOtJ9P!ctkP'~cuyP-@cu"cuh6Q;xcvO GENERATE THE QU!EUE HEADERS FROM @THE QUEUES MACRO
	DEFINE	X(A,B,C,D,E,F,G,H,I,J,K,L ,M),<

	IFDIF	<@E><0>,<GLOB (E)>
	IFDIF	<H><0>,<GLOB (H)>
	IFDIF	 <I><0>,<GLOB (I)>@

HDR'A::	INSVL`.(<SIXBIT\   A\>,QH.NAM)!INSVL.(C, QH.TYP)!D
	EXP	0@
	XWD	E,INSVL.(B`,QH.SIZ)
	EXP	F
	EXP	G
	EXP	H
 	EXP	I
	EXP	[ASC@IZ \J\]
	EXP	[AS`CIZ \K\]
	EXP	[ASCIZ \L\]
	EXP	[ ASCIZ \M\]
	>  ;@END OF DEFINE X
`	QUEUES			;NOW EXPAND QUEUES
EXcV.Y9 j 

	LSTOFia.

X EVT,QNTSIZI,.QHTEV,QH.IKS,S$jaEVT,LIQEVT,.OTEVTk,DEPEVT,0,<Event>SQ,<event>,<>,<>
XjA INP,QNTSIZ,.QHTIj!P,0,S$INPT,LIQBATk!,.OTBAT,DEPBAT,LIk@ST.T,<Batch>,<jobk`>,<runtime>,<execluting>
X LPT,QNTl SIZ,.QHTOU,0,S$LPl@T,LIQLPT,.OTLPT,Dl`EPOUT,LIST.D,<Primnter>,<job>,<pagem s>,<printing>
X m@PTP,QNTSIZ,.QHTOUm`,0,S$PTP,LIQPTP,.nOTPTP,DEPOUT,LISTn .D,<Paper tape pun@nch>,<job>,<feet>n`,<punching>
X CDoP,QNTSIZ,.QHTOU,0o ,S$CDP,LIQCDP,.OTo@CDP,DEPOUT,LIST.Do`,<Card punch>,<jopb>,<cards>,<punchp ing>
X PLT,QNTSIp@Z,.QHTOU,0,S$PLT,p`LIQPLT,.OTPLT,DEPqOUT,LIST.D,<Plottq er>,<job>,<minuteq@s>,<plotting>
X q`RET,QNTSIZ,.QHTARr,QH.INV,S$RET,LIQr RET,.OTRET,DEPRETr@,LIST.D,<File retr`rieval>,<requestss>,<>,<retrieving>s 
X NOT,QNTSIZ,.Qs@HTAR,QH.INV,S$NOTs`,0,0,0,0,<>,<>,<>t,<>
X BIN,QNTSIZt ,.QHTIP,QH.INV,S$t@BIN,0,.OTBIN,0,0,t`<Interpreter>,<joubs>,<decks>,<inteu rpreting>
X DBM,u@QNTSIZ,.QHFRR,QH.u`IKS!QH.INV,S$DBM,v0,.OTDBM,0,0,<>,<v >,<>,<>
X RDR,QNv@TSIZ,.QHFRR,0,S$Rv`DR,0,.OTRDR,0,0,<w>,<>,<>,<>
XxSPLw ,SPLSIZ,.QHTQS,QHw@.IKS!QH.INV,0,0,0w`,0,0,<>,<>,<>,<>
X PSB,PSBSIZ,.QHx TQS,QH.IKS!QH.INVx@,0,0,0,0,0,<>,<>,x`<>,<>
X OBJ,OBJSyIZ,.QHTQS,QH.IKS!y QH.INV,0,0,0,0,0,y@<>,<>,<>,<>
X USy`E,USESIZ,.QHTQS,QzH.IKS!QH.INV,0,0,z 0,0,0,<>,<>,<>,<>z@
X STR,STRSIZ,.Qz`HTQS,QH.IKS!QH.IN{V,0,0,0,0,0,<>,<>{ ,<>,<>
X NET,NET{@SIZ,.QHTQS,QH.IKS{`!QH.INV,0,0,.OTNC|U,0,0,<>,<>,<>,<>| 
IFN FTINFO,<
X|@ PID,PIDSIZ,.QHTQ|`S,QH.IKS!QH.INV!Q}H.VAR,0,0,0,0,0,<} >,<>,<>,<>
>
X }@IPC,IPCSIZ,.QHTQS}`,QH.IKS!QH.INV!QH~.VAR,0,0,0,0,0,<>~ ,<>,<>,<>
X FAL,~@QNTSIZ,.QHFRR,0,S~`$FAL,0,.OTFAL,0,0,<>,<>,<>,<>
X O DB,ODBSIZ,.QHTQS,@QH.IKS!QH.INV!QH.`VAR,0,0,0,0,0,<>,<>,<>,<>

	LSTON.>,<>

	LSTOeYj:p eYkWp eYl}p eYmp eYm7p e\}p e:=p e.:=P eahUp eahVp eaiRp eaiVp eaj:p eal}p eamp e	iVp e	j7p e	j:p e	l}p etWQ @et<zP'etI1Q xe"luP'e0tKQ @e0u+qP'e0v<Q  e31hrP e6]I7P e<tQ xe<v
Q@e<v[TP'e>:=p@eDuWQ@eDv+QeDvJ6PeLt;ZpeLu\speLv81p@eO)hrpBeO)hwpBeO)ipBeO)kWpBeO)lpBeO)l}pBeO)mpBeO)m7pBeO)m:pBeR-I7pBeR-xHpBeR-xIpBgl}pBgDI3PBgDjQPBgEKUPBgE[rPBgF*TP gF8tP gt*:P g4,RQ g4,I3Q g4,^Q  g4-kqQ g4.9Q @g4t;P'g4t;ZP'g4tKQ  g4uwQ @g4vQ @g4v,wQ xg4v98P'g6
TP gBf+qp gBf,=p gBf:=p gBf=Q INXgCLLP'gCM+qQ xgCMI7P'gPuKuQ  gPuySP gPuyVQ @gPu{@P gPv
TP gPv91P gRM9 j$
	LSTOF.
		X	<Invalid>,%Ij@NVLD,100
		X	<Idj`le>,%IDLE,0
		X	k<Active>,%ACTIV,0k 
		X	<Stopped>,%k@STOPD,0
		X	<Notk` Started>,%NSTRT,l0
		X	<Not Availl able>,%NAVAL,0
	l@	X	<No PTYs>,%NPTl`YS,.OTBAT
		X	<Omffline>,%OFLNE,<.m OTLPT,.OTPTP,.OTCm@DP,.OTPLT,.OTRDR>m`
		X	<System Fulnl>,%SFULL,.OTBAT
		X	<Shutting Don@wn>,%SHTDN,0
		Xn`	<Aborting>,%CNCLoG,0
		X	<Opr Reso p Wait>,%OREWT,0
		X	<Aligning Foo`rms>,%ALIGN,.OTLPpT
		X	<>,%RESET,p 0
		X	<Reading>,p@%READN,.OTRDR
		p`X	<Requeing>,%REQqUE,0
		X	<Shuttiq ng Down>,%SHUTD,0q@
		X	<Opr Outputq` Wait>,%OPRWT,.OTrLPT
		X	<Stop isr  Pending>,%STPPN,r@0
		X	<No procesr`sor>,%NOPRC,0
		sX	<Changing Formss >,%FRMCH,<.OTLPT,s@.OTPLT,.OTPTP,.OTs`CDP>
		X	<Connectting>,%CNECT,.OTFt AL
		X	<Mount wat@it>,%MWAIT,0
	LSTON.WAIT,0
	LSgR}J6 !
	IFNDEF 9L.C,<PRINTX UndeXfined limit paramxeter C>
	..Z==B
	..O==<L.C&7787777000000>_-^D18X
	..Z==..Z+..O
x	..S==<L.C&777000>_-^D9
	..P==<L8.C&777>
	..P==^XD35-..P
	..Z==..xZ+<..S>B11+<..P>B5
	DPB	A,[EXP ..Z]
	A,[EXP .gSh6p gS:=p gS=p gS{VQ  gS:=P gS<{Q @gS)hrp gS)lQp gS)l}p gV6:Q @gWhwp gWiVp gWk:p gWkWp gWlzp gWl}p 
gWmp gWm7p gWm:p gWmYp gg
V 0!
	IFNB <PB>,<TOPS10<A==Bp>>
	IFNB <C>,<TOPS20<A==C>>
PS20<A==C>>
ivl{P$i!iP'i!iVQ xi&m{PP i4,.8Q i4-i;Q  i4-m6Q i4-|{Q i4.8yQ @i4.i\Q i4.y7Q i4.{Q i>qmP i?4( x!IFN FTUUOS,B			;DEFINE UNi?4H 8!IFN FTJSYS,	INTERN AEDT	iLtI7Q `iLuH1Q @jDtlQQ @k
rHQ k
r$Q k
rU+Q k
rdJQ k
sQ k
tPQ  k
tYQ @k
tMZQ k
uTP k
u=Q |k
uyVQ k
v,wP ?pk
v96Q @k
v:P @k
v=xP k
vLUP k
v]P#k
vl{P k
v{Q  kI7p kN.:=P m$u+qQ xm$uMQ ~m$v{Q m0t9Q m0tuQ  m0twQ @m0t;ZQ xm0tI7Q @m0tkQ ~m0tlQP"m0uHZQ <m0uHuQ m0uM7Q @m0unP'm0u}wQ m0v
[Q xm0v)6Q  m0v,wP m0v8yQ m0v:Q m0v<RP$m0v=Q pm>eI7p mKc@ C$BYTE (3)AC0WHO (9)AVER (6)AMIN (18)AEDTmLtWP  mLtP'mLtP mLtQ  mLtRP mLt;Q mLt;ZQ xmLt=P mLtIP mLtI7P'mLtLP mLtMP mLtiP @mLuTP mLuHZQ mLuI7Q xmLuKUP'mLui;Q mLuk:P @mLukqP"mLuySP'~mLu|Q mLv9P$mLv
RP mLv
ZQ `mLv)6P mLv)6Q mLv*2Q xmLv,wP `mLv8yQ  mLv:7P!mLvLUP pmLvN8Q pmLvX6Q mLvl{Q @mLvx6Q mLv{Q mN%I7p mNeI7p mNuI7P mNv:=P o&%J6 Y%<L.A&777000>_-^D9A&7770oPu[yQ  p `q
.EVA==<ZZ==ZZ+1>	MD$A==q@ (z
	A==:B
	A==:BuhPP$X2P$h6P&<P&H6P,;TP,;WP-XP-}:P<[VPL;ZPNrPNsPNtPNzP N<P l87P l:P lI3P m:6P mLzP m[rP mnP n)6P n)8P uH8P u}`P 
	IFNDEF i$$A,<
		PRINTX 	UNDEFINED COUNTER	( A USED
	>
	IF	HNDEF	G$ITEM,<EXTE	hRN G$ITEM>
	AOS G$ITEM+$$A
S 	+8 T1B
	LSTOF.
	  PUSHJ	P,D$MDA	E
	  CAI	<<B>B2(3!<A>B35>
	LSTON.A>B35>
	LSTO	'$[  
)

	LSTOF.
I
	X	(ICNT,Number 
hof items in recor
	X	(NOW,Currey)
	X	(STAR,QUASAR's
	X	(QJOB,QUASAR's jo(b number)
	X	(IPHCI,Total number ohf IPCF interrupts received)
	X	(R(IPC,IPCF messagesH received)
	X	(ShIPC,IPCF messages sent)
	X	(IPCF,(IPCF send failureHs)
	X	(IPCU,Unrehcoverable IPCF send failures)
	X	((MREL,RELEASE mesHsages received)
h	X	(MCHK,CHECKPOINT messages recei(ved)
	X	(MREQ,REHQUEUE messages rehceived)
	X	(MNXT,Total NEXTJOB me(ssages sent by tyHpe)
	X	(MLST,LIShT messages received)
	X	(NLAP,LIS(TANSWER pages senHt)
	X	(SCRE,Succhessful creates done)
	X	(MMOD,MOD(IFY messages receHived)
	X	(MKIL,KhILL messages received)
	X	(MDEF,D(EFER messages recHeived)
	X	(ISPL,hImmediate SPOOL messages received)(
	X	(DSPL,DeferrHed SPOOL messagesh received)
	X	(MCAN,COUNTANSWER m(essages sent)
	XH	(SLCD,Scheduler hloop countdowns)
	X	(DEAD,MDA dea(dlock avoidance cHalls)
	X	(DFAL,MhDA deadlock avoidance failures)
	(X	(VSWM,Volume swHitch tape mount)
	X	(TAPM,Tape mount)
	X	(STRM,Ph(ysical structure Hmount)
	X	(USTM,hUser structure mount)
	X	(GENM,Ge(neric mount)
	X	H(TINP,Terminationh batch requests)
	X	(TOUT,Termina(tion print requesHts)
	X	(TCNI,Terhmination console input)
	X	(TCNO,(Termination consoHle output)
	X	(EhINP,Emulation batch requests)
	X	((EOUT,Emulation pHrint requests)
	hX	(ECNI,Emulation  console input)
 (	X	(ECNO,Emulatio Hn console output) h
	X	(IPCE,Resend! queue expiration!(s)
	X	(DTAM,DECt!Hape mounts)
	LSTON.ounts)
	LST	NNI6 
)^
	IFNDEF 
I$$B,<
		PRINTX 
hUNDEFINED COUNTER B USED
	>
	IF(NDEF	G$ITEM,<EXTEHRN G$ITEM>
	STORhE A,G$ITEM+$$B
A,G$ITEM+$$B
vyP J;P &=P ewP %X<P 
RP 9P vP KP t;P tXzP 
-I:PN:`P[ZP]P@$PP&kvPPj4PPk`PPMlPP~]PP5kP 5kzP 89P 8QP 8TP :6P |SP H9P H9P KqP LzP 9P TP 
6P H9P HTP J1P J6P 	TP 
-lQP "f$ P &%I P &vkP 2f$ P 2|:rP 2|:xP 2~y9P 6%X<P 6vKWP 6~[ZP 7<:P :h6P :~
QP 	:~JQP :~K6P :~MP ;N9P ;LZP >5KRP >uJ7Q ?-zP ?]zP BGvP C\rP J(:P JI6P J,P J-h6P J.2P J.9:P JdWP Jdj9P JenP Jf
[P Jn=P KYP K[PP K[QP K[uP N6[P NFIP NF]P NNIwP O$1P O$P O$7P O$7P O$zP O%X<P O%|P O&
P 	O&(`P R	 P Rj P Rk`P R4YP R4XQP R5HXP R5X<P R5Z7P R6DHQ R6[VP R6[[P RMlP R~]P S5`P S6 P S5{P Vd:xP Vu;@P VuHuP W	9P Z
-Q Z @Z}HVP Z}LqP [%]@Q [>-Q @j.$ P ;GP 
P )7P YRP l;Zp lKp m	p mh6p n<p n=p &Jp &Lp &Lqp &M7p 
dKp 
dKVp 
dK{p 
dLwP 
dM7P S@P 
8:P 
kp yP ,wp j2p kp kp 
kVp lqp 5J2p 5Kp 5LP 5Lzp 69YP 6;p 6;[p 6;wp 6;{p 5:6P 6)6P L)p L)p f*2p f:=p f=P mlXP 
2p M7p \zP np 
p :=p ;Vp =P &=P 
zp 
Zp 
+|p 
:p 
<zp )
I1p .
I8p !:p 8
}p ;*2P +qp 98P <p Np !\yp 4ZP 4P 4*6P 5wP 5<|P 5HuP 5X<P 5\}p 5kP 5|P 6-p 6<P 6K9P 6N8p 6Yp 6\sP d(P fP h4P h9P hwP iWP j6P kVp lHp lIp lpP lzp Sp I7p X<P {Vp ~p (rp X5P 2P 3KRP 3(VP 3+qP 3RP 32P 3[ZP 3\vP 3\yP 3]P 6Hxp 6IP  6Ip 6Lp 6L9p 6M9p 6% 6,;Zp 6,kp 6-	p 6-
}p 6lzp |6lQp 6l88p {6lkp 6m
}p 6mp y6mh6p 6n
2p y6nX9p 6nXrp z6n[9p z6n[<p y6n[Wp {6n\yp 6v)P 6v)1P 6v+VP 6v-P 6v9P 6vLzP 6vMP 6v[UP 6|H1P 6|K4P 6|LP 7up 7zp 7;Zp 	7kp 7+qp 7Ksp 	7h6p 7krp 7
2p 70p 7Mp 7\yp 7lvp 
7$p 7$7p 7%P 7&
2P 7&=P 7&N8P 7&kvP >.:P >;wP >;yP >kP >YP >YP >YP >\P >\P >\P >\RP >\WP >\\P >iP >mP >
TP ><wP >=P >H8P >J6P >5I0Q x>|kP >|lVP >}J6P >}]P >~
TP >~H8P >~[ZP >~lwP ?WP ?\P ?*7Q x?%X<P 
FI7P FLKP FLLP FL[P FH1P FIwP FKVP FMP FYP FYSP F)6P F+5P FIP FLUP FkP FkvP FzP 	FZP FzP F)wP F+P 
F9P Fj6P FlVP FlYP F(WP 
FkzP 
FmP FyP Fz2P F
QP F
TP F2P 
F)9P F[TP F[ZP F,zp F,<Rp F,J7p F-p F-p F-(Qp F-(Wp F-+qP F-J6p 	F-KUp F-Yp F-j2p F-xUp F-z2P F.
Zp F.*2P F.+qp F.98P F.=p F.\yP F.l}p FDI8p FDlYP FEJ9p FEKUp FEL7p FEkzp FExUp FF3p FF<7p FF<:p FF=6p FFH9P FFI;P FFJ8P FFK2P FFKzP FFL9P FFN8p FLkQP$FN):P"F|WP F|uP F|P F|vP F|P F|+P F|87P F|8:P F|:P F|;zP F|<2P F|<RP F|IYP F|LvP F|MYP F|\0P F|\9P F|h9P F|htP F|yYP F}WP 
F}	6P F}VP F}P F}:6P F}<|P F}H1P F}H7P F}J9P F}X9P F}X:P F}[PP F}[ZP 
F}[rP F}]P F}]P F}{P F~
VP F~(uP F~(zP F~)1P F~)6P F~)8P F~);P F~+zP F~,zP 	F~=P 
F~=8P 	F~LzP F~[VP F~iP F~k7P F~lrP F~lyP JH;` JK` JMYP J$)9p J$*Qp J$*Vp J$+tp J$+vp J$,Xp J$-Yp J,9p J,9P J,<}p J-Zp J-\wp Jfhrp JfkvP Jfl}p J|(:p J|+Rp J|-p J|-0p J|-:p KJp KJQp NlP NlKp Nlkp Nm+qp Nmh6P Nn)9P OIRP OITP O$kp O%I7p O&=P O&[Zp R$<Rp R$=yp R$I;p R$Mp R$Mp R$MZp R%	p R%
Rp R%(Wp R%Z7p R&<Rp R&=rp R4DP R4D+P R4DHP R4E*P R4EIP R4FP R5H6P R5HXP R5J6P R5KVP R5K[P Rf:=p Rf=P Rfkvp RlI7P RlK<P RlLKP RlLLP RlLRP RlL[P Rl^P RmTP RmKVP RmMP Rn+5P Rn9:P Rn=P RnkvP RnlP R}ip R}jp R}lzp V(:p V(wp V+Vp V,hP V,hp V,zp V-Vp V-Yp Zdkp ZeMp Ze]p Zeh6p Zenp Zez2p Ze}wp Zf
2p [)6p [)Vp [*2p [8tp [Np [Xqp [kvp [lwp b
p bwoP