Trailing-Edge
-
PDP-10 Archives
-
decuslib20-03
-
decus/20-0081/cobols.rel
There are no other files named cobols.rel in the archive.
NZ/? 0 NZ/? p ` @Q . / (k d%MF x # , 5 -i9CR,FXCJ
|Pa!Uh6Jh $ 5 -i9CR,FYK%w5: +
E=@ pE2[+W fE2|:mSP G"}r5>3(V]S 6G"~Q 9G"~QQ 6 x 4G"~QQ)<SP 2G"~QQ*7 PG>{
G>v@ HjEI Hjs* #Hjt2 x <
Hjt25"d@ wI$YK
*I0 I3*H -I8 $I=U
I?
8K>P >Kc LKc' ?L CMUh6J <MV91 x M MV91i&}` ;M&dVW EM&dVWp M&dVYK2,=
M?*2 *O#(PG,
x VO#*2 O#,RF P Qf QfYi@ GQfYi&\` &R x ^SUh6J 0S< /S=TFWC6( +S=U $S=V)1 SR.(:JjD[ )T F x gY[ 8[>
[?4VTH ([?4VWas*7 "\
"]FFH 4]FFQQ?
x o^EV)1 &eB-fT5< aJ;*2 aJMm xH e*HD .e+7I e e$Y@ e \[5] 'e \[5] x Qfj~&W gdXz5N,=8 g'D*:56|I g'TVS g'TVSS2` g'TVYK
x
g6- 7g>lVWC6( Bg>lVWC6/ >gR
gR- _ x mfY-S TmfY-S-m .oJNI-G2~9 ,oJNI-^j t x x 0 R @
x @ " A H
F h H x + @ ` 0 @@ 0 G 0 8 @ x @ @ 3
( x 0 @ 0
G @ 0 8 L ( 0 x < 8 L ( F 8 L ( ( 8 L x D ( F p 8 L ( H 0 ( @ F ` x ( M @ F
p ; H @ h x U @ 0 F P x 0 @ ` x fx 0 @ @ S @ I0 @
p @ @
x @ @ o F S0 p ( @ @
W0 ` @ @
F Z0P x w
@ @
^0 "
P @ @
F a00 $ @
e0` &
F h0 (
l x ( 0@ *0 @ @
F o0p ,h @ @
s0 . x @ @
F v0P 0X @ @
z0 2
0 @ @
F x " @ F 0 @@ @
` x x ( " 4
P% 4 0 @ p ` F h P x * ` ! X P 0 @ `!F h T x 3 @ "F } T @ # ( 00 T8 0 @ 8 x @ @ ; #F Tp @ p $ @ 0H W( @ X $F H X x D 0 0 @ %
p Y 1 h & 0h YP @ x @ L &F 10p Y 0 @ ' H Z` 0 0 @ 8 'F x ( U [ ? (F p 0 [0 @ ) [@ 0 x ] 0 @ p )F 8 ^ J p *F 50( ^X @ + x " f J00 ^ 0 @ +F X `h 0 0 @ @ ,
@ g y0 0 p 4F
g 0 0 @ 5 x ! @ j
X x ( * j#0 p 7
( j" 0 0 @ 7G
0 m!! 0 0 8F
8 m#H 0 @ x ; 9 n ( x 9F 00 n%8 @ x x @ @ C : p 0( n%p 0 @ ` :F X o&( 0 @ p ; ( q x n L$H 0 0 @ ;F ` r 9 x < p r&` 0 @ x T `<F
N+ @ @ @F U0
PQ+@ 0 @ @ A X0 T+x ` x v @ @ AF \0 `X,0 @ @ B _0
([,h 0 @ @ BF x " c0
p^-X ` @ @ C f0 e. x 0 @ @ D m0Hh.H ` @ @ DF q0l/ @ @ x @ @ E t0Xo/8 0 @ @ EF x0 r(p ` 0 @ @ F ` D x %@, G P D/p 0 @@ @ `GF 8 2 x ! @
p @
@
x @ ) @
1 X @
Y h @
k
` @
x " @ 2 p @
@
' X @
4 ( @
F ( x ( :@
s @ @
8 @
%
H @
? @
P x C @
R P @
q p @
@
7 x @ K ( @
@ @
T @
g ( @
l x " @ T ( @
q @
@ @
)p @ # # (k8 > @ x .@ # k S-mM& _8J;SNM{G aJ||PZ6LC@ K;5 W]6-m I'5 t_8p G>tj3kJJ7\ XzS>q` "_
TXz}\i`I@j $S;] W& (I$SZN:7\8 *M&dPK%w ,o?:7N7 KyC (
rGRM{G .aJ|92kJ( m' w 0gR-N<CdKrCdp 2 O%| eVq` T
rY @ W CO wRx Y
RG?J7Nmy' [M ^ E`
RG?L`CJ( a 1 c V Xw]RD l S
n Di".) SL=9evK H[rKLy@_B.(:S>v4$ 4 z6|I o"L: o&e@e>&Xrp Kb,=:C
dP_
}@ Le>>(6\}k`R6x N 7g^. ^%s9K2,= M&d\`M?
&^| D e{S6|I o"L: o&e@Y2~p TK` gdXzW
& V^5f8 X LD G2MZ:>p imh6KLp +seh xi&}l`M? ] m[rJ)- iS&gdXz yS p{4 jiR,@d H7I@ l4i]PYV( s& h$M"UK0d8 &6$ J,;yIL RH&]lS) iS& DH:B6t2Hp t v ~ i<n
T]R. @
@ H H 8 `('I ( + -< -8 : -< + $
@ INX @ GJ, 7 @A( 6@ , O@ \ < , , @ GJ, , <
"Q"
, <,
. h, "3B + + @ , " " 6t 0t , /4 $4 t`t` + d4p . 6 v < , : "T*U" 1` + + + , @@ Z` @@ 4 *( O@@ P *( SU( AH S < *U(U
&,
<, & < ,
. h, "!2B + .[!QH ("" . ", @ @ ,
6j 0j , /* $*
j"`j` + 7d*p (U"A" 7.
Q(( X( *( @@ #*( U( AH < , a : 0@ + B: ! D"U* ?: ! X2 B,> 0 Y+ 0@ + M <#, ' <, (
. *Q(T" Hh, + "(3B + M ")2B + M+ k 0@ + P @ + F (E"
P 0@ + V @ : !: ?! X2 V,> 0@+ B 0@ + X+ + 1 (DD( Y, 1
6j 0j , 3/* $*
j"`j` + _d*p .
Q(( X( *( U( AH *U*E( a H H H [ h) < , < e : 7@ !+ k> ![x 2P S "*T* j, > i+ , Y <*, D <-, E
. . . h, H
.6p "
U* r0p , [/0 $0 p/ ( . h/, q <0, m <3, n
4 4 . *Q * {h, v
56p 0p , s/0 (P p5 H H 6*( (6h7 **" < , fa , k Z` <7, w6t 0t , }/4 $4 t/`t` +
d4p (E*U"
. 6 v < , <8, <:, <, x
. h, { *"T( ";2B + + "<2B + + '+ ,
> > ( . *U
Q( h/, ?*( (?h@\(`AH @@ @*( U( AH < , a \(p (T(* %AH ZZ( AH [+ 4,
B > ( . h/, ?*( (?h@\(` *Q(" .AH @@ @*( U( AH < , $a \(p AH ZZ( AH [, ' <B, *T*E" 6 <,
. h, + "(3B + > ")2B + ?+ ? *"* ?+ 1: \(`AH T@@ U D*( VZ( AH W\(p AH XU( AH XZ` + k, 4 (AA* G6t 0t , /4 $4 t/`t` + Ld4p . 5DO=`M+ 16j 0j (
U
P, H/* $* jD E ( . h/, : E*( (FhF\(p AH @@ @@ (T(A X@@ U( AH < , 1a
G6p 0p , P/0 (P p5 ( . hH+ k **Q( a
I J ( . h/, T J*( @@ @*( U( AH < , Za \(p *T
U" iAH `@@ `+ s
L J ( . h/, c J*( @@ @*( U( AH < (Q*T r, ha + , F <L, 6 <P, u <V, v6t 0t , ]/4 $4 t/ "
U
z`t` + |d4p . 6 v < , < , 7
X . h, m Y *U"Q
*( [ cQH R` @@ @*( U( AH < , ra , s <Y, w6t ""* 0t , x/4 $4 t/`t` + d4p . 6 v < , ~Z` ]AH e < *Q*
,
. h, "(3B + ")2B + % <^,
*T*U
<,
a . h, a*( @@ @*( U( AH < , "(D* %a , \(p AH g@@ g b*( iZ( AH i\(`AH mZ( AH m <b, 6t ""* -0t ,
/4 $4 t/`t` + 2d4p . 6 v < , <-,
f (U*U
6 . . h, <g, , <i, 3 <i, 4
j j . h, 7 *D
> @ , % 6t 0t , ./4 tk`t` + Dd4p . 5DO=`E6t ""D G0t , A/4 tkZ( H .( H 6t 0t , G/4 tkZ( H + P *A" O: + ?, ? " @ , P $6t 0t , L/4 tk`t` + Xd4p . U*Q X 5Dp=`X ghl l*( l(mhm6t 0t , T/4 tkZ( H *Q"Q* ` n*( (nho\(p AH @@ U( AH < , $a o*( (php\(` *
* iAH @@ U( AH < , ea : ": j! X2p,> 0r+ V+ 7: + R (DD
q, R &6t 0t , ^/4 $4 t/`t` + wd4p . 5Dz=`x+ 1 *DD" z <7, 86t 0t , s/4 $4 t/`t` + d4p . 6 v < , 9 <q *U
Q( , z <u, :
v v . h, = w"x2B +
y z ( . *T** h/, + w"{2B +
| z ( . h/, + w"}2B *A*D +
z ( . h/, + + q, q (6j 0j , |/* $* jD ("" ( . h/, : ":m! X2",> 0l+o
6p 0p , /0 "
$$0 p ( . h/, \(p AH n@@ nZ( AH o
z ( . h/, ' * U( -
6p 0p , #/0 $0 p ( . h/, ,: 7@ "+ 7> "[x 2P *P*D* 5, j> 5+ k, *\(p AH g@@ g b*( iZ( AH i\(p AH j@@ j *( l "T" >Z( AH l: + F, 7 ,6j 0j , ./* $* j ( . h/, 2 "E"D F\(`AH @@ U( AH < , ka : 6t 0t , B/4 $4 t `t` + P "
Q Od4p . 5DS=`P @ + T+ @, @ .6j 0j , L/* $* *
Wj ( . h/, F\(`AH @@ U( AH < , Ia : 6t 0t (( `, V/4 $4 t`t` + dd4p . 5Df=`d+ g+ T, T 07@ ! *(P( h+ l> ![x 2P6, 5> j+6, g 2
( . h/, ZU( AH t (D Q q, l 46j 0j , `/* j 0@ + ~6t 0t , s/4 tZ( H *
T* y
( . h/, o @ + : + q, q 67@ "+ > "[x *T"U* 2Pk, j> +k, 8 , <, <, <, <, ,
x /H FOR HELP ELSE ANY CHAR. <CR> H@ H H @ ! *C` $H $HH DH $0 H 5
PKEY-IN NAME OF PROGRAM YOU WANT TO CREATE
NO PE (. RIODS (.) ALLOWED IN STRING H@H H @ $H $H G
` H "xDO YO $U WISH TO SELECT FILES FOR I/O? s $H'r $H(H KEY-IN A DATA-NAME TO BE Q
,SELECTED HAp
T@ H 4@ DEVICE? CDR,CDP,LPT,DSK OR MTA# H@ X@ +T " 50 XH0 P
@00 X00 IS ASCII OR SIXBIT
A OR S B $H;f $H<CN ' "u`@k = H= Z
x [
x # g'D*: HAANYMORE FILES
P UH0 40 [ 8 * A F` ^` INX H0G @ gR N- AS YOUR DEVICE
KEY-IN 9 CONTIGUOUS CHARS. (NO SPEC. CHARS. ALLOWED
FOR YOUR V WALUE OF ID ON
b
DO YOU WISH TO SPECIFY BLOCKING FOR ~ HOW MANY RECORD _S PER BLOCK
< e
8
x hKEY-IN RECORD NAME FOR 01 LEVEL ON gKEY-IN SIZ T+W. hE OF Ap gH@0
m@
m g 0 j
x j` i` l
`` i`
x m (
p
x INPUT OUTPUT OR I-O KEY-IN I O OR IO
H@ H @ R 00 00wIB-` "DA* y]C.@ H0x0 n^ 00z B-`kS] H0{S< 00}B-`< H0~0 oH nH uG2~9 "u( H0H ` x7V bT3[ eVZq
bT7M bDvH* bLk
d"a* emWOn emWP ! D" eW wc!o+ fPa-+ |b2,C
NZ/? ( ( #