Trailing-Edge
-
PDP-10 Archives
-
decuslib20-03
-
decus/20-0081/congen.rel
There are no other files named congen.rel in the archive.
= MlX 0 MlX p ` @f . / (k d%MF x < Q ITj6Y T IU X IV 9 f QTI p QTM6[d b QTj6Y m x D QU[ w QV 9 t QW !"ATRKZL9 "ATSS2d\@ %"ATXKH "ATI;S( x M "ATj6Y "AV 9 D"MTQY> :7N ="MT+G.Mi` A"MTj6Y n"UTS x US2d\@ d"UTV( k"UTYK
"]Tj6Y 8"eTSS2d\@ 1"eTWkQUh6 x fJ #"eTj6Y "eUM]lP
&QTj6Y $&UTj6Y &UVKzC1TI9GH x o , 5 -i9CR,FXCJ
|Pa!Uh6Jh $ 5 -i9CR,FYK%w5:
E 6P E 6P x wB
E 6Q
E 6Q
E 6R E 6R" E 6R$ E 6R& x E 6RB
E 6R
E 6S JY&tVH" MY&tVH$ [Y&tVH& _Y&tVH x ( {Y&tVH* ~Y&tVH, Y&tVH. Y&tVH0 Y&tVH2
x Y&tVH Y&tVH j (Y&tVH" ,Y&tVH"j /Y&tVH$ 3Y&tVH$j x 6Y&tVH& HY&tVH( KY&tVH(j OY&tVH* ]Y&tVH*j rY&tVH x ", Y&tVH. Y&tVH0 Y&tVH2 &Y&tVH2j ;Y&tVI B x *Y&tVI" ?Y&tVI$ FY&tVI& IY&tVI( MY&tVI(j PY&tVI* x 3 TY&tVI, WY&tVI. [Y&tVI0 ^Y&tVI0j bY&tVI0j eY&tVI x ;2 iY&tVI lY&tVI" pY&tVI$ sY&tVI& wY&tVI&j z x DY&tVI( Y&tVI* (Y&tVI, [>vJ
_W#,RFj #e |R5NO) x U
fj
fj
"fj
$fj
gR- 'gVk,tu 8iTH:J C x ]iTI ?iU[ FiVJ6J <iW i"++7]R@ i"++7]RC,RI0 5i>$ 9 x f5I H 0 0 R (
x n ` 0 @ R E X @ @ x ( 0 8 @ p E X 8 x 0 @@ x @ @ ` @ @ x ( . H @ 0 G h x ( 0 P ( 0 @ 8 ` x i < x ! 0 G H x @ @ 0 ` @ @ K x " * 0 @0 @ 0 P 0 @ 0 G p 0 ` x 2 @ @
Q
E 0
H @ h x @ @ ; x @ 0 G 0 00 X x 0 @ 0@ x C @ P E 8 # b H
h 0x #
` @ x L x G @ $ @ " Q i0( $@ H @ "G $x 0 x ]@ @ # 08 % p 0 @ #G P 0H % @ p $ x " e h 0h ' @ " $E
08 - @ (
%
0h / x n @ 0 %E
0 0 1 @ h &
H 2 H x @ @ v &E 08 28 @ ( ' x 5p x @ 'G ( 0 5 x H 0 0 @ (
` 6 ` (E H 0 6 @ x ( ) 0 0X 9P x @ 0 )G ` 0p 9( x 0 @ *
x x ( 0 : @ p *E 0 ; @ h + ( 0@ = x @ ` +E @ 0` > @ h , X ? : x ,E x " ! p 0 ?X @
- X A ` @ @ -G q:0( Ah x ) 0 @ @ . 8 B @ @ .E p 0@ C @ @ x @ @ 2 /E
0 F @ H 0
J R x 0E X 0X J x :` @ h 1 p L @ 1G 0 Lp 0 @ x C 2
8 M ` ` 2E 0 M @ @ h 3 x ( K O x @ 3G `0 X O 0 @ @ 4 8 P h ` x T@ @ 4G g0 p PP 0 @ 5
P Q u p 5E x " \ 0 0
Q @ @
6 S H @ @ 6G 1u0
0 S x e0 0 @ 7
h S p 7E ` 0
@ S p @ @
x @ @ m 8 H U!( @ @ 8G a0
p U 0 0 @ 9 @ @
9E X h : 0 0 0 X# @ x ~ :G 10 p Z#@ H @ ; H Z#x 0 @ H ;G 1 x ( 0 x [$0 x @ < 1 0
[" ` 0 @ <G h = x 0
\%X @ =G y*0
P ^& H @ > x " ^&H 0 @ H >G y-0
X _' x @ ? y40
` $h x ` 0 @ ?G
p ` @ 8 @ @ @ ) @E @ 0 B ( 00 h x 1 @ H
BE @ 0` j @ P : H
CE p 0H o @ x D 0 r @ ( DE x ( B0 s @ @ E 8 0` v @ ` EE P 0 y x K @ F h 0@ { @ H
FE 0p } @ G x " S 08 @ GE 0 0` @ H H H 0x x \ @ HE ` 0 @
I x ~ x @ @ d IE ` 0H0 @ 0 J a~0x0P 0 @ JG a0 x m1 @ @ K a0 1@ x @ KG a0 /( ` 0 @ x u L
x LE x 00
2h @ ` M y x ( ~0h
3 0 @ MG y0p
3X @ 8 N
NG y04H x @ O y!01x ` 0 @ OG x " @ ( 0 @ p P ` 9< 0 @
P x ( @
@
/ ( @
= @ @
C P @
S x ` @
Z p @
o @
u @
x @ ( 8 @
P @
` @
2 @
I x " @ 1 @
B @
l 0 @
@ @
@ )p ! @ < < (k8 > @ x .@ < gg Uti1[ [M-7UVd 3gxz]?4I1 G
` S-mM& 8J;SNM{G aJ||PZ6LC@ 8 CW% y ;wOp m:7\ G #I$S;e'&I7 $ P % %I$S17H8 'el Uf8
WOJ'&I7 H1 :<[F -K;5 W]6-m I'5 t68p /S;] W& >M S2)[zh ? Y> 0;$7f e |Rf C C3,PLLI7i&5pi&}`fMc7C6)` F C3,PLLI7i&5pi&}`f~]]lS@ J DFe kN
y SLJ9a2 L M D}:J,0 kN
y SLJ9a2 O `p P8 Q $5KH S
S ' S $N#9k4 S
6$ U ' Vo?:7N7 KyC (
rGRM{G X.\F]lP S
4J [ p \.\}::
4J p `.\kfe 0 ]/@ baJ|92kJ( m' w d.\;wiJ}C:R
6$"`H
9}\ ggR- h ap
7aW S2)Z7 j ap ziC.@S2)[zh8 @ m KPkfe 0^T\W o KP;wiJ}C:R
7J,0^~]e` y e'$PkPn)1 { KPkfe 0` 7 } KP;wiJ}C:R? PS2)[zh8 SOH<:y\RGL` @e |Rfp
SOH<}m_0nKzC0` @i?$ p i?
Z\8 M&dS7kP @ "
H @0 H * ; 8 `('I ( + -< -8 : ;-< + $
@ INX @ G>ty77 @R 6@ ;, O@ ; \ ; < , , @ G>ty7, < P
, ,
( 8 , @ #
h,
( 8 (*
, @ #
h,
( 8 , 0` +
( "*( 8 , 0 + ![QH $+ (
( 8 , H 6j 0j , "* &/* j h
( . h, H <,
<, , < *
E( ., -, < , . <",
" # # . h$, * %"%3B + ; *
U
7 %"&3B + ; %"'2B + ;+ = <(, 0+ /, / <(, < <, *Q(U* ?, 1
" - - . h$, 4, =
<., > <2, ?
" 2 3 . *E
U Hh$, B 31@ + L 30@ + L+ N <(, D+ C 30@ + PZ( h3 (E
T P 30@ + SZ( h3, C
<4, M <8, E <9, @ #
9 : *E*A* Yh, , S <:, T <=, U <>, V@ #
> ?h, Y
? @*U* a ( 8 , # @ #
> ?h, ` <@, [ <2, \
" D 3 "UT* j . h$, H <, g E0@ + o\(`AH O+ , Z <E, l <,, h *E"U( r
" J - . h$, k, o <J, q <2, r
" N 3 . h$ **T" {, u O1@ + ~ O0@ + + <(, w+ u O0@ + Z( hO+ "E*A* Z( hO, u <O, <8, x <9, ]@ #
9 Th, f, "U*T*
,<, ,<T,
" D 3 . h$, { E0@ (U*U
+ Z( h_+ I <`, <f, <f,
" g g .
h$, U( *** AH , <h, <=, <>, @ #
> lh,
l ( " U % 8 , b
? ( 8 , & 2$ + , <m, + "
l ( 8 (*E* ., ( . @ #
> lh, $, <o, + <=, <>, ! U D 6@ #
> sh, 2
s ( 8 , .
l ( 8 , ; . U D ?@ #
> sh, 9
s ( 8 , =
? ( 8 , C 2$ *T"A* G+ I <t, 4+ 2, 2 x,
y y (
.
hz, zd{ D 3 *A U* P |*( 8 < !, A
| y (
.
hz, N z D 2 }*( 8 < !, Q "A*U" XA
} y ( . hz, U zd~ D 5 ~*( 8 < !, XA
y U*E a (
.
hz, [ z D 3 |*( 8 < !, _A
y ( . hz, b *U"A* i zd D 2 *( 8 < !, eA
y ( " . "hz, i zd D 7 *EU* r D 8 < !, lA
y (
.
hz, p zd D 3 |*( 8 < !, s "A*U" zA
y ( . hz, v zd D 3 |*( 8 < !, zA
y U*Q* ( . hz, } zd D 2 *( 8 < !, A z D 0 *( 8 < ! (P*U( ,
y ( . hz, zd D 5 ~*( 8 < !, A O *A*U" 4@
y ( . hz, zd D 5 ~*( 8 < !, A z D 0 *Q U* *( 8 < !,
y ( . hz, zd D 2 *( 8 < ! (P*U( %, A
y ( . hz, ! zd D 2 *( 8 < !, %A z *T(* - D 0 *( 8 < !, ,
y ( . hz, ( zd D 2 *( 8 *"T
6 < !, /A
: ( 8 , F 5@;+ B
y ( . hz, 3 z *UP* >d
D 4
*( 8 < !, 6A , I
y ( . hz, = z D 4 *Q*Q G *( 8 < !, AA z D 0 *( 8 < !, H
y ( . hz *U(E O, E zd
D 4
*( 8 < !, LA _0@ + b
? ( 8 , 9 U(* X@ #
> lh, A
*y ( . hz, O z D 3
`, SA +
l ( 8 , W 5@e+ l
*y ( ,. hz, ] z *T"A* i D 3
y*( . hz, h,zD 3
l ( 8 , c
s ( 8 , u . @ #
*TA z > sh, Z
? ( 8 , w
s ( 8 , } / @ #
*TU > lh, {
l ( 8 , 5@+
*y( ,. hz, o *UU( z*D 3 !,
y ( . hz,
zd D 2 *( 8 < !, A
T E @* ( 8 , 5@ + +
T ( 8 , @ #
9 :h, **U
$
y ( . hz, zd
D 4
*( 8 < !, A
y ( "U*E* - . hz, ' zd D 5 ~*( 8 < !, *A z D 0 *( 8 < !, 1 "A*U" 5
y ( . hz, . zd D 5 ~*( 8 < !, 5A z D 0 *Q
* > *( 8 < !, < , $
y (
.
hz, 8 zd{ D 3 | *E*E F*( 8 < !, ?A z D 0 *( 8 < !, G
y ( . hz, D *U
P* O z D 5 ~*( 8 < !, KA O4@Z
y ( . hz, N z D 5 *Q U* W ~*( 8 < !, QA
y ( . hz, V zd D 3 |*( 8 < ! (P*U( `, YA
y ( . hz, \ zd~ D 5 ~*( 8 < !, `A z *T(* h D 0 *( 8 < !, g
y ( . hz, c zd D 2 }*( 8 **
q < !, jA z D 0 *( 8 < !, q
y ( . hz, n z *U
* yd D 1 *( 8 < !, uA
y (
.
hz, x z D 3 |*( 8 * U* < !, |A O4@
y( zd D 3
, A
y (
.
hz, z D 3 |*( 8 < !,
A _0@ *P*U( + +
y ( . hz, zd
D 4
*( 8 < !, A z *T(* D 0 *( 8 < !,
y ( . hz, z D 1 *( 8 < ! (P*U" $, A
y ( . hz, ! z D 4 *( 8 < !, $A O4@: **U
,
y( . hz, ' zd D 3
y ( "U*E 5 . hz, / zd D 2 }*( 8 < !, 2A
y (
.
hz, 6 *UU = z D 3 |*( 8 < !, 9A _0@ + C+ J
y ( . hz, = *U"A* F zd D 4 *( 8 < !, @A
y ( . hz, E zd D 2 *Q*Q N }*( 8 < !, IA z D 0 *( 8 < !, P
y ( . hz *U(P* W, L zd D 1 *( 8 < !, SA
y ( . hz, W zd *T*A* _ D 2 }*( 8 < !, ZA O4@j
y (
.
hz, ^ z D 2 } *EU* h*( 8 < !, aA
y ( . hz, f zd D 4
*( 8 < !, i " U* pA _0@ + s+ z
y ( . hz, l zd D 7 D 7 D 8 < ! (P*U( y, pA
! y ( . hz, u zd D 2 *( 8 < !, yA ! "E*U* , %"'2B + <, H <", <, O4@ <, <&, *T*T
<, <*,
<+, <+, <0,
,<0,
x
H @ $a $ $0 cG HH $H $H ( < @ * BEGIN BUILD COBOL PROGRAM * (V2)
INPUT FILE IS ON DSK, SYS, OR MTA ? "P
! H@ H < 5@ ! INX H 5$H$gg $H&[R $H'?
FILE NAME: (ALL * 9 CHAR NO PERIOD) ? H@H Z@ MODE IS: A = ASCII, S = SIXBIT ? H@ (@ 2
L@ LBLOCKING FACTOR: 0-999 (0 = UNBLOCKED) ? @ t@ 0 ARECOR @ ;D LENGTH: (CHARACTERS) ? @ '@ H 0 PDO YOU WANT TO COPY THE ABOVE FILE? P C (Y-N) H < OUTPUT FILE NAME: (ALL 9 CHAR NO PERIOD) ? ^MODE IS : A = LASCII, S = SIXBIT ?
O OBLOCKING FACTOR: 0-999 (0 = UNBLOCKED) ? H B TRECORD COUNT IS AUTOMATIC; HOWEVER, IN ADDITION,
DO YOU WANT TO CONTROL ON SPEC ]IFIC FIELD (Y-N) ? < DESCRIBE THE FIELD TO BE ACCUMULATED (IN 25 CHAR OR LES P eS)
* HAH H
LEFT POSITION OF FIELD TO BE CONTROLLED ? H S? OUT-SIDE n OF RECORD ?
NUMBER OF POSITIONS IN FIELD ? H UH ? CONTROL FIELD GOES OFF k vEND OF RECORD?
!H H 0 2 03H (3H X 4 P5 *u*W* H #H % 1 2H ' < 7H - t 2H / X 2H 1 < 1 1H 2 t 4H 6 4 *Un]* H :H ;H = X 1H ? t 3 @4H C H5H JH Q 84H SH >H FH MH V *U+U+ H XH \H ` < 2H dH b 2H g t 1 2H hH j t 3H mH oH r 1 *U*U* H sH v < 3H yH {H } t 4H t 2H 1H H H < 3H
< 6 * !H !NOTE: INPUT FILE WILL BE ON MTA
NOTE: OUTPUT FILE WILL GO TO DEVO )UT
EXECUTE H@0 - - - - WHEN JOB IS DONE - - - DELETE H 0 .*
D"Bz V?Qj barW] 6bT-^x KbTB b] * 5`(*R bgsC' bgsC( D"`-$ ` x7V bT3[ eVZq eks.
eW % D" fPa-+ |b2,C $bQ0%B bDw
MlX ( ( 1 <