Google
 

Trailing-Edge - PDP-10 Archives - BB-Z759A-SM - subsys/cpylib.exe
There are 25 other files named cpylib.exe in the archive. Click here to see a list.
?p0 @00@ 0 ?h0?x " 
<+
+k2	`@bJ
Type "R CPYLIB <carriage-return>" to run CPYLIB.

  Once CPYLIB is ready to accept a command, it will type the prompt
"CPYLIB" followed by a right angle bracket. You may then type
one of the following commands:

UPDATE library-file <space> output-file
		;Read from the specified library file, and write
		;a file with the specified output name. If output-file
		;is not supplied, the same filename is used.
		;You will be in CPYLIB UPDATE mode (see below).

READ library-file
		;Read from the specified library file. Do not write
		; output anywhere. You will be in CPYLIB Read
		; mode (see below).

CREATE library-file
		;Create a new library file with the specified name.
		; You will be put in CPYLIB CREATE mode (see below).

DIRECTORY library-file <space> output-file
		;Do a directory of the library file, and write the
		; output to the specified output-file. If output-file
		; is not given, the output will go to the terminal.

LIST library-file <space> output-file
		;Write a listing of the library file to the specified
		; output file. If output-file is not given, the
		; output will go to DSK:CPYLIB.LST.

TAKE cmdfile
		;Take commands from the specified file.


		CPYLIB modes (UPDATE, CREATE, READ)
		-----------------------------------
	You select one of the three CPYLIB modes by using one of
the top-level commands "UPDATE", "CREATE", or "READ". CPYLIB
gives you a different prompt for each of the modes. You may
type "HELP" once you are in the modes for further information.
Here is a summary of the commands allowed in each mode:

CPYLIB UPDATE MODE:
	The prompt will be "CPYLIB Update" followed by two right angle-brackets.
You are then able to specify any or all of the following commands:

	REPLACE, INSERT, DELETE, END, EXIT, HELP, TAKE

CPYLIB Read mode:
	The prompt will be "CPYLIB Read" followed by two right angle-brackets.
You are then able to specify any or all of the following commands:

	EXTRACT, END, EXIT, HELP, TAKE

CPYLIB CREATE mode:
	The prompt will be "CPYLIB Create" followed by two right angle brackets.
You are then able to specify any or all of the following commands:

	INSERT, END, EXIT, HELP, TAKE


In CREATE mode, you are creating a new COBOL library from scratch.

Insert modules in alphabetical order using the "INSERT" command.
For example, "INSERT MODNAM FILE.EXT" will insert the module "MODNAM"
from the file FILE.EXT.

Other commands in INSERT mode are:

TAKE filespec	;Read commands from the specified file

END		;Write out the library file and go back to
		; the top level of CPYLIB

EXIT		;Write out the library file and exit.

HELP		;Type this text


In UPDATE mode, you are reading from one library file,
changing it by module REPLACEment, DELETion, and INSERTion,
and writing the updated library file back out.

UPDATE mode is analagous to using a text editor which can only go
forwards in the file, looking at one module at a time. Since
the modules in a library are in alphabetical order, you must reference
module names in update-mode commands in alphabetical order.

Commands in update mode are:

INSERT module file.ext	;Insert the specified file into the library
			;and call it "module"

REPLACE module file.ext	;Replace the contents of "module" with the contents
			; of the specified file.

DELETE module		;Delete "module" from the library.

TAKE file.ext		;Take commands from the specified file

END			;Write out the updated library file and
			; go back to CPYLIB's top command level.

EXIT			;Write out the updated library file and
			; exit.

WHERE			;Show where in the directory we are. This
			; command will type a few modules before and
			; after the current position. The current position
			; is important because you cannot reference modules
			; whose names are alphabetically before it.

HELP			;Type this text


In READ mode, you are reading from a particular COBOL library file
but not changing it in any way. The only thing you can do in READ mode
is "EXTRACT" a module (copy it to a file). Modules can be EXTRACTed
from the library in any order.

Commands are:

EXTRACT module file.ext	;Copy the module from the library into the
			;specified file

TAKE file.ext		;Take commands from the specified file

END			;Return to CPYLIB's top command level

EXIT			;EXIT to monitor command level

HELP			;Type this text

CPYLIB>
CPYLIB Create>>CPYLIB Read>>CPYLIB Update>>
COPYRIGHT (C) 1984 DIGITAL EQUIPMENT CORPORATION
+ 3 Ly*"L Lz ^
Rf " B
Z@,Yg4B<+@ LzZ&<,N4B
<+	,[ "
R,Z
+
 "L $L{, 
R7BL$+dt+L}	4@@L$7BL%+@@L%	4dt,	P "L $L, , " B
Z+
P	Pj	P	P(2	P8"	PH	PP 	PX6	P`c	Phs	PpH,<,~,\"1,~ $M,,\$M DL\$M	 DL!$ DL $M
,ZDL$!$M DL\$M DL $4,Z1F4+1ZDL%, L% BL)@@L%+[\$M!"4! BL)+[(5HM@ $M,,\$M DL\$M	 DL!$ DL $M
,ZDL$!$M,,\$M,DL\$M,DL!$ DL@$M,ZDL%,ZL%!BL(@@L%d'4h$M0D1Dl+h $M,,\$M DL\$M	 DL!$ DL $M,ZDL$ $M
4!\"LU!&
4!\"La!&
4!\"Lm!& 
4!,^\$LI DL\$LU DL\$La DL\$Lm DL,~ $M,,\$M DL\$M	 DL!$ DL $M,ZDL$,+ $M,,\$M DL\$M	 DL!$ DL $M,ZDL%, L% DL)@@L%+7@L(+u\"M+# $M,, $M,ZDL%, L% M 4! L% BL(@@L%QBLQBL "XBLXBL,~,!$ DL\$M DL\$M  DL,~ $M!,,+N,v,	,	M " B
Z"M#,P6BL%,,+,~@@L%dt+	4,~ Ks!$,R@@L%,~,v " B
Z"M%,P6BL%,,+,~,	,	M " B
Z"M&,P6BL%,,+,~@	Um	U2	PH,	PPI	UU	U(e	Phs	U8(	U8	PH0	UH^	PPG	Phs(	U5	PH.	PP;	UU	Phs,2,~<+	,5,~<+	,8,~<+	 $M,,,8,~+	 $M,,,7,~+	 $M,,,5,~+	,\"\">,~
If you want to abort the CREATE operation, type
Control-C then "RESET" to the EXEC.
,\">,~,\"D\"L,~
If you want to abort the UPDATE operation, type
Control-C then "RESET" to the EXEC.
 $M-,, $M.,,!$ DL $M,ZDL%,o,x,~ 
Z1B+$+ $M-,, $M/,,!$ DL $M,ZDL%,,x,~+3 $M-,, $M0,,!$ DL $M,ZDL%,o,x,~+/ $M-,,,+,@@Kb $t,Z1Ft,~Z,+pu`v	V(wO@Kb,~d4ZL%'4"M1Bl41Bl41B+	`t+	\"M3,~\"M6<+@@
Z@@
[d4 ,> $M=, M? M? (4F0&00f=1/&1F &/&0&0f+<(F+,^5(	l4 ,~.&\"M@Z\"t+#at ,~\"MC,~@@L MI*$L$,~\DL $L+ $MI24`b+!,~7@L(+! "2DMJ3DMK+++!\"MK,/\"t6@L(+* "   
Z1B+) "L $L{2+X 
R+
\"MM L(	4, MP BL BL@@L(+% " U$@+ + ,~,+3g
O
 MQAMQ2DMQ+? p2BMR+<\"MR,>( ">XB(,p,^(,~\"MW+#\"MZ,~5L<!"\$Me4<,> "B,>XQ"l@@4J,^ "B,^x' Cp Ep+4,^x\"Mf,/,^	4N+"\"Mk,/+" Mp*$L L DL7@\"L{ BL,^ ^Ks,>ZFKr "L $L{2,~ Ks7BL%+[	4Z@@L%+Kr Mp@ &Ly(F{OB> 9^.(Q"XadgOB.(1hz+`OB.(1h+e,~,v,F+#,> " BKq " BKr 
[K]4Nt.,x+s.,3L+u`T+n,%+s+n,L+#\"Mq+LaT+JMMz,;+s+J,d`T+M{,,~,	eaV+3VM|+8BM,~\"N,~ N
,;,~ N
,;,~ N,;,~ N
,;,~ Kq,.,~+N		COBOL Library		  N,;,~ N
,;,~+N $,),~:Kq " BKr+	 ",PB4B	,~`T+	,%,~,,~+	&",>4B1,.,~,^.$,),~+	  & (&".$)D}=h5 $)D,),~5F7 $,),~+	  "O,QP4B	,~@@Kg N*"Kq NO!&H $DDDO!&@H,~ L( BL "L,O4B	ZL(	4J,~ "@,R,~ "!$,R,~l4\"t 
\/, .0,+_,b.,=nQ+U,b+R\"N 
[ . 03BN+Z,b.,=nW\"t,~,v,,~d4 
[ ].3L+a,b.,+_+t,d N
,o M+o "0Q"A@ $ N
@@
Z@@
[4Hk.(1H (H=dg N 0ad,~H5Hm,~`t+r "O,QP5B#,~\",~ "@,R,~ L$ BKu "Kt,O^5B#l4 L$ N &L'4&N0F+ "^ B\ B[@@] " $@ N,QZ5B!,@ 0
[8B.
N4,^$74d$$  " N,QZ5B+	^.73NNgZ.7 0 $.  ",Q5B D8^8D ",Q5B D8_..=0 N],~1B++#\"N+"\"N+"\"N$+#\"N),/+"ZL) BK "K~,O4B	ZL)	4@@L),~,	+"\"N0,
8\"N2+#d4@,_+#+	,	+'\"N7+# 
\3L]+	/,,	+	+*\"N;+#,	a+l4@,_+#+
5,	a+l4@,_+#,
5+	,
/+#,	=,~,=,~+	,A,~+	 
[ 08B;,	G+8,=,~,A,~+	 "@,R4B@,~d4@@L$+	 "@,R5B	 "K|,O^5B	ZL) BKw "Kv,O5B	 " $@ NA,QP5B	,X " ^ NA,QP5B	 ",Q5BP ",PB5BR+M0B,~+R,~ "@,R5B	d4 "@,R5B	:x,~ ^O@+_4B^ $@.^"S&NB.fNB.N4"[:^,~,z+d`t@+h\"NB,
8\"t,~at@+p\"NG,
8\"t,~ 
[,	+j+	+m,	G.,,	+j+	+m\"N0,
8\"N2,~ 
\3L]+t/,,	+t+s+m 
[,	+w+v+	,	G.,,	+w+y+	,> 
[,	+}++~.,+{,^,~Z,^+	,> 
]3L\+	,	+	+	+	.,+	:,^,~ 0(B} 
Z(D}2d,~2D+	"NK$NLdNL$NM&NMfNN2d,~2D+	+	:x:x,~ "+_ B] B\@@^O@+_O@ NN*"[@@K_,~,	m Kb BKa,	+ 6 VK`,
4R	% 6
.K` VK`,	)an`,	)R1r12a+	",
4RNO+	r,
0R1R+	",	)+	O+	^ 2`n`,	)R,~,	^ M~ 6,~
Z6@Kal$+	-Z^aF?+	6.& F^ K_`fp+	5fNPZ\O@O@ ".B\,~\"NQ+# (@hNP 
(H}1HA+	; B d* J +	.\"NV+#,
 M~,	e`V+	F4R	D1r12+	D,> 2,
,^,
`n`+	?+	=2VN+	=+
[,	- ".B[,	e,	^aV+	I2VN+	I,~ "K|,O4B	O+"l4,~ "!$,R5B	R,~<+	R " ,Qb7@,~0B+#\"	Z\"N[<+	Y?CPYFDB Library file directory is bad: :K_  ",PB4B	<+	` ",Q 4B	1B,~<+	d`t@+	l ",Q 4B	1B+	j<+	i\"N]<+	kO,~ZL% BKy`t+	|`t+	} N &L'4	~&N0F1Fa+
1Fm4d4 &`t &QFKx "Kx,O^5B#d4 " BKsl4,~l4+	vd4+	v\"Na,/+"\"Ne\"Nj+"@@L%et,~ "@,R5B
,~<+
ZL% BK{ "Kz,O5B# " BKsl4,~ " ,PB4B	<+
 "@,Rd45B
@@L%,~<+
,
4R	0r+
1r
12,~02 2,~6@Kf+
 ",Q5B
+at+
! 4R
,~Kf>Kf4R
,~`D+
& DKg Nm BKf " BKf2Kf4R
,~ ",Q5B
+ DKg Nn BKf " BKf2Kf4R
,~1B+
-<+
,,
@,~,z+
2,>,Nn,	S,^+	\"No,
8\"Nq,~,	e2VN+
5 ".B[,~ (
ZQ(A@ &4B	."1B "=f
:,~  Nr  Nt Nv 8Nx Nz 8N{ 8N~@
= <+ " $,R5BL|+CREATE@D@DDTDIRECTORYEXITHELPLISTREADTAKEUPDATEofLIBARYLIBlibrary filespec@(HM
output toDCYTTY:CRLF to output directory to TTY:contents ofintoCPYLIBLST@$$library file?CPYINT Illegal to nest "TAKE" commands
commands from fileCMDare we in directory?Hx!Hv&Ht)DELETEENDINSERTREPLACEWHEREEXTRACTmodulefromwriting towith contents ofSEQUENCED?CPYUSD Unsupported device
?CPYXXX DVCHR% failed at CHKOFT
One- to eight-char module name`(HM:H
ZHL4?Not a legal sixbit character: %Input module name truncated to eight characters
	C(L@H@
?CPYCME [CPYCFA Command file aborted]
 @|+p[CPYRFD Return from DDT by typing "POPJ 17,$X"]
?CPYDNA DDT not accessible
?CPYCNR Cannot restart program now.
[Assuming you meant to type "POPJ 17,$X" - returning to CPYLIB]
SYS:UDDT.EXE?CPYJSE Can't read in DDT:
 GET% JSYS failed: ?CPYJSE Can't release JFN for SYS:UDDT.EXE: 	ALH
R%CPYNLM Directory is empty-- no listing made

*** End of library file listing ***

HMv, ,~+{     ,+,~+HHt?CPYFWN First word in library line not line number
?CPYLNE Line number embedded in library module
H
ZHHKg	Page	HN

HN
*** Program HN	<xKh-----  <Current pointer>
	/SHN0L'I
[I^?CPYPEF Premature EOF reading directory of input library file?CPYFFD Input file format is bad-- not a COBOL library file?CPYBLF Bad library file: Byte size is not 36
?CPYJSE Can't open input library file:
 GTFDB% JSYS failed: ?CPYMBP Module  has been passed, type "END" then UPDATE again
?CPYAIM Already inserted that module
?CPYMMI Modules must be inserted in alphabetical order
II+_\+_?CPYMAE Module is already in the library: ?CPYMNE Module not found in the library: 000000
[
Z38,	&,	)+	%\?CPYATL The module address is too large to store
		?CPYTMM Too many modules in the library
Word address too large?CPYPEL Premature EOF in library file
?CPYCOF Cannot read file's byte size: ?CPYIBS Invalid byte size for input file: 
 (It must be either 7 or 36.):Kg,Kg\?CPYMNF Module  not found
input library fileoutput library fileinput offline fileoutput offline filetemp fileoutput directory filelisting,>@@S~ W`*"W_,^[DTZDTSFS~`b+W` T0b+O
 T0b+OT!"7@Wl"C&S/C(S0 Wb,Z5BSu+Sv\"O\"Wc+Sx\"O\"Wi+Sx?IOTMP routine $ITINI cannot proceed:
STZ$(Rad+WmO@W,P6  T`f
+O=[0$0d+O? DWdWn@@ T@@ T7@W+O+Z4DOC D TR!&ad`+Wn`dl&`d@l&`d lGF T`f+O+@@ T`F+O<,OQ+Su+O<Z1D TdWpdWp@7@Wl",Z'5BO@ DW7@W+O5@bQ"@ WfWq W T T+O9@bQ"@ WfWqXW B T B T,O[ B T7@W+O<,OQ+Su!&GF T+Sv Wv,S3+Su W},S3+Su1B+Su X,S3+Su X,S3+Su,>  T,>'4OK,^$X	1D+X	1D+X
1D+X+OM,^ X,S3+OP X,S3+OP,^:x,~,^,~  T`b+X`b+X  T4OV+Sy0B,1B-+OY X,S3,~ X%,S3<+OT"Wp(B $&W$ B T,~STZ$(Rad+X&O@W,P6  T`f
+P[0$0d+P DW6@W+Oraf+P$Wn2DW+P6@ T+On  T B T T T+Op T TR` T@@ T,O[!"GB T+SvZ4DP D TR!&ad`+X'`dl&`d@l&`d lGF T WdWn`f+O@@ T`F+Op6@WE+P,P+SuO@WE+OpZ1D TdWp@7@Wl",Z'5BP DW,P+X(,O[7@W+P
@bQ"@WfWq W T+P,Q;+X)+Op Wv,S3+Su W},S3+Su X2,S3+Su X:,S3+Su XC,S3+Su X,S3+Su1B+Su XI,S3+Su,>@$Wp W,[,^,~  T`b+XJ`b+XK  T4P1  T`b+Sy  T4P3 DW,>  T XL &W4P4,^$XM3DW+XM "& W*&6@." BW "&W$W B T+Sy XO,S3,~ XT,S3,~,^ XZ,S3,~7D+P=`d+P?[C$P9[2D+XZ Q$A` D T DWC,~ $X\7@W $X\+P; !$Ap TWC,~$"? T+PEDT@,~@@T DW TbDX]+PM,>,> ,PV7X^@ ,^,^5DSx W+PB`D+Sx,> Z T W4PR,^+Sx,> TWC Xc,S3,^,^+Sx TWF T T  T / T4BSy BW .B T D T[ T4BPz3DW +Py "$Wn& W &4FPd.$,>/@DWF=bPc,^dD.$(D{ 7B TZ T(B{Q"S TY Tl&@4PmZ[ T.QD T+Sy,>,>,> "2DXc3DXd+Pu TWC Xi,S3,^,^,^,~ X%,S3<,^,^,^+Pj$Wp+Pf  T`b+P],P},~  T+P] Xk@@WE!"4Q BW  Xk4Q
!"XW !$@!&@4QSW @*4Q W  B T+Sy Xq,S3,~0B,1B-+Q1B,+Q XO,S3,~ Xy,S3< W +Q:WE0b+Q
+Ww	4Q"2;KA",Q+P~HXyHX{HX|HX~&Y,S3,~1B+Q2Y	,S3,~/Y,S3<+Q$"?@T+Q!T@,~7TbDX]+Q+7@T+Sw,>,>,>,Q;+Q),^,^,^+Q,^x,^,^,~@@T`D+Sw?"W+Q.WW+Q6,>,> Y,DWB4Y*"WJ"WG*4Q8,WI4DWW+,^,^+Q,1D! DW"? W"+Sv W!,Q5BQ`DW!+Q\ W".$T,~ DW#$" Tad+Qv`d+Qy`D+Y T3$W#+SwT  "$Wn& BW#(B BW$ W#& DW$ FW%Z T,>&Wp/7  ",^/&2$2d+Qt,Q|+Sv,R+Su,Q|+SvT TWC Y",S3+SuT TWC Y',S3+SuZ T$Wp/7  " W$/(D  W%&W#.,> T7@+R.+R.? x+R`+R T,^xZ T$Wp/7  " W$/$W$.W%  T/ B T,~,S	,~  T&W$6@.$Z T/"Wp3"  S TXW$7D TZ T(D{Q$l&4RZfWp.W$XF T+Sy TWC Y-,S3,~$"ST   T`f+R:af+Rx`f+R/`d+R,[ T4BR(,PV+Su+R)  T/ T.B T  Td"l" B T+Sv,R{+Su,Ru5BSu@@ T+Sv  T`b+R8`B+R5`d+R6,PV+Su,RH+Su,Ru5BSu@@ T+Sv,R{+Su+R4,RH+Su@@ T+Sv`f+R@[ T4BR>,S	+Su,S+Su,Ru5BSu@@ T+Sv`f+RF`F+RG,S	+Su,Rh+Su,Ru5BSu@@ T+Sv,Rh+Su@@WE@@ T+Sv  T`B+RW`b+RS  TZ T4R[Q" O4R]Q"@$WndY.S$`4R]Z T S`fl",>	4R`,^+Sy S`f+SyZ T	4Rf+Sy TWC Y3,S3,~ TWC Y9,S3,~ TWC1B+Rd,^ Y>,S3,~ YF,S3<,^+RU YL,S3,~  T`B+RmZ T S`fl"	4Rp+Sy S`f+SyZ T	4Rs+Sy TWC Y>,S3,~ TWC YL,S3,~@$Wp7F TZ T,[,~ TWC YP,S3+Su  T`b+S[ T4BSyZ Tl"	4SZ Tl"4S+Sy Y>,S3,~ YU,S3,~Z Tl" S`dl"	4S+Sy7D TZ T(D{Q$&Wpl&O4S+Sy TWC Y[,S3,~Z Tl"	4SZ Tl"4S:x,~ TWC Y>,S3,~ TWC YU,S3,~$",>,>   TZ4S",^ad+S! 	4S&,^+Sx TWC Ya,S3,^,^+Sx TWC Yf,S3,^+Sx,>,>,> " U$@+ + ,^,^,^,~,~,~,~RBW%Q"A` BW& "+S5RBW%Q"A` BW& ",>,> Yg DW? $ DW@,Ss S~,Sj W%,Sj ",SsW&4BSd1B/+S@1B@@W@,Ss+S<W&1B/+S>1B+SS1B+SS1B+SW1B+SY1B+S[1B+S]1B+Sa1B+SL1B+Sf $/DW?+S> W?U$@+ + *W?@3BW?+SR`9SP.DW@+S<7WAZWAQ$A`4BS<1B@@W@,Ss+ST WB &,Sm+S< WB &,Sm+S< WB,Sj+S< W@1"$+S< ",Ss@@W@ ",Ss+S<WCWDWD4BS<,Ss+Sb "BW? "BW?@BW?\"W&,^,^,~ 4DSz@)B.",Ss+Sj FW@5$Sp ",Ss#&W@,>6@,Sp,^."+SsBW?:W@,~T+SxT+Sx ",~g ",~:x,~
I HWJd
?hSC$O`dO@W+OS?%\ Default buffer size requested larger than 512. pages
 Max IFN requested larger than MAXIFN
@@W+O0 T,OD+Su+O&< T T0Can't open ^8 because:
 File is already openMxWqCan't open ^8 because:
 Byte size not between 1 and 36EN(WwNot enough memory for buffers;
 can't open ^8 for output]hW}Can't open ^8 because:
 JFN supplied is 0UMX$$l&+OOl&+OOl+OOCan't open ^8 because:
 DVCHR% JSYS failed: ^1UN(X
Can't open ^8:
 Specified device is not supportedI;X $+OT X+OTCan't open ^8 because:
 OPENF% JSYS failed: ^1G>0X^1
 (Type "CONTINUE" when the problem has been fixed)c@X @@W+Ob,OD+Su+Ox,P+Su1B+Op+SuCan't open ^8 because:
 Attempt to read temp file before writing ite8X+Can't open ^8 because:
 Input byte size differs from output byte sizeEN X2Can't open ^8 because:
 Can't open more than one TTY: file for input at the same timeixX:Can't open ^8 because:
 Not enough memory for buffers]hXD $+P! XK+P!0W W B T+SyUN(XCan't open ^8 because:
 SIZEF% JSYS failed: ^1UN(XOCan't open ^8 because:
 GTFDB% JSYS failed: ^1UN(XU P+P?filetemp file
Error writing ^8:
 BOUT% JSYS failed: ^1UN(X^@#@Error writing ^8:
 PMAP% JSYS failed: ^1UN(XdXXX.TMP.-1;THXiHCan't open ^8 because:
 GTJFN% JSYS failed: ^1UN(XlCan't open ^8 - ^1
 (Type "CONTINUE" when the problem has been fixed)c@XqYXX.TMP.-1;TZXX.TMP.-1;TWXX.TMP.-1;TUXX.TMP.-1;TCan't open ^8 because:
 CHFDB% JSYS failed: ^1UN(XCan't open ^8 because:
 UFPGS% failed: ^1UN(YCan't open ^8: ^1
 (Type "CONTINUE" when the problem has been fixed)c@Y
HWJ
?0WGError reading ^8:
 TEXTI% JSYS failed: ^1UN(YError reading ^8:
 PMAP% JSYS failed: ^1UN(Y7@W#+Sx+SwCan't position ^8: File not opened for inputM:xYCan't position ^8: File must be a disk fileM6 Y#Can't position file because:
 PMAP% JSYS failed: ^1UN(Y(0Can't close ^8 because:
 SFPTR% JSYS failed: ^1UN(Y.Can't close ^8 because:
 CHFDB% JSYS failed: ^1UN(Y4Can't close ^8 because:
 CLOSF% JSYS failed: ^1UN(Y9Can't close ^8: ^1
 (Type "CONTINUE" when the problem has been fixed)c@Y?Can't close ^8 because:
 RLJFN% JSYS failed: ^1UN(YGCan't close ^8: File was not openG0YLCan't close ^8 because:
 DELF% JSYS failed: ^1UN(YPPMAP% JSYS failed: ^1,
 couldn't unmap pages of ^8UN(YVCan't RENAME ^8, reason:
 RNAMF% JSYS failed: ^1UN(Y\Can't RENAME ^8, reason:
 RLJFN% JSYS failed: ^1UN(YaHW&,>@@[J a]*"a\,^@@[Nab+YoC"Ygab+YnO@[N+Yo\"a]C"[\dB." B[X." Ba\7@[N+[H,Y~+Yv a\:.$ B+[H\"Yy\"ac+[H?MMANGR: Routine "INITM" encountered a problem:
[K & (
 Q"4Z.&=hY+Z	(F{@Q$X  ag{4Z	 [K:x,~[K,~,>,> ag  D."*fZ,^,^O@[P+[H
[L:
[O0j3+Z7J[X+Z7@(+Z 
(+Z7@(+Z 
., L( 
 B( D(ab+Z F( H(
[L+[H\"Z!\"ah
[L+[H\"Z!\"am
[L+[H?MMANGR: "INITMU" routine encountered a problem:
7@[Nl"[J[KO@[Yab+Z- xd$p[ D[Y4DZa [K [J,ZJ4BZI   0F+Z5,>[YO@[Y " $,ZJ,^[Y5BZ5 D  ,Y~+ZH  0F+Z<S F   $ D  .&+Z?$&	. /$	 F $.D  BS3B7ar@ B@@ "@@=bZC [K [J,ZJ4BZI\"ar "+ZI "+ZI[K,~,>,>,>,> a\ 7f[Y+ZO\"au.$ D[Y x,Z~+ZZ `f+ZW @@ .( x(D/$da~>,^,^,^ +[H [Y7D+Z] D[Y+ZPd6D+ZO>,^,^ +[H,> 
a@4DZd9Zb0h+ZnZZ[K L[X.(<fZj.(0h+Zn4DZg+Zb 
[XOd [K<fZoD+Zl,^[K+[H (D 
[J`l+Z|@@C&Zraf+Zy,>,> 
[K(L/,  0la~,^,^+Z|QX& [K(H.(*& ,^[K+[H,>,> [Y 
a@4D[9[0h+[ H[ZZ L[X.(<f[.(0h+[4D[+[:  [Z(B [YQ 
[XOd<f[D+[[H`F+[4`f+[7@[P+[9(F{[K.0f+[7 [K a<&[`+[ H[Z 4F[<=b[ [Z@F=d[+[G[K[d&(F{.0f+[7/ a\ .$3H+['6D+[$6B+[#+[> ." B[\!"@0 B[[<&[+`[[+[*[[[Z [K[[4F[<=b[- [K@F[Z=d[/+[G[K+[H\"[A\"b+[H\"[A\"b+[H\"[A\"b+[F\"[A\"b+[H\"[A\"b+[F\"[A\"b$+[F?MMANGR: RETRN routine can't return memory, reason:
[K+[H[Kg ",~:x,~9([K%MMANGR: (INITM) Memory will only be managed in section 0
 Can't find a private section
[P Too many modules called the initialize routine
 "INITM" routine not called by main program
@?MMANGR: Internal error
%MMANGR: FINFRE will not restrict memory
 to a particular section except section 0
H[PH8 Attempt to return more than 1000 pages at a time
 Input starting address of block not on a page boundary
 Input starting address of block + # pages returned
 goes over a section boundary
 Attempt to return pages to section 0, but no
 section 0 page map was supplied when "INITM" was called
 Attempt to return pages that were not reserved
 Attempt to return pages to a section with no reserved pages
6b*6`b*Wg{jWgz.	Wgy0Wgh1WggWg]7Wg\MW^.W]{7W]xKW]wgW])W]&jP2iP2i P	P	Hl\rIYyUl)\[ZZYYRTZ{{M/US[YUL&mK{[I[PK }[ZKQn[X?\eY;t{iZ5uy[H5ux[H*%|[5V3[+5V2['5V2[$5V1[#5V1[5V0[*#u[A5w[>5w[<5v[95v[75u[45u[25Ue[F5Ud[G7'[[
TP[Z
		"[\TCPX$T@J$3
?j0Z
?j0?fo
[NP2B[JP2?xa\?^D[M?^?]r[K?]I[JT@M@T@ T@tr@T@[[ ^p:
Z|NZ|NZ|MZ|MZ^hMZ^hM
Yn|CYg^hKnYvzjZ!>U'$[P\b!ZWLYZJLXnZ]LXnZZLXmZPLXmZOLSDZaLS<Z|LS1ZyLO"ZoLO ZnLOZjLOZgLOZbLF~Y~L8ZIL7Z'L5ZHL2Z?L2Z<L1Z5L1Z-P^*[YMR/Q[I+T2[JHY
Z~HY
[HY
	[HY
	[HY	n[E`
EZ	?^Fbp`YgWOPE6W82i@P	P	+f.hS+f.[S/+f#
Qb+fPB+fjQP+f4O+f1O^+ew*QZ+evIN+evFQ+eUrS0+ePfR+eOS0LA$5C8\&W	8tPj8tPm8sRf+Rs*qR`*pRH*p
R[*p	RW*pRS*n=Rm*mLR]
\+W$
\R
\$R
[?tQ|
[?W#
[?W$
[>|W%
[>kW#
[=BR
[=AR
[=AR
 ^S~M}Uk#^{HHM	3[@[S+
		QQu4*Qu4)Qu4#Q
u3vQu3vQu3uQ
u3uQHU-,LrLd~-LrLdh,rLPyQrLPhP~rLOP}r<#WHB)YUrPW8O@W5PmQcW@k+W@FInTT@M@T@tr@T@[[ T8a],+#nPd+#'tS)(IV1W&(I^W%
:v OC
:vPbW|S1bRWEbNoSjbNR7S&bNPNS!bNPGS"bJ;!OpbJ+iQtbJ*-QybJ*-QvbIP
bHo>OxbHo>OpbHo=OnbH-OQbH-PbH+aOYbH+UOTbH*]P!bH*OVbF KW"bF_PRbF:Q8b=%Q`b=%Q\b=YQ,b=}Ob=|O
b=cQ6b=Q+b=qQ!b=pQb<NP4b<NP3b<NP1b6bS3b5IeSRb59rSPb59JSjb55TSab55TS]b55SS[b55SSYb55RSWb55RSSb55QSSb55QSL
^S@b55AS>
^S<
^S5b5fSfb5~Smb5qSpb4gGSdb4ZSsb4O*STb45Sbb1R)b1R:b1R#b17R,b)Q&WDSb`?SSb`:.Sb`9Sb`Sb`LSbpSbcRH~ni|O^Zi-Q)Z*T
k#K-(o!O(T*
P6(T*P;(T*P?(T*P=HG"PGt$O=Gt!PKF/wbe%W?beW&}+W^WBP	C:~W_x-&WCiD&~ODiD&xOKiD&vOPiD&qOO
al7;J`y d_]NTPcUtJSz_d@SzMR/QSy+T2SzJM@:@K.q9RUK!pHR>K!oYR(K!dWRuK!SYR5K!SYR4K!SWR8K!SRR6K!P]R/K!LdRxK!R@K!DRGK!ARF
HOC:jBWW:f6yP:f6vO?[pKWeWAWeWAL(
P~YX`NG9eNUBe%I=mK,wG2:}mDAYwX5%GS?&^S=K0	G8OQiOOrc OOqh W5.O9RHWE
WoWAW1W1Kz1`Kv1JL0v\Kx0v Kt0VJK~O/gO{OrJOq|W7;W7W7`W7JW6v\W6v W6VJW6PsO/L`O#LO.`)O.G)O.:wO-|OO=ONyiON}ONK]ON@ION-?ON-ON+ONkWNDd|NUOE!"ODpODJGDE%;OD9?MK.dcG5PJY@P2iP2i P	P	@7gw	+7ez	67es	;7em	57em	.J%	-7ov{|
p{|	h{|	d/sut{yajyx4949
48)g[r'K
9r'A
:r8
8rowbUqQwx2qQd[LSVGL?c;1LL(c;
c;ry[ZZYYV]&+9y
9ySU:W	U:W
G~U'[zU'y}U'y{U&YgQAP%Ls
5TwBMPb[MPb
^7YKbpX9
R>bM<>bM9
[;syvvA[4vJv4?t94?t94?t84.=/4.=.4.=-4.=-4.;U	4.4.4.4.4.4-j
H	&
nK
'L:o
'L5p
'%[
'LL%tg}Krte[P
<J_	W
<JY	S
<I?
2
<I
/[S+$c
>=pKL
Kq_[I
RHVM
j}HT
		LL)Lu"cLu"JLu"@rLO	MrLO
rL.l	}rL.i	mr<^b	vr<9
r<9
	~
r:^Sp
'#FAW&\l@c,Ksl5(w^l5(^+_l/Z{Kcl/X.Kbl/G&Kdl/E"L'l/LL%l/~L'l.uKcl.n@Kel.m%L&l.lcL&l.:Kdl.:Ke@]HB(
k.&?Hk!e+Y>lBLCg<TXJCSMPqXSMPqSMPpSMN*
67&67%67$+#V;+#g +#`+#:/+#)+#(
Z{%LL(%-%
A3%
@y7%
@y5%	sKr
Qk	P
Qk	R
:zW
r5Wr5>BLP
:wwL$SbdT Sbd8@H&/JH_0?
._04
-0
_0
+_0
&_0
!_0
_0
|WYKa^pD
Z|,HK`]@ @xf=lw&[Yw(w]Yw(^^l\E$XMLE$X3DE$X31E$X2>E$X*E$Ue>>Aj<2.;
m7G81TOs1LYCK1z@
gIG5.g<zN.g<oZ.g<nW.g<nU.g<mT.g<mQ.g:mR.]Iw/.RCSs.RC?t.R3h.R%n.LX
as"	l
as!	j.E&3.B7a.B7_.B7]
aTJ[.B',.B4
aSg3-;5!k-;5!g
^$DdK+mK+lu_K+l>@(XwB(T{<	a(T[$	e(TZh
(TZa
(T!eJ(T#
Ns_?!|K@'a\G>
J#G7':=u'::t#4#5
VJ4`	`oX`g^`a[.,,	ZKF%V|P
+aP
+aP
+HT P
+@oP
+@lP
+@lP
+@g@P
+4hP
+/AP
+.P
+P
+aP
+\P
*~)P
*}C@P
*ukP
*qH P
*o4 P
*nfS=Y`R%
`R_tG)	KHY4Ey*E[#}*20R})Wx
iD''JiwW	xg#pFog#jre7
Juw]cAw]Rw]Rw]Pw]MajLL)aiN^_.kU_'gLa_sLm_jJLU_i|LIP\]Kq\|v1KgNjT9NjT9NjT8d@tNZy[RMfRMe`hRMe_FRMe.MXytMR/Q	MR/Q	+T2	Mo	Mg	%Md	MB	"MA	"MA	M@	MoC	GMo8	IMn_	FMn\	=MnV	DMnV	DMnU	?MnU	=M]	)Mh;JM!-
M+2MGMAKss"!RKsAxKquKn"&RKmSxKig[	KRmKRaoHKRY&sKRY"KRV5vKRM1cKR(KLKR(J6RKR'xKR KQKQwq1KQvJ"KQug2KQqWjKQjBLKP_")RKP-xB)KsK<jKLRK<ixK<,BLJL=AJL  JLPJLzU H&<0@JLmf`JLL^K/'#
K/&lK/&i
K/&h
K!Pa
KbL#loJ
Ks	#lktHg2;KgHg0`KfHg/KfHY@oxHY@a
G8[S .@?W`>%tL4nysMeZBB0\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