Trailing-Edge
-
PDP-10 Archives
-
bb-bt99s-bb
-
10,7/galaxy/quasar/qsrmac.unv
There are 88 other files named qsrmac.unv in the archive. Click here to see a list.
x
,U '@ P C
yhrp C
yj2p C
yj:p C
ykWp C
yl}p C
ym p C
ym7p C
~\yP C
vlvP 'p CjvP C,uh5Q C,vN8P 'C4tQ p C4t PQ | C4t;P C4t;ZP C4tMZQ C4uI7Q x C4uXwP '~ C4uh6P 'C4v
VQ C4v
YQ C4v\rQ . @ C6
X (BAT,S1.TYTTY)
X (LPT,.q.TYLPT)
X (PTP,S.TYPTP)
X (CDP,Rq.TYCDP)
X (PLT,.1.TYPLT)
X (RDR, .TYCDR)
(RDR,C@ P CNah9Q CNajQP CNakQQ CNakXQ CNakYQ @ CNalQ CNalVQ CNalpQ CNamvQ @ CS&*1 )Qk
LSTO(IF.
X <Invalid>,(q%INVLD,0
X <Lo*wer>,%LOWER,.OTLP*0T
X <Upper>,%U*PPPER,.OTLPT
X *p<Physical>,%PHYCL+,<.OTLPT,.OTPTP,.+0OTCDP,.OTPLT>
X+P <Generic>,%GENRC+p,-1
X <Sitgo>,,%SITGO,.OTBAT
,0X <Input>,%NQINP,,P.OTNQC
X <Outp,put>,%NQOUT,.OTNQC-
X <IBM batch>-0,%IBMBT,.OTBAT
LSTON.OTBAT
E-+qQ E4 P GqhVp Gql}p G SP 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 x G2iiQp G2ijQp G2n:=p G4 P G7
P G7
G P v G?)l}p z GDt+P : GDvN8P [ GDv\rQ x GLtIYP GLtiP 'GLtkP GLu+qQ x GLuKqP '~ GNih1p GNih3p GNii7p GNiiRp GNiiVp GNiiXp GNiiYp GNijQp GNikp GNikZp GNiktp GNilWp GNim9p GNn:=p
RADIX 5.+5
IF1,<IFDEF LV9.A,<PRINTX Mult.VX defined limit paVxrameter A>>
IFWL <36-C>,<PRINTXW8 Illegal C for lWXimit A>
IFL <3Wx5-D>,<PRINTX IllXegal position forX8 limit A>
IFLEXX <EQLMSZ-B>,<PRIXxNTX Illegal B foYr limit A>
L.Y8A==<BYTE (18) B YX(9) C,D>
RADI X 4+4
>
RADII6LUP I6 2 `&
X BAT
`1 X LPT
X CDP
`PX PTP
X PLT
X`p MNT
X RET
X EVT
X RET
X Ir%lP Ir5lP ItI1P It[:P ItkQQ x Iu
xP Iu+qP 'IuH:P Iv
WP IvLVP IjQp Ikzp Il}p I =Q INX I$v8:Q @ I$vN8P 'I&:=p I? : y
IFN <%% 9.MOD-<SIXBIT /QUA SAR/>>,<EXTERN G$ YSCHD>
SETOM G$S CHD
SETOM G$SJ P KDtzP !@ KDtQ KDt:Q KDuWP KDu9P KDu(QP KDuKtP 'KDukzP KDum6P 'KDv
TP KDv
WQ x KDv
[P KDv)P KDv98Q | KDv<P @KDvlYQ x KDvx6P $ 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&9 P KH&;\P KH&[yP KH&\7P KH&\9P KH&\zP KH&j2P KH&j:P KH&}WP KH' P KHt9P KK9 #
LSTOF.
X BMG,<Bad MOqDIFY Group>,MF.FAAT
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,<Illeg al 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 L
ong>,MF.FAT
X M
@TS,<Message is To
`o Short>,MF.FAT
X NKC,<Not a Kno wn Component>,MF. @FAT
X NOR,<Numb `er Out of Range>,
MF.FAT
X NYO,<N
ot Your Object>,M
@F.FAT
X SNY,<Sp
`ecifiedorequest.i
X UQN,<UnknoTSpe
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 Sp ecified>,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't Default User Name>,MF.FAT
X @CDD,<Can't Defaul`t Connected Direc tory>,MF.FAT
X NSD,<No such devi@ce>,MF.FAT
X CD`A,<Can't Delete a n Allocated reque st>,MF.FAT
X PR@B,<Privileges Req`uired for Bypass Label Processing> ,MF.FAT
X ICD,<@Illegal Connected` Directory Specif ied>,MF.FAT
X I FC,<Invalid Funct@ion Code Specifie`d>,MF.FAT
X MDA ,<MDA is not supp orted 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 M RP,<Mount Request@ is not Pending>,`MF.WRN
X MIN,<M ount Illegal for 'No Operator Inte@rvention' Request`>,MF.FAT
X IPB, <Invalid Path Blo ck 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 Unit s Available for M @ounting this Requ `est>,MF.FAT
X R TE,<Route Table E ntry does not Exi @st>,MF.FAT
X IS `O,<Invalid Source! Object Specified! in Route Command!@>,MF.FAT
X IDO,!`<Invalid Destinat" ion Object Specif" ied in Route Comm"@and>,MF.FAT
X C"`RG,<Cannot Route # a Generic Unit>,M# F.FAT
X UST,<Un#@known device or s#`tructure name>,MF$ .FAT
X ERZ,<Ers$ atz 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,<Multi0 -reel DECtape vol0 ume-sets are not 0@permitted>,MF.FAT0`
X XXX,<This is1 a text buffer fo1 r messages built 1@on the fly. MAX 71`0 characters>,MF. FAT
LSTON..KXt:Q KXuZQ @ KXvN8P KZ-m @A$=
X TMR,@<TIMER >,.POPJ,.PUOPJ,<EV.INT>,<>
X KSY,<KSYS >,I@a$SKSY,I$KKSY,<EV.ACHK>,<TimesharingA0 will end>
X SPAPL,<SPOOL >,.POPJ,Ap.POPJ,<EV.INT>,<>B
X ATO,<TAKFIL>B0,Q$EVTR,.POPJ,<0>BP,<Time-of-day OPRBp command file>
CX USG,<USGFIL>,I$C0UFIL,.POPJ,<0>,<UCPsage file closureCp>
X BIL,<BILCLSD>,I$UBIL,.POPJ,<0D0>,<Usage billing DPclosure>
X OPR,Dp<OPRFIL>,I$OCLS,.EPOPJ,<0>,<ORION lE0og file closure> EP
X LCK,<FSLOCK>,Ep.POPJ,.POPJ,<EV.IFNT>,<>
X IGN,<IF0GNORE>,.POPJ,.POPFPJ,<EV.INT>,<>
XFp AFT,<AFTER >,.POGPJ,.POPJ,<EV.INT>G0,<>
X NLC,<LOCKGPED>,.POPJ,.POPJ,< EV.INT>,<>
Malp Malzp Mal}p Mem P MF:=p M2,zP M:mMP M@tI6P $ M@th|P M@tiSQ ~ M@tkP " M@tlQ | M@tlxQ x M@uI7Q x M@u\YP M@uiTP ! M@vyP M@v(sQ ~ M@v(vP M@v)7P M@v)VQ | M@v<P @ M@w P MBn:=p MCF:=p MJmkyQ ]?X6MJn:=P MJn:hQ p MJn:iP MJn[TP MO *yP @MO ,P MO ,P MO iP MO j1P MO [YP MO \YP MO j1P MO
ZP _MO [P MO =Q gN` MO |P MR%eHQ MRL+9Q MRMiWQ MRV>9P MS) P MS 2P MS.[yQ N: LP N: LP N:$X2Q N:%kyQ ]?X6N:%m1P N:&
TP N:5I0P N:5m P N:L9P tN:L;yP N:MKsP N:MLP dN:MZ7P N:N P N:N
TP
O%J6 Zy t
IFNDEF ZYL.C,<PRINTX UndeZ9fined limit paramZeter C>
..Z==\IB
..O==<L.C&77\h7777000000>_-^D18]
..Z==..Z+..O
]( ..S==<L.C&77700]H0>_-^D9
..P==<L]h.C&777>
..P==^^D35-..P
..Z==..^(Z+<..S>B11+<..P>B^H5
LDB A,[EXP . .Z]
A,[EXP .P P QtlVQ @ Q
yiVp Q
ykzp Q
ylXp Q
yl}p Q4.2P $ Q4kP 'Q6i9Q x QaiVp QakVp QakWp Qakqp Qal}p
Qd Q ; x QexUP 'QuX<P 'QukzQ x SeZ7P& S;9P&tS;97P& S;;yP& S;KsP& S;X<P& S;z8P& S; yP& dS; P& S; X:
=P X:KsQ ] ( X:<P X: +qQ \ $X: krQ HX: |RQ $ $X: J6Q $ HX:$\P $$X:%KsQ + (X:46P K X:5Q = HX:5I0Q j X:5|VP HX:MmYP X:t+Q $X:uyYP jX:u}Q j HX:u} Q HX:}ZP X:}J6Q $X:}krQ HX:~
Q Y'
Q }P Y'
(:Q @ Y'
9Q Y'
]ZQ Y' Q Y':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 4H.
IFNDEF 4hLSTIN.,LSTIN.==0 5
IFE LSTIN.,<
5( IFIDN <XCREF><A5H>,<.XCREF>
5h XLIST>
LSTIN .==LSTIN.+1STINYO%{G 6(8
IFG LST6HIN.,LSTIN.==LSTIN6h.-1
IFLE LSTIN7.,<.CREF
LIST>
Z P [xU = %
X BAT,I=9NP,<<1,,77>,<0,,^=XD600>,0,<INPOIP,,=x0>,<1,,^D512>>
>X LPT,LPT,<<1,,77>8>,<1,,^D500>,<FRM>XNOR>,<FLEACT,,0>,>x0>
X PTP,PTP,<<?1,,77>,<1,,^D500>?8,<FRMNOR>,<FLEACT?X,,0>,0>
X CDP,C?xDP,<<1,,77>,<1,,^@D500>,<FRMNOR>,<F@8LEACT,,0>,0>
X @XPLT,PLT,<<1,,77>,@x<1,,^D30>,<FRMNORA>,<FLEACT,,0>,0>
X RDR,RDR,<0,0,AX0,0,0>
X BIN,BIAxN,<0,0,0,0,0>
XB DBM,DBM,<0,0,0,0B8,0>
X EVT,EVT,<BX0,0,0,0,0>
X FABxL,FAL,<<FALNTY>,0C,0,0,0>
X NQC,QC8NM,<<%NQOUT>,0,0,CX0,0>
TOPS20Cx <
X RET,RET,<0D,0,0,0,0>
X NOTD8,NOT,<0,0,0,0,0>
> ;END TOPS20
;END[ 3@ :P <<<1_<A>> -1>B<B>>_<A>>[@ ;d
IFB <B;(>,<MAXSIZ==0
I;HRP A,<IFG <A-MA;hXSIZ>,<MAXSIZ==A<>>>
IFNB <B>,<<(B==0
IRP A,<<HIFG <A-B>,<B== A>>>
B>,<B==[EJ6 c <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 2a#z
LSTOF.
X NVM,<No Vol3!ume Mounted On Dr3@ive>
X VAU,<Vol3`ume is Already in4 Use>
X DAU,<Dr4 ive is Already in4@ Use>
X VIL,<Vo4`lume on Drive is 5 Labeled>
X RDM,5 <Reelid does not 5@match user's requ5`est>
X URB,<Use6 r Requested Bypas6 s Label Volumes>
X URL,<User Req6`uested Labeled Vo7 lumes>
X URW,<U7 ser Requested Wri7@te-Locked Volumes7`>
X URE,<User R8 equested Write-En8 abled Volumes>
8@X RDD,<Requested 8`Density Does not 9 Match Volume Dens9 ity>
X VND,<Req9@uested Volume not9` on this Device>
X IUD,<Illegal : for unavailable d:@evice>
X RLD,<R:`equest Label Type; Doesn't Match Vo; lume Label Type>
X DAD,<Drive is;` already availabl< e>
X NVI,<VOLID< Required for Thi<@s Volume>
X CIU<`,<Cannot identify= the Users Curren= t Volume>
X TDM=@,<Request Track t=`ype Doesn't Match> Device Type>
X> DDD,<Device Allo>@cation Error - De>`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( I SIXBIT\QSR MS1\ SIXBIT\QSR[F5k) i SIXBIT\QSR MS2\ SIXBIT\QSR[HtuQ [Ht;ZP '[HtK7Q [HtyYQ [Hu+qQ [HuKUQ x [HukzQ [Hv 2P [HvKWP '[HvLRQ x [Hvx:Q @ [NF:=p [c-j:P ?[c.
TP
]n:=P ] S8 IF2,<IFDEFSX A,<A==A>> IFN DEF 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 ]PvN8Q u @ ]Pw u[Q u\Q 0 u\VQ u]Q @ v<wQ x vIWP '
%KQ _
%M1Q _
Ql}p _
T8:p _
TH:p _
U p _
Ukrp _
V
2p _
V
Vp _
V*2p _
V8tp _
V:=p _
V=p
V=p
_
VN8p _
V[Tp X<P ' Z7Q x ,}P Q @ -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 x a&!kQ x a&%+qp a&%KUp a&%h6p a&&
2p a&&:=p a3$ SP a3$J;P 2a3%=P a3%]6P aHukwQ @ aHv*2Q aJ H: /1+
X BAT,B0ATCON,%DEMND,%GEN/RC,,<SET HPQ 0,SE/qT DSKPRI 0>
X L/QPT,LPTSPL,%DEMND,1<%GENRC,%LOWER,%U18PPER,%PHYCL>
X 1X<PTP,CDP,PLT>,SPR1xOUT,%DEMND,%GENRC2
X RDR,CDRIVE,%28STCMD,%GENRC
X 2XBIN,SPRINT,%DEMND2x,%GENRC
X FAL,F3AL,%STCMD,%GENRC,38<ANF10,DECNET>
3XX BAT,IBMSPL,%STC3xMD,%IBMBT,DN60
4X NQC,NEBULA,%ONC48E,<%NQOUT,%NQINP>4X,DECNET
REPEAT 04x,<
X FOO,FOOSPL5,%DEMND,%GENRC,,<58SET HPQ 15,SET DS KPRI 1>
>
DSaJn=P aLtj9P aLu<|P aLv-7P aLvx:P aNkp aNJ6p aNh6p aNxUp aN
2p aN:=p
aNYp aN4;ZQ x aN5kzP 'aN6=Q ` aNd=9Q x aNeX<P 'aS SP
aSJ;P aS=P aS]6P ctLuQ ct^Q cukqQ cv9Q @ cv)6Q @ cv8yQ cvH8Q cvy7Q cv{Q ctzP !@ ctQ ct TQ ct WQ ~ ct*WQ x ctKP 'ctLQ x cuWP cu9P cu(QP cukzP cv
TP cv
WQ x cv
[P ' cv cv)P cv98Q v | cv<P @cv=Q $ @ cvZWP 'cvl}P 'cvx6P $ cvx6P " cF:=p cFl}p c:tJ9P ! c;tkP '~ cOuyP @ cOu[P " cOuh6Q x c ux;P cOvzP cV- a1&; ;MACRO TaQO GENERATE THE QUaqEUE HEADERS FROM bTHE QUEUES MACRO
DEFINE X(A,B,C,bQD,E,F,G,H,I,J,K,Lbp,M),<
IFDIF <cE><0>,<GLOB (E)>
IFDIF <H><0>,<GcPLOB (H)>
IFDIF cp<I><0>,<GLOB (I)>d
HDR'A:: INSVLd0.(<SIXBIT\ A\>,dPQH.NAM)!INSVL.(C,dpQH.TYP)!D
EXP 0e
XWD E,INSVL.(Be0,QH.SIZ)
EXP F
EXP G
EXP H
ep EXP I
EXP [ASCfIZ \J\]
EXP [ASf0CIZ \K\]
EXP [AfPSCIZ \L\]
EXP [fpASCIZ \M\]
> ;gEND OF DEFINE X
g0 QUEUES ;NOW EX PAND QUEUES
EXcV.Y9 HQ%}
LSTOFH1.
X EVT,QNTSIZe9,.QHTEV,QH.IKS,S$I1EVT,LIQEVT,.OTEVTIQ,DEPEVT,0,<Event>2!,<event>,<>,<>
XI INP,QNTSIZ,.QHTIHqP,0,S$INPT,LIQBATIq,.OTBAT,DEPBAT,LIJST.T,<Batch>,<jobJ0>,<runtime>,<execJPuting>
X LPT,QNTJpSIZ,.QHTOU,0,S$LPKT,LIQLPT,.OTLPT,DK0EPOUT,LIST.D,<PriKPnter>,<job>,<pageKps>,<printing>
X LPTP,QNTSIZ,.QHTOUL0,0,S$PTP,LIQPTP,.LPOTPTP,DEPOUT,LISTLp.D,<Paper tape puMnch>,<job>,<feet>M0,<punching>
X CDMPP,QNTSIZ,.QHTOU,0Mp,S$CDP,LIQCDP,.OTNCDP,DEPOUT,LIST.DN0,<Card punch>,<joNPb>,<cards>,<punchNping>
X PLT,QNTSIOZ,.QHTOU,0,S$PLT,O0LIQPLT,.OTPLT,DEPOPOUT,LIST.D,<PlottOper>,<job>,<minutePs>,<plotting>
X P0RET,QNTSIZ,.QHTARPP,QH.INV,S$RET,LIQPpRET,.OTRET,DEPRETQ,LIST.D,<File retQ0rieval>,<requestsQP>,<>,<retrieving>Qp
X NOT,QNTSIZ,.QRHTAR,QH.INV,S$NOTR0,0,0,0,0,<>,<>,<>RP,<>
X BIN,QNTSIZRp,.QHTIP,QH.INV,S$SBIN,0,.OTBIN,0,0,S0<Interpreter>,<joSPbs>,<decks>,<inteSprpreting>
X DBM,TQNTSIZ,.QHFRR,QH.T0IKS!QH.INV,S$DBM,TP0,.OTDBM,0,0,<>,<Tp>,<>,<>
X RDR,QNUTSIZ,.QHFRR,0,S$RU0DR,0,.OTRDR,0,0,<UP>,<>,<>,<>
XVSPLUp,SPLSIZ,.QHTQS,QHV.IKS!QH.INV,0,0,0V0,0,0,<>,<>,<>,<>
X PSB,PSBSIZ,.QHVpTQS,QH.IKS!QH.INVW,0,0,0,0,0,<>,<>,W0<>,<>
X OBJ,OBJSWPIZ,.QHTQS,QH.IKS!WpQH.INV,0,0,0,0,0,X<>,<>,<>,<>
X USX0E,USESIZ,.QHTQS,QXPH.IKS!QH.INV,0,0,Xp0,0,0,<>,<>,<>,<>Y
X STR,STRSIZ,.QY0HTQS,QH.IKS!QH.INYPV,0,0,0,0,0,<>,<>Yp,<>,<>
X NET,NETZSIZ,.QHTQS,QH.IKSZ0!QH.INV,0,0,.OTNCZPU,0,0,<>,<>,<>,<>Zp
IFN FTINFO,<
X[ PID,PIDSIZ,.QHTQ[0S,QH.IKS!QH.INV!Q[PH.VAR,0,0,0,0,0,<[p>,<>,<>,<>
>
X \IPC,IPCSIZ,.QHTQS\0,QH.IKS!QH.INV!QH\P.VAR,0,0,0,0,0,<>\p,<>,<>,<>
X FAL,]QNTSIZ,.QHFRR,0,S]0$FAL,0,.OTFAL,0,0]P,<>,<>,<>,<>
X O]pDB,ODBSIZ,.QHTQS,^QH.IKS!QH.INV!QH.^0VAR,0,0,0,0,0,<>,^P<>,<>,<>
X QNM,Q^pNMSIZ,.QHTQS,QH.I_KS!QH.INV!QH.OAV,_0S$NQC,0,.OTNQC,0,_P0,<>,<>,<>,<>
LSTON.>,<>
eYj:p eYkWp eYl}p eYm p eYm7p e\}p e:=p e.:=P eahUp eahVp eaiRp eaiVp eaj:p eal}p eam p e iVp e j7p e j:p e l}p etWQ @ et<zP 'etI1Q x e"l uP 'e0tKQ @ e0u+qP 'e0v<Q e31hrP e6]I7P e<t Q x e<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)m p eO)m7p eO)m:p eR-I7p eR-xHp eR-xIp gl}p gDI3P gDjQP gEKUP gE[rP gF*TP gF8tP g t*:P g4, RQ g4,I3Q g4,^Q g4-kqQ g4.9Q @ g4t;ZP 'g4uwQ @ g6
XLIST6
6xDEFINE X (68OTYP,PNAM,PTYP,PA6XTR,PDEP,PTXT), <
PRCTYP (PN7AM,PTYP)
>
78
..CNT==0
7X.XCREF ..CNT
7x DEFINE PRCTY8P (PN,PT), <
88 IFIDN <A><8XPN>, <
8x IFG ..CNT-0, <9
98 IF1,<
9X PRI9xNTX ?More than on:e entry in PRCDAT:8 for same process:Xor
:x >
; >
;8 B=='PT
;X ..CNT==.;x.CNT+1
< >
>
<8 PRCDAT
<X PURGE ..CNT
LIST
.CNT
gg@t(:P g@tIYP @g@t^Q x g@tkQ k 0 g@u+qQ x g@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 INX gCLLP 'gCM+qQ x gCMI7P 'gPuKuQ gPuySP gPuyVQ @ gPu{@P gPv
TP gPv91P gRM9 G
LSTOF.
X <Invalid>,%IGPNVLD,100
X <IdGple>,%IDLE,0
X H<Active>,%ACTIV,0H0
X <Stopped>,%HPSTOPD,0
X <NotHp Started>,%NSTRT,I0
X <Not AvailI0able>,%NAVAL,0
IP X <No PTYs>,%NPTIpYS,.OTBAT
X <OJffline>,%OFLNE,<.J0OTLPT,.OTPTP,.OTCJPDP,.OTPLT,.OTRDR>Jp
X <System FulKl>,%SFULL,.OTBAT
X <Shutting DoKPwn>,%SHTDN,0
XKp <Aborting>,%CNCLLG,0
X <Opr ResL0p Wait>,%OREWT,0
X <Aligning FoLprms>,%ALIGN,.OTLPMT
X <>,%RESET,M00
X <Reading>,MP%READN,.OTRDR
MpX <Requeing>,%REQNUE,0
X <ShuttiN0ng Down>,%SHUTD,0NP
X <Opr OutputNp Wait>,%OPRWT,.OTOLPT
X <Stop isO0 Pending>,%STPPN,OP0
X <No procesOpsor>,%NOPRC,0
PX <Changing FormsP0>,%FRMCH,<.OTLPT,PP.OTPLT,.OTPTP,.OTPpCDP>
X <ConnecQting>,%CNECT,<.OTQ0NQC,.OTFAL>
X QP<Mount wait>,%MWAQpIT,0
X <InactiRve>,%INACT,0
LS TON.NACT,0
LSgR}J6 _
IFNDEF _)L.C,<PRINTX Unde_Hfined limit param_heter C>
..Z==`B
..O==<L.C&77`(7777000000>_-^D18`H
..Z==..Z+..O
`h ..S==<L.C&77700a0>_-^D9
..P==<La(.C&777>
..P==^aHD35-..P
..Z==..ahZ+<..S>B11+<..P>Bb5
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 gV5ZQ gV5H:Q gV5L Q gV6:Q @ gV6<[Q gWhwp gWiVp gWkp
gWk:p gWkWp gWlzp gWl}p gWm p gWm7p gWm:p gWmYp gg
V 0!q
IFNB < PB>,<TOPS10<A==B p>>
IFNB <C>,<T OPS20<A==C>>
PS20<A==C>>
ivl{P $ i!iP 'i!iVQ x i&m{PP i4,.8Q i4-i;Q i4-m6Q i4-|{Q i4.8yQ @ i4.i\Q i4.y7Q i4.{Q i>qm P i?4( !x IFN FTUUOS ,B ;DEFINE UNi?4H @!| IFN FTJSYS , INTERN AEDT iLtI7Q ` iLuH1Q @ jDtlQQ @ k
rHQ k
r$Q k
rU+Q k
rdJQ k
sQ k
t PQ k
t YQ @ 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 x m$uM Q ~ m$v{Q m0t9Q m0t uQ m0t wQ @ m0t;ZQ x m0tI7Q @ m0tkQ ~ m0tlQP " m0uHZQ < m0uHuQ m0uM7Q @ m0unP 'm0u}wQ m0v
[Q x m0v)6Q m0v,wP m0v8yQ m0v:Q m0v<RP $ m0v=Q p m>eI7p mK c@ R8% BYTE (3)ARXWHO (9)AVER (6) AMIN (18)AEDTmLtWP mLtP 'mLtP mLtQ mLt RP mLt;Q mLt;ZQ x mLt=P mLtIP mLtI7P ' mLtLP mLtMP mLtiP @mLuTP mLuHZQ mLuI7Q x mLuKUP '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 p mLvN8Q p mLvX6Q mLvl{Q @ mLvx6Q mLv{Q mN%I7p mNeI7p mNuI7P mNv:=P o&%J6 bI <L.A&7770 00>_-^D9A&7770oPu[yQ p ?A#|
.EVA==<ZZ ==ZZ+1> MD$A==q@ h~
A==:B
A==:Buh P P $X2P $h6P &<P &H6P ,;TP ,;WP -XP -}:P <[VP L;ZP NrP NsP NtP NzP N<P l87P l:P lI3P m:6P mLzP m[rP mnP n)6P n)8P uH8P u}`P
IFNDEF fY$$A,<
PRINTX fxUNDEFINED COUNTERg A USED
>
IFg8NDEF G$ITEM,<EXTEgXRN G$ITEM>
AOS G$ITEM+$$A
S +8 3 1
LSTOF.
PUSHJ P,D$MDAeyE
CAI <<B>B2f3!<A>B35>
LSTO N.A>B35>
LSTO '$[ j {
LSTOF.
X (ICNT,Number jXof items in recorjxd)
X (NOW,Curreknt time of day)
k8 X (STAR,QUASAR'skX start time)
X kx(QJOB,QUASAR's jolb number)
X (IPl8CI,Total number olXf IPCF interruptslx received)
X (RmIPC,IPCF messagesm8 received)
X (SmXIPC,IPCF messagesmx sent)
X (IPCF,nIPCF send failuren8s)
X (IPCU,UnrenXcoverable IPCF senxnd failures)
X o(MREL,RELEASE meso8sages received)
oX X (MCHK,CHECKPOIoxNT messages receipved)
X (MREQ,REp8QUEUE messages repXceived)
X (MNXTpx,Total NEXTJOB meqssages sent by tyq8pe)
X (MLST,LISqXT messages receivqxed)
X (NLAP,LISrTANSWER pages senr8t)
X (SCRE,SuccrXessful creates dorxne)
X (MMOD,MODsIFY messages reces8ived)
X (MKIL,KsXILL messages recesxived)
X (MDEF,DtEFER messages rect8eived)
X (ISPL,tXImmediate SPOOL mtxessages received)u
X (DSPL,Deferru8ed SPOOL messagesuX received)
X (MuxCAN,COUNTANSWER mvessages sent)
Xv8 (SLCD,Scheduler vXloop countdowns)
X (DEAD,MDA deawdlock avoidance cw8alls)
X (DFAL,MwXDA deadlock avoidwxance failures)
xX (VSWM,Volume swx8itch tape mount)
X (TAPM,Tape moxxunt)
X (STRM,Phyysical structure y8mount)
X (USTM,yXUser structure moyxunt)
X (GENM,Gezneric mount)
X z8(TINP,TerminationzX batch requests)
X (TOUT,Termina{tion print reques{8ts)
X (TCNI,Ter{Xmination console {xinput)
X (TCNO,|Termination conso|8le output)
X (E|XINP,Emulation bat|xch requests)
X }(EOUT,Emulation p}8rint requests)
}XX (ECNI,Emulation}x console input)
~ X (ECNO,Emulatio~8n console output)~X
X (IPCE,Resend~x queue expirations)
X (DTAM,DECt8ape mounts)
LST ON.ounts)
LST NNI6 h M
IFNDEF h9$$B,<
PRINTX hXUNDEFINED COUNTERhx B USED
>
IFiNDEF G$ITEM,<EXTEi8RN G$ITEM>
STORiXE A,G$ITEM+$$B
A,G$ITEM+$$B
v yP J;P &=P ewP %X<P
RP 9P vP KP t;P tXzP
-I:P -[RP N:`P [ZP @ ] P P $ P P &kvP P j4P P k`P P Ml P P ~] P P 5kzP 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 :~M P ;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 K YP 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 R j P R k`P R4YP R4XQP R5HXP R5X<P R5Z7P R6DHQ R6[VP R6[[P RMl P 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 ;G P
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 4 P 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 3 KRP 3 (VP 3 +qP 3
2P 3 RP 3 VP 3 2P 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 | 6l Qp 6l88p { 6lkp 6m
}p 6m p y 6mh6p 6n
2p y 6nX9p 6nXrp z 6n[9p z 6n[<p y 6n[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 7M p 7\yp 7lvp
7$p 7$ 7p 7% P 7&
2P 7&=P 7&N8P 7&kvP >.:P >;wP >;yP >kP >YP >YP >Y P >\P >\P >\P >\RP >\WP >\\P >iP >m P >
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 F zP F ZP F zP F )wP F +P
F 9P F j6P F lVP F lYP F (WP
F kzP
F mP F yP F z2P F
QP F
TP F 2P
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 J H;` J K` J MYP 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 K Jp K JQp NlP 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 RmM P 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 b woP