P*N,CPFILE,,,B P@ d p"L"VF6"`"j"t8"~"""  < um .u   !"@  ' 'f l b TA 'l l  'TT  h l T6:l   h l TFl   h l TRl    h l T[ l  5 h l T[ l 5! T h l TGfl T @ Da     `  hA@b b `*/f b`"f h$#`   f ` 0 f ؽ̼h ` ش `  f@  ( b  b  f @  !@  n!@ !@ i*@ i*@ @ @ @ d@$Tm dT!~}LQP@ h@T6     hEHEhA=hA : 7 DX-p d 0 d " z"6 d   ""&"DX z X d  zo  d %  "^dTi XY d  zADXI z6f H{"d60^ d VVk   - m  d"; T? bb H~h 4 4 W W W db0T _VVQ d "L b "hD>b)*71 b "h.) b)*  &h   b{  "  @ @!WCOPYRIGHT CONTROL DATA CORP. 1975,1976EyuFGDrUj\HWT A A @ @@ =}? HOST DOWN..] HOST UP..] HSԠDN.. ] HSԠUP.. ] HOST DOWN..] HOST UP..] 0123456789ABCDEF  =? =? _/?@  *WM] *ERR] * ] ȁȁ  ` p  T?    1234QAIM  * R 2 a : c B e J g Z i R k * j m< H&9?1I>Txx8Jo.!!'!7   2  =@?@}`  c%sDkDDE EE5E@EEtt'~pp0ppp}pG "2$rG "2$rG "2$rG "2$rG "2$rG "2$r P0!g!g!h!k!z!{!!!!!!!!A@   ,@    @ $(! %(! %( 0%(,  p A p`p1ppI!yEpUPUQM0pM1]p}p} !!! ! ! ! ! ! ! U3U3U*3LpU3*Lp!W.E\ (1 LrDLrDL3C L3CFtD L3#L3#L2#L1#L1#L1#L1# 1FtD1 FqD, , FqDU,, FqD@@ @!!h h h$ h( h, h0 h4 h8 h< b2d"3"wR taq " ! hn @HH2"h"hn @HH2"h"hn @HHhD#`," h#%#>wd#_2#9D#8T$#ahLwlǜ2#TD#ST$#a H hP"h hT #hhh hmw#wd$2##whl# 2#D$T #hfh hLD$إأȘ1 ##@# "&2h#Dq#b"&2d#c#d#f 3$ @$T$$ $ qlT$o$$ #i L#j h 2$@T $!hD$N fh hh HH hD$ZT!$P ! d$| !  HHH$D$,"D$T! h$$ HH "Ad% L2 ! l wR taq " ! $h bhǘÖ 2 ! h$ hȹn @HHH@ dh h%P "d&>Ll2%MD&@ jҰ%Mh h hĔ 1T_ȿ&5%hȳ l%ȭ("dh d&?2 ! lȖ" ! %؍T|%؉̣1("2%df% % n̨ l l% "Ldl D&@" An2% nܵ&>1 l&1̪ (" " ! ld" ! &.̏ lT &>d%̇("d%%L(" f@ dT!%% lT!%%T_L% n l 1 %r2h&W h&^D2h HHwhh" h" h 2& h&D& D&!j٘&Ȫ& h&Ȣh&ȝ& h&Ȗ& h&X&E&Ch& h&X&E&Dh& h&hț D&A'D'.T &n h d'-' % f1'L nh HH hȭ'9T' h٘'!D'GXhȒhrh% D'WXh hD%2D'eXd& d&&d&rd&% D'|Xd&D%2'D%2&nD' n' h' &2'T''Δ'n'T''/ LD&LL'06 hh'%h 1 ! h H 2(T)A!(T)B() n)#Ȱ (8D(4T)G)C)#hȞhrhD hh ! d)? ! (^T)D' ('' D(mT)G)E'%'D)@% n%(% D(T!T('('D(T!)#ΰd'̻d'rd'D d'd' ! lΕ ! Ѝ(T)F n%L%Φ n%Π)#% D(T!\')#'' D(T!E'D)@E nE)#E D)T!T(')#'!D)!T! LD'D'( 6   T aC@ )a a ){% )z%  b% D)xT!  1) )a a )% )% D)X) 1)̻a a )% Τ)% D)X)  1D)d)T! hhh h)Vh" hh* h*& D*T   wh h h hT*) d)ȩ *9 ȟ *RȓhT )hfΧhT*) Ȇ**T*) wd*2**~% D*zT!)*)) D*T!)  ! *T$*  D))    TaC@ a n " ! a " ! > a +ف "a d*T"*++ d*T"a Aζ  n n Ϋa  " ! > AΚ n a    T aaa a C@ 2+J a+T d 2+T aA <" " A <" "A      a    T aaaC@ " ! a a T_   ! a  ! >        T aC@ abs",",T+,,a2 ! a,T+,,a" ! a " ! > a,  " !T,,d-8-bs"-"-Twhl-d-9T,<-:-9-;T,-;͘1T,<-< t-;- n @HH " ! bs"-s"-rT+--h2-kNT0-pT,<- u--s  H   T aaC@ " ! D "f d-T,a@a- T_.B-"&2 D-T% D-T-% D-Ta̳("ζaA   w , % D.Tbs".>".= A  ; ]a d.4T,<.[.\T,<.] u.\.>T.X.L D.X"&2 D.WT    T C@ .w " W  . f  ! a ,0 . D.T0+T aA A A n  a d.d.T-  . n 2.%D.T .f%h h  hT .hh hwh"/ZD/|hػLD/}s" XLL3"XL XȔ h "/Y hL .ðX.L. /äX.D/`T!.Θ Ð.n .,"l d. d.b r "0'"0&T .d. lwd.w d03/D04d.Ls" ö̆" L3"ë."   lҜ1"  .M /Ð.w ww" lDl  ! l̳  ! 0T/w.Ln.n0' L/~   T aaC@ " !wbs"0b"0a0b 0 " A Pn ba d0T0E D0a d0T!0" f g p0% D0Ta 0% D0Ta 0̞("A -d0 D0T-0d0T!   TC@ ad P <21" ta 1 d 1 ?1 ua1 a11Xd B sa S11 d Nd19T,<1V1W1ST d T w1X1Yd1RT.^ =SUALRPORDIQIAUNOCPDPACDERECA*SUP INACT] *ALM INACT] *RPT INACT] *ORD INACT] *DIA INACT] *Q= SUP]*Q= ALM]*Q= RPT]*Q= ORD]*Q= DIA] *ERR] R . ! d2 / ! 1L 1 0 ! l 1 ! 1 1 81Z1"̾1 91"̹wl22 w   S n D2]ŸE1[ L" ”1` ! d2\΄  ! 2ML n HH =X6=2^ h  ! d3  ! 2X6>2_  ! l  ! 3gb s"3^"3P UwR taq 22T d ȧ "1oD2T 6?6@T.^ 1^2ȓd T3^T l1D2T 6?6AT.^ 1^3^ d M3^ l3^ xR uedl3^2_ xR uedRl3^ O3& ld >lw d A3^"d s!d u3^ll3^d33J pT056B = d ?l3^-HCL^rT! S3}lT S136@w" *ìd T.^ 1^ 2` 3 l3 Q3X3 R - T ! -0 *d ̻d T6? l T+6C6Bd1ZXd BdlN 2 ! d5 zΐ2 ! 3  . ! Nl / ! 47 4 ! l ]  ! 4 d l4! l 45T d Rnd S̒  ! d Q l̷4"1ZÉ ;4[ lL" T34 : ! d5̬Ӭ4 llT"56DlT S156@̩4D5 D4T!Ld T.^ 1^4T2 2 ! l̯ ! l 3 ! л 4 <24T,<6E v6B d P4T04L 4&2LT n&2Χd Rn4  3 @ d1\ >%΃ ! d5 l Ad5d2 ! 51]bs"5"5}T,<6C .6B l5T,<6E v6BT,<6C /6B l5 d ? l 5p l <25nT,<6E v6B d P5pT0 =,5{T056B =5 5̚lLd"5 >1\lw l 5T8 AD5d5T,<6C56B d B 5 lT+6E6Bd1[l85 E69̍25T,<6E6F6B̃25 sl5 ulT,<6E1[6B69 <d6T,<6E v6B d P69" ! d6<" ! 6$ ?d O 6 lT06926-T46964X69T,<6E r6B  =}7lwhhh hT*6K6O6Q6 26 ј26D6T 6JfhLn h6 hȳ1Ȭȫ HHT 6JhnȈh hX667-"‚lD7 ήhT"6K7+Twd6GT*6K66G7)d7wd 7$LD7" D7D7" ]Čw7+7-7KT$o86J6M7FF2 D7ET$o8 d n7̨66 wl" ! l ! 7w6L6I D7uT!6J67T$o8  L6 ll l 08 l   d6G2 ! d8 2 ! 7   bs"7"7d7d7d7d7 T$o8 8  0lT"88lT {88E d T.^ 6K8Lw l d6H88ܖlT"6Kl윊 ! 6G878 1l &2d6N&2 nT78&2n6MD8 lDl  ! l̳  ! Ќ8 l8"L̯D8"Mܣ 1L w6HT!6M6J EP T$ l8T!6M6J\8d  78= h8 " !8 8T-z8 1   TC@  a *   T+) 9J9KD9d9T+) 9K a 2 ! a ؜ ! >M 9G d d   =   T aaC@ a  a9a A   "  = d9d9 a d9T+)9 a  1 = = *ERR SYS HLT] *ERR] * ] LIST EMPTY] SHSREHRSDRE1E2E3E4EQEAEIEMDPLHC C,EBRBBLDLDFEFBGBRLGLPDA b29" ! d:" ! h92 ! l" ! h H  d h h ^E " 2d>d:'>:D d9d ʈ ! l  ! :D l9¹lT"  :Z>: d9T 9>>ld" ! l 2 ! :  E D:T* 9:> 2:" f l̇b r ">"> F :T 9>>: l>: ll:T 9>>>E D:T9:9 l d>: -Mܖ1;! l;D;   lT+) >>D>9 n  1̿"̼  ! n ̱ ( > ;ET 9>>;H d >T9L >; d9 lL D> 쪖  L  = d T+) ?> n ;>>d հ; l>D> T+) ?>9T9 ;  d9 d>; -ð1;D;( lT+) >>n" ( >̢;̏l< ׸<̅ l̘l\ l\ <><; L   ! d _  ! d <4E d  T8> d9 " Ɛ ! d9l  ! Ѐ Зd> ٸlT9 l\ <{><("V  d9TS9 > l зl̽иl<܎̍("˜ ! l  ! Лl ! Бd9l9  ! Ѓ<>= "  lܙTG9 >  2 ! d> 2 ! =+D>   ! f =->>ٔ 2 ! l 2 ! =RT l MT+) ?>=T>> ؜2 ! lٜ2 ! =nT! =p>> 2 ! l " ! =T =T 9?>= "  d9 d9T"??d>=E D=T+) 9> l1 =>>2 ! l̹ " ! =̼(" lT"??l=ED>Λf̵ܰ1T =>> " ! l" ! Лl  " ! Бl" ! Љ>#>>'f W>2 ! d>2 ! >̹ d dRlT T+) ?> M L  >o >i>>mT >T+) ?>D>  / >>>T 9>>>&CXX||O ]  ! d> _  ! d> ^  ! >T,  *SYS HLT] *HLT XXXX]  T,?d? ^ " $T,Ӹ   =   TC@ a a 2 Nd Ca d "p0a d?T"@ a  2 ! a  " ! > d?T$@@T d @@a 2@@ a @= d@T$@@1A AT fAa@:T! @ a 1 a aa 2Ώa d@Wd@YT @ d@md@n a d@oT+)@ a D@d@d@T+)@ a  2Θ " ! a  2 ! >  m aA a 2 1  2 ! a  " ! > @FT$@ @@ d@T.^ @T!  =  TC@T$A-A.A*T d T A/A0T9L 'T$A- A.A&dA#T.^ A*T!  =   T aC@ a " %2 ! a 2 ! A2 a A n ֐2A2  TA @dADATAATn   T C@ ' B aa a " 2 ! "2 ! 22 ! 2 b r "B"Bΐ2 ! a 2 ! aB2 ! aBΐ2 ! aB////  ! >B(" ab r "B"B (DBHDBITrBT9L 'd !T-'B !TBT?BT? BT@BT? B DBv DBwTr cBT-' d !BTA1 BBP#',<BBTB  B ,s "b r "B"BLlB̳lBslB3lBlB  2BTCBȹ "hBTCBTB ld  H  1 C0 "n% DCT  C, d nC. lCw bl 1C] TwCGCKȺbȸw ww C[ lCwCiȡ lCwhCthȎb h DCC  h 1 C% DCTC hC DC "fC 1C wC hCnw wCC hCn Ȥ HTDD d d TBDDTBD T& hd DHDDmlw" D D<!lDF 'Ew d TDnD^ D^ *l D^lTDoDoL* ! -0  h h," hDDldDwd"DhhD d T$D D Al - T8 nD d D  T  ! dDLw"   ! DTE T {DTDk  ,QDDE ,Q -QT$ l -0 *d   d T$E  TC h nE1  !EU  d T9E9 TC h Tif TE{EG *d T$E| E}EqTC Eo,"E T.^ nEx !EU TE{   hE j 1w HTFFAhDU F b r "F"F A  A  A    E EXFT6FE  EE Ew/Fv dE wȅ2F  F  XFT6FEFTFF0MF dEE~ dEFdwR taq 2FZb r "FX"FS  FX  FX  FXFcFc  Fܽ 1   2F 2F 2F   2FF F  TEF dE dE dET6FEDw/F wE    2FTFFv dFhFhT9F  "F "FhFhG"GhGh@dTT_ GTS͐ ! dGi G9 " lG3TGjG9 d TGḵ G@ ȡGI dP Г wճ w "l w("wL w("lDd r w("l w("wl\NlPT d q lL fܓ 1 ULP,-L-,l,wl\^lPP,dPwdMw("DPw-DPb L씺-DL,- L,-wL,-Lb d w w-f -  - - MB - ,DMK b L, - 2 ! dP2 ! M DPPLlwP-wL,-,wd s-AbM, "L,ML-ML, 2 ! -ML,w-wM-w bP,d },wd xL,- TKndP,l,wlPDP,- U\~lP -LdPN/ ,"  d snLl۰N L DP,퀳L,Ы wNbwlNe wlNp ̸̴AbPNLPDP]wL b wLdP-wLP,-,d },wd x TKdP,l,wlL,- \lP, l,w l\  EU d O% - ! ``O d OP ld ,E , bO* `llTx P" lPP, d },w d xTK UOT   Ul `Tx P" dP, l,w l\ OE DOT!  lPO Ew m! m  wճ "mDP n bOTPlP d }d xLwPD "Lw"GDP rb r "PD"PBDP,1L,L,w- lPDL1Lӷ-sL쑯Ls-3L-L,-PL,- lPD zd vMEw yfb r "P"PPP }Pf lP 2Po lP rb r "P"P 2P lP 2P lP P 2P lP 9 zd xL“PE ܉̡PLƒTKdP7X*^ DJK  d# TRͰRD "  "  d DU Q2 Q2 l  ! dR`QD " dd td s t s mlDRlwl2Q Ql nL," l̫L," DQ,"DQT!̮lQ,"DQT! E` Q `Ub r "R"R Q d d ̚d lp`PЊ@ŐPE@ p`0L "lDb r "R("R&0Ű Š@ R(0PR(D "fR DRİRU DR,dR,RUd TP R R` d DU d Ew m! m ЋRw lRUlw! m lRUl lRjR d T_ lR̃d D "΀d T6R lQ d P 0d h bSvhSrTSRDU b 5r "Sn"SjT\SSnT\SSn 5UTSSnD " @ ! dS ldS d ! Sf  `  dR dRd d U S`TSSfTS dRT_Sn R l 2R dRSNdR lS%2SS S " DS  U̿DS%2b `TS lܬ1l̙S" 0d R "  MU w w `TT"  @d hTh hT%T%" TZTX TXXTDT,TuDT, -,TuX찆T쐀T " L%SDT mUDT-Lw-w `TT" T S2T1dST$@d T TUoUf bs"Uf"Ua UfD wDf wĴwT6UpTUf d vUH " U>  UG  1UfŴf řUfq2Z TTW] DW\ 2  TW^U  ! dW[ w ! U  ! l" ! U dRUdR2Ud cU l .wTW_ Ew dwdT6W`WKḓUVW@Vd E DVTCbs"V"V2VȎd2VoE DV7ThWa2VU̕VN l /Ew TW_ VxVm  "Vj   wUVm  wVdR    wE DVThWbW_V  wVVVpW>E DVThWa2V  wWKdR$d E DVThWcE DV," "DVThWd   < wDW\lw" dUqsb r "W>"W6E DW ThWbWeW>L," W+E DW&ThWbWfW4E DW1ThWbWgW> WK$d T Ur PHlX  D[ 2   w 2Wd E DWTh[2WE DWTh[[WT[DW2W"Wd  2WE DWTh[ W !EwdT6[E DWTh[[X[ w  wbs"["[XX#X! < w  [ȠdDXS2X: "w2XC #w2XL $wlT6[2X}  lXnE DXiT\   "X}% DX|T[DXD[,QXXE DX,"DXT!XD[,Q -Q 2XYXX1b r "Y"YLlwX  wX 1d T[YXXY XXY"[E DY Th[ " ! d[ " ! Y>E DY(Th[[ %EwddT6[ZM cYM l /wT[b r "Yj"Yc dWkYj lYjldlT$[WkdWild ! l󸻸YYT  YD[dWjD[ ̰ldYLT lLn ̑ldZ4LLlw wE DYTh[@dRE DZ," "DZTh[   < wE DZ'Th[E DZ/Th[[ZM    wE DZ@Th[E DZHTh[[X[DZZZbZ` < w  [șd[I2ZD[ ZLD[dWjT l LnE DZTh[   < w@dR [G"ZdR[G ,ZL L΋D[̗L "bL [L ndWj  l[-T\Wj   "[<% D[;T[d d T[[QȁdR2[2[c 'Ew[q2[n (w[q )wdT6[d[D[D[ "fL("bL X[>Q DWhWlP ( `lXH h\d\Llwd h " &2hhn @H jh\GT\K\& h\FD "l d\JD d\F h d"? d"9T^7 A\LB\M"6\d       E Nd ":d T\"̘ _^ @l̏ ^<@EJZair|_^;" HlD` _̅_ MdR dR __    _M"6w_H__M w l d":   _|d^<d^=X d"<A^<B^=^>_^>d d  T___ _ _ _ " ! d_ ___0 ^? "5  dRn @H "5  dn @H "5 MdRn @H "5 Mdn @H "5 MdRn @H "5 Mdn @H "5  M n @ "5  N     n @"5  ` EDa` DM%D`TJ~  H `b r "b-"b'D@"9a%b\aF2a0aDa;aD`aDb-b-2aD"7"DbwPaba@aoVaa{aaa0aa aab\aD@"9aaaaȁa`aȂb-b-@aa2aaaa`aVab\ b% DbT$fb-b-̤a bb-bbJb-̓2b#b\b%b-b-- Dbw,bT`=r2qLT`=r  pXT`=rT]rrrT`=r qe  \r\r DrDrw" ]dj^bs"q"qTnVjjq\jjq\jjq\jjqTlKrT\% DqT$rd Tg`rT]rrrD@"9qTkTkhrT]rrr drsdrTlrrq\jjq\jjq\jjq\jjq\jjq zQQV[`e Dr llwd2rr|E DrTlT]rrrrFTkD ":rFTlrrT]rrr@r?\ rFrQ2rvTlKrTm;r drsdrTlrrrlT`=r\r  \rqT`=rT`~r  \rpX ne` P  <             sT r DrTs=T\ 2s DsTs=s,w wwsw DsTs=T\ 2s, Ds+Ts= H  ! ds  ! s Ts3shscshhTw" hs  ! lsœ ! lT\s>dsT\ d " ! бssȠh" F2h"F2nsTjT sATC s Lw ww"Mhss3sw"  s l  Lw"MhstTs3t+TgT$t,   th hdtt2thht[hhh2Dt%2n2L%2n t̵t lt bT!t.t țؚ1ht H tT h h fththh u h%2b%2Du" b Ȼtu ̹uȲluȭbu ȩh HTuu#TuDw " ! du 1duwd" ! u@Tuwb 1r "u"ub r "u"uT$u uT}M uT|n uh,"DuwT$uuud T$ lT}MuT|nuu uT|n uhT9uuT}- uT~uTuTuIPUUUDYY]] u  hh ! dv " ! u hv " bu hvMh ! l " ! v hvȷȳ" h " ! l " ! аv3 hvșh " ! lȑ " ! vGȄ" h ! lu  ! Ђl  ! dvu ! l " ! vv} lv b DvuEfu "l lu"  "   " ̥  T}-u uu ! dy dyd" ! v hx " b w hx lbd"w hx̎" hhh̅"  h w*ȫohw.ȥ`hȡhh " ! l ld" ! ДwgȂwS dvxvw\ lxvwe lxwv " ! dy " ! w lx " ! l o" ! w lxw dvDy, ! l,w ! w lxw lwl "ldvT$|{v||wT vdvw -Ew ud T|{|ju"  dv" ¿dvT'vvvxT!vv dvxxL l dyx" f1DyDu " b-sDy"lu-1,1x l̽ " 2 ! ll {xbܫ 2xlT|}x~̟("L m  w̍("b̂-Qv- v-w  2 ! dy dyd2 ! xyv-v-w dv bvx uf  $d T9|~vxn "xd ("DxTu"  "   "̼  MT}-u v "  b yV byCu̿" ̺"  ̴" T}-uyTT$|~u yTlT|~|~ys yl uf  "d T9|~TIuT$|~u  b (" bb r "y"yy% DyT9u" "  " T}-uu y b y Χn "lT9|~TIu  by n #lT9|~T$|~u y  by  by  y>>>Z>Z y]d ̹d T6|  H u" ! d{x ! l d{yd" ! lw ! zQX|{iDu " bs"{i"{e zqX|z bb r "z"z D{z%n  TIuX|z  dz T d fT z ||T}- z f  #d T9|~  b  z  bz  z  zKPK{i zTz|{ z  \|{  \| b { Ήn "lT9|~{TJ`u{i {\|{U {$\|{UuuD{z"  u w L" w   d d fd d T|{i {a  {c\|{ivT$|~u|j z" duLwl"  du̜" du̖"  dȕ" l̊"  Eû" w {X  ! d|y ! | ! l d|zd" ! {u"  "   "  T}-u|u{Tyz|  ! l  ! б| Tz| du|;u  ! lu ! |9|,Tv|7 |5Ty |7 l|; l|RT$|~u |PlT|~|~|j!d D3u-Tg |jlT|~|~ Du{{) @Lwh"   | 0|h|h|hb r "}"}T$}9|} h|Ĉ"D}8غ 1T}M|}!d d ȧd  TjT}l lȗl TjT,"D}T$}:};}|lT$ d}7T}M}7}2 })lT}9}9 L| -0 *d d TB}T HT$~~}jT~~~D  ! d~ d~d" ! }T~ j "  hhD  ]hwb ,r "~f"~c b  ! l н}~~h   b~f b  ! l Р}~~d}X  b~f }}% D}T9 D~!%~D}V("D~ T~l]d}Z ~E    d d T6~  b ~6  b~9  b ~C  ~~~a b ~[ ηf  "d T9~  b~a  bTJ`}V~f7T d}U D~uT}U}W~ mwT}-}U }[ *~h Q~T$F~~ Q  Qh  dC w dDT)*CD 1~  Հh~hXhXhX s 2 ! l l sd2 !  DE!% D TGΨd T d n d TjTl~D, QlT!C~n L~Dw  ! h dF n d  l d lTƸl " DTȸ " d ȯ(" d ȧ 1l 0ld T Z 0db " UT$DT d f l sd" ! l s " ! " D DT Dc  ȩd TC h s " nllpl s("`О9 !EU  έd d T9 " "dSwȄlTXl wl  ! wll "  3  wd ̼D(2lXܲ1 llXܢ 1̙  d d     TaC@ a  3   !A  2 D wadX!a  ! >  l b !K A !%  -D*T a a d" ! a  " ! G lI a a " ! a  ! f a  n  A ΦE  dT a a ܅   d! nA λ  n a  h! ! T h l! " DT!h ! d! ! l  ! "h ! dT$ԁլT hb r ""   D %b !nN  w   LEb  LE %b LΫEb  L "  )wT݂ n @DD !hT hT ./T+)؂ڃ0/T+ւڃ1/hT+)؂ڃ2/ m ?h lT,3T,<4 t5T-'5lT,<4 u5n @HH=    TaC@st2 ! a T$١ d_T"a )=w T a a  w       A a ;ºd 2  0 a a   AA;¡Þ ! a  ! >  T a % f a  dTx  T d E DT T.^ n H=   Taa a C@ a  d 2 ! A a ;   ! < "A A ;      VT,T,< t -d d T8T-'F ,n @HHH(10 *HALT     hD DfdL Ln d ?T,T,< thDT+)DT+)T-'TT?1n @ = g e;9a@TT4VG@ H`@b2  &  `TGb b hTSb  ` @@  )P dmddud fd "d("d id("d hȽ("fس 1 Rd("hȢAhi`h `dbkdTǡ        n f b b blfb4 d2 E@\ FNC@ 0 @6t# ]_#v ߛ#R G\5.B \ !0V X E5.BCߝ3_+ _t] A@]PV@ NZA@ $0V^`@ޚ ED%D I Jߜ8.E@%5]5.B\#'N"ޚ@Eޚ EZD^ߝ FߙU@Zu T8*ޜA\ 5 6ZVw ޜ\3 A] Z%`@'u Tv A\ZCZ q PD7V W^u ڇ%__v A\__ u__ t /_\ !\PV Z aߘ@X $ Z Z \ BT)_ Vp UXeX UTe f\ P5.B@_ t5 y\$W _ _[W$ZG%u.BޜAp : mGߜ 8.mߙ Aߚ:[ \ a $ ) @ߝߛ  \Z  ) A.6.v \( xNC'N x#0W Ө@ ^ t 7t# ]N Rp } @N$@[T N% @q ,!_+p ߝ#]W | ^_['Y$$N% @.v5 'ߟ0 &Sߟ q@xw#_U5o2Ө0\ &ߜ & \# uߛ3 V \ߟ ߟ ]M "p#!bY u nߘun0pq#*_ Nu#"վ*Q ^ !__t$ ] 5 6]Ө* * [5^  *W550q,ޜN =tX#* $]@> ݇%>ߟ >WT.7] $5]5 %ߟݬn@ Nu #] 5@= <*]  XUM=_ .ŘN_5 ) Lߜ>.) O.>ߜ 8Oߜ@PP ?h5? 8]@ #ߜ@ =ߜT *ߞ$\W [ \W [ 8ߟ$@]%u _$Tu ߟ$$u ߟ$%u ߟ$P5 ]@ mߜT :ߞ$\W [  ] @ژ@<ޜ 9.*]  XUM Q_XؠP>J 4]] X7X6]X5X4X $D0NVD@q ޜZ HuX#_N!ߟ _T@_ X_ qLޘHP>T q_Cq<ޜZ HV t p,H.]6 Ә@-(]\ޜ Y1NM\ߞ0pߞ ZY0[^ %Hߝ ] pߞZq$p$H XؠJ  (^XX ^A4T5_ $_D5ޜ ZVq u<ޜg efq X ߞ ZiN0eT0@_ X_@Tq Lq__،^$$Afߟ .]vӘgX ]@ P>u#h#[^ 1P>NLP>\ T0_ X$_$NV$ޜ p ޝ_ XU,i_ j^@qt  oX],R oT ؄i eХ iT@ `k3 p ` o\# o([]P@lV@V `V_ []P ߟDpߜ > (wv4vߝ wT4 ?ߘ@b ct*tP>NqP>]6 W5T00_X $_DsV$pX#j__ _5@F$iT$^p$i$_$tT3@[= kp 33`@Z#r\  oҘs o0$0VT $NP>]6 W5T00ߞX $_DV$pޜ#lS8t  tS8X#@__ X],` li@ X#_^$hT$l)$p_,$X#_F$tX$7] 0hq$>TX#] P>ܶq_ P>hP>TTRVڇ"_dTڇ>VuV!66ڇVڇ*Vڇ!Vڇ!6ڇ6ڇ!6ڇ6c6oV6# V P>Z P>T0% T0%-5K-Up U5U-U_4B_XP>@_@X#L_܀EP>@ _@_$LXހEP>@ ߝ ߝ ]v0]^X !^X% ߘԘ s0ߘ@# ][%(@#Nwu X] 5 6ߜ i @T6ߜ q V @oX ⟝ \_N.@p@p\E vq&\P % (  _X#@n_]G @nRh 4^%T0 \ߝ+v ^+ٟ\Gqߞ%ߞ 0ܟ r bN1Nj bܵ5q5 ^_00\\ b_ $b^00\ ^vq5 \ %֘ >ܞ b@A֞ > A٘ =٘@=䟙P> f۟@G@B@B@i V ߜ #] 0^%pT6㭽 ^\ ߜ ߝ(\ߘ ֟ \.|Nj i( ߛ֟N.]@2] (] ,] :T\ m][%  ߜ q5 V ߚV Xޜ ՟ \X_,\Z%iX@wޜ  ޘ0 bD b_\ u#c =d4cߝ dTTޜ#9_T"_ <\ ^@@*V Z4_^X !^XE [ W@t =چ>Z <ߝ u#d%49ߚ Z P> "hhhd d lp$`PHDEL1>m"PGPURG>`PGLTTB>I@LDELFLFi DMPDATE%DELFILE WRTOFPE@UPD500Ef`TRENDPE-`TIMUSEDPGUPTBD`PGLISTD`PGCMPRDe DTLLSTC,@DALISTC!COLSTSC5@COLCHGBLCMPDQO. LCLIUDO LCHUD2N}6LCCSSPN#@LBLDSRN LBATUDMLAXTRTLj LAVMDP3x LAVMCNLB)@LACTMTK"LACTAD( LACLPGKCLXTRTJFTN3A3=FTN3A4zzzz}.0%*z$zzzz    dzzD T~Czzzzc B`'# ̠Bl -Az .D` dzyezi$zTLz}f}U}k}fz{}g},DAL.O K$$ }. Tz}?z}.Tz}E uhh hTHD#|cT|TMe}/}gTM@zzzzz?/dzzz#Ddz\S AT>zzzz}.PF M= xꀨ@DUN J(P1PL M4K O  ytytMCOLECT %4)/@ NEWS ADELQMST CCS20 CDD02 SCRNFILECCS20 CDD01 TRANFL CCS20 CDD01 DLYASSN CCS20 SYSVOL ACTIVE CCS20 SYSVOL TRNBCK CCS20 SYSVOL y` x!+I2@ yx x&!+I2@ yx!)BI2@y xl")`I2//yx!+I2@yx !)QI2@39400186459 1JUDY MD, KENNETH H 999 Z ST. \  3:}AL*}O /$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmMACROS`MACSKLXREF `TABLSTnPASS3 I PASS2 / PASS1 SKFILEHELPERLIBIDO~ EDTLPF2@DSKT50@DSKTAPz IOUPV4U PBDFILC@REBFDDMNUPROULBUFF`% TSLOG J@SI UTDISCUTBATCc#UTIL 7 PROCED<7SCMENU*SYMENU;s@SYMSGFrUSERID/ UTPURG!UTSAVE! @UTDISM!UTMOUN!UTCOMM! UTRENA!UTLIST!i UTCLEA!%UTDELE @UTSTAT UTDEFI o(UTINIT Y@UTFLUS F UTDISP - `UTBATS `UTPRIN @UTSET UTHOST@SMCEDT&SMCMON& DSORT &.7EDITOR%6`UTRMLD# (UTORLD"$UTLOAD" UTCOPY"J UTRELO" UTDUMP!UTCOMP!`FTN3B1)B0FTN3A5) FTN3A4(`FTN3A3( FTN3A2(FTN3A1(3*CPFILEH<SMCFMG&SMCIMG&SMCSRT&@FTN3ER+B" FTN3F1*@FTN3E1*%FTN3D1*7$FTN3C1)*RPGSM71 @RPGSM61 `RPGSM50RPGSM40 RPGSM30@RPGSM20@RPGSM10RPGSM00 RMUCLO0_ RMUCFT/7RMUCF0/b'`RMUCSW.: RMUOPN.RPGSM91?RPGSM81.LLTPRTG @LLTBLD^t'SELMU 2^MOUNT 2M`TRACER2FSWITCH2BCATFIL2/ CHUPD266CHEKID6@CCSSPC6c#@CCSPAS6b`CCSDMP5$`PHDEL1>m"PGPURG>`PGLTTB>I@LDELFLFi DMPDATE%DELFILE WRTOFPE@UPD500Ef`TRENDPE-`TIMUSEDPGUPTBD`PGLISTD`PGCMPRDe DTLLSTC,@DALISTC!COLSTSC5@COLCHGBLCMPDQO. LCLIUDO LCHUD2N}6LCCSSPN#@LBLDSRN LBATUDMLAXTRTLj LAVMDP3x LAVMCNLB)@LACTMTK"LACTAD( LACLPGKCLXTRTJFTN3A3=FTN3A4zzzz}.0%*z$zzzz    dzzD T~Czzzzc B`'# ̠Bl -Az .D` dzyezi$zTLz}f}U}k}fz{}g},DAL.O K$$ }. Tz}?z}.Tz}E uhh hTHD#|cT|TMe}/}gTM@zzzzz?/dzzz#Ddz\S AT>zzzz}.PF M= xꀨ@DUN J(P1PL M4K O  ytytMCOLECT %4)/@ NEWS ADELQMST CCS20 CDD02 SCRNFILECCS20 CDD01 TRANFL CCS20 CDD01 DLYASSN CCS20 SYSVOL ACTIVE CCS20 SYSVOL TRNBCK CCS20 SYSVOL y` x!+I2@ yx x&!+I2@ yx!)BI2@y xl")`I2//yx!+I2@yx !)QI2@39400186459 1JUDY MD, KENNETH H 999 Z ST. SAN DIEGO, CALIF. 9201071455516160000SMOKIT 000000000000000 9422298527 00000000000031216790007 10004121879 1218791218791216790420790223670000024530001005760000000000000000000000000002487000 000 DEL3000000 060  3= N3A1LBB20YNN 1ACA20 210*0***CA013081G12017800 00000000000000000000000008520606207900009812311 750091278X0360100000000000000Y0000024530000000000000009812300000000000000245300000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000600000545484000835773007500000015006 79CX77000A0000000000000500000000000000 002017910 7800000000000002453 999` PkR9SAV4 R44 A RPG CCS 3.0 SL-149e`@P */DKPSY\g ,39400186459 00031307 SRA1A2A3A4******************************************************BZPPR1R2R3R4 NA************************************************A@  1TER NEXT FUNCTION OR ACTION,RES1(ULT,LETTER REQUEST,COMMENT 4/555-1616IP iy MK\ d122079 !SUPE0003ALL 0003\T\ (&  "80b010203   0360000102BZOKSRPPRL:0 ?!P8HypPJcj1.<=?(,>***A $/^sC,"39400186459 00031216790007 !E A B,%N,OLPM#&ACTVERTBCCS20 CDD01 COSIGNERCCS20 DAQUE CCS20 CDD01 UTIFIL CCS20 CDD01 LTR1LTR2  )1TM@ KTmytyMM (TdyMKTZT$ 1\T1  drTQÀ\yM "T[yz߀MȤ  ̺ "zdzdȕdT\y\y>Ṃ !#T]y\рсM̙ ̒ !Tky\M d fy[ 1 d lTdy>MKTZzdTzdU̲d̳dz d (d ľhT1z߃ W ̻ Al TXܯ 1T[yz߂*MM } v !oTz d\zd\zdq\z߂\yz߂M֬ל UЬ؜ O !H d dzޔ  f 1\yz߂M̩ ̣ ̝ ! lל  n 1TkyM d l lTdMKTZ 7,dG 7-dH 7+dITȁGl d  ;l l d fy 1Tmy`MM  3> !!TYyhM !\yM dV  1 l l l\`MK\XdhYdi d d l nܬ 1\y~M̳ !)T[yz߁hM̩ ̢ ̜ !zdzd dTkyM d lTd~MKTZ lTmy\yM dyrM &\yMK\\yy M &\y MK\ d\yyMM  3 l\yMMK\\yy/M &\y/MK\T\  &  ( ! \ۂ#\ "~ ", T[y M l d TYy M lM  !_  X W ެߜ ddTQ րlTx{xǁM I H G {pH ydyd dS ̜  dT[y MM % d%_ 4 lx laT ",  d[ " lTQ‚[s[ d fy 1 d}TmyoM ldy̮ !pTYy~ǁhM̤ [̝ !b l $ dT1~ǂ̐ Ts[~ǂ[NN $̴ \~ǂ~ǂT~̎ \׀  \ܑ 1TQ~ǁրTkyM\yM\т's l lTdoMKTZ\ހրdd dT[y\z߀MM    2 lT {f &T^$\z߁Tˬ̜  ƬΜ \\' !=zH%d\΃zTd 4\"! 1b&w  `s{\zT\zTzy̼H"l\z- 1  , df<f= d l < d6l.l " ln "~ \d_  l l fy 1TmyoMM "TQz߁ցh\hT[y~ǁhM d ܤ 4T~ǂTz\~T~zGr ? ;Tz\~ǁT]y~ǂM̫ 1% d̢ $ l~\ʂz\ǂ~\~zG TWy~ǁM̊ $ lfHdTkyMNT< d  l,ljT\  6l lW $W  6T TZl ldhXdi !_  l d,N lTQz߂)ր̦  l ld\ł]zTzzlT[r TWy\z߁M dSM % d ?̷ !%2=d>d $-dO\.O.O ,l\=āO=O l lllllll .# l l duHu?0# END OF SEARCH BFLEGALDE dyiyhhlth h " h  hTsTQ‰XsX hrfg 1 h "ȽhTLKLT[y\z߁hMM  "ThTsTN N 1 dh\ЁKKJL[d[h\z߁ՉXsXN @\с\z߁ՉVсÉV\z߉GHщIH\z߁րщF\U 0d d\KсׁL  d_TQz߁~lj_ 1TYy\z߁hMM   !Iz lTW T1`` ; 93 $\ ld !  l\~lj`ր d\TLKL l lTdy`MKTZ d dyiYdyhH 99999999990000000000P(   BORROWER'S MASTER SCREEN  SUPV ACCT # $@+TIMEF05!>QUEUE # .C5KACCT #@PU0!` POINT SCORE /e5nAMT DELQFs wxN! ACCT TYPE -5 DELQ DATE Hkl! STATUS CD 125PREV QUEL(HOME # !PP FLAG 15PRIORITYLSAL CD5 NEXT CONTACTH !  SOC SEC #.   ! & ADL ACCT #N  3?. + 0 5! ? SAV ACCT # GWORK # L  SEXT  X! b CK ACCT #!l ENTRY DATE.qe~NUMBER COSIGNER ! LAST UPDATE ._!PERM COMMENT 1: 2!PERM COMMENT 2: 2!PERM COMMENT 3: 2LAST ACTIVITY DATE AC RS LT COLL COMMENT (PLEASE ENTER NEXT FUNCTION OR ACTION,RES((ULT,LETTER REQUEST,COMMENT l l l\`MK\XdhYdi d d l nܬ 1\y~M̳ !)Tyz߁hM̩ ̢ ̜ !zdzd dT*yM d lT~MKT1307ENTER ITEM,CHANGE OR NEXT FUNCTION OR ACTION,RESULT,LETTER REQUEST,COMMENTENTER NEXT FUNCTION OR ACTION,RESULT,LETTER REQUEST,COMMENTINVALID REQUEST, PLEASE REENTERJK;(A dB " Y<!9 =d dd l)hT[ytMM h "h h 1TLKLh  2hל 2%hTQъܔܓh\MTъd\ъh\Ԍъ d"! ,{ y @sKJpdQdOTz߁QOO ! o\z߁QOO "oκ 1? #̓ lY dRdS dMTx{xǁM l lTсTW PlHlΑl ddQdd $dOl   TQz߁QOъO ̝h\ƁQOъO̔l՜ Hnjl(lM h hTzߌKъL T\ÎÀъδ dl d 2H d ld \с l dOTLKсOL l1 $ ld dd̒h̎h ̊hTQKсŔ l L$l\Āъ̏ lTဨ\KсOׁLL \ЁĀс l dT1 #l l̼9\  l@ dO\Oll l̛>\̀ %TҎܿ dM  lTdyMKTZy ' Tyz & \zzG & \늻zG & & 3dJ;HTThhh\hhhh:AA1                        END OF ACTIVITY HISTORY ACTFIL CCS20 0482TFIL 0482 hhRh h fy 1Tmy MM "wTQz߁ցhdpT[y~ǁhM $  "{Tz߁~ǁցNN lTx~ВM dl\#{xǁM̴  \ׁ#ŒŁN  dEA .l\с#~ВM̑ l.TYy~ǁhMM  "~\z߁~ǁցṆ  lTQс7dC TсTW#TLKсׁL  9 Rd ""T Tl 4\ 3T T< !> !:T  ! d lW  3@fn ,l\KʒL l dF l lTd FMKTZTkyMHM91T h (hTQzߓӓ\Óԓ\񀨁ÓzߓdڈdTHҁN<_DLADDACT CCS20 SREQDL CCS20 UPHSTCM CCS20 @,UH'0Nl1E( PTERT T1 95 2J   \
”  TQÁրс\z߁րсdd h fyز 1Ɣ Tmy݁M̼ \yMM !r T_yсM :TkyM d l̖ TdݔMK \MKTZTl "T\T1  93 !Tl dQ\耨” ̳ l lT !̩ ! , lG !ADdO=dP 8 d\ IlT񀨁QÁGÁNN #lTQTۀQ 1TȾ TQh\hƀQ"h\rOӁO\΀QOԁOh\ĀQOsOJ 5\ǴTʓzɄd \Gˌlٔ `T灿zߔŁNTQրс h<\Ǔȕ d fy 1Tmy΁MM !#N r T_yсM !TkyM \Ӂzߔ  l dTdΔMKTZ ld!8k찖 * 쩖 -̤hTQӁO/O 얖 2.̏h\Gd  ʌd dd6dP     \QOсāOO lTQсāP l  ldp4,d 0dp< 0ȌlTTLKсOLT~ 4Tv T<o 6 3T'H$TThhhhhhQhc\ hjhv hd hh*?506179:8324;NAO m{wh   h hlT# hFf" 1Td)Ud*d&T1–Ƚ mȹ h h\퀨ȫ TQÁ' h\ۀș Iȕ hؑ\ˀ   d(\ $ ̷lМdO 1؜ %l\O+OT€&' %l'    TQGz߁ YlTzTځT1Ė \〨z߁܁ d\쀨 /\܁\̀z߁܁IlH &G  #l h8\zߘN l lTIh%\"lTz߁ḑ$lq 7̙ 4 6TܙTz߁Tz߁ہz߁ځƁN N %\m\z̚  _TQz߁ܖޖ ( \فT1     \݁l\ \ہ\Ԁ–\ЀÖ 99 6 93 &T d d  l 2l 21 d(\Ė̝ j̘  lT1 X l\􀨖   TQŁ l)\ŁIḻH &G  #l dN\ԖNT %Tށ%\̬  ̩ T(d\  T+ ! \Ł dO؜ $\TQO+O& y' y \z߁T̰ wT1Ė  df 1 ddIlH %G  #ldTIdN\lTl$Ôlq 8̵ 5 !3\\G d\z߁܄l lTQzߘN \ɁGl̤dǜ"̯lT5l d"f 1\ց+ց( \z߁\z߁TlTdMTˁ#{xǁM dS lJ   ܦTdH=r T 73dr T_yMM !  \yM (TdyM?e  3A MKTZT͚\y MK\HEX Tky\M\ytM\yM\yM\yM \yԁMT !? h fy 1Tmyy>MM !T[yzɁM  MK\yMTMHMT DADCDFNARLCSEADSP1P2P3NQOASS h9 SE > hV8  h)h׈h 1 ȼ ȹ  ȶ ȳ Ȱ  h Ȫ   hȡ HTThTFMTALL REML 7{pH .W  X  h h ( h   h  1 hȾ H TTh hCT hhTќ h h hTQќ h 1\Àќ h h\؀ќHTThhhh\hhhhUX X 0h h h8Tik3 hh!T1ki   1L !Ha h* h& h hȾh4\iȵ ȱ 1)ȭ !%̽ h \iآ 1Ȟ h / djTQkjkT 9di̖ l̓dk7TikHTThhh\hh\hphhh\hmZܥFGHJKLMNOPQRSTUVWXNAmf\{wh   h%T#Td&\d'T€&' 6 Ȳh%h% 5  5֔ !TQGz߁ YhT&z\\z߁܁ d&IlH %̛G ̖ #l h0\ĝ&zߝTIh%\&"lTz߁d'$(lq 7 4 6T \Tz߁Tz߁ہz߁ځƁN N $\\ߝ$z  |TQz߁ܝ)ޝ)\ȝ  \T1&\** * 7& # $\ d+ d,  l 2l 21 ̨d(T\ŀ&     \̽l\ޝ ATQ lIlH &G  $d& d\ӝ&T 2\ \!̸ T  T"̺ ̔ \# < l\&ؔ $lTQЁ+& w' w 9\z߁\ u\Ԁ d&IlH &G  #l d\&TIl\&lTd'$(lq 8 5 !5T\G d\z߁܄l lTQzߝ&\ǁGl̘lǜ#̦d&T5d lFf"ܯ 1Td)Ud* lfܜ 1T-.\+ց( \)z߁)\z߁lTdMTˁ#{xǁM dS lJ   ܘT&dHHHX%X#X!XXeX"X(XXXXXX X X XXXX]XwH2 H-3Bk2"4` aADePaa AA a a Vh`"&h Hq`U`X`HX " hU%HhB4 "c" H h" "" H3h2 HX/ l* "  f  ` `z߁QOOx `"i JHh HX l`Ax9 `"i H"h! HX @    `ĀъxY `"i QHh HX `Ax `"i H%h$"h Hh75 @ 8 0 0Fh `&`+x7H_h^HG H[X[X6FF rDHLhKH4 HHXHX.  `'X F" X4i  ; )  4"  ۡ 2 1 7GlO mx9  `"i HhH HX %00hh  d " dh  0F 0 04hȻ 0F  3B 0 04h  `­é @HuX5 H,h* HjXLXXXc hd 'jb PALGO"#2@2 hGh X A ,#)$h.D@@" TK ""  (h {xM hPf Ǡ#"2X"2Ȱ h٣2 hh( h 0F袈ȼ&  x&dhw碆u Ggb# gY ` ` 0H_V Q J0X`DxHh"h H  F` 4@zxHX H{hy HXXXXҘ1O à hR & h( h !2f#2  |2" vAfwAw r"#2#2_]c`_R^YRANS"#2D#2 hKXh X A ,#)$h/D@@" TK7 ""  (h  hh( h 0F FԸߠ % hh¼Š  (h 0Fȷ hȲá Ȧ ` ` 0Hȟhș 8 ÌH 0F| unt teX`f@ @ UM ,@??@KhT [ !JAh\\ !C h6 h @h # `hʾή' ,#Hl!hĜ "lȽ`h l h l lTSMDCPGg l l!@ HHTT h h h _h\h\h\h\h\hDE 9 -099/99/9999999.999/999-9999-99-9999 /"+ "&h h hh!+ΈhT1Aۘ  hTAh\Ah\AػػӜ H hȝ!∭h\̀ѦAȨ ׈h\ͥA؜Έh\Ѧ  1! # l 3l\ ̰ hTQѦA ќ \  &HTTh\h\hhhhhhhhh\hh\hOU FILE MANAGER ERROR: FILE NAME = , REQUEST = , ISTAT = . #CREATECLEAR DELETEOPENFLCLOSFLLOKFILUNLFILGETFCBUPDFCBRENAMEVOLUSEPUTS WRITERREADR GETS UPDRECDELRECCOMFIL7m?- !TQ¦æĦT ! ! , h\*!ħ"! Kh \ݦħ$&ħ%& 9hTL(ħ#)))*HTTh\h\h\h9 hdl 2 h hT h !h ( h` n - nn!\yM !@ HHTT h h h h h h\ h h hYH h HX  sD  1  : E /` `"i **̜ h   l M 1 lH TT h\h h hn 1á ! hȼhȷ hȲ hnة 1ޘaژ]Tz{?Tz{? >ȕ h\3> @ 8! d9 $AdBf 1k 5; \z{?-> l,n 1M  !PCJ= K" 8 % #"DdEd"lFl dGTG57Dd Hl8  d2Tà2 6 2KHTpTvh\h\h\hB/h. h,hh!4 A hHh h A hӨh  Јn>@2 h ÈnػػBHTpTv h\h\h\ h\h(H hTpTvh\hBLH   B 9*  3C1`(z{?LOADhHXu=yBk{&88PӚ ӫ| AFF0UӚӛQ6[ӗ0123456789ABCDEFٍp ׫9BivԻ%u=!|d@y6 `R&8<8REPFMPL14pFMPA15-FMPL15jJFMPA164FMPL16lFMPA17AFMPL17hFMPA18DFMPL18jFFMPA19KFMPL19m2FMSAVAYSTRSECySTRLEN-DATBASSWAPAR B* @`@t*Rw_˂Fb{^ X07@`7 T@+O @C H? `a A4a9 a: a>afae/]    T AA e" !14;E+H kAYd P e #D asAtthT` + ‘s hiheXaeAfa aoma/y Aa-X 4-Th `efTWva 10Q6 X2X af (X E XP aa9 XI1**E*T a 3 Q6X aX ENTRY POINT TABLE - Xg X ***COM Q^ X ***DAT Q^lRA A. a a }|0Cda- c A: a a a .. a.ѐv aH- 4|a h- Xg! X`QZ 4XYn  43b4b A9 "X 9"9XX X  (&$" (cB aaaXB0A B(aa?*PAGE E *PAGE8htsH h z2z '\z>zzz\z-T}yPyAz '\yAzzz\z-\yPyzz̹z̳ -T~ yAzzzT}yPzTMz-\yPz dzy 4zLdzzHdzzDdzzdz !  !  :  4  1TM l fyOܸ 1 dz\T7;X%X#X!X|WX|X{XXX|bXXXX X |X |rX{2XXX|X}H2 H-3Bk2"4` aADePaa AA a a Vh`|{H"h! HX @    `yzzzzzx}W `"i  FILE MANAGER ERROR: FILE NAME = , REQUEST = , ISTAT = . #CREATECLEAR DELETEOPENFLCLOSFLLOKFILUNLFILGETFCBUPDFCBRENAMEVOLUSEPUTS WRITERREADR GETS UPDRECDELRECCOMFIL7?- T}O}~}}}}T~f} ! ! , h\}}}}}} Kh \}}}}}} 9hTL}}}}}}}HT~0T~>h\h\h\hh Hq``X`HX " hHhB4 "c"H h HX  sD  1  : E /` `"i mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmE 3FAL.O K$$ }. Tz}?z}.Tz}E uhh hTHD#|cT|TMe}/}gTM@zzzzz?/dzzz#Ddz\S AT>zzzz}.PF M= xꀨ@DUN J(P1PL M4K O  ytytMCOLECT `G 3G3wAL_3wO K$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmCCS20 O ;CCS20 O$#$$ O';& O5$$ O"M$$ O* CCS20 M? M!4G M3 M9t M0CCS20 M)CCS20 M$$ M,59CCS20 M0S MCCS20 M M M 3W M CCS20 M 0'CCS20 M K M 7 M 9# M " M CCS20 M  M ; M 1& M * P-CCS20 M8(!CCS20 M  P /LA  N 4OLA  N CCS20  N %LA  N ;1LA  N ,&LA  N %"LA  N ;LA  N LA  N 0LA N "LA N *LA N  LA N  %LA N ! LA N !LA N #LA N #LA N 9)LA N 80,LA  O "LA  O5`LA O&.LA O)(LA O*LA O+LA O-9LA O1 LA O15LA O4 LA O36Y$$ O5LA OKLA OXLA O$LA O&OLA O LA O#:LA O5LA O; LA O(sLA O4LA O/LA O)lCCS20 O   O LA O 2+LA O LA  O $aLA P -0CCS20 P 1LA P14CCS20 PCCS20 P11CCS20 P9CCS20 P CCS20 P0/$$ P $$$ P$$ P$$ P5$$ P%$$ P  P +; CCS20 P -,$$ P / 1$$ P 56CCS20 P m$$ P{ P&$CCS20 P LA P  CCS20 P 7CCS20 P ACCS20 P 5 CCS20 P  LA P!QCCS20  P +YCCS20  P  CCS20  P CCS20  P ,zLA  P 9LA  P5CCS20  P0 LA  P21CCS20  P4/LA  P4vLA  P CCS20  P 81LA  P .LA  P -LA  P ' LA  P )$$  P /3LA  P 2  P"!LA  P  P $LA  P '*LA  P +,LA  P $.LA  P 1$$  P$-CCS20  PCCS20 O5PLA O3CCS20 P 9$$ P -&CCS20   3H3P -CCS20 P CCS20 P #7ECCS20 O &CCS20 O :LA O .4KCCS20 O 6qLA O ,VLA O CCS20 O +1CCS20 O :FLA O 'LA O(4 LA O,LA O-LA O1LCCS20 O +CCS20 O ,-LA O 4mLA O 1vCCS20 P&CCS20 PCCS20 P(CCS20 P CCS20 P" P P+ P" CCS20 P#LA P%CCS20 P%4 LA P'CCS20 P/ LA P0 CCS20 P1LA O#LA O %"LA O %vLA O 9LA O 9'LA O &5LA O X O O 4.CCS20 O. O:% O;LA O2Y O;LA O O  O# O%2 O(_ O3LA O") O5, O !CCS20 O0LA O :LA O/ O +CCS20 O 4LA O"LA OCCS20 O&ALA O,02 O! O ,%CCS20 O! O$$ O * O CCS20 O &d O *8LA O ) O .!LA O +LA O '. O LA O ;LA O  tLA O 29 O / O /''LA O 3  O 2LA O 4  O (tLA O #%CCS20 O 9JLA O mCCS20 O &MCCS20 P2) O7-/LA O76LA O 4/LA O 6#LA O 9) O 4[LA O 99ECCS20 O5 O LA O 3/ O 4CCS20 O * !LA O jCCS20 P1LA P5 O  CCS20  P J  PLA  P{LA  P._  P8^CCS20  P,  P#$LA  P#'CCS20  P.VLA  P6+LA  P #mLA  P CCS20  P2 s  P9LA  P-CCS20  P*V$$  P-eLA  P CCS20  PLA  P CCS20  PLA  P1*CCS20 P  LA P !#$CCS20 P % P &'LA P &7o P/<LA P '5LA P9bCCS20 PwLA P$CCS20 P4ELA P;CCS20 P" P4 P* P2  3I3__mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm  3J3mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm+(  3K3mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm+  3L3mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*  3M3mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*  3N4mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*  3O4mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*  3P4+mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*  3Q4?mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*  3R4Smmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*  3S4gmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*k  3T4{mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*V  3U4mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*A L 3V7 19LA 06 00 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30! 31" 32#CCS20 00LA 00LA 01$LA 02%LA 03&LA 04' 20 21 22 23 24 25 26 27 28 29 30! 31" 32#CCS20 00LA 00LA 01$LA 02%LA 03&LA 04'LA 05(LA 06)LA 07*LA 08+LA 09,LA 10-LA 11.LA 12/LA 130LA 141LA 152LA 163LA 174LA 185LA 196LA 207LA 218LA 229LA 23:LA 24;LA 25<LA 07*LA 08+LA 09,LA 10-LA 11.LA 12/LA 130LA 141LA 152LA 163LA 174LA 185LA 196LA 207LA 218LA 229LA 23:LA 24;LA 25LA 28?LA 29@LA 30ALA 31BLA 32CLA 130LA 141LA 152LA 163LA 174LA 185LA 196LA 207LA 218LA 229LA 23:LA 24;LA 25<__~Z`SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097UEST AT LOCATION $$$$ X0300003ERROR - ILLEGAL FILE REQUEST PARAMETER AT LOCATION $$$$ X0300004ERROR - ILLEGAL MONITOR REQUEST AT LOCATION $$$$ X0300005ERROR - ILLEGAL REQUEST PARAMETER AT LOCATION $$$$ X0300006ERROR - ILLEGAL I/O REQUEST LOGICAL UNIT AT LOCATION $$$$ X0300007ERROR - ATTEMPT (YL 3W7AL'7O K$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm 00 CCS20 00 LA 00 01 NEWS 02 NEWS 03 NEWS 04 NEWS 05 NEWS 06 NEWS 07 NEWS 08 NEWS 09 NEWS 10 NEWS 11 NEWS 12 NEWS 13 NEWS 14 NEWS 15 NEWS 16 NEWS 17 NEWS 18 NEWS 19 NEWS 20 NEWS 21 NEWS 22 NEWS 23 NEWS 24 NEWS 25 NEWS 26 NEWS 27 NEWS 28 NEWS 29 NEWS 30 NEWS 31 NEWS 32 NEWS LA 01 NEWS LA 02 NEWS LA 03 NEWS LA 04 NEWS LA 05 NEWS LA 06 NEWS LA 07 NEWS LA 08 NEWS LA 09 NEWS LA 10 NEWS LA 11 NEWS LA 12 NEWS LA 13 NEWS LA 14 NEWS LA 15 NEWS LA 16 NEWS LA 17 NEWS LA 18 NEWS LA 19 NEWS LA 20 NEWS LA 21 NEWS LA 22 NEWS LA 23 NEWS LA 24 NEWS LA 25 NEWS LA 26 NEWS LA 27 NEWS LA 28 NEWS LA 29 NEWS LA 30 NEWS LA 31 NEWS LA 32 NEWS __ 20 21 22 23 24 25 26 27 28 29 30! 31" 32#CCS20 00LA 00LA 01$LA 02%LA 03&LA 04'LA 05(LA 06)LA 07*LA 08+LA 09,LA 10-LA 11.LA 12/LA 130LA 141LA 152LA 163LA 174LA 185LA 196LA 207LA 218LA 229LA 23:LA 24;LA 25<LA 07*LA 08+LA 09,LA 10-LA 11.LA 12/LA 130LA 141LA 152LA 163LA 174LA 185LA 196LA 207LA 218LA 229LA 23:LA 24;LA 25LA 28?LA 29@LA 30ALA 31BLA 32CLA 130LA 141LA 152LA 163LA 174LA 185LA 196LA 207LA 218LA 229LA 23:LA 24;LA 25<__~Z`SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097 19LA 06 00 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 ./  3X725 26 27 28 29 30! 31" 32#CCS20 00LA 00LA 01$LA 02%LA 03&LA 04' 20 21 22 23 24 25 26 27 28 29 30! 31" 32#CCS20 00LA 00LA 01$LA 02%LA 03&LA 04'LA 05(LA 06)LA 07*LA 08+LA 09,LA 10-LA 11.LA 12/LA 130LA 141LA 152LA 163LA 174LA 185LA 196LA 207LA 218LA 229LA 23:LA 24;LA 25<LA 07*LA 08+LA 09,LA 10-LA 11.LA 12/LA 130LA 141LA 152LA 163LA 174LA 185LA 196LA 207LA 218LA 229LA 23:LA 24;LA 25LA 28?LA 29@LA 30ALA 31BLA 32CLA 130LA 141LA 152LA 163LA 174LA 185LA 196LA 207LA 218LA 229LA 23:LA 24;LA 25<__~Z`SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097UEST AT LOCATION $$$$ X0300003ERROR - ILLEGAL FILE REQUEST PARAMETER AT LOCATION $$$$ X0300004ERROR - ILLEGAL MONITOR REQUEST AT LOCATION $$$$ X0300005ERROR - ILLEGAL REQUEST PARAMETER AT LOCATION $$$$ X0300006ERROR - ILLEGAL I/O REQUEST LOGICAL UNIT AT LOCATION $$$$ X0300007ERROR - ATTEMPT TO PERFORM STACKED I/O REQUESTS AT LOCATION $$$$ X0300008NOTICE - THE CCS SYSTEM HAS BEEN DISABLED. X0300009A MASS MEMORY I/O ERROR HAS OCCURRED. PROGRAM TERMINATED. X0300010ERROR - ATTEMPT TO MODIFY THE FILE REQUEST BUFFER AT LOCATION $$$$ X0300011PROGRAM ABORTED X0300012@@@ ## ## ##:##:## X0300013C C S LOG OFF ##:##:## X0300014@@ IS INVALID X0300015ILLEGAL LOG IN X0300016REQUEST @@@@@@@@ CANNOT BE FOUND X0300017ERROR - @@@@@@@@ IS TOO LARGE TO BE EXECUTED X0300018ERROR STATUS $$$$ DURING OPEN OF FILE @@@@@@@@@@@@@@@@ X0300019ERROR STATUS $$$$ DURING CLOSE OF FILE @@@@@@@@@@@@@@@@ X0300020ERROR STATUS $$$$ DURING READR OF FILE @@@@@@@@@@@@@@@@ X0300021ERROR STATUS $$$$ DURING GETS OF FILE @@@@@@@@@@@@@@@@ X0300022ERROR STATUS $$$$ DURING FORCE FILE CLOSE X0300023PROCEDURE @@@@@@@@ CANNOT BE FOUND X0300024SYSTEM MESSAGE 0025 X0300025SYSTEM MESSAGE 0026 X0300026SYSTEM MESSAGE 0027 X0300027SYSTEM MESSAGE 0028 X0300028SYSTEM MESSAGE 0029 AL7O L$$ UTILITY PROCESSOR NOT FOUND X0300030REQUESTED COMMAND IS NOT LEGAL X0300031ILLEGAL COMMAND 0  3Y7ERROR - PROGRAM PROTECT VIOLATION AT LOCATION $$$$ X0300001ERROR - ILLEGAL PROGRAM ATTACHMENT AT LOCATION $$$$ X0300002ERROR - ILLEGAL FILE MANAGER REQUEST AT LOCATION $$$$ X0300003ERROR - ILLEGAL FILE REQUEST PARAMETER AT LOCATION $$$$ X0300004ERROR - ILLEGAL MONITOR REQUEST AT LOCATION $$$$ X0300005ERROR - ILLEGAL REQUEST PARAMETER AT LOCATION $$$$ X0300006ERROR - ILLEGAL I/O REQUEST LOGICAL UNIT AT LOCATION $$$$ X0300007ERROR - ATTEMPT TO PERFORM STACKED I/O REQUESTS AT LOCATION $$$$ X0300008NOTICE - THE CCS SYSTEM HAS BEEN DISABLED. X0300009A MASS MEMORY I/O ERROR HAS OCCURRED. PROGRAM TERMINATED. X0300010ERROR - ATTEMPT TO MODIFY THE FILE REQUEST BUFFER AT LOCATION $$$$ X0300011PROGRAM ABORTED X0300012@@@ ## ## ##:##:## X0300013C C S LOG OFF ##:##:## X0300014@@ IS INVALID X0300015ILLEGAL LOG IN X0300016REQUEST @@@@@@@@ CANNOT BE FOUND X0300017ERROR - @@@@@@@@ IS TOO LARGE TO BE EXECUTED X0300018ERROR STATUS $$$$ DURING OPEN OF FILE @@@@@@@@@@@@@@@@ X0300019ERROR STATUS $$$$ DURING CLOSE OF FILE @@@@@@@@@@@@@@@@ X0300020ERROR STATUS $$$$ DURING READR OF FILE @@@@@@@@@@@@@@@@ X0300021ERROR STATUS $$$$ DURING GETS OF FILE @@@@@@@@@@@@@@@@ X0300022ERROR STATUS $$$$ DURING FORCE FILE CLOSE X0300023PROCEDURE @@@@@@@@ CANNOT BE FOUND X0300024SYSTEM MESSAGE 0025 X0300025SYSTEM MESSAGE 0026 X0300026SYSTEM MESSAGE 0027 X0300027SYSTEM MESSAGE 0028 X0300028SYSTEM MESSAGE 0029 X0300029REQUESTED UTILITY PROCESSOR NOT FOUND X0300030REQUESTED COMMAND IS NOT LEGAL X0300031ILLEGAL COMMAND FORMAT X0300032FILE REQUEST REJECTED X0300033FILE COULD NOT BE LOCATED X0300034MM I/O ERROR WAS NOTED X0300035DISK UNIT SPECIFIED ALREADY MOUNTED X0300036FILE REQUEST ILLEGAL X0300037FILE IS CURRENTLY OPEN X0300038MISSING PARAMETER X0300039ILLEGAL GETFLD STATUS X0300040VIT COULD NOT BE FOUND X0300041FILE IS CURRENTLY LOCKED X0300042INTERNAL FM ERROR X0300043MAX. NO OF OPEN FILES FOR A SINGLE USER X0300044MAX. NO OF OPEN FILES, RETRY X0300045EQUIPMENT TYPE NOT FOUND X0300046VOLUME NOT ON SPECIFIED DISK UNIT X0300047VOLUME WAS ALREADY MOUNTED X0300048"  3Z8THIS VOLUME IS DISMOUNTED X0300049MOUNTED VOLUME HAS OPEN FILES X0300050WRONG VOLUME MOUNTED X0300051PARAMETER ENTRY ERROR X0300052VOLUME HAS OPEN FILES, NOT DISMOUNTED X0300053NO KEY ENTERED FOR INDEXED FILES X0300054INSUFFICIENT MM FILE SPACE X0300055INSUFFICIENT FID SPACE FOR FILES X0300056FILE NAME/OWNER NOT UNIQUE X0300057FCB INDEX OUT OF RANGE X0300058FILE REQUEST BUFFER NOT INITIALIZED X0300059UNDEFINED FM STATUS ERROR X0300060FILE HAS A SET OF LOCKED RECORDS X0300061DIRECT FILE RECORD LENGTH EXCEEDS 256 WORDS X0300062INVALID SYSTEM PERIPHERAL NAME X0300063RECORD LENGTH TOO LARGE FOR THIS COMMAND X0300064RECORD LENGTH NOT EQUAL X0300065FILE TYPE NOT EQUAL X0300066PRIMARY KEY NOT UNIQUE X0300067WRONG KEY VALUE X0300068ILLEGAL PARAMETER RECEIVED X0300069INTERNAL UTILITY ERROR X0300070ERROR IN COMPUTING MM WORD ADDR X0300071FILE FORMERLY OPENED FOR COMPRESSION X0300072VOLUME 2 MAY NOT BE MOUNTED X0300073CLASS CODE IS NOT A DISK X0300074THIS COMMAND IS ONLY ALLOWED IF ITOS IS DISABLED X0300075THIS IS A SUPERVISOR COMMAND ONLY X0300076RECORD LOCK-TABLE IS CURRENTLY FULL X0300077RECORD IS LOCKED BY ANOTHER USER X0300078FILE REQUEST BUFFER NOT PROPERLY INITIALIZED X0300079FILE SPECIFIED SHOULD BE A DIRECT FILE X0300080TAPE RECORD EXCEEDS INTERNAL BUFFER SIZE X0300081INDEX TOO BIG FOR UTILITY ORDERED LOAD X0300082OUT OF ORDER PRIMARY KEY X0300083SYSTEM MESSAGE 0084 FMUTIL ERROR 84 X0300084SYSTEM MESSAGE 0085 FMUTIL ERROR 85 X0300085DISK DRIVE/DISK PACK NOT COMPATIBLE X0300086SYSTEM MESSAGE 0087 X0300087SYSTEM MESSAGE 0088 X0300088SYSTEM MESSAGE 0089 X0300089SYSTEM MESSAGE 0090 X0300090SUBRCM CALL ERROR - ILLEGAL REQUEST TYPE X0300091SUBRCM CALL ERROR - X COORDINATE LESS THAN ZERO X0300092SUBRCM CALL ERROR - X COORDINATE GREATER THAN 79 X0300093SUBRCM CALL ERROR - Y COORDINATE LESS THAN ZERO X0300094SUBRCM CALL ERROR - Y COORDINATE GREATER THAN 23 X0300095SUBRCM CALL ERROR - BUFFER LENGTH LESS THAN 1 X0300096,  3[7AL7O L$$ UTILITY PROCESSOR NOT FOUND X0300030REQUESTED COMMAND IS NOT LEGAL X0300031ILLEGAL COMMAND ERROR - PROGRAM PROTECT VIOLATION AT LOCATION $$$$ X0300001ERROR - ILLEGAL PROGRAM ATTACHMENT AT LOCATION $$$$ X0300002ERROR - ILLEGAL FILE MANAGER REQUEST AT LOCATION $$$$ X0300003ERROR - ILLEGAL FILE REQUEST PARAMETER AT LOCATION $$$$ X0300004ERROR - ILLEGAL MONITOR REQUEST AT LOCATION $$$$ X0300005ERROR - ILLEGAL REQUEST PARAMETER AT LOCATION $$$$ X0300006ERROR - ILLEGAL I/O REQUEST LOGICAL UNIT AT LOCATION $$$$ X0300007ERROR - ATTEMPT TO PERFORM STACKED I/O REQUESTS AT LOCATION $$$$ X0300008NOTICE - THE CCS SYSTEM HAS BEEN DISABLED. X0300009A MASS MEMORY I/O ERROR HAS OCCURRED. PROGRAM TERMINATED. X0300010ERROR - ATTEMPT TO MODIFY THE FILE REQUEST BUFFER AT LOCATION $$$$ X0300011PROGRAM ABORTED X0300012@@@ ## ## ##:##:## X0300013C C S LOG OFF ##:##:## X0300014@@ IS INVALID X0300015ILLEGAL LOG IN X0300016REQUEST @@@@@@@@ CANNOT BE FOUND X0300017ERROR - @@@@@@@@ IS TOO LARGE TO BE EXECUTED X0300018ERROR STATUS $$$$ DURING OPEN OF FILE @@@@@@@@@@@@@@@@ X0300019ERROR STATUS $$$$ DURING CLOSE OF FILE @@@@@@@@@@@@@@@@ X0300020ERROR STATUS $$$$ DURING READR OF FILE @@@@@@@@@@@@@@@@ X0300021ERROR STATUS $$$$ DURING GETS OF FILE @@@@@@@@@@@@@@@@ X0300022ERROR STATUS $$$$ DURING FORCE FILE CLOSE X0300023PROCEDURE @@@@@@@@ CANNOT BE FOUND X0300024SYSTEM MESSAGE 0025 X0300025SYSTEM MESSAGE 0026 X0300026SYSTEM MESSAGE 0027 X0300027SYSTEM MESSAGE 0028 X0300028SYSTEM MESSAGE 0029 X0300029REQUESTED UTILITY PROCESSOR NOT FOUND X0300030REQUESTED COMMAND IS NOT LEGAL X0300031ILLEGAL COMMAND FORMAT X0300032FILE REQUEST REJECTED X0300033FILE COULD NOT BE LOCATED X0300034MM I/O ERROR WAS NOTED X0300035DISK UNIT SPECIFIED ALREADY MOUNTED X0300036FILE REQUEST ILLEGAL X0300037FILE IS CURRENTLY OPEN X0300038MISSING PARAMETER X0300039ILLEGAL GETFLD STATUS X0300040VIT COULD NOT BE FOUND X0300041FILE IS CURRENTLY LOCKED X0300042INTERNAL FM ERROR X0300043MAX. NO OF OPEN FILES FOR A SINGLE USER X0300044MAX. NO OF OPEN FILES, RETRY X0300045EQUIPMENT TYPE NOT FOUND ${  3\8 X0300046VOLUME NOT ON SPECIFIED DISK UNIT X0300047VOLUME WAS ALREADY MOUNTED X0300048THIS VOLUME IS DISMOUNTED X0300049MOUNTED VOLUME HAS OPEN FILES X0300050WRONG VOLUME MOUNTED X0300051PARAMETER ENTRY ERROR X0300052VOLUME HAS OPEN FILES, NOT DISMOUNTED X0300053NO KEY ENTERED FOR INDEXED FILES X0300054INSUFFICIENT MM FILE SPACE X0300055INSUFFICIENT FID SPACE FOR FILES X0300056FILE NAME/OWNER NOT UNIQUE X0300057FCB INDEX OUT OF RANGE X0300058FILE REQUEST BUFFER NOT INITIALIZED X0300059UNDEFINED FM STATUS ERROR X0300060FILE HAS A SET OF LOCKED RECORDS X0300061DIRECT FILE RECORD LENGTH EXCEEDS 256 WORDS X0300062INVALID SYSTEM PERIPHERAL NAME X0300063RECORD LENGTH TOO LARGE FOR THIS COMMAND X0300064RECORD LENGTH NOT EQUAL X0300065FILE TYPE NOT EQUAL X0300066PRIMARY KEY NOT UNIQUE X0300067WRONG KEY VALUE X0300068ILLEGAL PARAMETER RECEIVED X0300069INTERNAL UTILITY ERROR X0300070ERROR IN COMPUTING MM WORD ADDR X0300071FILE FORMERLY OPENED FOR COMPRESSION X0300072VOLUME 2 MAY NOT BE MOUNTED X0300073CLASS CODE IS NOT A DISK X0300074THIS COMMAND IS ONLY ALLOWED IF ITOS IS DISABLED X0300075THIS IS A SUPERVISOR COMMAND ONLY X0300076RECORD LOCK-TABLE IS CURRENTLY FULL X0300077RECORD IS LOCKED BY ANOTHER USER X0300078FILE REQUEST BUFFER NOT PROPERLY INITIALIZED X0300079FILE SPECIFIED SHOULD BE A DIRECT FILE X0300080TAPE RECORD EXCEEDS INTERNAL BUFFER SIZE X0300081INDEX TOO BIG FOR UTILITY ORDERED LOAD X0300082OUT OF ORDER PRIMARY KEY X0300083SYSTEM MESSAGE 0084 FMUTIL ERROR 84 X0300084SYSTEM MESSAGE 0085 FMUTIL ERROR 85 X0300085DISK DRIVE/DISK PACK NOT COMPATIBLE X0300086SYSTEM MESSAGE 0087 X0300087SYSTEM MESSAGE 0088 X0300088SYSTEM MESSAGE 0089 X0300089SYSTEM MESSAGE 0090 X0300090SUBRCM CALL ERROR - ILLEGAL REQUEST TYPE X0300091SUBRCM CALL ERROR - X COORDINATE LESS THAN ZERO X0300092SUBRCM CALL ERROR - X COORDINATE GREATER THAN 79 X0300093SUBRCM CALL ERROR - Y COORDINATE LESS THAN ZERO qH  3]8% X0300094SUBRCM CALL ERROR - Y COORDINATE GREATER THAN 23 X0300095SUBRCM CALL ERROR - BUFFER LENGTH LESS THAN 1 X0300096SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097SUBRCM CALL ERROR - ILLEGAL 'DTYPE' X0300098SYSTEM MESSAGE 0099 X0300099SYSTEM MESSAGE 0100 X0300100RPG ERROR 001D @@@@@@@@ FILE IS ALREADY OPENED X0300101RPG ERROR 002D @@@@@@@@ TRIED TO PROCESS FILE IN WRONG MODE X0300102RPG ERROR 003D @@@@@@@@ SPECIFIED RECORD LENGTH INCORRECT X0300103RPG ERROR 004D @@@@@@@@ FILE NOT DEFINED IN DIRECTORY X0300104RPG ERROR 005D @@@@@@@@ AN ADD FILE FOR SEQ PROC MUST BE DEF AS OUTPT X0300105RPG ERROR 006D @@@@@@@@ ADD/LOAD SEQUENTIALLY NOT FOR DIRECT DEF FILE X0300106RPG ERROR 007D @@@@@@@@ FILE DEFINITION IS WRONG FOR SEQ. PROC. X0300107RPG ERROR 008D @@@@@@@@ RECORD LENGTH NOT COMPATIBLE WITH THE DIRECTORY X0300108RPG ERROR 009D @@@@@@@@ FILE MGR. DID NOT HANDLE DIR REQ STAT $$$$ X0300109RPG ERROR 010D @@@@@@@@ TRIED TO ACCESS AN UNOPENED FILE X0300110RPG ERROR 011D @@@@@@@@ READ 09 FOUND FILE TO BE NON UNIT-RECORD DEFINEDX0300111RPG ERROR 012D @@@@@@@@ RECORD ######## WAS SHORT-PADDED WITH BLANKS X0300112RPG ERROR 013D @@@@@@@@ READ 12 FOUND FILE DEFINED AS A NON-DISK FILE X0300113RPG ERROR 014D @@@@@@@@ RECORD ######## WAS TO LONG-RECORD TRUNCATED X0300114RPG ERROR 015D @@@@@@@@ WRIT17 FND FILE DEF AS NON-UNIT REC FILE X0300115RPG ERROR 016D @@@@@@@@ WRIT20 FND FILE DEF AS NON DISK SEQ FILE X0300116RPG ERROR 017D @@@@@@@@ UPDT26 FND FILE DEF AS NON DISK SEQ FILE X0300117RPG ERROR 018D @@@@@@@@ MULTIPLE UPDATES W/O READ IN BETWEEN INVALID X0300118RPG ERROR 019D @@@@@@@@ APDT30 FOUND FILE DEFINED AS A NON DISK-SEQ FILEX0300119RPG ERROR 020D @@@@@@@@ CLOS35 FOUND FILE DEFI AS NON UNIT REC FILE X0300120RPG ERROR 021D @@@@@@@@ CLOS38 FOUND FILE DEFINED AS A NON DISK-SEQ FILEX0300121RPG ERROR 022D @@@@@@@@ MASS STORAGE ERROR X0300122RPG ERROR 023D @@@@@@@@ FILE MGR DID NOT HANDLE FILE REQUEST $$$$ X0300123RPG ERROR 024D @@@@@@@@ END OF TAPE ENCOUNTERED X0300124RPG ERROR 025D @@@@@@@@ INPUT DEVICE FAILURE X0300125RPG ERROR 026D @@@@@@@@ OUTPUT DEVICE FAILURE X0300126RPG ERROR 027D @@@@@@@@ SHARED BUFFERS NOT ALLOWED FOR TAPE FILES X0300127RPG ERROR 028D @@@@@@@@ BLOCK SIZE MUST BE INTEGER MULTIPLE OF REC SIZE X0300128RPG ERROR 029D @@@@@@@@ READ 11 FOUND FILE NOT DEFINED AS TAPE X0300129RPG ERROR 030D @@@@@@@@ WRIT19 FOUND FILE NOT DEFINED AS TAPE X0300130RPG ERROR 031D @@@@@@@@ CLOS 37 FOUND FILE NOT DEFINED AS TAPE X0300131RPG ERROR 032D @@@@@@@@ DATA OVERFLOW - NO MORE TAPE VOLUMES DECLARED X0300132RPG ERROR 033D @@@@@@@@ ADDING RECORDS IS NOT ALLOWED IN DIRECT PROC. X0300133RPG ERROR 034D @@@@@@@@ OUTPT FILE FOR DIRCT PROC MUST BE DEF DIR X0300134RPG ERROR 035D @@@@@@@@ DIRECT PROC. ON INDEXED FILE ALLOWD ONLY FOR INPX0300135RPG ERROR 036D @@@@@@@@ FILE DEFINITION IS WRONG FOR DIRECT PROC. X0300136RPG ERROR 037D @@@@@@@@ READ13 FOUND FILE DEFI AS NON DISK DIRECT FILE X0300137RPG ERROR 038D @@@@@@@@ WRIT21 FOUND FILE DEFI AS NON DISK DIRECT FILE X0300138RPG ERROR 039D @@@@@@@@ UPDT27 FOUND FILE DEFI AS NON DISK DIRECT FILE X0300139RPG ERROR 040D @@@@@@@@ CLOS39 FOUND FILE DEFI AS NON DISK DIRECT FILE X0300140RPG ERROR 041D @@@@@@@@ RECORD NUMBER ######## OUT OF RANGE X0300141RPG ERROR 042D @@@@@@@@ DOUBLE BUFFERING NOT ALLNV  3^89OWED FOR INDEX FILE X0300142RPG ERROR 043D @@@@@@@@ INDEX PROC. IS ALLOWED ONLY FOR INDEX-DEF FILES X0300143RPG ERROR 044D @@@@@@@@ KEY LENGTH/POSITION NOT COMPATIBLE WITH DIRECTORX0300144RPG ERROR 045D @@@@@@@@ OPEN 05 WAS CALLED FOR NON-RANDOM PROCESSING X0300145RPG ERROR 046D @@@@@@@@ READ15 FOUND FILE DEFINED AS A NON INDEX FILE X0300146RPG ERROR 047D @@@@@@@@ WRIT23 FOUND FILE DEFINED AS A NON INDEX FILE X0300147RPG ERROR 048D @@@@@@@@ ADDT32 FOUND FILE DEFINED AS A NON INDEX FILE X0300148RPG ERROR 049D @@@@@@@@ CLOS41 FOUND FILE DEFINED AS A NON INDEX FILE X0300149RPG ERROR 050D @@@@@@@@ UPDT29 FOUND FILE DEFINED AS A NON INDEX FILE X0300150RPG ERROR 051D @@@@@@@@ THE KEY IN RECORD ######## MODIFIED BY UPDATE X0300151RPG ERROR 052D @@@@@@@@ CLOS40 FOUND FILE DEFINED AS A NON INDEX FILE X0300152RPG ERROR 053D @@@@@@@@ READ19 FOUND FILE DEFINED AS A NON INDEX FILE X0300153RPG ERROR 054D @@@@@@@@ WRIT22 FOUND FILE DEFINED AS A NON INDEX FILE X0300154RPG ERROR 055D @@@@@@@@ UPDT28 FOUND FILE DEFINED AS A NON INDEX FILE X0300155RPG ERROR 056D @@@@@@@@ ADDT31 FOUND FILE DEFINED AS A NON INDEX FILE X0300156RPG ERROR 057D @@@@@@@@ SETL33 FOUND FILE DEFINED AS A NON INDEX SEQ FILX0300157RPG ERROR 058D @@@@@@@@ RECORD ######## OUT OF ORDER X0300158RPG ERROR 059D @@@@@@@@ SETL33 SET LOWER LIMIT NOT ALLOWED FOR ADD FILESX0300159RPG ERROR 060D @@@@@@@@ KEY OF RECORD ######## ALREADY EXISTS X0300160RPG ERROR 061D @@@@@@@@ SEQ. PROC. FOR INDEX-DEFINED FILE ONLY FOR INPUTX0300161RPG ERROR 062D @@@@@@@@ UNABLE TO SORT THE KEYS X0300162RPG ERROR 063D @@@@@@@@ SLCT34 CALL STACKER SELECT IS NOT SUPPORTED X0300163RPG ERROR 064D @@@@@@@@ ERROR CODE IN BUFFER IS WRONG FOR TAPE X0300164RPG ERROR 065D @@@@@@@@ NO VOL1 LABEL ON SL TAPE X0300165RPG ERROR 066D @@@@@@@@ WRONG DATA SET NAME X0300166RPG ERROR 067D @@@@@@@@ TAPE VOLUMES MOUNTED IN WRONG ORDER X0300167RPG ERROR 068D @@@@@@@@ TAPE FILE NOT DEFINED BY MOUNT UTILITY X0300168RPG ERROR 069D @@@@@@@@ WRONG VOLUME SERIAL NUMBER X0300169RPG ERROR 070D @@@@@@@@ INVALID EXPIRATION DATE X0300170RPG ERROR 071D @@@@@@@@ FILE MANAGER ERROR IN READING MOUNT FILE X0300171RPG ERROR 072D @@@@@@@@ UNEXPIRED DATE SET X0300172RPG ERROR 073D @@@@@@@@ NOT USED X0300173RPG ERROR 074D @@@@@@@@ COMBINED FILES NOT SUPPORTED X0300174RPG ERROR 075D @@@@@@@@ OPEN02 FOUND FILE DEF AS NON SPECIAL DEV FILE X0300175RPG ERROR 076D @@@@@@@@ WRONG BUFFER SIZE CAN NOT BE USED FOR FIXED BLK X0300176RPG ERROR 077D @@@@@@@@ BLOCKING IS IMPOSSIBLE FOR SHARED BUFFERS X0300177RPG ERROR 078D @@@@@@@@ ERROR RETURN FROM SPEC. DEV DRVR, STAT= $$$$ X0300178RPG ERROR 079D @@@@@@@@ READ 10 FOUND FILE DEF AS NON SPECIAL DEV FILE X0300179RPG ERROR 080D @@@@@@@@ UPDT25 FOUND FILE DEF AS NON SPECIAL DEV FILE X0300180RPG ERROR 081D @@@@@@@@ RECORD ######## WAS TOO LONG - RECORD IGNORED X0300181RPG ERROR 082D @@@@@@@@ CLOS36 FOUND FILE DE AS NON SPECIAL DEV FILE X0300182RPG ERROR 083D @@@@@@@@ WRIT 18 REQUIRES FILES DEFI. AS SPECIAL DEVICE X0300183RPG ERROR 084D @@@@@@@@ NOT USED X0300184RPG ERROR 085D @@@@@@@@ NOT USED X0300185RPG ERROR 086D @@@@@@@@ NOT USED X0300186RPG ERROR 087D @@@@@@@@ NOT USED X0300187RPG ERROR 088D @@@@@@@@ NOT USED X0300188RPG ERROR 089D @@@@@@@@ NOT USED X0300189RPG ERROR 090D @@@@@@@@ NOT USED  3_8M X0300190RPG ERROR 091D @@@@@@@@ NOT USED X0300191RPG ERROR 092D @@@@@@@@ NOT USED X0300192RPG ERROR 093D @@@@@@@@ NOT USED X0300193RPG ERROR 094D @@@@@@@@ NOT USED X0300194RPG ERROR 095D @@@@@@@@ NOT USED X0300195RPG ERROR 096D @@@@@@@@ NOT USED X0300196RPG ERROR 097D @@@@@@@@ NOT USED X0300197RPG ERROR 098D @@@@@@@@ NOT USED X0300198RPG ERROR 099D @@@@@@@@ ERROR AT LOCATION = $$$$ X0300199RPG ERROR 100D @@@@@@@@ NOT USED X0300200RPG ERROR 101R @@@@@@@@ HALT INDICATOR H1 IS ON X0300201RPG ERROR 102R @@@@@@@@ HALT INDICATOR H2 IS ON X0300202RPG ERROR 103R @@@@@@@@ HALT INDICATOR H3 IS ON X0300203RPG ERROR 104R @@@@@@@@ HALT INDICATOR H4 IS ON X0300204RPG ERROR 105R @@@@@@@@ HALT INDICATOR H5 IS ON X0300205RPG ERROR 106R @@@@@@@@ HALT INDICATOR H6 IS ON X0300206RPG ERROR 107R @@@@@@@@ HALT INDICATOR H7 IS ON X0300207RPG ERROR 108R @@@@@@@@ HALT INDICATOR H8 IS ON X0300208RPG ERROR 109R @@@@@@@@ HALT INDICATOR H9 IS ON X0300209RPG ERROR 110R @@@@@@@@ NO PRIMARY OR SECONDARY FILES ARE OPENED X0300210RPG ERROR 111R @@@@@@@@ SQUARE ROOT OF NEGATIVE NUMBER X0300211RPG ERROR 112R @@@@@@@@ NOT USED X0300212RPG ERROR 113R @@@@@@@@ DIVISION BY ZERO X0300213RPG ERROR 114R @@@@@@@@ ARRAY INDEX OUT OF RANGE X0300214RPG ERROR 115R @@@@@@@@ INPUT TABLE OR ARRAY OUT OF SEQUENCE X0300215RPG ERROR 116R @@@@@@@@ NO TABLE OR ARRAY DATA IN FILE X0300216RPG ERROR 117R @@@@@@@@ TOO MUCH DATA FOR TABLE OR ARRAY X0300217RPG ERROR 118R @@@@@@@@ SUBROUTINE RETURN STACK IS FULL X0300218RPG ERROR 119R @@@@@@@@ SUBROUTINE RETURN WITHOUT PREVIOUS EXSR X0300219RPG ERROR 120R @@@@@@@@ END OF FILE FOR DEMAND FILE X0300220RPG ERROR 121R @@@@@@@@ RECORD NOT FOUND, KEY NOT IN INDEX FILE X0300221RPG ERROR 122R @@@@@@@@ RELATIVE RECORD NUMBER OUT OF RANGE X0300222RPG ERROR 123R @@@@@@@@ RECORD IS OUT OF SEQUENCE X0300223RPG ERROR 124R @@@@@@@@ FILE OUT OF MATCHING RECORD SEQUENCE X0300224RPG ERROR 125R @@@@@@@@ UNIDENTIFIED RECORD IN FILE X0300225RPG ERROR 126R @@@@@@@@ TOO MUCH DATA FOR RECORD X0300226RPG ERROR 127R @@@@@@@@ NOT USED X0300227RPG ERROR 128R @@@@@@@@ NOT USED X0300228RPG ERROR 129R @@@@@@@@ NOT USED X0300229RPG ERROR 130R @@@@@@@@ ATTEMPT TO OUTPUT TO FULL FILE X0300230RPG ERROR 131R @@@@@@@@ DIRECT ACCESS RECORD NO. OUT OF RANGE X0300231RPG ERROR 132R @@@@@@@@ ATTEMPT TO UPDATE FILE BEFORE INPUT X0300232RPG ERROR 133R @@@@@@@@ RECORD NOT FOUND WITH SPECIFIED KEY X0300233RPG ERROR 134R @@@@@@@@ DUPLICATE KEY FOR OUTPUT TO FILE X0300234RPG ERROR 135R @@@@@@@@ DATA TRANSFER FAILED, CHECK DEVICE OR FILE X0300235RPG ERROR 136R @@@@@@@@ FILE IS NOT PRESENT X0300236RPG ERROR 137R @@@@@@@@ FILE DOES NOT CORRESPOND TO DMPT DESCRIPTION X0300237RPG ERROR 138R @@@@@@@@ KEY MODIFIED BY UPDATE 5  3`8a X0300238RPG ERROR 139R @@@@@@@@ KEY OUT OF ORDER X0300239RPG ERROR 140R UNABLE TO CONTINUE DUE TO PREVIOUS ERROR X0300240RPG ERROR 141R @@@@@@@@ ILLEGAL FILE TYPE FOR SETLL X0300241RPG ERROR 142R WRONG PROCESSOR SELECTED. RUN SELMU, SELECTING OPTION 1X0300242RPG ERROR 143R INTERNAL RPG RUNTIME ERROR IN R9MVBX X0300243RPG ERROR 144R @@@@@@@@ NOT USED X0300244RPG ERROR 145R @@@@@@@@ NOT USED X0300245RPG ERROR 146R @@@@@@@@ NOT USED X0300246RPG ERROR 147R @@@@@@@@ NOT USED X0300247RPG ERROR 148R @@@@@@@@ NOT USED X0300248RPG ERROR 149R @@@@@@@@ NOT USED X0300249RPG ERROR 150R @@@@@@@@ ALL HALT INDICATORS HAVE BEEN DISPLAYED X0300250RPG ERROR 151R @@@@@@@@ NOT USED X0300251RPG ERROR 152R @@@@@@@@ NOT USED X0300252RPG ERROR 153R @@@@@@@@ NOT USED X0300253RPG ERROR 154R @@@@@@@@ NOT USED X0300254RPG ERROR 155R ERROR IN PARAMETER(S) PASSED TO SUBROUTINE SUBRFL X0300255RPG ERROR 156R ERROR IN PARAMETER(S) PASSED TO SUBROUTINE SUBRAJ X0300256RPG ERROR 157R ERROR IN PARAMETER(S) PASSED TO SUBROUTINE SUBRMV X0300257RPG ERROR 158R ERROR IN PARAMETER(S) PASSED TO SUBROUTINE SUBRIN X0300258RPG ERROR 159R ERROR IN PARAMETER(S) PASSED TO SUBROUTINE SUBRED X0300259RPG ERROR 160R @@@@@@@@ NOT USED X0300260SPARE MESSAGE 261 X0300261SPARE MESSAGE 262 X0300262SPARE MESSAGE 263 X0300263SPARE MESSAGE 264 X0300264SPARE MESSAGE 265 X0300265SPARE MESSAGE 266 X0300266SPARE MESSAGE 267 X0300267SPARE MESSAGE 268 X0300268SPARE MESSAGE 269 X0300269SPARE MESSAGE 270 X0300270SPARE MESSAGE 271 X0300271SPARE MESSAGE 272 X0300272SPARE MESSAGE 273 X0300273SPARE MESSAGE 274 X0300274SPARE MESSAGE 275 X0300275SPARE MESSAGE 276 X0300276SPARE MESSAGE 277 X0300277SPARE MESSAGE 278 X0300278SPARE MESSAGE 279 X0300279SPARE MESSAGE 280 X0300280SPARE MESSAGE 281 X0300281SPARE MESSAGE 282 X0300282SPARE MESSAGE 283 X0300283SPARE MESSAGE 284 X0300284SPARE MESSAGE 285 X0300285SPARE MESSAGE 286 }  3a8u X0300286SPARE MESSAGE 287 X0300287SPARE MESSAGE 288 X0300288SPARE MESSAGE 289 X0300289SPARE MESSAGE 290 X0300290SPARE MESSAGE 291 X0300291SPARE MESSAGE 292 X0300292SPARE MESSAGE 293 X0300293SPARE MESSAGE 294 X0300294SPARE MESSAGE 295 X0300295SPARE MESSAGE 296 X0300296SPARE MESSAGE 297 X0300297SPARE MESSAGE 298 X0300298SPARE MESSAGE 299 X0300299SPARE MESSAGE 300 X0300300ILLEGAL LINE NUMBER ##### SPECIFIED X0300301NO PROGRAM ID ON H FORMAT SPECIFICATION X0300302FILE @@@@@@@@ IS NOT AN EDITOR FILE X0300303AN ERROR OCCURRED WHEN BUILDING THE STATEMENT LABEL INDEX X0300304ILLEGAL FILE NAME X0300305INVALID FIELD X0300306INVALID NUMERIC VALUE X0300307COMMAND NAME NOT UNIQUE X0300308INVALID COMMAND X0300309WRONG FORMAT TYPE FOR THIS FILE X0300310INVALID FORMAT SPECIFICATION X0300311LINE NUMBER OVERFLOW X0300312INCORRECT TAB STOP ORDER X0300313INVALID RPG ARRAY DATA LINE NUMBER X0300314INVALID DELIMITER X0300315DELIMITER MISSING X0300316CHARACTER STRING TOO LONG X0300317RESEQUENCE WITH A LOWER BASE AND/OR INCREMENT X0300318NO FILE OPEN FOR EDITOR USE X0300319SAVRTN STACK OVERFLOW X0300320SAVRTN STACK UNDERFLOW X0300321FILE IS FULL X0300322SPARE EDITOR MESSAGE X0300323SPARE EDITOR MESSAGE X0300324SPARE EDITOR MESSAGE X0300325SPARE EDITOR MESSAGE X0300326SPARE EDITOR MESSAGE X0300327SPARE EDITOR MESSAGE X0300328SPARE EDITOR MESSAGE X0300329SPARE EDITOR MESSAGE X0300330FILE MANAGER ERROR WHEN OPENING FILE @@@@@@@@ ISTAT = $$$$ X0300331COULD NOT LOCATE FILE @@@@@@@@ USER @@@@@@@@ X0300332FILE @@@@@@@@ IS LOCKED. TRY AGAIN LATER X0300333FILE MANAGER ERROR WHEN READING FILE @@@@@@@@ ISP  3b8TAT = $$$$ X0300334FILE MANAGER ERROR WHEN DELETING FROM FILE @@@@@@@@ ISTAT = $$$$ X0300335AN ERROR OCCURRED WHEN INITIALIZING THE EDITOR ISTAT = $$$$ X0300336FILE MANAGER ERROR IN STATEMENT LABEL INDEX FILE ISTAT = $$$$ X0300337FILE MANAGER ERROR WHEN UPDATING FCB ISTAT = $$$$ X0300338FILE MANAGER ERROR WHEN CLOSING FILE @@@@@@@@ ISTAT = $$$$ X0300339FILE MANAGER ERROR WHEN INITIALIZING SCRATCH FILE ISTAT = $$$$ X0300340FILE MANAGER ERROR WHEN UPDATING FILE @@@@@@@@ ISTAT = $$$$ X0300341FILE MANAGER ERROR WHEN UPDATING FCB FOR FILE @@@@@@@@ ISTAT = $$$$ X0300342FILE MANAGER ERROR WHEN CREATING SCRATCH FILE ISTAT = $$$$ X0300343FILE MANAGER ERROR WHEN OPENING SCRATCH FILE ISTAT = $$$$ X0300344FILE MANAGER ERROR WHEN WRITING SCRATCH FILE ISTAT = $$$$ X0300345FILE MANAGER ERROR WHEN CLOSING SCRATCH FILE ISTAT = $$$$ X0300346FILE MANAGER ERROR WHEN RENAMING SCRATCH FILE ISTAT = $$$$ X0300347FILE MANAGER ERROR WHEN DELETING FILE @@@@@@@@ ISTAT = $$$$ X0300348FILE MANAGER ERROR WHEN DELETING SCRATCH FILE ISTAT = $$$$ X0300349CLOSFL REQIND@@@@@@@@ X0300350OPENFL REQIND@@@@@@@@ X0300351DELETE REQIND@@@@@@@@ X0300352CREATE REQIND@@@@@@@@ X0300353GETS REQIND@@@@@@@@ X0300354PUTS REQIND@@@@@@@@ X0300355GETFCB REQIND@@@@@@@@ X0300356UPDFCB REQIND@@@@@@@@ X0300357VOLUME= @@@@@@@@ X0300358FILNAM= @@@@@@@@, @@@@@@@@ X0300359ABNORMAL ERROR@@@@@@@@@@@@ X0300360BLKSIZ/RECLTH .NE. 1,2,3... X0300361@@@@@@@@@@@@ X0300362FATAL ERROR X0300363DONE@@@@@@@@@@@@ X0300364TYPE-IN ERROR X0300365EXPECTED @@@@@@@@@@@@@@@@@@@@@@ FOUND @@ X0300366CANNOT OPEN INPUT FILE X0300367TOO LITTLE CORE X0300368INTERPHASE RECORD COUNTS DISAGREE X0300369@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@X0300370PASSED@@@@@@@@@@@@ X0300371SEQ. DIR. ERROR X0300372TOO LITTLE DISK X0300373OUTPUT RECORD COUNT BAD X0300374INPUT FILE LENGTHS ARE NOT EQUAL X0300375FN=@@@@@@@@,@@@@@@@@ X0300376OUTPUT FILE RECORD LENGTH IS ZERO X0300377ADDROUT SORTS ONLY 1 FILE X0300378VOLUME @@@@@@@@ NOT MOUNTED X0300379START OF KEY FIELD OUTSIDE OF RECORD X0300380KEY FIELD EXTENDS BEYOND END OF RECORD X0300381SYSTEM MESSAGE 0382 f  3c8 X0300382SYSTEM MESSAGE 0383 X0300383SYSTEM MESSAGE 0384 X0300384SYSTEM MESSAGE 0385 X0300385SYSTEM MESSAGE 0386 X0300386SYSTEM MESSAGE 0387 X0300387SYSTEM MESSAGE 0388 X0300388SYSTEM MESSAGE 0389 X0300389SYSTEM MESSAGE 0390 X0300390SYSTEM MESSAGE 0391 X0300391SYSTEM MESSAGE 0392 X0300392SYSTEM MESSAGE 0393 X0300393SYSTEM MESSAGE 0394 X0300394SYSTEM MESSAGE 0395 X0300395SYSTEM MESSAGE 0396 X0300396SYSTEM MESSAGE 0397 X0300397SYSTEM MESSAGE 0398 X0300398SYSTEM MESSAGE 0399 X0300399NO ROOM IN HOST FILE X0300400HOST NAME NOT FOUND X0300401PARAMETER MUST BE ADD OR DEL X0300402DUPLICATE HOST NAME X0300403PROTOCOL TYPE MUST BE 200UT OR HASP X0300404BATCH DRIVER BUSY ON THIS HOST X0300405JOB(S) PENDING FOR THIS HOST X0300406SYSTEM MESSAGE 0407 X0300407INVALID LOGICAL UNIT X0300408SYSTEM MESSAGE 0409 X0300409LOGICAL UNIT ALREADY SET FOR THIS HOST X0300410DUPLICATE LOGICAL UNIT X0300411ILLEGAL TO DELETE LOCAL HOST X0300412NO ROOM IN BATCH FILE X0300413NO *JOB RECORD IN THE INPUT FILE X0300414INVALID JOB NUMBER X0300415INVALID OWNER IDENTIFICATION X0300416JOB ALREADY DISCARDED X0300417FILE MANAGER ERROR IN ACCESSING THE BATCH FILE X0300418JOB NOT FOUND X0300419JOB INACTIVE X0300420NO JOBS TO PRINT X0300421NO SUCH HOST X0300422SYSTEM MESSAGE 423 X0300423OUTPUT NOT RECEIVED X0300424 PRFLP006PRFLP007 PRFLP007PRFLP008 PRFLP008PRFLP009 PRFLP009AL78O L$$ PRFLP011PRFLP012 PRFLP012PRFLP013 PRFLP013PRFLP014 PRFLP014PRFLP015 PRFLP015PRFLP016 PRFLP016PRFLP017 PRFLP017PRFLP018 PRFLP018PRFLP019 PRFLP019PRFSC001 PRCARDPRO READER TAPEPRO TAPE0 DCCOLACT PRFDC001DCPRTLTR PRFDC002DCACTADD PRFDC003DCUPDTAP PRFDC004DCNFINUP PRFDC005DCFINUPD PRFDC006DCUPDHIS PRFDC007DCDUMMIE PRFDC008DCDUMDUM PRȵ  3d8FDC009DCSRTTRN PRFDC010DCBLDDAS PRFDC011HSMOVHIS PRFHS001HSUPDTAP PRFHS002HSPRGHIS PRFHS003HSPRGTAP PRFHS004MTRDRLTR PRFMT001MTCONLTR PRFMT002MTUTIFIL PRFMT003MTDECTBL PRFMT004MTAVMDMP PRFMT005MTACTMTX PRFMT006MTSPCAUD PRFMT007MTLDSCRN PRFMT008MTSVSCRN PRFMT009MTPRGMST PRFMT010MTACTMTN PRFMT011MTUSEMTN PRFMT012MTDETCRD PRFMT013MTDETCON PRFMT014MTPDFMTN PRFMT015MTSCNPRT PRFMT016RPDRCIAC PRFRP001RPDRCSRQ PRFRP002RPTAPRRN PRFRP003RPTAPTQU PRFRP004RPTAPTTY PRFRP005RPWRTOFF PRFRP006RPDLYASN PRFRP007RPSUMACT PRFRP008RPWCOLST PRFRP009RPMCOLST PRFRP010RPTCNTRL PRFCNTRLPRFRP012 PRFRP012PRFRP013 PRFRP013PRFPG000 PRFPG000PRFPG001 PRFPG001PRFPG002 PRFPG002PRFPG003 PRFPG003PRFPG004 PRFPG004PRFPG005 PRFPG005PRFPG006 PRFPG006PRFPG007 PRFPG007PRFPG008 PRFPG008PRFPG009 PRFPG009PRFPG010 PRFPG010PRFPG011 PRFPG011PRFPG012 PRFPG012PRFPG013 PRFPG013PRFPG014 PRFPG014PRFPG015 PRFPG015PRFPG016 PRFPG016PRFPG017 PRFPG017PRFPG018 PRFPG018PRFPG019 PRFPG019LDCOLACT PRFLD001LDPRTLTR PRFLD002LDACTADD PRFLD003LDUPDTAP PRFLD004LDNFINUP PRFLD005LDFINUPD PRFLD006LDUPDHIS PRFLD007LDDUMMIE PRFLD008LDDUMDUM PRFLD009LDSRTTRN PRFLD010LDBLDDAS PRFLD011PRFLD012 PRFLD012PRFLD013 PRFLD013LHMOVHIS PRFLH001LHUPDTAP PRFLH002LHPRGHIS PRFLH003LHPRGTAP PRFLH004LHPRGCLI PRFLH005LMRDRLTR PRFLM001LMCONLTR PRFLM002LMUTIFIL PRFLM003LMDECTBL PRFLM004LMAVMDMP PRFLM005LMACTMTX PRFLM006LMSPCAUD PRFLM007LMLDSCRN PRFLM008LMSVSCRN PRFLM009LMPRGMST PRFLM010LMACTMTN PRFLM011LMUSEMTN PRFLM012LMDETCRD PRFLM013LMDETCON PRFLM014LMPDFMTN PRFLM015LMSCNPRT PRFLM016PRFLM017 PRFLM017LODRCIAC PRFLO001LODRCSRQ PRFLO002LOTAPRRN PRFLO003LOTAPTQU PRFLO004LOTAPTTY PRFLO005LOWRTOFF PRFLO006LODLYASN PRFLO007LOSUMACT PRFLO008LOWCOLST PRFLO009LOMCOLST PRFLO010LOTCNTRL PRFLACTRPRFLO012 PRFLO012PRFLO013 PRFLO013PRFLO014 PRFLO014PRFLO015 PRFLO015PRFLO016 PRFLO016PRFLO017 PRFLO017PRFLP000 PRFLP000PRFLP001 PRFLP001PRFLP002 PRFLP002PRFLP003 PRFLP003PRFLP004 PRFLP004PRFLP005 PRFLP005PRFLP006 PRFLP006PRFLP007 PRFLP007PRFLP008 PRFLP008PRFLP009 PRFLP009PRFLP010 PRFLP010PRFLP011 PRFLP011PRFLP012 PRFLP012PRFLP013 PRFLP013PRFLP014 PRFLP014PRFLP015 PRFLP015PRFLP016 PRFLP016PRFLP017 PRFLP017PRFLP018 PRFLP018PRFLP019 PRFLP019PRFSC001 PRFSC001PRFSC002 PRFSC002PRFSC003 PRFSC003PRFSC004 PRFSC004PRFSC005 PRFSC005PRFSC006 PRFSC006PRFSC007 PRFSC007PRFSC008 PRFSC008PRFSC009 PRFSC009PRFSC010 PRFSC010__CTBLMTDETCONMTLDSCRNMTPDFMTN MTPRGMSTMTRDRLTRMTSCNPRT!MTSPCAUDMTSVSCRNMTUSEMTNMTUTIFILPRFLD012NPRFLD013OPRFLM017ePRFLO012qPRFLO013rPRFLO014sPRFLO015tPRFLO016uPRFLO017vPRFLP000wPRFLP001xPRFLP002yPRFLP003zPRFLP004{PRFLP005|PRFLP006}PRFLP007~PRFLP008PRFLP009PRFLP010PRFLP011PRFLP012PRFLP013PRFLP014PRFLP015PRFLP016PRFLP017PRFLP018PRFPG000/PRFPG0010PRFPG0021PRFPG0032PRFPG0043PRFPG0054PRFPG0065PRFPG0076PRFPG0087PRFPG0098+LDPRTLTRDLDSRTTRNLLDUPDHISILDUPDTAPFLHMOVHISPLHPRGCLITLHPRGHISRLHPRGTAPSLHUPDTAPQLMACTMTN_LMACTMTXZLMAVMDMPYLMCONLTRVLMDECTBLXLMDETCONbLMDETCRDaLMLDSCRN\LMPDFMTNcLMPRGMST^LMRDRLTRULMSCNPRTdLMSPCAUD[LMSVSCRN]LMUSEMTN`LMUTIFILWLODLYASNlLODRCIACfLODRCSRQgLOMCOLSToLOSUMACTmLOTAPRRNhLOTAPTQUiLOTAPTTYjLOTCNTRLpLOWCOLSTnLOWRTOFFkMTACTMTNMTACTMTXMTAVMDMPMTCONLTRMTDECTBLMTDETCONMTDETCRDMTAVMDMPMTCONLTRMTDECTBLMTDETCON"PRFPG011:PRFPG012;PRFPG013PRFPG016?PRFPG017@PRFPG018APRFPG019BPRFRP012-PRFRP013.PRFSC001PRFSC002PRFSC003PRFSC004  3e8LDNFINUPMTDETCRDPRFLP005PRFPG010CARDPRO DCACTADDDCBLDDAS DCCOLACTDCDUMDUM DCDUMMIE DCFINUPDDCNFINUPDCPRTLTRDCSRTTRN DCUPDHIS DCUPDTAPHSMOVHISHSPRGHISHSPRGTAPHSUPDTAPLDACTADDELDBLDDASMLDCOLACTCLDDUMDUMKLDDUMMIEJLDFINUPDHLDNFINUPGLDPRTLTRDLDSRTTRNLLDUPDHISILDUPDTAPFLHMOVHISPLHPRGCLITLHPRGHISRLHPRGTAPSLHUPDTAPQLMACTMTXZLMAVMDMPYLMCONLTRVLMDECTBLXLMLDSCRN\LMRDRLTRULMSPCAUD[LMUTIFILWMTACTMTNMTACTMTXMTAVMDMPMTCONLTRMTDECTBLMTDETCONMTLDSCRNMTPDFMTN MTPRGMSTMTRDRLTRMTSCNPRT!MTSPCAUDMTSVSCRNMTUSEMTNMTUTIFILPRFLD012NPRFLD013OPRFLM017ePRFLO012qPRFLO013rPRFLO014sPRFLO015tPRFLO016uPRFLO017vPRFLP000wPRFLP001xPRFLP002yPRFLP003zPRFLP004{PRFLP005|PRFLP006}PRFLP007~PRFLP008PRFLP009PRFLP010PRFLP011PRFLP012PRFLP013PRFLP014PRFLP015PRFLP016PRFLP017PRFLP018PRFPG000/PRFPG0010PRFPG0021PRFPG0032PRFPG0043PRFPG0054PRFPG0065PRFPG0076PRFPG0087PRFPG0098+LDPRTLTRDLDSRTTRNLLDUPDHISILDUPDTAPFLHMOVHISPLHPRGCLITLHPRGHISRLHPRGTAPSLHUPDTAPQLMACTMTN_LMACTMTXZLMAVMDMPYLMCONLTRVLMDECTBLXLMDETCONbLMDETCRDaLMLDSCRN\LMPDFMTNcLMPRGMST^LMRDRLTRULMSCNPRTdLMSPCAUD[LMSVSCRN]LMUSEMTN`LMUTIFILWLODLYASNlLODRCIACfLODRCSRQgLOMCOLSToLOSUMACTmLOTAPRRNhLOTAPTQUiLOTAPTTYjLOTCNTRLpLOWCOLSTnLOWRTOFFkMTACTMTNMTACTMTXMTAVMDMPMTCONLTRMTDECTBLMTDETCONMTDETCRDMTAVMDMPMTCONLTRMTDECTBLMTDETCON"PRFPG011:PRFPG012;PRFPG013PRFPG016?PRFPG017@PRFPG018APRFPG019BPRFRP012-PRFRP013.PRFSC001PRFSC002PRFSC003PRFSC004PRFSC005PRFSC006PRFSC007PRFSC008PRFSC009PRFSC010RPDLYASN(RPDRCIAC"RPDRCSRQ#RPMCOLST+RPSUMACT)RPTAPRRN$RPTAPTQU%RPTAPTTY&RPTCNTRL,RPWCOLST*RPWRTOFF'TAPEPRO PRFRP013.RPDLYASN(RPDRCIAC"RPDRCSRQ#RPMCOLST+RPSUMACT)RPTAPRRN$RPTAPTQU%RPTAPTTY&RPTCNTRL,RPWCOLST*RPWRTOFF'TAPEPRO PRFLP006}PRFLP007~PRFLP008PRFLP009PRFLP010PRFLP011PRFLP012PRFLP013PRFLP014PRFLP015PRFLP016PRFLP017PRFLP018PRFLP019PRFPG000/PRFPG0010PRFPG0021PRFPG0032PRFPG0043PRFPG0054PRFPG0065PRFPG0076PRFPG0087PRFPG0098PRFPG0109PRFLP007~PRFLP008PRFLP009PRFLP010PRFLP011PRFLP012PRFLP013PRFLP014PRFLP015PRFLP016PRFLP017PRFLP018PRFPG000/PRFPG0010PRFPG0021PRFPG0032PRFPG0043PRFPG0054PRFPG0065PRFPG0076PRFPG0087PRFPG0098__~Z`SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm6  3f8AL8O $$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmMNUPRO OE - ORDER ENTRY / INVOICING / SALES ANALYSIS X0200001MNUPRO OF - ORDER ENTRY FILE MAINTENANCE X0200002MNUPRO AR - ACCOUNTS RECEIVABLE X0200003MNUPRO IN - INVENTORY CONTROL X0200004MNUPRO AP - ACCOUNTS PAYABLE X0200005MNUPRO PR - PAYROLL X0200006MNUPRO GL - GENERAL LEDGER X0200007MNUPRO BM - BILL OF MATERIALS X0200008MNUPRO MR - MATERIAL REQUIREMENTS PLANNING X0200009MNUPRO PO - PURCHASING X0200010MNUPRO RT - ROUTING X0200011MNUPRO WP - WORK IN PROCESS X0200012MNUPRO PI - PHYSICAL INVENTORY X0200013UTIL UT - SYSTEM UTILITIES X0200014EDITOR ED - SOURCE PROGRAM EDITOR X0200015 EX - EXIT X0200016mmmmmmmmmmmmmmmmAL!8O  mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm__9mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmAL8PLA mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm39400015351 RP09257939400156155 SP09257939400388550 WP09257939400529450 RP09257939400577350 SP09257939400640851 WP09257939400667458 RP09257939400707254 SP09257939400741451 WP09257939400805652 RP09257939400825759 SP09257939400857257 WP09257939401057352 WP09257939401586152 WP09257939402270053 WP092579 0270007591234567000313331334040000300001110780002505 AL 8O M$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm * SYSTEM CONFIGURATION MENU 00001 * 00002 * BEFORE MAKING A SELECTION FROM THIS MENU BE SURE THE AUXILIARY 00003 * DISK(S) HAVE BEEN INITIALIZED WITH THE CORRECT VOLUME LABEL 00004 * OR LABELS FOR THE SYSTEM WHICH YOU WILL SELECT. ALL D-  3g8ISK 00005 * PACKS SHOULD BE MOUNTED AND READY. 00006 * 00007PRFSC001 A-12000 ACCOUNT CCS SYSTEM (VOLUME CDD01) 00008PRFSC002 B-24000 ACCOUNT CCS SYSTEM (VOLUME CDD01/CDD02) 00009PRFSC003 C-36000 ACCOUNT CCS SYSTEM (VOLUME CDD01/CDD02) 00010PRFSC004 D-78000 ACCOUNT CCS SYSTEM (VOLUME CDD01) 00011PRFSC005 E-12000/9000 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01/CDD03) 00012PRFSC006 F-24000/9000 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01/CDD02/CDD03) 00013PRFSC007 G-36000/13500 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01/CDD02/CDD03) 00014PRFSC008 H-60000/18000 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01) 00015PRFSC009 I-CLEAR CCS SYSTEM FILES FOR CUSTOMER PARAMETERIZATION 00016PRFSC010 J-CLEAR CCS/LA SYSTEM FILES FOR CUSTOMER PARAMETERIZATION 00017 Z-EXIT 00018AL!8O M __9__mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm  3h9__J001SOURCE CCS20 J001 181279214435181279214439181279214451J002SOURCE CCS20 J002 191279152224191279152234191279153656J003SOURCE CCS20 J003 191279152255191279153656191279154858J004SOURCE CCS20 J004 181279222330181279223733181279224904J005SOURCE CCS20 J005 181279222438181279224901181279232230J006SOURCE CCS20 J006 1812792225 9181279232230181279233806J007 J008 J009 AL9 O $$ J011 J012 LOCL J018 AL9 O $$ J020 J021 J001SOURCE CCS20 J001 201279134317201279134548201279135031J002 J003 J004 J005 J006 J007 J008 J009 J010 J011 J012 J013 J014 J015 J016 J017 J018 J019 J020 J021 AL9O M$$ J023 J024 :  3i9LOCL J030 AL9O M$$ J032 J033 J001SYSVOL LA J001 220180153333220180153346220180153559J002SYSVOL LA J002 220180153340220180153559220180153924J003 J004 J005 J006 J007 J008 J009 J010 J011 J012 J013 J014 J015 J016 J017 J018 J019 J020 J021 J022 J023 J024 J025 J026 J027 J028 J029 J030 J031 J032 J033 J034 J035 J036 J037 J038 J039 J040 J041 J042 J043 J044 J045 J046 J047 J048 J049 J050 J051 Ŏ  3j9)J052 J053 J054 J055 J056 J057 J058 J059 J060 J101 J102 J103 J104 J105 J106 J107 J108 J109 J110 J111 J112 J113 J114 J115 J116 J117 J118 J119 J120 J121 J122 J123 J124 J125 J126 J127 J128 J129 J130 J131 J132 J133 J134 J135 J136 J137 J138 J139 J140 J141 J142 J143 J144 J145 J146 J147 J148 J149 J150 J151  3k9=J152 J153 J154 J155 J156 J157 J158 J159 J160 J201 J202 J203 J204 J205 J206 J207 J208 J209 J210 J211 J212 J213 J214 J215 J216 J217 J218 J219 J220 J221 J222 J223 J224 J225 J226 J227 J228 J229 J230 J231 J232 J233 J234 J235 J236 J237 J238 J239 J240 J241 J242 J243 J244 J245 J246 J247 J248 J249 J250 J251  3l9QJ252 J253 J254 J255 J256 J257 J258 J259 J260 J301 J302 J303 J304 J305 J306 J307 J308 J309 J310 J311 J312 J313 J314 J315 J316 J317 J318 J319 J320 J321 J322 J323 J324 J325 J326 J327 J328 J329 J330 J331 J332 J333 J334 J335 J336 J337 J338 J339 J340 J341 J342 J343 J344 J345 J346 J347 J348 J349 J350 J351 P  3m9eJ352 J353 J354 J355 J356 J357 J358 J359 J360 J401 J402 J403 J404 J405 J406 J407 J408 J409 J410 J411 J412 J413 J414 J415 J416 J417 J418 J419 J420 J421 J422 J423 J424 J425 J426 J427 J428 J429 J430 J431 J432 J433 J434 J435 J436 J437 J438 J439 J440 J441 J442 J443 J444 J445 J446 J447 J448 J449 J450 J451  3n9yJ452 J453 J454 J455 J456 J457 J458 J459 J460 J501 J502 J503 J504 J505 J506 J507 J508 J509 J510 J511 J512 J513 J514 J515 J516 J517 J518 J519 J520 J521 J522 J523 J524 J525 J526 J527 J528 J529 J530 J531 J532 J533 J534 J535 J536 J537 J538 J539 J540 J541 J542 J543 J544 J545 J546 J547 J548 J549 J550 J551  3o9J552 J553 J554 J555 J556 J557 J558 J559 J560 J601 J602 J603 J604 J605 J606 J607 J608 J609 J610 J611 J612 J613 J614 J615 J616 J617 J618 J619 J620 J621 J622 J623 J624 J625 J626 J627 J628 J629 J630 J631 J632 J633 J634 J635 J636 J637 J638 J639 J640 J641 J642 J643 J644 J645 J646 J647 J648 J649 J650 J651 ]  3p9J652 J653 J654 J655 J656 J657 J658 J659 J660 J701 J702 J703 J704 J705 J706 J707 J708 J709 J710 J711 J712 J713 J714 J715 J716 J717 J718 J719 J720 J721 J722 J723 J724 J725 J726 J727 J728 J729 J730 J731 J732 J733 J734 J735 J736 J737 J738 J739 J740 J741 J742 J743 J744 J745 J746 J747 J748 J749 J750 J751  3q8LDNFINUPMTDETCRDPRFLP005PRFPG010CARDPRO DCACTADDDCBLDDAS DCCOLACTDCDUMDUM DCDUMMIE DCFINUPDDCNFINUPDCPRTLTRDCSRTTRN DCUPDHIS DCUPDTAPHSMOVHISHSPRGHISHSPRGTAPHSUPDTAPLDACTADDELDBLDDASMLDCOLACTCLDDUMDUMKLDDUMMIEJLDFINUPDHLDNFINUPGLDPRTLTRDLDSRTTRNLLDUPDHISILDUPDTAPFLHMOVHISPLHPRGCLITLHPRGHISRLHPRGTAPSLHUPDTAPQLMACTMTXZLMAVMDMPYLMCONLTRVLMDECTBLXLMLDSCRN\LMRDRLTRULMSPCAUD[LMUTIFILWMTACTMTNMTACTMTXMTAVMDMPMTCONLTRMTDECTBLMTDETCONMTLDSCRNMTPDFMTN MTPRGMSTMTRDRLTRMTSCNPRT!MTSPCAUDMTSVSCRNMTUSEMTNMTUTIFILPRFLD012NPRFLD013OPRFLM017ePRFLO012qPRFLO013rPRFLO014sPRFLO015tPRFLO016uPRFLO017vPRFLP000wPRFLP001xPRFLP002yPRFLP003zPRFLP004{PRFLP005|PRFLP006}PRFLP007~PRFLP008PRFLP009PRFLP010PRFLP011PRFLP012PRFLP013PRFLP014PRFLP015PRFLP016PRFLP017PRFLP018PRFPG000/PRFPG0010PRFPG0021PRFPG0032PRFPG0043PRFPG0054PRFPG0065PRFPG0076PRFPG0087PRFPG0098+LDPRTLTRDLDSRTTRNLLDUPDHISILDUPDTAPFLHMOVHISPLHPRGCLITLHPRGHISRLHPRGTAPSLHUPDTAPQLMACTMTN_LMACTMTXZLMAVMDMPYLMCONLTRVLMDECTBLXLMDETCONbLMDETCRDaLMLDSCRN\LMPDFMTNcLMPRGMST^LMRDRLTRULMSCNPRTdLMSPCAUD[LMSVSCRN]LMUSEMTN`LMUTIFILWLODLYASNlLODRCIACfLODRCSRQgLOMCOLSToLOSUMACTmLOTAPRRNhLOTAPTQUiLOTAPTTYjLOTCNTRLpLOWCOLSTnLOWRTOFFkMTACTMTNMTACTMTXMTAVMDMPMTCONLTRMTDECTBLMTDETCONMTDETCRDMTAVMDMPMTCONLTRMTDECTBLMTDETCON"PRFPG011:PRFPG012;PRFPG013PRFPG016?PRFPG017@PRFPG018APRFPG019BPRFRP012-PRFRP013.PRFSC001PRFSC002PRFSC003PRFSC004PRFSC005PRFSC006PRFSC007PRFSC008PRFSC009PRFSC010RPDLYASN(RPDRCIAC"RPDRCSRQ#RPMCOLST+RPSUMACT)RPTAPRRN$RPTAPTQU%RPTAPTTY&RPTCNTRL,RPWCOLST*RPWRTOFF'TAPEPRO PRFRP013.RPDLYASN(RPDRCIAC"RPDRCSRQ#RPMCOLST+RPSUMACT)RPTAPRRN$RPTAPTQU%RPTAPTTY&RPTCNTRL,RPWCOLST*RPWRTOFF'TAPEPRO PRFLP006}PRFLP007~PRFLP008PRFLP009PRFLP010PRFLP011PRFLP012PRFLP013PRFLP014PRFLP015PRFLP016PRFLP017PRFLP018PRFLP019PRFPG000/PRFPG0010PRFPG0021PRFPG0032PRFPG0043PRFPG0054PRFPG0065PRFPG0076PRFPG0087PRFPG0098PRFPG0109PRFLP007~PRFLP008PRFLP009PRFLP010PRFLP011PRFLP012PRFLP013PRFLP014PRFLP015PRFLP016PRFLP017PRFLP018PRFPG000/PRFPG0010PRFPG0021PRFPG0032PRFPG0043PRFPG0054PRFPG0065PRFPG0076PRFPG0087PRFPG0098__~Z`SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*  3r8AL8O $$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmMNUPRO OE - ORDER ENTRY / INVOICING / SALES ANALYSIS X0200001MNUPRO OF - ORDER ENTRY FILE MAINTENANCE X0200002MNUPRO AR - ACCOUNTS RECEIVABLE X0200003MNUPRO IN - INVENTORY CONTROL X0200004MNUPRO AP - ACCOUNTS PAYABLE X0200005MNUPRO PR - PAYROLL X0200006MNUPRO GL - GENERAL LEDGER X0200007MNUPRO BM - BILL OF MATERIALS X0200008MNUPRO MR - MATERIAL REQUIREMENTS PLANNING X0200009MNUPRO PO - PURCHASING X0200010MNUPRO RT - ROUTING X0200011MNUPRO WP - WORK IN PROCESS X0200012MNUPRO PI - PHYSICAL INVENTORY X0200013UTIL UT - SYSTEM UTILITIES X0200014EDITOR ED - SOURCE PROGRAM EDITOR X0200015 EX - EXIT X0200016mmmmmmmmmmmmmmmmAL!8O  mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm__9mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmAL8PLA mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm39400015351 RP09257939400156155 SP09257939400388550 WP09257939400529450 RP09257939400577350 SP09257939400640851 WP09257939400667458 RP09257939400707254 SP09257939400741451 WP09257939400805652 RP09257939400825759 SP09257939400857257 WP09257939401057352 WP09257939401586152 WP09257939402270053 WP092579 0270007591234567000313331334040000300001110780002505 AL 8O M$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm * SYSTEM CONFIGURATION MENU 00001 * 00002 * BEFORE MAKING A SELECTION FROM THIS MENU BE SURE THE AUXILIARY 00003 * DISK(S) HAVE BEEN INITIALIZED WITH THE CORRECT VOLUME LABEL 00004 * OR LABELS FOR THE SYSTEM WHICH YOU WILL SELECT. ALL D!  3s8AL78O L$$ PRFLP011PRFLP012 PRFLP012PRFLP013 PRFLP013PRFLP014 PRFLP014PRFLP015 PRFLP015PRFLP016 PRFLP016PRFLP017 PRFLP017PRFLP018 PRFLP018PRFLP019 PRFLP019PRFSC001 PRCARDPRO READER TAPEPRO TAPE0 DCCOLACT PRFDC001DCPRTLTR PRFDC002DCACTADD PRFDC003DCUPDTAP PRFDC004DCNFINUP PRFDC005DCFINUPD PRFDC006DCUPDHIS PRFDC007DCDUMMIE PRFDC008DCDUMDUM PRFDC009DCSRTTRN PRFDC010DCBLDDAS PRFDC011HSMOVHIS PRFHS001HSUPDTAP PRFHS002HSPRGHIS PRFHS003HSPRGTAP PRFHS004MTRDRLTR PRFMT001MTCONLTR PRFMT002MTUTIFIL PRFMT003MTDECTBL PRFMT004MTAVMDMP PRFMT005MTACTMTX PRFMT006MTSPCAUD PRFMT007MTLDSCRN PRFMT008MTSVSCRN PRFMT009MTPRGMST PRFMT010MTACTMTN PRFMT011MTUSEMTN PRFMT012MTDETCRD PRFMT013MTDETCON PRFMT014MTPDFMTN PRFMT015MTSCNPRT PRFMT016RPDRCIAC PRFRP001RPDRCSRQ PRFRP002RPTAPRRN PRFRP003RPTAPTQU PRFRP004RPTAPTTY PRFRP005RPWRTOFF PRFRP006RPDLYASN PRFRP007RPSUMACT PRFRP008RPWCOLST PRFRP009RPMCOLST PRFRP010RPTCNTRL PRFCNTRLPRFRP012 PRFRP012PRFRP013 PRFRP013PRFPG000 PRFPG000PRFPG001 PRFPG001PRFPG002 PRFPG002PRFPG003 PRFPG003PRFPG004 PRFPG004PRFPG005 PRFPG005PRFPG006 PRFPG006PRFPG007 PRFPG007PRFPG008 PRFPG008PRFPG009 PRFPG009PRFPG010 PRFPG010PRFPG011 PRFPG011PRFPG012 PRFPG012PRFPG013 PRFPG013PRFPG014 PRFPG014PRFPG015 PRFPG015PRFPG016 PRFPG016PRFPG017 PRFPG017PRFPG018 PRFPG018PRFPG019 PRFPG019LDCOLACT PRFLD001LDPRTLTR PRFLD002LDACTADD PRFLD003LDUPDTAP PRFLD004LDNFINUP PRFLD005LDFINUPD PRFLD006LDUPDHIS PRFLD007LDDUMMIE PRFLD008LDDUMDUM PRFLD009LDSRTTRN PRFLD010LDBLDDAS PRFLD011PRFLD012 PRFLD012PRFLD013 PRFLD013LHMOVHIS PRFLH001LHUPDTAP PRFLH002LHPRGHIS PRFLH003LHPRGTAP PRFLH004LHPRGCLI PRFLH005LMRDRLTR PRFLM001LMCONLTR PRFLM002LMUTIFIL PRFLM003LMDECTBL PRFLM004LMAVMDMP PRFLM005LMACTMTX PRFLM006LMSPCAUD PRFLM007LMLDSCRN PRFLM008LMSVSCRN PRFLM009LMPRGMST PRFLM010LMACTMTN PRFLM011LMUSEMTN PRFLM012LMDETCRD PRFLM013LMDETCON PRFLM014LMPDFMTN PRFLM015LMSCNPRT PRFLM016PRFLM017 PRFLM017LODRCIAC PRFLO001LODRCSRQ PRFLO002LOTAPRRN PRFLO003LOTAPTQU PRFLO004LOTAPTTY PRFLO005LOWRTOFF PRFLO006LODLYASN PRFLO007LOSUMACT PRFLO008LOWCOLST PRFLO009LOMCOLST PRFLO010LOTCNTRL PRFLACTRPRFLO012 PRFLO012PRFLO013 PRFLO013PRFLO014 PRFLO014PRFLO015 PRFLO015PRFLO016 PRFLO016PRFLO017 PRFLO017PRFLP000 PRFLP000PRFLP001 PRFLP001PRFLP002 PRFLP002PRFLP003 PRFLP003PRFLP004 PRFLP004PRFLP005 PRFLP005PRFLP006 PRFLP006PRFLP007 PRFLP007PRFLP008 PRFLP008PRFLP009 PRFLP009PRFLP010 PRFLP010PRFLP011 PRFLP011PRFLP012 PRFLP012PRFLP013 PRFLP013PRFLP014 PRFLP014PRFLP015 PRFLP015PRFLP016 PRFLP016PRFLP017 PRFLP017PRFLP018 PRFLP018PRFLP019 PRFLP019PRFSC001 PRFSC001PRFSC002 PRFSC002PRFSC003 PRFSC003PRFSC004 PRFSC004PRFSC005 PRFSC005PRFSC006 PRFSC006PRFSC007 PRFSC007PRFSC008 PRFSC008PRFSC009 PRFSC009PRFSC010 PRFSC010__CTBLMTDETCONMTLDSCRNMTPDFMTN MTPRGMSTMTRDRLTRMTSCNPRT!MTSPCAUDMTSVSCRNMTUSEMTNMTUTIFILPRFLD012NPRFLD013OPRFLM017ePRFLO012qPRFLO013rPRFLO014sPRFLO015tPRFLO016uPRFLO017vPRFLP000wPRFLP001xPRFLP002yPRFLP003zPRFLP004{PRFLP005|PRFLP006}PRFLP007~PRFLP008PRFLP009PRFLP010PRFLP011PRFLP012PRFLP013PRFLP014PRFLP015PRFLP016PRFLP017PRFLP018PRFPG000/PRFPG0010PRFPG0021PRFPG0032PRFPG0043PRFPG0054PRFPG0065PRFPG0076PRFPG0087PRFPG0098+LDPRTLTRDLDSRTTRNLLDUPDHISILDUPDTAPFLHMOVHISPLHPRGCLITLHPRGHISRLHPRGTAPSLHUPDTAPQLMACTMTN_LMACTMTXZLMAVMDMPYLMCONLTRVLMDECTBLXLMDETCONbLMDETCRDaLMLDSCRN\LMPDFMTNcLMPRGMST^LMRDRLTRULMSCNPRTdLMSPCAUD[LMSVSCRN]LMUSEMTN`LMUTIFILWLODLYASNlLODRCIACfLODRCSRQgLOMCOLSToLOSUMACTmLOTAPRRNh  3t8LOTAPTQUiLOTAPTTYjLOTCNTRLpLOWCOLSTnLOWRTOFFkMTACTMTNMTACTMTXMTAVMDMPMTCONLTRMTDECTBLMTDETCONMTDETCRDMTAVMDMPMTCONLTRMTDECTBLMTDETCON"PRFPG011:PRFPG012;PRFPG013PRFPG016?PRFPG017@PRFPG018APRFPG019BPRFRP012-PRFRP013.PRFSC001PRFSC002PRFSC003PRFSC004LDNFINUPMTDETCRDPRFLP005PRFPG010CARDPRO DCACTADDDCBLDDAS DCCOLACTDCDUMDUM DCDUMMIE DCFINUPDDCNFINUPDCPRTLTRDCSRTTRN DCUPDHIS DCUPDTAPHSMOVHISHSPRGHISHSPRGTAPHSUPDTAPLDACTADDELDBLDDASMLDCOLACTCLDDUMDUMKLDDUMMIEJLDFINUPDHLDNFINUPGLDPRTLTRDLDSRTTRNLLDUPDHISILDUPDTAPFLHMOVHISPLHPRGCLITLHPRGHISRLHPRGTAPSLHUPDTAPQLMACTMTXZLMAVMDMPYLMCONLTRVLMDECTBLXLMLDSCRN\LMRDRLTRULMSPCAUD[LMUTIFILWMTACTMTNMTACTMTXMTAVMDMPMTCONLTRMTDECTBLMTDETCONMTLDSCRNMTPDFMTN MTPRGMSTMTRDRLTRMTSCNPRT!MTSPCAUDMTSVSCRNMTUSEMTNMTUTIFILPRFLD012NPRFLD013OPRFLM017ePRFLO012qPRFLO013rPRFLO014sPRFLO015tPRFLO016uPRFLO017vPRFLP000wPRFLP001xPRFLP002yPRFLP003zPRFLP004{PRFLP005|PRFLP006}PRFLP007~PRFLP008PRFLP009PRFLP010PRFLP011PRFLP012PRFLP013PRFLP014PRFLP015PRFLP016PRFLP017PRFLP018PRFPG000/PRFPG0010PRFPG0021PRFPG0032PRFPG0043PRFPG0054PRFPG0065PRFPG0076PRFPG0087PRFPG0098+LDPRTLTRDLDSRTTRNLLDUPDHISILDUPDTAPFLHMOVHISPLHPRGCLITLHPRGHISRLHPRGTAPSLHUPDTAPQLMACTMTN_LMACTMTXZLMAVMDMPYLMCONLTRVLMDECTBLXLMDETCONbLMDETCRDaLMLDSCRN\LMPDFMTNcLMPRGMST^LMRDRLTRULMSCNPRTdLMSPCAUD[LMSVSCRN]LMUSEMTN`LMUTIFILWLODLYASNlLODRCIACfLODRCSRQgLOMCOLSToLOSUMACTmLOTAPRRNhLOTAPTQUiLOTAPTTYjLOTCNTRLpLOWCOLSTnLOWRTOFFkMTACTMTNMTACTMTXMTAVMDMPMTCONLTRMTDECTBLMTDETCONMTDETCRDMTAVMDMPMTCONLTRMTDECTBLMTDETCON"PRFPG011:PRFPG012;PRFPG013PRFPG016?PRFPG017@PRFPG018APRFPG019BPRFRP012-PRFRP013.PRFSC001PRFSC002PRFSC003PRFSC004PRFSC005PRFSC006PRFSC007PRFSC008PRFSC009PRFSC010RPDLYASN(RPDRCIAC"RPDRCSRQ#RPMCOLST+RPSUMACT)RPTAPRRN$RPTAPTQU%RPTAPTTY&RPTCNTRL,RPWCOLST*RPWRTOFF'TAPEPRO PRFRP013.RPDLYASN(RPDRCIAC"RPDRCSRQ#RPMCOLST+RPSUMACT)RPTAPRRN$RPTAPTQU%RPTAPTTY&RPTCNTRL,RPWCOLST*RPWRTOFF'TAPEPRO PRFLP006}PRFLP007~PRFLP008PRFLP009PRFLP010PRFLP011PRFLP012PRFLP013PRFLP014PRFLP015PRFLP016PRFLP017PRFLP018PRFLP019PRFPG000/PRFPG0010PRFPG0021PRFPG0032PRFPG0043PRFPG0054PRFPG0065PRFPG0076PRFPG0087PRFPG0098PRFPG0109PRFLP007~PRFLP008PRFLP009PRFLP010PRFLP011PRFLP012PRFLP013PRFLP014PRFLP015PRFLP016PRFLP017PRFLP018PRFPG000/PRFPG0010PRFPG0021PRFPG0032PRFPG0043PRFPG0054PRFPG0065PRFPG0076PRFPG0087PRFPG0098 V  3u8__~Z`SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmAL8O $$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmMNUPRO OE - ORDER ENTRY / INVOICING / SALES ANALYSIS X0200001MNUPRO OF - ORDER ENTRY FILE MAINTENANCE X0200002MNUPRO AR - ACCOUNTS RECEIVABLE X0200003MNUPRO IN - INVENTORY CONTROL X0200004MNUPRO AP - ACCOUNTS PAYABLE X0200005MNUPRO PR - PAYROLL X0200006MNUPRO GL - GENERAL LEDGER X0200007MNUPRO BM - BILL OF MATERIALS X0200008MNUPRO MR - MATERIAL REQUIREMENTS PLANNING X0200009MNUPRO PO - PURCHASING X0200010MNUPRO RT - ROUTING X0200011MNUPRO WP - WORK IN PROCESS X0200012MNUPRO PI - PHYSICAL INVENTORY X0200013UTIL UT - SYSTEM UTILITIES X0200014EDITOR ED - SOURCE PROGRAM EDITOR X0200015 EX - EXIT X0200016mmmmmmmmmmmmmmmmAL!8O  mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm__9mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmAL8PLA mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm39400015351 RP09257939400156155 SP09257939400388550 WP09257939400529450 RP09257939400577350 SP09257939400640851 WP09257939400667458 RP09257939400707254 SP09257939400741451 WP09257939400805652 RP09257939400825759 SP09257939400857257 WP09257939401057352 WP09257939401586152 WP09257939402270053 WP092579 0270007591234567000313331334040000300001110780002505 AL 8O M$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm۩  3v8 * SYSTEM CONFIGURATION MENU 00001 * 00002 * BEFORE MAKING A SELECTION FROM THIS MENU BE SURE THE AUXILIARY 00003 * DISK(S) HAVE BEEN INITIALIZED WITH THE CORRECT VOLUME LABEL 00004 * OR LABELS FOR THE SYSTEM WHICH YOU WILL SELECT. ALL DISK 00005 * PACKS SHOULD BE MOUNTED AND READY. 00006 * 00007PRFSC001 A-12000 ACCOUNT CCS SYSTEM (VOLUME CDD01) 00008PRFSC002 B-24000 ACCOUNT CCS SYSTEM (VOLUME CDD01/CDD02) 00009PRFSC003 C-36000 ACCOUNT CCS SYSTEM (VOLUME CDD01/CDD02) 00010PRFSC004 D-78000 ACCOUNT CCS SYSTEM (VOLUME CDD01) 00011PRFSC005 E-12000/9000 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01/CDD03) 00012PRFSC006 F-24000/9000 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01/CDD02/CDD03) 00013PRFSC007 G-36000/13500 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01/CDD02/CDD03) 00014PRFSC008 H-60000/18000 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01) 00015PRFSC009 I-CLEAR CCS SYSTEM FILES FOR CUSTOMER PARAMETERIZATION 00016PRFSC010 J-CLEAR CCS/LA SYSTEM FILES FOR CUSTOMER PARAMETERIZATION 00017 Z-EXIT 00018AL!8O M __9__mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm  3w8__J001SOURCE CCS20 J001 181279214435181279214439181279214451J002SOURCE CCS20 J002 191279152224191279152234191279153656J003SOURCE CCS20 J003 191279152255191279153656191279154858J004SOURCE CCS20 J004 181279222330181279223733181279224904J005SOURCE CCS20 J005 181279222438181279224901181279232230J006SOURCE CCS20 J006 1812792225 9181279232230181279233806J007 J008 J009 AL9 O $$ J011 J012 LOCL J018 AL9 O $$ J020 J021 J001SOURCE CCS20 J001 201279134317201279134548201279135031J002 J003 J004 J005 J006 J007 J008 J009 J010 J011 J012 J013 J014 J015 J016 J017 J018  3x9J019 J020 J021 AL9O M$$ J023 J024 LOCL J030 AL9O M$$ J032 J033 J001SYSVOL LA J001 220180153333220180153346220180153559J002SYSVOL LA J002 220180153340220180153559220180153924J003 J004 J005 J006 J007 J008 J009 J010 J011 J012 J013 J014 J015 J016 J017 J018 J019 J020 J021 J022 J023 J024 J025 J026 J027 J028 J029 J030 J031 J032 J033 J034 J035 J036 J037 J038 J039 J040 J041 J042 J043 J044 J045  3y9'J046 J047 J048 J049 J050 J051 J052 J053 J054 J055 J056 J057 J058 J059 J060 J101 J102 J103 J104 J105 J106 J107 J108 J109 J110 J111 J112 J113 J114 J115 J116 J117 J118 J119 J120 J121 J122 J123 J124 J125 J126 J127 J128 J129 J130 J131 J132 J133 J134 J135 J136 J137 J138 J139 J140 J141 J142 J143 J144 J145  3z9;J146 J147 J148 J149 J150 J151 J152 J153 J154 J155 J156 J157 J158 J159 J160 J201 J202 J203 J204 J205 J206 J207 J208 J209 J210 J211 J212 J213 J214 J215 J216 J217 J218 J219 J220 J221 J222 J223 J224 J225 J226 J227 J228 J229 J230 J231 J232 J233 J234 J235 J236 J237 J238 J239 J240 J241 J242 J243 J244 J245  3{AL O 2$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm * SYSTEM MENU 00080 * 00090MNUPRO SC - SYSTEM CONFIGURATOR 00100UTIL UT - SYSTEM UTILITIES 00110EDITOR ED - TEXT EDITOR-USED TO EDIT 80 CHARACTER SEQ OR DIRECT FILES 00120MNUPRO DC - CCS20 DAILY CYCLE, ON-LINE REPORTING AND PREPARATION 00130MNUPRO HS - CCS20 HISTORY SYSTEM PROCEDURES 00140MNUPRO MT - CCS20 SYSTEM FILE MAINTENANCE ROUTINES 00150MNUPRO RP - CCS20 ON DEMAND REPORTING 00160MNUPRO RG - CCS20 REPORT GENERATOR - REPORT DIRECTORY 00170MNUPRO LD - L/A DAILY CYCLE, ON-LINE REPORTING AND PREPARATION 00180MNUPRO LH - L/A HISTORY SYSTEM PROCEDURES 00190MNUPRO LM - L/A SYSTEM FILE MAINTENANCE ROUTINES 00200MNUPRO LO - L/A ON DEMAND REPORTING 00210MNUPRO LR - L/A REPORT GENERATOR - REPORT DIRECTORY 00220MNUPRO EX - EXIT 00230__mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmAL O 2$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm * DAILY CYCLE MENU 00270 * 00280DCCOLACT A - DAILY COLLECTOR ACTIVITY REPORTS 00290DCPRTLTR B - PRINT REQUESTED LETTERS 00300DCACTADD C - ADD THE COLLECTOR ACTIVITIES TO THE ACTIVITY FILE 00310DCUPDTAP D - PROCESS COMPLETE UPDATE TAPE(S) FROM A/R SYSTEM 00320DCNFINUP E - PROCESS 400 SERIES NON-FINANCIAL UPDATE (TAPE)S 00330DCFINUPD F - PROCESS 500 SERIES FINANCIAL UPDATE TAPE(S) 00340RPDRCIAC G - DELINQUENT RECORD CONTENT REPORT - (INACTIVE ACCOUNTS) 00350RPDRCSRQ H - DELINQUENT RECORD CONTENT REPORT - (SUPERVISOR REQUESTS) 00360DCUPDHIS I - UPDATE ACCOUNTS FROM HISTORY 00370DCDUMMIE J** THE FOLLOWING PROCEDURES ARE TO BE RUN WHEN THE COLLECTORS 00380DCDUMDUM K** ARE FINISHED WITH THE DAYS ACTIVITIES 00390DCSRTTRN L - SORT TRANSACTION FILE IN PROPER ORDER FOR COLLECTOR REPORT 00400DCBLDDAS M - CREATE DAILY ASSIGό 3|8AL 8O M$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm * SYSTEM CONFIGURATION MENU 00001 * 00002 * BEFORE MAKING A SELECTION FROM THIS MENU BE SURE THE AUXILIARY 00003 * DISK(S) HAVE BEEN INITIALIZED WITH THE CORRECT VOLUME LABEL 00004 * OR LABELS FOR THE SYSTEM WHICH YOU WILL SELECT. ALL DISK 00005 * PACKS SHOULD BE MOUNTED AND READY. 00006 * 00007PRFSC001 A-12000 ACCOUNT CCS SYSTEM (VOLUME CDD01) 00008PRFSC002 B-24000 ACCOUNT CCS SYSTEM (VOLUME CDD01/CDD02) 00009PRFSC003 C-36000 ACCOUNT CCS SYSTEM (VOLUME CDD01/CDD02) 00010PRFSC004 D-78000 ACCOUNT CCS SYSTEM (VOLUME CDD01) 00011PRFSC005 E-12000/9000 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01/CDD03) 00012PRFSC006 F-24000/9000 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01/CDD02/CDD03) 00013PRFSC007 G-36000/13500 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01/CDD02/CDD03) 00014PRFSC008 H-60000/18000 ACCOUNT CCS/LA SYSTEM (VOLUME CDD01) 00015PRFSC009 I-CLEAR CCS SYSTEM FILES FOR CUSTOMER PARAMETERIZATION 00016PRFSC010 J-CLEAR CCS/LA SYSTEM FILES FOR CUSTOMER PARAMETERIZATION 00017 Z-EXIT 00018AL!8O M __9__mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmȼ  3}8mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm__J001SOURCE CCS20 J001 181279214435181279214439181279214451J002SOURCE CCS20 J002 191279152224191279152234191279153656J003SOURCE CCS20 J003 191279152255191279153656191279154858J004SOURCE CCS20 J004 181279222330181279223733181279224904J005SOURCE CCS20 J005 181279222438181279224901181279232230J006SOURCE CCS20 J006 1812792225 9181279232230181279233806J007 J008 J009 AL9 O $$ J011 J012 LOCL J018 AL9 O $$ J020 J021 J001SOURCE CCS20 J001 201279134317201279134548201279135031J002 J003 J004 J005 J006 J007 J008 J009 J010 J011 J012 J013 J014 J015 3~8f__J001SOURCE CCS20 J001 181279214435181279214439181279214451J002SOURCE CCS20 J002 191279152224191279152234191279153656J003SOURCE CCS20 J003 191279152255191279153656191279154858J004SOURCE CCS20 J004 181279222330181279223733181279224904J005SOURCE CCS20 J005 181279222438181279224901181279232230J006SOURCE CCS20 J006 1812792225 918127923223018127923380638AL!8O M __9܌39AL9O M$$ J023 J024 LOCL J030 AL9O M$$ J032 J033 J001SYSVOL LA J001 220180153333220180153346220180153559J002SYSVOL LA J002 220180153340220180153559220180153924J003 J004 J005 J006 J007 J008 J009 J010 J011 J012 J013 J014 J015 J016 J017 J018 J 39 J035J111J147J223J259J335J411J447 J523 J559 J635 J711 $J001J002J003J004J005J006J007J008J009 J010 J011 J012 J013 J014J015J016J017J018J019J020J021J022J023J024J025J026J027J028J029J030J031J032 J033!J034"J035#J036$J037%J038&J039'J040(J041)J042*J043+J044,J045-J046.J047/J0480J0491J0502J0513J0524J0535J0546J0557J0568J0579J058:J059;J060J103?J104@J105AJ106BJ107CJ108DJ109E$J036$J037%J038&J039'J040(J041)J042*J043+J044,J045-J046.J047/J0480J0491J0502J0513J0524J0535J0546J0557J0568J0579J058:J059;J060J103?J104@J105AJ106BJ107CJ108DJ109EJ110FJ111GJ112HJ113IJ114JJ115KJ116LJ117MJ118NJ119OJ120PJ121QJ122RJ123SJ124TJ125UJ126VJ127WJ128XJ129YJ130ZJ131[J132\J133]J134^J135_J136`J137aJ138bJ139cJ140dJ141eJ142fJ143gJ144hJ145i$J112HJ113IJ114JJ115KJ116LJ117MJ118NJ119OJ120PJ121QJ122RJ123SJ124TJ125UJ126VJ127WJ128XJ129YJ130ZJ131[J132\J133]J134^J135_J136`J137aJ138bJ139cJ140dJ141eJ142fJ143gJ144hJ145iJ146jJ147kJ148lJ149mJ150nJ151oJ152pJ153qJ154rJ155sJ156tJ157uJ158vJ159wJ160xJ201yJ202zJ203{J204|J205}J206~J207J208J209J210J211J212J213J214J215J216J217J218J219J220J221$J148lJ149mJ150nJ151oJ152pJ153qJ154rJ155sJ156tJ157uJ158vJ159wJ160xJ201yJ202zJ203{J204|J205}J206~J207J208J209J210J211J212J213J214J215J216J217J218J219J220J221J222J223J224J225J226J227J228J229J230J231J232J233J234J235J236J237J238J239J240J241J242J243J244J245J246J247J248J249J250J251J252J253J254J255J256J257$J224J225J226J227J228J229J230J231J232J233J234J235J236J237J238J239J240J241J242J243J244J245J246J247J248J249J250J251J252J253J254J255J256J257J258J259J260J301J302J303J304J305J306J307J308J309J310J311J312J313J314J315J316J317J318J319J320J321J322J323J324J325J326J327J328J329J330J331J332J333$J260J301J302J303J304J305J306J307J308J309J310J311J312J313J314J315J316J317J318J319J320J321J322J323J324J325J326J327J328J329J330J331J332J333J334J335J336J337J338J339J340J341J342J343J344J345J346.  39J347J348J349J350J351J352J353J354J355J356J357J358J359J360J401J402J403J404J405J406J407J408J409$ J336J337J338J339J340J341J342J343J344J345J346J347J348J349J350J351J352J353J354J355J356J357J358J359J360J401J402J403J404J405J406J407J408J409J410J411J412J413J414J415J416J417J418J419J420J421J422J423J424J425 J426 J427 J428 J429 J430J431J432J433J434J435J436J437J438J439J440J441J442J443J444J445$ J412J413J414J415J416J417J418J419J420J421J422J423J424J425 J426 J427 J428 J429 J430J431J432J433J434J435J436J437J438J439J440J441J442J443J444J445J446J447J448 J449!J450"J451#J452$J453%J454&J455'J456(J457)J458*J459+J460,J501-J502.J503/J5040J5051J5062J5073J5084J5095J5106J5117J5128J5139J514:J515;J516J519?J520@J521A$ J448 J449!J450"J451#J452$J453%J454&J455'J456(J457)J458*J459+J460,J501-J502.J503/J5040J5051J5062J5073J5084J5095J5106J5117J5128J5139J514:J515;J516J519?J520@J521AJ522BJ523CJ524DJ525EJ526FJ527GJ528HJ529IJ530JJ531KJ532LJ533MJ534NJ535OJ536PJ537QJ538RJ539SJ540TJ541UJ542VJ543WJ544XJ545YJ546ZJ547[J548\J549]J550^J551_J552`J553aJ554bJ555cJ556dJ557e$ J524DJ525EJ526FJ527GJ528HJ529IJ530JJ531KJ532LJ533MJ534NJ535OJ536PJ537QJ538RJ539SJ540TJ541UJ542VJ543WJ544XJ545YJ546ZJ547[J548\J549]J550^J551_J552`J553aJ554bJ555cJ556dJ557eJ558fJ559gJ560hJ601iJ602jJ603kJ604lJ605mJ606nJ607oJ608pJ609qJ610rJ611sJ612tJ613uJ614vJ615wJ616xJ617yJ618zJ619{J620|J621}J622~J623J624J625J626J627J628J629J630J631J632J633$ J560hJ601iJ602jJ603kJ604lJ605mJ606nJ607oJ608pJ609qJ610rJ611sJ612tJ613uJ614vJ615wJ616xJ617yJ618zJ619{J620|J621}J622~J623J624J625J626J627J628J629J630J631J632J633J634J635J636J637J638J639J640J641J642J643J644J645J646J647J648J649J650J651J652J653J654J655J656J657J658J659J660J701J702J703J704J705J706J707J708J709$J636J637J638J639J640J641J642J643J644J645J646J647J648J649J650J651J652J653J654J655J656J657J658J659J660J701J702J703J704J705J706J707J708J709J710J711J712J713J714J715J716J717J718J719J720J721J722J723J724J725J726J727J728J729J730J731J732J733J734J735J736J737J738J739J740J741J742J743J744J7452J712J713J714J715J716J717J718J719J720J721J722J723J724J725J726J727J728J729J730J731J732J733J734a  39J735J736J737J738J739J740J741J742J743J744J745J746J747J748J749J750J751J752J753J754J755J756J757J758J759J760J726J727J728J729J730J731J732J733J734J735J736J737J738J739J740J741J742J743J744J745__~Z`SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097 PR47 PR48 PR49 PR50 0097AL9O N$$ PR01 220180173013 00D5PR02 PR03 PR04 PR05 PR06 PR07 PR08 PR09 PR10 PR11 PR12 PR13 PR14 PR15 PR16 PR17 PR18 PR19 PR20 PR21 PR22 PR23 PR24 PR25 PR26 PR27 PR28 PR29 PR30 PR31 PR32 PR33 PR34 PR35 PR36 PR37 PR38 PR39 PR40 PR41 PR42 PR43 PR44 PR45 PR46 PR47 PR48 PR49 PR50 T=PRFSC001 4PR01PR02PR03PR04PR05PR06PR07PR08PR09 PR10 PR11 PR12 PR13 PR14PR15PR16PR17PR18PR19PR20PR21PR22PR23PR24PR25PR26PR27PR28PR29PR30PR31PR32 PR33!PR34"PR35#PR36$PR37%PR38&PR39'PR40(PR41)PR42*PR43+PR44,PR45-PR46  39AL9O M$$ J032 J033 J001SYSVOL LA J001 220180153333220180153346220180153559J002SYSVOL LA J002 220180153340220180153559220180153924J003 J004 J005 J006 J007 J008 J009 J010 J011 J012 J013 J014 J015 J016 J017 J018 J019 J020 J021 J022 J023 J024 J025 J026 J027 J028 J029 J030 J031 J032 J033 J034 J035 J036 J037 J038 J039 J040 J041 J042 J043 J044 J045 J046 J047 J048 J049 J050 J051 J052 J053 J054 J055 J056 J057  39+J058 J059 J060 J101 J102 J103 J104 J105 J106 J107 J108 J109 J110 J111 J112 J113 J114 J115 J116 J117 J118 J119 J120 J121 J122 J123 J124 J125 J126 J127 J128 J129 J130 J131 J132 J133 J134 J135 J136 J137 J138 J139 J140 J141 J142 J143 J144 J145 J146 J147 J148 J149 J150 J151 J152 J153 J154 J155 J156 J157  39?J158 J159 J160 J201 J202 J203 J204 J205 J206 J207 J208 J209 J210 J211 J212 J213 J214 J215 J216 J217 J218 J219 J220 J221 J222 J223 J224 J225 J226 J227 J228 J229 J230 J231 J232 J233 J234 J235 J236 J237 J238 J239 J240 J241 J242 J243 J244 J245 J246 J247 J248 J249 J250 J251 J252 J253 J254 J255 J256 J257 ~  39SJ258 J259 J260 J301 J302 J303 J304 J305 J306 J307 J308 J309 J310 J311 J312 J313 J314 J315 J316 J317 J318 J319 J320 J321 J322 J323 J324 J325 J326 J327 J328 J329 J330 J331 J332 J333 J334 J335 J336 J337 J338 J339 J340 J341 J342 J343 J344 J345 J346 J347 J348 J349 J350 J351 J352 J353 J354 J355 J356 J357 -  39gJ358 J359 J360 J401 J402 J403 J404 J405 J406 J407 J408 J409 J410 J411 J412 J413 J414 J415 J416 J417 J418 J419 J420 J421 J422 J423 J424 J425 J426 J427 J428 J429 J430 J431 J432 J433 J434 J435 J436 J437 J438 J439 J440 J441 J442 J443 J444 J445 J446 J447 J448 J449 J450 J451 J452 J453 J454 J455 J456 J457  39{J458 J459 J460 J501 J502 J503 J504 J505 J506 J507 J508 J509 J510 J511 J512 J513 J514 J515 J516 J517 J518 J519 J520 J521 J522 J523 J524 J525 J526 J527 J528 J529 J530 J531 J532 J533 J534 J535 J536 J537 J538 J539 J540 J541 J542 J543 J544 J545 J546 J547 J548 J549 J550 J551 J552 J553 J554 J555 J556 J557  39J558 J559 J560 J601 J602 J603 J604 J605 J606 J607 J608 J609 J610 J611 J612 J613 J614 J615 J616 J617 J618 J619 J620 J621 J622 J623 J624 J625 J626 J627 J628 J629 J630 J631 J632 J633 J634 J635 J636 J637 J638 J639 J640 J641 J642 J643 J644 J645 J646 J647 J648 J649 J650 J651 J652 J653 J654 J655 J656 J657 :  39J658 J659 J660 J701 J702 J703 J704 J705 J706 J707 J708 J709 J710 J711 J712 J713 J714 J715 J716 J717 J718 J719 J720 J721 J722 J723 J724 J725 J726 J727 J728 J729 J730 J731 J732 J733 J734 J735 J736 J737 J738 J739 J740 J741 J742 J743 J744 J745 J746 J747 J748 J749 J750 J751 J752 J753 J754 J755 J756 J757  39J758 J759 J760 J035J111J147J223J259J335J411J447 J523 J559 J635 J711 $J001J002J003J004J005J006J007J008J009 J010 J011 J012 J013 J014J015J016J017J018J019J020J021J022J023J024J025J026J027J028J029J030J031J032 J033!J034"J035#J036$J037%J038&J039'J040(J041)J042*J043+J044,J045-J046.J047/J0480J0491J0502J0513J0524J0535J0546J0557J0568J0579J058:J059;J060J103?J104@J105AJ106BJ107CJ108DJ109E$J036$J037%J038&J039'J040(J041)J042*J043+J044,J045-J046.J047/J0480J0491J0502J0513J0524J0535J0546J0557J0568J0579J058:J059;J060J103?J104@J105AJ106BJ107CJ108DJ109EJ110FJ111GJ112HJ113IJ114JJ115KJ116LJ117MJ118NJ119OJ120PJ121QJ122RJ123SJ124TJ125UJ126VJ127WJ128XJ129YJ130ZJ131[J132\J133]J134^J135_J136`J137aJ138bJ139cJ140dJ141eJ142fJ143gJ144hJ145i$J112HJ113IJ114JJ115KJ116LJ117MJ118NJ119OJ120PJ121QJ122RJ123SJ124TJ125UJ126VJ127WJ128XJ129YJ130ZJ131[J132\J133]J134^J135_J136`J137aJ138bJ139cJ140dJ141eJ142fJ143gJ144hJ145iJ146jJ147kJ148lJ149mJ150nJ151oJ152pJ153qJ154rJ155sJ156tJ157uJ158vJ159wJ160xJ201yJ202zJ203{J204|J205}J206~J207J208J209J210J211J212J213J214J215J216J217J218J219J220J221$J148lJ149mJ150nJ151oJ152pJ153qJ154rJ155sJ156tJ157uJ158vJ159wJ160xJ201yJ202zJ203{J204|J205}J206~J207J208J209J210J211J212J213J214J215J216J217J218J219J220J221J222J223J224J225J226J227J228J229J230J231J232J233J234J235J236J237J238J239J240J241J242J243J244J245J246J247J248J249J250J251J252J253J254J255J256J257$J224J225J226J227J228J229J230J231J232J233J234J235J236J237J238J239J240J241J242J243J244J245J246J247J248J249J250J251J252J253J254J255J256J257J258J259J260J301J302J303J304J305J306J307J308J309J310J311J312J313J314J315J316J317J318J319J320J321J322J323J324J325J326J327J328J329J330J331J332J333$J260J301J302J303J304J305J306J307J308J309J310J311J312J313J314J315J316J317J318J319J320J321J322U  39J323J324J325J326J327J328J329J330J331J332J333J334J335J336J337J338J339J340J341J342J343J344J345J346J347J348J349J350J351J352J353J354J355J356J357J358J359J360J401J402J403J404J405J406J407J408J409$ J336J337J338J339J340J341J342J343J344J345J346J347J348J349J350J351J352J353J354J355J356J357J358J359J360J401J402J403J404J405J406J407J408J409J410J411J412J413J414J415J416J417J418J419J420J421J422J423J424J425 J426 J427 J428 J429 J430J431J432J433J434J435J436J437J438J439J440J441J442J443J444J445$ J412J413J414J415J416J417J418J419J420J421J422J423J424J425 J426 J427 J428 J429 J430J431J432J433J434J435J436J437J438J439J440J441J442J443J444J445J446J447J448 J449!J450"J451#J452$J453%J454&J455'J456(J457)J458*J459+J460,J501-J502.J503/J5040J5051J5062J5073J5084J5095J5106J5117J5128J5139J514:J515;J516J519?J520@J521A$ J448 J449!J450"J451#J452$J453%J454&J455'J456(J457)J458*J459+J460,J501-J502.J503/J5040J5051J5062J5073J5084J5095J5106J5117J5128J5139J514:J515;J516J519?J520@J521AJ522BJ523CJ524DJ525EJ526FJ527GJ528HJ529IJ530JJ531KJ532LJ533MJ534NJ535OJ536PJ537QJ538RJ539SJ540TJ541UJ542VJ543WJ544XJ545YJ546ZJ547[J548\J549]J550^J551_J552`J553aJ554bJ555cJ556dJ557e$ J524DJ525EJ526FJ527GJ528HJ529IJ530JJ531KJ532LJ533MJ534NJ535OJ536PJ537QJ538RJ539SJ540TJ541UJ542VJ543WJ544XJ545YJ546ZJ547[J548\J549]J550^J551_J552`J553aJ554bJ555cJ556dJ557eJ558fJ559gJ560hJ601iJ602jJ603kJ604lJ605mJ606nJ607oJ608pJ609qJ610rJ611sJ612tJ613uJ614vJ615wJ616xJ617yJ618zJ619{J620|J621}J622~J623J624J625J626J627J628J629J630J631J632J633$ J560hJ601iJ602jJ603kJ604lJ605mJ606nJ607oJ608pJ609qJ610rJ611sJ612tJ613uJ614vJ615wJ616xJ617yJ618zJ619{J620|J621}J622~J623J624J625J626J627J628J629J630J631J632J633J634J635J636J637J638J639J640J641J642J643J644J645J646J647J648J649J650J651J652J653J654J655J656J657J658J659J660J701J702J703J704J705J706J707J708J709$J636J637J638J639J640J641J642J643J644J645J646J647J648J649J650J651J652J653J654J655J656J657J658J659J660J701J702J703J704J705J706J707J708J709J710J711J712J713J714J715J716J717J718J719J720J721J722J723J724J725J726J727J728J729J730J731J732J733J734J735J736J737J738J739J740J741J742J743J744J7459  392J712J713J714J715J716J717J718J719J720J721J722J723J724J725J726J727J728J729J730J731J732J733J734J735J736J737J738J739J740J741J742J743J744J745J746J747J748J749J750J751J752J753J754J755J756J757J758J759J760J726J727J728J729J730J731J732J733J734J735J736J737J738J739J740J741J742J743J744J745__~Z`SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097 PR47 PR48 PR49 PR50 0097AL9O N$$ PR01 220180173013 00D5PR02 PR03 PR04 PR05 PR06 PR07 PR08 PR09 PR10 PR11 PR12 PR13 PR14 PR15 PR16 PR17 PR18 PR19 PR20 PR21 PR22 PR23 PR24 PR25 PR26 PR27 PR28 PR29 PR30 PR31 PR32 PR33 PR34 PR35 PR36 PR37 PR38 PR39 PR40 PR41 PR42 PR43 PR44 PR45 PR46 PR47 PR48 PR49 PR50 T=PRFSC001 4PR01PR02PR03PR04PR05PR06PR07PR08PR09 PR10 PR11 PR12 PR13 PR14PR15PR16PR17PR18PR19PR20PR21PR22  39PR23PR24PR25PR26PR27PR28PR29PR30PR31PR32 PR33!PR34"PR35#PR36$PR37%PR38&PR39'PR40(PR41)PR42*PR43+PR44,PR45-PR46.PR47/PR480PR491PR502__~Z`SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097NU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$DCMENU,OW=$$ 00002 * DAILY CYCLE MENU 00003 * 00004DCCOLACT A - DAILY COLLECTOR ACTIVITY REPORTS 00005ALC9P,$$ TED LETTERS 00006DCACTADD C - ADD THE COLLECTOR ACTIVITIES TO THE ACTIVITY FILE 00007DCUPDTAP D - PROCESS COMPLETE U*A,01 00010FMSTDT=02,36,D,0275,03 00020F CURRENT BAL. USING REPORT TABLE=02,21,MCBAL 00030DEAR @1**2 00040YOUR PROMISE TO PAY BY WAS**1 00050ACCEPTED IN GOOD FAITH. HOWEVER, AS OF THIS DATE**1 00060WE HAVE NOT RECEIVED THE AGREED UPON PAYMENT NOR**1 00070HAVE WE HEARD FROM YOU.**2 00080WOULD YOU BE SO KIND AS TO GIVE US A CALL AT THE***1 00090EARLIEST CONVENIENT TIME FOR YOU DURING THE DAY**1 00100TO DISCUSS THE REASON FOR YOU NOT BEING ABLE TO**1 00110TO KEEP YOUR PROMISE.**2 00120 SINCERELY,**4 00130END 00140*A,2 00150F=N 00160DEAR CUSTOMER**2 00170AS A FOLLOW UP OF OUR CONVERSATION THIS MORNING**1 00180I WOULD LIKE TO ADD THAT IF FOR ANY REASON YOU**1 00190ARE UNABLE TO KEEP YOUR PROMISE, PLEASE GIVE ME**1 00200A CALL.**2 00210 SINCERELY,**4 00220END 00230*A,3 00240F DATE FIRST IN CCS=02,07,D,869,03 00250F CURRENT BALANCE=04,34,$,0896,0 00260F CURRENT DATE=05,04,D,0000,03 00270DEAR @1**2 00280SINCE WE HAVE BEEN CONTINUOUSLY IN CON-**1 00290TACT WITH YOU CONCERNING YOUR ACCOUNT.**2 00300OUR AGREEMENT WAS FOR YOU TO PAY **1 00310BY .**2 00320 SINCERELY,**4 00330END  3: 00340END 00350_  3: Ǩ  3:/ Ǔ  3:C ~  3:W i  3:k T  3: ?  3: *  3:   3:  3:  3:  3: 39f4PR01PR02PR03PR04PR05PR06PR07PR08PR09 PR10 PR11 PR12 PR13 PR14PR15PR16PR17PR18PR19PR20PR21PR22PR23PR24PR25PR26PR27PR28PR29PR30PR31PR32 PR33!PR34"PR35#PR36$PR37%PR38&PR39'PR40(PR41)PR42*PR43+PR44,PR45-PR46.PR47/PR480PR491PR502__~Z`SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097NU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$DCMENU,OW=$$ 00002 * DAILY CYCLE MENU 00003 * 00004DCCOLACT A - DAILY COLLECTOR ACTIVITY REPORTS 000056| 39AL9O N$$ PR01 220180173013 00D5PR02 PR03 PR04 PR05 PR06 PR07 PR08 PR09 PR10 PR11 PR12 PR13 PR14 PR15 PR16 PR17 PR18 PR19 PR20 PR21 PR22 PR23 PR24 PR25 PR26 PR27 PR28 PR29 PR30 PR31 PR32 PR33 PR34 PR35 PR36 PR37 PR38 PR39 PR40 PR41 PR42 PR43 PR44 PR45 PR46 PR47 PR48 PR49 PR50 T=PRFSC001 4PR01PR02PR03PR04PR05PR06PR07PR08PR09 PR10 PR11 PR12 PR13 PR14PR15PR16PR17PR18PR19PR20PR21PR22PR23PR24PR25PR26PR27PR28PR29PR30PR31PR32 PR33!PR34"PR35#PR36$PR37%PR38&PR39'PR40(PR41)PR42*PR43+PR44,PR45-PR46.PR47/PR480PR491PR502__~Z`SUBRCM CALL ERROR - BUFFER LENGTH GREATER THAN 80 X0300097NU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$DCMENU,OW=$$ 00002 * DAILY CYCLE MENU 00003 * 00004DCCOLACT A - DAILY COLLECTOR ACTIVITY REPORTS 00005ALC9P,$$ TED LETTERS 00006DCACTADD C - ADD THE COLLECTOR ACTIVITIES TO THE ACTIVITY FILE 00007DCUPDTAP D - PROCESS COMPLETE Uy  39*A,01 00010FMSTDT=02,36,D,0275,03 00020F CURRENT BAL. USING REPORT TABLE=02,21,MCBAL 00030DEAR @1**2 00040YOUR PROMISE TO PAY BY WAS**1 00050ACCEPTED IN GOOD FAITH. HOWEVER, AS OF THIS DATE**1 00060WE HAVE NOT RECEIVED THE AGREED UPON PAYMENT NOR**1 00070HAVE WE HEARD FROM YOU.**2 00080WOULD YOU BE SO KIND AS TO GIVE US A CALL AT THE***1 00090EARLIEST CONVENIENT TIME FOR YOU DURING THE DAY**1 00100TO DISCUSS THE REASON FOR YOU NOT BEING ABLE TO**1 00110TO KEEP YOUR PROMISE.**2 00120 SINCERELY,**4 00130END 00140*A,2 00150F=N 00160DEAR CUSTOMER**2 00170AS A FOLLOW UP OF OUR CONVERSATION THIS MORNING**1 00180I WOULD LIKE TO ADD THAT IF FOR ANY REASON YOU**1 00190ARE UNABLE TO KEEP YOUR PROMISE, PLEASE GIVE ME**1 00200A CALL.**2 00210 SINCERELY,**4 00220END 00230*A,3 00240F DATE FIRST IN CCS=02,07,D,869,03 00250F CURRENT BALANCE=04,34,$,0896,0 00260F CURRENT DATE=05,04,D,0000,03 00270DEAR @1**2 00280SINCE WE HAVE BEEN CONTINUOUSLY IN CON-**1 00290TACT WITH YOU CONCERNING YOUR ACCOUNT.**2 00300OUR AGREEMENT WAS FOR YOU TO PAY **1 00310BY .**2 00320 SINCERELY,**4 00330END 00340END 00350_  3:  ǧ  39ALC9P,$$ TED LETTERS 00006DCACTADD C - ADD THE COLLECTOR ACTIVITIES TO THE ACTIVITY FILE 00007DCUPDTAP D - PROCESS COMPLETE U*A,01 00010FMSTDT=02,36,D,0275,03 00020F CURRENT BAL. USING REPORT TABLE=02,21,MCBAL 00030DEAR @1**2 00040YOUR PROMISE TO PAY BY WAS**1 00050ACCEPTED IN GOOD FAITH. HOWEVER, AS OF THIS DATE**1 00060WE HAVE NOT RECEIVED THE AGREED UPON PAYMENT NOR**1 00070HAVE WE HEARD FROM YOU.**2 00080WOULD YOU BE SO KIND AS TO GIVE US A CALL AT THE***1 00090EARLIEST CONVENIENT TIME FOR YOU DURING THE DAY**1 00100TO DISCUSS THE REASON FOR YOU NOT BEING ABLE TO**1 00110TO KEEP YOUR PROMISE.**2 00120 SINCERELY,**4 00130END 00140*A,2 00150F=N 00160DEAR CUSTOMER**2 00170AS A FOLLOW UP OF OUR CONVERSATION THIS MORNING**1 00180I WOULD LIKE TO ADD THAT IF FOR ANY REASON YOU**1 00190ARE UNABLE TO KEEP YOUR PROMISE, PLEASE GIVE ME**1 00200A CALL.**2 00210 SINCERELY,**4 00220END 00230*A,3 00240F DATE FIRST IN CCS=02,07,D,869,03 00250F CURRENT BALANCE=04,34,$,0896,0 00260F CURRENT DATE=05,04,D,0000,03 00270DEAR @1**2 00280SINCE WE HAVE BEEN CONTINUOUSLY IN CON-**1 00290TACT WITH YOU CONCERNING YOUR ACCOUNT.**2 00300OUR AGREEMENT WAS FOR YOU TO PAY **1 00310BY .**2 00320 SINCERELY,**4 00330END 00340END 00350_   3:  Ǧ  3:  Ǒ  3:4 |  3:H g  3:\ R  3:p =  3: (  3:   3:  3:  3:  3: ƿ  3: ƪ  3; ƕ  3;$ ƀ  3;8 k  3;L V  3;` A  3;t ,  3;   3;   3;  3;  3;  3; Ů  3< ř  3< ń  3<( o  3<< Z  3mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmAL>P $$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*JOB,J002,LA *K,P2 *RPGII 00010H LDTLST X 1 G11 R LA CCS 3.0 SL-149 00980 F* G11 R LA CCS 3.0 SL-149 00990 F* 01000 F* LEGAL AND AGENCY VERSION 3 01010 F* DATA SYSTEMS - LA JOLLA DIVISION, LA JOLLA, CALIFORNIA 01020 F* COPYRIGHT CONTROL DATA CORPORATION, 1979 01030 F* 0104000030F* DECK-ID P01 CCS 2.0 SUMMARY-132 00040F* 00050FLADUMMY IP F 80 DISK 00060FLACOSIGNIC F 362R16AI  3> 1 DISK 00070FLASREQDLID F 20 DISK 00080F* 00090F* COPYRIGHT CONTROL DATA CORPORATION, 1978 00100F* DATA SYSTEM-LA JOLLA DIVISION, LAJOLLA, CALIFORNIA 00110F* CREDIT COLLECTION SYSTEM VERSION 2.0 00120F* 00130FLAINACCTUD F 24 DISK 00140FLAACTFILID F 500 18AI 1 DISK 00150FLADLQMSTIC F 2000R16AI 1 DISK 00160FLAUTIFILIC F 80R 4AI 1 DISK 00170FPRINT O F 132 OV PRINTER 00180E STG 38 2 00190E OBLK 482 1 00200E CMT 30 2 00210E HDR 3 40 00220ILADUMMY CC 01 00230I 1 80 DUM 00240ILACOSIGNBB 02 00250I 1 1 CACTFG 00260I 2 16 CACCT 00270I 1 16 CACC 00280I 17 17 CINIT 00290I 18 180CSLC1 00300I 19 190C1FG 00310I 20 49 CN1 00320I 50 79 CA1 00330I 80 99 CS1 00340I 100 1040CZ1 00350I 105 1180CH1 00360I 105 105 H1 00370I 105 118 CH11 00380I 119 1320CB1 00390I 119 119 B1 00400I 119 132 CB11 00410I 133 1330CSLC2 00420I 134 1340C2FG 00430I 135 164 CN2 00440I 165 194 CA2 00450I 195 214 CS2 00460I 215 2190CZ2 00470I 220 2330CH2 00480I 220 220 H2 00490I 220 233 CH21 00500I 234 2470CB2 00510I 234 234 B2 00520I 234 247 CB21 00530I 248 2480CSLC3 00540I  3>0 249 2490C3FG 00550I 250 279 CN3 00560I 280 309 CA3 00570I 310 329 CS3 00580I 330 3340CZ3 00590I 335 3480CH3 00600I 335 335 H3 00610I 335 348 CH31 00620I 349 3620CB3 00630I 349 349 B3 00640I 349 362 CB31 00650ILASREQDLGG 03 00660I 1 16 EACT 00670I 17 20 SUPID 00680ILAINACCTEE 04 00690I 1 16 EACT 00700I 18 18 PFLAG 00710ILAACTFILFF 06 00720I 1 16 ACT 00730I 19 500 OBLK 00740I* L/A MASTER FILE DESCRIPTION INPUT 00750ILADLQMSTAA 10 00760I 1 1 MACTFG 00770I 2 16 MACCT 00780I 1 16 MACC 00790I 17 170MSLCD 00800I 18 47 MNAM 00810I 48 77 MADR1 00820I 78 107 MADR2 00830I 108 127 MCS 00840I 128 132 MZP 00850I 133 133 H 00860I 133 1420MPHN 00870I 133 142 MPHN1 00880I 143 146 MEXT 00890I 147 176 MBNM 00900I 177 206 MBAD 00910I 207 226 MBCS 00920I 227 231 MBZP 00930I 232 232 B 00940I 232 2410MBPH 00950I 232 241 MBPH1 00960I 242 245 MBEX 00970I 246 261 MADL 00980I 262 2700MSOC 00990I 271 274 MQUE 01000I 275 2800MPRID 01010I 281 284 MPRIC 01020I 5  3>D 285 285 MPFG 01030I 286 2860MBFG 01040I 287 290 MSUP 01050I 291 295 MOLS 01060I 296 299 MPQU 01070I 300 3050MPDQ 01080I 306 306 MSTC 01090I 667 696 MP1 01100I 697 726 MP2 01110I 727 756 MP3 01120I 757 786 MPAD1 01130I 787 816 MPAD2 01140I 817 836 MPCS 01150I 837 841 MPZC 01160I 842 8470MLLDT 01170I 848 8562MLLAT 01180I 857 8620MSTDT 01190I 863 8680MUPDT 01200I 869 8740MCCDT 01210I 875 8800MDLDT 01220I 881 8860MOPDT 01230I 887 8952MADLQ 01240I 896 9042MCBAL 01250I 905 9132MPYOF 01260I 914 9190MCPGD 01270I 920 9282MNPA 01280I 929 9372MOAMT 01290I 938 9380MCMN 01300I 939 946 MTP 01310I 947 9490MPTS 01320I 950 954 MBBR 01330I 955 962 MLON 01340I 963 966 MTCD 01350I 967 9680MTD3 01360I 969 9700MTD6 01370I 971 9720MTD9 01380I 9731012 MSDF 01390I 101310150MDYDL 01400I 101610210MPPD 01410I 102210302MPPA 01420I 103110360MTLB 01430ILAUTIFILAA 31 01440I 5 44 HEADER 01450C***** SETUP REPORT HEADINGS 01460C 46 GOTO AROUND 01470C 'HDR1' CHAINLAUTIFIL 32 01480C N32 MOVE HEADER HDR,1 01490C 'HDR2' CHAINLAUTIFIL 32 01500C N32 MOVE   3>XHEADER HDR,2 01510C 'HDR3' CHAINLAUTIFIL 32 01520C N32 MOVE HEADER HDR,3 01530C MOVE '0482' LTH 4 01540C MOVE '01' OSW 2 01550C AROUND TAG 01560C START TAG 01570C SETON 46 01580C SETOF 010203 01590C SETOF 040506 01600C SETOF 101222 01610C SETOF 313216 01620C SETOF 818283 01630C SETOF 848586 01640C SETOF 878811 01650C RDACT TAG 01660C SETOF 1304 01670C U1 READ LAINACCT 12 01680C U1N12 PFLAG COMP 'P' 13 01690C U1N12N13 MOVE 'P' PFLAG 01700C U1N12 13 GOTO RDACT 01710C U2 READ LASREQDL 12 01720C 12 GOTO END 01730C EACT CHAINLADLQMST 22 01740C N22 H COMP '0' 81 01750C N22 B COMP '0' 82 01760C 22 GOTO ERROR 01770C EACT CHAINLACOSIGN 05 01780C N05 H1 COMP '0' 83 01790C N05 B1 COMP '0' 84 01800C N05 H2 COMP '0' 85 01810C N05 B2 COMP '0' 86 01820C N05 H3 COMP '0' 87 01830C N05 B3 COMP '0' 88 01840C EXCPT 01850C U1N12N13 01860COR U2 SETON 16 01870C* SET BOUNDS FOR LOCATING ACTIVITY INFORMATION 01880C 16 MOVE EACT SACT 16 01890C SETOF 0410 01900C 16 MOVELSACT LACCT 18 01910C 16 MOVE '00' LACCT 01920C 16 LACCT SETLLLAACTFIL 01930C GETBLK TAG 01940C SETOF 110614 01950C READ LAACTFIL 11 01960C 11 GOTO START 01970C N11 ACT COMP SACT 1111 01980C 11 GOTO  3>lSTART 01990C GETACT TAG 02000C MOVE '00' OSW 02010C EXIT GETACR 02020C RLABL STG 02030C RLABL OBLK 02040C RLABL LTH 02050C RLABL OSW 02060C OSW COMP '01' 14 02070C 14 GOTO GETBLK 02080C N14 MOVEASTG,9 CMT,1 02090C N14 MOVEASTG,10 CMT,2 02100C N14 MOVEASTG,11 CMT,3 02110C N14 MOVEASTG,12 CMT,4 02120C N14 MOVEASTG,13 CMT,5 02130C N14 MOVEASTG,14 CMT,6 02140C N14 MOVEASTG,15 CMT,7 02150C N14 MOVEASTG,16 CMT,8 02160C N14 MOVEASTG,17 CMT,9 02170C N14 MOVEASTG,18 CMT,10 02180C N14 MOVEASTG,19 CMT,11 02190C N14 MOVEASTG,20 CMT,12 02200C N14 MOVEASTG,21 CMT,13 02210C N14 MOVEASTG,22 CMT,14 02220C N14 MOVEASTG,23 CMT,15 02230C N14 MOVEASTG,24 CMT,16 02240C N14 MOVEASTG,25 CMT,17 02250C N14 MOVEASTG,26 CMT,18 02260C N14 MOVEASTG,27 CMT,19 02270C N14 MOVEASTG,28 CMT,20 02280C N14 MOVEASTG,29 CMT,21 02290C N14 MOVEASTG,30 CMT,22 02300C N14 MOVEASTG,31 CMT,23 02310C N14 MOVEASTG,32 CMT,24 02320C N14 MOVEASTG,33 CMT,25 02330C N14 MOVEASTG,34 CMT,26 02340C N14 MOVEASTG,35 CMT,27 02350C N14 MOVEASTG,36 CMT,28 02360C N14 MOVEASTG,37 CMT,29 02370C N14 MOVEASTG,38 CMT,30 02380C OV SETON 46 02390C N14 EXCPT 02400C N14 SETOF 46 02410C N14 GOTO GETACT 02420C ERROR TAG 02430C SETOF 100708 02440C SETON 70 02450C EXCPT 02460C SETOF  3> 70 02470C GOTO START 02480C END TAG 02490C SETON LR 02500OLAINACCTE 04N13 02510O PFLAG 18 02520OPRINT E 101 10 46 02530O HDR,1 41 02540O 67 'DELINQUENT RECORD' 02550O 76 'CONTENTS' 02560O 03 103 'SUPERVISOR:' 02570O 03SUPID 108 02580O 128 'PAGE' 02590O PAGE Z 132 02600O E 1 10 46 02610O HDR,2 41 02620O 61 'AS OF' 02630O UDATE Y 70 02640O E 1 10 46 02650O HDR,3 41 02660O E 1 10 02670O 13 'ACCOUNT' 02680O 39 'ADDITIONAL' 02690O 49 'BANK' 02700O 57 'LOAN' 02710O 71 'AMOUNT TO' 02720O 80 'DELQ' 02730O 102 'LAST LETTER SENT' 02740O 113 'ASSIGNED' 02750O 118 'CR.' 02760O 132 'OPEN AMOUNT' 02770O E 1 10 02780O 11 'NO.' 02790O 40 'ACCOUNT NO.' 02800O 49 'BR.' 02810O 59 'OFFICER' 02820O 70 'COLLECT' 02830O 80 'DATE' 02840O 89 'DATE' 02850O 103 'AMOUNT' 02860O 111 'QUEUE' 02870O 118 'PTS' 02880O 132 'OR CR LIMIT' 02890O E 1 10 02900O MACC 17 02910O MADL 42 02920O MBBR 49 02930O MLON 59 02940O M  3>ADLQ L 72 02950O MDLDT 82 ' / / ' 02960O MLLDT 92 ' / / ' 02970O MLLAT L 104 02980O MQUE 111 02990O MPTS 118 03000O MOAMT L 132 03010O E 2 10 03020O 5 'NAME' 03030O MNAM 48 03040O 66 'SALUTATION CODE' 03050O MSLCD 68 03060O 98 'BUSINESS NAME' 03070O MBNM 132 03080O E 1 10 03090O 10 'ADDRESS 1' 03100O MADR1 48 03110O 70 'SOCIAL SECURITY NO.' 03120O MSOC 82 ' - - ' 03130O 96 'ST. ADDRESS' 03140O MBAD 132 03150O E 1 10 03160O 10 'ADDRESS 2' 03170O MADR2 48 03180O 67 'NO. OF COSIGNERS' 03190O MCMN 69 03200O 99 'CITY/STATE/ZIP' 03210O MBCS 122 03220O MBZP 132 03230O E 1 10 03240O 15 'CITY/STATE/ZIP' 03250O MCS 38 03260O MZP 48 03270O 62 'HOME PHONE:' 03280O N81MPHN 75 ' - - ' 03290O N81 76 '-' 03300O MEXT 80 03310O 81MPHN1 77 03320O 100 'BUSINESS PHONE:' 03330O N82MBPH 114 ' - - ' 03340O N82 115 '-' 03350O MBEX 119 03360O 82MBPH1 116 03370O E 2 10 03380O 12 'PRIORITY' 03390O 21 'TYPE' 03400O 34 'TIMES DELQ' 03410O 43 'STATUS' 03420O X_  3> 49 'PAY' 03430O 64 'PROMISED TO' 03440O 78 'PROMISED TO' 03450O 100 'PREVIOUS ADDRESS 1' 03460O MPAD1 132 03470O E 1 10 03480O 7 'DATE' 03490O 14 'CODE' 03500O 21 'CODE' 03510O 34 '30 60 90' 03520O 42 'CODE' 03530O 50 'FLAG' 03540O 62 'PAY DATE' 03550O 78 'PAY AMOUNT' 03560O 100 'PREVIOUS ADDRESS 2' 03570O MPAD2 132 03580O E 1 10 03590O MPRID 9 ' / / ' 03600O MPRIC 14 03610O MTCD 21 03620O MTD3 26 03630O MTD6 30 03640O MTD9 34 03650O MSTC 40 03660O MPFG 49 03670O MPPD 62 ' / / ' 03680O MPPA L 78 03690O 96 'CITY/STATE/ZIP' 03700O MPCS 122 03710O MPZC 132 03720O E 2 10 03730O 10 'CURRENT' 03740O 24 'CURRENT' 03750O 43 'CURRENT PAYOFF' 03760O 57 'NEXT PAYOFF' 03770O 69 'SUPERVISOR' 03780O 78 'ARCHIVE' 03790O 101 '* * S P E C I A L' 03800O 127 'I N S T R U C T I O N S' 03810O 132 '* *' 03820O E 1 10 03830O 10 'BALANCE' 03840O 23 'PAYOFF' 03850O 43 'EFFECTIVE DATE' 03860O 54 'AMOUNT' 03870O 66 'I.D.' 03880O 80 'TAPE DATE' 03890O E 1 10 03900O MM  3>CBAL L 12 03910O MPYOF L 26 03920O MCPGD 39 ' / / ' 03930O MNPA L 57 03940O MSUP 66 03950O MTLB 80 ' / / ' 03960O MSDF 128 03970O E 2 10 03980O 8 'STATUS' 03990O 20 'LAST COL' 04000O 29 'OPEN' 04010O 42 'DATE 1ST' 04020O 51 'LAST' 04030O 64 'QUEUE' 04040O 83 '* * * * * *' 04050O 102 'P E R M A N E N T' 04060O 119 'C O M M E N T' 04070O 132 '* * * * * *' 04080O E 1 10 04090O 7 'DATE' 04100O 19 'UPDATE' 04110O 29 'DATE' 04120O 41 'IN CCS' 04130O 51 'QUEUE' 04140O 67 'CHANGE DATE' 04150O MP1 132 04160O E 1 10 04170O MSTDT 9 ' / / ' 04180O MUPDT 20 ' / / ' 04190O MOPDT 31 ' / / ' 04200O MCCDT 42 ' / / ' 04210O MPQU 51 04220O MPDQ 65 ' / / ' 04230O MP2 132 04240O E 1 10 04250O MP3 132 04260O E 2 10N05 04270O 18 'C O S I G N E R S' 04280O 27 'N A M E' 04290O 44 'S T R E E T' 04300O 60 'A D D R E S S' 04310O 84 'C I T Y / S T A T E' 04320O 91 'Z I P' 04330O 111 'H O M E P H O N E' 04340O 132 'B U S . P H O N E' 04350O E 1 10N05 04360O CN1 31 04370O CA1 63 04380O C-K  3>S1 85 04390O CZ1 91 04400O N83CH1 110 ' - - - ' 04410O 83CH11 107 04420O N84CB1 132 ' - - - ' 04430O 84CB11 129 04440O E 1 10N05 04450O CN2 31 04460O CA2 63 04470O CS2 85 04480O CZ2 91 04490O N85CH2 110 ' - - - ' 04500O 85CH21 107 04510O N86CB2 132 ' - - - ' 04520O 86CB21 129 04530O E 1 10N05 04540O CN3 31 04550O CA3 63 04560O CS3 85 04570O CZ3 91 04580O N87CH3 110 ' - - - ' 04590O 87CH31 107 04600O N88CB3 132 ' - - - ' 04610O 88CB31 129 04620OPRINT E 101 16 46 04630O HDR,1 41 04640O 75 'COLLECTOR ACTIVITIES' 04650O 03 103 'SUPERVISOR' 04660O 03SUPID 108 04670O 128 'PAGE' 04680O PAGE Z 132 04690O E 1 16 46 04700O HDR,2 41 04710O 63 'AS OF' 04720O UDATE Y 72 04730O E 1 16 46 04740O HDR,3 41 04750O E 1 16 46 04760O 13 'ACCOUNT' 04770O 35 'CONTACT' 04780O 43 'ACTION' 04790O 51 'RESULT' 04800O 59 'LETTER' 04810O 70 'COLLECTOR' 04820O 87 '* * * * * * * *' 04830O 111 'C O M M E N T S' 04840O 132 '* * * * * * * * * *' 04850O E 11 16 46 04860O '  3> 11 'NO.' 04870O 33 'DATE' 04880O 42 'CODE' 04890O 50 'CODE' 04900O 58 'CODE' 04910O 68 'I. D.' 04920O E 1 06N14 04930O SACT 17 04940O STG,1 29 04950O 30 '/' 04960O STG,2 32 04970O 33 '/' 04980O STG,3 35 04990O STG,4 41 05000O STG,5 49 05010O STG,6 57 05020O STG,7 65 05030O STG,8 67 05040O CMT 132 05050O E 103 70 05060O 10 'ERROR' 05070O 22 28 'ACCOUNT NO.' 05080O 22 EACT 45 05090O 22 57 'NOT ON FILE' 05100OPRINT T 3 LR 05110O 75 '**** END OF REPORT ****' /* 005120*K,P7 *CATLOG *V,7 *V,13 *Z __ 00011DEFINE,FN=$$MTMENU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$MTMENU,OW=$$ 00002 * FILE MAINTENANCE MENU 00003 * 00004MTRDRLTR A - PRINT THE LETTER DEFINITION FILE 00005MTCONLTR B - CREATE THE LETTER FILE 00006MTUTIFIL C - UTILITY FILE MAINTENANCE - ADD OR UPDATE UTILITY RECORDS 00007MTDECTBL D - DECISION TABLE MAINTENANCE 00008MTAVMDMP E - PRINT ACTIVITY VERIFICATION TABLE 00009MTACTMTX F - CREATE THE ACTIVITY VERIFICATION TABLE 00010MTSPCAUD G - FILE SPACE AUDIT- REPORTS PERCENTAGE OF UNUSED FILE SPACE 00011HSPRGHIS H - PURGE OLDEST ACCOUNTS FROM SUMMARY HISTORY FILE 00012HSPRGTAP I - PURGE OLDEST ACCOUNTS FROM THE TAPE ARCHIVES FILE 00013MTLDSCRN J - PRINT SCREEN DEFINITION FILE 00014MTSVSCRN K - CREATE THE SCREEN FILE 00015MTPRGMST L - PURGE MASTER FILES (DELQMST-COSIGNER-ACTFIL) Z%  3> 00016MTACTMTN M - ACTIVITY FILE MAINTENANCE/REPORT 00017MTUSEMTN N - COLECT ACTIVE USER FILE MAINTENANCE 00018MTDETCRD O - PRINT REPORT GENERATOR DATA ELEMENT TABLE 00019MTDETCON P - REPORT GENERATOR DATA ELEMENT TABLE ROUTINES-CONSOLE INPUT 00020MTPDFMTN Q - REPORT GENERATOR PROGRAM DIRECTORY FILE MAINTENANCE 00021MTSCNPRT R - SAMPLE SCREEN PRINT UTILITY 00022 Z - EXIT 00023/! 00024DEFINE,FN=$$RPMENU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$RPMENU,OW=$$ 00002 * ON DEMAND REPORT MENU 00003 * 00004RPDRCIAC A - DELINQUENT RECORD CONTENT REPORT (INACTIVE ACCOUNTS) 00005RPDRCSRQ B - DELINQUENT RECORD CONTENT REPORT (SUPERVISOR REQUESTS) 00006RPTAPRRN C - TREND ANALYSIS-CALCULATE AGE- RUN BEFORE SELECTION D OR E 00007RPTAPTQU D - TREND ANALYSIS REPORT PRINTED BY QUEUE 00008RPTAPTTY E - TREND ANALYSIS REPORT PRINTED BY PRODUCT TYPE 00009RPWRTOFF F - ELIGIBLE/ACTUAL WRITE-OFF REPORT 00010RPDLYASN G - DAILY ASSIGNMENT LIST 00011RPSUMACT H - SUMMARY ACCOUNT LIST REPORT 00012RPWCOLST I - WEEKLY COLLECTOR STATISTICS REPORT 00013RPMCOLST J - MONTHLY COLLECTOR STATISTICS REPORT 00014RPTCNTRL K - CREATE REPORT GENERATOR PROGRAM 00015PRFPG000 L - EXECUTE REPORT GENERATOR PROGRAM 00016PRFRP012 M - QUEUE LOADING REPORT 00017 Z - EXIT 00018/! 00019DEFINE,FN=$$RGMENU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$RGMENU,OW=$$ 00002 * REPORT GENERATOR - REPORT DIRECTORY 00003 * 00004PRFPG001 A - R.G. REPORT 1 - (AVAILABLE) 00005PRFPG002 B - R.G. REPORT 2 - (AVAILABLE) 00006PRFPG003 C - R.G. REPORT 3 - (AVAILABLE) 00007PRFPG004 D - R.G. REPORT 4 - (AVAILABLE) 00008PRFPG005 E - R.G. REPORT 5 - (AVAILABLE) 00009PRFPG006 F - R.G. REPORT 6 - (AVAILABLE) 00010PRFPG007 G - R.G. REPORT 7 - (AVAILABLE) 00011PRFPG008 H - R.G. REPORT 8 - (AVAILABLE) 00012PRFPG009 I - R.G. REPORT 9 - (AVAILABLE) 00013PRFPG010 J - R.G. REPORT 10 - (AVAILABLE) 00014PRFPG011 K - R.G. REPORT 11 - (AVAILABLE) 00015PRFPG012 L - R.G. REPORT 12 - (AVAILABLE) 00016PRFPG013 M - R.G. REPORT 13 - (AVAILABLE) 00017PRFPG014 N - R.G. REPORT 14 - (AVAILABLE) 00018PRFPG015 O - R.G. REPORT 15 - (AVAILABLE) 00019PRFPG016 P - R.G. REPORT 16 - (AVAILABLE) 00020PRFPG017 Q - R.G. REPORT 17 - (AVAILABLE)  3?  00021PRFPG018 R - R.G. REPORT 18 - (AVAILABLE) 00022PRFPG019 S - R.G. REPORT 19 - (AVAILABLE) 00023 Z - EXIT 00024/! 00025DEFINE,FN=PRFDC001,TY=S,LR=80,NR=50,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC001,OW=CCS20 00002CHEKID 00003 * THIS ROUTINE WILL PRINT - DAILY COLLECTOR UPDATE REPORT 00004 * - TIME USAGE REPORT 00005 * - DAILY COLLECTOR STATISTICS REPORT 00006 * 00007INPUT=PRFDC001 00008UTIL 00009CLEAR,FN=DLYWRK 00010EX 00011 * TRNSFL FILE IS NOW BEING SORTED 00012INPUT=PRFDC001 00013DSORT 00014FN=TRNSFL,CCS20 00015F2=TRNSFL,CCS20, 00016OP=T,F,A 00017KF=A,29,2,A,17,4,A,135,4,A,25,4,A,1,16,A,134,1 00018SL=I 00019 * THE TRNSFL FILE HAS BEEN SORTED 00020 * THE DAILY COLLECTOR UPDATE REPORT WILL BE PRINTED 00021COLCHG 00022 * THE DAILY COLLECTOR UPDATE REPORT IS COMPLETE 00023 * THE TIME USAGE REPORT WILL BE PRINTED 00024TIMUSE 00025 * THE TIME USAGE REPORT IS COMPLETE 00026INPUT=PRFDC001 00027SWITCH 0002810000000 00029 * THE DAILY STATISTICS REPORT WILL BE PRINTED 00030COLSTS 00031 * THE DAILY STATISTICS REPORT IS COMPLETE 00032 **** OPERATOR - 00033 * RESPOND: 'N' CARRIAGE RETURN - TO BYPASS ZEROING THE DAILY COUNT 00034 * 00035 * CARRIAGE RETURN ONLY - TO ZERO THE DAILY COUNT 00036CCSPAS 00037INPUT=PRFDC001 00038SWITCH 0003900010000 00040COLSTS 00041 * THIS ROUTINE IS COMPLETE 00042MNUPRO 00043/! _  3?  00044DEFINE,FN=PRFDC002,TY=S,LR=80,NR=30,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC002,OW=CCS20 00002CHEKID 00003 * THE TRANSACTION FILE WILL BE SORTED FOR PRINTING OF LETTERS 00004INPUT=PRFDC002 00005DSORT 00006FN=TRNSFL,CCS20 00007F2=TRNSFL,CCS20, 00008OP=T,F,A 00009KF=A,17,4,A,41,2,A,1,16 00010SL=I 00011 **** OPERATOR - LOAD LETTER PAPER 00012 * CARRIAGE RETURN WHEN READY 00013 * 00014CCSPAS 00015 * THE REQUESTED LETTERS WILL BE PRINTED 00016LTRPRT 00017 * THE REQUESTED LETTERS HAVE BEEN PRINTED 00018 **** OPERATOR - LOAD REGULAR PAPER 00019 * CARRIAGE RETURN WHEN READY 00020 * 00021CCSPAS 00022 * THE LETTER STATISTICS SUMMARY WILL BE PRINTED 00023LTRSTA 00024 * THE LETTER STATISTICS SUMMARY IS COMPLETE 00025MNUPRO 00026/! 00027DEFINE,FN=PRFDC003,TY=S,LR=80,NR=25,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC003,OW=CCS20 00002CHEKID 00003 * THE COLLECTOR ACTIVITIES WILL BE ADDED TO THE ACTIVITY FILE 00004INPUT=PRFDC003 00005DSORT 00006FN=TRNSFL,CCS20 00007F2=TRNSFL,CCS20, 00008OP=T,F,A 00009KF=A,29,2,A,21,4,D,25,4,D,121,2 00010SL=I 00011ACTADD 00012 * THE COLLECTOR ACTIVITIES HAVE BEEN ADDED TO THE ACTIVITY FILE 00013 * THE SUMMARY REPORT OF THE BLOCK DISTRIBUTION IN THE ACTIVITY FILE 00014 * WILL BE PRINTED 00015ACTMTN 00016 * THE SUMMARY REPORT OF THE BLOCK DISTRIBUTION IN THE ACTIVITY FILE 00017 * HAS BEEN PRINTED 00018MNUPRO 00019/! 00020DEFINE,FN=PRFDC004,TY=S,LR=80,NR=25,ED=999999,VL=SYSVOL ,OW=CCS  3?420 00001LOAD,FN=PRFDC004,OW=CCS20 00002CHEKID 00003 ****OPERATOR - MOUNT UPDATE INPUT TAPE ON TAPE UNIT '0' 00004 * CARRIAGE RETURN WHEN READY 00005CCSPAS 00006INPUT=PRFDC004 00007SWITCH 0000810000000 00009 * THE UPDATE TAPE WILL BE PROCESSED 00010UPDATE 00011 * THE UPDATE TAPE HAS BEEN PROCESSED 00012 * THE FILE SPACE AUDIT REPORT WILL NOW BE PRINTED 00013 **** OPERATOR - CARRIAGE RETURN TO CONTINUE AFTER REVIEWING 00014 * SCREEN INFORMATION 00015CCSSPC 00016CCSPAS 00017 * THE FILE SPACE AUDIT REPORT IS COMPLETE 00018MNUPRO 00019/! 00020DEFINE,FN=PRFDC005,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC005,OW=CCS20 00002CHEKID 00003 * THE NON-FINANCIAL UPDATES WILL BE PROCESSED 00004 **** OPERATOR - MOUNT NON-FINANCIAL UPDATE INPUT TAPE ON TAPE UNIT '0' 00005 * CARRIAGE RETURN WHEN READY 00006CCSPAS 00007INPUT=PRFDC005 00008SWITCH 0000910000000 00010UPD400 00011 * THE NON-FINANCIAL UPDATES HAVE BEEN PROCESSED 00012MNUPRO 00013/! 00014DEFINE,FN=PRFDC006,TY=S,LR=80,NR=20,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC006,OW=CCS20 00002CHEKID 00003 * THE FINANCIAL UPDATES WILL BE PROCESSED 00004 **** OPERATOR - MOUNT FINANCIAL UPDATE INPUT TAPE ON TAPE UNIT '0' 00005 * 00006INPUT=PRFDC006 00007MOUNT 00008FTAPE,B,P 00009/* 00010UPD500 00011 * THE FINANCIAL UPDATES HAVE BEEN PROCESSED 00012MNUPRO 00013/! 00014DEFINE,FN=PRFDC007,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS  3?H20 00001LOAD,FN=PRFDC007,OW=CCS20 00002CHEKID 00003 * THE ACTIVE ACCOUNTS WILL BE UPDATED FROM HISTORY 00004DHUPDT 00005 * THE ACTIVE ACCOUNTS HAVE BEEN UPDATED FROM HISTORY 00006MNUPRO 00007/! 00008DEFINE,FN=PRFDC008,TY=S,LR=80,NR=10,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC008,OW=CCS20 00002CHEKID 00003 * WARNING: DO NOT SELECT 'L' OR 'M' FROM THE DAILY CYCLE MENU UNTIL THE 00004 * COLLECTORS ARE OFF-LINE FOR THE DAY 00005MNUPRO 00006/! 00007DEFINE,FN=PRFDC009,TY=S,LR=80,NR=10,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC009,OW=CCS20 00002CHEKID 00003 * WARNING: DO NOT SELECT 'L' OR 'M' FROM THE DAILY CYCLE MENU UNTIL THE 00004 * COLLECTORS ARE OFF-LINE FOR THE DAY 00005MNUPRO 00006/! 00007DEFINE,FN=PRFDC010,TY=S,LR=80,NR=40,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC010,OW=CCS20 00002CHEKID 00003 **** OPERATOR - THE COLLECTORS MUST BE OFF-LINE 00004 * RESPOND: 'N' CARRIAGE RETURN - TO ABORT 00005 * CARRIAGE RETURN ONLY - TO CONTINUE 00006 * 00007CCSPAS 00008 * THE TRANSACTION FILE WILL BE SORTED FOR THE COLLECTORS REPORT 00009INPUT=PRFDC010 00010UTIL 00011CLEAR,FN=TRNSFL 00012EX 00013INPUT=PRFDC010 00014DSORT 00015FN=TRANFL,CCS20 00016F2=TRNSFL,CCS20, 00017OP=T,F,A 00018KF=A,29,2,A,17,4,A,1,16,A,21,4,A,25,4,A,137,2 00019SL=I 00020PRETSR 00021INPUT=PRFDC010 00022UTIL 00023CLEAR,FN=ACTIVE 00024CLEAR,FN=TRANFL 00025CLEAR,FN=TRNBCK 00026EX  3?\ 00027 * THE TRANSACTION FILE HAS BEEN SORTED FOR THE COLLECTORS REPORT 00028NMCHNG 00029INPUT=PRFDC010 00030UTIL 00031CLEAR,FN=ADDACT 00032EX 00033MNUPRO 00034/! 00035DEFINE,FN=PRFDC011,TY=S,LR=80,NR=45,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC011,OW=CCS20 00002CHEKID 00003 **** OPERATOR - THE COLLECTORS MUST BE OFF-LINE 00004 * RESPOND: 'N' CARRIAGE RETURN - TO ABORT 00005 * CARRIAGE RETURN ONLY - TO CONTINUE 00006 * 00007CCSPAS 00008 * THE DAILY ASSIGNMENT FILES WILL BE CREATED 00009 * 00010 * THE DLYASSN FILE IS BEING CREATED 00011DACRTE 00012 * THE DLYASSN FILE HAS BEEN CREATED 00013 * THE DLYASSN FILE IS BEING SORTED 00014INPUT=PRFDC011 00015DSORT 00016FN=DLYWRK,CCS20 00017FN=DLYASSN,CCS20 00018F2=DLYASSN,CCS20, 00019OP=T,F,A 00020KF=A,17,4,A,25,2,A,21,4,D,27,4,A,1,16 00021SL=I 00022 * THE DLYASSN FILE HAS BEEN SORTED 00023INPUT=PRFDC011 00024UTIL 00025CLEAR,FN=DAQUE 00026EX 00027 * THE DAILY QUEUE FILE IS BEING CREATED 00028DAQUEL 00029 * THE DAILY QUEUE FILE HAS BEEN CREATED 00030 * THE FILE SPACE AUDIT REPORT WILL NOW BE PRINTED 00031 **** OPERATOR - CARRIAGE RETURN TO CONTINUE AFTER REVIEWING 00032 * SCREEN INFORMATION 00033CCSSPC 00034CCSPAS 00035 * THE FILE SPACE AUDIT REPORT IS COMPLETE 00036 * THE DAILY ASSIGNMENT FILES HAVE BEEN CREATED 00037MNUPRO 00038/! 00039DEFINE,FN=PRFHS001,TY=S,LR=80,NR=30,ED=999999,VL=SYSVOL ,OW=CCSx  3?p20 00001LOAD,FN=PRFHS001,OW=CCS20 00002CHEKID 00003 * THE INACTIVE ACCOUNTS WILL BE MOVED TO HISTORY 00004 * THE INACCT FILE IS BEING SORTED INTO ACCOUNT NUMBER ORDER 00005INPUT=PRFHS001 00006DSORT 00007FN=INACCT,CCS20 00008F2=INTEMP,CCS20, 00009OP=T,F,A 00010KF=A,1,16,D,23,2,D,19,4 00011SL=I 00012INPUT=PRFHS001 00013UTIL 00014CLEAR,FN=INACCT 00015COPY,FN=INTEMP,F2=INACCT,OW=CCS20 00016DELETE,FN=INTEMP 00017EX 00018 * THE INACCT FILE HAS BEEN SORTED INTO ACCOUNT NUMBER ORDER 00019 ****OPERATOR - MOUNT HISTORY FILE OUTPUT TAPE ON TAPE UNIT '0' 00020 * WITH WRITE RING 00021 * CARRIAGE RETURN WHEN READY 00022CCSPAS 00023MHUPDT 00024 * THE INACTIVE ACCOUNTS HAVE BEEN MOVED TO HISTORY 00025MNUPRO 00026/! 00027DEFINE,FN=PRFHS002,TY=S,LR=80,NR=35,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFHS002,OW=CCS20 00002CHEKID 00003 * THE ACTIVE ACCOUNTS WILL BE UPDATED FROM THE TAPE ARCHIVES 00004INPUT=PRFHS002 00005UTIL 00006DEFINE,FN=UPREQ,ED=999999,TY=S,LR=22,NR=300 00007EX 00008CHUPD1 00009 * THE UPREQ FILE WILL BE SORTED 00010INPUT=PRFHS002 00011DSORT 00012FN=UPREQ,CCS20 00013F2=UPREQ,CCS20, 00014OP=T,F,A 00015KF=D,21,2,D,17,4,A,1,16 00016SL=I 00017 * THE UPREQ FILE HAS BEEN SORTED 00018INPUT=PRFHS002 00019UTIL 00020CLEAR,FN=UPHSTCM 00021EX >  3? 00022 **** OPERATOR - YOU WILL BE PROMPTED TO MOUNT TAPES DURING THE 00023 * EXECUTION OF THE NEXT JOB 00024CHUPD2 00025INPUT=PRFHS002 00026UTIL 00027DELETE,FN=UPREQ 00028EX 00029 * THE ACTIVE ACCOUNTS HAVE BEEN UPDATED FROM THE TAPE ARCHIVES 00030MNUPRO 00031/! 00032DEFINE,FN=PRFHS003,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFHS003,OW=CCS20 00002CHEKID 00003 * THE SUMHIST FILE WILL BE PURGED 00004PHDEL2 00005CMPSUM 00006 * THE SUMHIST FILE HAS BEEN PURGED 00007MNUPRO 00008/! 00009DEFINE,FN=PRFHS004,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFHS004,OW=CCS20 00002CHEKID 00003 * THE TAPEARC FILE WILL BE PURGED 00004PHDEL1 00005INPUT=PRFHS004 00006UTIL 00007COMPRE,FN=TAPEARC 00008EX 00009 * THE TAPEARC FILE HAS BEEN PURGED 00010MNUPRO 00011/! 00012DEFINE,FN=PRFMT001,TY=S,LR=80,NR=20,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT001,OW=CCS20 00002CHEKID 00003 * THE LETTER DEFINITION FILE WILL BE PRINTED 00004INPUT=PRFMT001 00005UTIL 00006LIST,FN=LTRDESC,L=LPRINTER,F=U 00007EX 00008 * THE LETTER DEFINITION FILE HAS BEEN PRINTED 00009 **** OPERATOR - IF CHANGES ARE TO BE MADE TO THE LETTER FILE 00010 * ENTER THE EDITOR TO PROCESS THE LTRDESC FILE, WHEN 00011 * COMPLETE PERFORM THE NEXT MENU PROCEDURE STEP "B" 00012 * CARRIAGE RETURN WHEN READY TO CONTINUE 00013CCSPAS 00014MNUPRO 00015/! 00016DEFINE,FN=PRFMT002,TY=S,LR=80,NR=20,ED=999999,VL=SYSVOL ,OW=CCS\  3?20 00001LOAD,FN=PRFMT002,OW=CCS20 00002CHEKID 00003 * THE LETTER FILE WILL BE CREATED 00004 * 00005INPUT=PRFMT002 00006UTIL 00007CLEAR,FN=LTRFIL 00008EX 00009LTRBLD 00010 * THE LETTER FILE HAS BEEN CREATED 00011MNUPRO 00012/! 00013DEFINE,FN=PRFMT003,TY=S,LR=80,NR=25,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT003,OW=CCS20 00002CHEKID 00003 * THE UTILITY FILE MAINTENANCE ROUTINE WILL BE EXECUTED 00004 * 00005 **** OPERATOR - YOU CAN ADD, UPDATE OR DELETE UTILITY FILE RECORDS 00006 * FROM THE CONSOLE 00007 * 00008 * FOLLOW THE INSTRUCTIONS AS THEY APPEAR ON THE SCREEN 00009UTFMTN 00010 * THE UTILITY FILE WILL BE LISTED ON THE PRINTER 00011INPUT=PRFMT003 00012UTIL 00013LIST,FN=UTIFIL,L=LPRINTER,F=U 00014EX 00015 * CHECK PRINTER LISTING TO VERIFY THAT RECORDS ARE CORRECT 00016 * THE UTILITY FILE MAINTENANCE ROUTINE IS COMPLETE 00017MNUPRO 00018/! 00019DEFINE,FN=PRFMT004,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT004,OW=CCS20 00002CHEKID 00003 * THE DECISION TABLE MAINTENANCE ROUTINE WILL BE EXECUTED 00004 * 00005 ****OPERATOR - FOLLOW THE INSTRUCTIONS AS THEY APPEAR ON THE SCREEN 00006DECMTN 00007 * THE DECISION TABLE MAINTENANCE ROUTINE IS COMPLETE 00008MNUPRO 00009/! 00010DEFINE,FN=PRFMT005,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT005,OW=CCS20 00002CHEKID 00003 * THE ACTIVITY VERIFICATION TABLE WILL BE PRINTED 00004AVMDMP 00005 * THE ACTIVITY VERIFICATION TABLE HAS BEEN PRINTED 00006MNUPRO  3? 00007/! 00008DEFINE,FN=PRFMT006,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT006,OW=CCS20 00002CHEKID 00003 * THE ACTIVITY VERIFICATION TABLE ROUTINE WILL BE EXECUTED 00004 * 00005AVMCON 00006 * THE ACTIVITY VERIFICATION TABLE ROUTINE IS COMPLETE 00007 * THE ACTIVITY VERIFICATION TABLE WILL BE PRINTED 00008AVMDMP 00009 * THE ACTIVITY VERIFICATION TABLE HAS BEEN PRINTED 00010MNUPRO 00011/! 00012DEFINE,FN=PRFMT007,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT007,OW=CCS20 00002CHEKID 00003 * THE FILE SPACE AUDIT REPORT WILL BE PRINTED 00004 **** OPERATOR - CARRIAGE RETURN TO CONTINUE AFTER REVIEWING 00005 * SCREEN INFORMATION 00006CCSSPC 00007CCSPAS 00008 * THE FILE SPACE AUDIT REPORT IS COMPLETE 00009MNUPRO 00010/! 00011DEFINE,FN=PRFMT008,TY=S,LR=80,NR=20,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT008,OW=CCS20 00002CHEKID 00003 * THE SCREEN DEFINITION FILE WILL BE PRINTED 00004INPUT=PRFMT008 00005UTIL 00006LIST,FN=SCRNDESC,L=LPRINTER,F=U 00007EX 00008 * THE SCREEN DEFINITION FILE HAS BEEN PRINTED 00009 **** OPERATOR - IF CHANGES ARE TO BE MADE TO THE SCREEN DESCRIPTION 00010 * FILE ENTER THE EDITOR TO PROCESS THE SCRNDESC FILE, 00011 * WHEN COMPLETE PERFORM THE NEXT MENU PROCEDURE STEP 'K' 00012 * CARRIAGE RETURN WHEN READY TO CONTINUE 00013CCSPAS 00014MNUPRO 00015/! 00016DEFINE,FN=PRFMT009,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT009,OW=CCS20 00002CHEKID 00003 * THE SCREEN FILE WILL BE CREATED 00004BLDSRN 00005 * THE SCREEN FILE HAS BEEN CREATED 00006MNUPRO 00007/! E  3? 00008DEFINE,FN=PRFMT010,TY=S,LR=80,NR=20,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT010,OW=CCS20 00002CHEKID 00003 * THE DELQMST, COSIGNER AND ACTFIL FILES WILL BE PURGED 00004CMPDLQ 00005INPUT=PRFMT010 00006UTIL 00007COMPRE,FN=COSIGNER 00008COMPRE,FN=ACTFIL 00009EX 00010 * THE DELQMST, COSIGNER AND ACTFIL FILES HAVE BEEN PURGED 00011MNUPRO 00012/! 00013DEFINE,FN=PRFMT011,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT011,OW=CCS20 00002CHEKID 00003 * THE SUMMARY REPORT OF THE BLOCK DISTRIBUTION IN THE ACTIVITY FILE 00004 * WILL BE PRINTED 00005ACTMTN 00006 * THE SUMMARY REPORT OF THE BLOCK DISTRIBUTION IN THE ACTIVITY FILE 00007 * HAS BEEN PRINTED 00008MNUPRO 00009/! 00010DEFINE,FN=PRFMT012,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT012,OW=CCS20 00002CHEKID 00003 * THE COLECT ACTIVE USER MAINTENANCE FILE ROUTINE WILL BE EXECUTED 00004 **** OPERATOR - FOLLOW THE INSTRUCTIONS AS THEY APPEAR ON THE SCREEN 00005 * 00006USEMTN 00007 * THE COLECT ACTIVE USER MAINTENANCE FILE ROUTINE IS COMPLETE 00008MNUPRO 00009/! 00010DEFINE,FN=PRFMT013,TY=S,LR=80,NR=10,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT013,OW=CCS20 00002CHEKID 00003 * THE REPORT GENERATOR DATA ELEMENT TABLE WILL BE PRINTED 00004PGLTTB 00005MNUPRO 00006/! 00007DEFINE,FN=PRFMT014,TY=S,LR=80,NR=40,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT014,OW=CCS20 00002CHEKID 00003 * THE REPORT GENERATOR DATA ELEMENT TABLE ROUTINES WILL BE EXECUTED 00004 * 00005 * THE DATA ELEMENT TABLE WILL BE PRINTED 00006PGLTTB 00007 * THE DATA ELEMENT TABLE HAS BEEN PRINTED  3? 00008 * 00009 * THE DATA ELEMENT TABLE WILL BE UPDATED 00010 * 00011 ****OPERATOR - FOLLOW THE INSTRUCTIONS AS THEY APPEAR ON THE SCREEN 00012 * 00013INPUT=PRFMT014 00014SWITCH 00015000000000 00016PGUPTB 00017 * THE DATA ELEMENT TABLE HAS BEEN UPDATED 00018 * 00019 * THE DATA ELEMENT TABLE WILL BE PURGED 00020INPUT=PRFMT014 00021UTIL 00022DEFINE,FN=TBLWRK,TY=R,K1=6,P1=1,NR=2000,LR=80 00023EX 00024PGCMPR 00025INPUT=PRFMT014 00026UTIL 00027DELETE,FN=RPTTBL 00028RENAME,FN=TBLWRK,F2=RPTTBL 00029EX 00030 * THE DATA ELEMENT TABLE HAS BEEN PURGED 00031 * 00032 * THE REPORT GENERATOR DATA ELEMENT TABLE ROUTINES ARE COMPLETE 00033MNUPRO 00034/! 00035DEFINE,FN=PRFMT015,TY=S,LR=80,NR=35,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT015,OW=CCS20 00002CHEKID 00003 * THE PROGRAM DIRECTORY FILE ROUTINES WILL BE EXECUTED 00004 * 00005 * THE PROGRAM DIRECTORY FILE WILL BE PRINTED 00006PGLIST 00007 * THE PROGRAM DIRECTORY FILE HAS BEEN PRINTED 00008 * 00009 * 00010 * THE PROGRAM DIRECTORY FILE WILL BE PURGED 00011 * 00012 **** OPERATOR - FOLLOW THE INSTRUCTIONS AS THEY APPEAR ON THE SCREEN 00013 * 00014PGPURG 00015INPUT=PRFMT015 00016UTIL 00017COMPRE,FN=RPTPGM 00018EX 00019 * THE PROGRAM DIRECTORY FILE HAS BEEN PURGED 00020 *   3? 00021 * THE PROGRAM DIRECTORY FILE WILL BE PRINTED 00022PGLIST 00023 * THE PROGRAM DIRECTORY FILE HAS BEEN PRINTED 00024 * 00025 * THE PROGRAM DIRECTORY FILE ROUTINES HAVE BEEN EXECUTED 00026MNUPRO 00027/! 00028DEFINE,FN=PRFMT016,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFMT016,OW=CCS20 00002CHEKID 00003 * THE SCREEN FILES WILL BE PRINTED 00004 * 00005 **** OPERATOR - FOLLOW THE INSTRUCTIONS AS THEY APPEAR ON THE SCREEN 00006 * 00007PRTSCN 00008 * THE SCREEN FILES HAVE BEEN PRINTED 00009MNUPRO 00010/! 00011DEFINE,FN=PRFRP001,TY=S,LR=80,NR=20,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFRP001,OW=CCS20 00002CHEKID 00003INPUT=PRFRP001 00004SWITCH 0000510000000 00006 * DELINQUENT RECORD CONTENT REPORT WILL NOW BE PRINTED 00007 * THE ACCOUNTS BEING PRINTED ARE THE INACTIVE ACCOUNTS NOT PREVIOUSLY 00008 * PRINTED 00009DTLLST 00010 * THE DELINQUENT RECORD CONTENT REPORT IS COMPLETE 00011MNUPRO 00012/! 00013DEFINE,FN=PRFRP002,TY=S,LR=80,NR=20,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFRP002,OW=CCS20 00002CHEKID 00003INPUT=PRFRP002 00004SWITCH 0000501000000 00006 * DELINQUENT RECORD CONTENT REPORT WILL NOW BE PRINTED 00007 * THE ACCOUNTS BEING PRINTED WERE REQUESTED BY THE SUPERVISOR 00008DTLLST 00009INPUT=PRFRP002 00010UTIL 00011CLEAR,FN=SREQDL 00012EX 00013 * THE DELINQUENT RECORD CONTENT REPORT IS COMPLETE 00014MNUPRO 00015/! 00016DEFINE,FN=PRFRP003,TY=S,LR=80,NR=40,ED=999999,VL=SYSVOL ,OW=CCSָ  3?20 00001LOAD,FN=PRFRP003,OW=CCS20 00002CHEKID 00003 * CALCULATE AGE FOR TREND ANALYSIS 00004TRENDF 00005 * THE TREND ANALYSIS AGE CALCULATION IS COMPLETE 00006 * 00007 * THE ACCAGE AND RSWFIL FILES ARE BEING SORTED INTO AGEWRK 00008INPUT=PRFRP003 00009UTIL 00010DELETE,FN=AGEWRK 00011EX 00012INPUT=PRFRP003 00013DSORT 00014FN=ACCAGE,CCS20 00015FN=RSWFIL,CCS20 00016F2=AGEWRK,CCS20,SYSVOL 00017OP=T,F,A 00018KF=A,1,1,A,17,4 00019SL=I 00020 * THE ACCAGE AND RSWFIL FILES HAVE BEEN SORTED 00021 * 00022 **** OPERATOR - 00023 * RESPOND: 'N' CARRIAGE RETURN TO BYPASS UPDATING PREVIOUS 00024 * TREND DATA FOR NEXT RUN 00025 * 00026 * CARRAIGE RETURN ONLY TO UPDATE PREVIOUS TREND DATA 00027 * FOR NEXT RUN 00028CCSPAS 00029TRENDU 00030INPUT=PRFRP003 00031UTIL 00032CLEAR,FN=RSWFIL 00033EX 00034MNUPRO 00035/! 00036DEFINE,FN=PRFRP004,TY=S,LR=80,NR=25,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFRP004,OW=CCS20 00002CHEKID 00003 * GENERATE THE TREND ANALYSIS REPORT BY QUEUE 00004 * THE AGEWRK FILE IS BEING SORTED 00005INPUT=PRFRP004 00006DSORT 00007FN=AGEWRK,CCS20 00008F2=AGEWRK,CCS20, 00009OP=T,F,A 00010KF=A,1,1,A,17,4 00011SL=I 00012 * THE AGEWRK FILE HAS BEEN SORTED pz  3@ 00013 * THE TREND ANALYSIS REPORT BY QUEUE WILL NOW BE PRINTED 00014INPUT=PRFRP004 00015SWITCH 0001610000000 00017TRENDP 00018 * THE TREND ANALYSIS REPORT BY QUEUE IS COMPLETE 00019MNUPRO 00020/! 00021DEFINE,FN=PRFRP005,TY=S,LR=80,NR=25,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFRP005,OW=CCS20 00002CHEKID 00003 * GENERATE THE TREND ANALYSIS REPORT BY PRODUCT TYPE 00004 * THE AGEWRK FILE IS BEING SORTED 00005INPUT=PRFRP005 00006DSORT 00007FN=AGEWRK,CCS20 00008F2=AGEWRK,CCS20, 00009OP=T,F,A 00010KF=A,1,1,A,25,4 00011SL=I 00012 * THE AGEWRK FILE HAS BEEN SORTED 00013 * THE TREND ANALYSIS REPORT BY PRODUCT TYPE WILL NOW BE PRINTED 00014INPUT=PRFRP005 00015SWITCH 0001600000000 00017TRENDP 00018 * THE TREND ANALYSIS REPORT BY PRODUCT TYPE IS COMPLETE 00019MNUPRO 00020/! 00021DEFINE,FN=PRFRP006,TY=S,LR=80,NR=35,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFRP006,OW=CCS20 00002CHEKID 00003 * THE WRITE-OFF REPORT WILL BE GENERATED 00004 * THE WOEF FILE WILL BE CREATED 00005INPUT=PRFRP006 00006UTIL 00007DEFINE,FN=WOEF,ED=999999,TY=S,LR=115,NR=18000 00008EX 00009WRTOFE 00010 * THE WOEF FILE HAS BEEN CREATED 00011 * THE WOEF FILE IS BEING SORTED 00012INPUT=PRFRP006 00013DSORT 00014FN=WOEF,CCS20 00015F2=WOEF,CCS20, 00016OP=T,F,A 00017KF=A,25,1,A,17,4,A,21,4,A,1,16 00018SL=I p  3@$ 00019 * THE WOEF FILE HAS BEEN SORTED 00020 * THE WRITE-OFF REPORT WILL BE PRINTED 00021WRTOFP 00022INPUT=PRFRP006 00023UTIL 00024DELETE,FN=WOEF 00025EX 00026 * THE WRITE-OFF REPORT IS COMPLETE 00027MNUPRO 00028/! 00029DEFINE,FN=PRFRP007,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFRP007,OW=CCS20 00002CHEKID 00003 * THE DAILY ASSIGNMENT REPORT LIST WILL BE PRINTED 00004DALIST 00005 * THE DAILY ASSIGNMENT LIST REPORT IS COMPLETE 00006MNUPRO 00007/! 00008DEFINE,FN=PRFRP008,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFRP008,OW=CCS20 00002CHEKID 00003 * THE SUMMARY ACCOUNT REPORT LIST WILL BE PRINTED 00004SUMACL 00005 * THE SUMMARY ACCOUNT REPORT LIST IS COMPLETE 00006MNUPRO 00007/! 00008DEFINE,FN=PRFRP009,TY=S,LR=80,NR=25,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFRP009,OW=CCS20 00002CHEKID 00003 * THE WEEKLY COLLECTOR STATISTICS REPORT WILL BE PRINTED 00004INPUT=PRFRP009 00005SWITCH 0000601000000 00007COLSTS 00008 * THE WEEKLY COLLECTOR STATISTICS REPORT IS COMPLETE 00009 **** OPERATOR - 00010 * RESPOND: 'N' CARRIAGE RETURN - TO BYPASS ZEROING THE WEEKLY COUNT 00011 * 00012 * CARRIAGE RETURN ONLY - TO ZERO THE WEEKLY COUNT 00013CCSPAS 00014INPUT=PRFRP009 00015SWITCH 0001600001000 00017COLSTS 00018MNUPRO 00019/! 00020DEFINE,FN=PRFRP010,TY=S,LR=80,NR=25,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFRP010,OW=CCS20 h  3@8 00002CHEKID 00003 * THE MONTHLY COLLECTOR STATISTICS REPORT WILL BE PRINTED 00004INPUT=PRFRP010 00005SWITCH 0000600100000 00007COLSTS 00008 * THE MONTHLY COLLECTOR STATISTICS REPORT IS COMPLETE 00009 **** OPERATOR - 00010 * RESPOND: 'N' CARRIAGE RETURN - TO BYPASS CLEARING THE COLLECTOR 00011 * STATISTICS COUNT FILE 00012 * 00013 * CARRIAGE RETURN ONLY - TO CLEAR THE COLLECTOR STATISTICS 00014 * COUNT FILE 00015CCSPAS 00016INPUT=PRFRP010 00017UTIL 00018CLEAR,FN=COLSTATS 00019EX 00020MNUPRO 00021/! 00022DEFINE,FN=PRFCNTRL,TY=S,LR=80,NR=40,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFCNTRL,OW=CCS20 00002CHEKID 00003 * THE REPORT GENERATOR PROGRAMS WILL BE CREATED 00004 **** OPERATOR - BATCH HOST MUST BE ACTIVE BEFORE PROCEEDING 00005 * TO ACTIVATE BATCH HOST 00006 * MI, *BATCH,F 00007 * 00008 * RESPOND: 'N' CARRIAGE RETURN - IF BATCH HOST IS NOT ACTIVE 00009 * 00010 * CARRIAGE RETURN ONLY - TO CONTINUE 00011CCSPAS 00012 **** OPERATOR - FOLLOW THE INSTRUCTIONS AS THEY APPEAR ON THE SCREEN 00013INPUT=PRFCNTRL 00014UTIL 00015DEFINE,FN=RPTWKE,LR=80,NR=1000 00016DEFINE,FN=RPTWKP,LR=80,NR=1000 00017DEFINE,FN=PRCWRK,LR=80,NR=50 00018EX 00019PGGEN 00020 * THE REPORT GENERATOR PROGRAMS HAVE BEEN CREATED 00021 * THE REPORT GENERATOR PROGRAMS WILL BE BATCHED 00022INPUT=PRFCNTRL 00023UTIL 00024BATCH,FN=RPTWKE,TY=N 00025BATCH,FN=RPTWKP,TY=R 00026DELETE,FN=RPTWKE 00027DELETE,FN=RPTWKP 1  3@L 00028CLEAR,FN=PGEXTR 00029EX 00030PGCNT1 00031 * 00032 **** OPERATOR - SELECTION L MUST NOW BE RUN TO EXECUTE THE REPORT 00033 * CARRIAGE RETURN WHEN READY 00034CCSPAS 00035MNUPRO 00036/! 00037DEFINE,FN=PRFRP012,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFRP012,OW=CCS20 00002CHEKID 00003 * THE QUEUE LOADING REPORT WILL BE PRINTED 00004QLOAD 00005 * THE QUEUE LOADING REPORT IS COMPLETE 00006MNUPRO 00007/! 00008DEFINE,FN=$$MOUNTS,ED=999999,TY=R,K1=2,P1=1,K2=8,P2=3,LR=42,OW=CCS20; 00001NR=50 00002DEFINE,FN=ACCAGE,ED=999999,TY=R,K1=16,P1=1,LR=82,NR=36000,OW=CCS20 00003DEFINE,FN=ACTFIL,ED=999999,TY=R,K1=18,P1=1,LR=500,NR=36000,VL=CDD01; 00004OW=CCS20 00005DEFINE,FN=ACTIVE,ED=999999,TY=R,K1=4,P1=1,LR=10,NR=320,OW=CCS20 00006DEFINE,FN=ACTVERTB,ED=999999,TY=S,LR=320,NR=1,VL=CDD01,OW=CCS20 00007DEFINE,FN=ADDACT,ED=999999,TY=S,LR=18,NR=36000,VL=CDD01,OW=CCS20 00008DEFINE,FN=AGEWRK,ED=999999,TY=S,LR=82,NR=36000,VL=SYSVOL,OW=CCS20 00009DEFINE,FN=AVMDESC,TY=S,LR=80,ED=999999,NR=100,VL=CDD01,OW=CCS20 00010DEFINE,FN=COLSTATS,ED=999999,TY=R,K1=7,P1=1,LR=20,NR=4096,VL=CDD01; 00011OW=CCS20 00012DEFINE,FN=COSIGNER,ED=999999,TY=R,K1=16,P1=1,LR=362,NR=36000,VL=CDD01; 00013OW=CCS20 00014DEFINE,FN=DAQUE,ED=999999,TY=R,K1=4,P1=1,LR=8,NR=64,VL=CDD01,OW=CCS20 00015DEFINE,FN=DECTBL,ED=999999,TY=S,LR=3000,NR=1,VL=CDD01,OW=CCS20 00016DEFINE,FN=DELQMST,ED=999999,TY=R,K1=16,P1=1,K2=6,P2=18,LR=2000,NR=36000; 00017VL=CDD02,OW=CCS20 00018DEFINE,FN=DLYASSN,ED=999999,TY=S,LR=40,NR=36000,VL=SYSVOL,OW=CCS20 00019DEFINE,FN=DLYWRK,ED=999999,TY=S,LR=40,NR=3000,VL=CDD01,OW=CCS20 00020DEFINE,FN=DUMMY,ED=999999,TY=S,LR=80,NR=1,VL=CDD01,OW=CCS20 00021LOAD,FN=DUMMY,OW=CCS20 00022 00023/! 00024DEFINE,FN=INACCT,ED=999999,TY=S,LR=24,NR=36000,VL=CDD01,OW=CCS20 00025DEFINE,FN=LTRDESC,TY=S,LR=80,ED=999999,NR=2000,OW=CCS20 00026DEFINE,FN=LTRFIL,ED=999999,TY=R,K1=2,P1=1,LR=1512,NR=50,VL=CDD01; 00027OW=CCS20 00028DEFINE,FN=NEWS,ED=999999,TY=S,LR=80,NR=100,VL=CDD01,OW=CCS20 00029DEFINE,FN=PGEXTR,ED=999999,TY=S,LR=132,NR=36000,OW=CCS20 00030DEFINE,FN=RPTPGM,ED=999999,TY=R,K1=6,P1=1,LR=80,NR=20,VL=CDD01,Ot  3@`W=CCS20 00031DEFINE,FN=RPTTBL,ED=999999,TY=R,K1=6,P1=1,LR=80,NR=2000,VL=CDD01; 00032OW=CCS20 00033DEFINE,FN=RSWFIL,ED=999999,TY=S,LR=82,NR=18000,VL=CDD01,OW=CCS20 00034DEFINE,FN=SCRNDESC,ED=999999,TY=S,LR=80,NR=3000,VL=CDD01,OW=CCS20 00035DEFINE,FN=SCRNFILE,ED=999999,TY=R,K1=2,P1=1,LR=1800,NR=100,VL=CDD01; 00036OW=CCS20 00037DEFINE,FN=SREQDL,ED=999999,TY=S,LR=20,NR=300,VL=CDD01,OW=CCS20 00038DEFINE,FN=SUMHIST,ED=999999,TY=R,K1=16,P1=1,LR=666,NR=36000,VL=CDD01; 00039OW=CCS20 00040DEFINE,FN=TAPEARC,ED=999999,TY=R,K1=16,P1=1,LR=46,NR=36000,VL=CDD01; 00041OW=CCS20 00042DEFINE,FN=TRANFL,ED=999999,TY=S,LR=138,NR=4800,OW=CCS20,VL=SYSVOL 00043DEFINE,FN=TRNBCK,ED=999999,TY=S,LR=138,NR=4800,OW=CCS20,VL=CDD01 00044DEFINE,FN=TRNSFL,ED=999999,TY=S,LR=138,NR=4800,OW=CCS20,VL=SYSVOL 00045DEFINE,FN=UPHSTCM,ED=999999,TY=S,LR=20,NR=300,VL=CDD01,OW=CCS20 00046DEFINE,FN=UTIFIL,ED=999999,TY=R,K1=4,P1=1,LR=80,NR=150,VL=CDD01,OW=CCS20 00047EX 00048MOVDAT 00049 * THE 36000 ACCOUNT SYSTEM BUILD IS COMPLETE 00050 * 00051 * PROCEED WITH THE INSTALLATION TEST PROCEDURES. 00052 * 00053MNUPRO 00054__mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmڪ  3@tmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm  3@mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm  3@mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm  3@mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm~  3@mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmi  3@mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmT  3@mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm?  3Ammmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*  3Ammmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm  3A(mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm  3A<ALrA<O $$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm__CmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmALrACO $$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm * 00001 * PROCEDURE TO BUILD 78000 ACCOUNT SYSTEM IN PROCESS. 00002INPUT=PRFSC004 00003QTIL 00004DELETE,FN=$$SYMENU 00001DEFINE,FN=$$SYMENU,ED=999999,TY=S,LR=80,NR=22,VL=SYSVOL,OW=$$ 00002LOAD,FN=$$SYMENU,OW=$$ 00003 * SYSTEM MENU 00004 * 00005MNUPRO SC - SYSTEM CONFIGURATOR 00006UTIL UT - SYSTEM UTILITIES 00007EDITOR ED - TEXT EDITOR-USED TO EDIT 80 CHARACTER SEQ OR DIRECT FILES 00008MNUPRO DC - CCS20 DAILY CYCLE, ON-LINE REPORTING AND PREPARATION 00009MNUPRO HS - CCS20 HISTORY SYSTEM PROCEDURES 00010MNUPRO MT - CCS20 SYSTEM FILE MAINTENANCE ROUTINES 00011MNUPRO RP - CCS20 ON DEMAND REPORTING 00012MNUPRO RG - CCS20 REPORT GENERATOR - REPORT DIRECTORY 00013MNUPRO EX - EXIT 00014/! 00015DEFINE,FN=$$DCMENU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$DCMENU,OW=$$ 00002 * DAILY CYCLE MENU 00003 * 00004DCCOLACT A - DAILY COLLECTOR ACTIVITY REPORTS 00005ALrANO z$$ TED LETTERS 00006DCACTADD C - ADD THE COLLECTOR ACTIVITIES TO THE ACTIVITY FILE 00007DCUPDTAP D - PROCESS COMPLETE U * 00001 * PROCEDURE TO BUILD 78000 ACCOUNT SYSTEM IN PROCESS. 00002INPUT=PRFSC004  3AP 00003QTIL 00004DELETE,FN=$$SYMENU 00001DEFINE,FN=$$SYMENU,ED=999999,TY=S,LR=80,NR=22,VL=SYSVOL,OW=$$ 00002LOAD,FN=$$SYMENU,OW=$$ 00003 * SYSTEM MENU 00004 * 00005MNUPRO SC - SYSTEM CONFIGURATOR 00006UTIL UT - SYSTEM UTILITIES 00007EDITOR ED - TEXT EDITOR-USED TO EDIT 80 CHARACTER SEQ OR DIRECT FILES 00008MNUPRO DC - CCS20 DAILY CYCLE, ON-LINE REPORTING AND PREPARATION 00009MNUPRO HS - CCS20 HISTORY SYSTEM PROCEDURES 00010MNUPRO MT - CCS20 SYSTEM FILE MAINTENANCE ROUTINES 00011MNUPRO RP - CCS20 ON DEMAND REPORTING 00012MNUPRO RG - CCS20 REPORT GENERATOR - REPORT DIRECTORY 00013MNUPRO EX - EXIT 00014/! 00015DEFINE,FN=$$DCMENU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$DCMENU,OW=$$ 00002 * DAILY CYCLE MENU 00003 * 00004DCCOLACT A - DAILY COLLECTOR ACTIVITY REPORTS 00005DCPRTLTR B - PRINT REQUESTED LETTERS 00006DCACTADD C - ADD THE COLLECTOR ACTIVITIES TO THE ACTIVITY FILE 00007DCUPDTAP D - PROCESS COMPLETE UPDATE TAPE(S) FROM A/R SYSTEM 00008DCNFINUP E - PROCESS 400 SERIES NON-FINANCIAL UPDATE (TAPE)S 00009DCFINUPD F - PROCESS 500 SERIES FINANCIAL UPDATE TAPE(S) 00010RPDRCIAC G - DELINQUENT RECORD CONTENT REPORT - (INACTIVE ACCOUNTS) 00011RPDRCSRQ H - DELINQUENT RECORD CONTENT REPORT - (SUPERVISOR REQUESTS) 00012DCUPDHIS I - UPDATE ACCOUNTS FROM HISTORY 00013DCDUMMIE J** THE FOLLOWING PROCEDURES ARE TO BE RUN WHEN THE COLLECTORS 00014DCDUMDUM K** ARE FINISHED WITH THE DAYS ACTIVITIES 00015DCSRTTRN L - SORT TRANSACTION FILE IN PROPER ORDER FOR COLLECTOR REPORT 00016DCBLDDAS M - CREATE DAILY ASSIGNMENT FILES 00017 Z - EXIT 00018/! 00019DEFINE,FN=$$HSMENU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$HSMENU,OW=$$ 00002 * HISTORY SYSTEM MENU 00003 * 00004HSMOVHIS A - MOVE INACTIVE ACCOUNTS TO HISTORY FILES 00005HSUPDTAP B - UPDATE ACTIVE ACCOUNTS FROM THE TAPE ARCHIVES 00006HSPRGHIS C - PURGE OLDEST ACCOUNTS FROM SUMMARY HISTORY FILE 00007HSPRGTAP D - PURGE OLDEST ACCOUNTS FROM THE TAPE ARCHIVES FILE 00008MTPRGMST E - PURGE MASTER FILES (DELQMST-COSIGNER-ACTFIL) 00009 Z - EXIT 00010/! 00011DEFINE,FN=$$MTMENU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$MTMENU,OW=$$ N;  3Ad 00002 * FILE MAINTENANCE MENU 00003 * 00004MTRDRLTR A - PRINT THE LETTER DEFINITION FILE 00005MTCONLTR B - CREATE THE LETTER FILE 00006MTUTIFIL C - UTILITY FILE MAINTENANCE - ADD OR UPDATE UTILITY RECORDS 00007MTDECTBL D - DECISION TABLE MAINTENANCE 00008MTAVMDMP E - PRINT ACTIVITY VERIFICATION TABLE 00009MTACTMTX F - CREATE THE ACTIVITY VERIFICATION TABLE 00010MTSPCAUD G - FILE SPACE AUDIT- REPORTS PERCENTAGE OF UNUSED FILE SPACE 00011HSPRGHIS H - PURGE OLDEST ACCOUNTS FROM SUMMARY HISTORY FILE 00012HSPRGTAP I - PURGE OLDEST ACCOUNTS FROM THE TAPE ARCHIVES FILE 00013MTLDSCRN J - PRINT SCREEN DEFINITION FILE 00014MTSVSCRN K - CREATE THE SCREEN FILE 00015MTPRGMST L - PURGE MASTER FILES (DELQMST-COSIGNER-ACTFIL) 00016MTACTMTN M - ACTIVITY FILE MAINTENANCE/REPORT 00017MTUSEMTN N - COLECT ACTIVE USER FILE MAINTENANCE 00018MTDETCRD O - PRINT REPORT GENERATOR DATA ELEMENT TABLE 00019MTDETCON P - REPORT GENERATOR DATA ELEMENT TABLE ROUTINES-CONSOLE INPUT 00020MTPDFMTN Q - REPORT GENERATOR PROGRAM DIRECTORY FILE MAINTENANCE 00021MTSCNPRT R - SAMPLE SCREEN PRINT UTILITY 00022 Z - EXIT 00023/! 00024DEFINE,FN=$$RPMENU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$RPMENU,OW=$$ 00002 * ON DEMAND REPORT MENU 00003 * 00004RPDRCIAC A - DELINQUENT RECORD CONTENT REPORT (INACTIVE ACCOUNTS) 00005RPDRCSRQ B - DELINQUENT RECORD CONTENT REPORT (SUPERVISOR REQUESTS) 00006RPTAPRRN C - TREND ANALYSIS-CALCULATE AGE- RUN BEFORE SELECTION D OR E 00007RPTAPTQU D - TREND ANALYSIS REPORT PRINTED BY QUEUE 00008RPTAPTTY E - TREND ANALYSIS REPORT PRINTED BY PRODUCT TYPE 00009RPWRTOFF F - ELIGIBLE/ACTUAL WRITE-OFF REPORT 00010RPDLYASN G - DAILY ASSIGNMENT LIST 00011RPSUMACT H - SUMMARY ACCOUNT LIST REPORT 00012RPWCOLST I - WEEKLY COLLECTOR STATISTICS REPORT 00013RPMCOLST J - MONTHLY COLLECTOR STATISTICS REPORT 00014RPTCNTRL K - CREATE REPORT GENERATOR PROGRAM 00015PRFPG000 L - EXECUTE REPORT GENERATOR PROGRAM 00016PRFRP012 M - QUEUE LOADING REPORT 00017 Z - EXIT 00018/! 00019DEFINE,FN=$$RGMENU,TY=S,LR=80,NR=22,ED=999999,VL=SYSVOL ,OW=$$ 00001LOAD,FN=$$RGMENU,OW=$$ 00002 * REPORT GENERATOR - REPORT DIRECTORY 00003 * 00004PRFPG001 A - R.G. REPORT 1 - (AVAILABLE) 00005PRFPG002 B - R.G. REPORT 2 - (AVAILABLE) 00006PRFPG003 C - R.G. REPORT 3 - (W  3AxAVAILABLE) 00007PRFPG004 D - R.G. REPORT 4 - (AVAILABLE) 00008PRFPG005 E - R.G. REPORT 5 - (AVAILABLE) 00009PRFPG006 F - R.G. REPORT 6 - (AVAILABLE) 00010PRFPG007 G - R.G. REPORT 7 - (AVAILABLE) 00011PRFPG008 H - R.G. REPORT 8 - (AVAILABLE) 00012PRFPG009 I - R.G. REPORT 9 - (AVAILABLE) 00013PRFPG010 J - R.G. REPORT 10 - (AVAILABLE) 00014PRFPG011 K - R.G. REPORT 11 - (AVAILABLE) 00015PRFPG012 L - R.G. REPORT 12 - (AVAILABLE) 00016PRFPG013 M - R.G. REPORT 13 - (AVAILABLE) 00017PRFPG014 N - R.G. REPORT 14 - (AVAILABLE) 00018PRFPG015 O - R.G. REPORT 15 - (AVAILABLE) 00019PRFPG016 P - R.G. REPORT 16 - (AVAILABLE) 00020PRFPG017 Q - R.G. REPORT 17 - (AVAILABLE) 00021PRFPG018 R - R.G. REPORT 18 - (AVAILABLE) 00022PRFPG019 S - R.G. REPORT 19 - (AVAILABLE) 00023 Z - EXIT 00024/! 00025DEFINE,FN=PRFDC001,TY=S,LR=80,NR=50,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC001,OW=CCS20 00002CHEKID 00003 * THIS ROUTINE WILL PRINT - DAILY COLLECTOR UPDATE REPORT 00004 * - TIME USAGE REPORT 00005 * - DAILY COLLECTOR STATISTICS REPORT 00006 * 00007INPUT=PRFDC001 00008UTIL 00009CLEAR,FN=DLYWRK 00010EX 00011 * TRNSFL FILE IS NOW BEING SORTED 00012INPUT=PRFDC001 00013DSORT 00014FN=TRNSFL,CCS20 00015F2=TRNSFL,CCS20, 00016OP=T,F,A 00017KF=A,29,2,A,17,4,A,135,4,A,25,4,A,1,16,A,134,1 00018SL=I 00019 * THE TRNSFL FILE HAS BEEN SORTED 00020 * THE DAILY COLLECTOR UPDATE REPORT WILL BE PRINTED 00021COLCHG 00022 * THE DAILY COLLECTOR UPDATE REPORT IS COMPLETE 00023 * THE TIME USAGE REPORT WILL BE PRINTED 00024TIMUSE 00025 * THE TIME USAGE REPORT IS COMPLETE 00026INPUT=PRFDC001 00027SWITCH 0002810000000 00029 * THE DAILY STATISTICS REPORT Wx  3AILL BE PRINTED 00030COLSTS 00031 * THE DAILY STATISTICS REPORT IS COMPLETE 00032 **** OPERATOR - 00033 * RESPOND: 'N' CARRIAGE RETURN - TO BYPASS ZEROING THE DAILY COUNT 00034 * 00035 * CARRIAGE RETURN ONLY - TO ZERO THE DAILY COUNT 00036CCSPAS 00037INPUT=PRFDC001 00038SWITCH 0003900010000 00040COLSTS 00041 * THIS ROUTINE IS COMPLETE 00042MNUPRO 00043/! 00044DEFINE,FN=PRFDC002,TY=S,LR=80,NR=30,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC002,OW=CCS20 00002CHEKID 00003 * THE TRANSACTION FILE WILL BE SORTED FOR PRINTING OF LETTERS 00004INPUT=PRFDC002 00005DSORT 00006FN=TRNSFL,CCS20 00007F2=TRNSFL,CCS20, 00008OP=T,F,A 00009KF=A,17,4,A,41,2,A,1,16 00010SL=I 00011 **** OPERATOR - LOAD LETTER PAPER 00012 * CARRIAGE RETURN WHEN READY 00013 * 00014CCSPAS 00015 * THE REQUESTED LETTERS WILL BE PRINTED 00016LTRPRT 00017 * THE REQUESTED LETTERS HAVE BEEN PRINTED 00018 **** OPERATOR - LOAD REGULAR PAPER 00019 * CARRIAGE RETURN WHEN READY 00020 * 00021CCSPAS 00022 * THE LETTER STATISTICS SUMMARY WILL BE PRINTED 00023LTRSTA 00024 * THE LETTER STATISTICS SUMMARY IS COMPLETE 00025MNUPRO 00026/! 00027DEFINE,FN=PRFDC003,TY=S,LR=80,NR=25,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC003,OW=CCS20 00002CHEKID 00003 * THE COLLECTOR ACTIVITIES WILL BE ADDED TO THE ACTIVITY FILE 00004INPUT=PRFDC003 00005DSORT 00006FN=TRNSFL,CCS20 sw  3A 00007F2=TRNSFL,CCS20, 00008OP=T,F,A 00009KF=A,29,2,A,21,4,D,25,4,D,121,2 00010SL=I 00011ACTADD 00012 * THE COLLECTOR ACTIVITIES HAVE BEEN ADDED TO THE ACTIVITY FILE 00013 * THE SUMMARY REPORT OF THE BLOCK DISTRIBUTION IN THE ACTIVITY FILE 00014 * WILL BE PRINTED 00015ACTMTN 00016 * THE SUMMARY REPORT OF THE BLOCK DISTRIBUTION IN THE ACTIVITY FILE 00017 * HAS BEEN PRINTED 00018MNUPRO 00019/! 00020DEFINE,FN=PRFDC004,TY=S,LR=80,NR=25,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC004,OW=CCS20 00002CHEKID 00003 ****OPERATOR - MOUNT UPDATE INPUT TAPE ON TAPE UNIT '0' 00004 * CARRIAGE RETURN WHEN READY 00005CCSPAS 00006INPUT=PRFDC004 00007SWITCH 0000810000000 00009 * THE UPDATE TAPE WILL BE PROCESSED 00010UPDATE 00011 * THE UPDATE TAPE HAS BEEN PROCESSED 00012 * THE FILE SPACE AUDIT REPORT WILL NOW BE PRINTED 00013 **** OPERATOR - CARRIAGE RETURN TO CONTINUE AFTER REVIEWING 00014 * SCREEN INFORMATION 00015CCSSPC 00016CCSPAS 00017 * THE FILE SPACE AUDIT REPORT IS COMPLETE 00018MNUPRO 00019/! 00020DEFINE,FN=PRFDC005,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC005,OW=CCS20 00002CHEKID 00003 * THE NON-FINANCIAL UPDATES WILL BE PROCESSED 00004 **** OPERATOR - MOUNT NON-FINANCIAL UPDATE INPUT TAPE ON TAPE UNIT '0' 00005 * CARRIAGE RETURN WHEN READY 00006CCSPAS 00007INPUT=PRFDC005 00008SWITCH 0000910000000 00010UPD400 00011 * THE NON-FINANCIAL UPDATES HAVE BEEN PROCESSED 00012MNUPRO 00013/! 00014DEFINE,FN=PRFDC006,TY=S,LR=80,NR{  3A=20,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC006,OW=CCS20 00002CHEKID 00003 * THE FINANCIAL UPDATES WILL BE PROCESSED 00004 **** OPERATOR - MOUNT FINANCIAL UPDATE INPUT TAPE ON TAPE UNIT '0' 00005 * 00006INPUT=PRFDC006 00007MOUNT 00008FTAPE,B,P 00009/* 00010UPD500 00011 * THE FINANCIAL UPDATES HAVE BEEN PROCESSED 00012MNUPRO 00013/! 00014DEFINE,FN=PRFDC007,TY=S,LR=80,NR=15,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC007,OW=CCS20 00002CHEKID 00003 * THE ACTIVE ACCOUNTS WILL BE UPDATED FROM HISTORY 00004DHUPDT 00005 * THE ACTIVE ACCOUNTS HAVE BEEN UPDATED FROM HISTORY 00006MNUPRO 00007/! 00008DEFINE,FN=PRFDC008,TY=S,LR=80,NR=10,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC008,OW=CCS20 00002CHEKID 00003 * WARNING: DO NOT SELECT 'L' OR 'M' FROM THE DAILY CYCLE MENU UNTIL THE 00004 * COLLECTORS ARE OFF-LINE FOR THE DAY 00005MNUPRO 00006/! 00007DEFINE,FN=PRFDC009,TY=S,LR=80,NR=10,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC009,OW=CCS20 00002CHEKID 00003 * WARNING: DO NOT SELECT 'L' OR 'M' FROM THE DAILY CYCLE MENU UNTIL THE 00004 * COLLECTORS ARE OFF-LINE FOR THE DAY 00005MNUPRO 00006/! 00007DEFINE,FN=PRFDC010,TY=S,LR=80,NR=40,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC010,OW=CCS20 00002CHEKID 00003 **** OPERATOR - THE COLLECTORS MUST BE OFF-LINE 00004 * RESPOND: 'N' CARRIAGE RETURN - TO ABORT 00005 * CARRIAGE RETURN ONLY - TO CONTINUE 00006 * 00007CCSPAS 00008 * THE TRANSACTION FILE WILL BE SORTED FOR THE COLLECTORS REPORT 00009INPUT=PRFDC010 00010UTIL 00011CLEAR,FN=TRNSFL 00012EX S  3A 00013INPUT=PRFDC010 00014DSORT 00015FN=TRANFL,CCS20 00016F2=TRNSFL,CCS20, 00017OP=T,F,A 00018KF=A,29,2,A,17,4,A,1,16,A,21,4,A,25,4,A,137,2 00019SL=I 00020PRETSR 00021INPUT=PRFDC010 00022UTIL 00023CLEAR,FN=ACTIVE 00024CLEAR,FN=TRANFL 00025CLEAR,FN=TRNBCK 00026EX 00027 * THE TRANSACTION FILE HAS BEEN SORTED FOR THE COLLECTORS REPORT 00028NMCHNG 00029INPUT=PRFDC010 00030UTIL 00031CLEAR,FN=ADDACT 00032EX 00033MNUPRO 00034/! 00035DEFINE,FN=PRFDC011,TY=S,LR=80,NR=45,ED=999999,VL=SYSVOL ,OW=CCS20 00001LOAD,FN=PRFDC011,OW=CCS20 00002CHEKID 00003 **** OPERATOR - THE COLLECTORS MUST BE OFF-LINE 00004 * RESPOND: 'N' CARRIAGE RETURN - TO ABORT 00005 * CARRIAGE RETURN ONLY - TO CONTINUE 00006 * 00007CCSPAS 00008 * THE DAILY ASSIGNMENT FILES WILL BE CREATED 00009 * 00010 * THE DLYASSN FILE IS BEING CREATED 00011DACRTE 00012 * THE DLYASSN FILE HAS BEEN CREATED 00013 * THE DLYASSN FILE IS BEING SORTED 00014INPUT=PRFDC011 00015DSORT 00016FN=DLYWRK,CCS20 00017FN=DLYASSN,CCS20 00018F2=DLYASSN,CCS20, 00019OP=T,F,A 00020KF=A,17,4,A,25,2,A,21,4,D,27,4,A,1,16 00021SL=I 00022 * THE DLYASSN FILE HAS BEEN SORTED 00023INPUT=PRFDC011 00024UTIL 00025CLEAR,FN=DAQUE   3D 39400507753 39400703253 39400842051 39401066353 39402034558 39408096353 89420875354   39400015351 39400030053 39400052255 39400054657 39400156155 39400186459 39400286952 39400375359 39400388550 39400393758 39400396058 39400507753 39400529450 39400533551 39400549052 39400558053 39400577350 39400589256 39400619459 39400637055 39400640851 39400644051 39400653359 39400663358 39400667458 39400672458 39400529450 39400533551 39400549052 39400558053 39400577350 39400589256 39400619459 39400637055 39400640851 39400644051 39400653359 39400663358 39400667458 39400672458 39400691458 39400703253 39400721651 39400729555 39400733151 !39400741451 "39400743754 #39400746351 $39400761251 %39400805652 &39400814852 '39400822053 (39400823952 )39400825759 *39400707254 39400721651 39400729555 39400733151 !39400741451 39400743754 #39400746351 $39400761251 %39400805652 39400814852 '39400822053 39400823952 )39400825759 39400828753 +39400842051 ,39400853850 -39400857257 .39400859451 /39400869856 039400879657 139400897055 239400925252 339400932357 439400935152 539400957255 639400977857 739400989050 839401055455 939400853850 -39400857257 39400859451 /39400869856 039400879657 139400897055 39400925252 339400932357 39400935152 539400957255 39400977857 739400989050 839401055455 939401057352 39401066353 ;39401103750 <39401209557 =39401258950 >39401267852 ?39401268751 @39401273454 A39401357752 B39401460655 C39401537056 D39401538252 E39401586152 F39401635256 G39401649752 H39401103750 <39401209557 =39401258950 39401267852 ?39401268751 39401273454 A39401357752 39401460655 C39401537056 D39401538252 E39401586152 39401635256 G39401649752 H39402034558 I39402088455 J39402116850 K39402167457 L39402190350 M39402256359 N39402258553 O39402260153 P39402261052 Q39402270053 R39402272158 S39402273255 T39402276951 U39402277058 V39402574959 W39402088455 39402116850 K39402167457 39402190350 M39402256359 39402258553 O39402260153 P39402261052 Q39402270053 39402272158 S39402273255 T39402276951 U39402277058 39402574959 W39404773658 39404799356 Y39404835853 39404853153 [39406510959 S  3D \39408096353 ]89420427750 c89420501752 d89420602154 e89420628654 f89420723950 g89420764558 h89420792856 i89420817257 j 39408264050 }39408736255 ~39408758457 _39420112352 `39420229750 89420304652 89420306954 b89420427750 c89420445059 89420576051 89420602154 e89420628654 f89420638356 89420754054 89420764558 h89420792856 i89420797855 89420836950 89420844756 k89420875354 l89426148855 r89430117953 s89430194952 t89430258658 u89430300252 v89430397159 w89430476755 x89430605759 y89420881154 89420919251 89420945058 n89420960255 o89420970858 89423093054 89423144055 q89426148855 r89426422854 89430190752 89430194952 t89430258658 u89430266255 89430336157 89430397159 w89430476755 x89430480757 89430683053 89430703851 z89430730151 {89430758459 89430258658 u89430300252 v89430397159 w89430476755 x89430605759 y__952 s89430258658 t89430300252 u89430397159 v89430476755 w39408096353 \39408437250 ]39408758457 ^39420112352 39400653359 39400663358 39400663358 39400663358 39400663358 39400663358 39400667458 39400672458 39400691458 39400703253 39400707254 39400721651 39400729555 39400733151 39400741451 39400743754 39400746351 39400761251 39400805652 39400672458 39400703253 39400721651 39400729555 39400733151 39400743754 39400746351 39400761251 39400814852 39400823952 39400828753 39400842051 39400853850 39400853850 39400853850 39400869856 39400932357 39400989050 39401103750 39401268751 39401537056 39401649752 39402167457 39402260153 39402273255 39404773658 39406510959 39408096353 39400869856 39400879657 39400977857 39400989050 39401103750 39401209557 39401460655 39401537056 39401649752 39402034558 39402258553 39402260153 39402273255 39402276951 39404853153 39406510959 39408096353 39408264050 39408736255 39408758457 39420112352 39402167457 39402260153 39402273255 39404773658 39406510959 39408096353 __959 939400721651 39400729555 39400733151 39400741451 !39400743754 "39400746351 #39400761251 $39400805652 39400814852 39400822053 39400823952 39400825759 39400828753 39400842051 f39400853850 39400857257 39400859451 39400869856 g39400879657 39400743754 39400746351 d39400761251 39400805652 39400814852 39400828753 39400842051 f39400869856 g39401538252 39401586152 39401635256 39401649752 m39402034558 39402088455 39402116850 39402167457 39402190350 5K  3AL\O CCS20 mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm 030980122079 ^400015351 39400030053 00010001DEL3021879384301000053434000053434000053434000053434 ^400052255 0002 DEL3031879273 000044974 000046023 39400054657 00020003DEL3060379279196000000000000000000000002496000002496 ^400156155 39400186459 00030004DEL3042079323240000000000000000000000002453000002453 39400286952 00040001DEL3031879356273000031445000031445000040517000040517 39400375359 00010002DEL3021879384301000012549000012549000012549000012549 ^400388550 39400393758 00020003DEL3041879325242000071340000071340000073124000073124 39400396058 00030004DEL3121978081363000015940000015940000015940000015940 39400507753 00040001DEL3051179302219000000000000000000000142443000142443 ^400529450 39400533551 00010002DEL3042179322239000084745000084745000219983000219983 ^400549052 0003 DEL3011879332 000014507 000014507 39400558053 00020004DEL3011179422339000000429000000429000000429000000429 ^400577350 39400589256 00030001DEL3031879356273000034603000034603000035468000035468 39400619459 00040002DND1031879356273000105294000105294000105894000105894 39400637055 00010003DEL3042679317234000081479000081479000098266000098266 ^400640851 39400644051 00020004DEL3061179271188000009745000009745000097667000097667 39400653359 00030001DND1122878072354000047152000047152000047152000047152 39400663358 00040002DEL3042279321238000078408000078408000098994000098994 ^400667458 39400672458 00010003DEL3060379279196000000000000000000000029443000029443 ^400691458 0004 DEL3011879332 000007967 000007967 39400703253 00020001DEL3060379279196000000000000000000000091337000091337 ^400707254 39400721651 00030002DEL3021879384301000009715000009715000009715000009715 39400729555 00040003DEL3031879356273000005219000005219000005219000005219 39400733151 00010004DEL3011879415332000009655000009655000009655000009655 ^400741451 39400743754 00020001DEL3011879415332000010043000010043000010043000010043 39400746351 00030002DEL3051079303220000100826000100826000124568000124568 39400761251 00040003DEL3031879356273000030999000030999000046124000046124 ^400805652 39400814852 00010004ALA2031979355272000046199000046199000051557000051557 ^400822053 0001 DEL3121878364 000002000 000002000 39400823952 00020002DEL3121878082364000012007000012007000012007000012007 ^400825759 39400828753 00030003DND1051179302219000003794000003794000050204000050204 39400842051 00040004DEL3021879384301000025126000025126000025126000025126 39400853850 00010001DEL3051179302219-  3 000000000000000000000006124000006124 ^400857257 39400859451 00020002DEL3121878082364000031147000031147000031147000031147 39400869856 00030003DEL3021879384301000020661000020661000020661000020661 39400879657 00040004DND1021879384301000047787000047787000049162000049162 ^400897055 39400925252 00010001DEL3021879384301000023989000023989000026559000026559 ^400932357 0002 DEL3031079281 000000000 000000000 39400935152 00020003DEL3121878082364000007457000007457000007457000007457 ^400957255 39400977857 00030004DEL3050379310227000017345000017345000065691000065691 39400989050 00040001DEL3032979345262000000000000000000000009059000009059 39401055455 00010002DEL3061179271188000000000000000000000020906000020906 ^401057352 39401066353 00020003ALA2061179271188000000000000000000000027032000027032 39401103750 00030004DEL3042579318235000016923000016923000018971000018971 39401209557 00040001DEL3011879415332000008011000008011000008011000008011 ^401258950 39401267852 00010002DEL3011879415332000017556000017556000017556000017556 ^401268751 0003 DEL3051879212 000001534 000010524 39401273454 00020004DEL3122978071353000009766000009766000009766000009766 ^401357752 39401460655 00030001DND1052979284201000000000000000000000025861000025861 39401537056 00040002DEL3042679317234000000000000000000000003438000003438 39401538252 00010003DEL3060379279196000033800000033800000071300000071300 ^401586152 39401635256 00020004DEL3011879415332000070895000070895000070895000070895 39401649752 00030001DEL3060979273190000000000000000000000053500000053500 39402034558 00040002DEL3041179332249000067004000067004000068629000068629 ^402088455 39402116850 00010003DEL3041879325242000002081000002081000002081000002081 ^402167457 0004 DEL3060379196 000032147 000073229 39402190350 00020001DND1042779316233000043200000043200000109500000109500 ^402256359 39402258553 00030002DEL3041879325242000050868000050868000052140000052140 39402260153 00040003ALA2042779316233000040412000040412000091482000091482 39402261052 00010004DEL3031079364281000055286000055286000056793000056793 ^402270053 39402272158 00020001DEL3042279321238000013800000013800000016425000016425 39402273255 00030002ALA2060379279196000000000000000000000066885000066885 39402276951 00040003DEL3041879325242000042925000042925000050917000050917 ^402277058 39402574959 00010004DEL3042779316233000013322000013322000032688000032688 ^404773658 0001 DEL3051879212 000038560 000109160 39404799356 00020002DEL3031879356273000012813000012813000012813000012813 ^404835853 39404853153 00030003DEL306097927319000000000000000000000000200}00000200} 39406510959 00040004DE@  3 "L3031879356273000011115000011115000011115000011115 39408096353 00010001DEL3051079303220000029238000029238000248150000248150 ^408437250 0002 DEL3051879212 000006046 000050044 39408758457 00020003DND1011879415332000077287000077287000077287000077287 39420112352 00030004DEL3031879356273000037918000037918000038866000038866 ^420274251 0001 DEL3021979300 000070700 000073343 89420306954 00040002DEL3060279280197000000000000000000000067802000067802 89420427750 00010003DEL3032579349266000040433000040433000041819000041819 ^420501752 0004 DEL3032079271 000000000 000056270 89420602154 00020001DND1031879356273000127011000127011000127011000127011 89420628654 00030002DEL3031879356273000031573000031573000032362000032362 ^420723950 0003 DEL3011879332 000075486 000075486 89420764558 00040004DND1061079272189000029284000029284000162813000162813 89420792856 00010001DEL3011879415332000015187000015187000015187000015187 ^420817257 0002 DEL3051879212 000035400 000070081 89420844756 00020003DEL3031879356273000002274000002274000002274000002274 89420875354 00030004DEL3011879415332000010296000010296000010296000010296 ^420899156 0001 DEL3121878364 000045668 000045668 89420945058 00040002ALA2062879254171000000000000000000000092246000092246 89420960255 00010003DND1020979393310000000000000000000000007493000007493 ^420976954 0004 ALA2031179280 000094237 000120293 89423144055 00020001DEL3051879295212000006813000006813000137964000137964 89426148855 00030002DUES021879384301000001000000001000000001000000001000 ^430117953 0003 DEL3021979300 000002090 000002090 89430194952 00040004DEL3051879295212000000600000000600000000600000000600 89430258658 00010009DEL3061079272189000000000000000000000076390000076390 ^430300252 0003 DEL3042579235 000075914 000111391 89430397159 00020009DEL3060379279196000000000000000000000011227000011227 89430476755 00030009ALA2061179271188000000000000000000000348377000348377 ^430605759 0002 DEL3050379227 000000000 000021405 89430703851 00040008DEL3011879415332000033623000033623000033623000033623 89430730151 00010009DEL3021879384301000000029000000029000000029000000029 ^430802653 0009 DEL3051879212 000003145 000003145 39408264050 0002 DEL3051079303 000058591 000090827 39408736255 0003 DEL3031879356 000030921 000031694 39420229750 0004 DEL3011879415 000018778 000018778 89420304652 0001 DEL3041179332 000000000 00000495} 89420445059 0002 DEL3031879356 000000600 000000600 89420576051 0003 DEL3022279380 000000000 000000879 89420638356 0004 DEL3051079303 000049271 000068370 89420754054 0001 DEL3021879384 000028380 000029090 89420797855 0002 DEL3031879356 000034574 000064188 89420836950 0003 DEL3030979365 000018305 000018888 89420881154 0004 DEL3041879325 000053339 000054672 89420919251 0001 DEL3011879415 000021901 000021901 89420970858 0002 ALA2050979304 000060000 000133158 89423093054 0003 DEL3050279311 000000000 000069701 89426422854  3 6 0004 ALA2020979393 000025642 000030321 89430190752 0009 DEL3061179271 000068962 000091445 89430266255 0003 DEL3041879325 000051387 000054215 89430336157 0005 DEL3040979334 000030000 000031213 89430480757 0002 DEL3041979324 000000000 000001321 89430683053 0009 DEL3011879415 000019754 000019754 89430758459 0003 DEL3051179302 000000000 000037238 39400015351 0003 DEL3041879325 000060040 000075541 39400052255 0005 DEL3031879356 000044974 000046023 39400156155 0009 DEL3011879415 000004052 000004052 39400388550 0009 DEL3060979273 000052613 000128152 39400529450 0009 DEL3060279280 000000000 000051908 39400549052 0009 DEL3011879415 000014507 000014507 39400577350 0003 DEL3051179302 000000000 000027007 39400640851 0002 DEL3041879325 000130479 000165941 39400667458 0006 DEL3021879384 000053495 000054832 39400691458 0009 DEL3011879415 000007967 000007967 39400707254 0009 ALA2071179241 000000000 000047946 39400741451 0009 DND1061179271 000000000 000022771 39400805652 0008 DEL3011879415 000026723 000026723 39400822053 0009 DEL3121878082 000002000 000002000 39400825759 0009 DEL3121878082 000003868 000003868 39400857257 0009 DEL3051879295 000053042 000053042 39400897055 0009 DEL3121878082 000150966 000150966 39400932357 0009 DEL3031079364 000000000 000000000 39400957255 0009 DEL3061079272 000000000 000162282 39401057352 0003 DEL3041879325 000054001 000055351 39401258950 0003 DEL3042079323 000000000 000001749 39401268751 0001 DEL3051879295 000001534 000010524 39401357752 0009 DEL3011079423 000099802 000099802 39401586152 0003 DEL3050279311 000081500 000137105 39402088455 0009 DEL3061079272 000028543 000058911 39402167457 0009 DEL3060379279 000032147 000073229 39402256359 0002 DND1050979304 000000000 000089675 39402270053 0009 ALA2061179271 000000000 000081312 39402277058 0001 DEL3051879295 000100000 000102500 39404773658 0009 DEL3051879295 000038560 000109160 39404835853 0006 DEL3022279380 000000000 000000615 __1209557 39401460655 39402034558 39402258553 39402276951 39404853153 39408264050 39408736255 __0052255   3 J 39400054657 39400156155 39400375359 39400388550 39400393758 39400529450 39400533551 39400549052 39400558053 39400577350 39400637055 39400640851 39400644051 39400667458 39400672458 39400691458 39400703253 39400707254 39400733151 39400741451 39400743754 39400805652 39400814852 39400822053 39400823952 39400825759 39400853850 39400857257 39400859451 39400897055 39400925252 39400932357 39400935152 39400957255 39401055455 39401057352 39401066353 39401258950 39401267852 39401268751 39401273454 39401357752 39401538252 39401586152 39401635256 39402088455 39402116850 ¼  3 ^ 39402167457 39402190350 39402256359 39402261052 39402270053 39402272158 39402277058 39402574959 39404773658 39404799356 39404835853 __6510959 __mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm  3rmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmU  3mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmU  3mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmUz  3aAL {aO LA mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm39400577350 00011049105401121879B1C103WENT OUT OF TOWN 121679H122079000015000  104939400640851 00011054105501121879B2C4 122079  105439400805652 00011057105901121879B3C302GOT A NEW JOB 122579B122079000026723  105739400857257 00011101110501121879B4PP01 122279H1220790000100001220790000500110139400052255 00031152115301121879B1C403 121679H122079000040000  115239400396058 00031157115901121879B1C203 121679H122079000007500  115739400619459 00031202120401121879B1C301AFTER BURING COW WILL SEND CHECK 121679H122079000075000  120239400640851 00011054105602387142336666 39400640851 000110541056023923 39400741451 0001105610570291WIFE DIED 39400825759 0001105911010239NONE 39400825759 00011059110102387144669877 39400825759 00011059110002367142803287 39400825759 00011059110002349216 39400825759 000110591100023492116 9216 39400825759 0001105911000233SAN DIEGO, CA. 39400825759 00011059110002321247 B ST 39400825759 0001105911000231JOE BLOW 39400549052 0003115912010291COW DIED 39400653359 0003120412050291DOG BIT WIFE __0015351 0001082608350231NEIL HOPE 39400015351 0001082608330202111 2ND STREET 39400156155 00010852085802086969 ANYTIME ST. 39400156155 00010852085702057145550123 7145550000 39400156155 0001085208570207GETIT 39400388550 00010931093302382144526638 39400186459 0001100510070291WIFE IS EASY x  3a 39400186459 0001100510060291 39400640851 0001103810430207GET HIGH 39400015351 0001112711290291OWES BACK PAYMENTS 39400577350 00011419143002112144566638 0000000000 39400577350 00011419143002127777 39400577350 000114191429021055555 00000 39400577350 0001141914290209SAN DIEGO CALIF. MM 39400577350 0001141914290208111111111111111111111111111111 39400577350 00011419142802067777 9999 39400577350 0001141914280207SNOWBLIND-MMMMMMMMMMMMMMMMMMMM 39400577350 00011419142802069999 0000 39400577350 00011419142702057142703599 2144526638 39400577350 00011419142702052144526638 7145551808 39400577350 0001141914260203KKKKKKKKKKKKKKKKKKKK LOS ANGELES, CALIFOR 39400577350 000114191426020499999 92010 39400577350 000114191426020466666 99999 39400577350 0001141914250203LOS ANGELES, CALIFOR SAN DIEGO, CALIF. 39400577350 0001141914250202XCCCCCCCCCCCCCCCCCCCCCCCCCCCCC098765432109876543210987654321 39400577350 0001141914240202098765432109876543210987654321 39400577350 0001141914240201XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX123456789022345678903345678906 39400577350 0001141914230201123456789022345678903345678906999 Z ST. 39400577350 0001141914210291CALL FOR DINNER DATE 39400577350 00011431143802534 39400577350 00011431143802579999 39400577350 0001143114380256LLLLLLLLLL 39400577350 000114311438025122222222222222222222 39400577350 000114311438025233333 39400577350 00011431143802559999  3=;AL=;O CCS20 00002CHEKID 00003 * THE ACTIVITY VERIFICATION TABLE ROUTINE WILL 39400030053 00011216790005 39400637055 00011216790005 39400672458 00011216790005 39400733151 00011216790005 39400814852 00011216790005 39400925252 00011216790005 39401538252 00011216790005 39402116850 00011216790005 39402261052 00011216790005 39402574959 00011216790005 39408096353 00011216790005 89420427750 00011216790005 89420792856 00011216790005 89420960255 00011216790005 89430258658 00011216790005 89430730151 00011216790005 89420304652 00011218790005 89420754054 00011218790005 39401267852 00011219790005 39400853850 00011222790005 39401055455 00011222790005 39400375359 00010115800005 39400533551 00010115800005 39400054657 00021216790006 39400393758 00021216790006 39400558053 00021216790006 39400644051 00021216790006 39400703253 00021216790006 39400935152 00021216790006 39401066353 00021216790006 39401273454 00021216790006 39401635256 00021216790006 39402190350 00021216790006 39402272158 00021216790006 39408758457 00021216790006 89420602154 00021216790006 89420844756 00021216790006 89423144055 00021216790006 89430397159 00021216790006 39408264050 00021218790006 89420445059 00021218790006 89420797855 00021218790006 39404799356 00021219790006 39400743754 00021222790006 39400859451 00021225790006 39400823952 00021231790006 39400186459 00031216790007 39400396058 00031216790007 39400653359 00031216790007 39400828753 00031216790007 39400869856 00031216790007 39400977857 00031216790007 39401103750 00031216790007 39401460655 00031216790007 39401649752 00031216790007 39404853153 00031216790007 39420112352 00031216790007 89420628654 00031216790007 89420875354 00031216790007 89426148855 00031216790007 89430476755 00031216790007 39408736255 00031218790007 89420576051 00031218790007 39400619459 0003121879 39402258553 00031219790007 39402273255 00031219790007 39400746351 00030101800007 39400589256 00030103800007 39400721651 00030115800007 39400729555 00041216790008 39400761251 00041216790008 39400842051 00041216790008 39400879657 00041216790008 39400989050 00041216790008 39402260153 00041216790008 39402276951 00041216790008 39406510959 00041216790008 89420306954 00041216790008 89420764558 00041216790008 89420945058 00041216790008 89430194952 00041216790008 89430703851 00041216790008 39400619459 00041218790008 39420229750 00041218790008 89420638356 00041218790008 39400507753 00041219790008 39401537056 00041219790008 39402034558 00041219790008 39400663358 00041221790008 39401209557 00041227790008 39400286952 00040101800008 }  3=OAL =OO LA 400043C**** SET UP THE PRIORITY PARAMETER CHARACTER LENGTHS MAX. = 6 F3400044C IF UNUSED MUST BE ZERO (0) F340004539400030053 00011216790005 39400286952 00011216790005 39400507753 00011216790005 39400589256 00011216790005 39400653359 00011216790005 39400703253 00011216790005 39400743754 00011216790005 39400822053 00011216790005 39400853850 00011216790005 39401103750 00011218790005 39402167457 00011218790005 39406510959 00011218790005 39420112352 00011218790005 39400052255 00021216790006 39400375359 00021216790006 39400533551 00021216790006 39400619459 00021216790006 39400663358 00021216790006 39400721651 00021216790006 39400746351 00021216790006 39400823952 00021216790006 39400869856 00021218790006 39401268751 00021218790006 39402260153 00021218790006 39408096353 00021218790006 39400054657 00031216790007 39400393758 00031216790007 39400549052 00031216790007 39400637055 00031216790007 39400672458 00031216790007 39400729555 00031216790007 39400761251 00031216790007 39400828753 00031216790007 39400932357 00031218790007 39401537056 00031218790007 39402273255 00031218790007 39408437250 00031218790007 39400015351 0003121879 39400186459 00041216790008 39400396058 00041216790008 39400558053 00041216790008 39400644051 00041216790008 39400691458 00041216790008 39400733151 00041216790008 39400814852 00041216790008 39400842051 00041216790008 39400989050 00041218790008 39401649752 00041218790008 39404773658 00041218790008 39408758457 00041218790008 __0 CALL CLEAR ( ASNREQ, ADATA, ISTAT ) F3400071 IF (ISTAT.GE.0) GO TO 110 F3400072 CALL FILERR ( ADATA, 1, ISTAT, LU ) F3400073 GO TO 900 F3400074 110 CALL OPENFL ( ASNREQ, ADATA, ISTAT ) F3400075 IF (ISTAT.GE.0) GO TO 200 F3400076 CALL FILERR ( ADATA, 3, ISTAT, LU ) F3400077 GO TO 900 F3400078. F3400079C READ RECORDS FROM THE LADLQMST AND PROCESS F3400080 200 CALL GETS ( DEQREQ, DEQREC, I, ISTAT ) F3400081C EOF? F3400082 IF (AND(ISTAT,$8100).EQ.$8100) GO TO 900 F3400083 IF (AND(ISTAT,$100).EQ.$100) EFG = 1 F3400084C FILE ERROR? F3400085 IF (ISTAT.GE.0) GO TO 210 F3400086 CALL FILERR ( DDATA, 14, ISTAT, LU ) F3400087 GO TO 900 F3400088 210 DO 300 I = 1 , NUMREC F3400089 L = 40*M - 39 F3400090 K = 1000*I-999 a  3=c F3400091 J = 2*K-1 F3400092C RECORD PRESENT? F3400093 IF (DEQREC(K).EQ.$2020.OR. F3400094 1 DEQREC(K).EQ.FDEL) GO TO 300 F3400095C RECORD ACTIVE? F3400096 IF (AND(DEQREC(K+152),$FF).NE.$20) GO TO 300 F34000971 F3400098C GET THE MOST RECENT ACTIVITY F3400099C***************************************************************138*A023F3400100 IOSW = $3031 F3400101C***************************************************************138*A023F3400102 CALL GETACF ( STG, DEQREC(K+153), LTHACT, IOSW ) F34001032 F3400104C REASSIGN QUEUE ALLOWED? F3400105 IF (AND(DEQREC(K+146),$FF).NE.$20) GO TO 220 F34001061 F3400107. F3400108C**** SET UP THE PARAMETERS FOR QUEUE ASSIGNMENT : F3400109C - THE MOST RECENT ACTION CODE IS IN : STG(4) F3400110C - RESULT CODE IS IN : STG(5) F3400111C - CONTACT DATE STARTS IN : STG(1) F3400112C - THE SYSTEM DATE STARTS IN : DT(1) F34001133 F3400114C PARAMETER #1 F3400115 CALL CCSMVA ( DEQREC, QUEP(1)+J-1, QUEL(1), QUE, 1, 6 ) F34001161 F3400117C PARAMETER #2 F3400118 CALL CCSMVA ( DEQREC, QUEP(2)+J-1, QUEL(2), QUE, 7, 6 ) F34001191 F3400120C PARAMETER #3 F3400121 CALL CCSMVA ( DEQREC, QUEP(3)+J-1, QUEL(3), QUE, 13, 6 ) F34001221 F3400123C PARAMETER #4 F3400124 CALL CCSMVA ( DEQREC, QUEP(4)+J-1, QUEL(4), QUE, 19, 6 ) F34001251 F3400126C PARAMETER #5 F3400127 CALL CCSMVA ( DEQREC, QUEP(5)+J-1, QUEL(5), QUE, 25, 6 ) F34001281 F3400129C PARAMETER #6 F3400130 CALL CCSMVA ( DEQREC, QUEP(6)+J-1, QUEL(6), QUE, 31, 6 ) F34001311 F3400132C PARAMETER #7 F3400133 CALL CCSMVA ( DEQREC, QUEP(7)+J-1, QUEL(7), QUE, 37, 6 ) F34001341 F3400135C PARAMETER #8 F3400136 CALL CCSMVA ( DEQREC, QUEP(8)+J-1, QUEL(8), QUE, 43, 6 ) F34001371 F3400138C PARAMETER #9 #  3=w F3400139 CALL CCSMVA ( DEQREC, QUEP(9)+J-1, QUEL(9), QUE, 49, 6 ) F3400140. F3400141C GET THE NEW QUEUE F3400142 CALL LFTND1 ( QUE, NQUE ) F3400143C NEW QUEUE? F3400144 IF (NQUE(1).EQ.DEQREC(K+135).AND. F3400145 1 NQUE(2).EQ.DEQREC(K+136)) GO TO 220 F3400146C QUEUE RETURN SUCCESSFUL? F3400147 IF (NQUE(1).EQ.$3939.AND. F3400148 1 NQUE(2).EQ.$3939) GO TO 220 F3400149C SAVE OLD QUEUE , DATE , AND NEW QUEUE F3400150 CALL CCSMVA ( DEQREC, J+270, 4, DEQREC, J+295, 4 ) F3400151 CALL CCSMVA ( DT, 1, 6, DEQREC, J+299, 6 ) F3400152 CALL CCSMVA ( NQUE, 1, 4, DEQREC, J+270, 4 ) F34001532 F3400154C GET THE NEW PRIORITY F3400155 220 CONTINUE F3400156. F3400157C**** SET UP THE PARAMETERS FOR THE PRIORITY ASSIGNMENT - F3400158C - THE MOST RECENT ACTION CODE IS IN : STG(4) F3400159C - RESULT CODE IS IN : STG(5) F3400160C - CONTACT DATE STARTS IN : STG (1) F3400161C - THE SYSTEM DATE STARTS IN : DT(1) F34001622 F3400163C PARAMETER #1 F3400164 CALL CCSMVA ( DEQREC, PRIP(1)+J-1, PRIL(1), PRI, 1, 6 ) F34001651 F3400166C PARAMETER #2 F3400167 CALL CCSMVA ( DEQREC, PRIP(2)+J-1, PRIL(2), PRI, 7, 6 ) F34001681 F3400169C PARAMETER #3 F3400170 CALL CCSMVA ( DEQREC, PRIP(3)+J-1, PRIL(3), PRI, 13, 6 ) F34001711 F3400172C PARAMETER #4 F3400173 CALL CCSMVA ( DEQREC, PRIP(4)+J-1, PRIL(4), PRI, 19, 6 ) F34001741 F3400175C PARAMETER #5 F3400176 CALL CCSMVA ( DEQREC, PRIP(5)+J-1, PRIL(5), PRI, 25, 6 ) F34001771 F3400178C PARAMETER #6 F3400179 CALL CCSMVA ( DEQREC, PRIP(6)+J-1, PRIL(6), PRI, 31, 6 ) F34001801 F3400181C PARAMETER #7 F3400182 CALL CCSMVA ( DEQREC, PRIP(7)+J-1, PRIL(7), PRI, 37, 6 ) F34001831 F3400184C PARAMETER #8 F3400185 CALL CCSMVA ( DEQREC, PRIP(8)+J-1, PRIL(8), PRI, 43, 6 ) F34001861  3= F3400187C PARAMETER #9 F3400188 CALL CCSMVA ( DEQREC, PRIP(9)+J-1, PRIL(9), PRI, 49, 6 ) F3400189. F3400190 CALL LFTND1 ( PRI, NPRI ) F3400191C PRIORITY RETURN SUCCESSFUL? F3400192 IF (NPRI(1).EQ.$3939.AND. F3400193 1 NPRI(2) .EQ. $3939 ) GO TO 225 F3400194C SAVE THE NEW PRIORITY F3400195 CALL CCSMVA ( NPRI, 1, 4, DEQREC, J+280, 4 ) F34001961 F3400197C IS THIS ACCOUNT A PROMISE TO PAY? F3400198 225 IF ( AND(DEQREC(K+142),$FF00) .NE. $5900 ) GO TO 230 F34001991 F3400200C***************************************************************138*A018F3400201C CHECK IF PROMISE DUE TO BE CHECKED (SYSTEM DATE EQUAL OR F3400202C PAST PROMISE TO PAY DATE). F3400203 CALL CCSCST ( DT, 5, 2, DEQREC, J+1019, 2, ICOMP ) F3400204C NOT DUE CHK FURTHER DUE F3400205 IF (ICOMP) 230 , 2251 , 2252 F34002061 F3400207C YEARS EQUAL, CHECK MONTH AND DAY. F3400208 2251 CALL CCSCST ( DT, 1, 4, DEQREC, J+1015, 4, ICOMP ) F3400209C TODAY'S DATE MUST BE EQUAL OR PAST PROMISED TO BE DUE FOR F3400210C CHECK. F3400211 IF ( ICOMP .LT. 0 ) GO TO 230 F34002121 F3400213C PROMISE DUE TO BE CHECKED. SEE IF LAST PAYMENT AMOUNT CLEARS F3400214C PROMISED AMOUNT. F3400215 2252 CALL CCSCST ( DEQREC, J+LAMT-1, 9, DEQREC, J+1021, 9, ICOMP ) F3400216 IF ( ICOMP .LT. 0 ) GO TO 224 F34002171 F3400218C LAST PAYMENT CLEARS PROMISE. VERIFY PAYMENT RECEIVED AFTER F3400219C COMMITMENT DATE. F3400220 CALL CCSCST ( DEQREC, J+LDATE+3, 2, DEQREC, J+1044, 2, ICOMP ) F3400221C BEFORE CHK FURTHER AFTER F3400222 IF (ICOMP) 224 , 2253 , 2254 F34002231 F3400224C YEARS EQUAL, CHECK MONTH AND DAY. F3400225 2253 CALL CCSCST ( DEQREC, J+LDATE-1, 4, DEQREC, J+1040, 4, ICOMP ) F3400226C PAYMENT DATE MUST BE PAST COMMITMENT DATE FOR KEPT PROMISE. F3400227 IF ( ICOMP .LT. 0 ) GO TO 224 F3400228C***************************************************************138*A018F34002292 F3400230C PROMISE KEPT, INCREMENT THE KEPT COUNT F3400231C***************************************************************138*A018F3400232 2254 DEQREC(K+518) = AND(DEQREC(K+518),$FF0F) + $31 F3400233C***************************************************************138*A018F3400234 IF ( AND(DEQREC(K+518),$FF) .GT. $39 ) c  3=OAL =OO LA 400043C**** SET UP THE PRIORITY PARAMETER CHARACTER LENGTHS MAX. = 6 F3400044C IF UNUSED MUST BE ZERO (0) F340004539400030053 00011216790005 39400286952 00011216790005 39400507753 00011216790005 39400589256 00011216790005 39400653359 00011216790005 39400703253 00011216790005 39400743754 00011216790005 39400822053 00011216790005 39400853850 00011216790005 39401103750 00011218790005 39402167457 00011218790005 39406510959 00011218790005 39420112352 00011218790005 39400052255 00021216790006 39400375359 00021216790006 39400533551 00021216790006 39400619459 00021216790006 39400663358 00021216790006 39400721651 00021216790006 39400746351 00021216790006 39400823952 00021216790006 39400869856 00021218790006 39401268751 00021218790006 39402260153 00021218790006 39408096353 00021218790006 39400054657 00031216790007 39400393758 00031216790007 39400549052 00031216790007 39400637055 00031216790007 39400672458 00031216790007 39400729555 00031216790007 39400761251 00031216790007 39400828753 00031216790007 39400932357 00031218790007 39401537056 00031218790007 39402273255 00031218790007 39408437250 00031218790007 39400015351 0003121879 39400186459 00041216790008 39400396058 00041216790008 39400558053 00041216790008 39400644051 00041216790008 39400691458 00041216790008 39400733151 00041216790008 39400814852 00041216790008 39400842051 00041216790008 39400989050 00041218790008 39401649752 00041218790008 39404773658 00041218790008 39408758457 00041218790008 __0 CALL CLEAR ( ASNREQ, ADATA, ISTAT ) F3400071 IF (ISTAT.GE.0) GO TO 110 F3400072 CALL FILERR ( ADATA, 1, ISTAT, LU ) F3400073 GO TO 900 F3400074 110 CALL OPENFL ( ASNREQ, ADATA, ISTAT ) F3400075 IF (ISTAT.GE.0) GO TO 200 F3400076 CALL FILERR ( ADATA, 3, ISTAT, LU ) F3400077 GO TO 900 F3400078. F3400079C READ RECORDS FROM THE LADLQMST AND PROCESS F3400080 200 CALL GETS ( DEQREQ, DEQREC, I, ISTAT ) F3400081C EOF? F3400082 IF (AND(ISTAT,$8100).EQ.$8100) GO TO 900 F3400083 IF (AND(ISTAT,$100).EQ.$100) EFG = 1 F3400084C FILE ERROR? F3400085 IF (ISTAT.GE.0) GO TO 210 F3400086 CALL FILERR ( DDATA, 14, ISTAT, LU ) F3400087 GO TO 900 F3400088 210 DO 300 I = 1 , NUMREC F3400089 L = 40*M - 39 F3400090 K = 1000*I-999 a  3=c F3400091 J = 2*K-1 F3400092C RECORD PRESENT? F3400093 IF (DEQREC(K).EQ.$2020.OR. F3400094 1 DEQREC(K).EQ.FDEL) GO TO 300 F3400095C RECORD ACTIVE? F3400096 IF (AND(DEQREC(K+152),$FF).NE.$20) GO TO 300 F34000971 F3400098C GET THE MOST RECENT ACTIVITY F3400099C***************************************************************138*A023F3400100 IOSW = $3031 F3400101C***************************************************************138*A023F3400102 CALL GETACF ( STG, DEQREC(K+153), LTHACT, IOSW ) F34001032 F3400104C REASSIGN QUEUE ALLOWED? F3400105 IF (AND(DEQREC(K+146),$FF).NE.$20) GO TO 220 F34001061 F3400107. F3400108C**** SET UP THE PARAMETERS FOR QUEUE ASSIGNMENT : F3400109C - THE MOST RECENT ACTION CODE IS IN : STG(4) F3400110C - RESULT CODE IS IN : STG(5) F3400111C - CONTACT DATE STARTS IN : STG(1) F3400112C - THE SYSTEM DATE STARTS IN : DT(1) F34001133 F3400114C PARAMETER #1 F3400115 CALL CCSMVA ( DEQREC, QUEP(1)+J-1, QUEL(1), QUE, 1, 6 ) F34001161 F3400117C PARAMETER #2 F3400118 CALL CCSMVA ( DEQREC, QUEP(2)+J-1, QUEL(2), QUE, 7, 6 ) F34001191 F3400120C PARAMETER #3 F3400121 CALL CCSMVA ( DEQREC, QUEP(3)+J-1, QUEL(3), QUE, 13, 6 ) F34001221 F3400123C PARAMETER #4 F3400124 CALL CCSMVA ( DEQREC, QUEP(4)+J-1, QUEL(4), QUE, 19, 6 ) F34001251 F3400126C PARAMETER #5 F3400127 CALL CCSMVA ( DEQREC, QUEP(5)+J-1, QUEL(5), QUE, 25, 6 ) F34001281 F3400129C PARAMETER #6 F3400130 CALL CCSMVA ( DEQREC, QUEP(6)+J-1, QUEL(6), QUE, 31, 6 ) F34001311 F3400132C PARAMETER #7 F3400133 CALL CCSMVA ( DEQREC, QUEP(7)+J-1, QUEL(7), QUE, 37, 6 ) F34001341 F3400135C PARAMETER #8 F3400136 CALL CCSMVA ( DEQREC, QUEP(8)+J-1, QUEL(8), QUE, 43, 6 ) F34001371 F3400138C PARAMETER #9 #  3=w F3400139 CALL CCSMVA ( DEQREC, QUEP(9)+J-1, QUEL(9), QUE, 49, 6 ) F3400140. F3400141C GET THE NEW QUEUE F3400142 CALL LFTND1 ( QUE, NQUE ) F3400143C NEW QUEUE? F3400144 IF (NQUE(1).EQ.DEQREC(K+135).AND. F3400145 1 NQUE(2).EQ.DEQREC(K+136)) GO TO 220 F3400146C QUEUE RETURN SUCCESSFUL? F3400147 IF (NQUE(1).EQ.$3939.AND. F3400148 1 NQUE(2).EQ.$3939) GO TO 220 F3400149C SAVE OLD QUEUE , DATE , AND NEW QUEUE F3400150 CALL CCSMVA ( DEQREC, J+270, 4, DEQREC, J+295, 4 ) F3400151 CALL CCSMVA ( DT, 1, 6, DEQREC, J+299, 6 ) F3400152 CALL CCSMVA ( NQUE, 1, 4, DEQREC, J+270, 4 ) F34001532 F3400154C GET THE NEW PRIORITY F3400155 220 CONTINUE F3400156. F3400157C**** SET UP THE PARAMETERS FOR THE PRIORITY ASSIGNMENT - F3400158C - THE MOST RECENT ACTION CODE IS IN : STG(4) F3400159C - RESULT CODE IS IN : STG(5) F3400160C - CONTACT DATE STARTS IN : STG (1) F3400161C - THE SYSTEM DATE STARTS IN : DT(1) F34001622 F3400163C PARAMETER #1 F3400164 CALL CCSMVA ( DEQREC, PRIP(1)+J-1, PRIL(1), PRI, 1, 6 ) F34001651 F3400166C PARAMETER #2 F3400167 CALL CCSMVA ( DEQREC, PRIP(2)+J-1, PRIL(2), PRI, 7, 6 ) F34001681 F3400169C PARAMETER #3 F3400170 CALL CCSMVA ( DEQREC, PRIP(3)+J-1, PRIL(3), PRI, 13, 6 ) F34001711 F3400172C PARAMETER #4 F3400173 CALL CCSMVA ( DEQREC, PRIP(4)+J-1, PRIL(4), PRI, 19, 6 ) F34001741 F3400175C PARAMETER #5 F3400176 CALL CCSMVA ( DEQREC, PRIP(5)+J-1, PRIL(5), PRI, 25, 6 ) F34001771 F3400178C PARAMETER #6 F3400179 CALL CCSMVA ( DEQREC, PRIP(6)+J-1, PRIL(6), PRI, 31, 6 ) F34001801 F3400181C PARAMETER #7 F3400182 CALL CCSMVA ( DEQREC, PRIP(7)+J-1, PRIL(7), PRI, 37, 6 ) F34001831 F3400184C PARAMETER #8 F3400185 CALL CCSMVA ( DEQREC, PRIP(8)+J-1, PRIL(8), PRI, 43, 6 ) F34001861  3 AL P$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm$ JOB,J002,LA D 1700 MASS STORAGE OPERATING SYSTEM VERSION 5.0 DATE OF RUN: 01/22/80 SYSTEM ID: PRODUCT TEST CYCLE NO. 1 (08/28/79) D JJJ 00000000000 00000000000 22222222222 D JJJ 0000000000000 0000000000000 2222222222222 D JJJ 0000000000000 0000000000000 2222222222222 D JJJ 000 000 000 000 222 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ JJJ 000 000 000 000 222 D JJJJJJJJJJJJJ 0000000000000 0000000000000 2222222222222 D JJJJJJJJJJJJJ 0000000000000 0000000000000 2222222222222 D JJJJJJJJJJJ 00000000000 00000000000 2222222222222 D $*K,P2 $*RPGII Z  3   H1 RPG II COMPILER PAGE 0001 H H 0001 H LRPP00 H 0002 FLAUTIFILIC F 80R04AI 1 DISK  H 0003 FLAPGEXTRIPE F 132 DISK  H 0004 FPRINT O F 132 PRINTER  H 0005 E HDR 3 40  H 0006 ILAUTIFILAA 01  H 0007 I 5 44 HEADER  H 0008 ILAPGEXTRBB 02  H 0009 I 00010016 MACCT  H 0010 I 00170046 MNAM  H 0011 I 00470106 LAADR1  H 0012 I 010701152LADUE  H 0013 C BEGIN TAG  H 0014 C 50 GOTO AROUND  H 0015 C MOVE 'HDR1' UTKEY 4  H 0016 C UTKEY CHAINLAUTIFIL 11  H 0017 C MOVEAHEADER HDR,1  H 0018 C MOVE 'HDR2' UTKEY 4  H 0019 C UTKEY CHAINLAUTIFIL 11  H 0020 C MOVEAHEADER HDR,2  H 0021 C MOVE 'HDR3' UTKEY 4  H 0022 C UTKEY CHAINLAUTIFIL  H 0023 C MOVEAHEADER HDR,3  H 0024 C S|;  3 ETON 50  H 0025 C SETON 303132  H 0026 C Z-ADD0 T001 112  H 0027 C Z-ADD0 TRCNT0 50  H 0028 C Z-ADD63 LNCNT 20  H 0029 C AROUND TAG  H 0030 C 40 Z-ADD0 LNCNT  H 0031 C 12 TRCNT0 ADD 1 TRCNT0  H 0032 C 12 T001 ADD HT01 T001  H 0033 C SETOF 193031  H 0034 C SETOF 324012  H 0035 C CKLVL TAG  H 0036 C MOVE LADUE HT01 092  H 0037 C SETON 12  H 0038 C LNCNT ADD 1 LNCNT  H 0039 C LNCNT COMP 40 40  H 0040 C N30 GOTO END  H 0041 C SETON 40  H 0042 C END TAG  H1 RPG II COMPILER PAGE 0002 H H 0043 CLR 12 TRCNT0 ADD 1 TRCNT0  H 0044 CLR 12 T001 ADD HT01 T001  H 0045 CLR SETOF 12  H 0046 CLR EXCPT  H 0047 OPRINT T 2 LR  H 0048 O 12 'FINAL TOTALS'  3 *  H 0049 O T001 A 0123  H 0050 O T 1 LR  H 0051 O 18 'FINAL RECORD COUNT'  H 0052 O TRCNT0Z 25  H 0053 O D 101 40  H 0054 O HDR,1 40  H 0055 O 118 'PAGE'  H 0056 O PAGE Z 123  H 0057 O D 1 40  H 0058 O HDR,2 40  H 0059 O 118 'RUN DATE'  H 0060 O UDATE Y 128  H 0061 O D 1 40  H 0062 O HDR,3 40  H 0063 O D 2 40  H 0064 O 70 'LA REPORT # 4 '  H 0065 O 80 ' '  H 0066 O D 2 40  H 0067 O 0006 'MACCT '  H 0068 O 0023 'MNAM '  H 0069 O 0054 'LAADR1'  H 0070 O 0121 'LADUE '  H 0071 O D 1 12  H 0072 O MACCT 0016  H 0073 O MNAM 0047  H 0074 O LAADR1 0108    3 > H 0075 O LADUE A 0123  H 0076 /*  H H H H THE FOLLOWING INDICATORS WERE SPECIFIED BUT WERE NEVER H USED TO CONDITION OPERATIONS H H 01 02 11 19 31 32 H H1 RPG II COMPILER PAGE 0003 H H H H THE FOLLOWING INDICATORS APPEARED IN THIS PROGRAM H H 01 02 11 12 19 30 31 32 40 50 LR H H H H S O R T E D L A B E L N A M E S H H NAME LINE H H AROUND 29 H BEGIN 13 H CKLVL   3  R35 H END 42 H H H H S O R T E D F I E L D N A M E S H H NAME TYPE LENGTH DP H H HDR A 40 H HEADER A 40 H HT01 N 9 2 H LAADR1 A 60 H LADUE N 9 2 H LNCNT N 2 0 H MACCT A 16 H MNAM A 30 H PAGE N 4 0 H T001 N 11 2 H TRCNT0 N 5 0 H UDATE N 6 0 H UDAY N 2 0 H UMONTH N 2 0 H UTKEY A 4 H UYEAR N 2 0 $*K,P7 $*CATLOG]  3! f  *CATLOG* NAME LRPP00, OWNER  *CATLOG* READY TO INSTALL $*V,7 $*LIBEDT  LIB  IN  *K,I07  IN  *K,P8  IN  *P,F,2,RPGFIL ! R9CNTR 7900 P44 A RPG CCS 3.0 SL-149 ! R9ROOT 799E R36 A RPG CCS 3.0 SL-149 ! R9RPRT 79F1 R37 A RPG CCS 3.0 SL-149 ! R9SAVE 7AA7 R40 A RPG CCS 3.0 SL-149 ! SYSMSG 7B5A A33 A ITOS CCS 3.0 SL-149 ! FMENTP 7CE8 F58 A ITOS CCS 3.0 SL-149 ! FMCALL 7D44 R92 A RPG CCS 3.0 SL-149 ! STRACE 7D4C S06 A RPG CCS 3.0 SL-149 ! LRPP00 7D68 DECK ID *** RPGII OBJECT SUMMARY-117 ! R9ELOC 8411 P57 A RPG CCS 3.0 SL-149  IN  *K,I8  IN  *N,LRPP00,,,B  3" z  IN  *K,I07  IN  *Z $*V $*V,13 $*Z __mmmmmmmmmmmmmmmmmmmmmmmmAL P$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm ENGINEERING FILE INFORMATION LISTING LOGICAL UNIT 01 CORE ALLOCATOR  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 02 SOFTWARE DUMMY DEVICE  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 03 SOFTWARE DUMMY DEVICE  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 04 1810-1 LIAT CRT/PRINTER  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 05 UNDEFINED DEVICE  DATE TIME FAILURE CODE HARDWARE STATUS  18 DEC 79 1344:24 49 FFFF  18 DEC 79 1344:18 48 FFFF  18 DEC 79 1342:28 49 FFFF  18 DEC 79 1342:21 48 FFFF  18 DEC 79 1340:22 49 FFFF  18 DEC 79 1340:16 48 FFFF  18 l  3# DEC 79 1338:25 49 FFFF  18 DEC 79 1338:18 48 FFFF  18 DEC 79 1324:28 49 FFFF  18 DEC 79 1324:21 48 FFFF  18 DEC 79 1316:31 49 FFFF  18 DEC 79 1316:25 48 FFFF  18 DEC 79 1259:25 49 FFFF  18 DEC 79 1259:19 48 FFFF LOGICAL UNIT 06 1860-92 LCTT 9TK MAG TAPE  DATE TIME FAILURE CODE HARDWARE STATUS  22 JAN 80 1628:07 14 A000  18 DEC 79 1157:03 14 A000  18 DEC 79 1147:58 14 A000  17 DEC 79 1626:58 02 A061  17 DEC 79 1053:16 03 A129  17 DEC 79 1040:59 02 A005  17 DEC 79 1032:46 02 A061  17 DEC 79 1031:19 02 A000  17 DEC 79 1027:26 03 A129  09 JAN 80 1530:58 00 A005  05 JAN 80 1446:47 02 A129  05 JAN 80 1439:39 14 A000  05 JAN 80 1414:48 02 A061  05 JAN 80 1406:04 02 A129  20 DEC 79 1434:46 02 A061  20 DEC 79 1429:36 00 A005  19 DEC 79 2040:36 02 A061 /w  3$   19 DEC 79 1655:08 14 A000  19 DEC 79 1648:56 02 A061  19 DEC 79 1636:08 14 A000  19 DEC 79 1631:16 14 A000  19 DEC 79 1406:49 15 A005  19 DEC 79 1406:12 14 A000  19 DEC 79 1406:00 14 A000 LOGICAL UNIT 07 MAGNETIC TAPE SIMULATOR  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 08 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS  09 JAN 80 1540:03 82 0104 LOGICAL UNIT 09 1827-30/60 LINE PRINTER  DATE TIME FAILURE CODE HARDWARE STATUS  22 JAN 80 1708:19 02 0038  22 JAN 80 1704:48 02 0038  18 DEC 79 1055:04 02 0038  17 DEC 79 1449:16 02 0030  17 DEC 79 1449:10 02 0038  16 DEC 79 1552:51 02 0038  17 DEC 79 1109:55 02 0038  17 DEC 79 1108:28 02 0038  17 DEC 79 1034:47 02 0038  17 DEC 79 1020:56 02 0030  17 DEC 79 1011:35 02 0038  15 JAN 80 1053:38 02 0030   3%HALHP LA 550 00010922092801121779B2 122079  092239400388550 00010931093302382144 030980122079 006201039400814852 00040004ALA2031979355276000046199000046199000051557000051557 39400707254 0009 ALA2071179241 000000000 000047946 39402273255 00030003ALA2060379279200000000000000000000000066885000066885 39402260153 00020002ALA2042779316237000040412000040412000091482000091482 39400529450 0009 DEL3060279280 000000000 000051908 39400825759 0009 DEL3121878082 000003868 000003868 39400805652 0008 DEL3011879415 000026723 000026723 39400396058 00040004DEL3121978081367000015940000015940000015940000015940 39400667458 0006 DEL3021879384 000053495 000054832 39408096353 00020002DEL3051079303224000029238000029238000248150000248150 39400577350 0003 DEL3051179302 000000000 000027007 39400853850 00010001DEL3051179302223000000000000000000000006124000006124 39400549052 00030003DEL3011879415336000014507000014507000014507000014507 39400932357 00030003DEL3031079364285000000000000000000000000000000000000 39400733151 00040004DEL3011879415336000009655000009655000009655000009655 39401537056 00030003DEL3042679317238000000000000000000000003438000003438 39400989050 00040004DEL3032979345266000000000000000000000009059000009059 39400691458 00040004DEL3011879415336000007967000007967000007967000007967 39400857257 0009 DEL3051879295 000053042 000053042 39400388550 0009 DEL3060979273 000052613 000128152 39400640851 0002 DEL3041879325 000130479 000165941 39400375359 00020002DEL3021879384305000012549000012549000012549000012549 39404773658 00040004DEL3051879295216000038560000038560000109160000109160 39400533551 00020002DEL3042179322243000084745000084745000219983000219983 39401103750 00010001DEL3042579318239000016923000016923000018971000018971 39406510959 00010001DEL3031879356277000011115000011115000011115000011115 39400558053 00040004DEL3011179422343000000429000000429000000429000000429 39401649752 00040004DEL3060979273194000000000000000000000053500000053500 39400842051 00040004DEL3021879384305000025126000025126000025126000025126 39400054657 00030003DEL3060379279200000000000000000000000002496000002496 39400644051 00040004DEL3061179271192000009745000009745000097667000097667 39400186459 00040004DEL3042079323244000000000000000000000002453000002453 39400663358 00020002DEL3042279321242000078408000078408000098994000098994 39401268751 00020002DEL3051879295216000001534000001534000010524000010524 39400156155 0009 DEL3011879415 000004052 000004052 39400637055 00030003DEL3042679317238000081479000081479000098266000098266 39420112352 00010001DEL3031879356277000037918000037918000038866000038866 39400869856 00020002DEL3021879384305000020661000020661000020661000020661 39400672458 00030003DEL3060379279200000000000000000000000029443000029443 39400052255 00020002DEL3031879356277000044974000044974000046023000046023 39400761251 00030003DEL3031879356277000030999000030999000046124000046124 39400393758 00030003DEL3041879325246000071340000071340000073124000073124 39400729555 00030003DEL3031879356277000005219000005219000005219000005219 39402167457 00010001DEL3060379279200  3&H000032147000032147000073229000073229 39408437250 00030003DEL3051879295216000006046000006046000050044000050044 39400015351 0003 DEL3041879325 000060040 000075541 39400030053 00010001DEL3021879384305000053434000053434000053434000053434 39400703253 00010001DEL3060379279200000000000000000000000091337000091337 39400507753 00010001DEL3051179302223000000000000000000000142443000142443 39400746351 00020002DEL3051079303224000100826000100826000124568000124568 39400823952 00020002DEL3121878082368000012007000012007000012007000012007 39400721651 00020002DEL3021879384305000009715000009715000009715000009715 39400743754 00010001DEL3011879415336000010043000010043000010043000010043 39400822053 00010001DEL3121878082368000002000000002000000002000000002000 39400286952 00010001DEL3031879356277000031445000031445000040517000040517 39400589256 00010001DEL3031879356277000034603000034603000035468000035468 39400653359 00010001DND1122878072358000047152000047152000047152000047152 39408758457 00040004DND1011879415336000077287000077287000077287000077287 39400619459 00020002DND1031879356277000105294000105294000105894000105894 39400828753 00030003DND1051179302223000003794000003794000050204000050204 39400741451 0009 DND1061179271 000000000 000022771 89420501752 00040004DEL3032079354275 000056270000056270 89420899156 00010001DEL3121878082368 000045668000045668 89430300252 00030003DEL3042579318239 000111391000111391 89430300252 0003 DEL3042579239 000111391 89420899156 0001 DEL3121878368 000045668 89420501752 0004 DEL3032079275 000056270 39400577350 0001143114340233GGGGGGGGGGGGGGGGGGGG ALHO yCCS20 290209SAN DIEGO CALIF. MM 39400577350 0001143114350240ADOLF HILTER BOOOOOOOO * BEGIN EXTRACT INPUT=PRFPG003 UTIL CLEAR,FN=PGEXTR EX RPTE03 * EXTRACT COMPLETE * BEGIN SORT INPUT=PRFPG003 DSORT FN=PGEXTR,CCS20 F2=PGEXTR,CCS20, OP=T,F,A KF=A,0001,0016,A,0047,0005 SL=I * SORT COMPLETE * BEGIN PRINT RPTP03 * PRINT COMPLETE PGCNT2 *  3'H INPUT=PRFPG003 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __LAURENCE H 0000004291800002 39400577350 VOLTZ, GAIL A 0000270070600003 39400589256 BORJA, ANTONIO M 0000354680900003 39400619459 ARDIA, RALPH A 0001058940900004 39400637055 BERL, LOUIS 0000982660600001 39400640851 RUTTENBERG, DAVID A 0001659410600002 39400644051 MILLER, BRUCE D 0000976670300002 39400653359 SODHI, JAGJIT 0000471521800003 39400663358 TAYLOR, JIM C 0000989940600004 39400667458 PIERCE, S F 0000548321200006 39400672458 TZOLIS, SOTIRIOS 0000294430300001 39400691458 GALLIER, JIMMY L 0000079671500004 39400703253 SHAPIRO, ETHAN S 0000913370300002 39400707254 HALTERLEIN, DOLORES J 0000479460000009 39400721651 HARVEY, M 0000097151200003 39400729555 KENNEDY, JANET F 0000052190900004 ALdHO CCS20 39400733151 BOLTON, W 0000096551500001 39400015351 00000 39400030053 00000 39400052255 00000 39400054657 00000 39400156155 00000 39400186459 SMOKIT 00000 39400286952 00000 39400375359 00000 39400388550 00000   3(H 39400393758 00000 39400396058 00000 39400507753 00000 39400529450 00000 39400533551 00000 39400549052 00000 39400558053 00000 39400577350 00000 39400589256 00000 39400619459 00000 39400637055 00000 39400640851 00000 39400644051 00000 39400653359 00000 39400663358 00000 39400667458 00000 39400672458 00000 39400691458 00000 39400703253 00000 39400707254 00000 39400721651 00000 39400729555 00000 39400733151 00000 39400741451 00000 39400743754 00000 39400746351 00000 39400761251 00000 39400805652 00000 39400814852 00000 >  3)HMAL;HMP CCS20 00008 * THE TRANSACTION FILE WILL BE SORTED FOR THE COLLECTORS REPORT 00009INPUT=PRFDC010 030980122079 39402260153 00040003ALA2042779316233000040412000040412000091482000091482 39400707254 0009 ALA2071179241 000000000 000047946 39401066353 00020003ALA2061179271188000000000000000000000027032000027032 39402273255 00030002ALA2060379279196000000000000000000000066885000066885 39402270053 0009 ALA2061179271 000000000 000081312 39400814852 00010004ALA2031979355272000046199000046199000051557000051557 39401057352 0003 DEL3041879325 000054001 000055351 39400746351 00030002DEL3051079303220000100826000100826000124568000124568 39400869856 00030003DEL3021879384301000020661000020661000020661000020661 39400935152 00020003DEL3121878082364000007457000007457000007457000007457 39400186459 00030004DEL3042079323240000000000000000000000002453000002453 39400761251 00040003DEL3031879356273000030999000030999000046124000046124 39400015351 0003 DEL3041879325 000060040 000075541 39401635256 00020004DEL3011879415332000070895000070895000070895000070895 39400529450 0009 DEL3060279280 000000000 000051908 39400932357 0009 DEL3031079364 000000000 000000000 39400691458 0009 DEL3011879415 000007967 000007967 39404835853 0006 DEL3022279380 000000000 000000615 39400743754 00020001DEL3011879415332000010043000010043000010043000010043 39400054657 00020003DEL3060379279196000000000000000000000002496000002496 39400859451 00020002DEL3121878082364000031147000031147000031147000031147 39400672458 00010003DEL3060379279196000000000000000000000029443000029443 39400644051 00020004DEL3061179271188000009745000009745000097667000097667 39404853153 00030003DEL306097927319000000000000000000000000200}00000200} 39400507753 00040001DEL3051179302219000000000000000000000142443000142443 39402258553 00030002DEL3041879325242000050868000050868000052140000052140 39400729555 00040003DEL3031879356273000005219000005219000005219000005219 39402034558 00040002DEL3041179332249000067004000067004000068629000068629 39400663358 00040002DEL3042279321238000078408000078408000098994000098994 39401209557 00040001DEL3011879415332000008011000008011000008011000008011 39402272158 00020001DEL3042279321238000013800000013800000016425000016425 39408096353 00010001DEL3051079303220000029238000029238000248150000248150 39401267852 00010002DEL3011879415332000017556000017556000017556000017556 39400925252 00010001DEL3021879384301000023989000023989000026559000026559 39400637055 00010003DEL3042679317234000081479000081479000098266000098266 39400897055 0009 DEL3121878082 000150966 000150966 39400667458 0006 DEL3021879384 000053495 000054832 39404773658 0009 DEL3051879295 000038560 000109160 39400286952 00040001DEL3031879356273000031445000031445000040517000040517 39400640851 0002 DEL3041879325 000130479 000165941 39402574959 00010004DEL3042779316233000013322000013322000032688000032688 39400396058 00030004DEL3121978081363000015940000015940000015940000015940 39400721651 00030002DEL3021879384301000009715000009715000009715000009715 39408264050 0002 DEL3051079303 v  3*Ha000058591 000090827 39400805652 0008 DEL3011879415 000026723 000026723 39401538252 00010003DEL3060379279196000033800000033800000071300000071300 39400842051 00040004DEL3021879384301000025126000025126000025126000025126 39400989050 00040001DEL3032979345262000000000000000000000009059000009059 39401537056 00040002DEL3042679317234000000000000000000000003438000003438 39400703253 00020001DEL3060379279196000000000000000000000091337000091337 39406510959 00040004DEL3031879356273000011115000011115000011115000011115 39402276951 00040003DEL3041879325242000042925000042925000050917000050917 39404799356 00020002DEL3031879356273000012813000012813000012813000012813 39400388550 0009 DEL3060979273 000052613 000128152 39400822053 0009 DEL3121878082 000002000 000002000 39400549052 0009 DEL3011879415 000014507 000014507 39401268751 0001 DEL3051879295 000001534 000010524 39402088455 0009 DEL3061079272 000028543 000058911 39400156155 0009 DEL3011879415 000004052 000004052 39402167457 0009 DEL3060379279 000032147 000073229 39420229750 0004 DEL3011879415 000018778 000018778 39400977857 00030004DEL3050379310227000017345000017345000065691000065691 39400589256 00030001DEL3031879356273000034603000034603000035468000035468 39401649752 00030001DEL3060979273190000000000000000000000053500000053500 39400393758 00020003DEL3041879325242000071340000071340000073124000073124 39400030053 00010001DEL3021879384301000053434000053434000053434000053434 39400733151 00010004DEL3011879415332000009655000009655000009655000009655 39400533551 00010002DEL3042179322239000084745000084745000219983000219983 39400823952 00020002DEL3121878082364000012007000012007000012007000012007 39401273454 00020004DEL3122978071353000009766000009766000009766000009766 39402116850 00010003DEL3041879325242000002081000002081000002081000002081 39400375359 00010002DEL3021879384301000012549000012549000012549000012549 39402261052 00010004DEL3031079364281000055286000055286000056793000056793 39400853850 00010001DEL3051179302219000000000000000000000006124000006124 39401055455 00010002DEL3061179271188000000000000000000000020906000020906 39400957255 0009 DEL3061079272 000000000 000162282 39400052255 0005 DEL3031879356 000044974 000046023 39400825759 0009 DEL3121878082 000003868 000003868 39400857257 0009 DEL3051879295 000053042 000053042 39401103750 00030004DEL3042579318235000016923000016923000018971000018971 39400558053 00020004DEL3011179422339000000429000000429000000429000000429 39401357752 0009 DEL3011079423 000099802 000099802 39420112352 00030004DEL3031879356273000037918000037918000038866000038866 39401258950 0003 DEL3042079323 000000000 000001749 39401586152 0003 DEL3050279311 000081500 000137105 39408736255 0003 DEL3031879356 000030921 000031694 39400577350 0003 DEL3051179302 000000000 000027007 39402277058 0001 DEL3051879295 000100000 000102500 39400619459 00040002DND1031879356273000105294000105294000105894000105894 39408758457 00020003DND1011879415332000077287000077287000077287000077287 39400741451 0009 DN  3+HuD1061179271 000000000 000022771 39402190350 00020001DND1042779316233000043200000043200000109500000109500 39402256359 0002 DND1050979304 000000000 000089675 39400879657 00040004DND1021879384301000047787000047787000049162000049162 39400653359 00030001DND1122878072354000047152000047152000047152000047152 39401460655 00030001DND1052979284201000000000000000000000025861000025861 39400828753 00030003DND1051179302219000003794000003794000050204000050204 89430476755 00030009ALA2061179271188000000000000000000000348377000348377 89426422854 0004 ALA2020979393 000025642 000030321 89420945058 00040002ALA2062879254171000000000000000000000092246000092246 89420970858 0002 ALA2050979304 000060000 000133158 89430397159 00020009DEL3060379279196000000000000000000000011227000011227 89420427750 00010003DEL3032579349266000040433000040433000041819000041819 89420754054 0001 DEL3021879384 000028380 000029090 89430258658 00010009DEL3061079272189000000000000000000000076390000076390 89420445059 0002 DEL3031879356 000000600 000000600 89430336157 0005 DEL3040979334 000030000 000031213 89430683053 0009 DEL3011879415 000019754 000019754 89420836950 0003 DEL3030979365 000018305 000018888 89430758459 0003 DEL3051179302 000000000 000037238 89420304652 0001 DEL3041179332 000000000 00000495} 89420881154 0004 DEL3041879325 000053339 000054672 89420628654 00030002DEL3031879356273000031573000031573000032362000032362 89420306954 00040002DEL3060279280197000000000000000000000067802000067802 89420875354 00030004DEL3011879415332000010296000010296000010296000010296 89420576051 0003 DEL3022279380 000000000 000000879 89423144055 00020001DEL3051879295212000006813000006813000137964000137964 89420919251 0001 DEL3011879415 000021901 000021901 89430730151 00010009DEL3021879384301000000029000000029000000029000000029 89420792856 00010001DEL3011879415332000015187000015187000015187000015187 89430266255 0003 DEL3041879325 000051387 000054215 89423093054 0003 DEL3050279311 000000000 000069701 89430190752 0009 DEL3061179271 000068962 000091445 89420797855 0002 DEL3031879356 000034574 000064188 89420844756 00020003DEL3031879356273000002274000002274000002274000002274 89430480757 0002 DEL3041979324 000000000 000001321 89430194952 00040004DEL3051879295212000000600000000600000000600000000600 89430703851 00040008DEL3011879415332000033623000033623000033623000033623 89420638356 0004 DEL3051079303 000049271 000068370 89420764558 00040004DND1061079272189000029284000029284000162813000162813 89420602154 00020001DND1031879356273000127011000127011000127011000127011 89420960255 00010003DND1020979393310000000000000000000000007493000007493 89426148855 00030002DUES021879384301000001000000001000000001000000001000 128039402256359 SP01128039402270053 WP01128039402277058 RP01128039404773658 WP01128039404835853 SP01128039408437250 SP011280AL HPCCS20 420501752 WP01128089420723950 SP01128089420817257 RP01128089420899156 WP01128089420976954 SP01128089430117953 RP01128089430300252 WP011280m  3,H000100020003/0004F__ DAQUE CCS20 012280 00150DEFINE,FN=LAPRCWRK,LR=80,NR=50 00160EX 00170LPGGEN 00180 * THE REPORT GENERATOR PROGRAMS HAVE BEEN CREATED 00190 * THE REPORT GE0001000200030004__ 400052255 0003 DEL3031879273 000044974 000046023 39400729555 0003 DEL3031879273 000005219 000005219 39400156155 0001 DEL3011879332 000004052 000004052 39400828753 0002 DND1051179219 000003794 000050204 39400653359 0003 DND1122878354 000047152 000047152 39400741451 0001 DND1061179188 000000000 000022771 39400619459 0003 DND1031879273 000105294 000105894 BE EXECUTED 00004 * ALHO LA 00005 **** OPERATOR - YOU CAN ADD, UPDATE OR DELETE UTILITY FILE RECORDS 00006 * FROM THE CONSOLE 39400052255 00031152115301121879B1C403 121679H122079000040000  115239400396058 00031157115901121879B1C203 121679H122079000007500  115739400549052 0003115912010291COW DIED 39400577350 00011049105401121879B1C103WENT OUT OF TOWN 121679H122079000015000  104939400619459 00031202120401121879B1C301AFTER BURING COW WILL SEND CHECK 121679H122079000075000  120239400640851 000110541056023923   3-H 39400640851 00011054105501121879B2C4 122079  105439400640851 00011054105602387142336666 39400653359 0003120412050291DOG BIT WIFE 39400741451 0001105610570291WIFE DIED 39400805652 00011057105901121879B3C302GOT A NEW JOB 122579B122079000026723  105739400825759 0001105911010239NONE 39400825759 000110591100023492116 9216 39400825759 00011059110002349216 39400825759 00011059110002367142803287 39400825759 00011059110102387144669877 39400825759 0001105911000233SAN DIEGO, CA. 39400825759 00011059110002321247 B ST 39400825759 0001105911000231JOE BLOW 39400857257 00011101110501121879B4PP01 122279H1220790000100001220790000500110139400186459 0001100510070291WIFE IS EASY ALHP LA 550 00010922092801121779B2 122079  092239400388550 00010931093302382144 030980122079 006201039400814852 00040004ALA2031979355276000046199000046199000051557000051557 39400707254 0009 ALA2071179241 000000000 000047946 39402273255 00030003ALA2060379279200000000000000000000000066885000066885 39402260153 00020002ALA2042779316237000040412000040412000091482000091482 39400529450 0009 DEL3060279280 000000000 000051908 39400825759 0009 DEL3121878082 000003868 000003868 39400805652 0008 DEL3011879415 000026723 000026723 39400396058 00040004DEL3121978081367000015940000015940000015940000015940 39400667458 0006 DEL3021879384 000053495 000054832 39408096353 00020002DEL3051079303224000029238000029238000248150000248150 39400577350 0003 DEL3051179302 000000000 000027007 39400853850 00010001DEL3051179302223000000000000000000000006124000006124 39400549052 00030003DEL3011879415336000014507000014507000014507000014507 39400932357 00030003DEL3031079364285000000000000000000000000000000000000 39400733151 00040004DEL3011879415336000009655000009655000009655000009655 39401537056 00030003DEL3042679317238000000000000000000000003438000003438 39400989050 00040004DEL3032979345266000000000000000000000009059000009059 39400691458 00040004DEL301187941533600000796700000796700  3.H0007967000007967 39400857257 0009 DEL3051879295 000053042 000053042 39400388550 0009 DEL3060979273 000052613 000128152 39400640851 0002 DEL3041879325 000130479 000165941 39400375359 00020002DEL3021879384305000012549000012549000012549000012549 39404773658 00040004DEL3051879295216000038560000038560000109160000109160 39400533551 00020002DEL3042179322243000084745000084745000219983000219983 39401103750 00010001DEL3042579318239000016923000016923000018971000018971 39406510959 00010001DEL3031879356277000011115000011115000011115000011115 39400558053 00040004DEL3011179422343000000429000000429000000429000000429 39401649752 00040004DEL3060979273194000000000000000000000053500000053500 39400842051 00040004DEL3021879384305000025126000025126000025126000025126 39400054657 00030003DEL3060379279200000000000000000000000002496000002496 39400644051 00040004DEL3061179271192000009745000009745000097667000097667 39400186459 00040004DEL3042079323244000000000000000000000002453000002453 39400663358 00020002DEL3042279321242000078408000078408000098994000098994 39401268751 00020002DEL3051879295216000001534000001534000010524000010524 39400156155 0009 DEL3011879415 000004052 000004052 39400637055 00030003DEL3042679317238000081479000081479000098266000098266 39420112352 00010001DEL3031879356277000037918000037918000038866000038866 39400869856 00020002DEL3021879384305000020661000020661000020661000020661 39400672458 00030003DEL3060379279200000000000000000000000029443000029443 39400052255 00020002DEL3031879356277000044974000044974000046023000046023 39400761251 00030003DEL3031879356277000030999000030999000046124000046124 39400393758 00030003DEL3041879325246000071340000071340000073124000073124 39400729555 00030003DEL3031879356277000005219000005219000005219000005219 39402167457 00010001DEL3060379279200000032147000032147000073229000073229 39408437250 00030003DEL3051879295216000006046000006046000050044000050044 39400015351 0003 DEL3041879325 000060040 000075541 39400030053 00010001DEL3021879384305000053434000053434000053434000053434 39400703253 00010001DEL3060379279200000000000000000000000091337000091337 39400507753 00010001DEL3051179302223000000000000000000000142443000142443 39400746351 00020002DEL3051079303224000100826000100826000124568000124568 39400823952 00020002DEL3121878082368000012007000012007000012007000012007 39400721651 00020002DEL3021879384305000009715000009715000009715000009715 39400743754 00010001DEL3011879415336000010043000010043000010043000010043 39400822053 00010001DEL3121878082368000002000000002000000002000000002000 39400286952 00010001DEL3031879356277000031445000031445000040517000040517 39400589256 00010001DEL3031879356277000034603000034603000035468000035468 39400653359 00010001DND1122878072358000047152000047152000047152000047152 39408758457 00040004DND1011879415336000077287000077287000077287000077287 39400619459 00020002DND1031879356277000105294000105294000105894000105894 39400828753 00030003DND1051179302223000003794000003794000050204000050204 39400741451 0009 DND1061179271 000000000 000022771 89420501752 00040004DEL3032079354275 000056270000056270 89420899156 00010001DEL3121878082368 000045668000045668 89430300252 00030003DEL3042579318239 000111391000111391 89430300252 0003 DEL3042579239 m  3/H 000111391 89420899156 0001 DEL3121878368 000045668 89420501752 0004 DEL3032079275 000056270 39400577350 0001143114340233GGGGGGGGGGGGGGGGGGGG ALHO yCCS20 290209SAN DIEGO CALIF. MM 39400577350 0001143114350240ADOLF HILTER BOOOOOOOO * BEGIN EXTRACT INPUT=PRFPG003 UTIL CLEAR,FN=PGEXTR EX RPTE03 * EXTRACT COMPLETE * BEGIN SORT INPUT=PRFPG003 DSORT FN=PGEXTR,CCS20 F2=PGEXTR,CCS20, OP=T,F,A KF=A,0001,0016,A,0047,0005 SL=I * SORT COMPLETE * BEGIN PRINT RPTP03 * PRINT COMPLETE PGCNT2 INPUT=PRFPG003 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __LAURENCE H 0000004291800002 39400577350 VOLTZ, GAIL A 0000270070600003 39400589256 BORJA, ANTONIO M 0000354680900003 39400619459 ARDIA, RALPH A 0001058940900004 39400637055 BERL, LOUIS 0000982660600001 39400640851 RUTTENBERG, DAVID A 0001659410600002 39400644051 MILLER, BRUCE D 0000976670300002 39400653359 SODHI, JAGJIT 0000471521800003 39400663358 TAYLOR, JIM C 0000989940600004 39400667458 PIERCE, S F 0000548321200006 Q  30T ALUT O z$$ 00025LTR1 00026LTR2 **** OPERATOR - A JOB WILL BE BATCHED IN THIS PROCEDURE TO PURGE THE 00001 * THE PROGRAM LIBRARY. THE BATCH HOST MUST BE ACTIVE 00002 * BEFORE PROCEDDING. TO ACTIVATE THE BATCH HOST, 00003 * PERFORM 00004 * MI, *BATCH,F 00005 * 00006 * RESPOND: 'N' CARRIAGE RETURN - IF BATCH HOST IS NOT ACTIVE 00007 * 00008 * CARRAIGE RETURN ONLY - TO CONTINUE 00009CCSPAS 00010 * THE DATA FILES WILL BE CLEARED 00011CLRFIL 00012 * THE FILES WILL BE INITIALIZED FOR START OF PARAMETERIZATION 00013INPUT=PRFSC009 00014QTIL 00015LOAD,FN=UTIFIL,OW=CCS20 00016HDR1 00017HDR2 00018HDR3 00019RSW1 00020ACTC 00021RESC 00022SALC 00023DALT 00024LTRF 00025LTR1 00026LTR2 00027SMTH 00028TMTH 00029UPDY 00030OLPM 00031RPTG RPT001 00032/! 00033LOAD,FN=ACCAGE,OW=CCS20 00034 00035/! 00036EX 00037 ***** OPERATOR - WHEN THIS SELECTION IS COMPLETE, USE THE UTILITY 00038 * COMMAND 'BATS' TO CHECK THE PROGRESS OF THE JOB 00039 * NUMBER LISTED BELOW. WHEN THE STATUS IS NO LONGER 00040 * 'BEING SENT', USE THE UTILITY COMMAND 'PRINT' TO 00041 * PRINT THE JOB. VERIFY THE JOB COMPLETED WITHOUT 00042 * ERROR. 00043 * 00044INPUT=PRFSC009 00045UTIL T  31T  00046BATCH,FN=DISCQT,TY=N 00047DELETE,FN=DMDLQMST 00048DELETE,FN=DMCOSIGN 00049DELETE,FN=DMRPTTBL 00050DELETE,FN=DMACTVTB 00051DELETE,FN=DMUTIFIL 00052DELETE,FN=DMSCNDSC 00053DELETE,FN=DMSCNFIL 00054DELETE,FN=DMDECTBL 00055DELETE,FN=DMLTRFIL 00056DELETE,FN=DMLTRDSC 00057DELETE,FN=DMNEWS 00058DELETE,FN=DMACCAGE 00059DELETE,FN=DMSUMHIS 00060DELETE,FN=DMTAPARC 00061DELETE,FN=DISCQT 00062DELETE,FN=PRFSC001 00063DELETE,FN=PRFSC002 00064DELETE,FN=PRFSC003 00065DELETE,FN=PRFSC004 00066DELETE,FN=PRFSC005 00067DELETE,FN=PRFSC006 00068DELETE,FN=PRFSC007 00069DELETE,FN=PRFSC008 00070EX 00071 * CCS SYSTEM FILES ARE READY FOR PARAMETERIZATION 00072MNUPRO 00073__mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm7  32T4mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm  33THmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmALjTOO $$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm__TmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmALjTVO $$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm **** OPERATOR - A JOB WILL BE BATCHED IN THIS PROCEDURE TO PURGE THE 00001 * THE PROGRAM LIBRARY. THE BATCH HOST MUST BE ACTIVE 00002 * BEFORE PROCEEDING. TO ACTIVATE THE BATCH HOST, 00003 * PERFORM 00004 * MI, *BATCH,F 00005 * 00006 * RESPOND: 'N' CARRIAGE RETURN - IF BATCH HOST IS NOT ACTIVE 00007 * 00008 * CARRAIGE RETURN ONLY - TO CONTINUE 00009CCSPAS 00010 * THE DATA FILES WILL BE CLEARED 00011CLRFIL 00012,  34TaAL {TaO CCS20 00025LTR1 00026LTR2 39400052255 00020919093601121879A1PP02 010180H121979000015050-30790000505091939400746351 00020944095501121879A1PP03 010180B121979000124568130790000750094439400663358 00021151120201121879A4 03 122179B123079000070000  L115139400663358 00021151115601121879A3 122879 9  0115139400186459 0004083808590242LA JOLLA CA. LAJOLLA 39400186459 0004083808560242LAJOLLA 139400186459 00040838085402477149872476 #39400186459 0004083808520241333 FU ST ,39400186459 00040838085102465678 39400186459 0004083808490240VICKI2 39400186459 00040838084902459999999999 539400186459 0004083808400207SMOKIT 39402277058 0004090609120214090742 **CB01 239400052255 0002091909260293IT 39400052255 0002091909250291SCR LAST NITE HE DID IT 39400052255 0002091909250292EW 639400052255 0002091909230291LAST NITE HE DID IT ;39400746351 00020944095702911ST 03 LETTER ;39400663358 00021049105702442 139400663358 000210491056024396705 39400663358 0002104910560242SD 39400663358 0002104910550241999 C ST 639400663358 0002104910540240MMMMMMMMMMMMMMMMMMMMMMMMMMMMMM 39400030053 0001114711480291CORKEY HAS IT 939400054657 0003120512080268000007000 __1209557 00011414144501121779A2R101SENDING LETTER TO COS1. PREVIOUS ENTRY INCORRECT NO LET 12277911225800000025001  L141439401209557 00011414144201121779A2PP SENDING LETTER TO 2  35TuCOSIGNER 1 122779 25790000250141439400507753 00011500150801121779A3R4 JKJKJKJKJKJKJKJKJ 121979  L150039400507753 00011500150801121779A2R4 121879   3150039400507753 00011500150701121779A2R4 FGFGFGF 121879 4  2150039400507753 00011500150701121779A1PP01 122779H 25790000501150039400507753 00011500150601121779A2R1 COMMENT 121679 /  0150039404773658 00011523152401121779A1PP01 122779H 25790000780152339404773658 00021534153401121779A2PP 122879 26790000250153439404773658 00021536153701121779A1PP01 122279H 20790000900153439404773658 00021538153901121779A2PP 122179 19790000500153439404773658 00021540154101121779A1PP01 122079H 18790000200153439404773658 00021552155201121779A1R102TEST COMMENT 122079B %  153439401267852 00021553155301121779A3R4 121979 9  155339402258553 00021554155501121779A3R4 121979   155439402034558 00021554155401121779A3R4 121979 /  155439401537056 00021554155401121779A3R4 121979 )  155439404799356 00021555155601121779A3R4 121979  155539402273255 00021555155501121779A3R4 121979 .  155539404773658 00021556155701121779A3R4 121979   153439400286952 00010838084602396 /39400286952 00010838084602387142997777 39400286952 00010838084502362811234 *39400286952 000108380845023492116 CA. 9 39400286952 00010838084502367142811234 2811234 939400286952 0001083808450233SAN DIEGO, CA. SAN DIEGO 39400286952 0001083808440234CA. 9 SAN D 739400286952 0001083808440233SAN DIEGO APT. #1 (39400286952 0001083808440234SAN D SAN D 39400286952 00010838084402324616n  36HALHO LA 00005 **** OPERATOR - YOU CAN ADD, UPDATE OR DELETE UTILITY FILE RECORDS 00006 * FROM THE CONSOLE 39400052255 00031152115301121879B1C403 121679H122079000040000  115239400396058 00031157115901121879B1C203 121679H122079000007500  115739400549052 0003115912010291COW DIED 39400577350 00011049105401121879B1C103WENT OUT OF TOWN 121679H122079000015000  104939400619459 00031202120401121879B1C301AFTER BURING COW WILL SEND CHECK 121679H122079000075000  120239400640851 000110541056023923 39400640851 00011054105501121879B2C4 122079  105439400640851 00011054105602387142336666 39400653359 0003120412050291DOG BIT WIFE 39400741451 0001105610570291WIFE DIED 39400805652 00011057105901121879B3C302GOT A NEW JOB 122579B122079000026723  105739400825759 0001105911010239NONE 39400825759 000110591100023492116 9216 39400825759 00011059110002349216 39400825759 00011059110002367142803287 39400825759 00011059110102387144669877 39400825759 0001105911000233SAN DIEGO, CA. 39400825759 00011059110002321247 B ST 39400825759 0001105911000231JOE BLOW 39400857257 00011101110501121879B4PP01 122279H1220790000100001220790000500110139400186459 0001100510070291WIFE IS EASY ALHP LA 550 00010922092801121779B2 122079  092239400388550 00010931093302382144 030980122079 006201039400814852 00040004ALA2031979355276000046199000046199000051557000051557 39400707254 0009 ALA2071179241 000000000 000047946 39402273255 00030003ALA2060379279200000000000000000000000066885000066885 39402260153 00020002ALA2042779316237000040412000040412000091482000091482 39400529450 0009 DEL3060279280 000000000 000051908 39400825759 0009 DEL3121878082 000003868 000003868 39T%  37H400805652 0008 DEL3011879415 000026723 000026723 39400396058 00040004DEL3121978081367000015940000015940000015940000015940 39400667458 0006 DEL3021879384 000053495 000054832 39408096353 00020002DEL3051079303224000029238000029238000248150000248150 39400577350 0003 DEL3051179302 000000000 000027007 39400853850 00010001DEL3051179302223000000000000000000000006124000006124 39400549052 00030003DEL3011879415336000014507000014507000014507000014507 39400932357 00030003DEL3031079364285000000000000000000000000000000000000 39400733151 00040004DEL3011879415336000009655000009655000009655000009655 39401537056 00030003DEL3042679317238000000000000000000000003438000003438 39400989050 00040004DEL3032979345266000000000000000000000009059000009059 39400691458 00040004DEL3011879415336000007967000007967000007967000007967 39400857257 0009 DEL3051879295 000053042 000053042 39400388550 0009 DEL3060979273 000052613 000128152 39400640851 0002 DEL3041879325 000130479 000165941 39400375359 00020002DEL3021879384305000012549000012549000012549000012549 39404773658 00040004DEL3051879295216000038560000038560000109160000109160 39400533551 00020002DEL3042179322243000084745000084745000219983000219983 39401103750 00010001DEL3042579318239000016923000016923000018971000018971 39406510959 00010001DEL3031879356277000011115000011115000011115000011115 39400558053 00040004DEL3011179422343000000429000000429000000429000000429 39401649752 00040004DEL3060979273194000000000000000000000053500000053500 39400842051 00040004DEL3021879384305000025126000025126000025126000025126 39400054657 00030003DEL3060379279200000000000000000000000002496000002496 39400644051 00040004DEL3061179271192000009745000009745000097667000097667 39400186459 00040004DEL3042079323244000000000000000000000002453000002453 39400663358 00020002DEL3042279321242000078408000078408000098994000098994 39401268751 00020002DEL3051879295216000001534000001534000010524000010524 39400156155 0009 DEL3011879415 000004052 000004052 39400637055 00030003DEL3042679317238000081479000081479000098266000098266 39420112352 00010001DEL3031879356277000037918000037918000038866000038866 39400869856 00020002DEL3021879384305000020661000020661000020661000020661 39400672458 00030003DEL3060379279200000000000000000000000029443000029443 39400052255 00020002DEL3031879356277000044974000044974000046023000046023 39400761251 00030003DEL3031879356277000030999000030999000046124000046124 39400393758 00030003DEL3041879325246000071340000071340000073124000073124 39400729555 00030003DEL3031879356277000005219000005219000005219000005219 39402167457 00010001DEL3060379279200000032147000032147000073229000073229 39408437250 00030003DEL3051879295216000006046000006046000050044000050044 39400015351 0003 DEL3041879325 000060040 000075541 39400030053 00010001DEL3021879384305000053434000053434000053434000053434 39400703253 00010001DEL3060379279200000000000000000000000091337000091337 39400507753 00010001DEL3051179302223000000000000000000000142443000142443 39400746351 00020002DEL3051079303224000100826000100826000124568000124568 39400823952 00020002DEL3121878082368000012007000012007000012007000012007 39400721651 00020002DEL3021879384305000009715000009715000009715000009715 39400743754 00010001DEL3011879415336000010043000010043000010043000  38QMNAM MACCT MACT MACTFGMADL MADLQ MADR1 MADR2 MBAD MBBR MBCS MBEX MBFG MBNM MBPH MBZP MCBAL MCCDT MCMN MCPGD MCS MDLDT MDYDL MEXT MLLAT MLLDT MLON MNADR MNAM MNPA MNXTC MOAMT MOLNAM MOLS !MOPDT "MP1 #MP2 $MP3 %MPAD1 &MPAD2 'MPCS (MPDQ )MPFG *MPHN +MPPA ,MPPB -MPPCD .MPPD /MPPK 0MPQU 1MPRI 2MPTS 3MPYOF 4MPZC 5MQAS 6MQUE 7,MNPA MNXTC MOAMT MOLNAM MOLS !MOPDT "MP1 #MP2 $MP3 %MPAD1 &MPAD2 'MPCS (MPDQ )MPFG *MPHN +MPPA ,MPPB -MPPCD .MPPD /MPPK 0MPQU 1MPRI 2MPTS 3MPYOF 4MPZC 5MQAS 6MQUE 7MRCD 8MSCD 9MSDF :MSLCD ;MSOC MSUP ?MTCD @MTD3 AMTD6 BMTD9 CMTHD DMTP EMUPDT FMZP GMPPA ,MPPB -MPPCD .MPPD /MPPK 0MPQU 1MPRI 2MPTS 3MPYOF 4MPZC 5MQAS 6MQUE 7__8MSCD 9MSDF :MSLCD ;MSOC MSUP ?MTCD @MTD3 AMTD6 BMTD9 CMTHD DMTP EMUPDT FMZP G * FOR NEXT RUN 00028CCSPAS 00029TRENDU 00030INPUT=PRFRP003 00031UTIL Iw 39MAL'MO CCS20 303132 C Z-ADD0 T001 112 C Z-ADD0 T002 MACCT 00010016A ACCOUNT NUMBER MACTFG MACT 03070360A 0 COLLECTOR ACTIVITY BLOCK MACTFG00010001A 0 ACCOUNT TYPE FLAG MADL 02460016A 0 ADDITIONAL ACCOUNT NUMBER MADLQ 08870009TA02AMOUNT DELINQUENT (PAST DUE) MADR1 00480030A 0 BORROWERS ADDRESS LINE 1 MADR2 00780030A 0 BORROWERS ADDRESS LINE 2 MBAD 01770030A 0 BUSINESS ADDRESS MBBR 09500005A 0 BANK BRANCH MBCS 02070020A 0 BUSINESS CITY,STATE MBEX 02420004A 0 BUSINESS PHONE EXTENSION MBFG 02860001A 0 ACCOUNT BUSY FLAG MBNM 01470030A 0 BUSINESS NAME MBPH 02320010A 0 BUSINESS PHONE MBZP 02270005A 0 BUSINESS ZIP CODE MCBAL 08960009TA02CURRENT BALANCE MCCDT 08690006NY 0DATE ACCOUNT APPRS IN CCS MCMN 09380001A 0 NUMBER OF COSIGNERS MCPGD 09140006NY00CURRENT PAYOFF GOOD UNTIL MCS 01080020A 0 BORROWERS CITY, STATE MDLDT 08750006NY00DATE ACCOUNT DELINQUENT FROM MDYDL 10130003N300# OF DAYS ACCOUNT DELINQUENT MEXT 01430004A 0 BORROWERS EXTENSION/COMMENT MLLAT 08480009NC02LAST LETTER REQUEST AMOUNT MLLDT 08420006NY00LAST LETTER REQUEST DATE MLON 09550008A 0 LOAN OFFICER MNADR 00180116A 0 BORROWERS NAME/ADDR COMBINED MNAM MADR1 MADR2 MCS MZP MNAM 00180030A 0 BORROWERS NAME MNPA 09200009NA02NEXT PAYOFF AMOUNT MNXTC 02750006NY 0NEXT CONTACT DATE MOAMT 09290009NC02OPEN AMOUNT/CREDIT LIMIT MOLNAM10470006A OLD KEY VALUE-NAME CHANGE MOLS 02950001A RESERVED FOR ON-LINE COLECT MOPDT 08810006NY00ACCOUNT OPEN DATE MP1 06670030A 0 PERMANENT COMMENT 1 MP2 06970030A 0 PERMANENT COMMENT 2 MP3 07270030A 0 PERMANENT COMMENT 3 MPAD1 07570030A 0 PREVIOUS ADDRESS 1 MPAD2 07870030A 0 PREVIOUS ADDRESS 2 MPCS 08170020A 0 PREVIOUS CITY,STATE MPDQ 03000006NY00DATE QUEUE CHANGED MPFG 02850001A 0 PROMISE TO PAY FLAG MPHN 01330010A 0 BORROWERS HOME PHONE MPPA 10220009NA02PROMISED TO PAY AMOUNT MPPB 10390002N3 0# OF BROKEN PROM TO PAY MPPCD 10410006NY 0PROMISE TO PAY COMMIT DATE   3:M MPPD 10160006NY00PROMISED TO PAY DATE MPPK 10370002N3 0# KEPT PROMISES TO PAY MPQU 02960004A 0 PREVIOUS QUEUE ASSIGNED MPRI 02810004A ACCOUNT PRIORITY CODE MPTS 09470003A 0 CREDIT/POINT SCORE MPYOF 09050009TA02CURRENT PAYOFF/TOTAL DUE MPZC 08370005A 0 PREVIOUS ZIP CODE MQAS 02940001A QUEUE REASSIGN CODE MQUE 02710004A 0 QUEUE ASSIGNED MRCD 02910001A ACCOUNT REVIEW CODE MSCD 02920002A SUPV STAT CODE-NOT USED BY CCS MSDF 09730040A 1 SPECIAL DESCRIPTION FIELD MSLCD 00170001A 0 BORROWERS SALUTATION CODE MSOC 02620009A 0 SOCIAL SECURITY NUMBER MSTC 03060001A 0 ACCOUNT STATUS CODE MSTDT 08570006NY00DATE ACCT LAST UPD BY A/R SYS MSUP 02870004A 0 SUPERVISOR FOR THIS ACCOUNT MTCD 09630004A 0 ACCOUNT TYPE CODE/PRODUCT TYPE MTD3 09670002N300# TIMES ACCT 30 DAYS DELINQ MTD6 09690002N300# TIMES ACCT 60 DAYS DELINQ MTD9 09710002N300# TIMES ACCT 90 DAYS DELINQ MTHD 10310006NY 0DATE OF TAPE,IF IN HISTORY MTP 09390008A 0 RESERVED FOR FUTURE USE MUPDT 08630006NY 0DATE ACCT LAST UPDATED BY CHG MZP 01280005A 0 BORROWERS ZIP CODE __ C LNCNT COMP 40 40 C N30 GOTO END C SETON 40 C END TAG CLR 30 Z-ADD0 TRCNT1 CLR 30 Z-ADD0 T101 CLR 12 TRCNT1 ADD 1 TRCNT1 CLR 12 T101 ADD HT01 T101 CLR TRCNT0 ADD TRCNT1 TRCNT0 CLR T001 ADD T101 T001 CLR SETOF 12 CLR SETON 3013 CLR EXCPT OPRINT E 11 13 30 O 13 'MQUE TOTALS' O T101 A 0062 O E 2 13 30 O 12 'RECORD COUNT' O TRCNT1Z 25 O T 2 LR O 12 'FINAL TOTALS' O T001 A 0062 O T 1 LR l3  3;N O 18 'FINAL RECORD COUNT' O TRCNT0Z 25 O D 101 40 O HDR,1 40 O 118 'PAGE' O PAGE Z 123 O D 1 40 O HDR,2 40 O 118 'RUN DATE' O UDATE Y 128 O D 1 40 O HDR,3 40 O D 2 40 O 70 'CCS REPORT NO. 2 ' O 80 ' ' O D 2 40 O 0006 'MACCT ' O 0023 'MNAM ' O 0060 'MADLQ ' O 0069 'MDYDL ' O 0076 'MQUE ' O D 1 12 O MACCT 0016 O MNAM 0047 O MADLQ A 0062 O MDYDL 3 0069 O MQUE 0076 /* *K,P7 *CATLOG *V,7 *V,13 *Z __ 13250 * THE LEGAL AND AGENCY EXTRACT PROGRAM WILL BEGIN 13260LAXTRT 13270 * THE LEGAL AND AGENCY EXTRACT PROCESS IS COMPLETE. 13280 * REFERRAL REPORT WILL BEGIN 13290LARPRT 13300 * REFERRAL REPORT COMPLETE 13310MNUPRO 13320/! 13330DEFINE,FN=PRFLH001,OW=LA,ED=999999,TY=S,LR=80,NR=30 13340LOAD,FN=PRFLH001,OW=LA 13350CHEKID 13360 * THE INACTIVE ACCOUNTS WILL BE MOVED TO HISTORY 13370 * THE INACCT FILE IS BEING SORTED INTO ACCOUNT NUMBER ORDER 13380INPUT=PRFLH001 13390DSORT &  3<N 13400FN=LAINACCT,LA 13410F2=LAINTEMP,LA, 13420OP=T,F,A 13430KF=A,1,16,D,23,2,D,19,4 13440SL=I 13450INPUT=PRFLH001 13460UTIL 13470CLEAR,FN=LAINACCT 13480COPY,FN=LAINTEMP,F2=LAINACCT,OW=LA 13490DELETE,FN=LAINTEMP 13500EX 13510 * THE LAINACCT FILE HAS BEEN SORTED INTO ACCOUNT NUMBER ORDER 13520 ****OPERATOR - MOUNT HISTORY FILE OUTPUT TAPE ON TAPE UNIT '0' 13530 * WITH WRITE RING 13540 * CARRIAGE RETURN WHEN READY 13550LMHUPD 13560 * THE INACTIVE ACCOUNTS HAVE BEEN MOVED TO HISTORY 13570MNUPRO 13580/! 13590DEFINE,FN=PRFLH002,OW=LA,ED=999999,TY=S,LR=80,NR=35 13600LOAD,FN=PRFLH002,OW=LA 13610CHEKID 13620 * THE ACTIVE ACCOUNTS WILL BE UPDATED FROM THE TAPE ARCHIVES 13630INPUT=PRFLH002 13640UTIL 13650DEFINE,FN=LAUPDREQ,ED=999999,TY=S,LR=22,NR=300 13660EX 13670LCHUD1 13680 * THE LAUPDREQ FILE WILL BE SORTED 13690INPUT=PRFLH002 13700DSORT 13710FN=LAUPDREQ,LA 13720F2=LAUPDREQ,LA, 13730OP=T,F,A 13740KF=D,21,2,D,17,4,A,1,16 13750SL=I 13760 * THE LAUPDREQ FILE HAS BEEN SORTED 13770INPUT=PRFLH002 13780UTIL 13790CLEAR,FN=LAUPHSCM 13800EX 13810 **** OPERATOR - YOU WILL BE PROMPTED TO MOUNT TAPES DURING THE 13820 * EXECUTION OF THE NEXT JOB 13830LCHUD2 13840INPUT=PRFLH002 13850UTIL 13860DELETE,FN=LAUPDREQ 13870EX  3=L ALL O CCS20 E 00870RPWRTOFF F - ELIGIBLE/ACTUAL WRITE-OFF REPORT 00880RPDLYASN G - DAILY ASSIGNMENT LIST * BEGIN EXTRACT INPUT=PRFPG001 UTIL CLEAR,FN=PGEXTR EX RPTE01 * EXTRACT COMPLETE * BEGIN PRINT RPTP01 * PRINT COMPLETE PGCNT2 INPUT=PRFPG001 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ 01050PRFPG005 E - R.G. REPORT 5 - (AVAILABLE) 01060PRFPG006 F - R.G. REPORT 6 - (AVAILABLE) 01070PRFPG007 G - R.G. REPORT 7 - (AVAILABLE) 01080PRFPG008 H - R.G. REPORT 8 - (AVAILABLE) 01090PRFPG009 I - R.G. REPORT 9 - (AVAILABLE) 01100PRFPG010 J - R.G. REPORT 10 - (AVAILABLE) 01110PRFPG011 K - R.G. REPORT 11 - (AVAILABLE) 01120PRFPG012 L - R.G. REPORT 12 - (AVAILABLE) 01130PRFPG013 M - R.G. REPORT 13 - (AVAILABLE) 01140PRFPG014 N - R.G. REPORT 14 - (AVAILABLE) 01150PRFPG015 O - R.G. REPORT 15 - (AVAILABLE) 01160PRFPG016 P - R.G. REPORT 16 - (AVAILABLE) 01170PRFPG017 Q - R.G. REPORT 17 - (AVAILABLE) 01180PRFPG018 R - R.G. REPORT 18 - (AVAILABLE) 01190PRFPG019 S - R.G. REPORT 19 - (AVAILABLE) 01200 Z - EXIT 01210/! 01220DEFINE,FN=PRFDC001,TY=S,LR=80,NR=50,ED=999999,VL=SYSVOL ,OW=CCS20 01230LOAD,FN=PRFDC001,OW=CCS20 01240CHEKID 01250 * THIS ROUTINE WILL PRINT - DAILY COLLECTOR UPDATE REPORT 01260 * - TIME USAGE REPORT 01270 * - DAILY COLLECTOR STATISTICS REPORT 01280 * 01290INPUT=PRFDC001 yM L 3>xhMADR1 MP1 LAADR1LAADR2LABAL1LABAL2LACNT1LACNT2LACOD1LACOD2LADUE LAEXT1 LAEXT2 LAFRM1 LAFRM2 LANO1 LANO2 LAPER1LAPHN1LAPHN2LARDT1LARDT2LAREASLATLA MACCT MACT MACTFGMADL MADLQ MADR1 MADR2 MBAD MBBR MBCS MBEX !MBFG "MBNM #MBPH $MBZP %MCBAL &MCCDT 'MCMN (MCPGD )MCS *MDLDT +MDYDL ,MEXT -MLLAT .MLLDT /MLON 0MNADR 1MNAM 2MNPA 3MNXTC 4MOAMT 5MOLNAM6MOLS 7MADR2 MBAD MBBR MBCS MBEX !MBFG "MBNM #MBPH $MBZP %MCBAL &MCCDT 'MCMN (MCPGD )MCS *MDLDT +MDYDL ,MEXT -MLLAT .MLLDT /MLON 0MNADR 1MNAM 2MNPA 3MNXTC 4MOAMT 5MOLNAM6MOLS 7MOPDT 8MP1 9MP2 :MP3 ;MPAD1 MPDQ ?MPFG @MPHN AMPPA BMPPB CMPPCD DMPPD EMPPK FMPQU GMPRI HMPTS IMPYOF JMPZC KMQAS LMQUE MMRCD NMSCD OMSDF PMSLCD QMSOC RMSTC SMSTDT T%MP2 :MP3 ;MPAD1 MPDQ ?MPFG @MPHN AMPPA BMPPB CMPPCD DMPPD EMPPK FMPQU GMPRI HMPTS IMPYOF JMPZC KMQAS LMQUE MMRCD NMSCD OMSDF PMSLCD QMSOC RMSTC SMSTDT TMSUP UMTCD VMTD3 WMTD6 XMTD9 YMTHD ZMTP [MUPDT \MZP ]MPPA BMPPB CMPPCD DMPPD EMPPK FMPQU GMPRI HMPTS IMPYOF JMPZC KMQAS LMQUE MMRCD NMSCD OMSDF PMSLCD QMSOC RMSTC SMSTDT T__8MP1 9MP2 :MP3 ;MPAD1 MPDQ ?MPFG @MPHN AMPPA BMPPB CMPPCD DMPPD EMPPK FMPQU GMPRI HMPTS IMPYOF JMPZC mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmL 3?u%AL'u%PNLA COLLECTION ACTIVITY  ACCT NAME  1, ACCT # @1; AMT DELAADR111420060A FIRM ADDRESS OF AGENCY LAADR212990060A FIRM ADDRESS-PREVIOUS LABAL112160009TA 2BALANCE DUE AT PLACEMENT LABAL213730009TA 2BAL. DUE AT PLACEMENT-PREV LACNT111120030A CONTACT NAME LACNT212690030A CONTACT NAME-PREVIOUS LACOD110720002A ATTORNEY/AGENCY CODE LA/AA LACOD212290002A ATTNY/AGY CODE-PREVIOUS LADUE 10630009TA 2BALANCE DUE TO LA LAEXT112120004A FIRM EXTENSION NUMBER LAEXT213690004A EXTENSION-PREVIOUS LAFRM110820030A FIRM NAME LAFRM212390030A FIRM NAME-PREVIOUS LANO1 10740002A ATTORNEY/AGENCY NUMBER LANO2 12310002A ATTNY/AGY NUMBER-PREV. LAPER112250004NA 0FIRM FEE PERCENT LAPHN112020010A FIRM PHONE NUMBER LAPHN213590010A FIRM PHONE-PREVIOUS LARDT110760006NY 0REFERRAL DATE LARDT212330006NY 0REFERRAL DATE-PREVIOUS LAREAS13820004A CLIENT REASSIGNMENT CODE LATLA 10570006NY 0DATE TO LA MACCT 00010016A 0 ACCOUNT NUMBER MACTFG MACT 03070360A 0 COLLECTOR ACTIVITY BLOCK MACTFG00010001A 0 ACCOUNT TYPE FLAG MADL 02460016A 0 ADDITIONAL ACCOUNT NUMBER MADLQ 08870009TA02AMOUNT DELINQUENT (PAST DUE) MADR1 00480030A 0 BORROWERS ADDRESS LINE 1 MADR2 00780030A 0 BORROWERS ADDRESS LINE 2 MBAD 01770030A 0 BUSINESS ADDRESS MBBR 09500005A 0 BANK BRANCH MBCS 02070020A 0 BUSINESS CITY,STATE MBEX 02420004A 0 BUSINESS PHONE EXTENSION MBFG 02860001A 0 ACCOUNT BUSY FLAG MBNM 01470030A 0 BUSINESS NAME MBPH 02320010A 0 BUSINESS PHONE MBZP 02270005A 0 BUSINESS ZIP CODE MCBAL 08960009TA02CURRENT BALANCE MCCDT 08690006NY00DATE ACCT 1ST APPRS IN CCS SYS MCMN 09380001A 0 NUMBER OF COSIGNERS MCPGD 09140006NY00CURRENT PAYOFF GOOD UNTIL MCS 01080020A 0 BORROWERS CITY, STATE MDLDT 08750006NY00DATE ACCOUNT DELINQUENT FROM MDYDL 10130003N300# OF DAYS ACCOUNT DELINQUENT MEXT 01430004A 0 BORROWERS EXTENSION/COMMENT MLLAT 08480009NC02LAST LETTER REQUEST AMOUNT g  3@u9 MLLDT 08420006NY00LAST LETTER REQUEST DATE MLON 09550008A 0 LOAN OFFICER MNADR 00180116A 0 BORROWERS NAME/ADDR COMBINED MNAM MADR1 MADR2 MCS MZP MNAM 00180030A 0 BORROWERS NAME MNPA 09200009NA02NEXT PAYOFF AMOUNT MNXTC 02750006NY 0NEXT CONTACT DATE MOAMT 09290009NC02OPEN AMOUNT/CREDIT LIMIT MOLNAM10470006A OLD KEY VALUE-NAME CHANGE MOLS 02950001A RESERVED FOR ON-LINE LEGAL MOPDT 08810006NY00ACCOUNT OPEN DATE MP1 06670030A 0 PERMANENT COMMENT 1 MP2 06970030A 0 PERMANENT COMMENT 2 MP3 07270030A 0 PERMANENT COMMENT 3 MPAD1 07570030A 0 PREVIOUS ADDRESS 1 MPAD2 07870030A 0 PREVIOUS ADDRESS 2 MPCS 08170020A 0 PREVIOUS CITY,STATE MPDQ 03000006NY00DATE QUEUE CHANGED MPFG 02850001A 0 PROMISE TO PAY FLAG MPHN 01330010A 0 BORROWERS HOME PHONE MPPA 10220009NA02PROMISED TO PAY AMOUNT MPPB 10390002N3 0# OF BROKEN PROM TO PAY MPPCD 10410006NY 0PROMISE TO PAY COMMIT DATE MPPD 10160006NY00PROMISED TO PAY DATE MPPK 10370002N3 0# KEPT PROMISES TO PAY MPQU 02960004A 0 PREVIOUS QUEUE ASSIGNED MPRI 02810004A ACCOUNT PRIORITY CODE MPTS 09470003A 0 CREDIT/POINT SCORE MPYOF 09050009TA02CURRENT PAYOFF/TOTAL DUE MPZC 08370005A 0 PREVIOUS ZIP CODE MQAS 02940001A QUEUE REASSIGN CODE MQUE 02710004A 0 QUEUE ASSIGNED MRCD 02910001A ACCT REVIEW CODE MSCD 02920002A SUPV STAT CODE-NOT USED BY LA MSDF 09730040A 1 SPECIAL DESCRIPTION FIELD MSLCD 00170001A 0 BORROWERS SALUTATION CODE MSOC 02620009A 0 SOCIAL SECURITY NUMBER MSTC 03060001A 0 ACCOUNT STATUS CODE MSTDT 08570006NY00DATE ACCT LAST UPD BY A/R SYS MSUP 02870004A 0 SUPERVISOR FOR THIS ACCOUNT MTCD 09630004A 0 ACCOUNT TYPE CODE/PRODUCT TYPE MTD3 09670002N300# TIMES ACCT 30 DAYS DELINQ MTD6 09690002N300# TIMES ACCT 60 DAYS DELINQ MTD9 09710002N300# TIMES ACCT 90 DAYS DELINQ MTHD 10310006NY 0DATE OF TAPE,IF IN HISTORY MTP 09390008A 0 RESERVED FOR FUTURE USE MUPDT 08630006NY 0DATE ACCT LAST UPDATED VIA CHG MZP 01280005A 0 BORROWERS ZIP CODE __ [  3AuM FINANCIAL HISTORY  ACCT NAME 8'ACCT #?,6 ACCT TYPE ;E LOAN OFF JWSPEC DESC FIELD \(f AMT DELQ k w u OPEN DATE .zq7 ODs DELQ DATE k  OPEN AMOUNT ,  LAST UPDATE  Y CUR BALANCE ,  ENTRY DATE  e CUR PAYOFF ,  CURRENT CLIENT PREVIOUS CLIENT :  X    O  $ ]9 DATE OF TAPE, IF IN TAPE HISTORY">W(PLEASE ENTER NEXT FUNCTION OR ACTION,RES((ULT,LETTER REQUEST,COMMENT  ** COSIGNER **  ACCT NAME 2&ACCT #:+5 AMT DELQ : wD DELQ DATE &k   3Bua ^ COSIGNER 1 012 06 HOME ;% i +02022807 EXT;=s C03HP2P08 BUS;U w [04`d2h09 EXT;m u05  z COSIGNER 2 10 2 15 HOME ;  11 2 16 EXT;  12 2 17 BUS;  13218 EXT; 14 COSIGNER 3 19224 HOME ;  202&25 EXT;+Y 121662>26 BUS;C ] I22NJ2V27 EXT;[Y a23f(ENTER ITEM,CHANGE OR NEXT FUNCTION OR AC((TION,RESULT,LETTER REQUEST,COMMENT ' A = AUTOMATIC ' B, = NAME' 1N,<#> = ACCOUNT NUMBER' CC, = COSIGNER NAME 'UP = PAYMENT ENTRY 'bE = EXITPLEASE ENTER SELECTION N  3Cuu $' A = AUTOMATIC ' B, = NAME' 1N,<#> = ACCOUNT NUMBER' CC, = COSIGNER NAME 'UP = PAYMENT ENTRY 'bE = EXIT>SELECTED ACCOUNT BUSY, TRY AGAIN LATER. PLEASE ENTER SELECTION %' A = AUTOMATIC ' B, = NAME' 1N,<#> = ACCOUNT NUMBER' CC, = COSIGNER NAME 'UP = PAYMENT ENTRY 'bE = EXIT2SELECTED ACCOUNT NOT FOUND, PLEASE ENTER SELECTION mm  3DHALdHO CCS20 39400733151 BOLTON, W 0000096551500001 39400015351 00000 39400030053 00000 39400052255 00000 39400054657 00000 39400156155 00000 39400186459 SMOKIT 00000 39400286952 00000 39400375359 00000 39400388550 00000 39400393758 00000 39400396058 00000 39400507753 00000 39400529450 00000 39400533551 00000 39400549052 00000 39400558053 00000 39400577350 00000 39400589256 00000 39400619459 00000 39400637055 00000 39400640851 00000 39400644051 00000 39400653359 00000 39400663358 00000 39400667458 00000 39400672458 00000 39400691458 00000 39400703253 00000 x  3EH 39400707254 00000 39400721651 00000 39400729555 00000 39400733151 00000 39400741451 00000 39400743754 00000 39400746351 00000 39400761251 00000 39400805652 00000 39400814852 00000 39400822053 00000 39400823952 00000 39400825759 00000 39400828753 00000 39400842051 00000 39400853850 00000 39400857257 00000 39400859451 00000 39400869856 00000 39400879657 00000 39400897055 00000 39400925252 00000 39400932357 00000 39400935152 00000 39400957255 00000 39400977857 00000 39400989050 00000 39401055455 00000 39401057352 00000 DY  3FI 39401066353 00000 39401103750 00000 39401209557 ZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL00000 39401258950 00000 39401267852 00000 39401268751 00000 39401273454 00000 39401357752 00000 39401460655 00000 39401537056 00000 39401538252 00000 39401586152 00000 39401635256 00000 39401649752 00000 39402034558 00000 39402088455 00000 39402116850 00000 39402167457 00000 39402190350 00000 39402256359 00000 39402258553 00000 39402260153 00000 39402261052 00000 39402270053 00000 39402272158 00000 39402273255 00000 39402276951 00000 39402277058 00000 39402574959 00000  3GI 39404773658 00000 39404799356 00000 39404835853 00000 39404853153 00000 39406510959 00000 39408096353 00000 39408437250 00000 39408758457 00000 39420112352 00000 89420274251 00000 89420306954 00000 89420427750 00000 89420501752 00000 89420602154 00000 89420628654 00000 89420723950 00000 89420764558 00000 89420792856 00000 89420817257 00000 89420844756 00000 89420875354 00000 89420899156 00000 89420945058 00000 89420960255 00000 89420976954 00000 89423144055 00000 89426148855 00000 89430117953 00000 89430194952 00000 gG  3HI- 89430258658 00000 89430300252 00000 89430397159 00000 89430476755 00000 89430605759 00000 89430703851 00000 89430730151 00000 89430802653 00000 39408264050 00000 39408736255 00000 39420229750 00000 89420304652 00000 89420445059 00000 89420576051 00000 89420638356 00000 89420754054 00000 89420797855 00000 89420836950 00000 89420881154 00000 89420919251 00000 89420970858 00000 89423093054 00000 89426422854 00000 89430190752 00000 89430266255 00000 89430336157 00000 89430480757 00000 89430683053 00000 89430758459 00000 2  3IIAALIAO ~$$ 00019PGGEN 00020 * THE REPORT GENERATOR PROGRAMSCHEKID 00010 **** OPERATOR - THE BATCH HOST MUST BE ACTIVE BEFORE PROCEEDING 00020 **** OPERATOR - (BATCH HOST MUST BE ACTIVE BEFORE PROCEEDING) 00030 * TO ACTIVATE BATCH HOST 00040 * MI, *BATCH,F 00050 * 00060 * RESPOND: 'N' CARRIAGE RETURN - IF BATCH HOST IS NOT ACTIVE 00070 * 00080 * CARRIAGE RETURN ONLY - TO CONTINUE 00090CCSPAS 00100 **** OPERATOR - FOLLOW THE INSTRUCTIONS AS THEY APPEAR ON THE SCREEN 00110INPUT=PRFLACTR 00120UTIL 00130DEFINE,FN=LARPTWKE,LR=80,NR=2000 00140DEFINE,FN=LARPTWKP,LR=80,NR=1000 00150DEFINE,FN=LAPRCWRK,LR=80,NR=50 00160EX 00170LPGGEN 00180 * THE REPORT GENERATOR PROGRAMS HAVE BEEN CREATED 00190 * THE REPORT GENERATOR PROGRAMS WILL BE BATCHED 00200INPUT=PRFLACTR 00210UTIL 00220BATCH,FN=LARPTWKE,TY=N 00230BATCH,FN=LARPTWKP,TY=R 00240DELETE,FN=LARPTWKE 00250DELETE,FN=LARPTWKP 00260CLEAR,FN=LAPGEXTR 00270EX 00280LPGCT1 00290 * 00300 **** OPERATOR - SELECTION L MUST NOW BE RUN TO EXECUTE THE REPORT 00310 * CARRIAGE RETURN WHEN READY 00320CCSPAS 00330MNUPRO 00340_ J = 1000*N-999 ALISP>LA 2*J-1 IF(WRKMST(J).EQ.$2020.OR.WRKMST(J).EQ.FDEL) GO TO 300 200 CALL CCSBL * BEGIN EXTRACT LRPE01 * EXTRACT COMPLETE *  3JIU * BEGIN PRINT LRPP01 * PRINT COMPLETE LPGCT2 INPUT=PRFLP001 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __0663358 TAYLOR, JIM C 000078408 39400644051 MILLER, BRUCE D 000009745 39400653359 SODHI, JAGJIT 000047152 39400388550 COMMERCE INTERNATIONAL 000052613 39400529450 STONE, SAUL 000000000 39400393758 NANGLE, CHARLES P 000071340 39400507753 MC COBB, ROBERT L 000000000 39400396058 AIR HAWAII INTL INC 000015940 39400842051 CARROLL, JACK D 000025126 39400577350 VOLTZ, GAIL A 000000000 39400549052 KERR, JIMMIE D 000014507 39400558053 LARSEN, LAURENCE H 000000429 39400186459 JUDY MD, KENNETH H 000000000 39400691458 GALLIER, JIMMY L 000007967 39400703253 SHAPIRO, ETHAN S 000000000 39400869856 FERRAN, ARTURO 000020661 39400286952 TOWNSEND, ALICE G 000031445 39400857257 JOHN T STEWART GENL CONT 000053042 39400853850 KINZI STALEY & SONS INC 000000000 39400805652 JOHNSON, CURTIS 000026723 39402273255 RAGLAND, HENRY E 000000000 39402167457 HOLLEY, LEON W 000032147 39402260153 PYLE, JOHN 000040412 39400637055 BERL, LOUIS 000081479 39400156155 RIVERO, ALEJANDRO A 000004052 39400743754 SCHAEFER, ROBERT CARL 000010043 39400733151 BOLTON, W 000009655 39400741451 THEOBOLDT, JAMES J 000000000 39400533551 WILLIAMS JR, JOHN M 000084745 39400828753 CREEM, J MICHAEL 000003794 89420899156 LORENZO, FELIX C 89430300252 SCHEPKE, D MICHAEL 39401537056 DONATO CONSTRUCTION CO 000000000 39400589256 BORJA, ANTONIO M 000034603 39408096353 BELMONT GREETING CARD 000029238 39404773658 ACCESSORY CNTRLS EQUIP 000038560 39406510959 OGRUDEK, ALLAN J 000011115 39400932357 HOOKS, ANTHONY 000000000 39400672458 TZOLIS, SOTIg$  3KIiALIiPJLA 0000000 89420501752 DILWORTH, RAYMOND D 39408758457 MAGBEE, CONSTANCE G 00007728 * BEGIN EXTRACT LRPE02 * EXTRACT COMPLETE * BEGIN SORT INPUT=PRFLP002 DSORT FN=LAPGEXTR,LA F2=LAPGEXTR,LA , OP=T,F,A KF=A,0001,0016,A,0059,0004 SL=I * SORT COMPLETE * BEGIN PRINT LRPP02 * PRINT COMPLETE LPGCT2 INPUT=PRFLP002 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ 39400577350 VOLTZ, GAIL A 000075208 39400589256 BORJA, ANTONIO M 000035468 39400619459 ARDIA, RALPH A 000105894 39400637055 BERL, LOUIS 000097266 39400640851 RUTTENBERG, DAVID A 000165941 39400644051 MILLER, BRUCE D 000069781 39400653359 SODHI, JAGJIT 000062152 39400663358 TAYLOR, JIM C 000095844 39400667458 PIERCE, S F 000054832 39400672458 TZOLIS, SOTIRIOS 000093923 39400691458 GALLIER, JIMMY L 000007967 39400703253 SHAPIRO, ETHAN S 000065666 39400707254 HALTERLEIN, DOLORES J 000024317 39400721651 HARVEY, M 000009715 39400729555 KENNEDY, JANET F 000005219 `%  3L DAL DP$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm$ JOB,J001,LA D 1700 MASS STORAGE OPERATING SYSTEM VERSION 5.0 DATE OF RUN: 01/22/80 SYSTEM ID: PRODUCT TEST CYCLE NO. 1 (08/28/79) D JJJ 00000000000 00000000000 111 D JJJ 0000000000000 0000000000000 1111 D JJJ 0000000000000 0000000000000 11111 D JJJ 000 000 000 000 111111 D JJJ 000 000 000 000 1111111 D JJJ 000 000 000 000 111 D JJJ 000 000 000 000 111 D JJJ 000 000 000 000 111 D JJJ 000 000 000 000 111 D JJJ 000 000 000 000 111 D JJJ 000 000 000 000 111 D JJJ JJJ 000 000 000 000 111 D JJJJJJJJJJJJJ 0000000000000 0000000000000 1111111111111 D JJJJJJJJJJJJJ 0000000000000 0000000000000 1111111111111 D JJJJJJJJJJJ 00000000000 00000000000 1111111111111 D $*K,P2 $*FTN ?  3M X  : FTN 3.3B (OPT = LPXC) LRPE00 PAGE 1 DATE: 01/22/80 TIME: 1533 / 1 PROGRAM LRPE00 / 2 INTEGER ID(4),LU,ISTAT,EFG,FDEL / 3 INTEGER REQBFD(24),IDATDM(15),WRKMST(15000) / 4 INTEGER REQBFE(24),IDATEX(15),EXTREC(68) / 5 INTEGER IVL01(7),IVL02(7),IVL03(7),IVL04(7) / 6 INTEGER IVL05(7),IVL06(7),IVL07(7),IVL08(7) / 7 INTEGER IVL09(7),IVL10(7) / 8 INTEGER IVL11(7),IVL12(7),IVL13(7),IVL14(7) / 9 INTEGER IVL15(7),IVL16(7),IVL17(7),IVL18(7) / 10 INTEGER IVL19(7),IVL20(7) / C / 11 EXTERNAL FMRDEL / C / 12 DATA REQBFD /24*0/ ,REQBFE /24*0/ / 13 DATA IDATDM /'LADLQMSTLA ' ,0,15,0 / / 14 DATA IDATEX /'LAPGEXTRLA ' ,0,1,0/ / 15 DATA EFG /0 / / C / 16 CALL PGMIN(ID,LU,MODE,NPORT) / 17 ASSEM $C000,FMRDEL,$6400,+FDEL / 18 CALL OPENFL(REQBFD,IDATDM,ISTAT) / 19 IF(ISTAT.GE.0) GO TO 50 / 20 CALL FILERR(IDATDM,3,ISTAT,LU) / 21 GO TO 900 / 22 50 CALL OPENFL(REQBFE,I  3N lDATEX,ISTAT) / 23 IF(ISTAT.GE.0) GO TO 100 / 24 CALL FILERR(IDATEX,3,ISTAT,LU) / 25 GO TO 900 / C / 26 100 CALL GETS(REQBFD,WRKMST,I,ISTAT) / 27 IF(AND(ISTAT,$8100).EQ.$8100) GO TO 850 / 28 IF(AND(ISTAT,$100).EQ.$100) EFG = 1 / 29 IF(ISTAT.GE.0) GO TO 115 / 30 CALL FILERR(IDATDM,14,ISTAT,LU) / 31 GO TO 900 / C / 32 115 DO 300 N = 1,15 / 33 J = 1000*N-999 / 34 K = 2*J-1 / 35 IF(WRKMST(K).EQ.$2020.OR.WRKMST(K).EQ.FDEL) GO TO 300 / 36 200 CALL CCSBLK(EXTREC,84) / 37 CALL CCSMVA(WRKMST,K+0000,0016,EXTREC,0001,016) / 38 CALL CCSMVA(WRKMST,K+0017,0030,EXTREC,0017,030) / 39 CALL CCSMVA(WRKMST,K+1141,0060,EXTREC,0047,060) / 40 CALL CCSMVA(WRKMST,K+1062,0009,EXTREC,0107,009) / 41 CALL PUTS(REQBFE,EXTREC,1,ISTAT) / 42 IF(ISTAT.GE.0) GO TO 300 / 43 CALL FILERR(IDATEX,11,ISTAT,LU) / 44 GO TO 900 / 45 300 CONTINUE / 46 IF(EFG.EQ.1) GO TO 850 `  3O  / 47 CALL CCSBLK(WRKMST,30000) / 48 GO TO 100 / 49 850 CALL CLOSFL(REQBFD,ISTAT) : FTN 3.3B (OPT = LPXC) LRPE00 PAGE 2 DATE: 01/22/80 TIME: 1533 / 50 CALL CLOSFL(REQBFE,ISTAT) / 51 900 CALL PGMOUT / 52 END : FTN 3.3B (OPT = LPXC) LRPE00 PAGE 3 DATE: 01/22/80 TIME: 1533   PROGRAM LENGTH $3C8E ( 15502)   EXTERNALS  Q8STP FMRDEL PGMIN OPENFL FILERR GETS CCSBLK  CCSMVA PUTS CLOSFL PGMOUT  : FTN 3.3B (OPT = LPXC) LRPE00 PAGE 4 DATE: 01/22/80 TIME: 1533  ***** L I S T O F S Y M B O L S *****    CONSTANTS :  ---------   VALUE ADDRESS REFERENCED BY STATEMENT NB :   8100 (-32511) 3BC5 27,27  0001 (1) 0002 14,28,32,34,37,41,46  3P   0003 (3) 3BC3 20,24  0009 (9) 3BD6 40,40  000B (11) 3BD8 43  000E (14) 3BC7 30  0010 (16) 3BCF 37,37  0011 (17) 3BD0 38,38  001E (30) 3BD1 38,38  002F (47) 3BD4 39  003C (60) 3BD3 39,39  0054 (84) 3BCE 36  006B (107) 3BD7 40  0100 (256) 3BC6 28,28  03E7 (999) 3BCB 33  03E8 (1000) 3BCA 33  0426 (1062) 3BD5 40  0475 (1141) 3BD2 39  2020 (8224) 3BCD 35  7530 (30000) 3BD9 47    VARIABLES :  ---------   NAME TYPE ADDRESS REFERENCED BY STATEMENT NB :   AND INTR.FN. 7FFF 27,28  EFG INTEGER 0009f  3Q  1,15,28,46  EXTREC INTEGER 3AF1 1,36,37,38,39,40,41  FDEL INTEGER 000A 1,17,35  I INTEGER 3BC4 26  ID INTEGER 0003 1,16  IDATDM INTEGER 0023 1,13,18,20,30  IDATEX INTEGER 3AE2 1,14,22,24,43 ( ISTAT INTEGER 0008 1,18,19,20,22,23,24,26,27,28,29,30,41,42,43,49,50  IVL01 INTEGER 3B35 1  IVL02 INTEGER 3B3C 1  IVL03 INTEGER 3B43 1  IVL04 INTEGER 3B4A 1  IVL05 INTEGER 3B51 1  IVL06 INTEGER 3B58 1  IVL07 INTEGER 3B5F 1  IVL08 INTEGER 3B66 1  IVL09 INTEGER 3B6D 1  IVL10 INTEGER 3B74 1 : FTN 3.3B (OPT = LPXC) LRPE00 PAGE 5 DATE: 01/22/80 TIME: 1533  IVL11 INTEGER 3B7B 1  IVL12 INTEGER 3B82 1  IVL13 INTEGER 3B89 1  IVL14 INTEGER 3B90 1  IVL15 INTEGER 3B97 1  IVL16 INTEGER 3B9E 1  IVL17 INTEGER 3BA5 1  IVL18 INTEGER 3BAC 1 r  3R   IVL19 INTEGER 3BB3 1  IVL20 INTEGER 3BBA 1  J INTEGER 3BC9 32,33,34  K INTEGER 3BCC 33,34,35,37,38,39,40  LU INTEGER 0007 1,16,20,24,30,43  MODE INTEGER 3BC1 16  N INTEGER 3BC8 32,33  NPORT INTEGER 3BC2 16  REQBFD INTEGER 000B 1,12,18,26,49  REQBFE INTEGER 3ACA 1,12,22,41,50  WRKMST INTEGER 0032 1,26,35,37,38,39,40,47    EXTERNALS :  ---------   NAME TYPE ADDRESS REFERENCED BY STATEMENT NB :   CCSBLK SUBROUTINE 3C35 35,47  CCSMVA SUBROUTINE 3C3B 36,38,39,40  CLOSFL SUBROUTINE 3C84 49,50  FILERR SUBROUTINE 3C6E 19,24,30,43  GETS SUBROUTINE 3C04 26  OPENFL SUBROUTINE 3BE5 17,22  PGMIN SUBROUTINE 3BDB 15  PGMOUT SUBROUTINE 3C8B 51 ޑ  3S   PUTS SUBROUTINE 3C64 40  Q8STP INTEGER.FN. 3C8D   LABELED STATEMENTS : ------------------   LABEL ADDRESS REFERENCED BY STATEMENT NB :   50 3BF5 19,22  100 3C03 23,26,48  115 3C1E 29,32  200 3C34 35  300 3C75 32,35,42,45  850 3C83 27,46,49  900 3C8A 20,25,31,44,51  LRPE00 0000 1   $*LIBEDT  LIB  IN  *K,I8,P8  IN  *P,F,2 ! LRPE00 7900 ! FMENTP  3T B58E F58 A ITOS CCS 3.0 SL-149 ! CCSBLK B5EA A03 A CCS CCS 3.0 SL-149 ! CCSMVA B5FA A08 A CCS CCS 3.0 SL-149 ! FILERR B629 B52 F CCS CCS 3.0 SL-149 ! Q8PRMS B6DB R99 A RPG CCS 3.0 SL-149 ! PARABN B6FF S53 A RPG CCS 3.0 SL-149 ! CCSHXA B711 A07 A CCS CCS 3.0 SL-149  IN  *K,I8  IN  *N,LRPE00,,,B  IN  *Z __mmmmmmmmAL P$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm$ JOB,J002,LA D 1700 MASS STORAGE OPERATING SYSTEM VERSION 5.0 DATE OF RUN: 01/22/80 SYSTEM ID: PRODUCT TEST CYCLE NO. 1 (08/28/79) D JJJ 00000000000 00000000000 22222222222 D JJJ 0000000000000 0000000000000 2222222222222 D JJJ 0000000000000 0000000000000 2222222222222 D JJJ 000 000 000 000 222 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222  3U  D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ JJJ 000 000 000 000 222 D JJJJJJJJJJJJJ 0000000000000 0000000000000 2222222222222 D JJJJJJJJJJJJJ 0000000000000 0000000000000 2222222222222 D JJJJJJJJJJJ 00000000000 00000000000 2222222222222 D $*K,P2 $*RPGII  H1 RPG II COMPILER PAGE 0001 H H 0001 H LRPP00 H 0002 FLAUTIFILIC F 80R04AI 1 DISK  H 0003 FLAPGEXTRIPE F 132 DISK  H 0004 FPRINT O F 132 PRINTER  H 0005 E HDR 3 40  H 0006 ILAUTIFILAA 01  H 0007 I 5 44 HEADER  H 0008 ILAPGEXTRBB 02  H 0009 I 00010016 MACCT  H 0010 I 00170046 MNAM  H 0011 I7  3V  00470106 LAADR1  H 0012 I 010701152LADUE  H 0013 C BEGIN TAG  H 0014 C 50 GOTO AROUND  H 0015 C MOVE 'HDR1' UTKEY 4  H 0016 C UTKEY CHAINLAUTIFIL 11  H 0017 C MOVEAHEADER HDR,1  H 0018 C MOVE 'HDR2' UTKEY 4  H 0019 C UTKEY CHAINLAUTIFIL 11  H 0020 C MOVEAHEADER HDR,2  H 0021 C MOVE 'HDR3' UTKEY 4  H 0022 C UTKEY CHAINLAUTIFIL  H 0023 C MOVEAHEADER HDR,3  H 0024 C SETON 50  H 0025 C SETON 303132  H 0026 C Z-ADD0 T001 112  H 0027 C Z-ADD0 TRCNT0 50  H 0028 C Z-ADD63 LNCNT 20  H 0029 C AROUND TAG  H 0030 C 40 Z-ADD0 LNCNT  H 0031 C 12 TRCNT0 ADD 1 TRCNT0  H 0032 C 12 T001 ADD HT01 T001  H 0033 C SETOF 193031  H 0034 C SETOF 324012  H 0035 C CKLVL TAG  H 0036 C MOVE LADUE HT01 092  H 0037 C SETON   3W  12  H 0038 C LNCNT ADD 1 LNCNT  H 0039 C LNCNT COMP 40 40  H 0040 C N30 GOTO END  H 0041 C SETON 40  H 0042 C END TAG  H1 RPG II COMPILER PAGE 0002 H H 0043 CLR 12 TRCNT0 ADD 1 TRCNT0  H 0044 CLR 12 T001 ADD HT01 T001  H 0045 CLR SETOF 12  H 0046 CLR EXCPT  H 0047 OPRINT T 2 LR  H 0048 O 12 'FINAL TOTALS'  H 0049 O T001 A 0123  H 0050 O T 1 LR  H 0051 O 18 'FINAL RECORD COUNT'  H 0052 O TRCNT0Z 25  H 0053 O D 101 40  H 0054 O HDR,1 40  H 0055 O 118 'PAGE'  H 0056 O PAGE Z 123  H 0057 O D 1 40  H 0058 O HDR,2 40  H 0059 O 118 'RUN DATE'  H 0060 O UDATE Y 128  H 0061 O D 1 40   3XJALJO CCS20 00030LPGCT1 00031 * * BEGIN EXTRACT INPUT=PRFPG002 UTIL CLEAR,FN=PGEXTR EX RPTE02 * EXTRACT COMPLETE * BEGIN PRINT RPTP02 * PRINT COMPLETE PGCNT2 INPUT=PRFPG002 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __EGIN PRINT RPTP00 * PRINT COMPLETE PGCNT2 INPUT=PRFPG000 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ 00012 * COMPLETE PAYMENT REPORT WILL NOW BE PRINTED 00013COMPAY 00014 * DIRECT PAYMENT REPORT WILL NOW BE PRINTED 00015DIRPAY 00016INPUT=PRFLO013 00017UTIL 00018CLEAR,FN=LAPMTFIL 00019EX 00020MNUPRO 00021/! 00022DEFINE,FN=PRFLO014,OW=LA,ED=999999,TY=S,LR=80,NR=45 ***00001LOAD,FN=PRFLO014,OW=LA 00002CHEKID 00003 * THE INVENTORY REPORT PROCESS WILL NOW BEGIN 00004 * THE CLIENT FILE IS BEING EXTRACTED 00005INPUT=PRFLO014  3YHf0001000200030004__ 400052255 0003 DEL3031879273 000044974 0000460233ZHFAL HPCCS20 420501752 WP01128089420723950 SP01128089420817257 RP01128089420899156 WP01128089420976954 SP01128089430117953 RP01128089430300252 WP011280000100020003/0004F__ DAQUE CCS20 012280 00150DEFINE,FN=LAPRCWRK,LR=80,NR=50 00160EX 00170LPGGEN 00180 * THE REPORT GENERATOR PROGRAMS HAVE BEEN CREATED 00190 * THE REPORT GE 3[JALJO CCS20 00016OP=T,F,A 00017KF=A,1,16 * BEGIN EXTRACT INPUT=PRFPG004 UTIL CLEAR,FN=PGEXTR EX RPTE04 * EXTRACT COMPLETE * BEGIN PRINT RPTP04 * PRINT COMPLETE PGCNT2 INPUT=PRFPG004 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ 39400396058 AIR HAWAII INTL INC 000051017 39400507753 MC COBB, ROBERT L 000119009 39400529450 STONE, SAUL 000090552 39400533551 WILLIAMS JR, JOHN M 000133082 39400549052 KERR, JIMMIE D 000014507 39400558053 LARSEN, LAURENCE H 000031513 39400577350 VOLTZ, GAIL A 000075208 39400589256 BORJA, ANTONIO M 000035468 39400619459 ARDIA, RALPH A 000105894 39400637055 BERL, LOUIS 000097266 39400640851 RUTTENBERG, DAVID A 000165941 39400644051 MILLER, BRUCE D 000069781 39400653359 SODHI, JAGJIT 000062152 39400663358 TAYLOR, JIM C 000095844 39400667458 PIERCE, S F 000054832 ` 3\IAALIAO ~$$ 00019PGGEN 00020 * THE REPORT GENERATOR PROGRAMSCHEKID 00010 **** OPERATOR - THE BATCH HOST MUST BE ACTIVE BEFORE PROCEEDING 00020 **** OPERATOR - (BATCH HOST MUST BE ACTIVE BEFORE PROCEEDING) 00030 * TO ACTIVATE BATCH HOST 00040 * MI, *BATCH,F 00050 * 00060 * RESPOND: 'N' CARRIAGE RETURN - IF BATCH HOST IS NOT ACTIVE 00070 * 00080 * CARRIAGE RETURN ONLY - TO CONTINUE 00090CCSPAS 00100 **** OPERATOR - FOLLOW THE INSTRUCTIONS AS THEY APPEAR ON THE SCREEN 00110INPUT=PRFLACTR 00120UTIL 00130DEFINE,FN=LARPTWKE,LR=80,NR=2000 00140DEFINE,FN=LARPTWKP,LR=80,NR=1000 00150DEFINE,FN=LAPRCWRK,LR=80,NR=50 00160EX 00170LPGGEN 00180 * THE REPORT GENERATOR PROGRAMS HAVE BEEN CREATED 00190 * THE REPORT GENERATOR PROGRAMS WILL BE BATCHED 00200INPUT=PRFLACTR 00210UTIL 00220BATCH,FN=LARPTWKE,TY=N 00230BATCH,FN=LARPTWKP,TY=R 00240DELETE,FN=LARPTWKE 00250DELETE,FN=LARPTWKP 00260CLEAR,FN=LAPGEXTR 00270EX 00280LPGCT1 00290 * 00300 **** OPERATOR - SELECTION L MUST NOW BE RUN TO EXECUTE THE REPORT 00310 * CARRIAGE RETURN WHEN READY 00320CCSPAS 00330MNUPRO 00340_ J = 1000*N-999 ALISP>LA 2*J-1 IF(WRKMST(J).EQ.$2020.OR.WRKMST(J).EQ.FDEL) GO TO 300 200 CALL CCSBL * BEGIN EXTRACT LRPE01 * EXTRACT COMPLETE *  3]IU * BEGIN PRINT LRPP01 * PRINT COMPLETE LPGCT2 INPUT=PRFLP001 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __0663358 TAYLOR, JIM C 000078408 39400644051 MILLER, BRUCE D 000009745 39400653359 SODHI, JAGJIT 000047152 39400388550 COMMERCE INTERNATIONAL 000052613 39400529450 STONE, SAUL 000000000 39400393758 NANGLE, CHARLES P 000071340 39400507753 MC COBB, ROBERT L 000000000 39400396058 AIR HAWAII INTL INC 000015940 39400842051 CARROLL, JACK D 000025126 39400577350 VOLTZ, GAIL A 000000000 39400549052 KERR, JIMMIE D 000014507 39400558053 LARSEN, LAURENCE H 000000429 39400186459 JUDY MD, KENNETH H 000000000 39400691458 GALLIER, JIMMY L 000007967 39400703253 SHAPIRO, ETHAN S 000000000 39400869856 FERRAN, ARTURO 000020661 39400286952 TOWNSEND, ALICE G 000031445 39400857257 JOHN T STEWART GENL CONT 000053042 39400853850 KINZI STALEY & SONS INC 000000000 39400805652 JOHNSON, CURTIS 000026723 39402273255 RAGLAND, HENRY E 000000000 39402167457 HOLLEY, LEON W 000032147 39402260153 PYLE, JOHN 000040412 39400637055 BERL, LOUIS 000081479 39400156155 RIVERO, ALEJANDRO A 000004052 39400743754 SCHAEFER, ROBERT CARL 000010043 39400733151 BOLTON, W 000009655 39400741451 THEOBOLDT, JAMES J 000000000 39400533551 WILLIAMS JR, JOHN M 000084745 39400828753 CREEM, J MICHAEL 000003794 89420899156 LORENZO, FELIX C 89430300252 SCHEPKE, D MICHAEL 39401537056 DONATO CONSTRUCTION CO 000000000 39400589256 BORJA, ANTONIO M 000034603 39408096353 BELMONT GREETING CARD 000029238 39404773658 ACCESSORY CNTRLS EQUIP 000038560 39406510959 OGRUDEK, ALLAN J 000011115 39400932357 HOOKS, ANTHONY 000000000 39400672458 TZOLIS, SOTIg  3^IiALIiPJLA 0000000 89420501752 DILWORTH, RAYMOND D 39408758457 MAGBEE, CONSTANCE G 00007728 * BEGIN EXTRACT LRPE02 * EXTRACT COMPLETE * BEGIN SORT INPUT=PRFLP002 DSORT FN=LAPGEXTR,LA F2=LAPGEXTR,LA , OP=T,F,A KF=A,0001,0016,A,0059,0004 SL=I * SORT COMPLETE * BEGIN PRINT LRPP02 * PRINT COMPLETE LPGCT2 INPUT=PRFLP002 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ 39400577350 VOLTZ, GAIL A 000075208 39400589256 BORJA, ANTONIO M 000035468 39400619459 ARDIA, RALPH A 000105894 39400637055 BERL, LOUIS 000097266 39400640851 RUTTENBERG, DAVID A 000165941 39400644051 MILLER, BRUCE D 000069781 39400653359 SODHI, JAGJIT 000062152 39400663358 TAYLOR, JIM C 000095844 39400667458 PIERCE, S F 000054832 39400672458 TZOLIS, SOTIRIOS 000093923 39400691458 GALLIER, JIMMY L 000007967 39400703253 SHAPIRO, ETHAN S 000065666 39400707254 HALTERLEIN, DOLORES J 000024317 39400721651 HARVEY, M 000009715 39400729555 KENNEDY, JANET F 000005219 `  3_dAL$CdPLA mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm a  3`d39400015351 ARIZONA STATE INS 000075541 39400015351 ARIZONA STATE INS 00006004039400015351 ARIZONA STATE INS 0000755410600003 39400015351 ARIZONA STATE INS 0000755410600003 39400030053 MOSES, WILLIE J 00005343439400030053 MOSES, WILLIE J 000053434 39400030053 MOSES, WILLIE J 0000534341200001 39400030053 MOSES, WILLIE J 0000534341200001 39400052255 BRACA, EDWARD 00004497439400052255 BRACA, EDWARD 000046023 39400052255 BRACA, EDWARD 0000460230900002 39400052255 BRACA, EDWARD 0000460230900002 39400054657 HLTH MAINTENANCE ORGA 00000000039400054657 HLTH MAINTENANCE ORGA 000057048 39400054657 HLTH MAINTENANCE ORGA 0000024960300003 39400054657 HLTH MAINTENANCE ORGA 0000024960300003 39400156155 RIVERO, ALEJANDRO A 00000405239400156155 RIVERO, ALEJANDRO A 000004052 39400156155 RIVERO, ALEJANDRO A 0000040521500009 39400156155 RIVERO, ALEJANDRO A 0000040521500009 39400186459 JUDY MD, KENNETH H 00000000039400186459 JUDY MD, KENNETH H 000100576 39400186459 JUDY MD, KENNETH H 0000024530600004 39400186459 JUDY MD, KENNETH H 0000024530600004 39400286952 TOWNSEND, ALICE G 00003144539400286952 TOWNSEND, ALICE G 000040517 39400286952 TOWNSEND, ALICE G 0000405170900001 39400286952 TOWNSEND, ALICE G 0000405170900001 39400375359 HELGESEN, DOUGLAS C T  3ad 00001254939400375359 HELGESEN, DOUGLAS C 000012549 39400375359 HELGESEN, DOUGLAS C 0000125491200002 39400375359 HELGESEN, DOUGLAS C 0000125491200002 39400388550 COMMERCE INTERNATIONAL 00005261339400388550 COMMERCE INTERNATIONAL 000099247 39400388550 COMMERCE INTERNATIONAL 0001281520300009 39400388550 COMMERCE INTERNATIONAL 0001281520300009 39400393758 NANGLE, CHARLES P 00007134039400393758 NANGLE, CHARLES P 000073124 39400393758 NANGLE, CHARLES P 0000731240600003 39400393758 NANGLE, CHARLES P 0000731240600003 39400396058 AIR HAWAII INTL INC 00001594039400396058 AIR HAWAII INTL INC 000051017 39400396058 AIR HAWAII INTL INC 0000159401800004 39400396058 AIR HAWAII INTL INC 0000159401800004 39400507753 MC COBB, ROBERT L 00000000039400507753 MC COBB, ROBERT L 000119009 39400507753 MC COBB, ROBERT L 0001424430600001 39400507753 MC COBB, ROBERT L 0001424430600001 39400529450 STONE, SAUL 00000000039400529450 STONE, SAUL 000090552 39400529450 STONE, SAUL 0000519080300009 39400529450 STONE, SAUL 0000519080300009 39400533551 WILLIAMS JR, JOHN M 00008474539400533551 WILLIAMS JR, JOHN M 000133082 39400533551 WILLIAMS JR, JOHN M 0002199830600002 39400533551 WILLIAMS JR, JOHN M 0002199830600002 39400549052 KERR, JIMMIE D 00001450739400549052 KERR, JIMMIE D 000014507  3bd39400549052 KERR, JIMMIE D 0000145071500003 39400549052 KERR, JIMMIE D 0000145071500003 39400558053 LARSEN, LAURENCE H 00000042939400558053 LARSEN, LAURENCE H 000031513 39400558053 LARSEN, LAURENCE H 0000004291800004 39400558053 LARSEN, LAURENCE H 0000004291800004 39400577350 VOLTZ, GAIL A 00000000039400577350 VOLTZ, GAIL A 000075208 39400577350 VOLTZ, GAIL A 0000270070600003 39400577350 VOLTZ, GAIL A 0000270070600003 39400589256 BORJA, ANTONIO M 00003460339400589256 BORJA, ANTONIO M 000035468 39400589256 BORJA, ANTONIO M 0000354680900001 39400589256 BORJA, ANTONIO M 0000354680900001 39400619459 ARDIA, RALPH A 00010529439400619459 ARDIA, RALPH A 000105894 39400619459 ARDIA, RALPH A 0001058940900002 39400619459 ARDIA, RALPH A 0001058940900002 39400637055 BERL, LOUIS 00008147939400637055 BERL, LOUIS 000097266 39400637055 BERL, LOUIS 0000982660600003 39400637055 BERL, LOUIS 0000982660600003 39400640851 RUTTENBERG, DAVID A 00013047939400640851 RUTTENBERG, DAVID A 000165941 39400640851 RUTTENBERG, DAVID A 0001659410600002 39400640851 RUTTENBERG, DAVID A 0001659410600002 39400644051 MILLER, BRUCE D 00000974539400644051 MILLER, BRUCE D 000069781 39400644051 MILLER, BRUCE D 0000976670300004 <  3ce39400644051 MILLER, BRUCE D 0000976670300004 39400653359 SODHI, JAGJIT 00004715239400653359 SODHI, JAGJIT 000062152 39400653359 SODHI, JAGJIT 0000471521800001 39400653359 SODHI, JAGJIT 0000471521800001 39400663358 TAYLOR, JIM C 00007840839400663358 TAYLOR, JIM C 000095844 39400663358 TAYLOR, JIM C 0000989940600002 39400663358 TAYLOR, JIM C 0000989940600002 39400667458 PIERCE, S F 00005349539400667458 PIERCE, S F 000054832 39400667458 PIERCE, S F 0000548321200006 39400667458 PIERCE, S F 0000548321200006 39400672458 TZOLIS, SOTIRIOS 00000000039400672458 TZOLIS, SOTIRIOS 000093923 39400672458 TZOLIS, SOTIRIOS 0000294430300003 39400672458 TZOLIS, SOTIRIOS 0000294430300003 39400691458 GALLIER, JIMMY L 00000796739400691458 GALLIER, JIMMY L 000007967 39400691458 GALLIER, JIMMY L 0000079671500004 39400691458 GALLIER, JIMMY L 0000079671500004 39400703253 SHAPIRO, ETHAN S 00000000039400703253 SHAPIRO, ETHAN S 000065666 39400703253 SHAPIRO, ETHAN S 0000913370300001 39400703253 SHAPIRO, ETHAN S 0000913370300001 39400707254 HALTERLEIN, DOLORES J 00000000039400707254 HALTERLEIN, DOLORES J 000024317 39400707254 HALTERLEIN, DOLORES J 0000479460000009 39400707254 HALTERLEIN, DOLORES J 0000479460000009 N  3de39400721651 HARVEY, M 00000971539400721651 HARVEY, M 000009715 39400721651 HARVEY, M 0000097151200002 39400721651 HARVEY, M 0000097151200002 39400729555 KENNEDY, JANET F 00000521939400729555 KENNEDY, JANET F 000005219 39400729555 KENNEDY, JANET F 0000052190900003 39400729555 KENNEDY, JANET F 0000052190900003 39400733151 BOLTON, W 00000965539400733151 BOLTON, W 000009655 39400733151 BOLTON, W 0000096551500004 39400733151 BOLTON, W 0000096551500004 39400741451 THEOBOLDT, JAMES J 00000000039400741451 THEOBOLDT, JAMES J 000029611 39400741451 THEOBOLDT, JAMES J 0000227710300009 39400741451 THEOBOLDT, JAMES J 0000227710300009 39400743754 SCHAEFER, ROBERT CARL 00001004339400743754 SCHAEFER, ROBERT CARL 000010043 39400743754 SCHAEFER, ROBERT CARL 0000100431500001 39400743754 SCHAEFER, ROBERT CARL 0000100431500001 39400746351 ROWE, PLEASANT L 000121280 39400746351 ROWE, PLEASANT L 00010082639400746351 ROWE, PLEASANT L 0001245680600002 39400746351 ROWE, PLEASANT L 0001245680600002 39400761251 HEARING, A L 00003099939400761251 HEARING, A L 000046124 39400761251 HEARING, A L 0000461240900003 39400761251 HEARING, A L 0000461240900003 39400805652 JOHNSON, CURTIS 00002672339400805652 V  3ee. JOHNSON, CURTIS 000026723 39400805652 JOHNSON, CURTIS 0000267231500008 39400805652 JOHNSON, CURTIS 0000267231500008 39400814852 HILL, CARLTON M 00004619939400814852 HILL, CARLTON M 000047354 39400814852 HILL, CARLTON M 0000515570900004 39400814852 HILL, CARLTON M 0000515570900004 39400822053 SICKORA, THOMAS V 00000200039400822053 SICKORA, THOMAS V 000002000 39400822053 SICKORA, THOMAS V 0000020001800001 39400822053 SICKORA, THOMAS V 0000020001800001 39400823952 SANCHEZ, EMILIO 000012007 39400823952 SANCHEZ, EMILIO 00001200739400823952 SANCHEZ, EMILIO 0000120071800002 39400823952 SANCHEZ, EMILIO 0000120071800002 39400828753 CREEM, J MICHAEL 00000379439400828753 CREEM, J MICHAEL 000049239 39400828753 CREEM, J MICHAEL 0000502040600003 39400828753 CREEM, J MICHAEL 0000502040600003 39400842051 CARROLL, JACK D 00002512639400842051 CARROLL, JACK D 000025126 39400842051 CARROLL, JACK D 0000251261200004 39400842051 CARROLL, JACK D 0000251261200004 39400853850 KINZI STALEY & SONS INC 00000000039400853850 KINZI STALEY & SONS INC 000251076 39400853850 KINZI STALEY & SONS INC 0000061240600001 39400853850 KINZI STALEY & SONS INC 0000061240600001 39400869856 FERRAN, ARTURO 000020661 39400869856 FERRAN, ARTURO 00002066139400869856 FERRAN, 2  3feBARTURO 0000206611200002 39400869856 FERRAN, ARTURO 0000206611200002 39400932357 HOOKS, ANTHONY 000027741 39400932357 HOOKS, ANTHONY 00000000039400932357 HOOKS, ANTHONY 0000000001200003 39400932357 HOOKS, ANTHONY 0000000001200003 39400989050 MYERS, LOUIS J 00000000039400989050 MYERS, LOUIS J 000187529 39400989050 MYERS, LOUIS J 0000090590900004 39400989050 MYERS, LOUIS J 0000090590900004 39401103750 CHRIST, AUGUST C 000068971 39401103750 CHRIST, AUGUST C 00001692339401103750 CHRIST, AUGUST C 0000189710600001 39401103750 CHRIST, AUGUST C 0000189710600001 39401268751 FIX, JAMES L 000010524 39401268751 FIX, JAMES L 00000153439401268751 FIX, JAMES L 0000105240300002 39401268751 FIX, JAMES L 0000105240300002 39401537056 DONATO CONSTRUCTION CO 00000000039401537056 DONATO CONSTRUCTION CO 000142938 39401537056 DONATO CONSTRUCTION CO 0000034380600003 39401537056 DONATO CONSTRUCTION CO 0000034380600003 39401649752 RABAKUKK, REIN 00000000039401649752 RABAKUKK, REIN 000072659 39401649752 RABAKUKK, REIN 0000535000300004 39401649752 RABAKUKK, REIN 0000535000300004 39402167457 HOLLEY, LEON W 00003214739402167457 HOLLEY, LEON W 000055362 39402167457 HOLLEY, LEON W 0000732290300001 39402167457 HOLLEY, LEON W G  3geV 0000732290300001 39402260153 PYLE, JOHN 00004041239402260153 PYLE, JOHN 000062278 39402260153 PYLE, JOHN 0000914820600002 39402260153 PYLE, JOHN 0000914820600002 39402273255 RAGLAND, HENRY E 00000000039402273255 RAGLAND, HENRY E 000068271 39402273255 RAGLAND, HENRY E 0000668850300003 39402273255 RAGLAND, HENRY E 0000668850300003 39404773658 ACCESSORY CNTRLS EQUIP 00003856039404773658 ACCESSORY CNTRLS EQUIP 000109160 39404773658 ACCESSORY CNTRLS EQUIP 0001091600300004 39404773658 ACCESSORY CNTRLS EQUIP 0001091600300004 39406510959 OGRUDEK, ALLAN J 00001111539406510959 OGRUDEK, ALLAN J 000011115 39406510959 OGRUDEK, ALLAN J 0000111150900001 39406510959 OGRUDEK, ALLAN J 0000111150900001 39408096353 BELMONT GREETING CARD 00002923839408096353 BELMONT GREETING CARD 000205886 39408096353 BELMONT GREETING CARD 0002481500600002 39408096353 BELMONT GREETING CARD 0002481500600002 39408437250 HASSETT, ROBERT W 00000604639408437250 HASSETT, ROBERT W 000050044 39408437250 HASSETT, ROBERT W 0000500440300003 39408437250 HASSETT, ROBERT W 0000500440300003 39408758457 MAGBEE, CONSTANCE G 000077287 39408758457 MAGBEE, CONSTANCE G 00007728739408758457 MAGBEE, CONSTANCE G 0000772871500004 39408758457 MAGBEE, CONSTANCE G 0000772871500004 39420112352 SNYDER, JOHN L  3hej 00003791839420112352 SNYDER, JOHN L 000038866 39420112352 SNYDER, JOHN L 0000388660900001 39420112352 SNYDER, JOHN L 0000388660900001 89420501752 DILWORTH, RAYMOND D 00010545089420501752 DILWORTH, RAYMOND D 000105450 89420501752 DILWORTH, RAYMOND D 0000562700900004 89420501752 DILWORTH, RAYMOND D 0000562700900004 89420899156 LORENZO, FELIX C 00004566889420899156 LORENZO, FELIX C 000045668 89420899156 LORENZO, FELIX C 0000456681800001 89420899156 LORENZO, FELIX C 0000456681800001 89430300252 SCHEPKE, D MICHAEL 000100394 89430300252 SCHEPKE, D MICHAEL 00010039489430300252 SCHEPKE, D MICHAEL 0001113910600003 89430300252 SCHEPKE, D MICHAEL 0001113910600003 __H1 RPG II COMPILER PAGE 0001 H H 0001 H RPTP04 H 0002 FUTIFIL IC F 80R04AI 1 DISK  H 0003 FPGEXTR IPE F 132 DISK  H 0004 FPRINT O F 132 PRINTER  H 0005 E HDR 3 40  H 0006 IUTIFIL AA 01  H 0007 I 5 44 HEADER  H 0008 IPGEXTR BB 02  H 0009 I 00010016 MACCT  H 0010 I 00170046 MBNM  H 0011 I(  3ie~ 00470076 MBAD  H 0012 I 00770081 MBZP  H 0013 C BEGIN TAG  H 0014 C 50 GOTO AROUND  H 0015 C MOVE 'HDR1' UTKEY 4  H 0016 C UTKEY CHAINUTIFIL 11  H 0017 C MOVEAHEADER HDR,1  H 0018 C MOVE 'HDR2' UTKEY 4  H 0019 C UTKEY CHAINUTIFIL 11  H 0020 C MOVEAHEADER HDR,2  H 0021 C MOVE 'HDR3' UTKEY 4  H 0022 C UTKEY CHAINUTIFIL  H 0023 C MOVEAHEADER HDR,3  H 0024 C SETON 50  H 0025 C SETON 303132  H 0026 C Z-ADD0 TRCNT0 50  H 0027 C Z-ADD63 LNCNT 20  H 0028 C AROUND TAG  H 0029 C 40 Z-ADD0 LNCNT  H 0030 C 12 TRCNT0 ADD 1 TRCNT0  H 0031 C SETOF 193031  H 0032 C SETOF 324012  H 0033 C CKLVL TAG  H 0034 C SETON 12  H 0035 C LNCNT ADD 1 LNCNT  H 0036 C LNCNT COMP 40 40  H 0037 C N30 GOTO END )  3je  H 0038 C SETON 40  H 0039 C END TAG  H 0040 CLR 12 TRCNT0 ADD 1 TRCNT0  H 0041 CLR SETOF 12  H 0042 CLR EXCPT  H1 RPG II COMPILER PAGE 0002 H H 0043 OPRINT T 2 LR  H 0044 O 12 'FINAL TOTALS'  H 0045 O T 1 LR  H 0046 O 18 'FINAL RECORD COUNT'  H 0047 O TRCNT0Z 25  H 0048 O D 101 40  H 0049 O HDR,1 40  H 0050 O 118 'PAGE'  H 0051 O PAGE Z 123  H 0052 O D 1 40  H 0053 O HDR,2 40  H 0054 O 118 'RUN DATE'  H 0055 O UDATE Y 128  H 0056 O D 1 40  H 0057 O HDR,3 40  H 0058 O D 2 40  H 0059 O 70 'CCS REPORT NO. 4 '  H 0060 O 80 ' '  H 0061 O D 2 40  у  3ke H 0062 O 0006 'MACCT '  H 0063 O 0023 'MBNM '  H 0064 O 0054 'MBAD '  H 0065 O 0085 'MBZP '  H 0066 O D 1 12  H 0067 O MACCT 0016  H 0068 O MBNM 0047  H 0069 O MBAD 0078  H 0070 O MBZP 0085  H 0071 /*  H H H H THE FOLLOWING INDICATORS WERE SPECIFIED BUT WERE NEVER H USED TO CONDITION OPERATIONS H H 01 02 11 19 31 32 H H H H THE FOLLOWING INDICATORS APPEARED IN THIS PROGRAM H H 01 02 11 12 19 30 31 32 40 50 LR H1 RPG II COMPILER PAGE 0003 H H H   3le H H S O R T E D L A B E L N A M E S H H NAME LINE H H AROUND 28 H BEGIN 13 H CKLVL 33 H END 39 H H H H S O R T E D F I E L D N A M E S H H NAME TYPE LENGTH DP H H HDR A 40 H HEADER A 40 H LNCNT N 2 0 H MACCT A 16 H MBAD A 30 H MBNM A 30 H MBZP A 5 H PAGE N 4 0 H TRCNT0 N 5 0 H UDATE N 6 0 bK  3mISFALISP>LA 2*J-1 IF(WRKMST(J).EQ.$2020.OR.WRKMST(J).EQ.FDEL) GO TO 300 200 CALL CCSBL * BEGIN EXTRACT LRPE01 * EXTRACT COMPLETE * BEGIN PRINT LRPP01 * PRINT COMPLETE LPGCT2 INPUT=PRFLP001 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __0663358 TAYLOR, JIM C 000078408 39400644051 MILLER, BRUCE D 000009745 39400653359 SODHI, JAGJIT 000047152 39400388550 COMMERCE INTERNATIONAL 000052613 39400529450 STONE, SAUL 000000000 39400393758 NANGLE, CHARLES P 000071340 39400507753 MC COBB, ROBERT L 000000000 39400396058 AIR HAWAII INTL INC 000015940 39400842051 CARROLL, JACK D 000025126 39400577350 VOLTZ, GAIL A 000000000 39400549052 KERR, JIMMIE D 000014507 39400558053 LARSEN, LAURENCE H 000000429 39400186459 JUDY MD, KENNETH H 000000000 39400691458 GALLIER, JIMMY L 000007967 39400703253 SHAPIRO, ETHAN S 000000000 39400869856 FERRAN, ARTURO 000020661 39400286952 TOWNSEND, ALICE G 000031445 39400857257 JOHN T STEWART GENL CONT 000053042 39400853850 KINZI STALEY & SONS INC 000000000 39400805652 V 3nIiALIiPJLA 0000000 89420501752 DILWORTH, RAYMOND D 39408758457 MAGBEE, CONSTANCE G 00007728 * BEGIN EXTRACT LRPE02 * EXTRACT COMPLETE * BEGIN SORT INPUT=PRFLP002 DSORT FN=LAPGEXTR,LA F2=LAPGEXTR,LA , OP=T,F,A KF=A,0001,0016,A,0059,0004 SL=I * SORT COMPLETE * BEGIN PRINT LRPP02 * PRINT COMPLETE LPGCT2 INPUT=PRFLP002 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ 39400577350 VOLTZ, GAIL A 000075208 39400589256 BORJA, ANTONIO M 000035468 39400619459 ARDIA, RALPH A 000105894 39400637055 BERL, LOUIS 000097266 39400640851 RUTTENBERG, DAVID A 000165941 39400644051 MILLER, BRUCE D 000069781 39400653359 SODHI, JAGJIT 000062152 39400663358 TAYLOR, JIM C 000095844 39400667458 PIERCE, S F 000054832 39400672458 TZOLIS, SOTIRIOS 000093923 39400691458 GALLIER, JIMMY L 000007967 39400703253 SHAPIRO, ETHAN S 000065666 39400707254 HALTERLEIN, DOLORES J 000024317 39400721651 HARVEY, M 000009715 39400729555 KENNEDY, JANET F 000005219 `  3oI} 39400733151 BOLTON, W 000009655 39400741451 THEOBOLDT, JAMES J 000029611 39400743754 SCHAEFER, ROBERT CARL 000010043ALIPLA 39400746351 ROWE, PLEASANT L 000121280 * BEGIN EXTRACT LRPE03 * EXTRACT COMPLETE * BEGIN SORT INPUT=PRFLP003 DSORT FN=LAPGEXTR,LA F2=LAPGEXTR,LA , OP=T,F,A KF=A,0001,0016,A,0059,0004 SL=I * SORT COMPLETE * BEGIN PRINT LRPP03 * PRINT COMPLETE LPGCT2 INPUT=PRFLP003 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ 39400897055 BARKER, E H 000150966 39400925252 SHEPPARD, ROGER J 000026559 39400932357 HOOKS, ANTHONY 000027741 39400935152 HENRY, JAMES L 000007457 39400957255 ZONN, MR LINCOLN M 000061055 39400977857 SCHIMECK, ROBERT A 000034559 39400989050 MYERS, LOUIS J 000187529 39401055455 WATERLAC CORPORATION 000053214 39401057352 ANDERSON, JAMES H 000055351 39401066353 TIBCKEN, A 000095708 39401103750 CHRIST, AUGUST C 000068971 39401209557 MCHENRY, WILLIAM 000008011  3pIALIPLA 39400746351 ROWE, PLEASANT L 000121280 * BEGIN EXTRACT LRPE03 * EXTRACT COMPLETE * BEGIN SORT INPUT=PRFLP003 DSORT FN=LAPGEXTR,LA F2=LAPGEXTR,LA , OP=T,F,A KF=A,0001,0016,A,0059,0004 SL=I * SORT COMPLETE * BEGIN PRINT LRPP03 * PRINT COMPLETE LPGCT2 INPUT=PRFLP003 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ 39400897055 BARKER, E H 000150966 39400925252 SHEPPARD, ROGER J 000026559 39400932357 HOOKS, ANTHONY 000027741 39400935152 HENRY, JAMES L 000007457 39400957255 ZONN, MR LINCOLN M 000061055 39400977857 SCHIMECK, ROBERT A 000034559 39400989050 MYERS, LOUIS J 000187529 39401055455 WATERLAC CORPORATION 000053214 39401057352 ANDERSON, JAMES H 000055351 39401066353 TIBCKEN, A 000095708 39401103750 CHRIST, AUGUST C 000068971 39401209557 MCHENRY, WILLIAM 000008011 39401258950 DWIRE, ESTHER M 000071722 39401267852 AGUNDEZ, BENJAMIN 000017556 39401268751 FIX, JAMES L 000010524 p  3qI 39401273454 WADE, GIDEON P 000009766 39401357752 JOSHUA, EDWARD L 000114802 39401460655 RODRIGUEZ, JOE S 000051632ALIPLA 39401537056 DONATO CONSTRUCTION CO 000142938 * BEGIN EXTRACT LRPE04 * EXTRACT COMPLETE * BEGIN SORT INPUT=PRFLP004 DSORT FN=LAPGEXTR,LA F2=LAPGEXTR,LA , OP=T,F,A KF=A,0001,0016,A,0047,0005 SL=I * SORT COMPLETE * BEGIN PRINT LRPP04 * PRINT COMPLETE LPGCT2 INPUT=PRFLP004 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ 39402270053 BROWN, WILLIAM D 000060671 39402272158 WILLIAMS, FRANK G 000107634 39402273255 RAGLAND, HENRY E 000068271 39402276951 BAXTER, THOMAS H 000050917 39402277058 ANDERSON, MARYANN 000102500 39402574959 BENTON, JOANNE 000019965 39404773658 ACCESSORY CNTRLS EQUIP 000109160 39404799356 WALDMANN, ARTHUR J 000012813 39404835853 RENEHAN, W N STAN 000027229 39404853153 OGRODNIK, ROBERT V 000123689 39406510959 OGRUDEK, ALLAN J 000011115 39408096353 BELMONT GREETING CARD 000205886 c  3r AL P$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm ENGINEERING FILE INFORMATION LISTING LOGICAL UNIT 01 CORE ALLOCATOR  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 02 SOFTWARE DUMMY DEVICE  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 03 SOFTWARE DUMMY DEVICE  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 04 1810-1 LIAT CRT/PRINTER  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 05 UNDEFINED DEVICE  DATE TIME FAILURE CODE HARDWARE STATUS  18 DEC 79 1344:24 49 FFFF  18 DEC 79 1344:18 48 FFFF  18 DEC 79 1342:28 49 FFFF  18 DEC 79 1342:21 48 FFFF  18 DEC 79 1340:22 49 FFFF  18 DEC 79 1340:16 48 FFFF  18 DEC 79 1338:25 49 FFFF  18 DEC 79 1338:18 48 FFFF  18 DEC 79 1324:28 49 FFFF  18 DEC 79 1324:21 48 FFFF  18 DEC 79 1316:31 49 FFFF  18 DEC 79 1316:25 48 FFFF  18 DEC 79 1259:25 49 FFFF  18 DEC 79 1259:19 48 FFFF  3s  LOGICAL UNIT 06 1860-92 LCTT 9TK MAG TAPE  DATE TIME FAILURE CODE HARDWARE STATUS  22 JAN 80 1628:07 14 A000  18 DEC 79 1157:03 14 A000  18 DEC 79 1147:58 14 A000  17 DEC 79 1626:58 02 A061  17 DEC 79 1053:16 03 A129  17 DEC 79 1040:59 02 A005  17 DEC 79 1032:46 02 A061  17 DEC 79 1031:19 02 A000  17 DEC 79 1027:26 03 A129  09 JAN 80 1530:58 00 A005  05 JAN 80 1446:47 02 A129  05 JAN 80 1439:39 14 A000  05 JAN 80 1414:48 02 A061  05 JAN 80 1406:04 02 A129  20 DEC 79 1434:46 02 A061  20 DEC 79 1429:36 00 A005  19 DEC 79 2040:36 02 A061  19 DEC 79 1655:08 14 A000  19 DEC 79 1648:56 02 A061  19 DEC 79 1636:08 14 A000  19 DEC 79 1631:16 14 A000  19 DEC 79 1406:49 15 A005  19 DEC 79 1406:12 14 A000  19 DEC 79 1406:00 14 A000 LOGICAL UNIT 07 MAGNETIC TAPE 6Y  3t SIMULATOR  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 08 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS  09 JAN 80 1540:03 82 0104 LOGICAL UNIT 09 1827-30/60 LINE PRINTER  DATE TIME FAILURE CODE HARDWARE STATUS  22 JAN 80 1708:19 02 0038  22 JAN 80 1704:48 02 0038  18 DEC 79 1055:04 02 0038  17 DEC 79 1449:16 02 0030  17 DEC 79 1449:10 02 0038  16 DEC 79 1552:51 02 0038  17 DEC 79 1109:55 02 0038  17 DEC 79 1108:28 02 0038  17 DEC 79 1034:47 02 0038  17 DEC 79 1020:56 02 0030  17 DEC 79 1011:35 02 0038  15 JAN 80 1053:38 02 0030  15 JAN 80 1014:07 02 0038  14 JAN 80 0904:42 02 0030  17 DEC 79 0806:34 02 0038  11 JAN 80 1113:23 02 0038  10 JAN 80 1313:38 02 0038  10 JAN 80 1309:27 02 0038  10 JAN 80 1231:29 02 0038  09 JAN 80 1500:54 02 0038 7I  3u   09 JAN 80 1038:32 02 0038  08 JAN 80 1209:25 02 0038  08 JAN 80 1151:42 02 0030  08 JAN 80 1142:39 02 0030 LOGICAL UNIT 10 1829-30/60 CARD READER  DATE TIME FAILURE CODE HARDWARE STATUS  17 DEC 79 1625:35 00 0403  17 DEC 79 1625:28 00 0403  19 DEC 79 2146:01 14 1220  19 DEC 79 2145:39 14 1220  19 DEC 79 2144:37 14 1220  19 DEC 79 2143:44 14 1220  19 DEC 79 2143:20 14 1220  19 DEC 79 2142:33 14 1220 LOGICAL UNIT 11 1860-92 LCTT 9TK MAG TAPE  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 12 1827-30/60 LINE PRINTER  DATE TIME FAILURE CODE HARDWARE STATUS  22 JAN 80 1558:21 02 0030  22 JAN 80 1539:58 38 0430  20 DEC 79 1306:23 02 0038  20 DEC 79 1222:31 02 0038  20 DEC 79 0942:05 02 0030  18 DEC 79 0851:54 02 0038  17 DEC 79 1639:50 02 0038  16 DEC 79 1345:16 02 0030  3v   16 DEC 79 1344:51 02 0038  15 JAN 80 1031:13 02 0038  11 JAN 80 1438:06 02 0038  10 JAN 80 1336:38 02 0038  10 JAN 80 1318:42 02 0038  09 JAN 80 1604:18 02 0038  09 JAN 80 1517:36 02 0038  09 JAN 80 1319:04 02 0038  09 JAN 80 1146:01 02 0038  09 JAN 80 1110:34 02 0038  09 JAN 80 0930:55 02 0038  08 JAN 80 1632:18 06 0030  08 JAN 80 1604:33 02 0038  08 JAN 80 1530:42 06 0030  08 JAN 80 1520:44 06 0030  08 JAN 80 1518:49 38 0430 LOGICAL UNIT 13 SOFTWARE BUFFERING DEVICE  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 14 SOFTWARE BUFFERING DEVICE  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 15 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS  10 JAN 80 1046:36 82 0104 LOGICAL UNIT 16 1860-92 LCTT 9TK MAG TAPE  DATE TIME FAILURE CODE HARDWARE STATUS  17 DEC 79 1621:55 02 A061  05 JAN 80 1455:3S  3w 03 02 A129  04 JAN 80 1157:36 02 A061 LOGICAL UNIT 17 1860-92 LCTT 9TK MAG TAPE  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 18 1860-92 LCTT 9TK MAG TAPE  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 19 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 20 PSEUDO TAPE UNIT  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 21 PSEUDO TAPE UNIT  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 22 PSEUDO TAPE UNIT  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 23 PSEUDO TAPE UNIT  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 24 PSEUDO TAPE UNIT  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 25 PSEUDO TAPE UNIT  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 26 1827-30/60 LINE PRINTER  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 27 1827-30/60 LINE PRINTER  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 28 MAGNETIC TAPE SIMULATOR  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 29 1833-1 STORAGE MODULE DRIVE 50MB   3x   DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 30 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 31 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 32 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 33 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS   ENGINEERING FILE INFORMATION LISTING LOGICAL UNIT 09 1827-30/60 LINE PRINTER  DATE TIME FAILURE CODE HARDWARE STATUS  22 JAN 80 1708:19 02 0038  22 JAN 80 1704:48 02 0038  18 DEC 79 1055:04 02 0038  17 DEC 79 1449:16 02 0030  17 DEC 79 1449:10 02 0038  16 DEC 79 1552:51 02 0038  17 DEC 79 1109:55 02 0038  17 DEC 79 1108:28 02 0038  17 DEC 79 1034:47 02 0038  17 DEC 79 1020:56 02 0030  17 DEC 79 1011:35 02 0038  15 JAN 80 1053:38 02 0030  15 JAN 80 1014:07 02 0038  3y   14 JAN 80 0904:42 02 0030  17 DEC 79 0806:34 02 0038  11 JAN 80 1113:23 02 0038  10 JAN 80 1313:38 02 0038  10 JAN 80 1309:27 02 0038  10 JAN 80 1231:29 02 0038  09 JAN 80 1500:54 02 0038  09 JAN 80 1038:32 02 0038  08 JAN 80 1209:25 02 0038  08 JAN 80 1151:42 02 0030  08 JAN 80 1142:39 02 0030   ENGINEERING FILE INFORMATION LISTING LOGICAL UNIT 08 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 15 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 19 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 29 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 30 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 31 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 32 1833-1 STORAGE MODULE DRIVE 50MB  D  3z ATE TIME FAILURE CODE HARDWARE STATUS LOGICAL UNIT 33 1833-1 STORAGE MODULE DRIVE 50MB  DATE TIME FAILURE CODE HARDWARE STATUS  __ AL#  FILERR SUBROUTINE 3C6E 19,24,30,43  GETS SUBROUTINE 3C04 26  OPENFL SUBROUTINE 3BE5 17,22  PGMIN SUBROUTINE 3BDB 15  PGMOUT SUBROUTINE 3C8B 51  PUTS SUBROUTINE 3C64 40  Q8STP INTEGER.FN. 3C8D   LABELED STATEMENTS : ------------------   LABEL ADDRESS REFERENCED BY STATEMENT NB :   50 3BF5 19,22  100 3C03 23,26,48  115 3C1E 29,32  200 3C34 35  300 3C75 32,35,42,45  850 3C83 27,46,49  900 3C8A 20,25,31,44,51  LRPE04 0000 1 G  3{4   $*LIBEDT  LIB  IN  *K,I8,P8  IN  *P,F,2 ! LRPE04 7900 ! FMENTP B58E F58 A ITOS CCS 3.0 SL-149 ! CCSBLK B5EA A03 A CCS CCS 3.0 SL-149 ! CCSMVA B5FA A08 A CCS CCS 3.0 SL-149 ! FILERR B629 B52 F CCS CCS 3.0 SL-149 ! Q8PRMS B6DB R99 A RPG CCS 3.0 SL-149 ! PARABN B6FF S53 A RPG CCS 3.0 SL-149 ! CCSHXA B711 A07 A CCS CCS 3.0 SL-149  IN  *K,I8  IN  *N,LRPE04,,,B  IN  *Z __mmmmmmmmALEP$$ mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm$ JOB,J002,LA D 1700 MASS STORAGE OPERATING SYSTEM VERSION 5.0 DATE OF RUN: 01/22/80 SYSTEM ID: PRODUCT TEST CYCLE NO. 1 (08/28/79) se  3|H D JJJ 00000000000 00000000000 22222222222 D JJJ 0000000000000 0000000000000 2222222222222 D JJJ 0000000000000 0000000000000 2222222222222 D JJJ 000 000 000 000 222 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ 000 000 000 000 222 D JJJ JJJ 000 000 000 000 222 D JJJJJJJJJJJJJ 0000000000000 0000000000000 2222222222222 D JJJJJJJJJJJJJ 0000000000000 0000000000000 2222222222222 D JJJJJJJJJJJ 00000000000 00000000000 2222222222222 D $*K,P2 $*RPGII  H1 RPG II COMPILER PAGE 0001 H H 0001 H LRPP04 3  3}IALIPLA 39401537056 DONATO CONSTRUCTION CO 000142938 * BEGIN EXTRACT LRPE04 * EXTRACT COMPLETE * BEGIN SORT INPUT=PRFLP004 DSORT FN=LAPGEXTR,LA F2=LAPGEXTR,LA , OP=T,F,A KF=A,0001,0016,A,0047,0005 SL=I * SORT COMPLETE * BEGIN PRINT LRPP04 * PRINT COMPLETE LPGCT2 INPUT=PRFLP004 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ 39402270053 BROWN, WILLIAM D 000060671 39402272158 WILLIAMS, FRANK G 000107634 39402273255 RAGLAND, HENRY E 000068271 39402276951 BAXTER, THOMAS H 000050917 39402277058 ANDERSON, MARYANN 000102500 39402574959 BENTON, JOANNE 000019965 39404773658 ACCESSORY CNTRLS EQUIP 000109160 39404799356 WALDMANN, ARTHUR J 000012813 39404835853 RENEHAN, W N STAN 000027229 39404853153 OGRODNIK, ROBERT V 000123689 39406510959 OGRUDEK, ALLAN J 000011115 39408096353 BELMONT GREETING CARD 000205886 39408437250 HASSETT, ROBERT W 000050044 39408758457 MAGBEE, CONSTANCE G 000077287 39420112352 SNYDER, JOHN L 000038866 H  3~I 89420274251 YEILDING, HAROLD 000108343 89420306954 HALL, E CURTIS 000055555 89420427750 BRANCH, JENE J 000056819ALIPLA 89420501752 DILWORTH, RAYMOND D 000105450 * BEGIN EXTRACT LRPE00 * EXTRACT COMPLETE * BEGIN PRINT LRPP00 * PRINT COMPLETE LPGCT2 INPUT=PRFLP000 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ARET C 000010296 89420899156 LORENZO, FELIX C 000045668 89420945058 JOHNSON, WILLIAM C 000034237 89420960255 5 GENERAL MARKETING I 000039674 89420976954 ROBERTS, JAMES 000096543 89423144055 NEEDHAM, RONALD M 000137964 89426148855 GILMORE, CHARLES G 000001000 89430117953 ELLSWORTH, DON R 000007090 89430194952 DANILLOWICZ, KASMIR 000000600 89430258658 TIFFEN, GREGG 000012456 89430300252 SCHEPKE, D MICHAEL 000100394 89430397159 O NEILL, DONALD J 000058874 89430476755 WEINGART, GEORGE M 000452798 89430605759 SUSSMAN, RONNA 000063262 89430703851 O BRIEN, RICHARD E 000033623 89430730151 JOHNSON, WADE E 000000029 89430802653 BURGESS, HARVEY D 000003145 39408264050 HANKIN, IRVING E 000076520 f  3IFALIPLA 89420501752 DILWORTH, RAYMOND D 000105450 * BEGIN EXTRACT LRPE00 * EXTRACT COMPLETE * BEGIN PRINT LRPP00 * PRINT COMPLETE LPGCT2 INPUT=PRFLP000 UTIL FLUSH,HO=LOCL,DO=- EX MNUPRO __ARET C 000010296 89420899156 LORENZO, FELIX C 000045668 89420945058 JOHNSON, WILLIAM C 000034237 89420960255 5 GENERAL MARKETING I 000039674 89420976954 ROBERTS, JAMES 000096543 89423144055 NEEDHAM, RONALD M 000137964 89426148855 GILMORE, CHARLES G 000001000 89430117953 ELLSWORTH, DON R 000007090 89430194952 DANILLOWICZ, KASMIR 000000600 89430258658 TIFFEN, GREGG 000012456 89430300252 SCHEPKE, D MICHAEL 000100394 89430397159 O NEILL, DONALD J 000058874  3pBALpBO {$$ EXT 00250120115 807 BUS NAME 00260121930 1472 33******************BORROWER'S CHANGE SCREEN 00010012824 0BORROWER'S CHANGE SCREEN 00020030109 0ACCT NAME 00030031430 182 BORROWER'S NAME 00040035206 0ACCT # 00050036016 12 ACCT # 00060040111 0LAST CHANGE 00070041408 8631 LAST CHANGE 00080055108 0PREVIOUS 00090060115 801 HOME ADDR 1 00100061930 482 HOME ADDR 1 0011006513007572 PREVIOUS ADDRESS LINE 1 00120070115 802 HOME ADDR 2 00130071930 782 HOME ADDR 2 0014007513007872 PREVIOUS ADDRESS LINE 2 00150080115 803 CITY, STATE 00160081920 1082 CITY, STATE 0017008512008172 PREVIOUS CITY/STATE 00180090115 804 HOME ZIP 00190091905 1282 ZIP 0020009510508372 PREVIOUS ZIP 00210100115 805 HOME PHONE 00220101910 1334 PHONE # 00230110115 806 HOME EXT 00240111904 1432 EXT 00250120115 807 BUS NAME 00260121930 1472 BUS NAME 00270130115 808 BUS ADDR 00280131930 1772 BUS ADDR 00290140115 809 CITY, STATE 00300141920 2072 CITY,STATE 00310150115 810 BUS ZIP 00320151905 2272 ZIP 00330160115 811 BUS PHONE 00340161910 2324 BUS PHONE 00350170111 812 BUS EXT 00360171904 2422 BUS EXT 00370230140 0ENTER ITEM,CHANGE OR NEXT FUNCTION OR AC 00380234140 0TION,RESULT,LETTER REQUEST,COMMENT 00390END 0040002******************COLLECTION ACTIVITY SCREEN 00410012020 0COLLECTION ACTIVITY 00420030110 0ACCT NAME 00430031230 182 ACCT NAME 00440035013 0ACCT # 00450036516 012 ACCT #  3pV 00460040109 0AMT DELQ 00470041209 8873 AMT DELQ 00480045013 0LAST LTR DATE 00490046506 8421 LAST LRT DATE 00500050109 0DELQ DATE 00510051206 8751 DELQ DATE 00520055013 0LAST LTR AMT 00530056509 8483 LAST LRT AMT 00540070115 0PERM COMMENT 1: 00550072130 6672 COMMENT 1 00560080115 0PERM COMMENT 2: 00570082130 6972 COMMENT 2 00580090115 0PERM COMMENT 3: 00590092130 7272 COMMENT 3 00600110117 0CONTACT AC RS LR 00610120131 0 DATE CD CD CD COLL COMMENTS 00620130180 5 AC RS LR COMMENTS 00630END 0064035******************SUPERVISOR SCREEN 00650012726 0SUPERVISOR'S CHANGE SCREEN 00660030109 0ACCT NAME 00670031830 182 ACCT NAME 00680035409 0ACCT # 00690036516 12 ACCT # 00700040110 0CURR QUEUE 00710041804 2712 CURR QUEUE 00720045410 0AMT DELQ 00730046510 8873 AMT DELQ 00740050115 0LAST QUEUE CHNG 00750051806 3001 LAST QUEUE CHNG 00760055409 0DELQ DATE 00770056506 8751 DELQ DATE 00780060111 0CURR CLIENT 0079006180410722 CURR CLIENT 00800065411 0PREV CLIENT 0081006660412292 PREV CLIENT 00820091519 801 REASSIGN CLIENT 0083009390413822 REASSIGN CLIENT 00840101522 802 NEXT CONTACT DATE 00850103906 2751 NEXT CONTACT DATE 00860111520 803 PRIORITY CODE 00870113904 2812 PRIORITY CODE 00880121522 804 SUPV FOR THIS ACCT 00890123904 2872 SUPV FOR ACCT 00900131522 805 SUPV STATUS CODE 00910133902 2922 STATUS CODE 00920141522 806 QUEUE REASSIGN CODE 00930143901 2942 REASSI  3pjGN CODE 00940151522 807 ACCT REVIEW CODE 00950153901 2912 REVIEW CODE 00960161513 808 PP AMOUNT 0097016390910223 PROMISED TO PAY AMOUNT - CHECKOUT!!00980230140 0ENTER ITEM,CHANGE OR NEXT FUNCTION OR AC 00990234140 0TION,RESULT,LETTER REQUEST,COMMENT 01000END 0101010******************ACCOUNT MASTER SCREEN 01020012825 0BORROWER'S MASTER SCREEN 01030020511 0SUPV ACCT # 01040021704 2872 SP ACCT # 01050026504 0TIME 01060027104 7 TIME 01070040130 182 BORROWER'S NAME 01080043407 0QUEUE # 01090044704 2712 QUEUE # 01100045406 0ACCT # 01110046516 12 ACCT # 01120050130 482 HOME ADDR 1 01130053411 0POINT SCORE 01140054803 9472 POINT SCORE 01150055408 0AMT DELQ 01160057109 8873 AMT DELQ 01170060130 782 HOME ADDR 2 01180063409 0ACCT TYPE 01190064604 9632 ACCT TYPE 01200065409 0DELQ DATE 01210067306 8751 DELQ DATE 01220070120 1082 CITY,STATE 1 01230072605 1282 ZIP 01240073409 0STATUS CD 01250075001 3062 STATUS CD 01260075408 0PREV QUE 01270077704 2962 PREV QUE 01280080106 0HOME # 01290080810 1334 HOME # 01300083408 0PP FLAG 01310085001 2852 PP FLAG 01320085408 0PRIORITY 01330087704 2812 01340090106 0SAL CD 01350090801 172 SAL CD 01360095412 0NEXT CONTACT 01370097306 2751 NEXT CONTACT 01380110130 1472 BUS NAME 01390113410 0SOC SEC # 01400114709 2626 SOC SEC # 01410120130 1772 BUS ADDR  3p~ 01420123410 0ADL ACCT # 01430124716 2462 ADL ACCT # 01440130120 2072 CITY, STATE 01450132605 2272 ZIP 01460133410 0SAV ACCT # 01470140106 0WORK # 01480140810 2324 WORK # 01490142303 0EXT 01500142704 2422 EXT 01510143410 0CK ACCT # 01520153410 0ENTRY DATE 01530154706 8691 ENTRY DATE 01540160115 0NUMBER COSIGNER 01550161801 9382 COSIGNER 01560163411 0LAST UPDATE 01570164706 8631 LAST UPDATE 01580173415 0PERM COMMENT 1: 01590175130 6672 COMMENT 1 01600183415 0PERM COMMENT 2: 01610185130 6972 COMMENT 2 01620193415 0PERM COMMENT 3: 01630195130 7272 COMMENT 3 01640190115 0LAST ACTIVITY 01650200328 0DATE AC RS LT COLL COMMENT 016602101 9 MOST RECENT COLLECTION ACTIVITY 01670230140 0PLEASE ENTER NEXT FUNCTION OR ACTION,RES 01680234140 0ULT,LETTER REQUEST,COMMENT 01690END 0170020******************FINANCIAL SCREENS 01710013218 0FINANCIAL HISTORY 01720030109 0ACCT NAME 01730031230 182 ACCT NAME 01740035706 0ACCT # 01750036416 12 01760040109 0ACCT TYPE 01770041204 9632 ACCT TYPE 01780050109 0LOAN OFF 01790051208 9552 LOAN OFF 01800060115 0SPEC DESC FIELD 01810061840 9732 DESC FIELD 01820080110 0AMT DELQ 01830081409 8873 AMT DELQ 01840083310 0OPEN DATE 01850084706 8811 OPEN DATE 0186008560911033 LAST PAYMENT 0187008690611391 LAST PAYMENT DATE 01880090110 0DELQ DATE 01890091606 8751 DELQ DAT]  3pE 01900093311 0OPEN AMOUNT 01910094509 9293 OPEN AMOUNT 01920100111 0LAST UPDATE 01930101606 8571 LAST UPDATE 01940103312 0CUR BALANCE 01950104509 8963 CURR BALANCE 01960110111 0ENTRY DATE 01970111606 8691 ENTRY DATE 01980113311 0CUR PAYOFF 019901145 9 9053 CUR PAYOFF 02000130114 0CURRENT CLIENT 02010133315 0PREVIOUS CLIENT 0202014013010822 CURR CLIENT FIRM 0203014333012392 PREV CLIENT FIRM 0204015013111122 CURR CONTACT 0205015333012692 PREV CONTACT 0206016011012024 CURR CLIENT PHONE 0207016331013594 PREV CLIENT PHONE 0208017010912163 BAL DUE AT ASSIGN-CURR 0209017330913733 BAL DUE AT ASSIGN-PREV 02100200132 0DATE OF TAPE, IF IN TAPE HISTORY 0211021350610311 TAPE TO HSITORY 02120230140 0PLEASE ENTER NEXT FUNCTION OR ACTION,RES 02130234140 0ULT,LETTER REQUEST,COMMENT 02140END 0215004******************COSIGNER SCREEN, PART 1 02160013315 0** COSIGNER ** 02170030509 0ACCT NAME 02180031630 182 BORROWER'S NAME 02190035106 0ACCT # 02200035916 12 ACCT # 02210040509 0AMT DELQ 02220041610 8873 9999999.99 02230042809 0DELQ DATE 02240043906 8751 DATE 02250END 0226094******************COSIGNER'S SCREEN, PART 2 02270060110 0COSIGNER 1 02280061302 801 02290061630 202 COSIGNER 1 02300065107 806 HOME 02310066010 1054 HOME PHONE 02320071302 802 02330071630 502 ADDRESS 02340075106 807 EXT 02350076004 1152 EXT 02360081302 803 02370081620 802 CTY STATN  3pE 02380085106 808 BUS 02390086010 1194 BUS-PH-NO 02400091302 804 02410091605 1002 ZIP 02420095106 809 EXT 02430096004 1292 EXT 02440101305 805 02450101601 182 SAL CODE 02460120110 0COSIGNER 2 02470121302 810 02480121630 1352 COSIGNER 2 NAME 02490125107 815 HOME 02500126010 2204 HOME PHONE 02510131302 811 02520131630 1652 HOME ADDRESS 02530135106 816 EXT 02540136004 2302 EXT 02550141302 812 02560141620 1952 CTY STATE 02570145106 817 BUS 02580146010 2344 BUS PHONE 02590151302 813 02600151605 2152 ZIP 02610155106 818 EXT 02620156004 2442 EXT 02630161302 814 02640161601 1332 SAL CODE 02650180110 0COSIGNER 3 02660181302 819 02670181630 2502 COSIGNER 3 NAME 02680185107 824 HOME 02690186010 3354 HOME PHONE 02700191302 820 02710191630 2802 HOME ADDR 02720195106 825 EXT 02730196004 3452 EXT 027402013 2 821 02750201620 3102 CITY STATE 02760205106 826 BUS 02770206010 3494 BUS PHONE 02780211302 822 02790211605 3302 ZIP 02800215106 827 EXT 02810216004 3592 EXT 02820221302 823 02830221601 2482 SAL CD 02840230140 0ENTER ITEM,CHANGE OR NEXT FUNCTION OR AC 02850234140 0TION,RESULT,LETTER REQUEST,COMMENT  3p 02860END 0287031******************SELECTION SCREEN 02880114021 0A = AUTOMATIC 02890124016 0B, = NAME 02900134026 0N,<#> = ACCOUNT NUMBER 02910144025 0C, = COSIGNER NAME 02920154025 0P = PAYMENT ENTRY 02930164016 0E = EXIT 02940230122 0PLEASE ENTER SELECTION 02950END 0296036******************SELECTION SCREEN, ACCOUNT BUSY 02970114021 0A = AUTOMATIC 02980124016 0B, = NAME 02990134026 0N,<#> = ACCOUNT NUMBER 03000144025 0C, = COSIGNER NAME 03010154025 0P = PAYMENT ENTRY 03020164016 0E = EXIT 03030230162 0SELECTED ACCOUNT BUSY, TRY AGAIN LATER. PLEASE ENTER SELECTION 03040END 0305037******************SELECTION SCREEN, ACCOUNT NOT FOUND 03060114021 0A = AUTOMATIC 03070124016 0B, = NAME 03080134026 0N,<#> = ACCOUNT NUMBER 03090144025 0C, = COSIGNER NAME 03100154025 0P = PAYMENT ENTRY 03110164016 0E = EXIT 03120230150 0SELECTED ACCOUNT NOT FOUND, PLEASE ENTER SELECTION 03130END 0314039******************SELECTION SCREEN, ACCOUNT NOT FOUND COSIGNER SEARCH 03150114021 0A = AUTOMATIC 03160124016 0B, = NAME 03170134026 0N,<#> = ACCOUNT NUMBER 03180144025 0C, = COSIGNER NAME 03190154025 0P = PAYMENT ENTRY 03200164016 0E = EXIT 03210220113 0END OF SEARCH 03220221602 12 NUMBER OF BUSY ACCOUNTS 03230221922 0ACCOUNTS WERE BUSY AND 03240230150 0SELECTED ACCOUNT NOT FOUND, PLEASE ENTER SELECTION 03250END 0326038******************SELECTION SCREEN, ACCOUNT NOT IN ALLOWED QUEUE 03270114021 0A = AUTOMATIC 03280124016 0B, = NAME 03290134026 0N,<#> = ACCOUNT NUMBER 03300144025 0C, = COSIGNER NAME 03310154025 0P = PAYMENT ENTRY 03320164016 0E = EXIT 03330230164 0SELECTED ACCOUNT IN A QUEUE NOT ALLOW  3pED FOR YOUR REVIEW. PLEASE 03340236515 0ENTER SELECTION 03350END 0336001******************END OF DAILY ASSIGNMENTS 03370111025 0END OF DAILY ASSIGNMENTS. 03380END 0339030******************LOGIN PROMPT SCREEN 03400190124 0CREDIT COLLECTION SYSTEM 03410200118 0COLECT VERSION 2.0 034202101 7 03430230125 0PLEASE ENTER COLLECTOR ID 03440END 0345065 03460230133 0INVALID SELECTION, PLEASE REENTER 03470END 0348066******************NAME SEARCH PROMPT SCREEN 03490190418 0# = SELECT NAME 03500200422 0D = DISCONTINUE SEARCH 03510210419 0 = CONTINUE SEARCH 03520230122 0PLEASE ENTER SELECTION 03530END 0354034******************COSIGNER NAME SEARCH DISPLAY SCREEN 03550170130 202 COSIGNER NAME 03560180130 502 COSIGNER ADDRESS 03570190120 802 COSIGNER CITY,STATE 03580192305 1002 COSIGNER ZIP 03590203511 0C = CORRECT 03600213515 0D = DISCONTINUE 03610223512 0 = CONTINUE 03620230122 0PLEASE ENTER SELECTION 03630END 0364048 03650230140 0PLEASE ENTER PROMISED TO PAY DATE,AMOUNT 03660END 0367049 03680230156 0FORMAT ERROR, PLEASE REENTER PROMISED TO PAY DATE,AMOUNT 03690END 0370050 03710230156 0INVALID DATE, PLEASE REENTER PROMISED TO PAY DATE,AMOUNT 03720END 0373051 03740230158 0INVALID AMOUNT, PLEASE REENTER PROMISED TO PAY DATE,AMOUNT 03750END 0376052 03770230115 0PROMISED TO PAY 0378023170910223 PROMISED TO PAY AMOUNT 03790232802 0BY 0380023310610161 PROMISED TO PAY DATE 03810233939 0. VERIFY 'OK', OR ENTER NEW DATE,AMOU  3pNT 03820END 0383053 03840230140 0PLEASE ENTER ADDRESSEE CODE,LETTER CODE, 03850234125 0LETTER DATE,LETTER AMOUNT 03860END 0387055 03880230140 0INVALID ADDRESSEE, REENTER ADDRESSEE COD 03890234139 0E,LETTER CODE,LETTER DATE,LETTER AMOUNT 03900END 0391054 03920230140 0FORMAT ERROR, REENTER ADDRESSEE CODE,LET 03930234134 0TER CODE,LETTER DATE,LETTER AMOUNT 03940END 0395056 03960230140 0INVALID LETTER CODE, REENTER ADDRESSEE,L 03970234136 0ETTER CODE,LETTER DATE,LETTER AMOUNT 03980END 0399057 04000230140 0INVALID LETTER DATE, REENTER ADDRESSEE,L 04010234136 0ETTER CODE,LETTER DATE,LETTER AMOUNT 04020END 0403058 04040230140 0INVALID LETTER AMOUNT, REENTER ADDRESSEE 04050234138 0,LETTER CODE,LETTER DATE,LETTER AMOUNT 04060END 0407059 04080230106 0LETTER 04090230802 412 LETTER CODE 04100231110 0TO ADDRESS 04110232201 1052 ADDRESSEE CODE 04120232301 0. 04130232506 1061 LETTER REQUEST DATE 04140233303 0, $ 04150233609 1123 LETTER REQUEST AMOUNT 04160234733 0REQUESTED. ENTER OK OR NEW FIELDS 04170END 0418060 04190230139 0A COMMENT IS REQUIRED, PLEASE ENTER ONE 04200END 0421061 04220230143 0COMMENT ENTERED IS TOO LONG, PLEASE REENTER 04230END 0424042 04250230140 0FORMAT ERROR, ENTER NEXT FUNCTION OR ACT 04260234133 0ION,RESULT,LETTER REQUEST,COMMENT 04270END 0428043 04290230139 0FORMAT ERROR, ENTER ITEM,CHANGE OR NE  3pXT 04300234140 0FUNCTION OR ACTION,RESULT,LETTER,COMMENT 04310END 0432044 04330230140 0COMMENT TOO LONG, ENTER NEXT FUNCTION OR 04340234137 0 ACTION,RESULT,LETTER REQUEST,COMMENT 04350END 0436045 04370230139 0COMMENT LONG, ENTER ITEM,CHANGE OR NEXT 04380234140 0FUNCTION OR ACTION,RESULT,LETTER,COMMENT 04390END 0440046 04410230140 0INVALID RESULT, ENTER NEXT FUNCTION OR A 04420234135 0CTION,RESULT,LETTER REQUEST,COMMENT 04430END 0444047 04450230140 0INVALID RES, ENTER ITEM,CHANGE OR NEXT F 04460234139 0UNCTION OR ACTION,RESULT,LETTER,COMMENT 04470END 0448062 04490230130 0PLEASE ENTER NEXT CONTACT DATE 04500END 0451063 04520230146 0INVALID DATE, PLEASE REENTER NEXT CONTACT DATE 04530END 0454040 04550230163 0NO ACTIVITY ALLOWED ON THIS ACCOUNT, PLEASE ENTER NEXT FUNCTION 04560END 0457041 04580230140 0NO ACTIVITY ALLOWED ON THIS ACCOUNT, PLE 04590234138 0ASE ENTER ITEM,CHANGE OR NEXT FUNCTION 04600END 0461064 04620230139 0INVALID DATE, ENTER ITEM,CHANGE OR NEXT 04630234140 0FUNCTION OR ACTION,RESULT,LETTER,COMMENT 04640END 0465070 04660230124 0PLEASE ENTER ACTION CODE 04670END 0468071 04690230124 0PLEASE ENTER RESULT CODE 04700END 0471072 04720230140 0INVALID ACTION, ENTER NEXT FUNCTION OR A 04730234135 0CTION,RESULT,LETTER REQUEST,COMMENT 04740END 0475073 04760230140 0INVALID ACT, ENTER ITEM,CHANGE OR NEXT F 04770234139 0UNCTION OR ACTION,RESULT,LETTER,COMMEW  3q NT 04780END 0479074 04800230133 0PLEASE ENTER PROMISED TO PAY DATE 04810END 0482075 04830230149 0INVALID DATE, PLEASE REENTER PROMISED TO PAY DATE 04840END 0485076 04860230135 0PLEASE ENTER PROMISED TO PAY AMOUNT 04870END 0488077 04890230153 0INVALID AMOUNT, PLEASE REENTER PROMISED TO PAY AMOUNT 04900END 0491078 04920230124 0PLEASE ENTER LETTER CODE 04930END 0494079 04950230146 0A LETTER IS REQUIRED, PLEASE ENTER LETTER CODE 04960END 0497080 04980230147 0INVALID LETTER CODE, PLEASE REENTER LETTER CODE 04990END 0500081 05010230127 0PLEASE ENTER ADDRESSEE CODE 05020END 0503082 05040230153 0INVALID ADDRESSEE CODE, PLEASE REENTER ADDRESSEE CODE 05050END 0506083 05070230124 0PLEASE ENTER LETTER DATE 05080END 0509084 05100230140 0INVALID DATE, PLEASE REENTER LETTER DATE 05110END 0512085 05130230126 0PLEASE ENTER LETTER AMOUNT 05140END 0515086 0516023010601061 LETTER DATE 05170230901 0, 0518023110901123 LETTER AMOUNT 05190232241 0,REQUESTED. VERIFY 'OK' OR ENTER NEW DATE 05200END 0521087 05220230120 0PLEASE ENTER COMMENT 05230END 0524088 05250230115 0PROMISED TO PAY  3q 0526023170910223 PROMISED TO PAY AMOUNT 05270232802 0BY 0528023310610161 PROMISED TO PAY DATE 05290233940 0. VERIFY 'OK' OR ENTER NEW PROMISED DATE 05300END 0531091******************CLIENT FILE MAINTENANCE - SELECTION SCREEN 05320012423 0CLIENT SELECTION SCREEN 05330114030 0A, = CLIENT NAME SEARCH 05340134035 0N,<#> = CLIENT NUMBER RETRIEVAL 05350154040 0S,<#> = CLIENT STATUS INQUIRY/UPDATE 05360174016 0E = EXIT 05370230122 0PLEASE ENTER SELECTION 05380END 0539092******************CLIENT FILE MAINTENANCE - CHANGE SCREEN 05400010108 0CLIENT # 0541001110400012 CLIENT NUMBER 05420012620 0CLIENT CHANGE SCREEN 05430040112 801,FIRM NAME 0544004203000052 FIRM NAME 05450060117 802,FIRM ADDRESS 1 0546006203000652 FIRM ADDRESS 1 05470080117 803,FIRM ADDRESS 2 0548008203000952 FIRM ADDRESS 2 05490100115 804,CONTACT NAME 0550010203000352 CONTACT NAME 05510120115 805,PHONE NUMBER 0552012201001254 PHONE NUMBER 05530140112 806,EXTENSION 0554014200401352 EXTENSION 05550160117 807,CURR COMM RATE 0556016200401452 CURRENT COMMISSION RATE 05570180117 808,PREV COMM RATE 0558018200401492 PREVIOUS COMMISSION RATE 05590230134 0ENTER CHANGE ITEM OR NEXT FUNCTION 05600END 0561093******************CLIENT FILE MAINTENANCE - FINANCIAL SCREEN 05620010108 0CLIENT # 0563001110400012 CLIENT NUMBER 05640012423 0CLIENT FINANCIAL SCREEN 05650030236 0# AMT AMT # AMT COMM 05660034233 0# AMT # COURT HISTORY 05670040138 0ACCT ACCT COL PIF PIF EARNED 05680044133 0CLD CLD ACT COSTS MO/YR 0569006010301592 NUMBER OF ACCTS PLACED- MONTH 1 0570006050701622 AMOUNT OF ACCTS PLACED- MONTH 1 0571006130701712 AMOUNT COLLECTED - MONTH 1 0572006210301802 NUMBER OF PAID-IN-FULL- MONTH 1 0573006250701832 AMOUNT OP  3q2F PAID-IN-FULL- MONTH 1 0574006330701922 COMMISSIONS EARNED - MONTH 1 0575006410302012 NUMBER OF ACCTS CLOSED- MONTH 1 0576006450702042 AMOUNT OF ACCTS CLOSED- MONTH 1 0577006530302132 NUMBER OF ACTIVE ACCTS- MONTH 1 0578006570702252 COURT COSTS - MONTH 1 0579006690201572 CLIENT HISTORY MONTH - MONTH 1 05800067101 0/ 0581006720201552 CLIENT HISTORY YEAR - MONTH 1 0582007010302472 NUMBER OF ACCTS PLACED- MONTH 2 0583007050702502 AMOUNT OF ACCTS PLACED- MONTH 2 0584007130702592 AMOUNT COLLECTED - MONTH 2 0585007210302682 NUMBER OF PAID-IN-FULL- MONTH 2 0586007250702712 AMOUNT OF PAID-IN-FULL- MONTH 2 0587007330702802 COMMISSIONS EARNED - MONTH 2 0588007410302892 NUMBER OF ACCTS CLOSED- MONTH 2 0589007450702922 AMOUNT OF ACCTS CLOSED- MONTH 2 0590007530303012 NUMBER OF ACTIVE ACCTS- MONTH 2 0591007570703132 COURT COSTS - MONTH 2 0592007690202452 CLIENT HISTORY MONTH - MONTH 2 05930077101 0/ 0594007720202432 CLIENT HISTORY YEAR - MONTH 2 0595008010303352 NUMBER OF ACCTS PLACED- MONTH 3 0596008050703382 AMOUNT OF ACCTS PLACED- MONTH 3 0597008130703472 AMOUNT COLLECTED - MONTH 3 0598008210303562 NUMBER OF PAID-IN-FULL- MONTH 3 0599008250703592 AMOUNT OF PAID-IN-FULL- MONTH 3 0600008330703682 COMMISSIONS EARNED - MONTH 3 0601008410303772 NUMBER OF ACCTS CLOSED- MONTH 3 0602008450703802 AMOUNT OF ACCTS CLOSED- MONTH 3 0603008530303892 NUMBER OF ACTIVE ACCTS- MONTH 3 0604008570704012 COURT COSTS - MONTH 3 0605008690203332 CLIENT HISTORY MONTH - MONTH 3 06060087101 0/ 0607008720203312 CLIENT HISTORY YEAR - MONTH 3 0608009010304232 NUMBER OF ACCTS PLACED- MONTH 4 0609009050704262 AMOUNT OF ACCTS PLACED- MONTH 4 0610009130704352 AMOUNT COLLECTED - MONTH 4 0611009210304442 NUMBER OF PAID-IN-FULL- MONTH 4 0612009250704472 AMOUNT OF PAID-IN-FULL- MONTH 4 0613009330704562 COMMISSIONS EARNED - MONTH 4 0614009410304652 NUMBER OF ACCTS CLOSED- MONTH 4 0615009450704682 AMOUNT OF ACCTS CLOSED- MONTH 4 0616009530304772 NUMBER OF ACTIVE ACCTS- MONTH 4 0617009570704892 COURT COSTS - MONTH 4 0618009690204212 CLIENT HISTORY MONTH - MONTH 4 06190097101 0/ 0620009720204192 CLIENT HISTORY YEAR - MONTH 4 0621010010305112 NUMBER OM  3qFF ACCTS PLACED- MONTH 5 0622010050705142 AMOUNT OF ACCTS PLACED- MONTH 5 0623010130705232 AMOUNT COLLECTED - MONTH 5 0624010210305322 NUMBER OF PAID-IN-FULL- MONTH 5 0625010250705352 AMOUNT OF PAID-IN-FULL- MONTH 5 0626010330705442 COMMISSIONS EARNED - MONTH 5 0627010410305532 NUMBER OF ACCTS CLOSED- MONTH 5 0628010450705562 AMOUNT OF ACCTS CLOSED- MONTH 5 0629010530305652 NUMBER OF ACTIVE ACCTS- MONTH 5 0630010570705772 COURT COSTS - MONTH 5 0631010690205092 CLIENT HISTORY MONTH - MONTH 5 06320107101 0/ 0633010720205072 CLIENT HISTORY YEAR - MONTH 5 0634011010305992 NUMBER OF ACCTS PLACED- MONTH 6 0635011050706022 AMOUNT OF ACCTS PLACED- MONTH 6 0636011130706112 AMOUNT COLLECTED - MONTH 6 0637011210306202 NUMBER OF PAID-IN-FULL- MONTH 6 0638011250706232 AMOUNT OF PAID-IN-FULL- MONTH 6 0639011330706322 COMMISSIONS EARNED - MONTH 6 0640011410306412 NUMBER OF ACCTS CLOSED- MONTH 6 0641011450706442 AMOUNT OF ACCTS CLOSED- MONTH 6 0642011530306532 NUMBER OF ACTIVE ACCTS- MONTH 6 0643011570706652 COURT COSTS - MONTH 6 0644011690205972 CLIENT HISTORY MONTH - MONTH 6 06450117101 0/ 0646011720205952 CLIENT HISTORY YEAR - MONTH 6 0647012010306872 NUMBER OF ACCTS PLACED- MONTH 7 0648012050706902 AMOUNT OF ACCTS PLACED- MONTH 7 0649012130706992 AMOUNT COLLECTED - MONTH 7 0650012210307082 NUMBER OF PAID-IN-FULL- MONTH 7 0651012250707112 AMOUNT OF PAID-IN-FULL- MONTH 7 0652012330707202 COMMISSIONS EARNED - MONTH 7 0653012410307292 NUMBER OF ACCTS CLOSED- MONTH 7 0654012450707322 AMOUNT OF ACCTS CLOSED- MONTH 7 0655012530307412 NUMBER OF ACTIVE ACCTS- MONTH 7 0656012570707532 COURT COSTS - MONTH 7 0657012690206852 CLIENT HISTORY MONTH - MONTH 7 06580127101 0/ 0659012720206832 CLIENT HISTORY YEAR - MONTH 7 0660013010307752 NUMBER OF ACCTS PLACED- MONTH 8 0661013050707782 AMOUNT OF ACCTS PLACED- MONTH 8 0662013130707872 AMOUNT COLLECTED - MONTH 8 0663013210307962 NUMBER OF PAID-IN-FULL- MONTH 8 0664013250707992 AMOUNT OF PAID-IN-FULL- MONTH 8 0665013330708082 COMMISSIONS EARNED - MONTH 8 0666013410308172 NUMBER OF ACCTS CLOSED- MONTH 8 0667013450708202 AMOUNT OF ACCTS CLOSED- MONTH 8 0668013530308292 NUMBER OF ACTIVE ACCTS- MONTH 8 0669013570708412 COURT CO+  3qZSTS - MONTH 8 0670013690207732 CLIENT HISTORY MONTH - MONTH 8 06710137101 0/ 0672013720207712 CLIENT HISTORY YEAR - MONTH 8 0673014010308632 NUMBER OF ACCTS PLACED- MONTH 9 0674014050708662 AMOUNT OF ACCTS PLACED- MONTH 9 0675014130708752 AMOUNT COLLECTED - MONTH 9 0676014210308842 NUMBER OF PAID-IN-FULL- MONTH 9 0677014250708872 AMOUNT OF PAID-IN-FULL- MONTH 9 0678014330708962 COMMISSIONS EARNED - MONTH 9 0679014410309052 NUMBER OF ACCTS CLOSED- MONTH 9 0680014450709082 AMOUNT OF ACCTS CLOSED- MONTH 9 0681014530309172 NUMBER OF ACTIVE ACCTS- MONTH 9 0682014570709292 COURT COSTS - MONTH 9 0683014690208612 CLIENT HISTORY MONTH - MONTH 9 06840147101 0/ 0685014720208592 CLIENT HISTORY YEAR - MONTH 9 0686015010309512 NUMBER OF ACCTS PLACED- MONTH 10 0687015050709542 AMOUNT OF ACCTS PLACED- MONTH 10 0688015130709632 AMOUNT COLLECTED - MONTH 10 0689015210309722 NUMBER OF PAID-IN-FULL- MONTH 10 0690015250709752 AMOUNT OF PAID-IN-FULL- MONTH 10 0691015330709842 COMMISSIONS EARNED - MONTH 10 0692015410309932 NUMBER OF ACCTS CLOSED- MONTH 10 0693015450709962 AMOUNT OF ACCTS CLOSED- MONTH 10 0694015530310052 NUMBER OF ACTIVE ACCTS- MONTH 10 0695015570710172 COURT COSTS - MONTH 10 0696015690209492 CLIENT HISTORY MONTH - MONTH 10 06970157101 0/ 0698015720209472 CLIENT HISTORY YEAR - MONTH 10 0699016010310392 NUMBER OF ACCTS PLACED- MONTH 11 0700016050710422 AMOUNT OF ACCTS PLACED- MONTH 11 0701016130710512 AMOUNT COLLECTED - MONTH 11 0702016210310602 NUMBER OF PAID-IN-FULL- MONTH 11 0703016250710632 AMOUNT OF PAID-IN-FULL- MONTH 11 0704016330710722 COMMISSIONS EARNED - MONTH 11 0705016410310812 NUMBER OF ACCTS CLOSED- MONTH 11 0706016450710842 AMOUNT OF ACCTS CLOSED- MONTH 11 0707016530310932 NUMBER OF ACTIVE ACCTS- MONTH 11 0708016570711052 COURT COSTS - MONTH 11 0709016690210372 CLIENT HISTORY MONTH - MONTH 11 07100167101 0/ 0711016720210352 CLIENT HISTORY YEAR - MONTH 11 0712017010311272 NUMBER OF ACCTS PLACED- MONTH 12 0713017050711302 AMOUNT OF ACCTS PLACED- MONTH 12 0714017130711392 AMOUNT COLLECTED - MONTH 12 0715017210311482 NUMBER OF PAID-IN-FULL- MONTH 12 0716017250711512 AMOUNT OF PAID-IN-FULL- MONTH 12 0717017330711602 COMMISSI>  3qnONS EARNED - MONTH 12 0718017410311692 NUMBER OF ACCTS CLOSED- MONTH 12 0719017450711722 AMOUNT OF ACCTS CLOSED- MONTH 12 0720017530311812 NUMBER OF ACTIVE ACCTS- MONTH 12 0721017570711932 COURT COSTS - MONTH 12 0722017690211252 CLIENT HISTORY MONTH - MONTH 12 07230177101 0/ 0724017720211232 CLIENT HISTORY YEAR - MONTH 12 07250196708 012 MONTH 0726020010312152 NUMBER OF ACCTS PLACED- LAST12 MOS 0727020050712182 AMOUNT OF ACCTS PLACED- LAST12 MOS 0728020130712272 AMOUNT COLLECTED - LAST12 MOS 0729020210312362 NUMBER OF PAID-IN-FULL- LAST12 MOS 0730020250712392 AMOUNT OF PAID-IN-FULL- LAST12 MOS 0731020330712482 COMMISSIONS EARNED - LAST12 MOS 0732020410312572 NUMBER OF ACCTS CLOSED- LAST12 MOS 0733020450712602 AMOUNT OF ACCTS CLOSED- LAST12 MOS 0734020530312692 NUMBER OF ACTIVE ACCTS- LAST12 MOS 0735020570712812 COURT COSTS - LAST12 MOS 07360206707 0SUMMARY 07370230119 0ENTER NEXT FUNCTION 07380END 0739008***************************** LEGAL AGENCY PAYMENT ENTRY SCREEN 07400022422 0PAYMENT ENTRY SCREEN # 07410024702 6312 07420050120 0ITEM ACCOUNT # 07430052813 0LEGAL# TYPE 07440054621 0DATE AMOUNT 07450060302 32 ITEM NUMBER -1 07460060916 52 ACCOUNT # -1 07470062904 212 LEGAL # -1 07480063802 252 TYPE -1 07490064406 271 DATE -1 07500065609 333 AMOUNT -1 07510066801 422 CREDIT SIGN -1 07520070302 452 ITEM NUMBER -2 07530070916 472 ACCOUNT # -2 07540072904 632 LEGAL # -2 07550073802 672 TYPE -2 07560074406 691 DATE -2 07570075609 753 AMOUNT -2 07580076801 842 CREDIT SIGN -2 07590080302 872 ITEM NUMBER -3 07600080916 892 ACCOUNT # -3 07610082904 1052 LEGAL # -3 07620083802 1092 TYPE -3 07630084406 1111 DATE -3 07640085609 1173 AMOUNT -3 07650086801 1262 CREDIT S