Trailing-Edge
-
PDP-10 Archives
-
BB-4148F-BM_1984
-
sources/fmlany.rel
There are 7 other files named fmlany.rel in the archive. Click here to see a list.
0 d6: H @u\
COPYRIGHT (C) 1984 DIGITAL EQUIPMENT CORPORATION
/ < ( EPROCESSING EXPECTING H D E A N (D" H I H I H J H K H K H L H M H M H N "D" H N H O H P H P H Q H Q H R H R (D" H O H S H T H U H V H W H X H Y H Y "D" H Z H Y H W H Z H [ H [ H \ H \ (D "H ] H ] H ^ -10 -11 -12 -13 -14 -15 -16 -17 -18 -19 -20 * -21 -22 -23 -24 -25 -28 H0 - a&P H0 / a8 H0 0 T H0 2 A 3 T H0 3 V H0 5 T0 H0 6 T H0 8 b H0 9 a0 ( A ;H0 ; `, H0 < ` H0 > aD H0 ? `$ H0 A ^, O@ " DO@ O@ , @ C <_, + O, 4@ C @ <a, 4@ C @ <c *Q
T L, F+ O, G4@d @ I, @ @ @ @@@ C@@ @@ <f, , "T U, R` R` @@ @@ O@ D+ [, 6 D+ [@@ D+ h@@ 6@ + =, [ EQ ]6B 0@
+ k6@ + [ ]0@ + oR` 6@ [+ q, `0b <+ [ , <s "E f, <u, f6@ + y[ ]F"
@0b + } , /" (B
@ 0` **U* n+ <, +D p ~ @ F F O a W *T E" w i r7 " G L D @ m 8 @ <, 6 C+ [@` C,~ O@ W+ a U*Q* [ 0 " 2@
=b +
+
., <
T" ., <, 2L+ + X., <, 2L + + X., [ 4 0@
@+ ., *T"E* <,
<, + X., [ 4 " 2@
=b., +
+ < , *U"U* 2L
+ + X <!, + X[ 4 " 2@
"=b +
! 8 <$, 9
" *E(U ! <%, [ 4 " 2@
&=b#4B)[4"F"
$ @ B <+, "., [ 4% " 0@
"D( * " 4B7., [ 4( " 0@
" 4B6., [ 4+0@
@+ ., =
3[ 4. " 0@
@ "*T" 2 " 4B7 0 @ B <-, '9
1 <(, 52L+ + X., [ 41 " 2@
=b: "U*U ;., +
<+ = ? <., 6+ 7 <0, >+ X <1, gR` [ 49 " 2@
2 *U"E* C=bC4B4+ 62L7+ + =[ 4B " 2@
9=bG., +
I+ A Q e Y ~ *U*P
L [ #[ 4F " 0@
" 5B_[ 4Q " Q"Q" T0@
! " 5B-[ 4S " 2@
B=bW7@ + E+ ( <G, 4@+ j [ 4V " D A* ]0@
" 5B# + ., [ 4\F `@ + J., Z @ z <K, ?+ A[ 4` A*A eF `@ + J., Z @c <N, d+ A[ 4e1@
$., [ 4j0@
@+ ., 0 *P"* n @ B <P, i[ 4k1@
#., [ 4o0@
+ R., [ 4q1@
#., L D L E: E <T (E
U
v, Z7@ + Z1B + ^[4 hF"
$ @ B 43 @ B <`, o., + A <b, | (U
Q* + sZ @h <d, ~9
Z @ <f, 9
Z @ <f, +
[0 "U T" F"
$ @ B <h, [ 4s " 0@
@ " 5Bi+ k[ 4
0@
+ n., [ 4
# "
* ., [ 40@
@+ ., [ 4 " 2@
n=b7@ + r[4F"
$ @ B 4m @ B *P D* <`, 9
A[ 41@
., [ 41@
#., [ 40@
@+ ., 4 @ B <s, (Q
![ 4 1@
., + A., [ 4!1@
!., <u, [ 4#0@
@+ ., + ) <v, % *T
T" ) 4 @ B <-, )[ 4&1@
., + A 4) @ B <x, +., [ 4+0@
+ R., (
T" 2[ 401@
#., [ 420@
@+ ., 4- @ B <-, /[ 430@
+ z., [ 470@
` (U ( :+ |., 45 @ B <-, 7[ 49 " 0@
` " 4BA <}, + A[ 4= " 0@
"(U* C " 4BE., , 2LE+ + X[ 4A " 2@
=bG+
I+ J M <, = "U(( K., <, + X <, K+ X[ 4F " 0@
@ " 5B <, N[ 4O0@
+
"*Q T., [ 4R " 2@
=bU+
W+ X ] <, R., [ 4T1@
., 2LE+ *T*D \+ X 4{ @ B <-, Y., <, + XO@ VR` [ 4Z1@
., Z4b @ D A e @ [ 4c0@
+ ., [ 4f1@
#., [ 4h1@
., Z4i @ @ (A
U m[ 4k0@
+ ., @@ [ 4m " 2@
=bq+
r+ t ., [ 4p0@
+ "" v., [ 4t1@
"., [ 4v0@
+ ., [ 4x1@
"., Z4z @ Z @ [ 4{ E(E ~F `@ + ., 2L[+ 6` D+ @ D, + [+ F[ 4~1@
#., [ 4 ""U" 0@
+ !., [ 41@
"., [ 4 " 2@
"=b +
+ & ., [ 4
" *Q*T* 2@
&=b4B
[4F"
$ @ B 4; @ B <), ^9
., <+, [ 40@
(A
U( + -., [ 4F `@ + J., Z 4 @ <., 2L + + X[ 4 " 2@
/ *U" =b +
!+ 4 $ , ; R., [ 4 0@
+ 6., [ 4$ " 0@
" 4B< *U(P )9
B <F, 2L + + X <H, *., , #[ 4& " 0@
" 4BI., [ 4. " E* 10@
+ ., [ 411@
"., [ 43F `@ + ., Z 4 @ <K, , <, 8 *T* :2L*+ + X <H, 9., <N, v4@T,> @ , #[ 44 " 0@
" 4BU "* B., [ 4@0@
+ ., [ 4C1@
"., [ 4EF `@ + ., Z 47 @7 <K, < *
U" K2L:+ ,^ [ 4F0@
@+ ., 4 @ B <-, J <W, + X., [ 4L0@
@ (U(( S+ ., <Z, P2LK+ + X[ 4R " 0@
@ " 5B[ <, U[ 4W0@
+ ^ "*Q \., [ 4Z " 2@
=b]+
_+ ` e <, Z., [ 4\1@
., 2LU+ *T*D* d+ X 4] @ B <-, a., <, + X[ 4b0@
@+ ., 4N @ B <, f (*P" m[ 4i " 0@
" 4Bp., , 2Lc+ + X[ 4mF `@ + ., [ 4r1@
"P u., [ 4t0@
+ `., [ 4v1@
"., <, l[ 4x " 0@ " 6@ + a2Lp *"* ~+ , XZ @I <d, + Y@@ [ 4z " 2@
e=b+
**E
l `R + k 4e @ B <-, z9
lR + k+ lR + k+ lR **T + k+ lR + k[4F"
$ @ B <+,
9
[ 41@
#., [ 41@
., "U*Q ,~ " M@@ A, : L D L E: E A @ A < J, =7@ + n0B ,~ 4 @ B * <-, , .L E.l D+ [ 4 " 0@
" 4Br., [ 4#1@
"., [ 4& " *U*U( (2@
s=b(9
*+ w , . 0 0 <y, + / <z, - <(, .,~ [ 4' "T*Q* 1 " 2@
s=b14B*[40F"
$ @ B <{, /[4IF"
$ @ B <+, 5., U* 9,~ Q _ w#` .\ A.< *"w,~ <|, L7@ R6@ S+ <, |6 b+ P *U B C+
C E F H" $ + C" $ + G" + M, 0 NONAM JE ERCNT* CALL (
' END
NULL CLO DEL END FIN GETS(INSRT S( MODIF( MOVEC( OPEN REMOV( STORED( SETUSE( SED( TR( ETR( T( D1( ( [D2( DO( D3( D4( D5( D6( x x h ` `x " T d$ + C h e e Ix <h, @+ [p 6` C5B c *A( l <j, A+ [x <n, i+ ax <q, o+ =p p U u p p <v, m <x, y+ hA COMMAND NAME .{ (( }+ xx @ <~, r+ oh + E` D * " {
AN AREA SPECIFICATION . + xp - Q"A" "EOS" .+ xp +p ("DBNAME" .+ x` ) ( p 4 .
@ a Transaction Name or End Of Statement .+ x " A p p
@
p p
"U
(p <(, 8+ (p Bp Bp p (
U 0 p
`
@ @ @ @ @+ E 43 @ @ @ @ ( 99
E
@
`
x *@P( A <A, + [
x <E, B+ [h e @"USERID" *"T( J .I+ x` ` Mp B"CURRENT" **U R .Q+ x 8 I D E S 2 7 8 1AN "RSE 2" .Y (U*" [+ x` + <\, *9
A` B Bp T(U* c- h c Op ep ! B 4 @ B <-, ^9
( * " l, j+
"AREA" OR "SET" .p+ xp " B "E
tp # (p # p $ B"USING" .y+ x"DBID" .{+ x "P P
}h 5 . AA RECORD SPECIFICATION .+ xx p 5 .x (U( x B 4i @ B <, l9
R"INTO" . + x
@"ALL" OR A SET "E@ LIST .
+ xp ("IDENT" .+ x
A PRIVACY CLAUSE OR "EOS" "A P( .+ x"KEY" .+ x"COMPILE" .+ x"ALNUM" . + xx *A
< , F+ "STATUS" . + x
@
A CURRENCY INDICATOR .#+ x
E
'
h B Bh +"TO" .,+ xp g
P( 0
"AREA" OR "ALL" OR "JOURNAL" .1+ x"USAGE" .5+ x"UPDATE" *(E" 8 .7+ x` * [ 460@
+ 8., <:, + )` * *D*" A ,[ 4<0@
+ 8., <@, >+ )` -x <( * ( I, D+ 9` / X M M = >X + *U*E( R <Q, I+ L <(, T+ K` 4 . > =p "UA* Z 4 @ B <, V9
Z"FROM" .]+ x"ERSTAT" ._+ xZ 4B @L <. * c, \9
zh b
@A SUPPRESSION CLAUSE .h * *( kO@ C+ xAN IDENTIFIER LIST .lO@ C+ xh + <p, c,~
D" t
A USAGE-MODE CLAUSE .uO@ C+ xx +x *x Bx * | ` @ <}, + Ap @ D `$y e`$y bY9S ~ H
H
@ H# (Fw R4&B P / o1 ) t/! : tS Jvv ": b2O- Jb8
I > D"F~<H EbHf_@ DK3 K3
#n K5\ K5y K5y K6 DK# =K2 Lm[ CM M M g
d@ P$' V @P^` : D"bQzc? z 4 xj 8 z 5 {6 2 {S 7_&U% _&U% !_&Vs ( D" _&Wd 6_&We 3_&Wp 1_&Wy =_&Wy ?_&X 8_&62 bd?g bdM( bdN1 bdTS bdz bdg bd
bd ! bd
4 Ebd+ d%} D D"bd& bd7~ eE
e} a\ A}]
E}] H D"}] D Fb}[~ A}\z2 C ab . K b]m > |O ,i s 7
D"
S? )HqI O
AS &[SQ #
2 I@M @N e@a j@b ~ D"@u @v @ @ #@ #@ (@1 -@# Q@ [ D"@$ Y>Fg >Fi ?
q "yD I D" S'a[. (U%% J(U%% Mc(T6I Oc(THH \c(Tu} c(U2 IP $]g BcXx^2 "c^\$( P {t ` |f Oc^h T^|;% X^|;% ]^{f R^| 2 W!G D" fy tcwS a
2 rxe -d
3 7 |
2gg B
2h2 % +Bb +E3 & @P +]R d"e I CT#uHF d% .= d%
7} gT'J(F W AA P FA$9% D A$9% A#d A$2
P<(F TDe*I /S ' l AYHH2 d S M @"di~/G ~di~i rdi~o& j)%G 9j+ G Kj+R LPAV PcJ PcK D"PcP PcQ 2I %rLy% ,rLy% ;Un $rL| RU>2 !dvvc? D
I P D &rb '
@ 4 , 1 4zBW )e5 :B "e5 @s+ UKsnJ UKt2 UKt[ eL O7 lM@Ks % 7Y D" 7[ * 81 $ Q A`
CW+>e W* # W* W*M@ @"W*Y] W*`J W*eJ W+2 ael\2 yPF i<
i< i< i< Drv xrv! xer5 er^2 Eo ;v? * z >c_] 0c`e z D ca6 0/%R ,/%S .cb /c( c@2 *$jH [$y
[$^k Y D"$ x/ X$(.K c5Z ~Clk `?,[ F WZ O k~ aV4D r' f k
I U k& af k9& D"vx Iyd W 5<W if _
F D @+ rf,h ?P6 m cs GPcD#w W77(cI{W7*vy W7*wtW7.pvW7.FuW7.}OtW70 zPd3[vW74J]u Jd#
/O1
(Mq
(Hf
#(I7
H4Z
`4ZZ
O(</g
@(aL
J}b )*}
)4xg
)fAS
K
"92
O+F=O
pD
pH
$?d
pJ
" ,*p
K!]
D%3
.'^
. z H3
.nX q<
#JcI
/@b:
LR: 0rb
0se
Lw
1;"
1%y
1' x
1Qtw
1Vr
KS[
1reG
1teJ
1u<V
r$
2= N
3-+
3
3
Kg
!4\1
!W@pn W@px <W@q)L W@q*l P kI|W@<{ Wo@%|WO3} H V!p<~@p H V!tb~@oX H W}]Qw~@oh H rf~@op H k(8~@oH H @
3 7 |} H @
3 7 |o H @
i~o& |a H ~ Xx^2 l H @ V!jJ?~@X H @
i~o& |A H k(8~@V H ~ Xx^2 l/ H Xx^2 l$ H Xx^2 l~ H ! Xx^2 l H V!iU~@PP H m3u'~@P H @
i~o& | a H V!if~@Mh H @ gW~@M0 H @
i~o& | U H @ ^\$( | N H k(8 ~@L8 H @ H @ ^\$( | H H k(8~@Kx H o f/~ ( 8 B ( ( O 2O-2OW~d
4_S 0 d
4 H @
k:5H3m&.p G"(1 ,> ,> ,> ,> ,> ,> ,> ,> + ,^ ,^ ,^ ,^ ,^ ,^ ,^ ,^ "*
,~ -" ` O@ %@@ *$ %@@ $ ', ,, ,, < ., ]7@ *U" + /+ 4, -4@ < 7, 24@ @@ ! Lu @ ! @
+ * @ " 7 B + 7 8 $ % ( E "@@ *" ,~ : %0" + : " $ ,~ : $0" + < " $ ,~ @ @ (E* *,~ ,~ ,~ ,~ + ?,~ -" @, + A (
* 2
, N+ -" 3@ p p p A D G @ 7@ + ::@ 0 R
R A" ;U A D G R@ :@ 0 @@ 7D + BO 2B + D D
2 (
( D4@ G6@ .0 @ E5@ + H@ + -" p @ ! =1 @ @@ @@ !,Lu( *U*E* L* H2 @ + [+ \X4H +@ + [+ \+ Ng O ,~ #p " ][ 5@ Up @ ,~ /@
` . h
2.Op $ Dk6 &o H @
!@l #@< ,@0 H ' (*
, ' k6p - /*} #@@ Ueky @ + kyp 2 < 3 *( 5, ]+ h 6 3 %x < 9, + )x < <, : ("P* =+ )x < >, =+ - @ + @@ + Bx < C, ?+ G ( F x < H, D+ G@ ` . . h L *@ N < M, I+ [ D Jx )8H &)} #P
2O- 2
2OW~ H2\( Ot $ $( RHfQt bHf@ K # D K !K r +)MG
bd
0
d
4 bd<+ bd> bdCJ bdDB Rir~ })B
*{| P
*|J S 6w P
+ H
+-x P
+5[ S HdC S J3 S J7 K T-x S Vzo xo1 SH
S'a[. #\'+ P $(F {nB {ot T #e: % D T#uHF % nB
&1}9 T'J(F (a@ T+"pf %:/ P:3 :3 @ :4 :5 -?. ; +P<(F P
_S -jZ. PAV D" 2x
TUA YrBHS rKc BrKqG \rKr [Up[} L( L(z UM@Rz P ;/ PF er5 Of jf
F 3'U W~A{P Hqt}Pdt(~W
3_ .Px.| g5 WL[ WMg WM T WM WS&E|W JM~g
gff D H @ @ h
H V!qF~ P H V!wa ~ H V!wE7~ 8 H V!fUe~ h H V!x9/~ @ H V!xH/~ H @ @ : ` ` ` (@ 0 0 0 0 0 0 0 0 0 0 "
+
3
<
D M U ^ f 4 l H0 f ,@ H0 i (0 4 H0 j (0H0 l P o ` @ L@
Xp
dP |p H0 n L@ < , L@ L@ < , L@ L@ < , L@ < , L@ < *U*Q , L@ L@ < , L@ L@ < ,
L@ < , L A@ ,~ , < "@ , @ < , ,~ " @ s H
@ H
A H
A H
B ( |H
B H
C H
C H !
D H "
D H #
E H $
E H $
F H % @
F H &
G H &
H '
H '
" @ H (
H )
H *
H *
( H +
H ,
H ,
H -
H . &
H .
H /
H /
H 0 @ /
H 1
H 2
H 3
H 3
" @ 7 H 4
H 5
H 6
H 7
( @H 7
H 8
H 9
H :
H ; H
H <
H <
H =
H > @ Q
H ?
H A
H B
H C
# " @ Y H D
H E
H F
H G
( bH I
H I
H J
" H J
! H K j
! H L
H L
H M
H M @ s
" H N
# H N
$ H O H O " T* { H P H P h rh ih *E"P kh mh h 0123456789h (
ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz-0123456789 h *
( !p E ` s } ACCESS CLOSEDELETE END FIND GET INSERT INVOKE MODIFY MOVE OPEN REMOVE STORE &USE ALL AREA JOURNAL RECORD SET SETS RUN-UNIT USINGOWNERCURRENT FIRSTLAST .PRIORNEXT DUPLICATE DUP USAGE-MODEPRIVACY KEY COMPILE RETRIEVAL RETR EXCLUSIVE 7EXCL PROTECTED PROT UPDATE SUB-SCHEMASCHEMA ONLY SELECTIVE MEMBER MEMBERS ?TRANSACTION TRNASACTIONS SUPPRESS CURRENCY STATUS UPDATES ERSTAT ERROR H-STATUS IF DBMS FOR WITHIN VIA INTO TO FROM IS OF IN . * - P+ @ w8
.L
S b2OFg ag S'a[. P $
"e I d"e\(
"ea" T#uHF T'J(F P ->Q 8X fR P -W_ T?r T@H{ T@H'' T@H'x @ "T@H)/ T@H*O P<(F {
YT$$
YT=_
YTvw
YU(` PAV @" kVa!X mVa"` rVa# hVa#s nVa$( i D E s E u P }
@ ;Q ecCT ;-_ j
r k;{ k;'' k;'x k;)/ k;*O P_F cD% cQ cQ c]_ c]b c_ cv# cvG dK dw d 6 &S5Z
@ Jd#
/O1
(lk
A(Mq
(Hf
# (I7
4ZZ
(B{
A(aL
J}G
B)*}
)4xg
8zG
B)fAS
K
"92
K[
C pD
pH
$+ZWZ
C?d
+Zk~
D pJ
" ,*p
K!]
D%3
.'^
. z .4D
DFw'
EH3
q<
# JcI
Jnx
E/@b:
/kx LR: 0rb
0se
Lw
1;"
1yd
F1%y
1' x
1Qtw
1Vr
KS[
Ro* 1reG
1s<W
F 1teJ
1u<V
r$
2= N
3-+
3
Kb+
G3
Kg
! 4\1
! ( ( Q (T6I(THH(Tu}"e\(Va#t 0 dw} H @!L ( H b @ @ @
@ H
>H 4H e "Q( ,~ , aZ` ^ < , _,~ @@ Z@@ @@ <
, <, R R b,~ (D @ _ @Q` @ _,~ 6@ + p b+@ c7 + #p @ [ @ [ "D
T* ,~ b+@ d`B@ + aB + d @ [ e @ [O@ ,~ , /6 + + (TT( Z @ 7@ Z+ + [X 1B + #0v <+ ), 4[\ 0B + Z @ 7@ Z **( "+ + % " QB\ b `+ ), /, }" [0B + ++ .7@ Z+ 1+ 40v <+ < ED
* V V R b,~ , 5[\ #1B + @@ + ( b@@ @ `R` @@ "*T* 3@@ @@ !,~ , }bTH f+ 7 <>, R a @ ]" f. e
<?, R+< ; ? *U*U ;+ A+ B+ E+ L+ O+ O+ P+ P+ Q+ Q+ R+ A+ 5 @ ] @ a * P* D, u+ 7
@ a ]Z ] 0$ 00d ==b G4b K/$ d =b G, u+ 57@ (T * L+ D @ a, u+ 5,~ + + + + + 7+ p [ [4B V *U
E* UbPL 5+ W=b T, + S @ a/" /B [* ["B \bP + ] ]3B _+ G+ K.
\ *U ] a @ [` a` a` a` a> a,~ 9p ` @ ^ ` @ ^ 9p ` @ _ "@( f2B` + LZ ^.` [ 1 + Q <X, ,~ _2B ]+ Z <], ] "
T n @ ] @ a @ 6 6@ + _Z` ] <c, _,~ 06 <,~ <d, "E** w 5` x, k.6 pQB\ - nX@\ yB `0B
@1B
`+ e,~ @@ Z: Z [dB *A(U* + r a @ Y@@ ,~ 6B 2+ }.
[., L Z <, j4@cP Z+ < , "@( * O@ [ @ Y,~
p _ ^p x H . c. dx "*
<, + , 4+ @@ , 5+ L Y @+ p Yp "T*U" Z L Z <, @ @Z @5D <, + L Y @ 3 (@*T* !+ #p p Z L Z <, <", s @ !5D # <$, (*@* *+ #x 6` + , <+, R, 7+ (, 6[ 0@
@@ + ( L Y @ (*E( 2+ )p Z L Z <, & @2 @ 5@ ) <3, )+ )x *T * ; <:, 9+ *+ ;+ *x x + p Z <@, ;+ 5p "D*U* C ] <C, + 5p ] \ [ @ \> \ <F, a: \+ ] \ @ ] (D"T
L+ ] B` R _ B` + gx bp _ e <O, mQ A`!" @ _ <P, E (E
( T _ @` _ @` Y` _+ ip P ^p ] ] <Y, a+ l x (
] \h X D @^ <^, + rp _ ]p ] @
P( e @X + } ~ ` Z Z g h p [ kx UT* np Z <n, B+ x 3Bg+ B Z <i, <l, ' @ [ZB [ *"* v <m, R0R + o <q, R+ p p Z3B + <z, 5 "U*( @ @6Z @15D <|, p+ p Z <, + p ] *U [: [ a @ [ <, a+ p D" `$y ``$y bY9S q)K> ub$ Q` HQ P
S fk} [8_ [DEP E e {+ P $( D $* bLCz tbM. TP 3 _3= bddm bdz bdz# bd$# Dbd& b}[~ E?} d` a_ b}u0 c?fg vS'a[. (U' 4(Ts D"(T t
NsE S(T )(T V (T6I (THH % D"(TT= 5(Tu- 6 (Tu} (Tv W(T{> 7-W! (-GH ,
jKM
jKM # D 1'~H 1'@
jLm P rf P $ fc^\$( ` |f D" ^h(S c^hG} /cwS qdsMx ds\w T 3
. +Bb k/x Z +]R D
"e\( d"ea" U"en2 ;T#uHF %
Zd% .= % i % ] Yd%
7} ( %
FB %
WY %
f+ 'F d(*-x d(*<w 3881t `8Hlg k `fR 9P -K! P<(F ki4 SM6H }SMk aY5= `{ /PAV " p Fg x
& uKD @KD}x cKld @Klx bRO x H ^U'\+ ^Vr eY]c" Y]g eROX2UY]g P ;z c)6 =j} fc)|. P=ll YO ael g +l h l#M < @ el2Y zel\2 /Ul )H PF rdK `er5 er^2 1H4Z
`4ZZ
O(</g
@ J}b O+F=O
?.nX /kx 3&+ };! G};! K?Fw E D"@<M3 Q@<R P Lw@ O Lwb OAjJ@ PD 7t ADzJ REp+z QG#X L H?~ BPdK+|Pdt*{W
~@ H V!o!?~@ h H @
~@ X H m{ @ X H mM\4'~@ H H mM\4'~@` H @:O ~@p H AsP @
% .=|7 H V!o$7~@8 H @
w~@0 H V!o$7~@@ H aW9_~@0 H V!o$7~@ H V!tD?~@ H @
~@` H ]uDE~@H H @_B,g~@P ( (
f 0 dYd H @ ( H0 B d f $ ( &H % D" $y $y
Y9S
Hf_@
}[~
}u0
]m S'a[. P $ Xx3m D Xx4Y D Xx^2 E ^\$( P {t |f wS
3 7 @
sMx
s\w +Bb 1 %T#uHF
% .=
%
7} T'J(F
(*-x
(*<w P<(F PAV
F ,h ( ( ' d7~ jn7 k
I 0 d7~ H @N
COPYRIGHT (C) 1984 DIGITAL EQUIPMENT CORPORATION
( H
(
H UNDEFP( (D : H A , P @ ,> ,> ,> ,> ,> ^ + ,^ ,^ ,^ ,^ ,^ ,~ -" ) INTEGER S YSCOM(44),ERCNT,ERSTAT
CHARACTER *30 ERAREA,ERREC,ERSET,RECNAM,ARNAM
- INTE GER SYSCOM(44),ERCNT,ERSTAT
INTEGER ERAREA(6),ERREC(6),ERSET(6),RECNAM(6),ARNAM(6)
} INTEGER DBKEY,ERDATA
EQUIVALENCE (SYSCOM(1),ARNAM),
1 (SYSCOM(7),RECNA "M),
1 (SYSCOM(13),ERSTAT),
1 (SYSCOM(14),ERSET),
1 (SYSCOM(20),ERREC),
1 (SYS *COM(26),ERAREA),
1 (SYSCOM(32),ERCNT),
1 (SYSCOM(33),DBKEY),
1 (SYSCOM(34),ERDA "D" 3TA)
H B H D H E H F H H H J H K H L (D" ;H L H M H O H P H Q H R H S H B H T "D" D H T H U H U H V H W H X H Y H Y (D"" LH Z H G H Z H [ H C -" + -" @@ @ @@ (D"Q U <\, 4@_, 4@b6 + [ @ , y <d, <i, 4@l B 8 **Q ] @ <o, 4@ [
8 <q, <u, <y, 6@ + {+ } *( f6 W+ j (` h B , y < , Z, 6@8 + <, 4@ @ < "*U( n, <, O@ 7` + + <, o, @@ , G < , [4@ y B cL8 *U*T
w+ t, N < , n+ t7 f7@ + {, j < , u4@ B cL8 + { <", n *U*U + { <#, r <%, >@ + .7 y+ 2 <4, <5, n& <7, O *Q*" + <7, @ + <8, |4@ @ B cL8 + :1@ + = <@ *U U* , n <A, 6@+ D"F,> ,>8 ,>8 9 @ : @ <G, 4@$ B "A"U( cL8 + "F 8 Q A` <J, "K , _, <L, 4@ B cL8 (U*E* !+ 8 @ <O, + 8 @ 9 @ ,^ 4N-, V5@- X7@ p+ , *U U *@@ <P, {+ - <R, {,^ ,^ 1B + U <Y, 4@E B cL8 + / <\ *T"T* 2, n <], /4@/ <`, 4@bcL + 3 <e, 34@3Z <h, 74@7 B "D*E( ;7@8 + 9 <j, 4@l B <n, Z5`p4 91T + r <u, 54@w B cL8 *U** C+ z, + 96 + , {+ , V4@|7n + N7 E6@ + L <, iO@ *P
U" L, V X <T, {,~ ,> 7@8 + U7 I6@ + S <, KO@ 8 , V X *"@ T <T, {,^ ,~ <, <4@ B <, Z,~ 'p Q&A` 'p Q&A` "*" ] 2 + _ 2 O@ 6@ + 1h 6@ + , , p,~ @@ 1R^ *** e+ <(, <,
Z@ Z @ ,~ J @ K @ ,~ Q n 'p Q&A` 2 <, <, @ <, 1Re,~ 5@Z 8 @ *@(Q
v, y @ R ,~ <, f,~ 7@ + !p @ !p @ 4B' *U(E <4, #5p5+ ; <%, <?, ,~ 6 P,~ <A, R,~ #p Q"A@ p D p @@ @@ 4F 1F O@ .& F 3$ 9 ,~ @Ap !p Q A@ ( #p * Z 1F + /& F >` =d,~ @@ 6 : 0B6@5pD 8 (T "E0b 4@G+
H O1@ " 1@ " 1@ " 1@ " 6@)0@ 7 + 2 *A( !, : <P, {,~ 0d + R <T, {,~ " , : <P, {,~ 0d + W <Y (P** ), {,~ <Z, {,~ " , : <P, {,~ 5b2 " , : <P, {,~ (U T( 2@@ 8 D <#, z <\, {,~ " , : <P, {,~ <T, {,~ 8 *Q :& 6@ .$ 1d ,~ 6 + ] D <#, 4Z . @ ,~ * INTEGER D CBNULL
SYSCOM
CALL SBIND( CALL BIND( CALL EBIND(0,DBNULL)
*01 K* 02 ' INTEGER CHARACTER REAL REAL*8 COMPLEX COMMON INCLUDE ' T(2 (6 30 / .SUB'
.SUB/NOLIST'
0 , ,0, ) .
` *@"" \ X X p <^, + x <a, `+ H 5 : "T U e : K Kx v` g X h hx <l, b ( m+ h np h r P *T(U
v t @ F Fp A x G <z, d+ fx H <}, { (*P* ~+ fSYSCOM H : : K K x <, m+ h "A(@
nx < , + 7B + 0b " B 8 @ @@ < *DQ* , ^4@ + kx x h 4 Px <, + rx *QT <, + rx ` g X hx 8 ` g *@ X hx 8 x 3DBNULL h $ P ` *E(* ) ' '`
Nx <(, ? <+, <-,
+ "T
1x 7 <2, ~+ x Px wx 6 ` g X 7 (*T : h $8 00001 p 6 ;6 + / <<, + /x 8 h 8 (U " B Op 6 <C, ?+ <8 ` g X F hp "
K08 ` g X K hx h < E Xh ; D X "U*A* Sh ; I X, V5@/ X <T, {+ / ` g X X hx P* \ 8 ` g X \ h p _ hx <b, 0+ "T
P d` g X d h ` g X g hx 8 x <k, c ( *U m+ p 8 8 p <o, l+ 9 X <T, {+ 9 p t (T
u hx <v, q+ p <y, w+ 9x <|, z+ *T ~00000 p 6 ~P 6 ~ K : J :x x < **T , }+ p 8 8 @ @ + c, d, O@ ,~ p *T(Q , p5@k <, + kp Np x h UU p <, + ` ' O@ ,~ p "*E* x p ` ' 'h O@ ,> *U*E* ( @ < , /,^ < , ) K @ <!, +7@ + P <#, . Z @ *T*U* 1 G @ <%, -+ h P <#, / Z @ Y7@ *T*E( 9 G @ + R` 7@ + Z @ + ` P Pp K ( * B $8 x B <C, E+ 8 x <F, + # ( % *U*
J * 8 , . 608 p ; p ; C<Q (*A" S, {,~ p ; Ip > I <V, {,~ p = Ip ? I "A [p < 6@ $ .D > ,~ D P$y P$y #M/i #M/i RF]& RGg Pr #7% 3#7& 7 #7& 9P
I T3mR L bDH6 cbHfX@ .Hg7 Hg8w <RK0J! D" bKK LD,} ybLCz 6M X @M + ?M^e M,- P U8 d@ P D Ub P^ g u- R\}= ]?u# 3bu- 2bu; ,bu< .bu= 6 D"^t[: 8^u
d7~ ReB1[ OeC GhWM h9|! ,"G 7R|g DP @Wr ?M- Bbf P Vjs H
3 7
2Q +]R T"QqM +^a 8 +^a 9(Y#M )8 Md<*z rT@h ?c~* P<(F P g TQ`g Dj>5 SQ^l$ NlK UTY9*# YE3 H]& Idi~/G Fdi~i D * "PAV Tp-g PMwr dr:^+ U\R% L\R5 Nty g Gdvvc? 3
y1G
@ O { 2 2 4ZcA ,4ZcA - D"4ZcG $4ZiG E4=|! 77G =). >4zr 4|[ Ve5
& P 7RH P8- U9NU U9N:C P83# U9PU U9P4C P8&c U9L: U9Lg U9LU P8'r U9L@C U9LS# ;,! /;R8 Np[} eL O7 7Y K D" MP| ZP! A- CP60 E A/ DPx Pw UR b URf - FURO+U H kJ Vkg Yz? dZ
-
Z% 4G fwg s/YK yVWA " V"= V$7 VC k{9 k~ {f jf
I Q kKj [f _
F df!ic? 2Vx?h- PcD#wW7&3xPd3[vP Jq ` Jy* ` Jy3 `4Z pg(</g pg+F=O t ` K1T ` K> ` KPk ` KPo ` KPp ` KW ` KW ` KW ` KW ` Kij W.}P i%~P Hw|W0UI{P I@*|WHp{ H V!t0G~@Hh H m{ @ H V!i~@C H mM\4'~@B` H V!liW~@A` H V!t0G~@@X H V!pi'~@?@ H V!fIG~@? H V!t0G~@>h H @//~@>@ H V!i~@=x H V!t0G~@=8 H @= /~@<p H @6G~@<@ H V!t0G~@< H @:
3 7 | H @
3 7 |V!g/~@1 H `S1w~@0p H V!g/~@0H H AAVw~@0 H AAVw~@. H AAVw~@-x H V!t]~@-@ H @:r?~@- H laYvw~@,P H V!pi'~@, H V!h/~@+h H laYvw~@+p H laYvw~@+@ H m{ ~ @ ( ( 8
IQzc? sbHi~ i~/Gi~ivvc? k3!ic? 0 sbH H @$
COPYRIGHT (C) 1984 DIGITAL EQUIPMENT CORPORATION
(@*@ H H 1 "* ,~ H 2 H 2 H 3 H 3 " O@ @ + " @@ *** @ + " O@ @ + " @@ @ ,> " @@ @@ , . (U U* < , 4 6@ + 4, '+ ,> )p , '+ < 8, < 9, < :, (U R` ,~ < <, < =, R` ,~ ,> )p #p , !+ ,^ ,~ @ "E*@ " @ @@ @ < ?, 4 , '+ $Z & 6@ . X@ +@ *7 + @ S @ ,~ Q _ w#` .\ .< *"w,~ )
1 U" 3
, ! " , ! R` + x p p A
U ;p p P 1 1 "P D 8y1 8ze $
8
I 81 'R87& P $( HEx bHY\ %M>H D
Qzc? sbH }
}
8H S'a[. P rf P $ +]R T#uHF % t %
A T'J(F (m !P<(F SM6H ~\/ D" l i~
i~
i~/G
i~i
i~o& PAV P_= Tu^6N
vvc? 0 1 e5 @ ex
= Ul )H Ul )\ PF j[ f jf
k3 k9& !ic?
@ 78e 75 P Jq WD,M~ H k(8_~@X H k(8_~@@ H k(8_~@( H k(8_~@ ( ( B dN r5 0 dN H @'T
COPYRIGHT (C) 1984 DIGITAL EQUIPMENT CORPORATION
( H 0 " H
( D" ,~
H L H L Q X _ e o u "D" }
'
- 6 = E L R Y ` f n "D v ~
& 9 #"` + & & + 0 1 5 : ? C (D(P" * D @ @ @
, F6B + '9 #
' .& 9 # @ <+ "" 3,
&
.& 9 # 2" + -Z @ Z @ </, + A,> ,> ,> U ; , ,^ ,^ ,^ .& 9 # ! @ <3, 9
& .& 9 #: 9 # "E(U( D: 9 #
& ,~ <6, 3
&
<8, @ <;, A
& L
&
& ,~ L; %DMLXIS. EXTRA INPUT|SPECSARE}IGNORED. | M %DMLXOS.OEXTRAD UOUTPUTISPECSEAREEIGNORED. | S ?DMLFSU.MSYMBOLLAFTER "FIND"EISAUNR ]ECOGNIZABLE. | Z ?DMLELW. ENCOUNTEREDM[ ]WHILE " f| a~ d %DMLASI.EALLMEANINGLESSSWITCHES AREDIGNORED @ n. | j ?DMLWCD.NWILDCARDING IN OUTPUT?DIRECTORY. | q w ?DMLPAU.PHRASEbAFTER "FINDDIDENTIFIER"OUNRECOGNIZABLE. | w " [DMLSUM. ERRORSDANDS HWARNINGS.] } ~ (@ ~ } %DMLNIS.SNOIINVOKEPSEENOBEFORENFIRSTEDML STATEMENT @ . | ?DMLOIA.FONLYRONECINVOKECALLOWEDLPEREPROGRAM-UNIT | ( ?DMLSTL.-STATEMENTETOOILONGOORI"."CMISSING. | !%DMLLSN. STATEMENTENUMBERNGREATERTHAN99999-- TRUNCATED. | ! %DMLL @ *TL.ELINE TOOSLONG. | )~ + %DMLLSE. LINE SEQUENCE NU D 2MBER NOT FOLLOWED BY "TAB" | 0~ 4
?DMLDUP. DATA BASE N A !AME MULTIPLY DEFINED | } " + B
@ @ **A* ), F+ /` + @
7+ 6 P . (UT( 2 ` < `
+ 5` d "T :` < D v#6 Pw8 ! e# P {& 1 {& 5 {' : {' ? D" {( C {( DDFL2 &bDH6 IbLCz F d@
d4L
d5-
d9" D"
d?g
dA"
dH9
dM(
dN
dN1
dTS
ddm
dfM D"
dz
dz
dz#
dg
d
dJ
d!
d !
d
0 D"
d+
d#
d$#
d%m
d&
d&
d<+
d>
dCJ "
dDB {pw ]a b]m C^?& c? HS'a[. P $ +d%
7} '%
`w FT'J(F d(*<w . " P -o P<(F >2 C?Td #C>=
%C>KG EC>vJ dYT=_ ]/
] &w PAV u^v
& 2= 0 1 1 P V D P ;z ex
= ex
,
Ukn- el g 5el2Y 6el\2 -Ul )\ PMF @ Ur < H b\'~@' H eMG[w~@' H @
%
7}|( H @
% .=| , ( ( =