// JOB DCON20
// DVC 20  // LFD PRNTR731
// DVC 30  // LFD READ171
// DVC 40  // LBL DISC$TODISC$$ // SPL HOLD  // LFD PUNCH051
// OPTION DUMP
// CR
// IF ('&GDVC1' EQ 'X')UETAG
// DVC &GDVC1  // VOL &GVOL1  // LBL &GLBL1    // LFD E2$DC&GDVC1
// IF ('&GDVC2' EQ 'X')ET0
// IF ('&GDVC1' EQ '&GDVC2')ED3
// DVC &GDVC2  // VOL &GVOL2  // LBL &GLBL2    // LFD E2$DC&GDVC2
//ED3 NOP
// IF ('&GDVC3' EQ 'X')ET0
// IF ('&GDVC2' EQ '&GDVC3')ED4
// DVC &GDVC3  // VOL &GVOL3  // LBL &GLBL3    // LFD E2$DC&GDVC3
//ED4 NOP
// IF ('&GDVC4' EQ 'X')ET0
// IF ('&GDVC3' EQ '&GDVC4')ED5
// DVC &GDVC4  // VOL &GVOL4  // LBL &GLBL4    // LFD E2$DC&GDVC4
//ED5 NOP
// IF ('&GDVC5' EQ 'X')ET0
// IF ('&GDVC4' EQ '&GDVC5')ED6
// DVC &GDVC5  // VOL &GVOL5  // LBL &GLBL5    // LFD E2$DC&GDVC5
//ED6 NOP
// IF ('&GDVC6' EQ 'X')ET0
// IF ('&GDVC5' EQ '&GDVC6')ED7
// DVC &GDVC6  // VOL &GVOL6  // LBL &GLBL6    // LFD E2$DC&GDVC6
//ED7 NOP
// IF ('&GDVC7' EQ 'X')ET0
// IF ('&GDVC6' EQ '&GDVC7')ED8
// DVC &GDVC7  // VOL &GVOL7  // LBL &GLBL7    // LFD E2$DC&GDVC7
//ED8 NOP
// IF ('&GDVC8' EQ 'X')ET0
// IF ('&GDVC7' EQ '&GDVC8')ED9
// DVC &GDVC8  // VOL &GVOL8  // LBL &GLBL8    // LFD E2$DC&GDVC8
//ED9 NOP
// IF ('&GDVC9' EQ 'X')ET0
// IF ('&GDVC8' EQ '&GDVC9')ET0
// DVC &GDVC9  // VOL &GVOL9  // LBL &GLBL9    // LFD E2$DC&GDVC9
//ET0 NOP
// IF ('&GTAPE' EQ 'N')ET4
// DVC &GTPDVC1  // VOL TAPE0(NOV)  // LFD E2$TAPE0
// IF ('&GTAPE' EQ '1')ET4
// DVC &GTPDVC2  // VOL TAPE1(NOV)  // LFD E2$TAPE1
//ET4 NOP
// IF ('&GFLTYPE' EQ 'SQ')ET6
// IF ('&GFLTYPE' EQ 'IS')ET6
// IF ('&GFLTYPE' EQ 'DA')ET6
// OPR ' UFLTYPE KEYWORD MUST BE SQ, IS OR DA'
// GO ETAG
//ET6 NOP
// IF ('&RETYPEA' EQ 'SQ')ET7
// IF ('&RETYPEA' EQ 'IS')ET7
// IF ('&RETYPEA' EQ 'DA')ET7
// OPR ' RETYPE KEY WORD MUST BE SQ, IS OR DA'
// GO ETAG
//ET7 NOP
// OPTION SUB,SCAN
// EXEC DCON24
/$
A        01                  01CD
A        84                  0149
&GDVC1&GPFMNT1&GVOL1  &GPFPU1          &GLBL1                                  2
// IF ('&GDVC2' EQ 'X')ET2
&GDVC2&GPFMNT2&GVOL2  &GPFPU2          &GLBL2                                  2
// IF ('&GDVC3' EQ 'X')ET2
&GDVC3&GPFMNT3&GVOL3  &GPFPU3          &GLBL3                                  2
// IF ('&GDVC4' EQ 'X')ET2
&GDVC4&GPFMNT4&GVOL4  &GPFPU4          &GLBL4                                  2
// IF ('&GDVC5' EQ 'X')ET2
&GDVC5&GPFMNT5&GVOL5  &GPFPU5          &GLBL5                                  2
// IF ('&GDVC6' EQ 'X')ET2
&GDVC6&GPFMNT6&GVOL6  &GPFPU6          &GLBL6                                  2
// IF ('&GDVC7' EQ 'X')ET2
&GDVC7&GPFMNT7&GVOL7  &GPFPU7          &GLBL7                                  2
// IF ('&GDVC8' EQ 'X')ET2
&GDVC8&GPFMNT8&GVOL8  &GPFPU8          &GLBL8                                  2
// IF ('&GDVC9' EQ 'X')ET2
&GDVC9&GPFMNT9&GVOL9  &GPFPU9          &GLBL9                                  2
//ET2 NOP
// IF ('&GTAPE' EQ 'N')ET5
&GTPDVC1  0                                                                    4
// IF ('&GTAPE' EQ '1')ET5
&GTPDVC2  1                                                                    4
//ET5 NOP
                                            A002                               6
// OPTION NSUB

ص簵 0K  K    K K uK     m   K
}   &$ 9K  0   

}+ &$    n+#{ nN&{ nX&#00< 0 K { ;r J 
TXT          KN+جHn {n جr 	0{ؕ  rn      002
TXT   O       ֢ؕؕ=0} k0kaN	 7=ؕwwka    003
TXT         0}N  K֥ kaN =N  =k ak 簕    004
TXT          N أn  ؕ=y0n k a=kaN  =k     005
TXT  =       ذ   ج  {n  0N  ka=Kk K    006
TXT         kaNإ N =N=k aNأ2N    007
TXT         =n =k K 2 #k n  0 =0=    008
TXT         K
KkF
0 k  0  S簕{K   k k     009
TXT  ;        S K sK K    K    K    k     010
TXT  o       K 	 k  簕{K0 N k aإN =    011
TXT         N! =n ;ؕ=n ؕ=E2 4ؕ4 r  y =    012
TXT           F =;E2 4;n =K 4      00n  \ k     013
TXT          \ 0} N#} ؕâ} O} {r  0;\  }\ 0        014
TXT                                                                    015
TXT  :                                                                  016
TXT  =       r 0= 
n+#nE&إ h0w 
0}      B',//      017
TXT          	      R41Ju    R52K  R62bK   R72c L    018
TXT           
                                                        019
RLD                    H    M    \                        020
TXT  4          ASSGN SYSRDR,X'8000',UA SYSRES,D4D3    
n  }       021
TXT           &ةr 0&      
 ة-  ة-a ;  0    022
TXT          F                                                          023
RLD                 -                                                    024
END                                                                  BIP4351
// ASSGN SYSRDR,X'100',R4                                               BIP4366
// OPTION SUB,SCAN
// ASSGN SYSRES,X'80&GLIAPU',D3                                         BIP4401
// OPTION NSUB
TXT   m        y                                                        025
TXT   s             0      !>qh 0U0                   026
TXT                                                                     027
RLD                 o                                  028
TXT   O                                                                  029
TXT           j^ ^                                                 030
RLD                      \     S     U                            031
TXT         H                                                          032
TXT                      {^                                           033
RLD                                                                     034
TXT                                                                  035
TXT                 h                                        036
RLD                        <    +                            037
TXT          a      a      a       a                             038
TXT                                                                   039
TXT                                                                   040
TXT                                                                   041
TXT                                                                   042
TXT                                                                  043
TXT                                                                  044
TXT  <                                                                045
TXT  +      h                                                          046
TXT         C                                                        047
RLD                        <    +                            048
TXT  &                                                                049
TXT  q       aC                                                        050
RLD                &                                                    051
TXT        q                                                          052
TXT         a u  y 0 \ } { so	 }\ \ \ k m }    053
TXT  Q       k } } jج 0r 0 0 K } 0n0 j- !0n     054
TXT         0 d }0 }  0 K } 1 |0 (\+ 0@  k0S+      055
TXT         j }K } k } j  o{}K}  m} o }k 0 0    056
TXT         k 0 K k 0\}{a  n j OFn  j k     057
TXT         \ 
00j 02n   0 K 
  
 0    058
TXT  0        n 0 }0 N  } 1 |0 (\    0<  n0     059
TXT          &0 m7 mjج&}nڬ   0K } 0 0 r 0    060
TXT  -                                                                 061
RLD                   w                                        062
TXT  %          W	                                                      063
RLD               >                                                064
TXT  b                                                                  065
TXT  "      0         } :w } : }                                   066
RLD                h                    k    m    067
TXT  q       :  "              / A O }                068
RLD                o    q        y        {    B    069
TXT  F       O  <                                                      070
RLD                D    F    H                                071
TXT                    %                                            072
RLD               M                                                073
TXT  S          % \ 0\o  mk  k0	ak  zkr	!K	 4  2 2     074
TXT              k  k  O(\ K	  K  \s \Q(\ FN      075
TXT           %9   4  Ӣ\ bN  T > \j  m    076
TXT          	j  & o
	j   j   B  K 0k0 zj   	0     077
TXT   B       n 	> 	n  	d 0(\%(\ 0 80	k	!m 	)j     078
TXT           	 o	)K 0N0   	 K   	o	)({ {%.{}     079
TXT  	        {K }  K } ZK } XK } j}	!o	)r    0({     080
TXT  	       0u(\K ~(\ m0 -n 	qn0 	k 0 (\
%(\     081
TXT  	s       n  :K[0(\ 	F.}0 :K n   	\K    082
TXT  	       K0  j  \  n 0	K0 {0{ b {00	n0   	m    083
TXT          r                                                           084
RLD                    	=    	                                    085
TXT          K k  0 B(\ {n" 	q k0 K0	 K  :r     086
TXT   +        i0 4  (\  h 4k 	a0 :\\ K	 \ }k0 C(\ (\+     087
TXT   f       + 0   Bk {  .}(\ j  X qk  C    088
TXT          0+0+m 0(\ K	  4j0 z\ 6k 0 n    6K0     089
TXT   6       \0\ 0 9\  4K0\ \    090
TXT         (\ hK \ k  r   n 0\\ }ج  \ K  k?    091
TXT         1>|r   0 j} mj k?0k?0j  \j    092
TXT          \j n|0\ K 
 m
n 
0\                    093
RLD                                                              094
TXT  F      F K O8r  0 B                              095
TXT  U      (Fr   h    @ d  m                          096
TXT           (Fa     K o   
}      n k     097
TXT            \ +nN  FnF  nE  hnX 0 0       \    098
TXT           } 0 K \  80 (\ m [\  0 0  0  2   0     099
TXT          K\   \n,0  o0 [8n  (h \  Qm                   100
RLD                                                                     101
TXT   Q       
0} @                                                     102
TXT   Q       0                                                          103
TXT   \        0|
  r }   0
     0   
r a     \ kK    104
TXT           o  0r J8r }8     	    y  J  	- &  Q 1        105
RLD                                                    106
TXT   <        9                                                         107
RLD                      <     +     &                      108
TXT                                                                     109
XFR                                                                       110
TXT   k       \ UK 2K                                              111
TXT          K	 W ({   o  m{ j  j  j   4j }j      112
TXT   Q       j  j }                                        113
TXT          r 	0                                                     114
TXT   4       j  }(\   0o }K	  W0 j{                 115
TXT         kn 2  j} 0                                    116
TXT          n{ <j   kj  m Y{{ .{ Y{;j     117
TXT         0({  n 3  3L({ an* 3 b({   3L o0    118
TXT  y                                                                119
TXT        j XH({ 0H                                          120
TXT         ({                                                       121
TXT  B      ({  n 3                                              122
TXT  }      (\    ֳ 2K                                            123
TXT  \       (\                                                        124
TXT  W        \  - j  X k  \k0 \0            125
TXT         0\j  m 0uK{ (\0 j{j {r      126
TXT  +      0                                                     127
RLD                        !                                    128
TXT  -       0                                                          129
XFR  -                                                                   130
TXT  Q      \{M !
                                             131
RLD                Q                \    S    U    132
TXT  Y          4
%                                              133
RLD                W    Y                0    2    134
TXT  6        JOB  LOG  NOLOGPAUSEASSGNDATE EXEC CONFGUPSI VOL  FILE    135
TXT         SOPTN DELETDSPLYUDATE          TPLABDLAB XTENT     136
TXT         0123456789ABCDEFSYSR S R RIPTOPTLST LOG L1 L3a R4    137
TXT         R5R6bR7c P3aP2     &-̰y                    138
TXT  O             
           $  f g     d                    139
TXT            Q8*                                              140
RLD                4    6                              141
TXT         @mC                                              142
RLD                                                      143
TXT           (                             b >m                  144
RLD                                       <     +     &    145
TXT                                                                   146
RLD                                                                 147
TXT                        // X'UATES P                              148
TXT   o            {6k 'm 
X(0 m 5k #N c 
    (0 s    149
TXT          
9
k #n @n,     {6\  0 }\ N 0 
0    150
TXT  
        
f\ 0 6}6
k& #n @k  #\ k #j
k  #j
    151
TXT  
         (0 sj0

k  r %n   m 
mլ
0
o0

9
n     152
TXT  
       @n, (0 S 	 2  (0 K  * k;j &
k;2     153
TXT  
       (0 K ) k   0  \F0F\M K  0 .}  
D}     154
TXT  
W         (0 K m   (0  K  mK K  K *o
2    155
TXT           m2  2 0 
9
n  @n .@0F\  m ?}>n1\     156
TXT         * .\F  \   }>o  0 
9
n @n  @\y\ d    157
TXT         n \ N\ K  \0 x1216 24{32                     158
RLD               
d    
h    y                                    159
TXT         m"
0 jج
 oج
(0 s0 (0 r  0 k #j
  
9
    160
TXT  0       k  #n K	o
0 m٬
k #j
(0  \k*\ 0      161
TXT           K	0   k  K   <k 3k  (0 0 F   0  
9
N     162
TXT   -       @k #j  o 0 k k (0
H } j} }} n} @k #    163
TXT   q       
n @} .}  } N  Bk k00n k0 n     164
TXT   }        UK K 0 (0 S  2 (0 }D } (\ y     165
TXT          j     } .}F  0 REW             2k	     166
TXT           
9 n, } Sk } Ka}} K}c} k   { (0 D    167
TXT         (0 0K DK  q0
k #n @n Kk0k      168
TXT         (0                                                        169
RLD                 Y                                      170
TXT         k k0 n  n, @F0K o K k (}  K  o0     171
TXT  4         2K B kE'K  (0 s(0 sK   k0 { (0 D (0      172
TXT          k0 } S }2Kf} }k  k   %k0.n}'% K
       173
TXT         (0 s0  dK   (0 sK  (0 sk0_k0$n}  n1}e    174
TXT         n3}fk k .0 Uk0K } K
}k \(0 K    175
TXT  M        \(0 K
 /\} n}  {   K{ 0  .\Mk  k^    176
TXT           (0 k k K /{ dK }!}$n3}f  k k .3 }!k      177
TXT          N}- \}*(0 K /\};(0 K  /\}-(0 K  /\}    178
TXT   @       (0 K /}K(0 sK  .{F0  K|} }n3}f k {    179
TXT          M.}0  K  (0 s(0 sk k  k _k $k .K  B0       180
TXT                                                                     181
RLD                                                                    182
TXT          FILENAME  EX-DATE  SYS  TYPE  CYL HEAD TO CYL HEADNO LAB    183
TXT          EL FOUND                                                    184
TXT          kE'(0
Hk 'j}  } }  }} n} k #
n @n     185
TXT          K } }} n}  k} .}  } o0 X0 o0 T0 k.	    186
TXT          N ( 
9n' k<	   YSn'    m  T(0      187
TXT   O       }.}Y} k(	} K } K }\ }0 (0 r .0U{    188
TXT         k0 bk	N @k	n 
9n' @n1@  Yn' @n,    189
TXT          @W  @n  @N  @0k.	0 k l0dk     190
TXT  =       k0'(0  K  (0 0k}'k0lk1}eK}  K}\ }      191
TXT         (0 (0 s
9k	 @n @
k	n @n, @(0 S   2     192
TXT          (0 } K  k	(0 n, @K  *k	(0 N * <}    193
TXT          K} K} *n, +n  @o0k0 G0                     194
RLD               W                                                195
TXT  +       Fn' k	@   80O0 n'0 @K}+o0k0 G0 k*	    196
TXT  f       N	 (0 sn @
9
k	n @n, @n1Mn2H    197
TXT         j  bMn4@j  bJ  F
k	n @n, @(0 S    198
TXT  6         2 (0 }8 }   } K    }  k	(0  K  *k    199
TXT         	(0  N  * N HN *D@0!N ! N !FN !    200
TXT         DN ! ;@Fk	n' @n'@n, @K	 }k	kE    201
TXT         'k 
J(0
Hk,
Jk 'k	j} \} n \ @.} k	n  bS\    202
TXT  O        N	 \  }  \  } } \ N} \ @0  } }     203
TXT         n  b N	 }   }   Ӣ}k)	(0 آ}K\F\H}F    204
TXT         n }   }  }  .}4}   n2}e }  }H 0 } }    205
TXT  =         U}  n2}e\M}  K }  n n  $n  ^    206
TXT         o   \ \F \ \ \F \ \0k^	 0 \ dq(0    207
TXT          Ka}}k3} k3}eK}  =}H0k*	N	 }@} K   K}     208
TXT           K} K	}  ɢ}   0 0\k/	.\4n1\e ;N	 \     209
TXT   ;       \   \ K \. \ \ }  \ \ }  (0 K!} \ k1}e    210
TXT   o        } \ \F \ 0 n     o  b\ *} ;  O} } O    211
TXT          }K.\F.\ .} !  \   Ӣ\  Ң\F \ 0 o b0 o  b    212
TXT           (0 K}.  }  0 n  bk;	j b} K }. \ \ }     213
TXT            \ j- b  *k$	j  b0 }  K}= k-	j  b j       214
TXT          k  bk k  Xk   }.}4K}a K}c }   H.}4k2J
n1    215
TXT          }e DK}a K}c k1J
0 k3}f  }  } .}F }  } k	    216
TXT   W       j}    }.}4o0n}' k JK} (0                217
RLD               4    8                                            218
TXT           Sj  k  K K
a  0 (0  k  Kfg} 0 0    219
TXT         F 0 k!	0{  (0 D m  }  (0  K k K o    220
TXT          k I}    n3}fWK B { (0 DH} Sk } K}} K
J     221
TXT  B       } (0 0Mk0I(}  K  B(0 sk  G0 W.}40 Kf } 0 0    222
TXT        F 0 m 0Qn3}f.}4k0 0                      223
RLD               >                                             224
TXT                	               +                                225
RLD                                                               226
TXT                                                                   227
TXT   +       a       (0
Hk #
N h
N f@n'@ }
(0      228
TXT   f        n, @F2  ,n7 n8 

}
n  %@n2      229
TXT          n   U  \Hn , 0 0n  ,@0 n , \ dn ,@    230
TXT   6       0 k #N0   0H.\F  0 +\ 0 0 \F0     231
TXT          0 &\F0 n @K} 0n  o }0 n , n ,     232
TXT          n , \H0 6j k #j  k #j8 %j  %k _
    233
TXT          k #nT@n @n2
n1@n, @F
k #N f@n     234
TXT   O        @n'@n @(0   2 
 0  N 0 
0F0     235
TXT  
        n{
nH@K  >k #0 N ,0 
0  0 }
     236
TXT  
        0  n  ,
o >K0  ,0    .0 0 k } 0 o0 5n,    237
TXT  
=         Bk  >0
 j k  >
k #n @n, nD@ka _n3    238
TXT  
       
 n4@kb _0
  0 
9
n, @n @N_@(0 S 
2    239
TXT  
       0  0 N0  }F0H0 0
8k	k2 2 (0     240
TXT         } } }   ڢF0  K  00  00 0  }  \      241
TXT  ;        {     {K B k k } S { (0     mn}' k0    242
TXT  o       in3}fuk in1}eF} S(0 D 0̢}40hN}       243
TXT         0k	0 K  k0e  k  r +n    (0 s    244
TXT         k  GK  0  W                                            245
RLD                           f         
Y    
        246
TXT         } S } SKf&} k0^k x0 .Fn3}fs.F}4n3}f    247
TXT  +       K { } S   SK  {{ (0 D (0  n }  K { K    248
TXT  f         (0 { (0 D K  0  0MKf} &K { K  (0    249
TXT          { (0 D K  0n }g Kf&}g{ (0 D6(0  Kf}g}     250
TXT  6       Kf} &K { K  { (0 (0 D K  K  {(0  n }g    251
TXT          { .{F { n   k  K  } Sk } K}} K
J } { (0    252
TXT           D (0 0   K B K o BK k (}  K  Bk ek ^k0x    253
TXT          {  } \    0  0 r |0     n    UK Q0 n     254
TXT   O       0  k  .{{ { 0  k	0 (\ y                   255
RLD                         o    H                   256
TXT           j     (\ y  j      0 ʢF
n @n, @(0 S     257
TXT            2  (0 }6 }F  }H< } *2 (0 }}  } ;    258
TXT          0  (0 r  0 N}   oN}  |N} *}  .}4    259
TXT   y       } k(	k } Kc}} k} k2}  }  k}k } K} } k2}e }     260
TXT   \       }0 \0n0}   n9} 0 nF} nA} + }  $.}F}  Y    261
TXT          00  
K / .\F    / 0  3 / /     0 %F    262
TXT   &       
(0 S 	 n @o0
X0
0   n  "F0 >k K     263
TXT   h       \  n  n,  \   K \  \FF0  }    264
TXT   {          } n      1   0 \0   } } }0k     265
TXT   8        00 j0\ J  \ n  \F.}F  0  K  q(0  \ SK    266
TXT           \  oK\  k(0 j ^k8 k8 j{   %j  kk    267
TXT             kk   k^k^   k"k"   K  3 0 _K     268
TXT           jج
\ n \    S}   { Hr   &   { r     269
TXT   Q         & 0 r  0 n  }       {  r }& Ӫ
       270
TXT           r K0 (0 r 0   }       {  r }&       271
TXT            r J {K  K Ь m0 j  @\ } \K \} }     272
TXT         n }  qk0k05k0)0 (\ y                               273
RLD                                            !         274
TXT           < {6\Kj   .\ j   j  .\ j{      275
TXT   O       .\  \  k  K  0 n0 k0 K   n 0k  k
      276
TXT         kL 
j0k (jb
{ K  0(0 sK	  &(0 sK	 m
k&    277
TXT         k } S }   } & }  Y(0  n }  @K}  qK} D(0 n     278
TXT  =       }|qK  K;k  Pk |K B} K } K } j D(0      279
TXT         k }gKe}h}g(0 { (0 DYk } K}} K
J } (0 K  B0       280
TXT         |END OF JOB\   S                                    281
RLD                                                         282
END   &                                                                   283
// LOG
// JOB UL4
// DATE 76245
// CR
// EXEC
 PHASE CU$I20,A,X'2800',,0000                                           C200001
ESD           CU$I20                                                C200002
TXT                                                            C200003
TXT                               
U{  l                          C200004
TXT          L   >                      &   g      PC200005
TXT                      40               0001-0000             C200006
TXT                                                            C200007
TXT   F                                                               C200008
TXT                    Y                                        C200009
TXT                           
                                  C200010
TXT                   	    
12345678900000199999         UNDC200011
TXT          EFINED       DIRECT ACCESS   SEQUENTIAL      INDEX SEQUEC200012
TXT          NTIAL                                                   C200013
TXT            PRIME   OVERFLOWINDEX                               C200014
TXT   K       A125 NO LIA RECORD, FILE IGNOREDA150 END VTOC * PRESS STC200015
TXT           ART TO DUMP FILEA181 ILLEGAL CARD TYPE OR MORE THAN 1 S C200016
TXT          TYPE CARDA197 DISC RECORD LENGTHS DO NOT MATCH F CARDA19C200017
TXT   :       9 CARD TYPE F NUMERIC FIELDS MUST BE RIGHT JUSTIFIED ANDC200018
TXT           ZERO FILLED WITH A VALUE GREATER THAN 0A210 NO PUNCH ASC200019
TXT          SIGNEDA444 NO TAPE DRIVES ASSIGNED A499 INVALID CUUA591 C200020
TXT          NO VOLUME LABELA592 NO FORMAT 4 LABELA991 INSUFFICIENT MC200021
TXT   !      EMORY                                                   C200022
TXT          (\   >nSF>GnLF>ؕqnFF>ة&K EI (\u({0~a0簬}C200023
TXT          nU m}04N Eؕ4 2 }  k}\ j}ؕ0C200024
TXT   O       j }0N} \  \}o }0Hm}}<   簬0\C200025
TXT           ة \0}ؕâ>03EI} LEIKE
(\u({C200026
TXT          urk }00k 8&ƬkAk ]nCF=0K
EI(\u({0sC200027
TXT   =        kKEI0(\u({u                                    C200028
TXT   k       (\  F {K y0 FCU$TAP 0r   K0 KA0K]0 C200029
TXT          k jnSFةk nk  K ЬmK30 0KE(\u({~rk0jC200030
TXT         0: 0q 0k0 nPFkUEk0Rا0 k RNF@Eا kBEN C200031
TXT          FΣ* N FΣ/ NF@EاNF@^ NF@/ N F"* C200032
TXT         N F"/ NFeEاNFe^ NFe/ nIFاK FhEC200033
TXT         0NFhEةNFh; NFh/ NFEةNF) NC200034
TXT  S       F nIFK EEK EFnBEضk0F@k1F'8 F2FFhC200035
TXT           FFKFH8FFFF8 F<F8 FF8FF FFF3 C200036
TXT         EDFo0EHK FED(\{> 0E{2EDED8FFFEDK EDF F<\8FC200037
TXT         F<FF FF 3F<Ho0F&K FF<(\{> 0EB FF 3FFo0(\C200038
TXT  B       {> 0E8 F2FF2F@F@ FF@ F9Iض6 F\8FC200039
TXT         F8FEDFF000 03 F<Fo0F&K FF<(\{> 0E3C200040
TXT         FFo0(\{> 0EK EFk K EFK RFK E$F"KE-FhKEFC200041
TXT         K E FkK FF"(\{> 0EjEؼ00*0d 0! 0K FF(\C200042
TXT  s       {> 0EKHFh(\{> 0}K EJKGF(\{> 0}KE}KAKAC200043
TXT         kA-(\ y  j A ؼWk 絬*(\ y j Aؼn ؽn1C200044
TXT          N E k0K Eu \ !KEIK(\u({~
 ꢵC200045
TXT          k00 (\A 0KAEKAEKA)A_(\ y  k\(\Kj A ؽ:C200046
TXT   b       NF>FؽKEI(\u({vj絬*K	BT K B1 K EBk(\HC200047
TXT          (\uK A*KAEKAE(\ y  j A ؽOn4Fؽ6K
EI (\u(C200048
TXT   2       {vkKEIB(\u(\A (\ y j Aؾ 絬*NF>F,ݦn1F K C200049
TXT           C_ \2 L  KCz\ K} (\{3C]K	CCK C200050
TXT          J (\{3CK} (\{3 CKK J (\{3CRK} (\{C200051
TXT          3 CK J (\{3CWKEIC(\u絬k (\ݪN F>E  K C200052
TXT   K       EsFzKEN	EؾK EI.(\u({~pK	E  0*0*0C200053
TXT          E 0}k0k K	E KE  KE K EB13E&o0E0 n3FC200054
TXT             k0KEE&k K|FF絬(\ݪ0 KEI2(\u({0~&C200055
TXT  :       0o.0E0d嬨 K EI(\u({zj \n  بK ݨ  ݨC200056
TXT         \F!KD\ K J(\{3C٬K}(\{3 D
K} (\{3D C200057
TXT         K} (\{3 DK} (\{3DK^EIC(\u  n C200058
TXT          絬*0  0}0hnSFب+NEf +0f 0q.0> 0C200059
TXT   !       0E0> 0D0K0 !K0!\!\% \FK0F\% \FKC200060
TXT   k       1 F \FK1 F\qK0qK0q.\> \FK1FK1 Fk ANk C200061
TXT         AR                                                      C200062
TXT          (\                                                      C200063
TXT   }       (\  絬{n ~دF* {K 20 FCU$ISQ 0r  	k0#k0C200064
TXT           0F; {K  0 FCU$IIS 0 r   \;k #k K C200065
TXT          m0+0&00+K0 KA0Kd0 \0 K \Eu          C200066
TXT   >      (\  k\(\K b                                        C200067
TXT   =       (\                                                     C200068
TXT   b       (\   r &Ƭ\ ] Yk0nج!ج> جK @KK| EC200069
TXT         (\] جK @KK| E(\]                           C200070
TXT   Q       (\ ج!ج> جج\b0EK DKǢج>0b ]K  C200071
TXT              0] .0 0] kK] K   (\] 0Q \];&u\        C200072
TXT          (\  جD]-                                            C200073
TXT   <       (\ ج!ج> ج0   0]*  k0]K آ1 آ0K]6C200074
TXT   d       0KA40K0n4]K1֬!K3b!K4!0]n1]HK1KC200075
TXT          !K2 !0]Nã]SK1H!K2 !0]K1!K2D!8 C200076
TXT   4       (\  (0w8 k ARk0ARج!\   00E0F- 0 .0F-ج>C200077
TXT            \k0k}.0k 0] (b0] \̢k0   0 8.\% C200078
TXT           \kKk 0 K 00 \(b0Q.\ \kKK   ج!    C200079
TXT   q       (\     \ 0HK欯(qK欒(qK!0    * C200080
TXT   }                                                              C200081
TXT   M            bk ELK%EMELK EI  [簬E\0ج= .ج=C200082
TXT         En0E  EK \    Z\                    C200083
TXT         (\  IKEIE08k ELK%EMELج  E}K \  .جm C200084
TXT          Z0< جk.ج m dkKdK \  K EJlo0EJk(\H(\u0C200085
TXT  s       b \                                                  C200086
TXT  y       (\  Ik EIKEEI0  k\(\K0׽K0QK- \ײ    C200087
TXT         (\   K\0  1{ { J { { m{ m{ { {   012345678C200088
TXT           9ABCDEF KKFk{jJ{ FFFj{{ {C200089
TXT   <       K0{ n }{-oK J}k }0{ K}2 02 IC200090
TXT   d       j0{0} \{nJ{D {Mn }{K F{U2 HC200091
TXT          kJ0{d2 GK}P0{d2 FK}{0{d      k0{ {6C200092
TXT   4       0  r 0   B0{600n A-A A-Ak A-n A^A  A^AC200093
TXT          k A^0A*0 0A*       +       !   > $          C200094
TXT   !              	                                       C200095
TXT          0A0A0A:0A=0Ab0Af0A0A0Ak0Ao0A0A        C200096
TXT   s      ({0vln AHn AsnIEAD0 0\                  C200097
TXT   H       (\  k(\H0A6 A                                    C200098
TXT         (\  0K340A6                                      C200099
TXT          (\                                                      C200100
TXT   2       (\  ج!K EE (\u3 Dꬮo0D3Dʬo0D3Deuo0D3Dqo0C200101
TXT           DD٬D1ƳD7uଡƬuuK$ED(k ARk0AN(\uC200102
TXT         ({0k A k Ak AkAk A.kA^k A-0                  C200103
TXT   h       (\  3 Do0D3DEDo0DI3DQD7o0D3DD1o0D0KED(\ukC200104
TXT   {       \(\K                                                  C200105
TXT   F       (\  0 BVOLUME SERIAL NUMBER 999999, OWNER OWNER     .  C200106
TXT             FILE NAME                                       TYPE C200107
TXT           FILE           VOL   SERIAL    CREATED     EXPIRES    EXC200108
TXT   >       TENTS      FILE NAME                                    C200109
TXT   w          FILE TYPE           01    9999      YY   DDD    YY   C200110
TXT          DDD     99              EXTENT 01 (OVERFLOW)      RANGESC200111
TXT          FROM CYLINDER 000, TRACK 00 TO CYLINDER 000, TRACK 00.FC200112
TXT  +       ILE 0    RECORD TOTALS. CARD OUTPUT=0      TAPE OUTPUT=0C200113
TXT  f              DISK INPUT=0      JOB TOTALS. FILES= 0      CARD C200114
TXT         OUTPUT=0      TAPE OUTPUT=0       DISK INPUT=0          C200115
TXT  6               *1                                          C200116
TXT         001                                                     C200117
TXT     	      IS                                                   C200118
TXT  +         01                                                    C200119
TXT         *3FU0    0                                              C200120
TXT                             01                                 C200121
TXT                                                                 C200122
TXT           %                     00000VOL1/*            C200123
TXT   >       
}L{L ({00Fkk Gk k k   j  Hj HC200124
TXT   w       NH\FHNHSF4NHUF0Hk1G n  Hj HNC200125
TXT           H0GN HG 0Hk2G 0Fk3G k4G0Gk2G0Gk3G0C200126
TXT         Gk1GI {K G0 FCU$    0G r  Km KG0 K-C200127
TXT  +       0K0 K-KBH0K 0 Kס0 KGs0 KB0 K0 Km0C200128
TXT  f      KA00KK0KG  0                                  C200129
TXT         (\                                                      C200130
TXT         (\  k EIKEEI0k 簬*NFH6 G} G\H0GUKEII (\C200131
TXT  Q       u({0zH أ iأ جom0p簬n4F HHn1F HHk0Hn0C200132
TXT          F}H k H0HK F}<k1Hn1F_ Hhk0"Hk2C200133
TXT          F_F#2 } F#j } k}n1F_Hb}F"2 } F"k2H0C200134
TXT          HK F_}j}}}Hu0Hk 10K EIH(\u(C200135
TXT          {srk xk ,0GKEII(\u({vr    ^ " bc bcaC200136
TXT   0        12162432A299 NO READER OR NO PRINTER ASSIGNEDA599 NUMBC200137
TXT           ER DRIVES OUT OF RANGEA951 MEMORY SIZE MUST BE 24K OR 32C200138
TXT   -      KPHASE CU$I20 END                                      C200139
END   >                                                               C200140
// CATAL
 PHASE CU$11,A,X'0F00',,0000                                            C110001
ESD           CU$11        !                                        C110002
TXT         
9wFF                                      C110003
TXT          8                                                C110004
TXT         (0                                                    C110005
TXT          ;(}2O 0  000 r  }   0  0 r   00 o 20mC110006
TXT          0&r   m200n00k}0r0-0k0k002fm?0rC110007
TXT        00 m0r00                                           C110008
TXT                                                             C110009
TXT  s       uڪ                                                   C110010
TXT  y       w(0                                                  C110011
TXT         ;j \}2:2 0t\o 0r}3  }2}\n \2k}0r0D0HC110012
TXT  W       2f 0Hr   00Hk                                    C110013
TXT         0                                                    C110014
TXT          k                                                    C110015
TXT         (0                                                    C110016
TXT          ;n \1 K 01 K 0\n \ 2fK 1
\ n1 1k}0r11C110017
TXT          2f 1r   01m2 102r  02 h(0            C110018
TXT        ;o 2} > &1 1r  01(}2Oj 21N2}            C110019
TXT  o        >1h}102K|                                       C110020
TXT  y        >02f1sm2(\102r 01j 2'j}1}  > &1Q 1C110021
TXT  \       1}r  01r  01o2(0                            C110022
TXT         ;(}2Oj 21SK|                                       C110023
TXT         >                                                      C110024
TXT         m2(}102fm2o 2 2 2 2 02r m2(}102(0C110025
TXT                                                                C110026
TXT        ;(}2Oj2202                                      C110027
TXT  !       0 y                                                    C110028
TXT  ;                                                              C110029
TXT  -       B                                                     C110030
TXT         D {                                                    C110031
TXT         F }                                                    C110032
TXT  %      H\   0                                            C110033
TXT           }3  }2(}2O .}3 02=}3 }2 }22w2y{2}C110034
TXT         2a 2                                                 C110035
TXT         \202b                                                C110036
TXT         0                                                      C110037
TXT          n j1kj  j2 n  j1                           C110038
TXT         /* a 2  }2Ya 2W                                C110039
TXT          {                                                      C110040
TXT           m                                                    C110041
TXT          j                                                    C110042
TXT                                                              C110043
TXT                                                          C110044
TXT          
0 {j 0尰 r  0 BK а  {  簰0 F   C110045
         ACTION DUP                                                     C110046
XFR                                                                 C110047
         ACTION NODUP                                                   C111001
TXT        PHASE CU$11   END                                       C111002
END                                                                  C111003
S 24 9   4 2 780 781                                                    AS000003
// CR
// OPTION SUB,SCAN
// IF ('&GTAPE' EQ 'N')NTAPE
// OPTION NSUB
// GO YTAPE
//NTAPE NOP
// OPTION NSUB
// GO NTAPE1
//YTAPE NOP
// CATAL
 PHASE CU$TAP,A,X'2300',,0000                                           CAP0001
ESD           CU$TAP         4                                        CAP0002
TXT           
9   
Y                                             CAP0003
TXT                             !       CU$TAPE             CAP0004
TXT          0  1 K1 1.11 1  1 0dm  o0 0   \1 CAP0005
TXT          \1 .\0 \10n00"0 \0 \ !  \ *(\ <              CAP0006
TXT   U       j 00{ 011  1 1  1m 0" 06j0 0k00"00m CAP0007
TXT          0T(\&0  0  1  1 1  10
 ;                    CAP0008
TXT             ;                                               CAP0009
TXT   <       0 y                                                    CAP0010
TXT   &        
 
0 {j 0尰 r  0 B0 {j0 km j 0 km j{CAP0011
TXT   h       0 k^m k"m00ذq\m.\k\o r 0 Bn*\CAP0012
TXT   {       r 0 BN \ 0 &K0 K 0\ 0       9 K а {CAP0013
TXT   8        簰0 F                                         CAP0014
         ACTION DUP                                                     CAP0015
XFR   &                                                               CAP0016
         ACTION NODUP                                                   CAP1001
TXT   &        &0 Bm00
&00\0-o0k  K  i\ K  r\ } }0 r CAP1002
TXT   h        }                                                   CAP1003
TXT          j   B n i  Bj  i
&m00\   
 & \B ذDCAP1004
TXT   F       HK j0 \j\ \  oj\ ذ(\
\\ n\ oK \CAP1005
TXT          K 0\o mհ
Y  0      
 UTL  K j\ K j0 K j \\CAP1006
TXT  
         \(\ <                                                CAP1007
TXT  
        
j jذ00  
Y j0j j 0j(\\0 K0 0 \00CAP1008
TXT  
       Kj 0ذD簰F0    
q &      
0000000000000000000000CAP1009
TXT  
       00000000000000000000000000000000000000000000000000000000CAP1010
TXT  
W      00  HDR1EOF1EOV1                                       CAP1011
TXT  
8       
8 \
h(\ j0&j}2 jk0jkjqojm30jkm0
Y  j jk@CAP1012
TXT          
Y Nj4jj8(\  VOL1j0kN	j<0k(\
Y jjCAP1013
TXT         kNj4jkNjjk 0k\ {N j\ }k(\ 
Y KjCAP1014
TXT         jK j<0 k0j'k0j=K j"j=k jdKjejd
Y 
Y 0k
Y 
Y 
Y CAP1015
TXT  Q       NjjkNjk@jjk@(\n1j.k@N	j)0kB(\CAP1016
TXT         2 jkjųjkjqojm30jk
Y 
Y 
Y 0k<0k2K0ko00CAP1017
TXT         j   +j 0\  \
h(\ 
Y j0
lKjjtj0lkFjK CAP1018
TXT         j<0 k0j'3j=0o0jck jdKjejd
Y 
Y 
Y 
Y j0lj 0CAP1019
TXT         l:(\m700j\0 K0 0 \0ذD(\%0jPHASE CU$TAPCAP1020
TXT  0        END                                                    CAP1021
END                                                                   CAP1022
//NTAPE1 NOP
// OPTION SUB,SCAN
// IF ('&GFLTYPE' EQ 'IS')UIS
// IF ('&GFLTYPE' EQ 'DA')USQ
// IF ('&GFLTYPE' EQ 'SQ')USQ
// OPR 'UFLTYPE KEYWORD SHOULD BE SQ, IS OR DA.'
// OPTION NSUB
// GO ETAG
//UIS NOP
// OPTION NSUB
// GO UIS1
//USQ NOP
// OPTION NSUB
// CATAL
 PHASE CU$ISQ,A,X'1550',,0000                                           CSQ0001
ESD           CU$ISQ    
&                                          CSQ0002
TXT  
&       
0K 00&K 1 +K 08!\;\4 \420u 0u0K1 0v90x0CSQ0003
TXT  
h       00v0001 010u0v\0u \0sK 10sn 10k1nUCSQ0004
TXT  
{       0K 4_0zK4=0K40K4{0K40
9B  &      CSQ0005
TXT  
       	W  0W   N >0 00B00F000000K00O0000CSQ0006
TXT         00S00W s                                          CSQ0007
TXT        CU$SEQ /         H                               CSQ0008
TXT  ;         >                                            CSQ0009
TXT              ;      *d   3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0010
TXT  s       3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0011
TXT         3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0012
TXT          3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0013
TXT          3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0014
TXT   b       3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0015
TXT          3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0016
TXT   2       3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0017
TXT          3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0018
TXT         3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0019
TXT         3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0020
TXT  K       3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0021
TXT          3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0022
TXT         3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 CSQ0023
TXT  :       3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3                     CSQ0024
TXT         0 m0
o0kc}                                      CSQ0025
TXT          0                                                  CSQ0026
TXT         0 o<0  \ 0 j
 j	                        CSQ0027
TXT  O       \(\ m K  +j0
  m0
(\ o^                    CSQ0028
TXT        (\ :0  (\  (\ m0
\                             CSQ0029
TXT          N\  5  o\ 0 H}                                CSQ0030
TXT          \ \0\ & \   o \  >                      CSQ0031
TXT   &       +% >                                                    CSQ0032
TXT          \ j}& 0 (\ m"^o0
(\                        CSQ0033
TXT          0                                                      CSQ0034
TXT   :       0 y                                                    CSQ0035
TXT   =       =0 B0簰0\0%k    H =K  \ K  C\ }       CSQ0036
TXT          }r  } j   0 B    a          as  /  t CSQ0037
TXT   Y                                                             CSQ0038
TXT             
0 {j 0尰 r  0 B0 S 0 M 0 S00 0 0 0CSQ0039
TXT          QK а& { <簰+0 F                           CSQ0040
         ACTION DUP                                                     CSQ0041
XFR                                                                  CSQ0042
         ACTION NODUP                                                   CSQ1001
TXT                /*                       $  g         CSQ1002
TXT          k0 "0  k  "  = \   f\                     CSQ1003
TXT            \ qn  HK3 mn   \ N\	  CSQ1004
TXT         K \ 0 h(\ :                                    CSQ1005
TXT           40j\ \  \ k 
0 Dn1\  \ \ K\CSQ1006
TXT   D       k K2 o0 *jo0
j0
jm?0
0jj 0 jCSQ1007
TXT          m0 j0
j0j(\                                     CSQ1008
TXT          Y\0j                                            CSQ1009
TXT                                                                CSQ1010
TXT         \  \*.\ \\ m70
0 \*\0j0
@j \j\;CSQ1011
TXT  !       0  .0 K:0o0 \0\ 0 0  o(0
00 (\ m;      CSQ1012
TXT  k                                   m                    CSQ1013
TXT         s mVOL1                                                CSQ1014
TXT         j 0  \Y}(\ m (\j 0 k>k k0 ذ> 0 Kkk({n:CSQ1015
TXT  6       k k
n  kn1ek0kȢqk0k
0k@
 N  0kj 0 CSQ1016
TXT         kN0 kK0 Kf}  N }b0}kO
 Kk} { {} j{ CSQ1017
TXT         k8{{ j { k
&({nSN	 } l
  Kkk0lbn2}fl CSQ1018
TXT          n                                                    CSQ1019
TXT         0nKl<n k
k k
lkKl<!k0k
({n:Kf}  n{lk{lCSQ1020
TXT  O       lklk({n絰!Ne}l
 }@ 0m({oK k  CSQ1021
TXT         ({oKmkK  }({o({o Nmk}ok gN}lN	}CSQ1022
TXT         l
 N }l
 N	 }l
 
 N}$l
 N CSQ1023
TXT  =       0m 
  }-k{l({m}n0l0n}  m
 ذn CSQ1024
TXT         mذ0mK kK}K	}k  }}>n } mn3} m*CSQ1025
TXT         0m}nK  }fj0 0K                        CSQ1026
TXT                                                                 CSQ1027
TXT  ;                                                               CSQ1028
TXT  o             =  M 0                      CSQ1029
TXT         {2 }4}m0                                       CSQ1030
TXT         o 0 n%nn{n}nn>0              Kkk k CSQ1031
TXT          絰k ~ ذ&ذ> ذ(\n{j knjk{ 
Kkkk CSQ1032
TXT           0nd2 		o	 m0	2 		k0 : {o Kkkk({nCSQ1033
TXT          N ko
  Kk0   {o Kkk({nj k  
Kk CSQ1034
TXT          k  K  K~~ Kk k0nj 0 \  \Y(\0k  CSQ1035
TXT   S       \ 2 Y \ o 0 j 0 k0n<PHASE CU$ISQ END              CSQ1036
END  
&                                                               CSQ1037
// OPTION NSUB
// GO UFIN
//UIS1 NOP
// OPTION NSUB
// CATAL
 PHASE CU$IIS,A,X'1550',,0000                                           CIS0001
ESD           CU$IIS    
&  
                                        CIS0002
TXT  
&       
0K 1&K 1{!K1I\;\5.\- \121d 1d1K51eKCIS0003
TXT  
h       1W591g1@0+1e1'00!51'K1W511d1e\1d \1bK 21bCIS0004
TXT  
{       K2K 1ZK 1K 5ѵn 20kk2\- \4o}4 \2\ \2\CIS0005
TXT  
8       o}2\\1: \4o}4 \2o}2 \4o}4 \4 o}4 \.\1: \3\o3\CIS0006
TXT          \ \3o3\1 \3o3 \3 o3 8 1d1@K 1e\1d.\1 \3CIS0007
TXT         K1bkN3\1b.\1 \3o}3 \3o}3K 2 _K 5@_\\> \CIS0008
TXT         2K2µK4굦\1d\2.\1= \2
9  D            CIS0009
TXT         010101k01o010101s01w0101   s  CU$ISAM CIS0010
TXT                                                              CIS0011
TXT           H {                         *    3       3      CIS0012
TXT                          3       3                         CIS0013
TXT                                                   0  k0 0  CIS0014
TXT   D       0  0                                                 CIS0015
TXT          (00  K30*K0<3KK03Mk 0k 3(2@K0;3(\ &K3C2CIS0016
TXT          (\ {                                                  CIS0017
TXT          (}(00  }0;0-j 0 1Uj0 1&j P {1K3Q(\kCIS0018
TXT         {m0 01@(201<                                      CIS0019
TXT         01U                                                    CIS0020
TXT        01%k01j{ 1@o 0 (2 01U                            CIS0021
TXT         }0 1}001Yj  1k3k 3}k3J(\k {k 3K 03BK0<CIS0022
TXT         3K3E0_K 30 01O0!12 0-010 0(2@  CIS0023
TXT  S       (\ {}3m30  }0;(\ &(\ {N }  2 k 1            CIS0024
TXT        n } 2}00(}}                                  CIS0025
TXT           K3C K	0 K30<j 3D2 K30 m 3D(\  {}3}0  }CIS0026
TXT  *       0;8K0 P N0 Q2K0 QK3CQ02                 CIS0027
TXT  d      (\  &K0-0 0-8                                      CIS0028
TXT  o      k0m  o                                            CIS0029
TXT                                                               CIS0030
TXT                                                                 CIS0031
TXT          *                                                      CIS0032
TXT                                                                CIS0033
TXT          _                                                      CIS0034
TXT          f                                                      CIS0035
TXT          H   > I                                            CIS0036
TXT             w                                             CIS0037
TXT   {                   *     3                             CIS0038
TXT   S      3                                                       CIS0039
TXT         3                                                       CIS0040
TXT   2      3                                                       CIS0041
TXT         3                                                       CIS0042
TXT         3                                                       CIS0043
TXT          3                                                       CIS0044
TXT         3                                                       CIS0045
TXT          3                                                       CIS0046
TXT         3                                                       CIS0047
TXT          3                                                       CIS0048
TXT         3                                                       CIS0049
TXT          3                                                       CIS0050
TXT         3                                                       CIS0051
TXT         3                                                       CIS0052
TXT         3                                                       CIS0053
TXT   !      3                                                       CIS0054
TXT         3                                                       CIS0055
TXT         3                                                       CIS0056
TXT         3                                                       CIS0057
TXT   :      3                                                       CIS0058
TXT   b      3                                                       CIS0059
TXT         3                                                       CIS0060
TXT   k      3                                                       CIS0061
TXT         3                                                       CIS0062
TXT   s      3                                                       CIS0063
TXT         3                                                       CIS0064
TXT         3                                                       CIS0065
TXT         3                                                       CIS0066
TXT          0 y                                                    CIS0067
TXT   {       {0 B00\0k  K  \ K  9\ } }Ur  }       CIS0068
TXT   2       j   0 B  a          aW  /  X             CIS0069
TXT          
0 {j 0尰 r  0 B0 S 0  000 00 0CIS0070
TXT        K а& { <簰+0 F                           CIS0071
         ACTION DUP                                                     CIS0072
XFR                                                                 CIS0073
         ACTION NODUP                                                   CIS1001
TXT          ! * ; }- \ \0  Ӣ\                    CIS1002
TXT         }!*;}-0                                  CIS1003
TXT               /*                       $  g         CIS1004
TXT  k       k050k 5 ; { -\  ܢ\                    CIS1005
TXT          \n  K3 mn  \ N\	  CIS1006
TXT        K \ 0(\                                     CIS1007
TXT         -;0j<\ \ \ k 
0 n1\ \w \ K\CIS1008
TXT          k K2 o0Kjo0
0j                    CIS1009
TXT                                                               CIS1010
TXT         \ \o.\\\ m70
0d \o\0j \dj\q0  .0CIS1011
TXT        K0o0j0
 \0\00   \0=(}0(\ K      CIS1012
TXT         ;                                  QW KVOL1    CIS1013
TXT         j 0  \  (\ K (\  Kk k ({nyk kn  kfn1ek0k;CIS1014
TXT          k0k0k
 N  0kKf}  N }d0}ky
 k l Kk } CIS1015
TXT         { {} j{ k{{ j { kK
&({oN	 } kU
  Kk k CIS1016
TXT         0ln2}fk nk0l Kln kk klkKl<k0k({nyCIS1017
TXT  S       Kf}  0kyn{lk{ll klk({n\絰<n2 lNe}l;CIS1018
TXT          
 } 0m j0lN 0ɵ l(\ KK 0%K 0d)0k({CIS1019
TXT         oK k  ({o Kmk K  }({o ({o%Nmk }o&k gN}CIS1020
TXT        lN	}l
 N }l
 N	 }l8
           CIS1021
TXT         
 N}$m 
 N 0m k mj0 {m km
  }k{lCIS1022
TXT         ({m}n 0k0n}  m-0mذF0m*
 o0 ذyn CIS1023
TXT          mȢذw0mK k K}K	}k  }{}sn } mwn3} CIS1024
TXT   ^       m0m}n K  }f                                     CIS1025
TXT   p                                                               CIS1026
TXT                                                            !  CIS1027
TXT      
   * {  ;   -                                   CIS1028
TXT          {  } } j0  n:j0 mm0                       CIS1029
TXT           nnn{ns}nun0              Kk kk 絰CIS1030
TXT          k ~ ذذs ذ(\n}j knjk{ 
Kk k k 0nCIS1031
TXT          2 		o	 m0	2 		k0  {o Kk k k({n\N CIS1032
TXT   W       k o 
  Kk 0   {o+Kk k ({n\j k  
Kk*k  CIS1033
TXT         K  K~~ Kk!k0n\j 0 \  \ (\  0k  \CIS1034
TXT          Y \ 0k  k o 0 0n=PHASE CU$IS END w            CIS1035
END  
&                                                               CIS1036
//UFIN NOP
?*/
/*
// OPTION SUB,SCAN
// IF ('&GTAPE' EQ 'Y')ETAG
// DVC 20  // LFD PRNTR
// IF ('&GRERUN' EQ 'NO')RR0
// IF ('&RDVCA' EQ 'X')RETAG
// IF ('&RVOLA' EQ '')RETAG
// DVC &RDVCA  // VOL &RVOLA
// LBL &RLBLA
// LFD CU$LOAD
// SCR CU$LOAD
//RR0 NOP
// IF ('&RDVCA' EQ 'X')RETAG
// IF ('&RVOLA' EQ '')RETAG
// DVC &RDVCA
// VOL &RVOLA,&RVOLB,&RVOLC,&RVOLD,&RVOLE
// EXT &RETYPEA,C,,CYL,&RNOCYLA
// LBL &RLBLA
// LFD CU$LOAD,,INIT
// OPTION SUB,SCAN
// OPTION DUMP
// EXEC RELOAD
// PARAM IFIL=S,SEQCHK=NO
// CR
// GO ETAG
//RETAG NOP
// OPR 'NO DVC THRU LFD SEQUENCE SPECIFIED FOR RELOAD'
// GO STAG
//UETAG NOP
// OPR 'NO DVC THRU LFD SEQUENCE SPECIFIED FOR UNLOAD'
//STAG NOP
// OPR ' OR SPECIFIED INCORRECTLY'
//ETAG NOP
/&
