Google
 

Trailing-Edge - PDP-10 Archives - BB-FI82B-DD_1989 - 5,11/rms1u1.rel
There are 10 other files named rms1u1.rel in the archive. Click here to see a list.
`?4Tt(T]Tw1@YOS^[OT
< 	TBT\)TMKT!vLT-^xT3MZH3wHE	pHE<,NQ><<IYx&Yx5Yx9Yx>[Yy
Yy##001HHp,0>p*p2 K26MisEMi|Mj>Mj
=#2@60?&Qx<^<c;<|)PG Tt(T]Tw1@Y
<0>"sH A
	 	  	*U*U*'+-/379<?AEG(IJ.K	*U*@JLMPSU[]^_-  ^>	,5 ,6 0b	"Q",+
_ 
aJ,a < G\,@@+ 
aJ,c,K[0,5 h	(PA5B#`T,i <k, B "l0B+  *Z+! *Z0 Bh.
	*A""" <m,	+) BaT+&"maB ,n0n+(,q+),`,4 ,>p	 QQ*,>+G 
aJ,q@@h@@.0 <k,1p D@,1p D@
,)	(D(34 .1p+6 0,>s,>"Ph  
,Sh,5 F,>,>,5	 D U;>O@h @  @, 7[ Bh <t,	*p< #>,4C,>,>x	 Q"D,>4b8+86 h,y #A,4H,>,>,D>4b+,5 	 P L6 0b,+
,>,>4bJ B,~,>N,>4bPZ \h	,	(D
U5 ,>,>4"S4B	 B,~,>Q,R>4bWZ \h	,T5 
,>	 P],>4"Z4B B,~@@"6 0b,M+
,1 "maB+g	"D
f22h	,"maB+j,>,>4b^r8,~,b8,~,K5 G	"Tn,4 pr8,~+m,6 0n,b+<,\5 " ...Z0."0	"AEw3b,#,m@@6 ,k B8,~ .+| .,s5 (0b,)/"$"	"@ ".,|5 -b8,~ "0+ "0P h ",5 0h <1,	",~,4 %p hXDf
ZFh"66 0b,r+
6Z8. Dh,,c	(5 <  ]h,~P
 +Q$A`@@,(+Q$A@0&,(+Q$B 	 @( & ( +hZ8b Bh, Bh ",5 ?h <@,,~- 
E 
,aJ,G,>Y,Y>4bj B@@	*EU*,<,>p,*>+K 
%aJ,I@@h,8,95 7,>,>,;>O@h	(E
"2 #G,44,>,>O,I>4b/+/6 h,P #2,49,>,>,5	"T
U
;>4b(+,,"5 T6 0b,$+
U, B
,>
,V>4";5bE,>V	*"C,>
,1>+H,>',>,>,>~,~,? B
,>
,]>4"B5bO	*Q AL,>V,>
,>W,D>~+Q,>E,>,>,G>~,~- ! ^>	 
,aJ	(T
T,XaJ+Y,>
,>,>~,@@h,<5 s6 0b,>+
Z 	(A"U*]"[0B,\T`h,5 b,fO@h,m+,0+,_5 h," \"[	"U*P"e0B+,,(+,
+ 
8,.,_5  0[0XB D,>,>`	(T"P(n,W>,X,>
,>`,>,n>~,o+j 
i@@.0 <k,/1p D@	* E"v,24 t1p+z 0,>a,M>"Ph,iSh,_5  
@ ( <b,	 A
Qh (h,>,>,>,q>~,r,k*p}+{6 h,d, #,4	"E Q(,>,>,:>4bK+<,6 0b,[+
f .,>,>
,>,	(T(D*+ .,>,>
,>,+ .,>,>,>,,c5 ,.	"",~,+,~@@
,>
,>4"	4B B,g,>,>
,>, .
!,.:
+,4b B .,>,>,>, ,.,~@@
,>
,	"E(U*)>4"#4B B,g,>,>
,%>,& .,.:
+(,Y5 m6 	"P20b,
+
m@@
 \h \h <p,5 s,>O,'>4b* Bh:
	* ":,>
,A>4"94Bv B,>w,>,>,>~4b<XBh <x,4 :,v	"Q
E*C,~@@
,>7,8>4b@ Bh:
,>
,;>4"E5bF?`
,z,>
,G	"P
K>4b~ B,v,~,f,~ "K $+Q "J $ Bh	 Dh,>D,D>	(T*T T4bH Bh,H5  B
 Bh	,U $4 Y 
 $' B
 Dh,>
,h	>4"T	(E"\4B^ B,vO@h	:
3b
+Z7 h	+e7 h,gO@h,>h,>h	,>h,y>~	* T"e,v4 U,~,>R,O>4b\ B Bh,>,>f,->,. .,.,~	*D
Q"m6@>+q,>,>,d>,~@@
:
,>
,O>4"h4B* B,v+q	 @ Ev,~7 h,gO@h 
h/L,>,>,>,j>~,k m6 0b,2+
	 @ ~Z0 .[0 d$laB1D .,.[0`B,~,>,>,>	(A(U"4bs "XBl,>,>
,z>,{,>
,>,>p,
>~,,~	"*( .,. "0XB,>,>
,,,>
,>,>~,	""" 00.uZ0/"`Q,>,>,>,,>,>@,>,*p	(Q* ,g,~ .,. "0XB,>,>
,>,,>
,>,>,%	"
P )>~,&,~,,05 
 B,1,e5 t++7@8,~,1[8..+.	((@(1"m`B,~`B+W280N1Nd$0D`B74R-,>,>8,(	"A(D:>,)"6 0b,}+
>
,>,9>,:,~[8"`Q"8!B	 D E(BZ@gR+I[
@ 6@ 
,>,>,>>,?4R8*pB,>,>,G	"D"K>,H,~[8"`Q"8!BZ@2B+S[
@,>,>,J>,K,~	*ES*pN,>,>,Q>,R,~,(8"maB4H\,>	,>8,>,U>~	*(\,V"m`B,~..+W,/5 H B7 h,gO@h s[ Bh 3F	**d+h,>,>,>,[>~,\+k,>,>,f>,g+ 0 hXB#	(A*AmflZFh<66 0|,<+tPm (+vQ"A`@@+vQ"A@ (+vQ"B 	" Au (+v HhZ8d Dh, Bh &h,>
,>,>h,i>~,j,~Z8	 Q"~. Bh,,>,?h,{>,|,~Z8. Bh,,>	,?h,>	(",,~Z8. Bh,,>,?h,>,,~- R ^> 
SaJ	(U"(,aJ+,>
,>W,
>~,O@O@ < 
b <(X\h,	(A
 5 (6@+ B0 "b,4"(4BO@6@@@,>,>0,> #	"*" ,4!,>,>,>4b, #,4%,>,>,">4b#,-	*A(@(4 +
- 
 ^>,>,>,o>+)The RMSUTL commands are:
CHANGE		c	 1hanges values in the specified entry or record
CLOSE		closes the currently opened RM	 9S or REPORT file
DEF AREA	creates and names an area description
DEF DATA	creates da	 Btafields in a record
DEF FILE	creates an RMS file with specified attributes
DEF KEY	 J		creates and names a key description
DELETE		deletes the specified entry or record
DISPLAY		outputs the specified fields to the REPORT file
EXIT		returns to the EXEC 	 [(you may CONTINUE)
FIX		completes $UPDATE, $PUT, $DELETE for specified records
HELP	 d		outputs a brief description of RMSUTL
INFO		describes current environment and name	 ls you have DEFINEd
OPEN		opens the specified RMS or REPORT file
REDEFINE	gives new 	 uattributes to DEFINEd name
SET		changes the current environment
SPACE		computes spa	 }ce-usage within a file
TAKE		executes the RMSUTL commands in the specified file
UNC	 LUTTER	eliminates POINTER records and deleted records from RMS file
VERIFY		determin	 es if a file is internally consistent

If no REPORT file is open, report data is ou	 E tput to TTY:.
- ) ^> 
aJ,`J",!,+5 &6 0b,o	(Q*Q*+
&,@@)+5,@@ ,:+-,{,_5 * B 3B+5@@"Z	*A( Bj+5-  ^> aB"aB+#	*P(04", b+,>&,>+0- ) ^>,:,>,>+,>	 Q(Q9+3 *aB"+=@@@@,~,>(,g>4b'	"PA,~- 4 ^>- B ^> <+O- C ^>O@@@h <	*E(J <,,{ <-,+b- F ^> <O@H <.,{,5 16 0b	*(D"R,+
27@+: $2B+X,>W,>,,>,>3,>,W>+TO@h	(E*Q*[ <-,+b@@h,W5 6 B2 <7,K5 :+bO@h <;,[5 >@@S@@	(A(Ec :`BO@c <' 1"+O@6@@@g,4 u,>%,>,>,#	(ET*l #T,4m,>,>,&>4b?6 h+S f"+:
 <?,a5 S@@h	**U(t,g+i6 0b,R+
@@@t+h@@d+h,]5 D B+h caF,E	"U"}`F",GaGp,J "[0B,LaF+,>
,>,>~,,~	"DA h"N$61$+
."'2bh,O,~ pF`d`+Z82&h,R.	"
/h4f/+bZ`2bh,T"N,~,P5 Y B6 0b,v+
Y	*** "[0B,[,y5 ` B
,>
,>4"o4Bc B+c "[0B	*U
,e,5 i B
,>
,)>4"4Bl B+c,"4b" B+cAREA 	('&zBUCKET'S PAGE:	)zChanging ,u:x	( 0/yDeleting 2uENTRY   (starts at W4z5	 8z)FILE PARAMETERSINDEX ;zRECORD'S RFA:	>u	" A (>uAu)RFAs:	Dy:	Fy}	 @Iyu:		Mz+Oy	 RRMSUTL~Ry	% Invalid value in field -- octal value show	"(ZnDuyxKEY-VALUE>,>`,Y>+	"D( c,>c,a>+b,>e,d>+,f,>h,f>+x	 (A kx($8,>n,i>+j,>q,o>+	 Etx0?UTLUCR unable to change recordu,>y,r>+?UTLUCP un	 
(|able to checkpoint file{,>,z>+g,QNY,>	(Q E
,>+,,>,>+,,>
,>+,
	**U(ckqqmmq,>	(

,>+,>,>+
,,>,>+{	*E
s|,> ,>+, ,>#,!>+,>%,$	"EQ"'>+",&,>(,&>+%,>+,)>+',+,>.,,	"@ Q
/>+-,.`hh,>3,/>+@8	*Q"E
8,>:,4>+0,:,>=,;>+<,=`	 "T(@hhhh,>B,>>+?,C%,,>F,C>+e	"D
I,>I,G>+s?UTLUDRunabletodelete(recordK,>O,J>	(Q*(Q+{,>R,P>+D,R?H',>W,S>+	*AZ\ic,>\,X>+DATA-IN-RECORD^p	"*Qb(a,>c,]>+Q
|,>|,z>+5,|,>,}>+s,'s range*!	*
"~,>,>+~,>
,>+,
	*U**====@LW,>,>+	rup	*Q"
s},>,>+K6$0,>,>+,	(Q
"-,>,>+Y,>!,>+,>#,">+
,$	*E
&! #,>(,$>+e,(6$xx'x	"E*
/,>/,)>+%,/Z\`,>4,0>+1,4x	 P"(7,>8,5>+,8xp,><,9>+:,<x	*E
"@wxy,>A,=>+6,B,>D,B>+ ,>G,E	""D
H>+#,>I,H>+,>L,J>+^$88,>O,M>	 Q
"Q+,>Q,P>+Q,>T,R>+S,>V,U>+C,W	*EQ"Y$,>[,W>+N,>],\>+X,^,>`,^	 @(E
b>+,a ,~,>d,a>+],>g,e>+_,g*j,>j,h>+>,jD"b#M>b#M>bq#" b2/2~b2/@ib2/ExPD"b2/MOrb2/X[>b2/ZS`T2CPb2/d~!b20|$b20;+ b8
_"lb8eb8e
Tt(
T]!
Tw1R@Y
TE%)
T4uBA)[
T5F"C
T9.F
T:rLD"bK26AbMisEybMi| bMj>6bMjD"
OS^[)
OT
<4bPqmOybPrM	|bPo`3=bPpwj`6#'bPpX^bPpC2ibPpES@cTm{c7|D"c!>	ubyb,bybuVbyb#nIbyb)ebbyb)ilbyb)lFbyb;-p	D"byb<\fbyb=*ibyb=Sbyb=hbyb\Kbyb\Hbyb\@*bybyX{bybz(Dbyb|*`	DMLcE)H`ebcaw"$@cYuQ"5c^^i".Dcam!"ccWQ"4cdsq"!@`
MLF-MLF+FMLF0:eL'iODeVBYh2eVC
EqeVHz#DeV`2w
eYx&ueYy##~D emX&3%eo#>bUeqauheqa{CkD"f
=$f#2#f>/f>5%f>8uf>=FO	@f>=nf>C@{f>Cef>Cif>Clf>Uf>U-f>VFQf>V\	f>W*f>WSf>Whf>vf>vf>v@f?Xf?(f?D `bjw`~b`
pHp;jkG~A
HHp;h<_~A
Hp;ju/~AXHp;jkG~A0Hp;ju/~A
hHp;gW~A
@Hp;gW~A
Hp;gW~A	pHp;jkG~A	@Hp;n`~A	Hp;g]o~ApHp;h=O~AHHp;ju/~AH@p;jP~A8Hp;ju/~ApH@ \8
~@YhH@ \8
~@YH@ \8
~@XXH@ \8lAH@ 8
PrM	~@XH@ \8l@H@ 8
Po`3~@WxH@ \8l9H@ 8
PpX~@WH@ \8l8H@ 8
PpC2~@WHUZ7~A8H@ B8
PpX~@VH@ 8l/H@ \8
Po`3~@UpH@ 8l.H@ \8
PpC2~@U`H@ 8l-H@ \8
PrM	~@UPH@A8l,Hp;nh~AHp;ju/~A8Hp;g]o~AHp;h=O~AhHkQ:Vg~AXH@
~@BPHp;n`~AxHp;jz?~AHp;ju/~AHp;jz?~AxHm6.w~ApH @ \8m6.pl$H@ 8
_~AXH@ \86#~@/pHp;ep?~A0Hp;ju/~@pHp;jz?~@@Hp;r;~@Hm6.w~@HSA0
_~@~pHp;r;~@~@Hp;ju/~@~HSA0
W~@~H@8u8H@~@|Hm6.w~@|H@gXg~@z`Hp;ju/~@zXH@jz?~@v8Hm4$7~@v0Hp;ju/~@u`Hp;ju/~@u0Hp;r`7~@uHp;ju/~@tXHp;r`7~@t0Hp;ju/~@tHp;jz?~@s(Hp;ju/~@rxHp;j}~@rPHp;rE~@qPHp;ju/~@qHp;r;~@ppHp;ju/~@p@Hp;ju/~@oxH@	 	 "	 *	 3	 ;	 D	 L	 U	 ]	 f	 n	 w	 	 	 	 	 !	 *	 2	 ;	 C	 L	 T	 ]	 e	 n	 v  @HW	 P(x| (@X@xxy~ x@x@xO@+@@ `B+ $X@@,~	 T 6 0b,+
Y $[@@,~ *7 + $^@@,~  *"b	"P
0B *.+ *B JO@,~ 
 <c,4  $c@@,~ *O$e1D	(EU *Q1D *S1D *U JO@,~ 
 <c,4 ! $c@@,~@@[	""P*"1D &0D+&$e1D &_1D &T4Fh FO@,~*i	  C* ,80@m$k@m<l@mTn@mlo@nq	?p3@nr@n,s@n<t@nLv@nlw@n|x@oy@o${@o<|@oL}@od(@H	*;< B>@p,@pD `;B@a(H	"P(@DF @HW JK@px @H	(?LB @H	O Q@q$@q<
@qT@HW	""?U `9W(Y@@@qt@r@r4@rL@rd@s@s	8R@]@s,0 (HU$ cU@sh@sp0 (	*( fH U$0 (H#U$0 (H&U$0 (	"@
%nH)U$0 (H-U$ uw@v@v	0T
w@v  `UH2s @H3{0 (H3 @	*H30 (H3 @H(@	'p
(@r6@vl8@w
90 (H:( (H< `9	" @w`@v `H2(@H	(Qp
?(H@ @rA@xB@x4C@xDD0 (HE&	*@(!G&0 (HG&$ `9 *,	%(*"* @y@y(@v@vp `&H2((@H1K(H3	"<E"2@@xM@x4M0 (HE9G9 `9	(U ;1 =@ @y@y(@v@vp `:H2; @H	(Q@(CD(XF@@xN@w
N@xDO0 (HEQ(	 P
 L (H<Q0 (HOQ `9D U	) CTV@v `QH2S Z@x4R @H3]	 Q)]0 (H3`(@HWbR GdQ@v	 P!|"e @HTg i@zTU@zdV@ztW `9 	(A n`9- @H3q0 (HXt$ @Hv	 C@(v x@{Z @HW{0 (H[8$ 	"A	@H(@P@{T^@{t`@{a@|b@|4d@|Lf@|lh@}j	>@}4l@}Tn( k$( k$( k$	 RPP k@}p@~@~ k@~(@~80 (	"@
(Htk$0 (Hvk$0 (Hzk$0	 P@(! (H|k$0 (H~k$ @H3(0 (	"@(Q)H+$ @H-(60@P@rALAd	?`C`2A|A
A4
ATA|AA, 7AD@xD0 (	*( :Hm$0 (Hm$0 (Hm$0 (	"@
%CHm$0 (H"m$ JmA`Ap	0KA0 (H)m$0 (H,m$0 (H1	( Tm$ WYA0AP@v `nH2U @H7	(@(\] @H3_0 (H3b @HWd0 (	"@(eH8m$ @H7i @H3k0 (H3n	 @(m @HWp0 (H;m$ @H>u 	*(
vw8ApA @HAz | @zTB@p|B@zdC	8
~@ztC@HD8a(HE0@HF	"~(AtGA	IA	$KA	<LAdM @HM
,S0HT8A
@A
P @HV0 (	*"
 HW" @HZ$0 ,'H\'$ `g)	&E)@zt_ @HD,8a(H_/ @H`1	 C@"1 3@}tb @Hc68a(Hd:	"!: `<6 `A> A
TfA
thA (Hl	 PB0 (Hr<$0 (Hu<$0 (Hv<	 PK$ M<@n(A @HDQ8a(Hy	*P
ST @HzV0 (H|8$ @HD[8	 E@"\a(Hd_ @H~a8a(H	d	"!xd `ga `9h0A4	A$	A<	AT	A\	At	8a(	"@mH	f0 (H"f$8a(H		(P!uf0 (H,f$ @HA{ }A		8
(
~A<	
@H	@q @qP @H30	 P

(H38@H	@sl	@pD	 @H	 9(@q$	@q<@qT	@w
		8@(A	 @H30 (H3 @HW0 ,"	"A H	"$ `9 @H	&( (H<8	 P(P~( @H	; @HT, 9.@zT	@zd	@zt	 	"@(1@H320 (HX8$ 97=P@{P@{p@{	5*B(9@|@|0@|H@|h@}@}0@}P `95 @H3A0 (	"A)*UBHD$ 9FL`@rAHA`AxAA0APAx	5!(JAA@A(@x@ `9D8a(HR `;	"USN @H	8 @H	XGY @H	[	 ([8 8HH	 _$ `9X @H	 8 @	*(
dH	!e g8(A(A0A@APA
8 @H>l 	"@"lnAt	&A	' @H	'q8a(H_u	"Cu `9wA
	) @H	'{8a(H_	"A E} @HT0H	*A A0A@	"CP
 `9AT	/0 (H	08$ @H	(@	 D P!a(H	2 @H	5 @p,	6	>@(@st	6A<	7 @H	7( $ @H	:0	(Cx!H2@p,	:@x4	;@v$_ @H	;%0 (H	<8	 (( @H	>*G8 @H	?. 00	?@*0A$	CAD	DAT	FAt	G@v$	A	H @H	I58 8H	JH	M8	 Q!|
9 @H	M; 9=@zt	PA_A,	T @H3A0	(P
 A ,FHD$ @H	UF( ,IH	UK J	)"*JKAp @HWM( ,PH	U] _R]	4@(RAA  @H	UU( X$ @HWZ0 ,9	"@(@[H	]$ @H	:_a@a(H	[	*"Q(cd(@H	_g	] `iH	`s `kH3s `m	*
A lH	`s `oH	as `qH	as `H	bs @H	Y	(Cxt @H	bw0zH	dAL	C@zt	eAd	F @	* "}H3~0 (H$ @H	U( ,H	U	"RD( 9Ap @HW
(,U8 9	* (E
8A  @H	g( ,H	U 	$Q)Ap @HW( ,H	U A 	"CP
 `9!A	j0 (H	k @H	n'0	"~'*H	dAL	p@zt	pAd	q @H3.0 (H	(Q)01$ @H	U3( ,6H	U8 @78Ap	 Q
8 @HW:( ,=H	U@ @?@A  `9	(?PABA	pA,	sA	t0 (H	k@0 (H	tJ	 @
I `H	vL0 (H	v( (H	w 	 @ R     TOFile not open
	*ZCurrent bucket has bad headerCurrent bucket not a data bucketx	 c(Name not known@$,>f,>+,fRMSUTL>CHANGE:	 A"kCLOSE
sDEFINExDELETEyDISPLAY$EXIT,TFIX4VHELP	( Dt<aINFORMATIONDcOPENLjREDEFINET
SET\SPACEduTAKEh	 A(|UNCLUTTERtVERIFY|%  @ @O@,~VALUE OFBUCKETMPROLOGUE-D	"ATA
edatafield-nameDATAFIELDNAMEDATENTRY~HEADER
SID(UMBER^`	\ZL` ATTRIBUTESs`	]
U` @LAST-IDd`	]C` @LEVELgc.g` NEXT-BUCKETj`	])}` @NEXT-IDm`	]+`"TYPEa`	]
` WORDS-IN-USEp`	]c+`	 area-ID of bucketDATAINDEXmaximum ID for this bucket# of index levels to	 % data-levelpage number of next bucketID that will be assigned next entry	 -# of words used in bucketNILRIGHTMOSTROOT+#positive decimal number(6`	]
`	\k=`8 @8KEY-VALUE
`9 :pageYnumberofabucketQuotedkeyHIKEYRF&@O@,~(`	]DSIZE#`	]M8`	]CE`M(NH`	]D`N(NK`	]JT`N(ON`	]K^`O O# of words after header[c7`R	*"R  Q @O@,~FORAREAoFILE
~KEY&areaIDBUCKET-SIZEy`	\`6`Z][pagesperbucketAREA-COUNT`	\[`^-AREA-OFFSET`	\[``(a`	\`2`aX@aBYTE-SIZE`	\aV`b@cKEY-COUNTd`	]b`dldKEY-OFFSET#`	]h`ffMAXIMUM-RECORD-SIZE referenceU`	]a` @DATA-AREAB`	\k(` @DATA-FILLE`	\l` @DATA-TYPEH`	\n%` 	INDEX-AREAL`	]
H`
 INDEX-FILLO`	]+`
FCER`	]C4` @LEVELS9`	] N` @NEXT-KEY<`	]+1` @ROOT-PAGE?cH#` @POSITION[`	]8B`(g`	]J.`	 # of levels in index structureoffset of next key descriptorpage of index's root	 area ID of key's data bucketsmax words to load in key's data bucketsSIXBIT	 'ASCIIEBCDICarea ID of key's index bucketsmax words to load in key's ind	 /ex bucketskey-of-referenceCHANGES-ALLOWEDDUPLICATES-ALLOWEDOF SEGMENT	 8# of bytes before key segmentbytes in key segmentFILE TYPEREPORTRMS-F	  @ILEOBJECTO
*YNAMING ITfield nameWITH TYPEFILE-BYTES	"
IFLOATING4INTEGER$STARTING AT WORDnumber of words befo	 Qre fieldDISPLAY:DECIMALOCTALWITH LENGTHnumber of bytes in field	 ZSTARTING AT BYTEnumber of bytes before field
8file specWITH ORGANIZATION	(b4WITH KEYSkey-nameBUCKET-SIZE:BBYTE-SIZE:
EFORMAT:KRECOR	 @kD-SIZE:Hconfirm with CRLF (defaults are BYTE-SIZE=7, FORMAT=VAR)default pa	 sges per bucketbits per bytebytes per recordVARarea-nameWITH BUCKET SIZE	 |# of pages per bucketWITH SEGMENTSsegment-namefDAFILL:$oDANAME:	* 	l,fIAFILL:<vIANAME:4rarea nameBUCKET-ENTRY~RECORD
		I*	
(*$LARGEST-ENTRY$8larger numberGREAT	 T	ER OR EQUAL TOFOR RECORDS IDENTIFIED BY0
5?TO MONITORRECORD WIT	 	H RFAOF INDEX0PLEASEABOUTALLAREASCONTEXTDATAFIELDS	* 	&o
yWITH NAMEAPPENDxINPUTOUTPUTPATCHINGMAXIMUM-RECORD-SIZE:	"
	/	bytes in largest recordalready DEFINEd nameCURRENT,
9	 (	7USING KEY OF REFERENCEAND#(AT PAGEfile page numberBKT/IDTO ON	 @"	@E IDENTIFIED BYDATA-LEVEL8DOWN
3LAST-RECORD8NEXT8UP	(	H,8USING ENTRY positive decimal number1TO FIRST ONE IDENTIFIED BY?	 	QLAST-ENTRYRELATIVE-REC-NOSFROMquoted keyLOWESTFOUND-KEY-VALUE	 
	YHIGHESTdatafield to test  8 @O@,~OPERATOR=>=><=	 	b<USAGE OF FILE FROMALL-KEYS
|SECONDARY-KEYSINDEX FILE FROMPROGRESS:	( 	j"frequency to show progressINDEX FILE UPON@
,@NOACCESSNOFIX"@	s
@Dbucket of RFA/ID of RFAquoted stringJLU:bPrM	D `	\ZL`	\[8`	\[8`	\`29`	\`6`	\aV9`	\k(G	D `	\k=`	\lG`	\n%H`	]
HH`	]
U`	]
_`	]+I`	]
`	]	D`	]b:`	]h:c.g`	]C`	] NJ`	]&;`	])}	D `	]+`	]+1J`	]2X;`	]7D<`	]8BcTmK`	]C4I`	]CEc7	`	]CK<`	]DcH#K`	]J.c7L`	]JT`	]K^`	]c+byb,
@byb=Sh`ebqa{Cg@>0s(f>C@f>WS`z#'`d|Hp;jz?~@l`((	y 	TBT\)TMKT!vLT-^xT3MZH3wHE	pHE<,NQ><<IYx&Yx5Yx9Yx>[Yy
Yy##0>=PH @b<	 	 	 	 	 "	 *	 3	 ;	 D	 L	 U	 ]	 f	 n	 w	 	 	 	 	 !	 *	 2	 ;	 C	 L	 T	 ]	 e	 n	 v 	*U*U*#'(+-1479<?BE	*U*@IMPRSTUVWX- 	 " ^>,5 [6 0b,+
\ 
eJ,],+ 
eJ,`,"	*D+,>,>, <B\ #,4,>,>e,>4b,+,~	""", #~,4$,>,>e,>4b  <B\,9,~	("*-  ^> 
`J, 
,`J,"	b+- * ^>	b+/- 	 A U(3 ^> <EX\h@@,5 h6 0b,+
h <k, L|,B B0 "	"D(Q
;QB0,i #|,4>,>,>n,%>4b& #|,4B,>,>e,?>	(*(D4b@+4N"".B+E <o,],2 L@@,O+D <p,] Lh>h	*
T*L <q,X:h0(0,r D 
,4 L,O+J <u,],5 xbx+Q,y	(Q
U- 2 ^>,` D[1F+G0F,|&~1F+J1F+Q, 3p	*@P]5N_,h5  BZH1R.46B8+c <,' B B8Q.47*"P,~	(D("f"0B+hZ04B,~,55 Q6 0b,7+
 "b "b "	*A(Anb,E,f,~ "b,R5 XB0,E,~ "bO@hO@h@@h,
	 @*T
wZ`D,XB0 Bh:hd,,,O5 ~,
 hXB+y,E,f	* *5j7"h " 
jO@1J "1J "1J "4"7 h Bh2Bh	*(,,&,~,,`5 [0F+7B,,~0F,&~0F,!	 
@",~ h7HH
+,b$7HH	+,b$,~  Z0$%0D+"%	 3F,~Z5F:hb& 
hXH( Hh,~ h7F 
,~ 
$&O@1D	 A
! "1D "1D "7 h Bh2Bh5")9Z0 h"%0B+1h* F	""*7D(
+1Z"*0"7$+$XB(9
*Z5F',~	*E*@2,i5.b.1"+<,q  
;|/,~,55 2b/,<4 @$.2D+D XB0 /. B<.	 @
U
C,~@@8,3,5 6 0b,k+
5,=b7+E,H0b,8b+E	(U
@
L,IXB0+E,2b+E@@h,E4 R4LE hXB0,~1B+U5LU,>	(*U
T,d,^6 0b,G+
:,M5 @bA+O+O <B,X D0	+O,LXB0	(* ]+O <G\h+O <G\h+O <B,X D0
+O,\QB0+O@@h Nh .h	* T
e <C,] L@ h N0
,~- 0 ^> 
,W5 F6 0b,V+
F,t	*U**n <J, <K, <L,+2,t+q B <M,+r ,>,>$
,>	 Ev,>~ -`B+{,>,>,v>,~ ~ ,>	,>,z> 0	(D"",>,>,}>,>	,>,>"0B,~,>,>,>,>,>	("",>,~,>7B0
+,>,>9
	,^Z0,>
,>,>	"D
(7B0	+,>,>,>7B0
+,>,>,>Z04B,>,>,	 QD>[04B,>,>,>,~ p .7@8+D 
8[06 0p,l	(U
(!+DN0B+D <Q,q}Z0(/*.0*+,./(,>,>R,>,>,
	 E"
),>,>,>}+/,>,>R,>,>,
,>,*>}+D0B+D"S0B	*U D"2+D <Q,q}$x,>,>R,>,>,.>~+D0B+:7L0+D+=	"E*D(:0B+D"S0B+D <Q,q},>,>R,>,6>~,	,>S,>,@	"D(
C>+D,T..2.,~+- h ^>,j5 Y6 0b, +
Y 
w	"T(K`J,[ <],,B B0 L~,O "7  "QB0 "0,4S,>,>a	(U@T,C>4bD <b, ~XB0[
aJ+Z $XD0 "0,4[,>,>a	(@E(\,T>4bUZ B0 L <G\+t 
K`J,c <e,,B B0 Lj	*e,H5 h!$0B $QD0!$XD0 a0Bel Di "0,4m,>	*"Um,>a,\>4b][0 B"1B+s,+k,O4 vZ07@ "+w	*@
U"v,b5 n$ &&."& B <o,' B <p, dXB0  B0	((@~ XB0 "0,4,>,>a,n>4bo L[0 B <"B\,>,	 P A>,4b 
|[00B+
 <G\+Q"I@d0J+	 DD (Q"A`+0J+ ( & $Q"A@+0J+ (  & $Q"B  B	 
 D F H <X\h@@,4 @@ <,+` -pZ
0 <M,'	 ( *ZQ!`.$7*",~- F ^>	`+- $ p ^	 D
)>,>,>+'- ' ^>7B+0,>,>,>@@7L+4	"(D*1Z0,>0,>,/>@@27L+8Z0,>4,>,3>@@6++- + ^	"@"@":> 
~@@~Z0,>,>,7> 
_@@>Z0,>,>,=>+8- 9	 (B ^>,!.[ 0G <q,'XB.B*.G+A- B ^> <r,	*D(T(K L~ L~ #~,4M,>,>v,>4b <w, L L> ~XB0 #Q	"(P
S,4T,>,>v,N>4bOZ^ B0+H- H 
p ^>,`5 z[	(P*
\5l^0F,{&~#`2F,~+X- X ^>,5  B+e- ` +p	 P((d ^>,},5  B+- c ^>,a5  B,},4 ,	*P*m,B 0&|, B "*+_- h 	p p ^>ajQ*A` J@@	(E
u &4\x2$+l9v/1( &
1(
 &1( &1( &+p $(	 E~[(.$Q$A` & 
+@7@ 
=f,~ * /J5(Q
(	("T  Fd5B"
.$9*j*j+Z+BUCKET-SIZE=	a@xzC thru Cxzz	 " DEFINE DATA default is   at  "zRMS file is		%	 (RMS file is		Not openxy -y/NOCHA+NODUP	( 1/y/NOCHA+DUP2y/CHA+NODUP5y/CHA+DUP	(98y/DAN:;y/DAF:>zy/IAN:	( BAy/IAF:DzyCurrent key-of-ref is	Gz	 JCurrent record at	KuReport file is		NASCII	 (SEBCDICF-BYTESSIXBITDECIMALOCTALFLOAT,>Y,B>+		*EQ[,Y,>],Z>+,>,^>+?UTLCCF could not cl	 E
Udose fileb,>e,`>+[,fQG8Jx?UTLCDF co	  luld not DEFINE filekxxx,>r,f>+x	 Q P
u,>u,s>+g,v$0,>y,v>+,>{,z>	("A}+{$,>~,|>+},>,>+,x0	**A",>,>+,nptlm0,>,>+w,
	"@A
,>,
>+$0,>,>+,,>,>	TT+,>,>,>+,,>,>,>+,>,>	(E",>+,>!,>,>+ 6$H$$H$$$ @(,>'	(PE(,">+,'$@$8,>+,(>+
 0,>7,3	"U*E
9>+WY]Z\_`b,>>,8>+1,>@@	 "U(Axx,>C,?>+@,Dmrqrrx	(AUJIxqxKxD0D!8p8P	(EQ*R}$0,>T,D>+,>V,U>+E,WKa	*[,>Z,W>+x?UTLCOF could not open file^x,>b	((Q c,[>+x,>f,c>+X,f,>i,g>+,i	"El,>l,j>+h,lxxxx?UTLCOF could n	 
E
tot open TTY:sx,>w,>,m>+,x,>{,>,y	"Q"}>+#,>~,>,|>+},>,>+n, +f*(,>,>+,,>,>+									BD b#M>b#M>b20|b20;D"
TB
T\)2
TMK*
T!vLh
T-^xF
T3UD bOT
<bPo`3bPpXbPpC2c!>		D"byb,Jbyb'h\byb)labyb:^9byb=*byb=SVbybH")bybYcbyb[jz	D"byb\4byb\8kbybgjbybrhdbybuRbyc
byctbyc`	DMD`	DMq`	DMUcE)HP`	X@`f=`eb4c
H3w$
HE	p9@
HE<,+NQ>Bdu^lbQdv9~e*7?C`:Vwve.u<le5+s@`7=`0b8e2?bID"e:/he<c;"
EeVHz#eV`2w
hqDemX&3Veo#>bSeqa{C	f*f>WSf>b"	f>scf>ujf>vf>v8f?jf?
hf?Rf?f?@f?/fv0_`vXIDfH6	H
`-w`-F"`
I``YfP{iH@^D8pl~Hp;s!~@aHp;ju/~@`PHp;ju/~@`Hp;upG~@`Hp;upG~@0Hp;n]/~@^xH@
Po`3~@3PH8p;h8@1HH]8p;h8@10H@8p;h8@0XH@HA(#I~@X0Hp;ju/~@W`Hp;jKo~@VxHp;nbo~@V(H@ \8lCHp;ju/~@UxHp;ju/~@U8Hp;l$'~@TpHp;upG~@THp;upG~@S`Hp;upG~@S0Hp;n]/~@RxHp;l$'~@RPHp;jKo~@R Hp;p/~@QhHp;ju/~@Q8Hp;qz'~@PXHp;n<7~@PHp;jz?~@OhHp;jz?~@O8Hp;jz?~@OHp;ju/~@NXHA'k	~@NPHp;s3/~@N HA(#I~@NHY"0i~@MxH@
u^lb~@H@8`l(H@8hl(H8p;h8@pH@ebPqmObPrM	`hSb8lc^}.`3-A" ,5bO,~$2d+@,~." $$.,~6$	`
2/2~b20|b.
h[	(T
$ ."@@Q8*$,>,>,>,>,>,>}4",>,>	 ,> ",~O,~?UTLUIO unable to do I/O,>,>,> A(>  7,>},>,>,>8,>,D b.
2/@b.
h[f>56dHz8Z
2/E+`>	"U@>}4b-Z74@",>9,>}+4~ .<.8@#9	*T(%@	@   @   @ ",
6,~6$$
`*`h,>,>,>,>,>,>,> 	D"b.
h[eqa{C9b8l*dHz8Z,b.
2/Ex;	 P
@? | { 5@TZX.0Z`2`+ $ ."@@Q8*$ |	 U(GZ,>,>,>,>,>, 52M>}+ZZ,>,>,1R	"AP1@+S,>,>|+>|+! c@`+V 0+d Zp4@YZ`	( X+c 
Z(0@+\Z(+\Z` "Z(&  & 
&	"a4@b.*.ZX5@{@!}b@`+i4!c@`+	"(U*iaT+Z`(@	.{3@`+@@` @  @   @   @ "	 T"(r,
h[Jb.a{CQ`>V`hSYb8lrb2/Exvb.
.63v+} { Z. |. /QX| 	 ./$*" {Z/X@ ",^,^,^,^,^,^,^,~$
	 A(B
pp,>,>,>,>  7,>},>,>,>8,>,>}	*T4b&Z 74@,>*,> }+' .6 }/$ Z. $	 @".Z`.36+',>*,>O+'ZX,^,^,^,^,~	@"eqa{Cf?&=f?X
2/GD`>b.
h[eqa{C`> eqa{C%	 P
*,>,>,>,>,>,>,> S5@2,>T,>O+OZ0T	 P 3 .8@+JZP.38+8@+O5P: Z9J! c@`+<	" ; (+J Zp4@?Z`+I 
Z(0@+BZ(+BZ` "Z(&	 D  & 
 & 4@H.*  ...232|+5 |	 L @ZP.28@ ,^,^,^,^,^,^,^,~0 $
P	@"f>56*f?X*f>WS
2/MO+eqa{C0`>8`><`hS?bPqmOL" U,>,>,>,~,>,>,>,~,>,>,>,~	"f>WST`T2
2/X[U`T2V
2/ZW`T2X
2/ZEZ`T2[f>C@	 \,>,> a@+a,>k,>+e,>~,>,>,>8,>|,5"f>}"@eO+iZ @ Bx, B	"f_O5f>=nb20-	T2\f>C@]f_O5^eqa{C_b.
h[cb20-	g	 *h>} ,^,^,~,>,>,>,>,> S5@p,>+rZ 	* q4`t,>,>O+
 .8   @ZP.28+
Z`2@}+z	" Dy +
! c@`+} (+
 Zp4@Z`+	 
Z(0@+Z(	(+Z` "Z(&  & 
 & 4@	.*  . @
.:+v@,^,^,^,^,^,~*P	@"bPrM	hf>=nkf>*gT2Ckeqa{CrbPqmOu`>}`hSbPqmO	 ?UTLUIO unable to do I/O,>,> Z,>~,>`B+@+$*( ,>8,>,\" B " B ",
2/d~`>`P>b. >~O+$  Xx,> ,^,^,~,>,>,>,>~,>	*A
),>,>8,>,>}5"-O+1Z! c@`+0,>3,>ZZ` 1,^,^,^,~,>8,>,>,~	@"dHz8Z `P>#f>s{
20=&b.
h[*eqa{C/f>s{3
20;4b.	(Q6,>,4b9ZZ D>,~?UTLUIO unable to do I/O,>,>,>~,	 P**?>`B+B,>S,>+O,>8,>, S @   @   @ " T" G,
20|6b2/d~7f>Ci
20=`P>>eqa{CAb.O>~O+Q>Z,^,^,~p: "3B+W ",~ * W$]4DY ",~ Z5D\ ",~ ",~*	D"dHz8ZNf>CiS
20-	Tb7joVb7jcX`>Yb7jv[b7j+\dIo:	 (],>,>,>,>~,>,>,>,>,>}4bvZ8]! c@+f@	* 
f+,>,.,>,>,>,>Bx,,B,[Q@,>,>	"U(n,  @   @   @ ",
h[ab20-	idIo:k`>lb.x.Z2@z+}.Z+,>,>O>|,^,^,^	 ,~p?UTLUIO unable to do I/Oarea numbertype/levelarea numbe 	rD"b.
type/leveltypewords-in-use?UTLUIO unable to do I/O,>,>,>,>,> A ,>,>|,>, y38+,"f?Of?'f?)
.
h[b.	*"2B]+>+T38+Xx,>],>~+T ^ @ X z @ z	(P*P @ { @ ",
U
'"Z5B, 8Z&[([2F 4+, 45@2"Z4B1 87&\([	"Q 02F 4+2 4
0` 4Z1 +6 (B2` 4
4TF{0V+:	P8>+V5V@R@@x,,>y,>Z,>,>,>}+T0V( A+F,>y,> Z,>,>,	D"b20|eqa{Cb8l!`>(`>.b.
PMXz@R",+V> "	 V,^,^,^,^,^,^,~$
*$$$$ $0
`	(*^
	D"eqa{CDb.Sf?O]f?'f?)
.;`c^}.e((h	0>p*{@xDM2ggb7job7jcb7jvb7j+b8l`hS`>	d[8#`3-A`0b`3S`D'+M"L0D
*u@/@@."B",>h,>0,>}++   @   `. ! ~B@ {4b	"" 9 ,4k [1D'+
0D~@++ Bx,>0,"A>5b>~+)=`+*!c@`+,>1,>}+)	D"`3Sub8lzdHz8Z`3S`0b`0b`0b	dHz8Zeqa{C	"A*E Z4@*@@   @ g @   @  ~ @@@ ",
p/	D"`>`3Sc^}.`>`ablerecord deletedno more room in memory	 8duplicates not allowedfile already existsfile not foundthe access mode of anothe Ar program conflicts@f?q/f?,1	 Cfile spec improperly formattedinvalid key size specifiedof inadequate file a	 Kccess privilegesrecord buffer too smallkey longer than 255 characters,> @T,>,>,> }[Z08+Y "+n1X, e9o`2f?4xf?"
Hz8ZS	 D"Z@1X  11X	  41X  61X
  81X  ;1X  =1X  >1X0  C	"
b1XF1X!I1X*M1X+P4@i,>},>,>q,+m,>}.8/8	@k,>,>,>q,>>~O,^,^,^,^,~\"B*sB",~. +
 ~	"E0@+
4[+@ ~$.. @ } @ ",
"~0@	D`WS
Io:}b7j+~b7jv`hSc^}.	(+LUIOunable7	 @todocI/O,>,>,>>,>,@6@}+ @}[}4@-c}+@	*QD*/b@ @   @ ",
eqa{Cf>WS
I&`3Sb8ldHz8Z%b.,>|,>,>;,Bp>[`:>~ >,^ 8,^,^,~$$!" B  B ",
I][<`0b=	@?."B\"	B@@",&OfO[fP  F XF[QF,~6$6$$$D"c^}.?`3S?d[8#@c^}.C`3-AD
Iq~E((P K26MisEMi|Mj>Mj
=#20?"+HB@4T	 	 *U(<=-  p3B 3B 3B   3B! !3B" "3B# # Dxp	 	p ^>** \h \hbh++-  'pp*	p*	(@*5H B@@x+ p \x ^>7@7$Q& Fhbh++,>$,	"@>+
"5 0 B,>,>4B3Zh,>,>4",>h,>4"'4B7,>"	(P
*,#>+7-  ^>O@h+- , #p ^>XB ",5 h	"U@ 3 D <9,0+- . ^>,5 26 0b,+
;,>,>	*UT*;4b) B:+5,!5 @,><,>,>4b; B>+<Z4BC B@+A,>B	 UU(D,>4b@ BC+C,>*,>4"E3BE+N BH+F,>I,&>4"H	*T (L4BN BJ+J,>D,>+M-  ^>,=5 G BF,>R,*>4"L	*A*P"U4BJ,75 M6 0b,9+
M,Q5 Q BM,>Y,>4bT7@+o,>Z	(U
U],K>4"[5bb,>S,G>2B],R$T4Dh,>a,:>4b^,>,	"T
Pf>4bd7@\+o,>U,>4"f4Bo7@_+rZ.( .&6D+r	"U*n2F9m@@,>U,N>+  Do,y5 o+q, Br,y5 YZ	*P

w Bc+t,
+w 
 $@XD0,>Y,>u,>4"i4Bab+ B{ $	(A*D*dZ,4b} 02 $dZ+,4b3B~+=p $dZ,4b B	*(,>Z,p>+- 5 ^> "[6 0b,W+
[,>j,`>4"|	*
U Bw5b <G\,>],>+O <^,o+,_- 
 ^> 
y"	*EU"bZ6`+#`7J	+& 0P4"a	 
U !0"Q(IZ(b Bh<b \h <c,5  v BA+d-  ^> 	"Q(P**`B",f 
@@@@@@	,U4 /7 ++46 0b,
h- ( ^	"*A*2> )`B",j7B,l BO@,>n,>o,>4b+.6@,pS	*A*U*;4BtX + B "bu,4"84Bx B4 B5O@+7@?,y,X5 }	"**C Bh,B6 O@ Bh3"h5"O@,>,>h,7>4">4B BA B@7"h	("(L+U/Bh,>,>,>,>,>h,H>4"I BK,>,>o,P>4"Q	*T"TT4B+,D5 Y B9,>,S>4"T4B
+`- 1 p ^>,>,W	"T"E(]>4"X4B9 
<@@@@@@	@@,-5 cl+f <,.4 el+v	"@
P*eh,a5 i1Bl1Bl+v <
,.5 nh`N+n+<vl+v- Z p ^>,>,\>4"]4B^ 
^@@ .@@	aN	(*v+x@@ < \h "bZ "DXB0 "w B0 hb,>4"s4B BJ,>M	**E",>,N>aN+aN+,>,>o,{>4"}+
 "z h+	@@Q	"U*`N+ " h B0d "$XB0,|4" B3B~,,>,>o,S>	*
E(4B4"
,5 A, <, B	,5  A F 	" 1"+	*Q*P,U5 # B # $+ <$,.+=@#@>= 	 P"!>`<=`< @,>%,>+,%,>(,&	"E
()>+',(,>+,)>+*,+,>.,,>+-,.,>1	(2,/>+,1,>4,>h,2>+,4 h+`h	"U"E
::=ACFJ,>>,5>+0,>,>A,?>	"
(C+,A,>D,B>+@,E,>G,E>+3,H,>J	(U"E
K,H>+F,KXxt,>O,K>+L,O,>R,P>	 (PT+*,>V,>
\x,>_,W>+@($8(hh h	(P*"e+8,>e,`>+U9A,>i,f>+g,>l,j	  m>+,>o,m>+,>r,p>+,r6$	*(E
v,>u,s>+t,v,>x,v>+n,>{,y>+Q,{	*

~,>~,|>+w,~,>,>+,,>,>	*(+a,,>,>+I,xxhhh	*

,>,	>+,$$0,>,>+,,>,>	(Q (+,>,>+,x,>,>+},@"E  ,> ,>+,!IxD"b2/E+cb2/GD?b2/MOhb2/X[eb2/ZEZb20=Db20D`T49]b8e#b8eD"
K26
MisE
Mi|
Mj>.
Mj,bPrM	gD"bPo`3;bPpw
`6#:bPpXVbPp,='bPpC2WbPpESD"bybiTbyb,0byb#Eqbyb#nkbyb)i
byb=*"D"byb=SbybZzbyb[FCbyb\@bybthX`	DMo`	DMP`	X7`eb`@`:v1`:{>`0btD e4Se4X[e47e4E(`3S~eL'i. eVBYh:eVHz#eV`2w eYx&emX&3eqa{C!D"
D
=#2(f>*if>8f>=E	f>=nf>Cf>C@3f>Cif>W*f>WSf>tf>uFf>v@f?
vf?hf?Zf?"2fH6	H`-sfP{iH	`Ye`YxHSA0
W~@4HHp;ju/~@4Hp;ju/~@3HHp;jz?~@3Hp;nh~@2`HSA0
_~@2XHp;nh~@2(Hp;nh~@1pHSA0
_~@1HHSA0
W~@18H@p;h=~@1Hp;jz?~@0PHp;nh~@0HUZ7~@0Hp;nh~@/`Hp;ju/~@/0Hp;nB'~@/Hp;nh~@.XHp;nh~@. Hp;gX~@-xHUZ7~@-hHp;nB'~@-@Hp;g]o~@-Hp;g]o~@,XHp;jz?~@+pHU~@+hHp;h0?~@+XH 8p;h8@ Hp;r[/~@+(HSA0
W~@+Hp;qm~@*`Hp;t&'~@*XHp;e-~@*uHp;ju/~@)pHp;ju/~@)(Hp;h=~@(xHp;ju/~@(HHp;qNo~@(@Hp;nXg~@(Hp;ju/~@'`Hm6.w~@'Hm4$7~@'(H@
	eLF-eLF+FeLF0:eVC
EeV`2wef~`wQ-5I	*,>,>,,>,>,>~,~ [Fixing] [Fixable] [Fix able]Dv0b.
h[emX&3f?0	*"	,>,>,>7@+
`@ "T(E [ @
Z}`@,>`A,>,>,>,>B,	f>1^f?eL(QeL)w)	`C,>   @"U "@@   @	7@B+(,>C,>,> 	D"b.
h[emX&3`
eLF+Feqau eLF0:!eLC?
!`	 *D*&Z,>,>~ D @Z @,>,>,@@ z @ D @  	*P*
/6@+,@,",.@>+7@"7Q@   @ Q@ 	D"`>&eqau'`~)b.
$$ CD"eLC?
:eLF-;eL(Q<eL)=b,T-LBeqauBf>1^Cf?0CH@~lD	 Dp,~ [Fixable],>,>,>,>,>,>,>,>>@p@	(@ M   A$ . /0 ZH. /86@
+o ZH.	 U @~ .&." Bx 2<~+o! c@p+] .~ /+oZ	(@"^4@_Zp+i 
Z(0@+bZ(+cZp "Z(&  & 
	 @f &4Dh.*   x"!.  H! b@p. .@+X	( @o !A  @ZH @,>,>,7@~+ $ 2 & B@7@B(Tw+{ 4,>",>
,>,"f?Ef?jf>)
+ $ 2 & BaT+,>",>,> ,
4E	"D*(>+,>+>A,>,>,>,>B,74,1t+:6@+
h[emX&3`
eLC?
eLF+F
	 *@>   @@@  F @	7@B+,>#,>,> Z,>,>~ D	"P" @Z @  .  @>|+M>~,^,^,^,^,^,^,^  ,^,~B
6$H	D"eqaueLF0:eLC?
`>eqau`~f?j"f>)" # [Fixable]Bucket type not DATA,~ [Fixable]@f>1^#f?0#f?&7f>%.eL%z	 
U**,>,>,>,>,>O@   @@@@@
@@
@@@@@@ o1@	**@2+?:6@+6 0@+;7@B+8,>p,>   @@@  $ @	*T;7@B+>,>p,>q,>,	D"f?&
4eLF+F5eqau7eLF0:8eLC?
9`	"*">>~ D @ 3@7@B+C,>q,>
,> 3@+l, 4o	"E U*FA4  @Z @,>,>,O3@+S5TN 2@+T7@B+Q	*@Q
O,>r,>
,>,>~ ,
4(>+l,>0QA,>,>,>,>B W,78,	D"eqau=`~?eqauBeL%zEb.
h[W	"D
PY1x+h:6@+] 0@+b7@B+,>p,>   @@@  (*Ta @	7@B+g,>r,>,> Z,>,	D"emX&3X`
[eLF+F\eqau^eLF0:_eLC?
``>d	"f>~ D @Z @  .  @>|+0,^,^,^,^,^,~ o$
X6$%,~,~D"eqauf`~gf>1^pf?&7pf>%.qf?&rf?0r	 t [Fixable]Key value out of order [Fixable]Duplicate key encountered	 | [Fixable]Key access aborted [Fixable]Key access failed [Fixable]  [Fixable]f>%*f?(e<c;b_%MObYFbY]bY5@f?"	 Q*,>,>,>,>,>  Z.3`+  2`+7@B+t,>x	 Q @
,>+t 
2@+@@
 ,
4sX@$@7@B+,>x(,>y,>	D"f>*f
4s Z @S. @ 3@+t! b@	(T(!+! b@7@+&,>,>,>+	7@
+(,+)   @		"Q"Q
)! @$A. @6@
+0"E+04X@+",c@
Eeqaue<c;du^lb`2	 D @*6! c@+9 6+: 6+: 6  3@ 6 /"+
=+?+z+N	(* ?+k .$6@
+G+y@*"!.@.Q@X",./$*"  @@t+z@ . 2@*QTP+Q  @:6@+T 0@+Y7@B+W,>z,	D"`>6`>?b8eDc^}.Fb8eI`
SeLF+FS	 *P V>   @@@  t @	7@B+],>z,>{,>,>~ D @ .$	*UP*_6@
+f+y @"!. @Q@X",	D"eqauVeLF0:WeLC?
W`u\`~]`>^b8ecc^}.e	  Qh ./$*"+z4Tz ! b@+z:6@+p 0@+u7@B*
Uq+s,>z,>   @@@  x @	7@B+y,>z,>{,>,	D"b8eh`
oeLF+FoeqaureLF0:seLC?
s`	" 
x>~ D @ ! b@+.4O3@,7@
,O3@+t 	"DZp4@ Z+ 
Z(0@+Z(+ Z "Z(& 	  E*	 & 
&4@+	6@+r,>,>"U*j,@@b|@`>`hSb.7@B+%"P T" 8,>z,>|,>,>~ D @aX+<,>},>} 	D"`
eLF+FeqaueLF0:eLC?
`u$`~%	 *([. / ,>Z,>,>~+<  
b@0e3@+<:6@( 1+3 0@+87@B+5,>z,>   @@@	D"`0b(e9o`2)eqau+`
1eLF+F2eqau4eLF0:5eLC?
6	*U E7   @	7@B+;,>z,>~,>,>~ D @ 
4Dp 3D+p[
	 E
A
?.. Q@
 2@
+DZ3@+pZ
,>e@,>,>,>,>B H,78,1x+Y:6@+M 	D"`
h[HemX&3I`@+R7@B+P,>z,>   @@@   @	7@B+X,>~Z
,> "TU,> Z,>,>~ D @Z @
Z2@+c 	D"eLC?
LeLF+FLeqauOeLF0:PeLC?
P`>UeqauW`~X	 ]ZZ2@+c [0@+c Z3@+o:6@+f 0@*Pe+k7@B+h,>z,>   @@@	D"`3-A\`3-A`3-Aa`
deLF+FeeqaugeLF0:heLC?
i	*U @
j   @	7@B+n,>,>,>,>~ D @>}   @
O@>	(r Z1@@@
,^,^,^,^,^,~B
pp	*{uyp~	D"`*},~ [Fixable]Df?"}f?0~f>*feOjJeOj
cf>$
eOj	 ,>,>,>,>   @    @  X@ Z @ 4B? 	 
*
ZZ3@+\ @Z @ ",
 @  	D"`P>
Y]b8e`0bb8e`>`>`>c^}.	*D@ ",+  1@,+0V'1V+7:6@	D"b8ec^}.`0b`>`0beOjJeLC?
eLF+FeOj
c	( ""+$ 0@+)7@B+',>E,>   @@@   @	@7@B+/" @+ 8,>E Z,>,>,>},>~ D @	D"`
#eLF+F#eqau&eLF0:'eLC?
'`>,eqau.	"P*0aX+,>F,>},[.$/$,>Z,>,>~+7@B+<,>Er9nZ,>,>,>	,>~tDo@6@,+,>,	D"`~0`0b2e9o`23eqau6`>9eqau;`~=`
Ef?"F	 *U
S,>,>,>:
: 	3@+@@ 	 @,>,>, D @  	*P
*[@@",@+}  @
Pdb@+r:6@+h 0@+m7@B+j,>,	D"f?&4
Y5@Sb.^eLC?
`eLF+Fa`
feLF+Fg	 *P"j>   @@@  F @	7@B+p,>,>,>,>~ D @+ 
r3@+7@B+x,>,>,>,>	,>~De@7@+jeLC?
k`uo`~qeqauw`~x`   D[!$GD`@+

,>,>,>	,>~ D @  @	O3@,+aX+,>,> ,>>,^,^,^,~	D"eLC?
~eLF+F~`
`bj
bY]
b_%MOf>1^	(PHLP [Fixable]Duplicate key encountered,>,>,>,>	"TP*,>@@::
 Z .4 9Y .  @@@4@Y  *P% @@@,>,>,@f?&7f?&4f>uZf>$f>>
YF`	"U(('>a@@b@",
4B7",H  b@	*TD
8+H7+;O@+Y!;b@+Y:6@+@ 0@+E7@B+B(A,>b,>   @	D"b.
>eLF+F?eqauAeLF0:B	"U* C@@   @	7@B+X,>c,>c,>+W@7@B+O 6,>d // 	"P P L,>,>,>,>	,>} D @7@+T .@@[! G@7@	(U*T+YaV+X,>d,>
,>,>~ D @.83x+!7@7@B+^,>e(],>,>,^,^,^,^,^,~pp	D"eLC?
C`qauN`~O`]	">c,>,> ~Zp,>,>~,[p!$GD>~,^"E k,~ 	3B,~  B
O%MOeb2/Exh
cl	 oZ..  D[!$GD,~ [Fixable]Could not insert key into	 U
x secondary index,>,> 0@+} +~ 	 @  .
 @"T
D\ 
4@6@+@:",+ D"`>o
{eLF+F{`0b~b8l`
,>,>   @@@  t @	7@B+,>,>,> @,>~ D @,^,^,~	D"eLC?
eLF+Feqau	eLF0:
eLC?
`u`~f>1^	((.u 1B+ ,2D	+O,~ !$bD+@,~@@	 T*U   D,>,>, D B " B " B ",
eLF+F`0b`>`3Sb.+-@>,~pb8l*((. <c;<|)0?AH @w$/)	 	 	 	 	 "	 *	 3	 ;	 D	 L	 U	 ]	 f	 n	 w	 	 	 	 	 !	 *	 2	 ;	 C	 L	 T	 ] e	 ?UTLAFF access path to bucket clobbered or bucket not part of specified index?UTLB	 ND Current bucket not a data bucket?UTLBNF bucket not in file?UTLBNI bucket 	 not part of specified index?UTLCAE cannot access entries when invalid bucket heade	"r[A data bucket is already current]%UTLDAI data fields after the 	 "16th ignored%UTLDSV datafield shorter than value?UTLDXP datafield extends past	 * end of record?UTLENA LAST-ENTRY not applicable unless current index is 0z	 3 not in bucket?UTLEPC RMS file empty or prolog CHANGEd (re-open file)?UTLFAO a 	 ;report file already open%UTLFIE file is empty?UTLFNI file does not have that ind	 Dex?UTLFNA file does not have that area?UTLFNO file not open?UTLIBS invalid	 L byte size for file%UTLIDF inconsistencies detected in file?UTLIFP invalid fiel	 Ud for POINTER recordz not in bucket?UTLIPX invalid primary XAB	 ]?UTLISC invalid syntax in command?UTLIVF invalid value in field?UTLIUE interna	 fl utility error?UTLIOF invalid option for file organization?UTLKIB keys have in	 nconsistent byte sizes?UTLNAD name already defined?UTLNCR no current record	 w[Next bucket is leftmost]?UTLNLR no last record not known?UTLN	 OO RMS file not open for output?UTLNOP RMS file not open for patching?UTLNPS no	  position specified for datafield?UTLNRW no record within records-to-use range	 ?UTLNRF not an RMS indexed file?UTLPKC primary key can't change?UTLPNO current	 D position in index not occupiedz!z$z	"!!z]%z past end of file?UTLRAO RMS file already open[Root	  * bucket is already current]'u not found?UTLRNX current record no long	 2er exists?UTLRSR /RECORD-SIZE required for files with FIXED format?UTLSEN specifi	 ;ed entry not in bucket?UTLSIN specified ID not in bucket%UTLSNF starting record n	 Cot found -- using 1st in bucket[Current record was set to first with matching key	 L]?UTLSTL subscript too large?UTLTFU name table full -- no more DEFINEs allowed	 T?UTLTMS too many segments in the key)-y[Unable to	  ] set up current record]?UTLVEX valid entry may not be expunged. is wrong 	 etype of name/?UTLXND XAB not defined0z1u	"An3z5u [Fixable if so]7~:z -- data bucket	 v chain contains loop]=z%?zBz but succeeding index ent	 ry does not[Changing to /NOFIX scan because of following inconsistency]D	 D u]FzJuJuKz!z	(ALzNz%RzTz records scanned]Eu	 AEuUx"]AIDALQANIBKSBKZBLNBSZBUGCCF	 !CCRCDRCEFCGJCHGCODCOFCURDANDELDEVDFLDLKDMEDTPDUPEDQ	 )EOFFABFACFEXFLGFLKFNAFNCFNFFOPFSZFULIALIANIBCIBOIBS	 2IFIIFLIMXIOPIRCISIJFNKBFKEYKRFKSZLSNMRNMRSNEFNLGNPK	 :NXTORDORGPEFPLGPOSPRVQPERABRACRATRBFREFRERREXRFARFM	 CRLKRNFRNLROPRRVRSARSDRSZRTBSEQSIZTRETRUUBFUDFVERWER	 KXABXCLFSI6$0X$$0Z 0[0]$0	( jT^$00`0b@l8@lP@l`H0g$H0	#U\h@m $0 k@mH@mX@mh@mpH0p$0[	  APe6$0ql0r$H0@sH0t@n`@nx$$0	(5myH0z$0{@o@@oP@mX6$0~$H00
	" v$0$H0"$H0	$H0	$H0
	 A~$H0
$H0$H0$H0
H0H0		( AH0	H0
	H0
	H0
H0
H0
	"  $ 06$0t@qP@qX$H0*0	 A  H0@H0$
0@r@@rHH0$H0!	-( t@rp@s@s@s H0@H0H0$H0	#*)!t@rp@s@s@s H00$H0!t@rp	51@s@s@s H00H0  	 :@	 BP		 K	 S	 \ G"	 d	 md@d@d@d@d@d@d@dd@d	 u@d@d@d@d@d@d@@@$@4@D@T@d@t@	@$
	 ~@4@D
T@p@@$@4@D@T@d@t@@@$@4	 @D@P@`@td@@$@4@D@T@d@t@@@$@4@D	 @P@`@d@@@$@4@D@T@d@t@@@$@4@D@T	 @d@t@ @!@$"@4#@D$@T%@d&@t'@(@)@$*@4+@D,@T-@d.	  @t/0pp'pw?pg.pgpg.pg.0g.pgppGpg
pW.pg.pg.	0(0wp.pp?.pg
pg.@.	 1pg.pg.pg.pg.pgpgp_>07.pg.pg.pg.pg.ppWp_/popg.	 9pg.pg.pg.pgp//pw0g.pg.pg.pg.pg0pWppo0d0@1@$2	 B@43@D4pg.pg.pg.0d5@\6@l7@|8@
9pg.pg.pg.0g?@:@,;@<<	 J@L=pg.pg-pg.0g.pg.pg.pg.pg.pg.pg.pg.0\ @!@$"@4#@D$	 Spg.pg.pg.0l%@\&@l'@|(@
)pg.pg.pg.0g.@*@,+@<,@L-pg.	 [pg.pg.0pp'p7pGpg.pg.pg.@@<@t@4@,@d
	 d@4$
@$@$@<@T
@T@@@-@|=@\6@>@l.@d'@\0@\0	 lx@y@$z@4{@D|T/@d?@p7d`@
a@
$b@
4c@
Dd@
i@@	@u@HV@^@|6L@@A@$B@4C@DD@	
I@	J@	,K@	<L@	LQ	 }@
R@
,S@
<T@
H`@xh@
 Xx Vx Tx Rx Px Nx Lx ZxS@x+*x	 ,>,>,>,>,>,> },~,^,^,^,^,^,^*x,~g	  O@,~gO@+gO@+gO@+gO@+gO@+	 AgO@+gO@+gO@+ h h h h h h 
h 	  x,~,,,,,,,,,,,,,,,	 (,,,,,,,,,,,,,,,,	 0,,,,,,,,,,,,,,,,,	 9,,,,,,,,,,,,,]&0gb ii	 Aii CJ8G?GZxMJ(M^(MB(MJx[
x[H[6H[7@[C@[OP_`_?	 *U*J_O _^(i`]6(E:4
E:LIc'K:
,KB4M|:M:
DM:L@M:|HSKSSS>4hSCDZ	*U*U*RSN]SV,dSZ4aW&l]$q]t]3z]:\|]>|]?]C]K<]J4a.i,Oe|&e:4-*U([eO3gt9g&t=gRdLi7UoRtcq:$i "@@x ^> <sX\h6@+i,pe7Tgg	 *c,, <P # Bg@@i,@@`, " $,	(*k4 p `b+i,>#,>,>+i,5 &6 0b,$+
' <sX\h	(@"t+i[0D,~+{[1D+{,>,>2,>4b,3,+{,	(D"|+i,+i,+i,+i,+i,+i,+i,+i,+i	"
,+i,+i,+i,+i+i,+i,+i-^>7Bi	*D"E*^3Bd+not part of index [Page ?UTLPPE page 	 '?UTLRNF record  because of unexpected RMS status code: ER$/?UTLWTN  beca	 /use Access by key  failed for 		also
Access by key  may fail for [Aborting 	 8scan of current bucket][Aborting scan of key  Data bucket clutter	Data bucke	 @t at page  points at page [Empty RFA list for No matching data record f	 Ior RFA  () of Page [Space scan of key  complete]
RDataRbucketSfulln	Qess	[VERIFYTofkeyXcomplete--D[ProgessCheckpointatkey"AREA-COUNT	ZAREA-OFFSETBUCKET-SIZEBYTE-SIZEKEY-COUNTKEY-OFFSETMAX-RECORD-NUMORGAN	bIZATIONSEQUENTIALRELATIVEINDEXEDPAGES-IN-FILERECORD-ATTRBLOCKED	kRECORD-FORMATVARIABLEASCIILSAFIXEDRECORD-SIZELEVELS	NEXT-KEY	 sROOT-PAGEATTRIBUTESCHANGEABLEDUPLICATESDATA-AREADATA-FILLDATA-TYPE	 |EBCDICSIXBITINDEX-AREAINDEX-FILLKEY-NAMEKEY-OF-REFPOS1POS2	 POS3POS4POS5POS6POS7POS8SIZ1SIZ2SIZ3SIZ4SIZ5SIZ6SIZ7SIZ8AREA-NUMBER	 
	 
Q/?UTLIUE internal utility error/d,>3,%>+4?UTLUOP unable to ou 7tput to report file5D 
#M>`
#M>p
q#"c
,n={J7joJ7jcJ7jvD"J7j+
8
_"
8e
8e0
8ltbTt(|bTB}	D"bT\)~bT]bTw1bTMK`@Y	bT:r
D"bOS^[i
PqmOR
PrM	Z
Po`3P
PpwQ6#RD 
PpXP
Pp,=S
PpC2Q
PpESS	\ZL	D"	\[M	\[N	\`2P	\`6c	\aVQ	\k(l	\k=#	\ln	\n%o	D 	]
Hr	]
U	]
_	]+tH	]
	]u	]aj	D"	]bS	]hT.g	]C	] Ne	]&V	]&a	])}	]+	D	]+1g	]2XW	]7DZH	]8BTmx	]9z	]9{	]9}	]9~	D"	]9	]9	]9	]Bk\	]C4w	]CE-K7	]CK^	]D%	H#hH	]J.7H	]JT	]K^&	]Lq	]Lq	]Lr		]Lr
D"	]Ls
	]Ls!>	 	]c+D"$,%-
yb#
ybh-
ybi-
yb!$
yb,$
ybu.	D"
yb#E.
yb#n/
yb'h/
yb)e0
yb)i0
yb)l1
yb*&
yb*7%
yb*<&	D"
yb+%
yb:^1
yb;-2
yb<\2
yb<y3
yb=*3
yb=S4
yb=h4
ybH"5	D"
ybS\'
ybT'
ybU5(
ybU=(
ybUy)
ybV6)
ybYc5
ybZ6
yb[ 	D"
yb[F6
yb[j7
yb\7
yb\8
yb\8
yb\89
yb\@9
yb`*
ybb!*	D"
ybbs+
ybc;+
ybgj:
ybrh;
ybth;
ybuR<
ybyX<
ybz(=
yb|=	D"
yb|O!
yb',
ybm!
ybm"
ybn"
ybn#
yc:
yc>
yc>D"
yc'?	DM	DM	DM	DM	DM	DM	DM	DMD"	X	XE)H	X	X	X	X	X	XDf=`eb[
[8#]
u^lb^
v9hsh
v9u
g
v9~g
v:-th@e!ce$E,p@eu?k3-A^D"7=h0bFe:Fe:5Ge:=Ge:yH	D"e: 6He:%SKe:*Ie:,!Ie:,sJe:-;Je:I'K
3S
`@D"
EabeYx5{g\)8Pk>$
k>$n>%*r>%.t>)y>*fz	D">*g>*h
>*i>/>0#f>0sj>1^>5%>56	D">8#>8u'>=E,>=F2>=n4>>>Ah:>C>>C@d	D">CeD>Ci@>ClH>T^K>UN>U-S>VFW>V\h>VyZ	D">W*]>WSd>Wha>b"l>scq>s{w>tt>uFz>uZ	D">uj|>v>v>v>v8>v@?j?'?) 	D"?,?0
?O#?
h&?
v)?h-?q/?R3?X9	D"?(=?A?ZG?j?L?O?U?"Y?"2\D"?&?&4?&7?&=?(?/c?4'i?4xgD bje~e
IIlI]YYP{iHYYYDYYY`d.Zbg\)8aH@ldHB@ <8~@\@H@