Google
 

Trailing-Edge - PDP-10 Archives - BB-M836B-BM - tools/usah20/usah20.exe
There are 30 other files named usah20.exe in the archive. Click here to see a list.
?p0@?hXt?x " 
 
<++52	`~`'p(t5z2 (A5,2X,F6.2)(2I4,5I2,A1,I4,6A1,2(15A1),6A1)(I4,2I1,2I2,10X,40A5)(' TOPS20 ACCOUNTING SYSTEM')S    PAGPADSKPAPAGRUN    SESRUSESCOA    D    CRDCRCRDRUXUSAG20.CHGDSK  SEQINUSAG20.CHGDSK  DSK  SEQININSRT.TMP DSK  SEQOUT    DSK  INSRT.TMP DSK  SORT/RECORD-SIZE:160/KEY:1,39,ASCENDING /KEY:79,39,ASCENDING/KEY:40,39,ASCENDING /ASCII INSRT.TMP OUTSRT.TMP  INSRT.TMP DSK  INSRT.TMP DELETE    DSK  SORT/RECORD-SIZE:160/KEY:79,39,ASCENDING /KEY:1,39,ASCENDING/KEY:40,39,ASCENDING /ASCII INSRT.TMP OUTSRT.TMP  INSRT.TMP DSK  INSRT.TMP DSK  DELETE    DSK  SEQININSRT.TMP DSK  SEQOUT    DSK  INSRT.TMP DSK  SORT/RECORD:109/KEY:1,39,ASCENDING /KEY:46,39,ASCENDING/KEY:40,6,ASCENDING /ASCII INSRT.TMP OUTSRT.TMP   INSRT.TMP DSK  INSRT.TMP DELETE    DSK  SORT/RECORD:109/KEY:46:39:ASCENDING /KEY:1,39,ASCENDING/KEY:40,6,ASCENDING /ASCII INSRT.TMP OUTSRT.TMP   INSRT.TMP DSK  INSRT.TMP DSK  DELETE    + -<% <,%n,%r <!,%l <$,%n <&,%r 2D+| ? F@2D+~ ? FD2D+ ? F2D+ ? F2D+ ? F?2D+ ? F:2D+x ? FD+x <(,%m <, <,&Z <,&` a2D+ @3D+ a2D+ @3D+ a2D+ @3D+E a2D+ @3D+E+
,<*,%l <-,%l </,%n+<2,%r,l0D+ <7,%p+<9,%r  0 Ff Fc*d!+) <E,%n <G,%r l0D+$ <L,%p <O,%r ;0D+, <,V ;0D1D+.+/ <,u ;0D+2 <,	S ;0D+4 <,8+$ <
,'	 <e,%l <g,%m <,z+
 <,'	 <j,%l <l,%m <,L+
 <n,%l <q,%l <s,%n <v,%r l0D+G <{,%p <},%r  0 Ff*dM+U <	,%n <,%r l0D+O <,%p <,%r ;0D+W <},V ;0D+O <z,
+O <x,z+O <v,z <,%n < ,%r+Q <%,%m <',%m @3D+g <u,'	 <),%l <+,%m <r,y+
 <q,'	 <.,%l <0,%m <n,!+
 <m,%tXmjgDxbXmjgDxQh0gdh0gd`DZ\_`mZ\_(mjgd@D?:x5(mjgd@D?:x#h0gdX569X?:569X@D569`m569xkxj`ca@h N``@^~^` 	N`h$(?h@^~`@Pc~^`@^~^` 9N`8$;$f$l$l$i@E`` N`DE~P$b$0$1$1$2$2$;$j$a@A@3@Y@<` 9N`8$;$f$l$l$i@E`` N`DE~P$b$0$1$1$2$2$;$j$a@A@3@Y@<h }N`8$;$f$l$l$i@Eh@Pc~ h@^!~"h@^/~0`@^1>3~4h@^A~B`@^C~E>F`@Pc~G^H`@^I~K^L` _N`8$;$f$l$l$i@E`` N`DE~P$b$0$1$1$2$2$;$j$a@A@3@Y@<` _N`8$;$f$l$l$i@E`` N`DE~P$b$0$1$1$2$2$;$j$a@A@3@Y@<h }N`8$;$f$l$l$i@Eh@Pc~Mh@^N~Ph@^\~]`@^^>`~ah@^m~o`@^p~q>r(A10)(A5)(' READ USAGE FILE: '$)('  Input file name: ',A10)(' Type file name of input file containing USAGE'' entries.'/' Default is USAGE.OUT.')(' Type EXIT to return to monitor mode. Type ? to'' get this'/' help message.')(' Report by [System usage (S) or Disk usage (D)]: '$)(' Type S for system usage report. Type D for disk usage'/' report. Default is S.')(' Sort by [Name (N) or Account (A)]: '$)(' Type N if reports are broken down by name. Type A if'/' reports are broken down by account. Default is N.')(' Write to file: '$)(' Type file name of new output file. Default is'' USAGE.RPT.')('  Output file name: ',A10)S    USAGE.OUT           EXIT ?    ?         USAGE.RPT N    EXIT           cV.= \vp3p4 p @3 p @2 <H,%n,%r <J,%n <L,%r33D{2F{7+3D}2F~+
 <G,'33Dx2Fy+w3 <N,%n <P,%r+ <Q,%n,%r <S,%n,%r+ <U,%n,%r <W,%n <Y,%r 33Dz+2Dy+ <G,' 32D~+# w D3+# <[,%n,%r <],%n,%r+ <_,%n,%r <a,%n <c,%r 23Dz+-2Dy+* <G,' 22D~+0 } D2+0 <d,%n,%r <f,%n,%r+# <h,%n,%r <j,%n <l,%r43D{2F{7+>3D}2F~+9 <G,'43Dx2Fy+<|4 <n,%n <p,%r+B <q,%n,%r <s,%n,%r+0 v3p4p 3 Ap 2 Ap,~h N6`h ~N5`p03h N9`p03h N<`	h NE`h NM`h ~N6`p$3h NR`h NE`h N[`h ~N6`p$2h N_`h NE`h Nj`h ~N5`p04h Ns`p04h Nm`h NE`XG"\H: !p @x !p @x !p @w yZDy y.x y.x '3(+*d~ y &.x (.x ' H*d+ yZDy y.x y.w '3(+
*d+y&.w(.x'H*d(I4,2I1,2I2,10X,40A5)(39A1,15A1,I4,5A2,I18,I1,7I4,5I2)}HaJ~)9 \U !p @:+Zppp <n,%n <p,%r 90D+f 0D+f <u,%p <x,%r U &.: : H*da $ D! !+j $ D! !+j $ D!7!@ U4bm0b+m XXBx,~` hNO`8$$8$9$$@"``>NQ`D"~(@;@$$$7$$$$9$$7$"$ $$$N$ $!$$$$8(I4,2I1,2I2,10X,40A5)(39A1)(39A1,I9,I4,5I2,I1,6A1,I6,39A1,I7)(3(39A1),F8.2,F8.1,14X,F10.2)(2(39A1),' UNSPECIFIED ACCOUNT',19X,F8.2,F8.1,14X,F10.2)}H     aJ~99 \s p @ p @6+zppp <",%n <$,%r $2Da+ 2D1F++ <),%p <,,%r <6,%n <9,%r a0F+ 2D1F++ <>,%p <@,%rf&z F ha(a H!6 F`@f! t !3Ft:!*d !1D+ <C,%n <E,%r+ <L,%n <N,%r $ D   + $ D   + $ D 7 @ s4b!0b+! xXBx,~` Nc`8$$K$a$$@6``<Ng`D6~`@"$$b$c$$L$L$$5@$K@M$a` Nc`8$$K$a$$@6``Nf`D6`@h Nj`@@M@"(!( (`h Nm`0@@M(!( (`(I4,2I1,2I2,10X,40A5)(39A1)(39A1,I9,I11,I8,I8,6A1,3A1,6A1,2I6,I4,5I2,6A1,39A1,I2)(39A1,'INPUT SPOOLER CHARGES',18X,39A1,8X,F8.1,I7,7X,F10.2)(39A1,'INPUT SPOOLER CHARGES',18X,' UNSPECIFIED ACCOUNT',19X,8X,F8.1,I7,7X,F10.2)}H     aJ}X \	Q p @	 p @V+	Wppp <	|,%n <	,%r 	20D+	t V0F+	t <
,%p <
,%r <
,%n <
,%r 	20D+	t V0D+	t <
,%p <
!,%rdT$z D	h	2V	 D	1@d	 	Q 	3F	R:	*d	j 	1D+	p <
#,%n <
%,%r+	r <
+,%n <
-,%r $ D	 	+	x $ D	 	+	x $ D	7	@ 	Q4b	{0b+	{ 	UXBx,~` 	vN	9`8$V$	1$	2$W$U@	``QN	=`D	~@	$T$	$	$X@	6@	@	$S$	2$W$X$	0$U$T$	@	3@Y$	` 	vN	9`8$V$	1$	2$W$U@	``N	<`D	`@lh N	B`0@l@	(	$	2(	1h N	H`H@l(	$	2(	1(I4,2I1,2I2,10X,40A5)(39A1)(39A1,I9,I11,2I8,6A1,3A1,6A1,2I6,I5,I4,5I2,I4,5I2,6A1,6A1,39A1,I2)(39A1,'OUTPUT SPOOLER CHARGES',17X,39A1,8X,F8.1,7X,I7,F10.2)(39A1,'OUTPUT SPOOLER CHARGES',17X,' UNSPECIFIED ACCOUNT',19X,8X,F8.1,7X,I7,F10.2)}H     aJ}}: \6 p @ p @+<ppp <a,%n <d,%r 0D+Y 
30F+Y <i,%p <k,%r <
,%n <
,%r 0D+Y 
30D+Y <
,%p <
,%rd
1$z D
ch
5 D@d
d 6 
d3F7:
d*dO 
d1D+U <
,%n <
,%r+W <
,%n <
,%r $ D
d 
d+] $ D
d 
d+] $ D
d7
d@ 64b`0b+` :XBx,~` [N`8$
3$$$
4$
3@
y``^N `D
y}8@
e$
1$
x$
]$
5@@
^@
_$
1$
5$
y$
4$
6$$
2$
2$
c$$$$$@@@
6$
b` [N`8$
3$$$
4$
3@
y``N`D
y`@
Jh N'`0@
J@
e(
c$
5(h N-`H@
J(
c$
5((I4,2I1,2I2,10X,40A5)(I3,2I10,I5,6A1,39A1,I1,2I3,2I6,2(I4,5I2),2A1)(2(39A1),2I10,I5,6A1,I1,2I3)(39A1,6A1,39A1,I10,I5,F10.2)(39A1,6A1,' UNSPECIFIED ACCOUNT',19X,I10,I5,F10.2)}H     aJ|Lu \
} p @
$+pp <
g0D+
0D+
g0D+
0D+

$ D
g@d
% 
~ 
%3F
~:
%*d
%1D+
Y<%n+<
 $ D
$ 
$+ D
$7
$@ 
}4b+` 
k`8$
$
f$
g$
$
@
;``=N
m`D
;~$
%$
 $
$
@
!@
P$
$
 $
j$
i$
$
e$
f$
$
P$
O$
j$
O$
d$
$
:$
9$
i$
$
h` 
k`8$
$
f$
g$
$
@
;``:N
r`D
;@
&@
P$
e$
$
:@
!$
$
 $
jh N
u`@
P@
!@
&$
$
:(
gh N
x`0@
P@
!$
$
:(
g(3(39A1),F8.2,F8.1,2I7,F10.2)}HOUTSRT.TMPDSK  SEQINDSK  SEQOUT    OUTSRT.TMPDSK  DELETE    DSK  eh6 \mpg !p @e !p @P !p @< !p @; p @ p @6 p @e p @i p @ p @
t!;DD+DhD8,f+Dh,D7.D,	+D3,%r@d!7n2	2Ft,Rn<FQ*d;!DDiApApf$	(Q` QNj`@	@=@"(!( $f$	(Q`@^t~v>wh@Pg~x-Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-('*','Run Date:',T12,A5,T17,A5,T22,A5,T47,39A1)('*','User ',39A1,T53,'TOPS20 System USAGE Report')('*',T39,'USAGE Entries From: ',I2,A5,I4,1X,I2,':',I2,1X,'to: ',I2,A5,I4,1X,I2,':',I2)('*',/'*',T56,'Connect',T76,'Input',T84,'Output')('*',T46,'Total',T57,'Time',T66,'Runtime',T75,'Spooler',T83,'Spooler')('*',T15,'Account',T45,'Charge',T56,'(Hours)',T67,'(Sec.)',T76,'Cards',T84,'Pages',T91,'Remark')('*',T15,'-------',T43,'-----------',T55,'---------',T65,'---------',T75,'-------',T83,'-------',T91,'------'/'*')('1')]l\ \ !p @H !p @G !p @G !p @H !p @@ p @F <,%n,%r@dF < ,%n <",%r:F <&,%n <(,%r:F <+,%n G G  ( @ H  <-,%r:F <3,%n,%r $.DF <5,%n,%r:F <7,%n,%r:F <9,%n,%r.DF  F Ap,~h N~`h NI`H@H@Hh NN``@@h NT`	($%$$$$$ @$$$h N]`h Nb`h Ni`
hNs`('*',39A1,T41,'$',F10.2,T65,F8.1,T75,I7,T91,39A1)('*',39A1,T41,'$',F10.2,T65,F8.1,T83,I7,T91,39A1)('*',39A1,T41,'$',F10.2,T55,F8.2,T65,F8.1,T91,39A1)]l\Y\Qp@=!p@@!p@<p@>p@=p@<p@ApB;#pB?#pB?#pB>#pB@#pB;4@e<,%n<,%r:=0D+o<,+o7D;+k<,%n<<(>(=(<@@('*',T41,'-----------',T55,'---------',T65,'---------',T75,'-------',T83,'-------')('*','* * * Account Subtotal * * *',T41,'$',F10.2,T55,F8.2,T65,F8.1,T75,I7,T83,I7)('*')]lX9 \1 p @ p @ p @ p @ p @ p @ !p @ !p @ !p @ !p @ !p @ <f,%n,%r:0D+B <c, <h,%n <j,%r:0D+F <, <n,%n,%r:0D+J <\, <p,%n,%r:0D+N <X,@d D D@d D 1  Ap  Ap  Ap  Ap  Ap  Ap,~PPPPh N `h N(`P((($$h N1`h N1`('*')('*',T41,'===========',T55,'=========',T65,'=========',T75,'=======',T83,'=======')('*','* * * Totals * * *',T41,'$',F10.2,T55,F8.2,T65,F8.1,T75,I7,T83,I7)('*','******************************')('*','* End of Report for User ',39A1)('*','Rates:')('*',T5,'Session Connect Time = $',F5.2,'/Hour,  Session Runtime',8X,'= $',F5.2,'/Second')('*',T5,'Input Spooler Unit   = $',F5.2,'/Card,  Input Spooler Runtime  = $',F5.2,'/Second')('*',T5,'Output Spooler Unit  = $',F5.2,'/Page,  Output Spooler Runtime = $',F5.2,'/Second')]l[Y \0 p @v p Bz p Bv p Bu p Bs p Bt #p Bx #p Bw #p Bw #p By #p Br p Bt p Bu p Bx p By p Bs p Br0@+E <, <,%n,%r:v0D+I <
, <,%n <,%r:v0D+N <, <,%n,%r:v0D+R <, <,%n,%r:v0D+V <, <,%n < ,%r:v0D+Z <~, <#,%n,%r:v0D+^ <z, <%,%n,%r:v0D+b <w, <',%n <),%r:v0D+g <s, <+,%n <-,%r:v0D+k <p, </,%n <1,%r 0 v Ap,~PxwwyrvPxwwyrvPxwwyrvPxwwyrvPxwwyrvPxwwyrvPxwwyrvPxwwyrvPxwwyrvPxwwyrvh N{`h N`P(z(v(u$s$th Nz`h N`h N``@rh N`h N`h N`	h(t(uh N`	h(r(sh N'`	h(y(x(3(39A1),F8.2,F8.1,2I7,F10.2)}HOUTSRT.TMPDSK  SEQINDSK  SEQOUT    OUTSRT.TMPDSK  DELETE    DSK  ez \?p9 !p @8 !p @# !p @ !p @ p @q p @	 p @7 p @; p @q p @G <t,%l <v,%l <y,%n <{,%r @ t FG [ F2  F#*d\ t Dr DF D
 Do [ DG,D Dr,# D,%r@ds @ t2FG:s*dn7Ds+t <i,$ <c, <Z,+\@ds @ [2F2:s*du7Ds+ <S,$ <M, @ [ F2  F#*d{ t Dr DFD
.Do[+DG@D.Dr #2D#:s*d	7Ds+ <F,$ @  F#*d
.Do[+DG.D.Dr#D
.Do[.DG.D.Dr #D <0, <,%m <,%m ? q Ap 	 Ap 7 Ap ; Ap q Ap G Ap,~~x
<or#8Hq	7;qG(
pF;
#8H
$H:G#83
$H:G#83(
pF;
#8H
$H:G#83~x
<or#8Hq	7;qG(
pF;
#8H
$H:G#83P#8H
`@^A~B^C`@P9~D^E`D$N<`@\@@t(t(s$8$[(#`-$N<`@\@@t(t(s$8$[(#`@^G~H>Ih@P9~K-Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-('*','RunDate:',T12,A5,T17,A5,T22,A5,T47,39A1)('*','Account',39A1,T53,'TOPS20SystemnUSAGE+Report')('*',T39,'USAGE,EntriesFrom:',I2,A5,I4,1X,I2,':',I2,1X,'to:d',I2,A5,I4,1X,I2,':',I2)('*',/'*',T56,'Connect',T76,'Input',T84,'Output')('*',T46,'Total',T57,'Time',T66,'Runtime',T75,'Spooler',T83,'Spooler')('*',T17,'Name',T45,'Charge',T56,'(Hours)',T67,'(Sec.)',T76,'Cards',T84,'Pages',T91,'Remark')('*',T17,'----',T43,'-----------',T55,'---------',T65,'---------',T75,'-------',T83,'-------',T91,'------'/'*')('1')CL\Q!p@!p@!p@!p@(!p(@Tp=@=<p,%n,%r@d=<r,%n=<t,%r:=<x,%n8<z,%r:(<},%n*a ,(4'HQ1T<,%r:.<,%n,%r7$.D'<,%n,%r:*<	,%n,%r:'<,%n,%r.D Qu,Ap,~hRNP`hsN`H@@h N!``@htN&`	($%Q$$$$$F$$$htN/`h N4`htN;`	h NE`('*',39A1,T41,'$',F10.2,T65,F8.1,T75,I7,T91,39A1)('*',39A1,T41,'$',F10.2,T65,F8.1,T83,I7,T91,39A1)('*',39A1,T41,'$',F10.2,T55,F8.2,T65,F8.1,T91,39A1)CLY:\#0p+@ !p,@ !p,@ p,@:p0@+p @,p @,p,Br:G0D+$ <W,R <n,%n,%r:G0D+( <S,R <p,%n <r,%r:G0D+, <P,R <u,%n,%r:G0D+0 <L,R <w,%n,%r:G0D+4 <I,R <y,%n <{,%r:G0D+9 <E,R <},%n <,%r:G0D+= <B,R <,%n <,%r  G Ap,~PIIHJDGPIIHJDGPIIHJDGPIIHJDGPIIHJDGPIIHJDGPIIHJDGPIIHJDGPIIHJDGPIIHJDGh NL`h NU`P(K(H(G$D$Fh NL`h N\`h N```@Dh N\`h Ne`h Nf`	h(E(Fh No`	h(C(Eh Ny`	h(K(J(39A1,6A1,39A1,I10,I5,F10.2)P}HOUTSRT.TMPDSK  SEQINDSK  SEQOUT    OUTSRT.TMPDSK  DELETE    DSK  eKP \lpg !p @f !p @e !p @d p @" <,%l <,%l <,%n <,%r m ; FP # F*d m  F*d  D Dd D 8 D D DP e DO D Dh $ Df D" D <~,R <,%n <,%r@d# m ;2FP:#*d7D#+ <x, <s,K <m,)+@d# m #2F:#*d7D#+- <g, <b,K m # F*d! m  F*d#  D Dd.D 8 D D.DP e DO DDh $ Df D".d+@d# m 2F:#*d.7D#+< <\, m  F*d2  D.Dd.D 8 D.D.DP e DODDh $ Df.d":+ .D.Dd.D 8.D.D.DP eDODDh:f:":+ <V, <Q,K <L,) <,%m <,%m l " Ap,~0:hPedfP"8:dedfP"(:OedfPf(:OedfPf8:dedfP"(:OedfPf0:hPedfP"8:dedfP"(:OedfPfXedfP:`@^n~o^p`@Pg~q^r` DNi`@;@@#$$8(e` DNi`@;@@#$$8(e`@^t~u>vh@Pg~x-Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-('*','Run Date: ',3A5,T47,39A1)('*','Directory ',39A1,T54,'TOPS20 Directory USAGE Report')('*',T48,'USAGE Entries on: ',I2,A5,I4,1X,I2,':',I2)('*',/'*',T45,'Total',T56,'Disk',T65,'Number',T74,'Avg. No.',T84,'Structure')('*',T15,'Account',T44,'Charge',T56,'Pages',T64,'of Files',T74,'of Pages',T86,'Name')('*',T15,'-------',T42,'-----------',T54,'---------',T64,'---------',T74,'---------',T84,'---------'/'*')('1')I:
('*',39A1,T41,'$',F10.2,T54,I9,T64,I9,T75,F8.1,T84,6A1)I::D0<-,%n </,%r:0D+!,<*,R@d@d D,D ,,Ap:0Ap+ Ap, Ap,,Ap,~XhDN	`(@($$(@('*',T41,'-----------',T54,'---------',T64,'---------',T74,'---------')('*','**B*`AccountSubtotal***',T41,'$',F10.2,T54,I9,T64,I9,T75,F8.1)('*')I:('*')('*',T41,'===========',T54,'=========',T64,'=========',T74,'=========')('*','* * * Totals * * *',T41,'$',F10.2,T54,I9,T64,I9,T75,F8.1)('*','******************************')('*','* End of Report for Directory ',39A1)('*','Rates:')('*',T5,'Disk Usage = $',F5.2,'/Page')I:
 %p D	 %p D %p D	 p D p Ddf F
0@+8 <t,R <w,%n,%r:0D+< <q,R <y,%n <{,%r:0D+@ <n,R <~,%n,%r:0D+D <k,R < ,%n,%r:0D+H <h,R < ,%n < ,%r:0D+M <e,R < ,%n,%r:0D+Q <b,R < ,%n,%r:0D+U <_,R < 
,%n < 
,%r:0D+Y <\,R (  Ap,~X
		X
		X
		X
		X
		X
		X
		X
		X
		h N
`h N`X($$(
h N
`h N`h N``@	h N`h N#`h N$`p((39A1,6A1,39A1,I10,I5,F10.2)P}HOUTSRT.TMPDSK  SEQINDSK  SEQOUT    OUTSRT.TMPDSK  DELETE    DSK  eH1 \ up p !p @ o !p @ n !p @ m p @ + <"
,%l <"
,%l <",%n <",%r  v  D F Y  , F *d!
  v  ' F $*d!  # D  D m D '  A D $ D  D Y  n D X D # D q $ D o D + D  <","\ <",%n <",%r@d ,  v  ,2F : ,*d!7D ,+!# <",# <!|,#T <!v,$3+!
@d,#vD2F#Y:,*d!$7D,+!6+<!p,#<!k,#T@#vDFY*d!*v(''TF,$*d!,--#-DT4D-m.D-'-,A6D'$-D-.D'YT,n-D-X-D-#Dq($'D*o*Di+.do+!@da, *v*T'2F$$:0,*d!77D,,+!E,<!e,#('v'IFI$*d!; # D#.Dm.D#' A D#$.D.D#Y n D#XD#D#q $ D#o.d+:#+! ##.D#.D#m.D' #A.D$$.D%.D%Y:#nDXD##D$q:"o:$+:%+!,<!r,#0<!Z,#T <!U,$3 <"",%m <"$,%m  u  + Ap,~0 C q ' Y n m o  + 8 C # m  n m o  +( C $  X $  n m o Y o( C $  X $  n m o Y o8 C # m  n m o  +( C $  X $  n m o Y o0 C q ' Y n m o  + 8 C # m  n m o  +( C $  X $  n m o Y oX n m o  C`@^ w~ x^ y`@P p~ z^ {` !MN r`@ D@ (@ ,$ #$ A( n` !MN r`@ D@ (@ ,$ #$ A( n`@^ }~ ~> h@P p~!-Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-('*','Run Date: ',3A5,T47,39A1)('*','Account ',39A1,T54,'TOPS20 Directory USAGE Report')('*',T48,'USAGE Entries on: ',I2,A5,I4,1X,I2,':',I2)('*',/'*',T45,'Total',T56,'Disk',T65,'Number',T74,'Avg. No.',T84,'Structure')('*',T14,'Directory',T44,'Charge',T56,'Pages',T64,'of Files',T74,'of Pages',T86,'Name')('*',T14,'---------',T42,'-----------',T54,'---------',T64,'---------',T74,'---------',T84,'---------'/'*')('1')IL \"[ !p @". !p @"- !p @". !p @"& p @"- <"u,%n,%r@d"- <"w,%n <"y,%r:"- <"},%n <",%r:"- <#,%n "-  <#,%r:"- <#,%n,%r $.D"- <#	,%n,%r:"- <#,%n,%r.D"- "[ "- Ap,~h N"Z`h N"/`H@".@".h N"3``@"&h N"9`P$$"&$$$h N">`h N"F`	h N"O`('*',39A1,T41,'$',F10.2,T54,I9,T64,I9,T75,F8.1,T84,6A1)ILY \# p @# !p @# !p @#
,%n,%r:#A0D+#l,<#|,"\,<$,%n,%r:#A0D+#p,<#y,"\@d#@@d#B:D#?0D#@+#S #A,Ap #@,Ap #B,Ap:#?0Ap+#@ Ap,~X#B#A#C#?#AX#B#A#C#?#AX#B#A#C#?#AX#B#A#C#?#AhN#D`hN#K`X(#@$#B$#?(#ChN#S`hN#S`('*')('*',T41,'===========',T54,'=========',T64,'=========',T74,'=========')('*','***Totals***',T41,'$',F10.2,T54,I9,T64,I9,T75,F8.1)('*','******************************')('*','*EndofReportNforAccount',39A1)('*','Rates:')('*',T5,'Disk%Usage=$',F5.2,'/Page')IH9C\$27p @$3p+B$apQB$ p D$ %p7D$ %pZD$1%p+D$Q%p D$Cp D$7p7D$df$F$0@+$A!<$},"\<%,%n,%r:$0D+$E,<$z,"\4<%,%n<%,%r:$0D+$J.<$w,"\7<%,%n,%r:$0D+$N <$t,"\+<%	,%n,%r:$0D+$R\<$q,"\!<%,%n+<%7&\"&Q B&Y\"&e &Ye<+%A & &	*"%TC"%R*+  "  4%G"&	0B,1B<+%J+%N ^&+ >&#*>&* %{  ,%x!>&#*> &++@&K<+%O! H&LDo you want to close all files? (Y or N):+%Z&#&$@ &
 &
{4%d & &7 &
+%g &
4%f4&f+
&+%i\"&+%i\"&+%i & 4%f+
&!&#&$C<p+%,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y,%y*x.&#d"+Z|&++%O+%BZB&#+%k@SYS:FOROT6.EXEUndefined error number\"&+%?Error in ERSTRx&Can't get FOROT6.EXEH%UZ%R:&L@@@\@z@z\%d?FRSNS1 Can't put myself in section 1, reason:
 Can't create section 1 with SMAP%
?FRSCM1 Can't put myself in section 1, reason:
 Can't PMAP section 0 to section 1
\%i,~I$P\"&^O!&H&^.$ p,~i&lP,>,>KS(B%'&"j0 D'&"6F'+&l,>,>O@I[d`dF"`h/& F',^,^/7 ."
 D'C!pQ A` @'-&&} "B' '-&&}[w0F+&{C!pQ A` @' "B' '&"t D'-&&} "B' '&$2 $D',^,^,~&" "B' $D'+L\+%tSYS:SORT.EXEg?@ " '>-6@'+'" "B D' '> $'@@'74'7 '7'?!"\$'4'3Z@'?{4'*@t'S '@A'A2D'A+' p2B'A+' '@'B4' 'C'C4' 'D*$C6' +
'D7+
'E X' 'BC"%wC('%6@'+'+
'+'F,~P
Pj+?x'+~Ot'C8'+C6' Q"Xl@Q$6@Q$@X$z6@X$_@ "BXX`5TX+
6 '+'6\"'H+'7\"'L\"'\"'O " U$@4'<4'<\"'P<+'	  @H@@|+p@|T@{\t`p <'E,%t+'%?SRTXGF Execute-only GTJFN% failed for  ?SRTGFS GTJFN% failed for  , .
6'P6`'PO}5O\!PYPYPYPCohPYPXILA$5C J\R+
AP CGP@VKV;/PbK
ZZYYUGo'UGS'SZ(n'&SZ('*SZ'''USZ&'3m`'+mZ'%mZ'"mY' mY'9r'	{{KRf'P#)R
T'9H
HVM
j}HT

		|P [hMzE'7MzE'6S'4~hn'6~On'3ZC'=$w-9rx@'}K'}K`'LA$5C n]"'h0u&th0u&l;F3&`Fi'Fi'ZZYYX:Q&}
kIKX4%xKX3- )u='
k#KP[|P [h;F3}&ZYY:'&^
k.&?HP[|P [hu?&Zu?~@&ZP@VKV;/PbKM
]IQ[&Y(D~p&YWxOUkOOrc OOqh O[mO/L``
AwB%oc'8&Kq;|B%Rq;|>%PjB&L{{%?
nK
;%'+^{HM	4:%HM	3[@	%N@\:%sSzZ <F
%r&(.%x|J%k^h2c&+^gTr&#zR%n>Aj<1TOs1M3E%9K1z@S1yBjS1y? K+mK+l{9@K+lu_(XwB!|K@&t&Ou6
%wP [|P [h):%x
~%'(J"%lS<f
&*%s R%r	z+&#	WJ%t!%O'Ke
`R	KHY4>%pwf%J
_Bb%u
_2%vv%p^,6%wL?_i%fK!F,%UK!%B
K^%m
G8[S 
2b%t
2%u(bIs%)	O$Zc$kw%$^$h3%%3$cG$ezA$zU$G$czi$[$=z}$$o$A{$($}{%$,%{9$.+$E?$zS%
_%
s$JP	qG$w-$7$ ->$$E?$	}u?$x|z$%
L$0K$2O9-$~yJZ$ 7#$;W$
\\*$3\\*y$2#KG#rzi#S[#^o$#d$+$?$	S#h
_#
s$
P	qG#D7#C ->$#CE?#BfDJZ#B	}u?#A%
L#A0K#Sgh;W#@^Z-#@ 7##?`Gz#?
\\f#T\\f|#TzA#G#-[#%o#7#9#++#4P	qG#7#O3;W# ->$#E?#	}u?#!z2#F%-#%
L#0K#+#Ne#Hz# 7##
\\!~#\\!~}#"3zi"9["rz}">o"a{"F"u{%"O"w{9"Z+"y?"}S"
_#
s#P	qG"/	"/7".E?".	}u?"-%
L"-"]O`"'0K"[ 7#"&
\\!Q"\\\!Q|"[!
!I!!&A!6!pU!7!k
a!;'!*
u!E;!,w!e!;!3!Z!UbA!M3""G"$G!R[!o"
"
"+"?!
S!
_"
s"P	qG rw- qu^# p	 p7 oO3;W ok- nE? n	}u? mfDJZ m!z2 Yx|z YF%- XP4 Xaigs DP5 D%
L CP5 CP6 BP6 B
z AP7 AP7 @0K uP8 @Y# ,
",O9-"+gh;W+V`Og(~yJZ'+#Ne$Hz$^Z-#JZ#7#;WNJZ`Gz 
 
3YG\zA
zU
GYzi[4z}o8{t{%#w{9$+<?qSy
_{
s@P	qG
w-7 ->$
E?
	}u?	!z2	x|z%
L0K(O9-~yJZ;W
dOP)dOPy0)BGiziI[To{Zx+}?S
_u
sP	qG:7: ->$9E?9fDJZ8	}u?8!z27%
L70KJgh;W6^Z-6 7#5`Gz5
dOOJKdOOJ{pJzA	G#[o-/!+*P	qG	7O3;W ->$E?	}u?!z2F%-%
L0K+#NeHz 7#NJZ
dORdOR}*zi0[hz}5oW{=k{%Fm{9P+o?sSu
_w
syP	qG&	&7%E?%	}u?$!z2$%
L#"]O`0KQ
dOQqRdOQq|QA-gU.b
a2'!
u<;#w\2V3QLbAD3GGI[o+?S
_~
sP	qGiw-hu^#g	g7fO3;Wfk-eE?e	}u?dfDJZd!z2Px|zPF%-OP4Oaigs;P5;%
L:P5:P69P69
z8P78P770KlP87Y##
#O9-"gh;W"V`Og~yJZ+#NeHz^Z-JZ7#;WNJZ`Gz{39GE[}o=B+zAL?zULG?ziU[z}\o{`a{%ee{9f+{Mo?^{aySg
_i
sP	qGLw-KUL-K7JULJE?I	}u?I
LG= aGH/_F0K~yJZFH-0EEw?&D 7#DRC
Y?*Y?*wPzG"zi[o84+:?<S
_1
s?P	qGrh aq7qE?pfDJZp	}u?o
Ln^M?&n0K^Z-m 7#m^hSgl
YA.YA.{`GDzi[1oVXA+R?]S
_A
sOP	qGF?&7*7wJE?	}u?
L0K#F3SgOS a 7#NJZ
YA~$YA~{0#h04Q&[nz}/oY{4p{%;r{9E+t{MP?xSz
_}
sP	qG	7E?	}u?
L"]O`0KQ 7#
YAQRYAQ{`R\AMU	{
a	
u;
OFc903bA$G)[Xotvy+{?\Sp
_
sP	qG<w-<UL-;h a;F?&:u^#9	9?&878UL7*7wJ$k-#E?#5
%
L
P5= aP5
^M?&
P6	H/_	P6P70K?Y#tySgt
sLas~yJZrF3SgrH-0qq^Z-pOSapw?&o/83\JZ[7#HRGNJZG^hSgF[+o-kp+/zAz?1zU{Gmzi[Cz}oE{{%{9+I{M?
{a'S
_
sNP	qGzw-zUL-y7yULxE?x	}u?w
Lv= auH/u0K0~yJZtH-0tsw?&sRr
QN2QNwP1(GQzi1[>ofBc+h?jSF
__
snP	qG h a7E?fDJZ	}u?
L^M?&0K1^Z-^hSg
QJ2QJ{`2FGrziK[oo+?S
_o
s}P	qGAF?&A7@*7wJ@E??	}u??
L=0KQF3Sg=OS a< 7#<NJZ;
QRQ{0Qh04T[z}]o{b{%i {9s+"{M~?&S(
_+
s-P	qGI	I7HE?H	}u?G
LF"]O`@0K
QqQq{`	
]A5{U6(
a;'6
uG;8Otc;wmg^3;>bAQGV[o!$&+)?
S
_1
s3P	qGjw-iUL-ih%ahF?&hu^#g	f?&f7eULe*7wJQk-QE?P5
L9P59= a8P58^M?&7P67H/_6P66P750KmY#"ySg!
!a~yJZ F3SgH-0^Z-OS aw?&/83	JZ	 7#

u1%
x
k@Y
m@m
rG
@
sqG
kR
j_9q	
jR
i{(
i
DJ
h	
h4zYY
gk-
g
f`
fgi#
e'	mJ
e`
dP4
daigs
P&i
Ph
O .=J
O
;
z
:
:h
90K
}Y#
&

%4z<w
%O9-
$7
$V`Og
!l$#
 MA	
 &>{
l"s
lC
-
-
JZ
_l:
	D 
Pa
:
.^J
V`y	



vp

5WY
qQl0i'
Ul0}-

`:u@	@E G][<o:ad+i?kS

_

s
P	qGv3Rw]_g
ZUL-al(B	UL4zYYk-U-v`MmJLkvhP4
y
z
y0K6M	JA
xY#
e

d7
d3R
c a
c&rb
b_9Gg
_&+-g
^gj3
]/83
Jam_
6`
6gj$Y
5JZ
5_l:
4F;mJ
4	D 
3Pa
:
3F
2h
2>rG
1MJhw
1
K8
Kvp7
!5	r	t
#q	ll0i	B
%	pl0}	H
+
-	{:u	9@		<@1	=G	x[	Wo	U	|	+
?
S

_

s
P	qG	9w]_g	6al(B	3		3?&	24zYY	2k-	1	1U-	0P4	0	0K	QM	JA	Y#	
		3R	 a	&rb	9Gg	&+-g	gj3		/83lamY`Xgj$YXl:WF;mJW	D VRVPa
:UFUhT>rGTMJhwS
$M	S
$Mw`	R0ij!:uc@	f@gG[zox"$+?)S,
_6
s9P	qGc/`c	bVmmJb4zYYaM2ak-`50Ksw^		5Y#"ySg!
!  a u-H-0/83,gl:SR	D Pa
:>rG
aZu
aZxu5dIf]hqa:uO?uQGj[ZoXnp+u?xSa
LmP	qGOY/NYig;	:7:4zYY96ty98R8Y,7-7P46"Y-"0KUw`!
:;`Y.91MJ9u:h=-
[:V
[:yPV5~Iq
-[}o~~+?S
HX{+zHX{+|pzi619RA>l1M[al1a'cl1uj;*l6amO0l6uscdwfhj3l93<Gn[poqs3GGB[oHJL+
?SN
_P
sQP	qG5u^#4|35t30KvSZ%A2zX3zX3xZ~|t(Rt	iM9
&l
a9Cq
uA&Ws&kv*&{'-'};/+MO2,	:uc7,'?aw9,;!,OE,cW3G,w}L-ObAE3O-zbUGG,-3xbiN[2vb}Oo/23cQ.2G c%Z2[%c9\+22o'cM3m?3ucaUGS43)[!?3++o$S
a_+~ a8S0	h}$
ug? #c8gn	i&S 7
	i%5
_ Ke	i96
s|gP	qGUL-u^#HQ	UL7m4zYYlS<lE?jF8SjP`s<i	}u?gfh%?0
LaP5`A:YEY-1H/_D=?f?2O9-D6ta1
AE@H-0@?
!??0?<M/B;	D ;R:
t:3$52Z~|lPt\B:/\>X\>5'\7N+\2g'r'I(\)8*\)7\	\	)\+,\6.\.,[rO.O[mNO[mO[m	O[l|[l{&O[l+O[kO[kO[j]O[jRO[i%r%H([Z[X%[Qgr%0[Ms/[M"-[M	+[L,[FG[@v*r#eOD^w'dw]!+{0