Trailing-Edge
-
PDP-10 Archives
-
BB-FI82B-DD_1989
-
5,17/qsrmac.unv
There are 88 other files named qsrmac.unv in the archive. Click here to see a list.
x
,S*@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\rQ)@C6
X (BAT,N.TYTTY)
X (LPT,)9.TYLPT)
X (PTP,My.TYPTP)
X (CDP,MY.TYCDP)
X (PLT,(y.TYPLT)
X (RDR,.TYCDR)
(RDR,C@P CNah9Q CNajQP CNakQQ CNakXQ CNakYQ @CNalQ CNalVQ CNalpQ CNamvQ @CS&*1 $?
LSTO#)F.
X <Invalid>,#%INVLD,0
X <Lo$Ywer>,%LOWER,.OTLP$xT
X <Upper>,%U%PPER,.OTLPT
X %8<Physical>,%PHYCL%X,<.OTLPT,.OTPTP,.%xOTCDP,.OTPLT>
X& <Generic>,%GENRC&8,-1
X <Sitgo>,&X%SITGO,.OTBAT
&xX <Input>,%NQINP,'.OTNQC
X <Outp'8ut>,%NQOUT,.OTNQC'X
X <IBM batch>'x,%IBMBT,.OTBAT
LSTON.OTBAT
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 G#:=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(Y+5
IF1,<IFDEF LQ!.A,<PRINTX Mult.Q@ defined limit paQ`rameter A>>
IFRL <36-C>,<PRINTXR Illegal C for lR@imit A>
IFL <3R`5-D>,<PRINTX IllSegal position forS limit A>
IFLES@ <EQLMSZ-B>,<PRIS`NTX Illegal B foTr limit A>
L.T A==<BYTE (18) B T@(9) C,D>
RADIX 4+4
>
RADII6LUP I62 Zq%]
X BAT
[ X LPT
X CDP
[0X PTP
X PLT
X[P MNT
X RET
X EVT
X RET
X Ir%lP Ir5lP ItI1P It[:P ItkQQ xIu
xP Iu+qP'IuH:P Iv
WP IvLVP IjQp Ikzp Il}p I=Q INXI$v8:Q @I$vN8P'I&:=p I?: za\
IFN <%%{!.MOD-<SIXBIT /QUA{SAR/>>,<EXTERN G${ASCHD>
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%6P
KH%7P 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+P KH&-P KH&9P KH&;\P KH&[yP KH&\7P KH&\9P KH&\zP KH&j2P KH&j:P KH&}WP KH'P KHt9P KK9 q"d
LSTOF.
X BMG,<Bad MOQDIFY Group>,MF.FA!T
X ICM,<Illega@l CREATE Message>`,MF.FAT
X IFS,<Illegal File Spec ification>,MF.FAT@
X ILM,<Illegal` LIST Message>,MF.FAT
X IFD,<Ill egally Formatted @Device Name>,MF.F`AT
X IMT,<Illegal Message Type>, MF.FAT
X INF,<I@llegal Number of `Files>,MF.FAT
X IPE,<Insufficien t Privileges Enab@led>,MF.FAT
X M`TL,<Message Too Long>,MF.FAT
X M TS,<Message is To@o Short>,MF.FAT
` X NKC,<Not a Known Component>,MF. FAT
X NOR,<Numb@er Out of Range>,`MF.FAT
X NYO,<Not Your Object>,M F.FAT
X SNY,<Sp@ecified request i`s Not Yours>,MF.FAT
X UQN,<Unkno wn Queue Name Spe@cified>,MF.FAT
`X UQS,<Unknown Qu eue Specified>,MF .FAT
X UOS,<Unk @nown Object Speci `fied>,MF.FAT
X
WVN,<Wrong Versio
n Number>,MF.FAT
@
X IAS,<Invalid
`Account String Specified>,MF.FAT
X IMM,<Illegal M@OUNT Message>,MF.`FAT
X MPN,<MOUN
T Request Process
or Not Running>,M
@F.FAT
X CDU,<Ca
`n'teDefaultTUser
X ,<Can'tdDefaul
X NSD,<No such devi ce>,MF.FAT
X CD@A,<Can't Delete a`n Allocated request>,MF.FAT
X PR B,<Privileges Req@uired for Bypass `Label Processing>,MF.FAT
X ICD,< Illegal Connected@ Directory Specif`ied>,MF.FAT
X IFC,<Invalid Funct ion Code Specifie@d>,MF.FAT
X MDA`,<MDA is not supported in this mon itor>,MF.FAT
X @SDY,<Specified De`vice is not Yours>,MF.FAT
X IVN, <Invalid Volume S@et Name Specified`>,MF.FAT
X ISS,<Invalid Switch S pecified in a Str@ucture Mount Requ`est>,MF.FAT
X MRP,<Mount Request is not Pending>,@MF.WRN
X MIN,<M`ount Illegal for 'No Operator Inte rvention' Request@>,MF.FAT
X IPB,`<Invalid Path Block Specified>,MF. FAT
X IBL,<Inva@lid Block Length/`Count Specified>,MF.FAT
X MVB,<M ultiple Volume Se@t Name Blocks is `Illegal>,MF.FAT
X IMO,<Invalid m essage received f@rom ORION>,MF.FAT`
X NUA,<No Units Available for M ounting this Requ@est>,MF.FAT
X R`TE,<Route Table Entry does not Exi st>,MF.FAT
X IS@O,<Invalid Source` Object Specified in Route Command >,MF.FAT
X IDO,@<Invalid Destinat`ion Object Specified in Route Comm and>,MF.FAT
X C@RG,<Cannot Route `a Generic Unit>,MF.FAT
X UST,<Un known device or s@tructure name>,MF`.FAT
X ERZ,<Ersatz devices may n ot be mounted>,MF@.FAT
X DNM,<Dev`ice may not be mo unted>,MF.FAT
X VID,<Volume iden @tifier must be sp `ecified>,MF.FAT
! X VIU,<Volume id! entifiers must be!@ unique>,MF.FAT
!` X ISA,<Illegal a"ttribute for stru" cture mount reque"@st>,MF.FAT
X IT"`A,<Illegal attrib#ute for tape moun# t request>,MF.FAT#@
X ILN,<Illegal#` logical name>,MF$.FAT
X IDE,<Inv$ alid density>,MF.$@FAT
X ILT,<Inva$`lid label type>,M%F.FAT
X RNS,<Re% elid not specifie%@d in mount comman%`d>,MF.FAT
X APE&,<Already pending& Event Queue entr&@y>,MF.FAT
X ASN&`,<Ambiguous struc'ture name>,MF.FAT' ;[1226]
X I'@SN,<Invalid struc'`ture name>,MF.FAT( ;[1226]
X GDN( ,<Generic devices(@ may not be mount(`ed>,MF.FAT ;[1226)]
X PLD,<Pathol) ogical name inval)@id>,MF.FAT ;[122)`6]
X IER,<Inval*id EQ request mes* sage format>,MF.F*@AT
X MRD,<Multi*`-reel DECtape vol+ume-sets are not + permitted>,MF.FAT+@
X XXX,<This is+` a text buffer fo,r messages built , on the fly. MAX 7,@0 characters>,MF.FAT
LSTON..KXt:Q KXuZQ @KXvN8P KZ-m ;!$
X TMR,:a<TIMER >,.POPJ,.PPOPJ,<EV.INT>,<>
X KSY,<KSYS >,I;A$SKSY,I$KKSY,<EV.;qCHK>,<Timesharing< will end>
X SP<0L,<SPOOL >,.POPJ,<P.POPJ,<EV.INT>,<><p
X ATO,<TAKFIL>=,Q$EVTR,.POPJ,<0>=0,<Time-of-day OPR=P command file>
=pX USG,<USGFIL>,I$>UFIL,.POPJ,<0>,<U>0sage file closure>P>
X BIL,<BILCLS>p>,I$UBIL,.POPJ,<0?>,<Usage billing ?0closure>
X OPR,?P<OPRFIL>,I$OCLS,.?pPOPJ,<0>,<ORION l@og file closure> @0
X LCK,<FSLOCK>,@P.POPJ,.POPJ,<EV.I@pNT>,<>
X IGN,<IAGNORE>,.POPJ,.POPA0J,<EV.INT>,<>
XAP AFT,<AFTER >,.POApPJ,.POPJ,<EV.INT>B,<>
X NLC,<LOCKB0ED>,.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:=P MJn: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&`Q 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:MZ7PN:NP N:N
TP
O%J6 UaK
IFNDEF UAL.C,<PRINTX UndeU!fined limit paramUeter C>
..Z==W1B
..O==<L.C&77WP7777000000>_-^D18Wp
..Z==..Z+..O
X ..S==<L.C&77700X00>_-^D9
..P==<LXP.C&777>
..P==^XpD35-..P
..Z==..YZ+<..S>B11+<..P>BY05
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'QukzQxSeZ7P&S;9P&tS;97P&S;;yP&S;KsP&S;X<P&S;z8P&S; yP&dS;P&S; 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 Y'l}p Y>:=P YC$SP YC$(7P YC$J;P YC% P YC%=P YC%]6P YC%kP YC&LVP YLtQ YLtlzQ YLv+:P YLv=6Q YO!iZp YO!k9p YO!kZP YO%GP YO%yG 2p!
IFNDEF 3LSTIN.,LSTIN.==0 30
IFE LSTIN.,<
3P IFIDN <XCREF><A3p>,<.XCREF>
4 XLIST>
LSTIN.==LSTIN.+1STINYO%{G 4P+
IFG LST4pIN.,LSTIN.==LSTIN5.-1
IFLE LSTIN50.,<.CREF
LIST>
ZP [xU 8|
X BAT,I8!NP,<<1,,77>,<0,,^8@D600>,0,<INPOIP,,8`0>,<1,,^D512>>
9X LPT,LPT,<<1,,779 >,<1,,^D500>,<FRM9@NOR>,<FLEACT,,0>,9`0>
X PTP,PTP,<<:1,,77>,<1,,^D500>: ,<FRMNOR>,<FLEACT:@,,0>,0>
X CDP,C:`DP,<<1,,77>,<1,,^;D500>,<FRMNOR>,<F; LEACT,,0>,0>
X ;@PLT,PLT,<<1,,77>,;`<1,,^D30>,<FRMNOR<>,<FLEACT,,0>,0>
X RDR,RDR,<0,0,<@0,0,0>
X BIN,BI<`N,<0,0,0,0,0>
X= DBM,DBM,<0,0,0,0= ,0>
X EVT,EVT,<=@0,0,0,0,0>
X FA=`L,FAL,<<FALNTY>,0>,0,0,0>
X NQC,Q> NM,<<%NQOUT>,0,0,>@0,0>
TOPS20>` <
X RET,RET,<0?,0,0,0,0>
X NOT? ,NOT,<0,0,0,0,0>
> ;END TOPS20
;END[3@ 80C<<<1_<A>>-1>B<B>>_<A>>[@ 90W
IFB <B9P>,<MAXSIZ==0
I9pRP A,<IFG <A-MA:XSIZ>,<MAXSIZ==A:0>>>
IFNB <B>,<:PB==0
IRP A,<:pIFG <A-B>,<B==A>>>
B>,<B==[EJ6 ]qo<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 -A#P
LSTOF.
X NVM,<No Vol.ume Mounted On Dr. ive>
X VAU,<Vol.@ume is Already in.` Use>
X DAU,<Dr/ive is Already in/ Use>
X VIL,<Vo/@lume on Drive is /`Labeled>
X RDM,0<Reelid does not 0 match user's requ0@est>
X URB,<Use0`r Requested Bypas1s Label Volumes>
X URL,<User Req1@uested Labeled Vo1`lumes>
X URW,<U2ser Requested Wri2 te-Locked Volumes2@>
X URE,<User R2`equested Write-En3abled Volumes>
3 X RDD,<Requested 3@Density Does not 3`Match Volume Dens4ity>
X VND,<Req4 uested Volume not4@ on this Device>
X IUD,<Illegal 5for unavailable d5 evice>
X RLD,<R5@equest Label Type5` Doesn't Match Vo6lume Label Type>
X DAD,<Drive is6@ already availabl6`e>
X NVI,<VOLID7 Required for Thi7 s Volume>
X CIU7@,<Cannot identify7` the Users Curren8t Volume>
X TDM8 ,<Request Track t8@ype Doesn't Match8` Device Type>
X9 DDD,<Device Allo9 cation Error - De9@adlock Detected>
X IDD,<Illegal :density 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( ~)rSIXBIT\QSRMS1\SIXBIT\QSR[F5k) ~ItSIXBIT\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 ] Q`IF2,<IFDEFR A,<A==A>> IFNDEF A,<A==B>]$Q ]$qp ]$(:p ]$,p ]$9p ]$;p ]$;vp ]$<rp ]%VQ ]%p ]%H:Q ]%KVp ]%Kqp ]%Lp ]%h6p ]%hYp ]%l1Q ]%l{Q @]%m8Q ]%xUp ]%xVP ]%{VQ ]&p ]&
WQ @]&]&,p ]&9wQ ]&:Q ]&:=p ]&<[Q ]&=p ]&=vp ]'$[9@ ]CHVP ]CKP ]PtMP p]PtkQ |]PuJ7P']Pu[rQ 8]Pv
ZQ x]PvKzP']PvLPP ]PvN8Qu@]Pwu[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 uL P#a>:=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*2Q aJH: )y
X BAT,B*YATCON,%DEMND,%GEN)YRC,,<SET HPQ 0,SE*9T DSKPRI 0>
X L*PT,LPTSPL,%DEMND,+a<%GENRC,%LOWER,%U,PPER,%PHYCL>
X , <PTP,CDP,PLT>,SPR,@OUT,%DEMND,%GENRC,`
X RDR,CDRIVE,%-STCMD,%GENRC
X - BIN,SPRINT,%DEMND-@,%GENRC
X FAL,F-`AL,%STCMD,%GENRC,.<ANF10,DECNET>
. X BAT,IBMSPL,%STC.@MD,%IBMBT,DN60
I.`FN FTDQS,<
X NQ/C,NEBULA,%ONCE,<%/ NQOUT,%NQINP>,DEC/@NET
>
REPEAT 0,/`<
X FOO,FOOSPL,0%DEMND,%GENRC,,<S0 ET HPQ 15,SET DSKPRI 1>
>
DSKaJn=P aLtj9P aLu<|P aLv-7P aLvx:P aNkp aNJ6p aNh6p aNxUp aN
2p aN:=p
aNYp aN4;ZQ xaN5kzP'aN6=Q `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 @cv=Q$@cvZWP'cvl}P'cvx6P$cvx6P"cF:=p cFl}p c:tJ9P!c;tkP'~cOuyP @cOu[P"cOuh6Q xcux;PcOvzP cV- \& ;MACRO T\1O GENERATE THE QU\QEUE HEADERS FROM \pTHE QUEUES MACRO
DEFINE X(A,B,C,]1D,E,F,G,H,I,J,K,L]P,M),<
IFDIF <]pE><0>,<GLOB (E)>
IFDIF <H><0>,<G^0LOB (H)>
IFDIF ^P<I><0>,<GLOB (I)>^p
HDR'A:: INSVL_.(<SIXBIT\ A\>,_0QH.NAM)!INSVL.(C,_PQH.TYP)!D
EXP 0_p
XWD E,INSVL.(B`,QH.SIZ)
EXP F
EXP G
EXP H
`P EXP I
EXP [ASC`pIZ \J\]
EXP [ASaCIZ \K\]
EXP [Aa0SCIZ \L\]
EXP [aPASCIZ \M\]
> ;apEND OF DEFINE X
b QUEUES ;NOW EXPAND QUEUES
EXcV.Y9 C1%S
LSTOFC.
X EVT,QNTSIZ`!,.QHTEV,QH.IKS,S$DEVT,LIQEVT,.OTEVTD1,DEPEVT,0,<Event>-,<event>,<>,<>
XCq INP,QNTSIZ,.QHTICQP,0,S$INPT,LIQBATDQ,.OTBAT,DEPBAT,LIDpST.T,<Batch>,<jobE>,<runtime>,<execE0uting>
X LPT,QNTEPSIZ,.QHTOU,0,S$LPEpT,LIQLPT,.OTLPT,DFEPOUT,LIST.D,<PriF0nter>,<job>,<pageFPs>,<printing>
X FpPTP,QNTSIZ,.QHTOUG,0,S$PTP,LIQPTP,.G0OTPTP,DEPOUT,LISTGP.D,<Paper tape puGpnch>,<job>,<feet>H,<punching>
X CDH0P,QNTSIZ,.QHTOU,0HP,S$CDP,LIQCDP,.OTHpCDP,DEPOUT,LIST.DI,<Card punch>,<joI0b>,<cards>,<punchIPing>
X PLT,QNTSIIpZ,.QHTOU,0,S$PLT,JLIQPLT,.OTPLT,DEPJ0OUT,LIST.D,<PlottJPer>,<job>,<minuteJps>,<plotting>
X KRET,QNTSIZ,.QHTARK0,QH.INV,S$RET,LIQKPRET,.OTRET,DEPRETKp,LIST.D,<File retLrieval>,<requestsL0>,<>,<retrieving>LP
X NOT,QNTSIZ,.QLpHTAR,QH.INV,S$NOTM,0,0,0,0,<>,<>,<>M0,<>
X BIN,QNTSIZMP,.QHTIP,QH.INV,S$MpBIN,0,.OTBIN,0,0,N<Interpreter>,<joN0bs>,<decks>,<inteNPrpreting>
X DBM,NpQNTSIZ,.QHFRR,QH.OIKS!QH.INV,S$DBM,O00,.OTDBM,0,0,<>,<OP>,<>,<>
X RDR,QNOpTSIZ,.QHFRR,0,S$RPDR,0,.OTRDR,0,0,<P0>,<>,<>,<>
XQSPLPP,SPLSIZ,.QHTQS,QHPp.IKS!QH.INV,0,0,0Q,0,0,<>,<>,<>,<>
X PSB,PSBSIZ,.QHQPTQS,QH.IKS!QH.INVQp,0,0,0,0,0,<>,<>,R<>,<>
X OBJ,OBJSR0IZ,.QHTQS,QH.IKS!RPQH.INV,0,0,0,0,0,Rp<>,<>,<>,<>
X USSE,USESIZ,.QHTQS,QS0H.IKS!QH.INV,0,0,SP0,0,0,<>,<>,<>,<>Sp
X STR,STRSIZ,.QTHTQS,QH.IKS!QH.INT0V,0,0,0,0,0,<>,<>TP,<>,<>
X NET,NETTpSIZ,.QHTQS,QH.IKSU!QH.INV,0,0,.OTNCU0U,0,0,<>,<>,<>,<>UP
IFN FTINFO,<
XUp PID,PIDSIZ,.QHTQVS,QH.IKS!QH.INV!QV0H.VAR,0,0,0,0,0,<VP>,<>,<>,<>
>
X VpIPC,IPCSIZ,.QHTQSW,QH.IKS!QH.INV!QHW0.VAR,0,0,0,0,0,<>WP,<>,<>,<>
X FAL,WpQNTSIZ,.QHFRR,0,SX$FAL,0,.OTFAL,0,0X0,<>,<>,<>,<>
X OXPDB,ODBSIZ,.QHTQS,XpQH.IKS!QH.INV!QH.YVAR,0,0,0,0,0,<>,Y0<>,<>,<>
X QNM,QYPNMSIZ,.QHTQS,QH.IYpKS!QH.INV!QH.OAV,ZS$NQC,0,.OTNQC,0,Z00,<>,<>,<>,<>
LSTON.>,<>
eYj: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+Q eDvJ6P eLt;Zp eLu\sp eLv81p eO)hrp eO)hwp eO)ip eO)iVp eO)kWp eO)lp eO)l}p eO)mp eO)m7p eO)m:p eR-I7p eR-xHp eR-xIp gl}p gDI3P gDjQP gEKUP gE[rP gF*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
XLIST1
1`DEFINE X (1 OTYP,PNAM,PTYP,PA1@TR,PDEP,PTXT), <
PRCTYP (PN2AM,PTYP)
>
2
..CNT==0
2@.XCREF ..CNT
2` DEFINE PRCTY3P (PN,PT), <
3 IFIDN <A><3@PN>, <
3` IFG ..CNT-0, <4
4 IF1,<
4@ PRI4`NTX ?More than on5e entry in PRCDAT5 for same process5@or
5` >
6 >
6 B=='PT
6@ ..CNT==.6`.CNT+1
7 >
>
7 PRCDAT
7@ PURGE ..CNT
LIST
.CNT
gg@t(:Pg@tIYP@g@t^Qxg@tkQk0g@u+qQxg@uKqP'~g@v=Q `g@vN8P gBah1p gBah3p gBahxp gBaip gBaip gBai7p gBai<p gBaiVp gBaiWp gBaiYp gBajp gBajQp gBakp gBakRp gBalsp gBalzp gBal}p
TP gBf+qp gBf,=p gBf:=p gBf=Q INXgCLLP'gCM+qQ xgCMI7P'gPuKuQ gPuySP gPuyVQ @gPu{@P gPv
TP gPv91P gRM9 Ayg
LSTOF.
X <Invalid>,%IB8NVLD,100
X <IdBXle>,%IDLE,0
X Bx<Active>,%ACTIV,0C
X <Stopped>,%C8STOPD,0
X <NotCX Started>,%NSTRT,Cx0
X <Not AvailDable>,%NAVAL,0
D8 X <No PTYs>,%NPTDXYS,.OTBAT
X <ODxffline>,%OFLNE,<.EOTLPT,.OTPTP,.OTCE8DP,.OTPLT,.OTRDR>EX
X <System FulExl>,%SFULL,.OTBAT
X <Shutting DoF8wn>,%SHTDN,0
XFX <Aborting>,%CNCLFxG,0
X <Opr ResGp Wait>,%OREWT,0
X <Aligning FoGXrms>,%ALIGN,.OTLPGxT
X <>,%RESET,H0
X <Reading>,H8%READN,.OTRDR
HXX <Requeing>,%REQHxUE,0
X <ShuttiIng Down>,%SHUTD,0I8
X <Opr OutputIX Wait>,%OPRWT,.OTIxLPT
X <Stop isJ Pending>,%STPPN,J80
X <No procesJXsor>,%NOPRC,0
JxX <Changing FormsK>,%FRMCH,<.OTLPT,K8.OTPLT,.OTPTP,.OTKXCDP>
X <ConnecKxting>,%CNECT,<.OTLNQC,.OTFAL>
X L8<Mount wait>,%MWALXIT,0
X <InactiLxve>,%INACT,0
LSTON.NACT,0
LSgR}J6 Yqg
IFNDEF ZL.C,<PRINTX UndeZ0fined limit paramZPeter C>
..Z==ZpB
..O==<L.C&77[7777000000>_-^D18[0
..Z==..Z+..O
[P ..S==<L.C&77700[p0>_-^D9
..P==<L\.C&777>
..P==^\0D35-..P
..Z==..\PZ+<..S>B11+<..P>B\p5
DPB A,[EXP ..Z]
A,[EXP .gSh6p gS:=p gS=p gS{VQ gS:=P gS<{Q @gS)hrp gS)k<p gS)lp gS)lQp gS)lzp gS)l}p gV5H:Q gV5L Q gV6:Q @gV6<[Q gWhwp gWiVp gWkp
gWk:p gWkWp gWlzp gWl}p gWmp gWm7p gWm:p gWmYp gg
V !g
IFNB <8B>,<TOPS10<A==BX>>
IFNB <C>,<TxOPS20<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( h!nIFN FTUUOS,B ;DEFINE UNi?4H (!rIFN 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@ P %BYTE (3)AP@WHO (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'mLu]rP mLu]vP mLui;Q mLuk:P @mLukqP"mLuySP'~mLu|Q mLv9P$mLv
RP mLv
ZQ `mLv)6P mLv)6Q mLv,wP `mLv8yQ mLv:7P!mLvLUP pmLvN8Q pmLvX6Q mLvl{Q @mLvx6Q mLv{Q mN%I7p mNeI7p mNuI7P mNv:=P o&%J6 ]1k<L.A&777000>_-^D9A&7770oPu[yQ p :!#R
.EVA==<ZZ==ZZ+1> MD$A==q@ H|
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 aA$$A,<
PRINTX a`UNDEFINED COUNTERb A USED
>
IFb NDEF G$ITEM,<EXTEb@RN G$ITEM>
AOS G$ITEM+$$A
S +8 -a
LSTOF.
PUSHJ P,D$MDA`aE
CAI <<B>B2a3!<A>B35>
LSTON.A>B35>
LSTO '$[ eR
LSTOF.
X (ICNT,Number e@of items in recore`d)
X (NOW,Currefnt time of day)
f X (STAR,QUASAR'sf@ start time)
X f`(QJOB,QUASAR's jogb number)
X (IPg CI,Total number og@f IPCF interruptsg` received)
X (RhIPC,IPCF messagesh received)
X (Sh@IPC,IPCF messagesh` sent)
X (IPCF,iIPCF send failurei s)
X (IPCU,Unrei@coverable IPCF sei`nd failures)
X j(MREL,RELEASE mesj sages received)
j@ X (MCHK,CHECKPOIj`NT messages receikved)
X (MREQ,REk QUEUE messages rek@ceived)
X (MNXTk`,Total NEXTJOB melssages sent by tyl pe)
X (MLST,LISl@T messages receivl`ed)
X (NLAP,LISmTANSWER pages senm t)
X (SCRE,Succm@essful creates dom`ne)
X (MMOD,MODnIFY messages recen ived)
X (MKIL,Kn@ILL messages recen`ived)
X (MDEF,DoEFER messages reco eived)
X (ISPL,o@Immediate SPOOL mo`essages received)p
X (DSPL,Deferrp ed SPOOL messagesp@ received)
X (Mp`CAN,COUNTANSWER mqessages sent)
Xq (SLCD,Scheduler q@loop countdowns)
X (DEAD,MDA deardlock avoidance cr alls)
X (DFAL,Mr@DA deadlock avoidr`ance failures)
sX (VSWM,Volume sws itch tape mount)
X (TAPM,Tape mos`unt)
X (STRM,Phtysical structure t mount)
X (USTM,t@User structure mot`unt)
X (GENM,Geuneric mount)
X u (TINP,Terminationu@ batch requests)
X (TOUT,Terminavtion print requesv ts)
X (TCNI,Terv@mination console v`input)
X (TCNO,wTermination consow le output)
X (Ew@INP,Emulation batw`ch requests)
X x(EOUT,Emulation px rint requests)
x@X (ECNI,Emulationx` console input)
y X (ECNO,Emulatioy n console output)y@
X (IPCE,Resendy` queue expirationzs)
X (DTAM,DECtz ape mounts)
LSTON.ounts)
LST NNI6 c$
IFNDEF c!$$B,<
PRINTX c@UNDEFINED COUNTERc` B USED
>
IFdNDEF G$ITEM,<EXTEd RN G$ITEM>
STORd@E A,G$ITEM+$$B
A,G$ITEM+$$B
vyP J;P &=P ewP %X<P
RP 9P vP KP t;P tXzP
-I:P-[RPN:`P[ZP@]PP$PP&kvPPj4PPk`PPMlPP~]PP5kzP 89P 8QP 8TP :6P |SP H9P H9P KqP LzP 9P TP
6P H9P HTP J1P J6P TP
-lQP "f$ P &XZP &%I P &tzP &vkP 2f$ P 2|:rP 2|:xP 2~y9P 6%X<P 6vKWP 6~[ZP 7<:P :h6P :~
QP :~JQP:~K6P:~MP;N9P;?-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$;2P 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 lvp lwp m9p 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
:P %
<zp )
I1p .
I8p !
lVP ':p 8
}p ;VP !*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 3
2P 3RP 3VP 32P 3[ZP 3\vP 3\yP 3]P 6Hxp 6IP 6Ip 6Lp 6L9p 6M9p 6%[P 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 >5IP >5I0Q x>5KWP >5N2P >t.:P >t;wP >uKUP >ukrP >|kP >|lVP >}J6P >}]P >~
TP >~H8P >~[ZP >~lwP ?WP ?YP ?\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
Zp F.Vp 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|+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