Google
 

Trailing-Edge - PDP-10 Archives - BB-H506E-SM - cobol/binary/libary.exe
There are 19 other files named libary.exe in the archive. Click here to see a list.
?p00`?hX
?x
COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1985.
ALL RIGHTS RESERVED.
+gD9
 

x(
 

+xg@(
Y&\9
xs
COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1985.
ALL RIGHTS RESERVED.
-"X[(." BbXB( s *"I@@] *"b	b
+  B,,;`@ +?	b
,nPF6PF9PF=@be
4+E
8+E`@++
;+E,,G,X*b@@>@@>7"=h=+F@(@B^ s@@>,qD ,
&,]+9a@@+9As,qD+,G,]
&+>7@F+M,L+> > B?,0O@5,Y"8,,5+9,]
&+>,.+>+M6@F+R,,+9,]
&!+>,.+>+M7@F+X,L+>,,+I,]
&%+>,.+>+M7@F+r7B_Z( B_XB( " F!&[
+U
)**p+H > B?,0O@575,G,5aX+j8Xi+fG +s *4\n0<0|a+o,`b`+j+f,> <,,^+m,]
&*+>
0@+v,]
&.0, ,D +9<M0<0|+D @,a@+
;+ =!$K8@fH+@b@f(+ =!$K8@f$+a@+ "!$Lu &Z

+7B^ ( B^ B(

 6X"4
!$K8@fJ+
@b@f*+ 6X"4
!$K8@f&+@fJ+D G +&aD++aD+,p
&2,S	`,\+9,@]@B( "9D9+K,:,18X(,:.6,1+%@@7 "6F6+K,B+,,1+* "$+ $&+ &a@+3a@+7(+ (e@+7
*+ *7@?+;

l`
&5,.`@+
,G0<0|+;+h 9 H8B7/" B4 H B4@@8,r:8`@+^ HA9)B|
J;[+P ")B.BZ"`.B[,GaX+C3X:+_ 8B^?`8,r(X,a,G`X+D *0<0|a+Y,f`b`+U+S  <,f <2B,f ,f+M.2*rB+A,G <,f+M  & (&".$)D}=hc $)D <,f5Fe <+f
PJa+B!ZX"?*"944\4,f+l (&".$)D}=ho,~`@+1\ +	 :a@@
&; ;@@p@@p,G`@+1\ +	0<0|a+1<01<+1\+1\+/<\2B<+v+3B;+vG @,~1\+0\+ p3B<+!"[R Bp,~,\+q2B;+
@r@v,.+ +q,\+q!<} pO(F}bB+ tD2B*|5<7t ",~Id]K: Kc&(1S;\ZeH1eH9OZDTx 8
75 X548,5,GaX+ X59X4G ,=8X&/8 X3,=@@>`xO@>A= X3,G X5,~G ,~,GaX+'+d@++,+)"8+5,'e@+,,~D ,t,~`@+7 $3,+7+4:x:x,~,,,)G D +0`@+3 $4,+:+3,]
&=,~`@+
 :A @ b B(a@@
&B,G0<0|m@+;,1\,!1\L+J7@!2LuD	b4BDBBLJR?T@zVAJXB+K,,+
H+K+AG,!I	b`bG01\+^,\+C,,+@@c`@ +W+|!2Lu 	b4BDaB+Fab+kG  4TG`@6@@+p4TG T@+p,,+

B+K@@E 
E** 
( J^.* ,a@  ,
0 J(J+I L`bG 7D@ D5D`@+G D@`@ +aB+F7VA!6J1 VA ?
?+K`@+U7VA!6Lz VA E*"K ? RI@@?
H+K`rG ,~ P=@r@v,,h0\+ ,h 0\+,hR0\-,~,o1\+FS0\++7@P,oX7@X0\.+++G,G1\+G @,~,G0\$1\4+)0\&1\6G  0\"1\2G  `@ +G,]
"
&G+C B,	/+C,]
&J+C5R/5T/5V/5X/,+0,G0<0|+W"7@!2Lu "  &L
+KD +&,5D:!$8vB7+; B+SG @[(*(
&N "@+C,]
&Q "J,S,]+
,]
&T+C,]
&V+C,]
&Z+C,p,]
&^ "`+C a a4FO.&F`bp+L &F,_
&b
&p
&b+C,p,]
&d "`+C,]
&g+C,]
&+C  	`"iSHL+\
&k	`
&ma@@,~+e
&ma@@,~ n4De.$1D $
"+a
&n $D
&9
&2 :,~ " o,G1|-1< +m/<`dp\+i1|1<,~+k ",G1|1<,~(BG"wh1b+p,~@@F@@q@@q o,G0\1\+va,G1|-1< +1\ </<3Bp+~\+y
&pd"`+y1|1<1\+{0\+,G+1\+0<0|a+
6@F+,+,]
&x+],]
&{,]+6@q+,]
&},~,G1\)+
&m
"
&+] *<`+3,7@!2Lu RF TFRVG XH,~6&q+"6 +33F+2f:x,~[q[(F}(H}3F;x2f:x,~6 +,~ 8
7o X5l,5 8 *,Gd@0\\0<0|a+5`d`+'+% 3 B4 3 B4 > B?+4 q B4 q B4a@+4G @@8,r 6`f`+ER4d$G6@?l$ 7`B+@ r0b?+D 4 FsR4d&G7 Fs &@.F7 8.Xr:7 8.X6 4,* +*,]
&+R,]
&+R`@+Td@@+U?`M+VM1\ <1\+G0<00|=a/<1\
1<+[a@@
&2 <|M,~<M+JB+J
Ba\ +ZG +T
&+
2P\,~,_
&G @,G0<0|+^,~aX+j7*,~(J &
8 <(,f 
*nc <?`O+h\N,~n+g+P7
*,faj`,~4\k0<0|+j <,f< *1\ J8+f`@+`@+w 81\+w <,f <,f 

4\.<1\ <,f <a@,f+x 
4aj+ 
l 
l:
8,# 
,l < \8,~a@+} 
4`j7
 
+ 
a@,l 

.<1\ <,f2J+	 
4aj+ 
,l 
`@ 
,lU< \8,~`@n,~+P	j&*:&,..,!aN@dn 4wn .( 0.2/.2,!n	l	&,j0&,,!n ,!n,~&.(N..@,~&*QLx6@,#[x.<+f&*QLx6@,&[x.<
",~?`S+,XS,~d+++N?`V+0XV,~h+/+N?`Y+3XY,~l+2+N:6?`P+8XP`@,`,~f+6+N?`U+<T,~D+;+O`@+K?`X+@W,~H+?+O?`R+DQ+3F+C
F`X@+O,~`@+K?`[+JZ,~J+I+Q"8,~7@F+37B_Z(XB( B_ " F &[
+U
)**P+V+3
&,~,p
& "`,S
&2,~ " B5,4\4 \aB+l2B:+e ,>d,5:\"$.D\, \,5,^a@+Y <,p+Y 8 $$8.8wh,=df(XG8, "D#\2x5+m 8
.54X5,>,5,^ * 84\v\1|1<a+x, \`B+v`d`+p+m "B+z|,0\1\+x,>,5,^4\4`@>`8+[,>,r,^+[?`\+\0|
1<,~0< <,~P+
p@
&<0,~<	|`|+<!&&".$)D|aF+ ,`b`+ "GC\ <+?`\+\\,~p+,]
& +R`@+!D ,,,)+"8,*:6
,~a@a@ +6 D2B@+6RDRA2B+6 E2BB+6 D!$(5 & ED+8@b@f$+9 DRD & ED+AQ$(5 E$+Al@+?,~aD+1,p
&#,S
&& (.$
"2B(+;
&) =X"J1 B@SBA+6,p
&++:
&/+R
&1+R
&4+R
&7+R
&9 "=,S+R,p,]
&= "`,S+R
&A,S+R,]
&E+9
&G+R
&K+R
&N+R
&Q	`	`Z0$
'`7F,~,]
&TR,]7J,~
&U[
,&
&UZ
,&
&V,~@)D.$
"5F],~VY^`cgjmoqtw{~										"	%	(	,
&	.Z
,&$a Fa Hb "`,~~`e<pP't2% g#"a&`i h)&`l%*g%*f jc)bh'aj''k""a		COBOL LIBRARY		 XX-XXX-XX   XX:XX	PAGE	INX	xQ4i7INX
(T4	i7INX
XW4	i7Z	`@oP0P]0sImproper command
That program already exists
Need input file for insertion
File name not allowed with this command
Input file required for replacing
hHNeed output file for extraction
Output error when extraction file closed

?Trouble renaming files ?Error while closing output file
|@     H9*HppK: |Program, if it exists, has been passed

*Y&\0\+W,G+^@J5B+ + is not a legal switchImproper project-programmer number
Cannot enter output file 
Cannot enter listing file 
Improper device
Input and output devices must be binary
Directory devices require file names
Input file LOOKUP error HHp"" not available
Cannot find command file 
Only one output file allowed with /L
?Cannot init TTY:

?H_ -- HHq0q%Library module name too long - truncated to 8 characters - continuing
Improper character in name
Only one file allowed
No name specified
O@>+ is not a legal switch
_Too many programs
File too large

?Read error on command file
=TtH4/SH
H0

H /S
HH2

*** PROGRAM H04 /SH81T2,8283,83?Device does not exist
?Cannot find file 
?Read error on insertion file
HOutput error on extraction file

?Cannot delete "BAK" file 
writing H=$=LIB.LIB as output file

?Cannot rename input to "BAK" ?Error reading table
?First word not line number
?Imbedded line number

?DSK: is not a device
?Can't enter a scratch file on DSK: Cannot enter extraction file 

?Can't find a scratch file on DSK: That program not found

?Output error on scratch file
?Read error on scratch file
?Output error on listing file

?Error reading input file.[,](0) file was not found (1) no directory for project-programmer number (2) protection failure (3) file was being modified (4) rename file name already exists (5) illegal sequence of UUOs (6) bad UFD or bad RIB (7) not a SAV file (10) not enough core (11) device not available (12) no such device (13) not two reloc reg. capability (14) no room or quota exceeded (15) write lock error (16) not enough monitor table space (17) partial allocation only (20) block not free on allocation (21) can't supersede (enter) an existing directory (22) can't delete (rename) a non-empty directory (23) SFD not found (24) search list empty (25) SFD nested too deeply (26) no-create on for specified SFD path (27) segment not on swap space (30) can't update file (31) low segment overlaps high segment ) unknown error ( p,>,>,>,>( QDx@,>,>,>,>7	[!&>9Z(
+	<!$@f@e$+	>0D	1D
+	<0d+	J@@:~`Fl$+	[@+	A
`@+	F
` +	U?$x+	>` `B+	^"
"+	A-"	MIOE I/O error reading help file-"	MNHF No .HLP file on SYS:
&	`\$	d $ad`l$``dl$@`d 
&	``d 
&ad@+	U
&
&	a
&	d /	d,^ZB([	b+ ,^,^,^,~Q3	4	5	5	J:"".Bx+	A%HLR; I'm sorry, I can't help you
 6	e6d	eWL4ESV	/W,-OC/SV P@VKVl(V*76@Ul)\[ZZYYeJ
`mA	J5KJ 3eQ- 
&u^
"2x
.W	>(a@S}6S}zS}kS}0}|	FS_Y@S_Y\ @E(	M@zz	.(Ty"	`(Tvj	5(T0	4(T	`(T	AR`*S	R`
RLt[Rw-,\L	URW	`i}h	<ESVyt	.W&hW&c/W&c*P2iP2i@PrOPrPqPp7PpPJvPJuF
PoVPh~sZPh~isPh~hrPh~hoPh~gjPh~gjPh~fiPh~ffPh~-vPh}rnPh}qmVl(A/$ArvTrv]ru~eru~eru}aoY.QUd	bLdesP@)nJqa``^^]TeJ
`eD
V?Q\+V?Q[&V?QZ%V?QZ"V?QYV?QY
Qt)]Qt^Q	>QmAQm?Q;MPZhLMP
)AMP
(;MP
(:MP
'9MP
'8MP
&6MP
%1MPf%ML:ML
7ML	4ML	0UMJ5@7Y>M+X1p>bM"s>b7&>b:r>afr5x*}*|*|*z*z*y5}h*y5lX5"T5(3 5KJ P)R[@{<5{;*zC.t-]ZhZaZaZ3&Uk0UOEUODUM@Sg4NlJ`HH#H='H=%-$}p-$|k-$|j-${j-$zh-$zg-$yf-$yc6K,#|1r#+
a8+
a6+
9,+
9+*dy0*dy/
07
2[eOsP#x
P3dz	`
^a3^a2q,o'L
8u^v
&u^sY?u^Sg4u^HH5Tu^Ju^
"u^t`2x
nggDGZn)+Bnt^P$l/W[6l/:wl/9Nl/9Ml/9Ml/7gFl.y|Fl.otAy[PhkPFE?SSMAgqSL9SL~m:JDTCX3	`	A"[wT+)m P
D$%
Aa%
@ye%
@yc%	s8 #AP_
Q8GRY@SY\'^|YI^|XG^|,M^{4D|WY>&(d^uFQ|7g3|,H5^hN)X&' |c|dP{zJ {y|c{ot
kzaD
kzaC
kz9<
kz9;1\`71\`71\`6
1\`61\`51\`!~1\`1\11\01\/
kTy@
kTy?1IUF.1IU<;1IU;:1IU:01IU9/1IU1IU1IU1IT~1IT~|1ITin1ITB^1ITAf1IT.\1IT.Z1IT-L1ITJ1Hnd,1Hnd!1Hnc1Hncp1Hnbk1Hnbg1Hna^1HnaK1Hn`B1G1q1G1p1G1p1G1n1G1m1G1mv1G"	
1G"	
as"K
as!J
as!I
a\C.>nC(U]Y(U!T(T}[(T|Z(T|V(T|~U(T|}S(T|}J(T||J
Nv)G(T{<B(T{;:(TzC=(TvJm(TvIk(TvIi(Tv
@(Tt-h(TbT	`
(T[$G(TZh(TZb(TZb(TZa(TZa(TZ3o(TZ%p(TSgt
Nth(T|;(TqPOP YV
QzXGg@	+?Pg|LL]"@Kv7}K	`=^/g`	Dz`R}
S:P>%P> R}
PK
Risb)@Risb'Ris2
Rir|J RhmRe33$aijB_9	`_%N?O_%N9R_rm_7t\|v3\|v1!u?	`d@XMR/Q3MR/Q3+T24PMRi+)b	)MR&MR MRMRMR)bMhYMX*xMX)zMX)xMX(vMXpMXmMXmMXlMXiMXfMXeMX[MIwnMIqoMXWpM=
9M**)Mj")Mi)MiMHoL?ZAL?3|?K!Ry!K##lkP-A!#3$r1!D4\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