Trailing-Edge
-
PDP-10 Archives
-
BB-4148E-BM
-
sources/cmlvok.rel
There are 16 other files named cmlvok.rel in the archive. Click here to see a list.
d7~ jn7 k
I 0 d7~ H @O$ ,> ,> ,> ,> ^ + ,^ ,^ ,^ ,^ ,~ -" =
01 SYSCOM.
02 ARE A-NAME, PIC X(30) USAGE DISPLAY-7.
02 RECORD-NAME, PIC X(30) USAGE DISPLAY-7.
02 ER ROR-STATUS, PIC 9(5) USAGE DISPLAY-7.
02 ERROR-SET, PIC X(30) USAGE DISPLAY-7.
02 E RROR-RECORD, PIC X(30) USAGE DISPLAY-7.
02 ERROR-AREA, PIC X(30) USAGE DISPLAY-7.
0 "2 ERROR-COUNT, PIC 99, USAGE COMP.
02 DATA-BASE-KEY USAGE DBKEY.
02 ERROR-DATA PIC " *9(10) USAGE COMP.
H y H | H ~
H
H H H "D" 3 H H H H
H H
H (D" ;H H H H H H H H H "D D H H H H H
H | H ~ H L -0010ONLY O H -0011SELECTIVE S H -0012FIRST W H -0013LAST [ H -0014PRIOR _ H -0015NEXT c H -0016DUP g H -0017ALL k H -0018AREA o H -0019RECORD s H -0020SET w H -0021UPDATE { H -0022RETRIEVAL H -0022RETR H -0023RUN-UNIT H -0024PROTECTED H -0024PROT H -0025EXCLUSIVE H -0025EXCL H -0026CURRENT H -0027SHARED H -0028JOURNAL *(@ #-" < , @ <", <#, & @ Q K * W T @ <%, + ("E ,-" @ <', <), N D <+, N D <-, N D @@ </, (D* 44@3, 4@56 + : @', @ <7, , <=, 4@@ B 8 @7 (E(U = <B, 4@:
8 <D, V6 6+ D (`B B<, @ <G, 9, 6@8 + Q (T*A* E <X, , ]6 @+ I@@ , <Y, :4@N B cL8 + I, <\, 0+ I *U U* N7 G7@H+ P, D <], I4@T B cL8 + P <`, 0+ P <a, F7 N+ b *AT" V <d, U <e, 8 <g, O + <g, Y@ + O@ <h, P (
@
_4@ @ B cL8 + ] j1@ + m <p, 0 @ @ <q, W6@U *T
g+ t"v,> ,>8 ,>8 2 @ 3 @ <w, ^4@z B cL8 + l@@]"v Q
T p 8 Q A` d <z, "{ , ., ] <|, l4@l B cL8 + t 8 @B *U(
x <, f+ t6@o+ c 1+@j 2,@ ,^ 5N,^ ,^ 1B + c<+ +<, 4@ *A"* Q<, 4@"B 7@8 + < , 4@ B <!, (5`$4@ .<&, 4@' U*Q* B cL8 + +, ]+ 6@g+ ], O+ ], 54@-7n + 6@N+ <0, C *TU" O@, % <2, A,~ ,> 7@8 + $6@+ ! <4, O@ 8 , %, *"@ #,<2, A,^ ,~ 7<7, N <W ( D M, K,~ #p Q"A@ p p @@ @@ 4F 1F
^ @ "v {. `^=b` Z @ 0Z6@H5p\ 8 "]0b 4@_+
` & C (D*( g g1@ & ;1@ & <1@ & = <h, A,~ <i, A,~ <k, A,~ 0d *E
( o+ q <l, A,~ <n, A,~ <o, A,~ <q, A,~ <r, A,~ <t ( x, A,~ 01 DBMS-NULL PIC 99 USAGE COMP.
DBMS SECTION.
ENTER MACRO SBIND U SING ENTER MACRO BIND USING ENTER MACRO EBIND USING 0,DBMS-NULL.
01 02 " PIC S9(10) S9(18) X(30) USAGE COMP USAGE COMP-1 USAGE COMP-3 USAGE DIS PLAY-6 USAGE DISPLAY-7 USAGE DISPLAY-9 USAGE DBKEY (1) OCCURS 02 F ILLER PIC X(1).
OF 0 , ,0, ( p x ! @* " Xx " ` C D $x - h ( +h *h (` p <2 ""E 3, + [x <5, 3+ [H . 3 3 E Ex UP <v` ; ; <x <?, 6+ [ h Ap
D SYSCOM H 3 3 E E Ex <K, @+ [ * Mh Ax <O, L+ [7B + K0b " B 8 @%@@& *QT U <M, =4@P+ Ex ` ; X <x 8 ` ; *@"T ^ \ <x 8 x ,x 0 <b, .+ Vx Jx w "(* fx f ` ; g < $8 00001 p / k6 c+ <l *E o, M+ x 8 h 1 Ip / <s, o+ h<8 ` *P w ; v <p 08 ` ; { <x x *Q*U" A < , G+ {h 7 < , %5@~ <, A+ ~h > *U U , %5@ <, A+ ` ;
<x 8 ` *P( ; < p <x <, P+ [ ` ; *(( < ` ; <x 8 x < , + [p 8 U( " 8 p <#, + p % < <, A+ p "P*" * <*, $+ x <-, ++ [00000 p / /h 5 8 (U(( 3 P / / E 3 D 3x x <8, .+ [p 8 * ; 8 x p h p <A, 9+ ( D ` C Dp p 4 U <I, + Ex T U( L ` C Lp @ PL <M, @ <P, J+ Gx I "@* Ux Ex p B O@Q & + S$8 $8 x ? <[, u+ d *U* ]8 x <^, B+ [ f l o m e e q e e w s *( f t v08 p p 8p :p 9p 6 ( E n 8p ;p <p =p > P$y b#M/iP$yP$y b#M/iP$yb#M/i Qb#M/i IRF]& RGg Pr D" b$ 5#7% #7& #7& )a] >P
I XT3mR F RK0J! bKK \LD,} @ D" bLCz RM^e QM,- NbM. 7 d@ J U `5Ha 9RP^g `5HaRP^"g D"bP^y2 L` u- X]?u# ,]Hqs -bu; sbu< tbu= v^t[: w^u
d7~ , ceB1[ IhWM h9|! t ,"G 0R|g P @Wr ?M- ?bf VP Vjs D" cH
cKx7 cK| S'a[. P $ S]og S]o) c^hHn +cwS md
3 7 T{SG X{}* T|*. |/" K " J# A +]R T"QqM +^a 1 +^a 2`Q^l$ lK $TY9*# D" d]yw z]& Cdi~ Jdi~/G di~i \ * j?H @PAV Tp-g D"PMwr dr:^+ 4\R% \R5 ty g dvvc? c
y1G = N
HO A 1 " 1 2 2 4ZcG z4ZiG 4=|! l4zr ]4|[ %e5
& r P8- U9NU U9N:C P83# U9PU U9P4C P8&c U9L: U9Lg U9LU P8'r U9L@C U9LS# ;,! ;R8 H`#)- p[} eL O7 D eL E1 7Y EMP| (eP! ePx UR b URf URO+U H Z% -f4G [fwg : D"P =} i 9i 8j :!y 8 =}; ; =}< < =}= =/YK N @ k{9 T k~ Pf jf
I # kKj :f!ic? SVx?h- PcD#wW77{ zW7 rW7"%3yW7&3xW7(cI{W7*vyW7*wtW7.pvW7.Fu W7.}OtW70 zPd3[vW70$*rW74J]uP Jq ` Jy* ` Jy3 `4Z . @ g(</g 2g+F=O :` K1T ` K> ` KPk ` KPo ` KPp ` KW ` KW ` KW ` KW ` Kij W.}P i%~P Hw|P I@*|P kR~WHp{ H APW~@N( H APW~@N H APW~@Mx H APW~@M0 H APW~@M H V!t0G~@Kh H @ |b H Uo/~@K H @CY
~@Jh H mO7~@J H mO7~@IX H R U}~@I` H @mZ O~@Hx H @CY
~@I H oX H m{ @'h H V!i~@H H @CY
~@H H mM\4'~@Gp H @CY
~@Gx H R U} ~@H H @
~@G` H m{ @&` H R U} ~@GH H m{ @&8 H @ 5Ha |2 H V!t0G~@G H V!pi'~@EP H V!fIG~@E H @CY
~@E( H @//~@DX H V!i~@D0 H nVm<~@D8 H V!t0G~@Cp H @= /~@C( H @6G~@Bx H V!t0G~@BX H @:
#M/i ~@?p H @/7~@?8 H @CY
~@?h H @ 5Ha lz H @:
~@> H @
P^y2|e H @ 5Ha|e H @:r'~@<x H qf,a_~@<X H @:q?~@;H H @:q ~@; H @
3 7 |Q H @
3 7 |S H V!g/~@9x H `S1w~@9X H R U}~@9` H V!g/~@90 H AAVw~@8x H o
#M/i ~@8( H AAVw~@80 H V!t] ~@7x H @:r?~@78 H laYvw~@7 H U o
3 7 |2 H `S1w~@5X H @=~~@5` H @ '~@4P H mMb g~@4 H m{ @ H m{ @@ H m{ @ H m{ @@ H m{ @ H m{ @@ H m{ @ H m{ @@ H m{ @ H m{ @@ H m{ @ H m{ @@ H m{ @ H m{ @
@ H m{ @
H m{ @ @ H m{ @ H m{ @
@ H m{ @
H m{ @ @ ( ( u