P*JOB,INSTAL,COBOL1 IT222613PP*CTO, COBOL 1.0 INSTALL IT222614PP*CTO, COPYRIGHT CONTROL DATA CORPORATION 1978 IT222615PP*K,I6 IT222617PP*LIBEDT IT222618PP*K,I6 IT222625PP*L,C4CLOS IT222626Pt PC4CLOS DECK-ID E02 COBOL 1.0 SUMMARY-132 tt@P D D Ttt@P  HttPC4CLOSttPCLOSFL ttPC4CLOStP*L,C4COMP IT222628Pt PEC4COMP DECK-ID E03 COBOL 1.0 SUMMARY-132 tt@P h.DD-D D!Ttt@P") h+ h4Ә1 h HHHttPC4COMP6ttPLLT ttPC4COMPtP*L,C4DLNK IT222630Pt PDC4DLNK DECK-ID E04 COBOL 1.0 SUMMARY-132 tt@P hh7DB 2-L(2LDC(2b7htt@P/L(2h HHttPC4DLNK8ttPC4DLNKtP*L,C4DADD IT222632Pt P4C4DADD DECK-ID E05 COBOL 1.0 SUMMARY-132 tt@PhD3b DTtt@PLn HH  dttPC4DADD#ttPLLT ttPC4DADDtP*L,C4DSUB IT222634Pt P0C4DSUB DECK-ID E06 COBOL 1.0 SUMMARY-132 tt@PhD/bTLn HH  dttPC4DSUBttPLLT ttPC4DSUBtP*L,C4EXCH IT222636Pt P5C4EXCH DECK-ID E07 COBOL 1.0 SUMMARY-132 tt@P h d3 hD4nn1 HHtt@P0HttPC4EXCH%ttPC4EXCHtP*L,C4MOVE IT222638Pt P,C4MOVE DECK-ID E08 COBOL 1.0 SUMMARY-132 tt@P h d*D+n1 HHHttPC4MOVEttPC4MOVEtP*L,C4OPEN IT222640Pt PxC4OPEN DECK-ID E09 COBOL 1.0 SUMMARY-137 tt@P Dt DujT h, b tt@P-1 D: D<Ttt@P;tt@P="k DO !DR DSTtt@PPvvtt@PTL"bL#b! iTwnTgw Htt@Pv ttPC4OPENottPPGMIN OPENFL9GETFCBNC7EXITlttPC4OPENtP*L,C4RDST IT222642Pt PWC4RDST DECK-ID E10 COBOL 1.0 SUMMARY-132 tt@PTdU ! dVT % b4bbbD3Ttt@P4 HHHH  d  dttPC4RDST5ttPLLT C4READ2ttPC4RDSTtP*L,C4RDWF IT222644Pt PWC4RDWF DECK-ID E11 COBOL 1.0 SUMMARY-132 tt@PTdU ! dVT % b4bbbD3Ttt@P4 HHHH  d  dttPC4RDWF5ttPLGT C4READ2ttPC4RDWFtP*L,C4READ IT222646Pt PQC4READ DECK-ID E12 COBOL 1.0 SUMMARY-137 tt@P "hDTh hdO= D)D* D,Ttt@P+tt@P-25TP `hTۘ1 2I b Htt@PP!ttPC4READJttPC4DADD9READR (C7EXIT3ttPC4READtP*L,C4SORT IT222648Pt PC4SORT DECK-ID E13 COBOL 1.0 SUMMARY-132 tt@Ptt@P2f2n2b2b2h2h2htt@P2h2b2bȻ2Ƚbȶ2ȵb ȁhȀhT tt@P !  h heȐ h_Ȋ2Γhȃ2h2΅tt@P=d2dXTVXV^2^X /1 1tt@Ph l2 ! d2 ! Tddtt@PT   d l d2d2d tt@P d l l2D<2Ν2 D2 D TMtt@P̽l̸2L̪2dώ2̨lܦ 1̗2̣"̎tt@P2 DTtt@P X-2̈2-Xdp4dl tt@PFαh hD 2h 2ΜhLD(2ΏhTDEtt@Pq 2whL(2hȼL(2ȻbȴL(2ȱbȭL(2ȧb tt@PHHHtt@P b h h dDn1h 2tt@PL 2ηhLD(2bΧhΠ D tt@P Ttt@P TΉhnșȐ2N ! l ! Аtt@P7dnd2DMT tt@PN 2Z b2Dn2Lbεd2 DzT tt@Pytt@P{̾d dlΛdTΑllל1 n 2tt@PTd b ! d !  b DT tt@Ptt@P D tt@Ptt@Ptt@P h h&  h h& &tt@P$ h 2?"<Ⱦ h?ȹ hȶ2OȱhȱdȬ Ott@PO H h hT h2Εh2d ddtt@Pz " l2N ltt@PdD 2ddn d21dL ntt@PLnLD(2bγ n n̂ lTtt@PΛT nT " d1lL(2tt@P&llnTxTJ  2F bdDtt@PQԌn2D`T2tt@Pa m ndδdn n dtt@PΔdTll΅lڜ1 llTtt@Pl̸ll̆1̥bD̛nLb ltt@P̜dlTlθlܑ꜏1Q lΩlTtt@P ldΙl1ln llClTtt@P8l̺ll̢1̮bQ b ngDtt@PcnrLLn̞nL 2̔bή tt@P"TΗT\2Ά ! d2 tt@P!  f 2T:d2 b n2tt@P̽2n̶2b̯2n̨2b̽ ltt@P n-̎2Dñ2Lb n  ! dtt@P: ! J b bb d  ntt@PenT\2D{Ttt@P|dTz1 d dlD 2θlTPtt@P lT_lL(2l lԔ2 dp0 l\tt@P̻Al1L2bL2bnT tt@P 2 bldytt@P LVtt@P)tt@P-25l̢ ? dJ d ̔ lptt@P  l# DT `tt@P  D d Ttt@P!̺nl̸ܼ1Ad ̗d ̬ḽ "̨d d Χ2 Lftt@PLΞ"kΗdΒdT kl lAd ftt@PwDn l l "l2l n2 nT tt@P2nlT nlDTtt@PD T tt@PdΚ ! ΋dΆdT_̸d ̤lltt@P Ad ̩f Dn lLnD&Ttt@P'1n4 n  D:T%tt@P;MLǀnbP b dddn b b ltt@Pf2 n̕2 bdT T dd 2 b L tt@PDXtt@P dD T tt@P dD T tt@P dD Ttt@P dD Ttt@PT  LttPC4SORTttPC4RDST LLT C4DSUB VC4WRST LGT 9C4COMPC7SRCL C4RDWF C4MOVESLL C4DLNKC4EXCH C4DADD C4WRWF ^ttPC4STWK C4OPENuC4CLOSttPC4SORTtP*L,C4STWK IT222650Pt P'C4STWK DECK-ID E14 COBOL 1.0 SUMMARY-132 tt@P bb bD$D% D&f HHttPC4STWKttPC4STWKtP*L,C4WRIT IT222652Pt PkC4WRIT DECK-ID E15 COBOL 1.0 SUMMARY-137 tt@P "hDTh hdhV D* !D+ D-Ttt@P,tt@P.26Ti DCDD DETtt@PF2NT4jȵ `hTث˜1 2b b Htt@Pi!"ttPC4WRITcttPC4DADDRREADR )C7EXITLUPDRECBttPC4WRITtP*L,C4WRST IT222654Pt PmC4WRST DECK-ID E16 COBOL 1.0 SUMMARY-132 tt@PDlbLbbDTtt@PD%D&Ttt@P'Ldj ! dk D? D@T$tt@PASLnLbDYTtt@PZ HHHHttPC4WRST[ttPC4WRITLLT >C4DSUBWttPC4WRSTtP*L,C4WRWF IT222656Pt PbC4WRWF DECK-ID E17 COBOL 1.0 SUMMARY-132 tt@PTd_ ! d` ! daT / b>btt@P3bbD=Ttt@P> HHHH  d  dttPC4WRWF?ttPLGT C4WRIT<ttPC4WRWFtP*L,C7ACDT IT222658Pt P9C7ACDT DECK-ID E18 COBOL 1.0 SUMMARY-132 tt@P0hhT h,D7d6"D8 1tt@P1T ttPC7ACDT4ttPASCDATC7RCTL2ttPC7ACDTtP*L,C7ACDY IT222660Pt PC7ACDY DECK-ID E19 COBOL 1.0 SUMMARY-132 tt@P;Zx0Ntt@PdoLh DpDqp0  0 L" Lp8"p8tt@PB 0] "` L"Lp0d 0tt@Pd HHtt@P0rhΦhTȅhp0 ! d " ! X Xtt@PT tt@PttPC7ACDYttPDATTIMzC7RCTLttPC7ACDYtP*L,C7ACPC IT222662Pt PC7ACPC DECK-ID E20 COBOL 1.0 SUMMARY-132 tt@P  tt@P0hd d0 d d0 d wd00d 6̰dDtt@P1d9ld0d0 d P2J PlT0 Zl]tt@P\l A"μh݌Ah،"p0hT1ȈlƜ2 Pd 2tt@P̷l0Ttt@P  tt@PttPC7ACPCttPC7RTIOKC7MOVErC7RCTLttPC7ACPCtP*L,C7ACPS IT222664Pt PaC7ACPS DECK-ID E21 COBOL 1.0 SUMMARY-132 tt@P0d"d0 d0Dd!lT_ P"- h:tt@P- "7 Ph:hAhd^T`^ Pl!ܯTtt@PXtt@PZ tt@P_ttPC7ACPSZttPC7RTIO"C7MOVEFC7RCTLUttPC7ACPStP*L,C7ACTM IT222666Pt PtC7ACTM DECK-ID E22 COBOL 1.0 SUMMARY-132 tt@P dILh DJDKp0  0 L" Lp8 0tt@P6]tt@P> HHtt@P0LhhTȰ "p0hXpXqXrXsT ttPC7ACTMnttPDATTIMTC7RCTLlttPC7ACTMtP*L,C7ALTS IT222668Pt P$C7ALTS DECK-ID E23 COBOL 1.0 SUMMARY-132 tt@P0hN lTtt@P ttPC7ALTSttPC7RCTLttPC7ALTStP*L,C7BLDI IT222670Pt P3C7BLDI DECK-ID E24 COBOL 1.0 SUMMARY-132 tt@P0h " 2  lTtt@P- ttPC7BLDI-ttPC7RCTL%ttPC7BLDItP*L,C7BLDX IT222672Pt P.C7BLDX DECK-ID E25 COBOL 1.0 SUMMARY-132 tt@P0hN 0"  D-  lTtt@P' ttPC7BLDX'ttPC7RCTLttPC7BLDXtP*L,C7BRST IT222674Pt P.C7BRST DECK-ID E26 COBOL 1.0 SUMMARY-132 tt@P0hN "D+ D, D-f  lTtt@P' ttPC7BRST'ttPC7RCTL"ttPC7BRSTtP*L,C7BSAV IT222676Pt P.C7BSAV DECK-ID E27 COBOL 1.0 SUMMARY-132 tt@P0h ND+ "D, D-0 n lTtt@P' ttPC7BSAV'ttPC7RCTL"ttPC7BSAVtP*L,C7BSTM IT222678Pt P-C7BSTM DECK-ID E28 COBOL 1.0 SUMMARY-132 tt@P0h fh b%DDTtt@P lTtt@P) ttPC7BSTM)ttPBSTOREC7RCTL$ttPC7BSTMtP*L,C7BSTX IT222680Pt P+C7BSTX DECK-ID E29 COBOL 1.0 SUMMARY-132 tt@P0hN 0"  D*b lTtt@P$ ttPC7BSTX$ttPC7RCTLttPC7BSTXtP*L,C7BVAL IT222682Pt PJC7BVAL DECK-ID E30 COBOL 1.0 SUMMARY-132 tt@PLDh 2 h 2 h hh ߈DI" tt@P/dHL" htt@P@ HttPC7BVAL@ttPC7BVALtP*L,C7CALL IT222684Pt PC7CALL DECK-ID E31 COBOL 1.0 SUMMARY-132 tt@P0hN h nlTtt@P ttPC7CALLttPC7RCTLttPC7CALLtP*L,C7CLSA IT222686Pt PmC7CLSA DECK-ID E35 COBOL 1.0 SUMMARY-132 tt@P0hhhdk h d$ט"tt@P/` Dl"p0 LlD"ʺwR taq 2 Zت_tt@PZȨ h lܴTtt@Pg ttPC7CLSAgttPC7RCTLbttPC7CLSAtP*L,C7CLSN IT222688Pt PC7CLSN DECK-ID E36 COBOL 1.0 SUMMARY-132 tt@P0hhhDh3 Dhtt@P1Bh L" ]h̰bȽ  ! dȵ  !  ` d$tt@P\`Ȣ " ! l 9" ! dȓ " ! l Z" ! lȂ  !tt@P l  ! к l lLdl2 tt@PD " !  Ll 9ld" ! F l tt@P0d$0Ttt@P  ttPC7CLSNttPC7RCTLttPC7CLSNtP*L,C7DBIN IT222690Pt P C7DBIN DECK-ID E38 COBOL 1.0 SUMMARY-132 tt@P0dT ttPC7DBIN ttPC7RCTL ttPC7DBINtP*L,C7DBMR IT222692Pt P C7DBMR DECK-ID E39 COBOL 1.0 SUMMARY-132 tt@P dT ttPC7DBMRttPC7RCTLttPC7DBMRtP*L,C7DBSU IT222694Pt PGC7DBSU DECK-ID E40 COBOL 1.0 SUMMARY-132 tt@P PERFORM LOOP USE PROCEDURE START PROGRAM FALL THROUGH SORT INPUT SORT OUTPUT MEtt@P6RGE OUTPUT tt@P=tt@P0AhN hhhȵ hhhȪ hhhTtt@PlBC ȗ hhhh&TkBBDD Ad@tt@Pdd dATtt@P@AD s ! l s  ! TBB 3 d>tt@Pd? d@DTBtt@PE@ 3 l lDTBtt@P@ sb r "&"  s  !0 l d< s lTBtt@PF<&d@,3 lTtt@P9  Att@PBttPC7DBSU9ttPC7MOVEWTD C7RCTL1ttPC7DBSUtP*L,C7DBTM IT222696Pt P C7DBTM DECK-ID E41 COBOL 1.0 SUMMARY-137 tt@P0"h ttPC7DBTMttPC7DBTMtP*L,C7DBTS IT222698Pt PHC7DBTS DECK-ID E42 COBOL 1.0 SUMMARY-132 tt@Phh ! dG ! l(= 22tt@P-l=%D;% DttPC7DBTStP*L,C7DBUG IT222700Pt PjC7DBUG DECK-ID E43 COBOL 1.0 SUMMARY-144 tt@PMSG.FILE$$ SYSVOL tt@P tt@P tt@PZ CDC COBOL INTERACTIVE DEBUGGER(03-27-01-78) tt@Ptt@Ptt@Ptt@P MESSAGE FILE NOT AVAILABLEtt@P D.BUGGERSYSVOL tt@P tt@Ptt@P MANUAL BREAK ENCOUNTERED. tt@P( I/O ERROR XXXX AT XXXX. ERROR XXXX AT XXXX. tt@PBhhhn2lT('PQTU(@RQTST(UTSSltt@PmȳhT TaSTVTSST|STWTSST[5'XQTtt@P5@YQTST5ZTSS lTSTVTSS EdTSTZtt@PTSS" EYd D& LBtt@P > " dd: 2dTv Z XS El tt@Pl l:TST[TZ\ /TST [TSS ‰"̙ ldtt@P; C܇ hlh ddȑ 2 ! l 92 ! lȂ 2 ! tt@Pfd Z2 ! F 2 ! l 92 !  0d Al tt@PEܴܳEZl " ! l  ! l 9" ! l̵ " ! tt@Pеl Z" ! Ь̟ l̔  ! l̍  ! l" tt@Pµ  ! Ёl !  ÍŽltt@Pܹ bܱEZl 2 ! l 92 ! l 2 ! l F2tt@P= ! иMܿ܈l 2Y d`TZd l tt@Phṁl̇  ! l̀  ! F 2 ! l 9dd2 tt@P!  0l  tt@Pah lhdT  TS`h&lT \Sltt@PDnLbn Htt@Pd0K tt@Phl hhT  \S h42% nވh ;tt@P!/nΎh;h _1Ⱥ HHtt@PHtt@P0XhHlhhhhhhbs""htt@P lT(h hȷh\0hȯh h\ȨhDdp< h htt@P ôؠ 1TSQ]T%STVTSSTST]TSS tt@PhhhhhhhhhhVd DFDGXtt@P LINE NUMBER XXXXX,($XXXX) T=h h  1T^] dMtt@P+TMUQ: h< hTSTTSS Htt@PY hp0[zp8ldT  TSp8h tt@PH l h'(h lȾhXSh"DTtt@P_`h  h lȗhXPh"hȏ2ȏȆh hXtt@PPdQȀD Ttt@P_`dT"DTtt@P_`ll̕  dU"ΕlOD" DTtt@PSQfD"Ttt@P#a[ =D/T!tt@P0S` ; n=̗"DDT.tt@PEQVdRp0`dTq  TSNdLPp8"n 2tt@Pp y dTdT  ! l " ! TZ tt@PdQ2 dV.l\ʜ2̼ \̵ Dtt@P Df̬lAlp0 d Nn dtt@P LD Ott@P '2  hc F)hdTR  TSp0_h(tt@P-4FD"? hD"hchlT  \SDjtt@PXp0"fȞ Htt@Pm  ! d " !  hDTZnϔ%" !tt@P l" !  hLγnp0`dTL   Ttt@PSLp8"̐n hș Htt@Pp8Ĕ p8llT  \Sp8d"`h Htt@P  nld' h h hh " ! d   !  ? h }2tt@P D ȗ &hEZh  V؊ fȕ 2 bȂ d f l  |tt@P ofߌl l l }   D n L(ntt@P ׎lTCSadp0` dT  TSp8"l   d T tt@P   l "p0l ̌ d \ 쉞  ܂ߜ1 tt@P L̰ l\ lT bQn L̟ l\ lT  bQ    !\ltt@P  d  }'L l\ lT Sbf(T̑  ! lEZ  ! tt@P Fl"   ! l  ! d "   ! F  { 1tt@P q2 x l }\  l̠ D  tt@P h h E  ! d   !  h  ! l" !tt@P   hȻhh l+h h hhȦhphثȡbs"tt@P  " wȕ   hh lT ȁ   -d \ tt@P  ! l\  . .l\  ! d " ! tt@P GlEZ  ! l  !  b TZd d D tt@P r,b "0= d d0 l Ltt@P D D D  tt@P * &f l hTc` #dT   \S`l h tt@P E  hEd 2 EZ    س똱1T Z\tt@P S  !T=ST [TZd " hȉ D tt@P 1tt@P < d" EY d" `dTɔ " `TG0\̻ gtt@P g«h " ! d X" !  Tcc\ȯbXsB""tt@P ̽ \cV̹  h T ;  T  6 \c] tt@P  Te ; \c_ l b T 6a1 d 2 \tt@P cQ lT * n \c]  f̙dT 4tt@P   ! l " !  +TceT cZd 7 6 l ET Stt@P >TVTSS d 8 `lT, 6[QT <ST]TSSܪ1 T  6tt@P il ! Ѐ y\c[T 5 7 \c_T 5 7T tt@P d  T ; \ 6d  ! lTe ; Ttt@P c]l  \cf ld dT   \Stt@P 2    T USTVTSST STWTSSTStt@PTgTSS lXlT   \STSTVTSST2STtt@P@)TSSބ`lT<STVTSS 6a1 lTtt@PkEZ t\ Tcedf  ! d  ! tt@P\cXl̽d 4\  ! l̻" º  ! l  ! tt@P\T  8l ! о\c[T 5 8\c_T 5 8 6 4tt@P\cX\cf d d ;7T ;tt@P7\ 6'Tc] RTe ;7\c] lH bGtt@PBT 6a1\cVU\c]l  ! dEZ tt@Pm ! l"   !  d lTG ltt@PD\tt@Pܣ 1 lD\tt@Pܔ㜒1Tcc$o$H$$$$r$$a$$ tt@PT `ПdT=d 6̓0\ D 3 <tt@P0 d l0TGXTTMSTZhTSS l da d ddYtt@P*1 f 1 dldd lN f f 1 Ttt@PU2jTSTgTSS dl l l{DOEEܮ 1Ttt@PS 2TcaT dT)  \Sddd dtt@Pd%dd d d dYlT  \S  dtt@P` lT  \S 1 d&TSTT T\STiTSStt@PTG lTT lb\Ya1>T=l !tt@P, F>l\>\T "p0lf  tt@PPK P  O -ttPC7DBUGLttPWTX OWTREADREADR XTW ZUPDRECC7PSTM`C7DSPCkC7DBTM WTD !EXTRCT ,DTW ,PGMOUTC7PB ?OPENFLttPPGMINTttPC7DBUGtP*L,C7DEXT IT222702Pt P C7DEXT DECK-ID E44 COBOL 1.0 SUMMARY-132 tt@P0d00" ttPC7DEXTttPC7DEXTtP*L,C7DLRL IT222704Pt PC7DLRL DECK-ID E46 COBOL 1.0 SUMMARY-132 tt@Pd0T0"n0 dDTtt@P0hd" l >lTSn l b  D=Ttt@P>hdS l b tt@PS tt@PY h2tTX2~TqX 2tt@PT{X2TX2TX2TX hTXtt@P D DDl"D L" L tt@PYtt@P D WZtt@P" ! dh" ! hl! lT[Ԁtt@P#XMdT(bnd ? lKE DIE DJTtt@PKTldb l[Ttt@Pb tt@Pi̯ܰl |TYTz %D m@ tt@P ! d  !  DE DTtt@PTST" DTtt@P0Xl lTLtt@P tt@P\bc ttPC7DLRLttPINCSTK+DELT59READ13L L tt@P1 d0 d0 d wd0 d0 d",ܽοd0 hṵtt@P\d<஌lDd̥J2sJh|lݔld0̒ " ! ltt@P" ! 0LLD?]>C= l l " tt@P! l" ! L 0 l ! l̏ ! tt@Pd< ! d̬  ! '̡d0 T@' lL L Ett@PÒL L Æ2"̓2'̨ l0G dTtt@P3tt@P7  tt@P@ttPC7DSPC7ttPC7RTIOC7RCTL2ttPC7DSPCtP*L,C7DSPS IT222708Pt P0C7DSPS DECK-ID E48 COBOL 1.0 SUMMARY-132 tt@P0dhd0 d0"dT--3-.0 d"d0 htt@P.P԰d)ЌlĎd0ԥJ2NԥJhWlݶltt@P0Yd 0|hD* D+ šn L Ï̓" ! ltt@P՜" ! 0LLD,]̷ l l" ! tt@Pl" ! L 0 lȘT/ lT--;-.tt@P0022T/ 0d  D*tt@P D+ΒÍ l! d0Ttt@P"  tt@P-ttPC7DSPS"ttPC7MOVEC7RTIOC7RCTLttPC7DSPStP*L,C7EXIT IT222710Pt PsC7EXIT DECK-ID E49 COBOL 1.0 SUMMARY-137 tt@PC7ERRMSG$$ SYSVOL 'd00#d l0d$0hDm Dnftt@P.ToT2pT5q d  d&d 0 Id d w0d dT88rtt@PYd h l"fT Htt@PottPC7EXITgttPC7RTIOTPGMOUTettPC7EXITtP*L,C7EXP IT222712Pt PC7EXP DECK-ID E50 COBOL 1.0 SUMMARY-137 tt@P\!tt@P tt@P  tt@P tt@Ptt@Ptt@P$ hhhTD Df% f00h hLtt@PO Lj hw f;lTTi#d#tt@Pz~ h#d#؛ 1ؕ 1 tt@P h "DD(2L Dΐn 1 tt@P hD(2L("D D%f 1 tt@P 0f;T D Dn nT0$TmTtt@PT ! tt@PAtt@PhDg DhΫnTT/TL LΖnTTtt@PIT7T  0E/T 0Ήf%̢  tt@P0i 0lddd d dd0d tt@PND "D DλnL("L LΫnTL Ltt@PnT$ d l  d  lL Lβf0 0Ttt@P dT3 L L%n̷ '̸tt@P" l% d) ḷ@TD Df tt@P@ Τf0;@d dT n 1TX0$~T.TYtt@Pkq| z|TeTbTf "TTL Ltt@P%n̈T TDL L0nT "DD  Dtt@Pn0 lTtt@P  itt@PttPC7EXP ttPDECBIN/MULTPYLLOAD COMPARSUBTRCPDIVIDEADD HTESTZRC7RCTLttPC7EXP tP*L,C7GDPS IT222714Pt PC7GDPS DECK-ID E51 COBOL 1.0 SUMMARY-132 tt@P0 hhN2 ! d ΐ2 ! ; h " tt@P4nb~D lDd2P h` lDd2^ h` tt@P_h hzDDȔlौ"ŸÌ؇ȉ1ȅ Ah d" tt@P! l΄ ! " ! d 2 ! l"tt@P ! 0l lTld  lTtt@PEDE DTtt@Ptt@P   ttPC7GDPSttPC7RCTLC7SEGOttPC7GDPStP*L,C7GODP IT222716Pt PC7GODP DECK-ID E52 COBOL 1.0 SUMMARY-132 tt@P0 hhN2 ! d ΐ2 ! ; h " tt@P4nb~D lDd2P h` lDd2^ h` tt@P_h hzDDȔlौ"ŸÌ؇ȉ1ȅ Ah d" tt@P! l΄ ! " ! d 2 ! l"tt@P ! 0 l dlTtt@P   ttPC7GODPttPC7RCTLttPC7GODPtP*L,C7GOSG IT222718Pt PC7GOSG DECK-ID E53 COBOL 1.0 SUMMARY-132 tt@P0h%D% DTtt@Ptt@P ttPC7GOSGttPC7SEGOttPC7GOSGtP*L,C7INDX IT222720Pt PgC7INDX DECK-ID E54 COBOL 1.0 SUMMARY-132 tt@P0h h h h( ۂhMtt@P-ddh ADe DfEnp0̰ lTtt@PXtt@P^ ttPC7INDX^ttPC7RCTLVttPC7INDXtP*L,C7INIT IT222722Pt P%C7INIT DECK-ID E55 COBOL 1.0 SUMMARY-132 tt@P0hNdddd lTtt@P! ttPC7INIT!ttPC7RCTLttPC7INITtP*L,C7ISPT IT222724Pt P$C7ISPT DECK-ID E56 COBOL 1.0 SUMMARY-132 tt@Ptt@PBtt@PHLdrDhDcTtt@PdB D }D tt@Ptt@P HHHtt@P"0 f " f0  Htt@PDXtt@P9d%hlD&D'D(tt@Pט1 hLՈ"L̿L"ث̴1"tt@P X Htt@P)}JKLMNOPQRtt@P/D԰DŒ"ETT" LDtt@PZD]" 2 ! d R2 ! l  ! tt@PLLL"El԰lL"p0tt@Pnl԰lੌAd.DlDDd DT#tt@Ptt@P.tt@P  /tt@P0dd DTtt@Pdl̰.d#dlDҜ lDtt@P&d̿dd`d dd E0 f 1̤ l"tt@PQ X @l0СΌdDl\tt@Pm0̋l˄ d"d d LD D!]dtt@Pd"0̒"ň"̋ f ́" n"tt@P̴nܴܶ 0"f "̚nT"n"tt@P̉ndpJd̬l ldDD"Χ" ! d̶"tt@P ! -ۜ)̹l̵„llLH Ι 2Htt@PD\ܩdܤd"d dddlDi Ttt@Pj' d d " ! LD D!l®dC¦d tt@P! Fl̩" 2 ! Ȝ"DTtt@PT ̰2̪lܠܢl"  ! l"̎2 tt@P! бT lǜ2lЬ T „tt@P dTtt@P  tt@P"ttPC7ISPTttPMVALPHbC7EXITRC7MOVETALLY C7RCTLttPC7ISPTtP*L,C7JET IT222726Pt PC7JET DECK-ID E57 COBOL 1.0 SUMMARY-132 tt@P0h hDn lT ttPC7JET ttPC7RCTLttPC7JET tP*L,C7LINK IT222728Pt PNC7LINK DECK-ID E58 COBOL 1.0 SUMMARY-132 tt@P0hh hNdM7 hb 0b htt@P/ ۘ1 lTtt@PG ttPC7LINKGttPC7RCTL?ttPC7LINKtP*L,C7MVAE IT222730Pt PC7MVAE DECK-ID E59 COBOL 1.0 SUMMARY-132 tt@Ptt@P 0/tt@P0h hhJJdDhhhDtt@PCFTtt@PGPhhȻ h hh hAlȨ hο hȜ2 dtt@Prș2 D ȋdࡌ" Ú L  l" Dtt@PD ll" ̸1Ed ltt@P2l L ̽l͌"ܲ̌12^0 lTtt@Ptt@P  ttPC7MVAEttPMVALPHEC7RCTLttPC7MVAEtP*L,C7MVAJ IT222732Pt PC7MVAJ DECK-ID E60 COBOL 1.0 SUMMARY-132 tt@P0hME ԥJdD hD>Ttt@P?hHhhhh hh hȤh2vțAhtt@PjȖ"p0hȑhT  ȃAh"p8ldTw tt@P  lTtt@P  tt@PttPC7MVAJttPMVALPH=C7MOVEC7RCTLttPC7MVAJtP*L,C7MVFE IT222734Pt PC7MVFE DECK-ID E61 COBOL 1.0 SUMMARY-132 tt@P 0/tt@P0 h hh hhh hAd hu htt@P72do D d͌"DDDp8 l෌tt@Pb"±ì؜؜ؙ̘1ˆh hȈ2l L  ltt@P"Á̡1̇1 lTtt@P   ttPC7MVFEttPC7RCTLttPC7MVFEtP*L,C7MVFJ IT222736Pt PaC7MVFJ DECK-ID E62 COBOL 1.0 SUMMARY-132 tt@P0hM hh  hN D^ d]"D_ D`tt@P/l׌"HȾhKȹ hȵ h1̴ lTtt@PY ttPC7MVFJYttPC7RCTLTttPC7MVFJtP*L,C7PCSQ IT222738Pt PC7PCSQ DECK-ID E66 COBOL 1.0 SUMMARY-132 tt@P0hdT ttPC7PCSQttPC7RCTL ttPC7PCSQtP*L,C7PFMS IT222740Pt P,C7PFMS DECK-ID E67 COBOL 1.0 SUMMARY-132 tt@P0hV%D% DTtt@Ptt@P& ttPC7PFMS&ttPC7SEGOttPC7PFMStP*L,C7PSTM IT222742Pt P-C7PSTM DECK-ID E68 COBOL 1.0 SUMMARY-132 tt@P0h fh b%DDTtt@P lTtt@P) ttPC7PSTM)ttPC7DUN C7RCTL$ttPC7PSTMtP*L,C7RDRL IT222744Pt PC7RDRL DECK-ID E70 COBOL 1.0 SUMMARY-137 tt@PT0n0 dL ! d h0)dbtt@P,2Q b@@ @I DHTtt@PIDPTtt@PQf DdDeTtt@Pfrrl  DqTOtt@P0rh΍d̊ l @tt@P  tt@P h2T2T2Ltt@P ! dG  ! dH TT 2tt@PT2T2T hT3 DI tt@PDJDK"DL ×L" L Ætt@P9tt@P< D tt@PN" ! d" ! l" ! hlLtt@Py lTԀ0dT0nd0  l E Dtt@PE DTtt@PTld lTtt@P tt@P̯ܰl TdT %Dрtt@P  ! ll  ! d ˬ$@$ D" E D#tt@P Ttt@P$T  ! l Ƭl ! Оl ! YE tt@PODW DXTctt@PYD_T<tt@P`eTd lTtt@Py  tt@P bcttPC7RDRLyttPINCSTKINCRCNGREAD13pRRNKEYVCNVSETC7RCTLqC7SEGOC7EXITKEYRRN!ttPC7RDRLtP*L,C7RETN IT222746Pt PC7RETN DECK-ID E72 COBOL 1.0 SUMMARY-132 tt@P0 h "RN l h h h 2ADtt@P0DD  "P h n] ]Ttt@P[̨ lp  n ̚ b} L L%nTtt@P  tt@PttPC7RETNttPC7EXIT[C7RCTL~ttPC7RETNtP*L,C7RLSE IT222748Pt PC7RLSE DECK-ID E73 COBOL 1.0 SUMMARY-132 tt@Ptt@P0 h  T h h h V2eE2 Dtt@PlZL"LL"]d̷1 l, ltt@Piy  n  b D L%n  "0  dtt@P nTtt@P  tt@PttPC7RLSEttPC7EXITDECBINC7RCTLttPC7RLSEtP*L,C7RSTR IT222750Pt P.C7RSTR DECK-ID E75 COBOL 1.0 SUMMARY-132 tt@P0hN "D+ D, D-f% lTtt@P' ttPC7RSTR'ttPC7RCTL"ttPC7RSTRtP*L,C7RTSQ IT222752Pt PAC7RTSQ DECK-ID E76 COBOL 1.0 SUMMARY-137 tt@Pd0T0#n0 dDTtt@P0hd# l tt@P&" ! dThlG lTԀ}8rdTtt@PQnd0 d lpE DnE DoTtt@PpTD̦hΓd̐ lT>tt@P tt@P܊̉d %D: D; D<D=" 1tt@P]L"  2XT~?T@ T#tt@PDTtt@PX dd9 LL L L¬"§tt@Pâ1l lTqtt@P2  tt@P>ttPC7RTSQ2ttPINCSTKQREAD11C7RCTL*C7SEGOmC7EXITC70IOSttPC7RTSQtP*L,C7RWGI IT222754Pt P+C7RWGI DECK-ID E77 COBOL 1.0 SUMMARY-132 tt@P0hhh 20!d'#Ttt@P' ttPC7RWGI'ttPC7RCTL"ttPC7RWGItP*L,C7RWGN IT222756Pt PC7RWGN DECK-ID E78 COBOL 1.0 SUMMARY-132 tt@P REPORT NOT INITIATEDtt@PTd0dT Hhhhh HTtt@P= T  h dcD ة1 tt@Ph   0 ` @  % DXtt@PT % DXtt@PT  0 l ΃l  DTtt@PT  D€\tt@PT ̋1 l d  n1% D\tt@PT  n % D\tt@PT !  lΓ !   P^ ΀l lZ tt@P1@  D l1  P l νl ζ D}\tt@P~TU؜1% D\tt@PT l Αl  nܦ̸1  0ll% tt@PD\tt@PT܉̛1  0%2 D Ttt@PT  f  @dTtt@P  &tt@PttPC7RWGNttPSAVE12C7RCTLWTREAD=PGMOUTGREST12ttPC7RWGNtP*L,C7RWGR IT222758Pt P6C7RWGR DECK-ID E79 COBOL 1.0 SUMMARY-132 tt@P Thld0T H  4% D.Xtt@P/Tl  `  n b h D  bȯa Ltt@PZ ν n  ` t% DnXtt@PoT0ȓl    @ tt@P tt@P܍̌dΏd܅Ίd܀0l ! d5 & tt@P2&X&  @&tt@P  2&X @& # tt@PP dl d"#&TdTtt@P0  ttPC7RWGR0ttPSAVE12 C7RCTL+REST12pttPC7RWGRtP*L,C7RWIN IT222760Pt PC7RWIN DECK-ID E80 COBOL 1.0 SUMMARY-132 tt@P REPORT ALREADY INITIATEDtt@P T-d0dT Hhhh PTtt@PKTt h dp o DkXtt@PlTت꘨1    n  b  n b nȌlT+tt@Ptt@P tt@PttPC7RWINttPSAVE12!C7RCTLWTREADEPGMOUTOREST12mttPC7RWINtP*L,C7RWRL IT222762Pt PC7RWRL DECK-ID E82 COBOL 1.0 SUMMARY-137 tt@Pd0T0"n0 dDTtt@P0hd" l >lTSn l b  D=Ttt@P>hdS l b tt@PS tt@PY h2tTX2~TqX 2tt@PT{X2TX2TX2TX hTXtt@P D DDl"D L" L tt@PYtt@P D WZtt@P" ! dh" ! hl! lT[Ԁtt@P#XMdT(bnd ? lKE DIE DJTtt@PKTldb l[Ttt@Pb tt@Pi̯ܰl |TYTz %D m@ tt@P ! d  !  DE DTtt@PTST" DTtt@P0Xl lTLtt@P tt@P\bcttPC7RWRLttPINCSTK+UPDT27READ13 HHtt@PKttPKEYRRN>ttPC7MOVE0ttPKEYRRNtP*L,LGT IT222850PJ PLGT DECK-ID B47 COBOL 1.0 SUMMARY-132J2@P "!h "!"  2 PLGT P P*L,LLT IT222852PJ PLLT DECK-ID B48 COBOL 1.0 SUMMARY-132J2@P "!h "!"  2 PLLT P P*L,MP10 IT222854PJ P/MP10 DECK-ID B50 COBOL 1.0 SUMMARY-150Jr@P h$h"" " H(A a H !r@P+  PMP10 P P*L,REST12 IT222856PJ P REST12 DECK-ID B53 COBOL 1.0 SUMMARY-132J@P "i"* PREST12 P P*L,RRNKEY IT222858Pt PIRRNKEY DECK-ID F28 COBOL 1.0 SUMMARY-132 tt@Phh h dGTDd2  h)D 2) hlTHtt@P0Gtt@P; HHtt@PHttPRRNKEY;ttPC7MOVE-ttPRRNKEYtP*L,SAVE12 IT222860PJ P SAVE12 DECK-ID B54 COBOL 1.0 SUMMARY-132J@P "i"* PSAVE12 P P*L,SLL IT222862PJ PISHIFTS DECK-ID B55 COBOL 1.0 SUMMARY-132Jr@P 541B>* )(%H4 82 :rR@P+ @ @??RPSLL SRL EXTRCTP P*L,TALLY IT222864Pt P:TALLY DECK-ID F30 COBOL 1.0 SUMMARY-132 tt@Ptt@Ph %jT8D"T9tt@P#T98D-T9tt@P. n HttPTALLY 3ttPLOAD ADD $STORE +ttPTALLY tP*L,WTD IT222866Pt PWTD DECK-ID D62 COBOL 1.0 SUMMARY-132 tt@P" ! hdh hh d~@DDp0  0]tt@P1p8h= h\ h1Ⱦh lVL *Ȱ h1 hhtt@P\ȨkȢL"  -]Ț HHHHttPWTD mttPWTD tP*L,WTX IT222868PJ P0WTX DECK-ID B57 COBOL 1.0 SUMMARY-132Jr@P -h )hh! Dh 01234567r@P+89ABCDEF PWTX P P*L,XTW IT222870Pt PpXTW DECK-ID D63 COBOL 1.0 SUMMARY-132 tt@P hh dmSDoh 2 ! dn 92 ! 5Ĉtt@P1 hR 2 ! l F2 ! MȾ hRȵn^ر̽1Lΰtt@P\nȦh HHHttPXTW attPXTW tP*L,BINCON IT222872PJ PjC70BCN DECK-ID B21 COBOL 1.0 SUMMARY-132Jr@P h]"h[W O""hShR"""AAhC"E" 3 @h= " h87Ch6rr@P+"--h/" h5h4Tg`W`hf h+#'!h' djTX]T0_b} b تr&@PV0 \&@Pfb PBINCON PCONVBPMLOAD IC7MOVE6P P*L,BINCMP IT222874PJ P+C70BCP DECK-ID B22 COBOL 1.0 SUMMARY-132Jr@P H&"f"bH"f"bT'('()* $0$dlr PBINCMP PCMPALN P P*L,BSTORE IT222876PJ PC70BST DECK-ID B23 COBOL 1.0 SUMMARY-132Jr@P H5" eh#Hd" ha"Jh^"[h[hZR 1N FhTrr@P+$  d05< T}Tjni) h2+h1"h1h0( $ h&& - hrT@PV h hh# hhTisostr1 ywTJ@Py c'B?;JJ@Py c'B?;J PBSTORE "PDECBIN;C7MOVEaBINCON7BINCMP)"P P*L,C7MOVE IT222878PJ PC70CIS DECK-ID B24 COBOL 1.0 SUMMARY-132Jr@P XrTf0 Xg  _^YY  d$\`" hB" h?rr@P+h?<":h; h<H h5h504;""0"n"n"h&#&;"""n"n"hrr@PV1 l 2 l l T`"h""rr@P2H""2H"h"hf" h h h\Tnrr@P\Tf 3h 0hh\\h#\h $!  0rr@P, T- \0  } Xr\T}T Xm XdXq \rr@P\h"Jh"h \zd0 XM XB"hXZXHX;rr@P- X2X?-XK-XQX/ X&X39h X/9h" 0b  0b     rr@PX d0$X  &h Fh   """""h(0% """r(@P" " h"1(ZPC7MOVECMPALNADD SUBTRCMULTPYDIVIDELOAD STORE DPACK DUNPAK-COMPAR9Z PSIZERR P P*L,DECBIN IT222880PJ PC70DBN DECK-ID B25 COBOL 1.0 SUMMARY-132Jr@P hmhohohohohp"hmhh"h_3 !Z"Tk Y2 6Tk hPO(Brr@P+BhM3 R hIhI hH:8JhB4h<>h;0Tx{d0m .h. h.),!-'rN@PV!!"Dh"Tr 3% Nr@Pvr % dj ("f"b%h hh" ) HrF@P # h `l""ÿ Ő1FF PDECBIN "PMP10 dSIZERRELOAD $C7PACK"P P*L,C70IOS IT222882PJ PeC70IOK DECK-ID B27 COBOL 1.0 SUMMARY-132Jr@P h>H;h764 .#   '(!X6h$00Q"1rr@P+f"@ h0 -a"te"000000009998003021212223009110 h"r,@PV    "3424,PC70IOSC70IOIP P*L,C7DUN IT222884PJ PC70DUN DECK-ID B26 COBOL 1.0 SUMMARY-132Jr@P +h~"h}(zz" " -hshth|"hp"ho hm hk hi hg heJhcrr@P+haZ^\hUShY0Td0?MG hLCDDD<>h:81h6@T:`rr@PV10/*+. % }"  } I}"}"0F}"r,@P0 %, PC7DUN PSIZERR9DUNPAKQP P*L,MVALPH IT222886PJ PC70MPH DECK-ID B28 COBOL 1.0 SUMMARY-132Jr@P hz""hu hl hjh he hc haJh_h]XYWYRhW OhNrr@P+hS""hNhJTx}~9?;!2h=321 h5+ h10$rr@PV( F(##1 #dh` 0}"  r@P PMVALPH PC7MOVE7 P P*L,C7PACK IT222888PJ PC70PCK DECK-ID B29 COBOL 1.0 SUMMARY-132Jr@P "Hu"hs"hrhqokho hxj hufhsc131D1eT rr@P+_Mh]N\hLZhX/VVD O=hM%K I7 " 13?-h=/h:h.h: !rr@PV h3h'h3$ Ah h)( `F T{h r@P PC7PACK PDPACK t P P*L,SIZERR IT222890PJ PAC70SZR DECK-ID B30 COBOL 1.0 SUMMARY-132Jr@P ""H5(22h3" 1 ) *Bh, h(h(&$    B r>@P+1  h   2   %> PSIZERR P P*L,TESTZR IT222892PJ PC70TSZ DECK-ID B31 COBOL 1.0 SUMMARY-132J@@P "(" 0 2   d0 $ %@ PTESTZR P P*L,C7CJMP IT222894PJ PC7CJMP DECK-ID B04 COBOL 1.0 SUMMARY-132J @P PC7CJMP PC7CNTR P P*L,C7CNTR IT222896PJ PQC7CNTR DECK-ID B59 COBOL 1.0 SUMMARY-137Jr@PhDHDC8 T=B8h8 h56651)dR " h&h!hh"h " "%rr@P+Z6bb 0b bX<"T\=B "TQAV"rr@PV"2-2"" h"(۸h\=BK̪`"  dSh{""rr@P)[h^hTNZ\]rr@P_` ` iTdcxahbhTckTcfch Yh Xh Trr@PHSTH (sKTL BsCZ"/hhT\$rr@P"/h h hTH"/h h hTL$d] ahTrb@P-bdȽ`: COBOL ERROR-COMMERCIAL PACKAGE NOT SELECTEDbRPC7CNTRC7RCE0LC7RCE1IC7RCE2HC7RCE3GC7RCTLKC7RTIOpMURIDX=MUTAB >ILOC BRBPPGMOUT7WTREADSLICUPPREADR -OPENFLC7MAINCLOSFLATTACHBP P*L,C7ENTR IT222898PJ P#C7ENTR DECK-ID B09 COBOL 1.0 SUMMARY-132J^@P ! j v"jhT0 4l ^ PC7ENTR PC7RCE0! P P*L,C7LNGX IT222900PJ PC7LNGX DECK-ID B11 COBOL 1.0 SUMMARY-137J6@P d dT 8"6 PC7LNGX "PILOC MUTAB MURIDXATTACH "P P*L,ASCDAT IT222902PJ P ASCDAT DECK-ID B32 COBOL 1.0 SUMMARY-132J"@P   " PASCDAT P P*L,DATTIM IT222904PJ P DATTIM DECK-ID B42 COBOL 1.0 SUMMARY-132J&@P   & PDATTIM P P*L,R9DRTN IT222906Pt PR9DRTN DECK-ID F29 COBOL 1.0 SUMMARY-132 tt@P0" ttPR9DRTNttPR9DRTNtP*L,STRACE IT222908PJ PSTRACE DECK-ID B56 COBOL 1.0 SUMMARY-136J`P 0@P Hh j qh0 PSTRACE P P*L,READ11 IT222910PJ PHREAD11 DECK-ID Z05 COBOL 1.0 SUMMARY-132Jr@PT`#T 0$T %.T Brr@P+Q T 6.0,TTBbrr@PV @b/T!@,T A?b/+ b/rr@Ph1) " b h h Dh hTA2   Drr@P hhA4 h h #2hT a bd rr@Pm b1b b #A 2 A 2 arr@P! Ta7'aah  !4h h #2hT  a rJ@P- bd :*a2a3#aTJ PREAD11 JPERRPROSTRACEER9DRTNERRO46ROOT444ROOT43#NTAP48MNTAP49KNTAP55mJP P*L,READ12 IT222912PJ PREAD12 DECK-ID Z06 COBOL 1.0 SUMMARY-132Jr@PT`#T $<96T 96Trr@P+ ?/b 3#aT  E1Ϡ2hh A hrr@PV hT Ab  "Db1 brr@P2Db A1b2 h hTY B2a3)h h rr@PhohT( ooQ-y+ @0b"+B2a(: *aT8rR@P' 3#aF A!7b"DbMRPREAD12READ14*PFMGETSERRPRO(STRACER9DRTNROOT43*P P*L,READ13 IT222914PJ PREAD13 DECK-ID Z07 COBOL 1.0 SUMMARY-132Jr@PT`#T 3#aT%&'T %.rr@P+,T#   Ob!X)h(H rr@PVoh  hT(ooQ%!%@0a2%>.a 42rr@P:*a?/bDbbh  h hT 2Db br@PTPPREAD13READ15*PFMREAD]ERRPRO/STRACER9DRTNROOT43*P P*L,WRIT17 IT222916PJ PWRIT17 DECK-ID Z08 COBOL 1.0 SUMMARY-132Jr@PT`#T 3#aT#T - 6Trr@P+  1T !!bDb 1brr@PV*h*$ah$h hT*e7'a h Π1h A hTrr@Pbb 0 A 1XT9f#A2 "f" r"@P b ! T "PWRIT17WRIT24*PERRPROjSTRACER9DRTNROOT45ROOT43~*P P*L,WRIT19 IT222918PJ PEWRIT19 DECK-ID Z09 COBOL 1.0 SUMMARY-132Jr@PT`#T $$T-T Brr@P25  /,A1aTTAb  ?b rr@P]1b/+ b/ +   A  ;T(7'aa/rr@P? h !4h #1hhT a b A brr@P 2b1 b b Tq  !A bDb HA h rr@P b#1h hT h !4h #1hhT  a rr@P b+)+bDbb 2b1 b b + Tr2@P4T 3#a8(a2 PWRIT19 BPERRPRO|STRACE8R9DRTNERRO46ROOT43ROOT454NTAP49INTAP48KBP P*L,WRIT21 IT222920PJ PWRIT21 DECK-ID Z11 COBOL 1.0 SUMMARY-132Jr@PT`#T &T & -,T3#aTrr@P+ @0aT#)1 !1b)h oh rr@PVh  hT(oo7!2!(:*aT+h h  hrr@P hT b )h oh  hT(o Db2DboTur@PS:*aw PWRIT21 2PFMUPDRFMREAD]ERRPRO6STRACER9DRTNROOT432P P*L,UPDT26 IT222922PJ PUPDT26 DECK-ID Z13 COBOL 1.0 SUMMARY-132Jr@PT`#T BT  ,T3#a/rr@P+T ?/a1T'?h  a H!hToaH'hrr@PV"Q" H"T-3;+a rr@P 8(ab A1bDb  b h hhTJ rn@P )hhohT)o b2Db?boh:*an"PUPDT27UPDT28UPDT29UPDT26"*PERRPROfSTRACE9R9DRTNROOT43FMUPDR*P P*L,ROOT43 IT222924PJ PjROOT43 DECK-ID Z17 COBOL 1.0 SUMMARY-132Jr@P Hdddh]]ddhUT%rJE"4hE@+rr@P+; 52 H/H-+(!!n!  r:@PVةFA h &Ahef:PROOT43MOVE P P*L,ROOT44 IT222926PJ PROOT44 DECK-ID Z18 COBOL 1.0 SUMMARY-132Jf@P#HTa#H#2  1b>.bfr@P' TQ;h2h0>b#$&1 -N, <,b 01rr@PR^ >.bTN_Z "." 2"8. . , rr@P}?/b$T[-/Ҡ  @0b",T >.b hrh@P bXT*JX  bB2b  bb h PROOT44 PERRPROSTRACEP P*L,ROOT45 IT222928PJ PROOT45 DECK-ID Z19 COBOL 1.0 SUMMARY-132JH@P#HTa#H1  AbHr@P h9 Ab>.bT,Q;h)>b#$11A1a r0@PF03 1<:*aTNV>0r@PW "." 2"8. ,$A1aTRA1b ?/rr@Pb3Tv:*aA1b2Dbb bb T)r @PR PROOT45 PERRPROSTRACEP P*L,ERRO46 IT222930PJ PERRO46 DECK-ID B46 COBOL 1.0 SUMMARY-132J@P PERRO46ERRPROP P*L,NTAP48 IT222932PJ PNTAP48 DECK-ID Z20 COBOL 1.0 SUMMARY-132Jr@PXXXXXXXX, MOUNT XXXXXX ON LU XX, RING,READY? HDR1  0001000rF@P+100 YYDDD YYDDD 000000 HDR1VOL1Fr@Po RING #"a# h+hN h*hN hJrr@P Dn! q hh@  n q n q n  n  nT(o'?rr@P$$MOUNTS$$ n qX"/2.B2a)T(so hTs*rd@Ph hhhhT(soX2%<,bT(o H h Tdr@PT.  ""B0F400hD+NO hTLErr@PBT!BH>(!0T=-b*:*bTU TgDrr@Pm'TA1*TD(hCA` h h rr@P``hE` h h ``TpE KTjrr@PD41.T 2*T~D(hC?` rr@Ph h ``hE{` h h `rr@P` /Hb(R4TB hQhDh hSHBHrr@PD 0hB FhT(C.T)TaTirr@Po()V8hC?` h h `` Trr@P\l@Tl1TXHTFURTlT|B0FHB0Frr@P00HB0F4Ȁ00hTl%@Ty0TlTl- "h T6rr@P *DT(T T8(aTTTITUr@P PNTAP48 jPERRPROSTRACEFMDELRFMREADFMCLOS FMOPENERRO46NTAP55 ROOT43NTAP57NTAP53NTAP52NTAP58jP P*L,NTAP49 IT222934PJ PNTAP49 DECK-ID Z21 COBOL 1.0 SUMMARY-132Jr@P+#"a#.)-T:8EOȿV1B2aH,XFBrr@PVb @b9-& /T:Tg,TTj"X"Ab @?brX@PA1a,TtX TTT bX PNTAP49- PSTRACENTAP55NTAP56rP P*L,NTAP52 IT222936PJ PNTAP52 DECK-ID Z22 COBOL 1.0 SUMMARY-132Jr@P0HohXlh HXgh (h h!2 S Q H0%A h^ XJhrr@P9 HXEhXBhd(h (h /ȱnm" $ȧ 62 2 hHȜrJ@Pd- h+ h h"  h2  ؒJN@Ph hF2 N PNTAP52 P P*L,NTAP53 IT222938PJ PtNTAP53 DECK-ID Z23 COBOL 1.0 SUMMARY-132Jr@Pd0hH hhh H0%A 0FhHшHl rr@P9hƐ$" uh h Ȼ8h 0FhHȵhhȮ nȪhhr0@Pdȣ nȣȥh hثȘ蘀0 PNTAP53 P P*L,NTAP54 IT222940PJ PNTAP54 DECK-ID Z24 COBOL 1.0 SUMMARY-132Jr@PDhh h}h|y B0FHfB0Fb00H_B0FH[B0FW00HTB0Frr@P+200HL "hT} F1LBV1h!Gb *DT_(T _ h Trr@PV4_`NEOh*EOV1  r@P PNTAP54NTAP56PROOT43VNTAP55ONTAP58KP P*L,NTAP55 IT222942PJ PLNTAP55 DECK-ID Z25 COBOL 1.0 SUMMARY-132J@P6r@PHL\Hh" a!HA hh (h&hhhrP@P/ aT`HhA Hh(hT ȾP PNTAP55 PROOT43E P P*L,NTAP57 IT222944PJ PNTAP57 DECK-ID Z26 COBOL 1.0 SUMMARY-132JT@Pa h l lTH$h lu"% AlT PNTAP57 P P*L,NTAP58 IT222946PJ PNTAP58 DECK-ID Z27 COBOL 1.0 SUMMARY-132Jr@PhhH |HX hXl q" d   *#C:rrr@P/> " r < H E A a1"@Z{[lP}M]\Nk`Karr@PZz^L~no|_m [ABCDEFGHI.<(+&]JKLMNOPrl@PQR!$*);^-\/STUVWXYZ,%_>?0123456789:#@'="l PNTAP58 P P*L,DELT59 IT222948PJ PRDELT59 DECK-ID Z28 COBOL 1.0 SUMMARY-132Jr@PT`#T BT I ,T3#a'/rh@P+T T?/a)h  HohT?bo:*aTh PDELT59 "PERRPRO-STRACEOR9DRTNFMDELR@"P P*L,FMCLR IT222950PJ PLFMMV63 DECK-ID Z29 COBOL 1.0 SUMMARY-132Jr@PXXXXXXXXXXH5 h1A"h-hTl)(l&%"h!rT@P+l llT @PK JPFMCLR FMCLOSFMDELRFMGETSFMOPEN FMPUTS FMREADFMUPDRFMWRITJRPFMCALLWRITERHUPDRECGREADR FPUTS EOPENFLDGETS CDELRECBCLOSFLACLEAR @RP P*L,COBOL IT222964PJ P@COBOL DECK-ID B37 COBOL 1.0 SUMMARY-132Jr@P TZG>T T4H52 h3 0h-\)TZ,G#TrX@P+ h h TZ=wT \ T COPSCNCOPINT@X @P@ PCOBOL PCOBOL P*K,P8 IT222966PP*P,F,,COBSCN IT222967PJ PHCOBSCN DECK-ID B38 COBOL 1.0 SUMMARY-132J @PG PCOBSCNG PSCAN G P t P GGLOBL$ DECK-ID D16 COBOL 1.0 SUMMARY-132 tt@P0tt@P0tt@P8tt@P0tt@P0  tt@P0 tt@P0tt@P0 tt@P0tt@P0Itt@P0ttt@P05tt@P0``tt@P0``tt@P8tt@P01 CYBER 18 COBOL 1.0 PROGRAM LISTING JAN 01, 1977 WEDNESDAY 00tt@P0:00:00 PAGE 1 tt@P00 LINE SEQ I[-A-[---B---20--------30--------40--------50--------60--------70-[--IDtt@P0--- RECORD FROM  tt@P0  tt@P0'7tt@P8Htt@P0 0/ 0-  0/ 0 tt@P0tt@P8tt@P0  tt@P0@  tt@P0Z"tt@P0tt@P8_tt@P8ctt@P0`tt@P0 HJ N!EQ2"Q~%)Q V 1b Xid sV# t$+ uD ." ^tt@P0=$ s  # f"r "m5ZE2G10Gu1H0V1tt@P0h]0]0^0y^71 ^3!c0|"q0#~0$0%?1&R1'm25(1%)3*tt@P03e+BU,G8C-HC@.PAa/RZ@@0RLBA1R@2VCCQ3VZ@A4XBE5]tt@P0Z@A=6_A7bZ@B8dL`@9tA1:{RB;E<-AU=:8A>Z@@?|@@tt@P0KZ@DA]Z@ABAC@D&Z@AqE֩8BFTD7GBHZ@AITAAJBBtt@P0KUZ@@L1AMLA-NNBOZ@AP_@QAuR˴B1SZ@ATOZ@BUJtt@P0?AiV@Wª@Xk,BY1QZFU^P[G9^R-\HH$Q]]LHQQ^LRPQodIR)bRwdmRx`W^`Wtt@P0F`Wsb\F Gtt G9^HZH2^tQjYR냣tW >ttt@P0 WttKWttYW^t_^atŐ{Rs? Qg\ tt@P0 FWttYqHZG5m^NQ֥jY8W -uz`W -Z@tt@P0 EW -Z@WQqWeYwHZ8n6ksG:Z@ 8Qgީ8Li⇚Ttt@P0 p^(8" 1^Z@ ޏJ R|R=JP W - W -<W -tt@P0 bWH^^^ g^u8n6ksG:^qґ _ _tt@P0 < _bVZUW H^bZt}t+EttZtYtt@P0 Gzқt&ZtYQr# R9r!R+H^j"Rbڱ#Rtt@P0 AWe$VZtStJT%W tl7&ٯtt'JQGP8(W -RUP)sbtt@P0 GH^^*FlU^+R+H^j,R+H^j-\sҋY.4Y/)e̲tt@P8 rFltt@P0UC[}R5OgtIMe7Sj e=)`tt@P0!%I^@ p)aoU4 .!tt@P0q91d("3:=vz=0L+FM mtt@P0 W   %QR+Z@Z0Z6Ztt@P0 <ZXeX<XbXXXtt@P0 5XX HB]c6VH4H2stt@P06H`k&tt@P0aN +tt@P0TB!qZtt@P8 wtt@P0 COBOLSSPCOBLCOMP Ѐtt@P8 tt@P0utt@P0tt@P0tt@P0 tt@P07tt@P0btt@P0tt@P0tt@P0y  tt@P0 DT/EP TEXTST TEXT OP TEXT tt@P8 "tt@P8 tt@P0   !"tt@P0 #$%tt@P0 tt@P0 tt@P0tt@P0]COBOLXR0COBLCOMP ttPGLOBL$tt PADVNCE DECK-ID D01 COBOL 1.0 SUMMARY-132 tt@P000dd0 ddlT ttPADVNCEttPSETCOLttPADVNCEtt PADVNC1 DECK-ID D02 COBOL 1.0 SUMMARY-132 tt@P0"d0d0d0 dd0 l ttPADVNC1ttPADVNC1tt PALFALI DECK-ID D03 COBOL 1.0 SUMMARY-132 tt@P]$  ! d  ! "0d T&l tt@P,hT0 d^d0 ET x"SIT5Iv ̹E TAʜtt@PWaTPÜavT TY̷nTeTḽv ľ  ! d F̄ tt@PT T00d dT̙ l d Dtt@P ttPALFALIttPERHEREbSVCOL .NXTCHRoPEEK ADVNCESETCOLttPALFALItt PXCRASH DECK-ID D05 COBOL 1.0 SUMMARY-132 tt@P0COMPILER ERROR - COMPILATION ABORTED I/O ERROR CODE INSUFFICIENT MEMORYTTtt@P-TUATUVT,TWFT;TWT HH ttPCRASH IttPPRTLIN*WRITEFBWTX 5TRMN8 GttPCRASH tt PSDIAGNO DECK-ID D07 COBOL 1.0 SUMMARY-132 tt@P" ! dQ0H2 ! l " ! F0OA h jhhTtt@P>R HHHtt@PRttPDIAGNOBttPWRITEX>ttPDIAGNOtt PERHERE DECK-ID D09 COBOL 1.0 SUMMARY-132 tt@P000 dT HttPERHEREttPDIAGNOttPERHEREtt PERROR DECK-ID D10 COBOL 1.0 SUMMARY-132 tt@PT3  HttPERROR ttPDIAGNOttPERROR tt PFDCC DECK-ID D11 COBOL 1.0 SUMMARY-132 tt@P,T0C0 'j0hh0h^ d02nhV  Eتtt@PW1T hh  ؘ 1 l   h" D Ett@P 1̭"  .E0̦ l  ø̩1̚2̠l̆Ttt@P[ܮ 'n)l*l+lT  ,tt@PttPFDCC ttPSETCOL-PRTCRDNEXTA ttPFDCC tt PGETOPT DECK-ID D13 COBOL 1.0 SUMMARY-132 tt@Ptt@PNO SOURCE PROGRAM OPT ENTER OPTIONS tt@P dQdUh+  0E P1Td A2LTtt@PGT d Qd0 hl D ¯ddkؖ  1tt@P0r d hȆL" E0E0 1 l 2e ’  dtt@P ‡bZs'"a"- dJa0 dNa dTa d0Sa 0 dtt@P̾"lEd" fE 31a̦" d0H̘" tt@Pl̋" l" la0 dI a dQtt@Pa dKa0 dUa da d0Va dOa0 dLa dPa d0a tt@PId0̶"0E \ܭ̬" fܤT1N2wtt@Pt" " " Tg2tt@P" " ܋ 1"  tt@P! d" ! ܼ d d l' d"D tt@Pd2!L DfLL DnL Lntt@P ̻1̥ܺ1av tt@PK1glqv{nTF l tt@P0vdDT0tt@P d"Eא 2 d_ d00IdLtt@P  tt@P( "ttPGETOPTttPREADF WRITEFoTRMN8 KDTW ttPGETOPTtt PGTCARD DECK-ID D17 COBOL 1.0 SUMMARY-137 tt@Ptt@P MON tt@P8QT Er U0 d VT1 U vdT0 dh2 d h tt@Pcl hz D 0E   ؉ 1 hdd Ett@P 1 d 0l l  Ӝ1 l L tt@P1̚\0la~0beN2Q d0[l  tt@Pèܣ 10 l  Øܓ P1 l ҌD" MÁtt@P1 d 2< ld E  L " tt@P:̮ lG   P1̇0l0 da d` 0f2|0 dcln tt@PeL øܟꜝ1 0ld d l dT3  Dd Ett@Pdd ! L ldd ! d Qd081 tt@P P0ld Rd ldd  d00dd0lT  20 dcdtt@P L 0E1l l d0 T1  l ܢtt@P̡" ! ll l+ D E4E ܷ 1Z L 0Edtt@P<d ! L ld¶d ! Zܥ~0}_{T  tt@P0gd ‚r" ! d} l d l 0 d  dtt@P d LlE0d 10 Ttt@P00d d ̗ l02l̥l0\b tt@PlMD ­  ܗ1 l   ܂tt@P11T d d- E ,61 d w i ltt@P>e L E ddd L lɜ" ! lk̵ܹ1tt@Pi l l{ D ®ܣ̟1̛ l  ýܔ 1̉ 2 tt@PdTR 0Ed  ! l  ! ЛT d 8E tt@P01  lT  ! d̵T=  2tt@PT̰  ! Fdtt@P  8tt@P(ttPGTCARDttPERHEREOUTEXTGPRTCRDCREADRCCLSFLREADF bMIN ttPGTCARDtt PGTCHAR DECK-ID D18 COBOL 1.0 SUMMARY-132 tt@P  h0 d00"0" !0 ^) hT8tt@P.p lQ 0 dEdGOT hn h " tt@PY! lȥ  ! kȚhnȖ h̯ ldTHtt@PT̉ ḽd́ d0 l ¡ ^ l02 tt@P! lˆ  ! 2T*00 d Ed "tt@P ! l  ! l l̠ l l̙ l l8  ltt@PdS̕NNṮK l²d>"l8Edtt@P0%DS%2f hœ1 `l JTTtt@PIUtt@PN tt@PTttPLASTRYNttPFSETUPCPUTS CRASH GttPLASTRYtt PMNEXTA DECK-ID D23 COBOL 1.0 SUMMARY-132 tt@PdT 2 ! dK " ! d LEtt@P,  ! :T  lT ld  HttPNEXTA DttPGTCARD8NXTCHR>ttPNEXTA tt PCNUMBER DECK-ID D24 COBOL 1.0 SUMMARY-132 tt@P h h  ! d@  ! + 0E d ETAh/h ltt@P/ 2 ! l 92 ! l " ! lȺ  ! lȱ  !  кtt@P0Zd00E ȗE ܶȒ 2 ! l 92 ! ؂T &Adtt@P  2 ! d@ 92 !  d 2 ! l 92 ! ltt@P " ! l  ! l  ! TBld 23tt@P El̥  T0  ! l  ! О l d FT lTtt@P d1 " ! l  ! @l Z" ! / lT l1 ltt@P15 l D tt@PAttPNUMBER7ttPPEEK ADVNC1NXTCHRSETCOLADVNCE*ttPNUMBERtt P0NXTCHR DECK-ID D25 COBOL 1.0 SUMMARY-132 tt@P002d0%2l",T/l llldtt@P+ ttPNXTCHR-ttPGTCHAR"ttPNXTCHRtt P*PAKTKN DECK-ID D28 COBOL 1.0 SUMMARY-132 tt@P  ThT ! d Eh hhhh hhd$ " tt@P4! | ŸE hȻ  ! lȴ 2 ! Y hبȨ &裆tt@P_ ihȣ tțf wșhؚ h huؐȋhT&hȅ  ! lΥtt@P d0ΛdTx'l l R ! l  !tt@P $T0T0( TT d0 tt@PD% n(l ̽L &f w̶(l̘  l̗dtt@P E ldT')d  Dtt@P&ttPPAKTKNttPNXTCHRSVCOL PEEK ADVNCEERROR EXTRCTttPPAKTKNtt PPARSEC DECK-ID D29 COBOL 1.0 SUMMARY-137 tt@P tt@P0 b8N d\"p4 dh0 E285    htt@P5 1 hJ T ؿ֘1Ttt@PT Htt@P^0    hD 0E    ddtt@P  N̈1  tt@P tt@P h̉  !  T00TCD tt@P]T޸T Htt@P T  ! d+̼  ! (T $TOT( dtt@P( tt@P. hbX̓ T!̌ t0 d\0S D W   htt@P0Y dXe  1 h}Ⱦ" DY EM0ذ1 tt@Phȥ"  ؟01NT;XTȊTp tt@P ! l  ! ,  T 3T tt@P  d00\b d-̞ dX" 1̹tt@Pl" Š  ! N T̝1 =  Ttt@P0̊n"   ! l"   ! УZ tt@P[" ¸ n   T0  ! dX  ! ltt@P  !  =  To   ! l tt@P ! , d-   1 NTd Ett@PTTT,T\,T)̆ TlT} s tt@P d.T  ! dX  ! s   tt@P2\,   \Tl̔JTq̳  ! oNtt@P]" Md  lT{ l !  tt@Pl     (  T  ! dX tt@P !    TTT,0Ntt@P2 d-"DY   l1 -  l l   tt@P ̦1"    TL ! 0 d.J lEtt@P4L E0   ܠ E10  ! dX  ! ltt@P_  ! l  ! l  !   T  ! l tt@P ! l̼  !  N̪  * T̟  tt@P̕ T̎  ! l̇  ! 0l  ! X  *  tt@P ,  ! l  !  T   tt@P Dbp4 DUp< d- l@tt@P6  ̔1.tt@PM  L/tt@P0Zd0 f 0f qT0T {Tp TAtt@Pd0 E 0 xt ! d. ! Tl  Tz\tt@PT)̷ Tl TKl0 s ! T0d0b tt@PN\ dTMl\ T T tt@P Al\\l 2 Al   *  F .  N  tt@P1Ω Al n̥o HTTg dbD E  tt@P\ N0 E1 oT) y d00`bd0 l ftt@P 1T30dlT lTT TT tt@Pld0 dtt@P  Ztt@PttPPARSECttPNXTCHRADVNCEERHEREPEEK ALFALIPAKTKNSRCRWTNUMBERCOPNFLttPPARSECtt P2PEEK DECK-ID D30 COBOL 1.0 SUMMARY-132 tt@P2% l"D00fLT1nlh tt@P,Htt@P1ttPPEEK )ttPGTCHARttPPEEK tt PPRTCRD DECK-ID D33 COBOL 1.0 SUMMARY-132 tt@P0I T1T 1 0V  CE00[? h7"tt@P,D0E0ED 1 lT hPȼ" L EHذ 1e tt@PWhaȥ"  ؟ 10o DE00c}  R0EG 0ld w htt@P"L E001 kd0Z E0  ! d ! tt@Pl #øT  tt@P`ttPPRTCRDttPWTD PRTLINttPPRTCRDtt PAPRTLIN DECK-ID D35 COBOL 1.0 SUMMARY-132 tt@P0 ɜ2"3T:;T<=T1<>T<? lT1<@ Z2tt@P+  l 1 l 64BttPPRTLIN8ttPWTD WRITEF#ttPPRTLINtt PREGSYM DECK-ID D42 COBOL 1.0 SUMMARY-132 tt@P0 h06h] dT%2 EQ h "p0lH҈tt@P0 dT%2D"0 xGQغϘ1ȴd ȯhT4%2tt@P[h0005lȞmnvTT%2n̦ "p8d02Tdtt@P% n%2 f%2̈f l d E "p8d%L wftt@P l1ltt@P Dtt@PttPREGSYMttPSYMSCRnLASTRYttPREGSYMtt PRPLCIT DECK-ID D44 COBOL 1.0 SUMMARY-132 tt@P0  T0d00 d0 d h0h h  ! d  ! tt@P5IT ETT0Id0DبN̳tt@P`h̵h0̺dd  f̪ h 0E 00df h  ̍tt@P1̉ l L 11 l d T9d tt@P  ! d  ! T T@ lN tt@PAdbd  d0 T d l3T T3 9Ttt@P T ̐d0 da d` 2 dD  ! l"tt@P7 ! C0ld읞2L L"   tt@Pb! d̼L"   ! ̅E T l d0eTBtt@PT%T d0  Al Al0  lTd tt@PEdܔ02# d0tt@P   tt@P ttPRPLCITttPNXTCHRPEEK ADVNCEGTCARDWTD DIAGNOttPRPLCITtt PKSETCOL DECK-ID D48 COBOL 1.0 SUMMARY-132 tt@P0d0E 00 tl0 un l0E U 0 Ftt@P+ f0 V n> rA rT1I UJ ttPSETCOLGttPOUTEXTBttPSETCOLtt PkSPILL DECK-ID D50 COBOL 1.0 SUMMARY-132 tt@Pp0` h0K07,%0D'Tjtt@P( l5%D4T$jtt@P5 ll%hDDTjtt@PEh nȵQ lp8dhtt@P] HHttPSPILL ]ttPCUPDRC1CREADRAttPSPILL tt P^SRCRWT DECK-ID D53 COBOL 1.0 SUMMARY-132 tt@P hd s0hSlh0 E2SN h "p0 d\Att@P/ш"D]" x0@N1Ȼ0"l hShȰ Htt@PZttPSRCRWTUttPSRCRWTtt PSVCOL DECK-ID D55 COBOL 1.0 SUMMARY-132 tt@P0d t0E u0 l ttPSVCOL ttPSVCOL tt P6SYMSCR DECK-ID D57 COBOL 1.0 SUMMARY-132 tt@Ph05#"h#d5T5hh HHtt@P/HttPSYMSCR&ttPSPILL ttPSYMSCRtt PTRMN8 DECK-ID D58 COBOL 1.0 SUMMARY-132 tt@PT0T3]5T0T3 T ttPTRMN8 ttPCCLSFLCDELETQUIT ttPTRMN8 tt PcSCAN DECK-ID D45 COBOL 1.0 SUMMARY-132 tt@Ptt@Ptt@PJAN FEB MAR APR MAY JUN JUL AUG SEP OCT NOV DEC ;Zx0Ntt@P-tt@PXtt@PSUtt@PNDAY MONDAY TUESDAY WEDNESDAY THURSDAY FRIDAY SATURDAY T d Er Utt@P0d0 VT  ! ŀT1W UX T0 sl rl  ! TWtt@P UX T l 0r l  ! ŀTW UX tt@P% lr El h> Dt E ß1 Fŀ AdsT9W Ustt@PP  ! lk00d t f u d Htt@PuT ld r d00 V 0l x" Ttt@P   ! d   !  l  !  · tt@P  ,î̭ l 0E U̦ AlT1LW U Tv r ŀ̕"E0 WlTW UXtt@P ̅ AlTW1 U d0 utt@P0  T T 0Md vT.T33   3T0 dB tt@P6DV EE 1 lV L Ed 10d0 dtt@Pa d00dT3]0 d ddp00d d p03d dtt@P lL,dnLnܒ 1 l%2L0 ftt@P u1̻ lTU 'd] d00 Nd00P d08Vtt@P Pl  -E -0E  -T10YXT1.ZX lDV/Ett@P ܣ 1T11WXT12[XT13\X҆dR Bl "tt@P8 ! dSp0 ! "p0l dc̹L "E8Ett@Pc 1T0 I|d!) ! lD0 U " ! tt@P!T]^W 0dDT]tt@P_TTW!̿$ d+̰  ! dRdS  2 ! tt@P lTh̏ T l r0 .d V ŀTW UX l T!tt@P ! l ! аl ! Ц!\TWd, ltt@P) /T0`6TT]d0ETG E2TUTtt@PT  ! dR̠  ! dS̘ ! l̎  ! dT̫  ! dtt@PỤ ! ڬ0T`T̺) ! l̀ ! tt@P d 2 ! l0  ! 0ET.  tt@P՜1TT!̲TaGT]TlbG  ! dR  !tt@P dS ! l  ! dT,  ! dU ! ٬tt@P+1TGT];\Y0G-FTG\itt@PM  tt@PW d ttPSCAN MttPSETCOLNXTCHROUTEXTADVNCE DATTIM"TAPELU%TABLOK+FSETUPkGETOPTWTD $NEXTA FDCC RPLCIT5PAKTKN7ttPPARSECASRCRWTLERROR REGSYMALFALINUMBER2ttPSCAN tt PbOUTEXT DECK-ID D26 COBOL 1.0 SUMMARY-132 tt@P a0" h2MM&2D`b F% D3 8"Dtt@P/4Tatt@P5 ("L("0 nK طtt@PQ HHHtt@PattPOUTEXTQttPWRITEF1ttPOUTEXTtt P`WRITEX DECK-ID D61 COBOL 1.0 SUMMARY-132 tt@PN % DT_tt@P %2D\D] D^b  H % DC% D DT_tt@PE_M tt@PQ HHtt@P_ttPWRITEXQttPCCLEARCPUTS AttPWRITEXtt PWTD DECK-ID D62 COBOL 1.0 SUMMARY-132 tt@P" ! hdh hh d~@DDp0  0]tt@P1p8h= h\ h1Ⱦh lVL *Ȱ h1 hhtt@P\ȨkȢL"  -]Ț HHHHttPWTD mttPWTD tt PYDTW DECK-ID D08 COBOL 1.0 SUMMARY-132 tt@P hh dV<DXh 2 ! dW 92 ! 6 tt@P1 h;nGԘ1LnȽh HHHttPDTW JttPDTW tJ P0WTX DECK-ID B57 COBOL 1.0 SUMMARY-132Jr@P -h )hh! Dh 01234567r@P+89ABCDEF PWTX P J PISHIFTS DECK-ID B55 COBOL 1.0 SUMMARY-132Jr@P 541B>* )(%H4 82 :rR@P+ @ @??RPSLL SRL EXTRCTP J P DATTIM DECK-ID B42 COBOL 1.0 SUMMARY-132J&@P   & PDATTIM P J PMIN DECK-ID B49 COBOL 1.0 SUMMARY-132J*@P "h "2"* PMIN P J PCFMENT DECK-ID B33 COBOL 1.0 SUMMARY-132Jr@P XS|Xr XIhh XA X< X6 ^ XS rr@P+X* X$MXC X X X X1X'rr@PV-, HH @jhhT XdTr@PJPCCREATCCLEAR COPNFLCCLSFL)CGETS /CPUTS 9CUPDRC?CDELETECREADRKJbPCRASH }UNLFILLOKFIL READR NDELETEHUPDRECBPUTS 4 hrr@P+ h h T 9 T ! j,  TUr  r"@PVhH T ""PWRITEFREADF UQUIT ^C7WRIT"PCRASH ILOG1A P J P[TABLOK DECK-ID B61 COBOL 1.0 SUMMARY-138Jr@P h# ` e"`e"` " "H " "e" ! ! rr@P+"@(h)"!& "  "H" f"h    h0 r@PV4 TAPTABLOKTAPELU'P t PTFSETUP DECK-ID D12 COBOL 1.0 SUMMARY-132 tt@PD D T Rtt@P(DDTStt@PD%D&T Stt@P'h h2 f 1 b b b DGDHTStt@PI HHttPFSETUPJttPCCREAT#CDELETCOPNFLEttPFSETUPtP*K,I8 IT223011PP*N,COPSCN,,,B IT223012PP*K,I6 IT223014PP*K,P8 IT223015PP*P,F,,COBINT IT223016PJ PHCOBINT DECK-ID B35 COBOL 1.0 SUMMARY-132J @PG PCOBINTG PINTERPG P t PGLOBL$ DECK-ID D15 COBOL 1.0 SUMMARY-132 tt@P0utt@P8z,tt@P0| D.BUGGER tt@P8tt@P00  tt@P0  tt@P8tt@P0`[_<tt@P019AXPB0/S,.V$Z*+-CDtt@P8@tt@P0  tt@P0( tt@P8Ctt@P0O( ( %   tt@P0z`% %     tt@P0 0    ' @ 0 tt@P0* @'@%  0!tt@P0 h     tt@P0&@* @$ PPPtt@P0Q@*PP P (**&*(* (*P ( tt@P0|**(tt@P0COBOLSSPCOBLCOMP COBOLDSPCOBLCOMP tt@P0COBOLPSPCOBLCOMP Ѐ tt@P0tt@P0 -0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZttPGLOBL$tt PCRASH DECK-ID D04 COBOL 1.0 SUMMARY-132 tt@P0COMPILER ERROR - COMPILATION ABORTED - LOCCTR=XXXX I/O ERROR: CODE XXXX INSUFFICIENtt@P-T MEMORY WORK STACK UNDERFLOW STACK UNDERFLOW POINTER OUTSIDE STACK POPPING Stt@PXPILLED STACKTT1TȔuTaȊ "DTgtt@P5T0T30 8dT DL2 ttPCRASH ttPPRTLIN_WTX pWRITEF}CCLSFLCDELETOVERLAttPCRASH tt PSDIAGNO DECK-ID D06 COBOL 1.0 SUMMARY-132 tt@P" ! dQ0H2 ! l " ! F0OA h jhhTtt@P>R HHHtt@PRttPDIAGNOBttPWRITEX>ttPDIAGNOtt PTFSETUP DECK-ID D12 COBOL 1.0 SUMMARY-132 tt@PD D T Rtt@P(DDTStt@PD%D&T Stt@P'h h2 f 1 b b b DGDHTStt@PI HHttPFSETUPJttPCCREAT#CDELETCOPNFLEttPFSETUPtt PGETTOK DECK-ID D14 COBOL 1.0 SUMMARY-132 tt@PT0T0r ) h AdW#"D!Ttt@P"1Tr "T h AlPT"DX nȺ"L tt@P0MfذĘ1 tt@P0YuĀdXrb r "" Ζf{Z rtt@PX ΀ndz  ! d  ! M d0 Dtt@PlT{  dY lPPPPP tt@PttPGETTOKttPINTEXT8DIAGNOttPGETTOKtt PLASTRY DECK-ID D21 COBOL 1.0 SUMMARY-132 tt@P00hh"F 2 (h"h h6ڈ%2D%tt@P/n h 1ӈllThsǜ "6UT0%2[dtt@PZ%2\d%DiTtt@Pj%2b[%2b\} d [l 2̰ [lTAd̦ [ltt@P d%2L%Ώf1 ls " 5T8Rtt@P%2 DTftt@P̩  l `ll al%̭D%2f̣ l1 `l 2tt@P l̗ l̋%2L%ń d 10llTlstt@P!  "o71T0%20_d%2`d0%DETtt@PF%2b_%2b` Z d0 _l "iTlmTlsTtt@Pqtt@Pw Ltt@PttPLASTRYwttPSQZDN jFSETUP.CPUTS BSQZUP dCRASH pttPLASTRYtt POVERLA DECK-ID D27 COBOL 1.0 SUMMARY-132 tt@P3XXXtt@P,COBPH1tt@P< hDsdr06ptt@P0N d#k0 D^THtt@P_  00E`T3L] 1T lz0 fI ?1 ̤E.T,T$tt@P l f0ܿ 1 dT1T$d"T1"0|Dtt@P l Ttt@PT$ lTT0b7s1""TT du tt@PD{dH d# D" 0E0E{ 1dI0 dD08tt@P5 _"p0` dF 6d Z"p0[dE 7d/p4dM ^"ptt@P<0_dGƜ `"p80dK "p0 _"p8ŒdL "p0 _"p8d0 J dtt@P0gVT3|T1DddTq16l0d7 bd# "Dtt@Pf 1T36 dTk d$0 l2 %Dtt@PTtt@P l\T\\ dTf0|T0 dxl0Hd0Ttt@PT l 0E܏10V. T3DT \tt@P/ d#&T 1D 1T0\05<T+T00 d2ptt@PC0d Al l |" f N  ̸ 0E`di dtt@Pnj̬ z0dk|l% DTmtt@P]ܗ 1   tt@P  #tt@PttPOVERLAttPCREADRZCPUTS  SCRIPTCCLSFL4CDELET8QUIT pOPNFILGETFILREWINDGETTOKFSETUPttPOVERLAtt P;POP DECK-ID D31 COBOL 1.0 SUMMARY-132 tt@PD07 2L nLh/6+T89/Ttt@P,&:9 Htt@P8ttPPOP 1ttPCRASH ,ttPPOP tt PdPOPW DECK-ID D32 COBOL 1.0 SUMMARY-132 tt@P0T,2Tbc hh d`,Da|ntt@P.1 29ט l՜2R lL%nȸ PTرȯltt@PX Htt@PbttPPOPW XttPCRASH ttPPOPW tt PFPRTLIN DECK-ID D34 COBOL 1.0 SUMMARY-132 tt@P0 X,00ɜ2'0T1?@T1ABTACTAD lT!Att@P+E@7  l 1 l 64BttPPRTLIN=ttPWTD WRITEF(ttPPRTLINtt P^PUSH DECK-ID D36 COBOL 1.0 SUMMARY-132 tt@PD]"0B0h "/Th2-Tݘ2-T Btt@P/T#hИ2BTȘ2BT+LȸfLξ n Htt@PZHttPPUSH SttPSQZUP 8SQZDN 0LASTRY@ttPPUSH tt P0PUSHW DECK-ID D37 COBOL 1.0 SUMMARY-132 tt@P0 T0/ h!D."{f0| h 1l Htt@P-tt@P/ttPPUSHW 'ttPPUSH ttPPUSHW tt P)QQSET DECK-ID D38 COBOL 1.0 SUMMARY-132 tt@PT dvT0Dr $00$ lD' D(0OfN ttPQQSET %ttPGETTOKSVCOL ttPQQSET tt PREGRWN DECK-ID D40 COBOL 1.0 SUMMARY-132 tt@P*oFlҸU^ ZtY v&ZtY W -uz` DW -Z@ [tt@P.W -Z@ RW - xW -< W -b(JW -RUP htt@PYȦ hrȚ"D%f0ؐ 1d% DTtt@P 1tt@P DttPREGRWNttPREGSYMttPREGRWNtt PREGSYM DECK-ID D41 COBOL 1.0 SUMMARY-132 tt@P0 h06h^ dT%2R h "p0lIшtt@P1 dT%2D"0HRعϘ1ȳdȮhT5%2tt@P\h0005lȝnnwTU%2n̦ "p8hdᘄ2Ttt@PdՔ2Td% n%2 f%20f l ?l ;dtt@P%L0|f l1ltt@P Dtt@PttPREGSYMttPSYMSCRoSQZUP LASTRYttPREGSYMtt P.REWIND DECK-ID D43 COBOL 1.0 SUMMARY-132 tt@P a0"Nd `d,T-, ` "0ftt@P$ Htt@P-ttPREWIND$ttPOUTEXTttPREWINDtt PhSCRIPT DECK-ID D46 COBOL 1.0 SUMMARY-132 tt@Ph&h06% h"#TfgV۞">Dedtt@P0hϞ"%0D9Ttt@P: lO 0"DM%DNT6tt@PO lȯlȯlȫ("Db%D cTtt@Pdț("D Dnȏx lȈ"Ήlp< dp0`tt@Pdltt@P LDDtt@PttPSPILL ttPCUPDRCKCREADR`ttPSPILL tt PSQZDN DECK-ID D51 COBOL 1.0 SUMMARY-132 tt@P0 h h 2B h?"0h"<"Dd dtt@P3јdhhO h 1H h hш hȪhȦ ltt@P^Ldǎ2θ hd%L%nȆ hȄ h1L"tt@Pd젎dLηnLΈnl̐1dtt@P D ttPSQZDN ttPSQZDN tt PSQZUP DECK-ID D52 COBOL 1.0 SUMMARY-132 tt@P0 h hh9 d"0h"8D"dl՘dtt@P3hhJ 1C00-h h̘hȰhh litt@P^%L%nؙؙ̰1ȕ"Ld촆0hLΝnLטnȁdtt@P l1dtt@P L  ttPSQZUP ttPSQZUP tt PSVCOL DECK-ID D54 COBOL 1.0 SUMMARY-132 tt@P0D00d {f l ttPSVCOL ttPSVCOL tt P8SYMSCR DECK-ID D56 COBOL 1.0 SUMMARY-132 tt@Ph05$"h$d6T67hh Htt@P/HHtt@P7ttPSYMSCR'ttPSPILL ttPSYMSCRtt PUPSYM DECK-ID D59 COBOL 1.0 SUMMARY-132 tt@P01T%2DTtt@Pd0 d1T "p0d|T1%2d1T8dTtt@P1=lDp0"E 2gȬ" Lp0"p0&" tt@Ph2{Ȕ"Lp8"ȅ hܮ̣1tt@P DDL tt@PttPUPSYM ttPSYMSCR+EXTRCT6MIN SRL =ttPUPSYM tt PUPTOFD DECK-ID D60 COBOL 1.0 SUMMARY-132 tt@P0 2nhh "p0d}j0hThThD~p0tt@P1"E0E0 2Q" Lp0"p0&"Ȳ 2fȭ"Lp8tt@P\"0Eȝ hؘ̭1̘l HHtt@PttPUPTOFDrttPEXTRCT SRL &ttPUPTOFDtt P xINTERP DECK-ID D19 COBOL 1.0 SUMMARY-132 tt@P d- D g 0E0E d( " L E 1tt@P+ 1dd00Td5Nv Ĉd   Stt@PVb ?r " S" 3T|%2DkTtt@Pl ST0b}%2fT i STo}0%2nTx j ST}3|%2l Sltt@P SD gn SD Tjtt@P S2ڀd eT elT e Sn SnT i S ntt@P Sδl S̰dάln S̥l S SLΛ n Sȶ2̑lTtt@P| el T3|l ST0v&^T i3 l0DwNd0 dB8 dutt@P* ST  lT0D " ! dw ld2Vրld fT e{tt@PU fΰl̶gTR i0 lwln ll lTz tt@PĀlTa k{ e llT l{ e̞T j3 tt@PDN̊db̅T0 m du STyT  tt@P0d0vDlꜗ ! l l ST  ! l  !  ЛlMtt@P0l l lT4=z ! ll̹= lTtt@P,=TT& ;T3 k l S0|d ė"0} ! l S8 fItt@PW S2kT0lT70 epTe3 S0T STs iޜ28tt@Pl l S0Tx00-  !0 P 7l l tt@P0R lT; lT nl2Ԑ2 ! dvT1 l ol SȂtt@P2􌲈l l Sd eT n eڀlT n eҌ l Stt@PȈlT n e̿lT n0 e0 l S|dRl Sb)stt@P.""JlDdC02N0 dXj0˜2a tt@PY_ l`2 ! ln l0 d l d"  tt@P l 1T pT. d0uDr 1T j l%2DTtt@P l q  ! dvT m l%2 DTtt@P l l0 f|ܥ 1T1 i i%2fTT ldartt@P #O d0]l0ld0^ l0wd8 dctt@P " ! d0b% lT duTDr0  ! d er  !  Ttt@P0Dd0T_ " ! lV lTI0z r Tw2tt@Po ! l ld2ld fTl e1{ f[T( ltt@P "T ll l0 dT duDr0 T o l r l lTtt@P i l%2D Ttt@PTY dT1 i l%2DTtt@PTd^ lT- " ! d0br OTT lTtt@P ll d0]wd0yr v ll ll " ! d0 e  ! tt@P:rT i l%20ξd0l ! d f  ! n8 dTtt@Pe s0 dupTtToy llTDr  l d0Ts0ltt@P " ! db llT0| d@D g0E ,1T itt@P dT0 tlT u0*TlT3 t0l}d00~d0T ttt@P0%D"d eT  ltt@P e0 d lT? j l%2 D Ttt@P l q "p0l&LT1 l%2f0|1T l00d ltt@P7T v1 e0 l 2J lP"  0Dr  l d8 ddtt@Pbl0 l̰"0 2ț"d f & l 0"n֌l tt@Pl l܆̥1 ̾ ̾ l̸(l"̳n̯ḻ l dutt@PTT  l wd eT e d|d T l%2DD g dtt@P0lT jtt@P eT iT lT j| iT iT0 t0T l dtt@PvT0 lT0| l5Vd̛ l 1 lJ̏"tt@P@ L½E܄ c1  E E0'd00"0 DiT tt@Pj d}"D g"0f 1  l"L"0 ftt@P 1 lČ"νdČ"εd" ! d e" !tt@P " ! d0Z" ! lܘ 1̀"DT-tt@PT0|T j0 dvT0 l0d T0   dutt@PT|T lT l1| iT iT j0AfC @T i1D i ltt@P>A\N ,d .d00d0dy d0ji l lptt@Pi 1 l d0*Td0T t39\!wDgtt@P'es ;0 SD0 g|nT! i S8 fItt@P S.l Sd ep* )(%H4 82 :rR@P+ @ @??RPSLL SRL EXTRCTP J P DATTIM DECK-ID B42 COBOL 1.0 SUMMARY-132J&@P   & PDATTIM P J PMIN DECK-ID B49 COBOL 1.0 SUMMARY-132J*@P "h "2"* PMIN P J PCFMENT DECK-ID B33 COBOL 1.0 SUMMARY-132Jr@P XS|Xr XIhh XA X< X6 ^ XS rr@P+X* X$MXC X X X X1X'rr@PV-, HH @jhhT XdTr@PJPCCREATCCLEAR COPNFLCCLSFL)CGETS /CPUTS 9CUPDRC?CDELETECREADRKJbPCRASH }UNLFILLOKFIL READR NDELETEHUPDRECBPUTS 4 hrr@P+ h h T 9 T ! j,  TUr  r"@PVhH T ""PWRITEFREADF UQUIT ^C7WRIT"PCRASH ILOG1A P P*K,I8 IT223058PP*N,COPINT,,,B IT223059PP*K,I6 IT223061PP*L,COBCAT IT223062PJ PCOBCAT DECK-ID C02 COBOL 1.0 SUMMARY-132J4@PTZ COBFIL 4PCOBCATCOBSEGPCOBCATP*L,SUBCAT IT223064PJ PSUBCAT DECK-ID C09 COBOL 1.0 SUMMARY-132J4@PTZ COBFIL 4 PSUBCAT PSUBCATP*L,DMYSEG IT223066PJ PDMYSEG DECK-ID C08 COBOL 1.0 SUMMARY-132J PDMYSEG PDMYSEGP*L,FMCALL IT223068PJ PFMCALL DECK-ID Z31 COBOL 1.0 SUMMARY-132J PFMCALL P P*K,P8 IT223070PP*P,F,,COBSEG IT223071PJ PCOBCAT DECK-ID C02 COBOL 1.0 SUMMARY-132J4@PTZ COBFIL 4PCOBCATCOBSEGPCOBCATD P>COBFIL DECK-ID C04 COBOL 1.0 SUMMARY-132D@P@PW @PY @PcC7EXTR @Pk095 @Po@Pt*C @Pz50@P~DMYSEG@P@P'@P<@P( @P` p@Pop8@P8p@Pp8@P8p@Pp8@P8p@P,p8@PW8p@Pkp8@P8p@Pp8@P8H@PH@P>@P?@P@ @PA PPP @PD*T@P @PE*B*K*V*E@PI,I,P8 ,0 @PM0 00*L @PP*J@PQ*Z@PR*S2@P*COBCAT* NAME , OWNER 22@P)*SUBCAT* NAME , OWNER 2p@Ph hhhhhh h hhȹȵȴhȯf؎pp@Pب 1T\0Ȝ ȋd hhȏ h dȒ!h App@P *] TWC  l \WU\fnjd` da dbpp@P \cd"\e l̸nnnn Nhpp@P.gfYdiZdj 9; 8l4k#TWm>? pp@PY1l̕ dn> 2l\ dp dSt̠d̢d̤d dqpp@P ) dr dsf( 1 lf6 1T')uqTpB@P\'uqTT̘  ̣ ̝nh\B$@Pv̋  ̖ ̐nh\$@P> ̔nh\p@PU P  l[fܔ 1H TEdY#pp@P TNtٔF  ̔R Ŝ  ̻Q 7̵G pp@P6̮w̩  dT" ; (# ldqT(pp@PaxqTb ! l dy l 1F d\ ? % > <  lnp @P hT 2@Pm lpz1nnh\2@Pv׀nh\@PoSpnh\@Pƀnh\*@PvB dQd[d*@PZ@P<( lK Zp4xd{,h NlnZp@P̑ ̓  l? >  l drf 1T Ehpp@Pg̵f `d|ad}~ dVڔr q ̚p M̼ pp@PCp l ͖o n 4̟ n l̩ ̴  pp@Pn  Gyl = 7˞ 2 Tpv̙  pp@P\poVβd|r d}d;d_clm% d]\]p:@Pl]C  ~1T o:@P@P@PN@PP@PV(@PT\#U \W\(@Pp@P̔  T S    lp@P l@Pj@P3dqT@qT3l 9dT_(q\T "\ `l!j PCOBFIL ZPMIBUF COBERRFWRITE+DISPATgDISP #COBMODCOBJCRSQUEEZCOBOBJFREAD LINK 4ZPCOBFILJ P CATGET DECK-ID C01 COBOL 1.0 SUMMARY-132JX@PH"h"hhTZ` ******X PCATGET P J PCOBSKL DECK-ID C07 COBOL 1.0 SUMMARY-132Jr@PH~H}H#  Q  ` &T   #\@YHUrr@P+HTHZ"O@ Tjj/j>jj6jjjjjj q"rr@PV/@ / 0C< q@r@P7@IN]dkrr@PHh"h j  n *E" j=c@=c@* rr@P *LIBEDT *K,I6 *K,P8 *P,F,3,C7CJMP *B 'C7CJMP' *B 'FMCALLrr@P' *B 'PGMIN ' *B 'CREATE' *B 'C7CNTR' *B 'COBOBJ' *S *T  rr@P *K,I8 *J, , *K,I6 *Z * *V  rr@P6*END *P,F,3,COBO01 *B 'C7CJMP' *B 'FMCALL' *B 'PGMIN ' *B 'CREATE' *Brr@Pa 'C7CNTR' *B 'COBOBJ' *B 'DMYSEG' *B 'COBO01' *B 'DMYSEG' *B 'C7EXTR' *T rr@P *K,I8 *J, , *K,I6 *END *P,F,3,COBO02 *B 'C7rr@PCJMP' *B 'FMCALL' *B 'PGMIN ' *B 'CREATE' *B 'C7CNTR' *B 'COBOBJ' *B 'COBOrr@P01' *B 'DMYSEG' *B 'COBO02' *B 'C7EXTR' *T *K,I8 *J, ,rr@P *K,I6 *END *B 'CATSEG' *B 'DMYSEG' *B 'CATSG1' *B 'C7EXTR' rr@P8 *END *B 'DMYSEG' *B 'CATSG3' *B 'DMYSEG' *B 'C7EXTR' *END  rr@Pc*LIBEDT *K,I6 *L,COBOBJ *B 'COBOBJ' *Z *V  *Er@PND PCOBMOD)COBJCRSQUEEZP D P0COBOBJ DECK-ID C06 COBOL 1.0 SUMMARY-132D@P@P7@P?@P5@P @P4p@PC/  -' ) h hd! h܈ h  1 hp@Pnʟhp@Pu hhȾhȽhT;< #T hȩ h J I B pp@PA hȔ h蘞5 4A 1̾ O %4"\? l dBέ @e p8@P 18e l d;d<8<@P l Z1ll s T7<$@PT;< "\lـ$j@P(@'H$H!TT h hnh h 8h #h h\hN\ hL\hHhj PCOBOBJ "PQ8PKUPQ8PREPCATGETCOBERR"P D PCOBERR DECK-ID C03 COBOL 1.0 SUMMARY-132D @P (@P *CATLOG* **** ERROR **** ((@P *CATLOG* READY TO INSTALL ((@P MASS STORAGE I/O ERROR ((@P REQUIRED PROGRAM NOT FOUND ((@P, LIBRARY PROGRAM NOT VALID ((@P: PROGRAM ON LGO NOT VALID ((@PH TOO MANY PROGRAMS ON LGO ((@PV LAST LGO PROGRAM HAS NO XFR((@Pd INVALID CONTROL STATEMENT ((@Pr OPERATOR ABORT (@P@P @P*V >@P hh+ T , h\>B@P  \T\#T B@PHTTh PCOBERR "PQ8PKUPQ8PREPFWRITEDISP "P D PgCOBMSG DECK-ID C05 COBOL 1.0 SUMMARY-132D @P @P'@P&(@P *COBCAT* PROGRAM ((@P *SUBCAT* PROGRAM ( @P( " 8 $ .@P4hh hT& '.R@PGhhh\&'HTTh h h\hR PCOBMSGW PQ8PKUP]Q8PREPZFWRITE<P J PFORTN DECK-ID Z32 COBOL 1.0 SUMMARY-132Jr@PX/X+X'X# XX}X$Xrr@P+)Xa"a X" XIb XFb XCa X@b bX @P@ .@P ENTER SWITCH VALUES <12345678> .@P 12345678 @P SWITCH = 00000000 @P INVALID SWITCH ENTRY @P2p@PChT-178hT1293 :; hߪhʬHhۨh    p@PnИ p@Pw   ȿ ȼ ȹس 1 I H lApp@P lI HlA lI pp@PHlA 묹lIw HlAj pp@Pl dLh̓Al BlC lDpp@P#lE lFlG lHlTP14@Ap.@PN ;T\15BA ;. PSWITCH "PR9SWCHPGMIN FWTREADHPGMOUTR"PSWITCHJ PR9SWCH DECK-ID Z37 COBOL 1.0 SUMMARY-132J PR9SWCH P J P(EXENTP DECK-ID A34 ITOS 2.0 SUMMARY-132Jl@P X X ` X X X X X XH "H !H HT`l:PWTREADSLICUP ATTACH PGMIN PGMINTCHAIN PGMOUT:P P*T IT223090PP*K,I8 IT223091PP*J,SWITCH,$$ IT223092PP*K,I6 IT223104PP*K,P8 IT223105PP*P,F IT223106PD PPHASE1"% DECK-ID A01 COBOL 1.0 SUMMARY-151Dp@P pp@P+MAIN $1pp@PVpp@Ppp@Ppp@Ppp@Ppp@P-1MXB2  ? pp@PX?  .()+-Z0/0 @ @ pp@P   >DJP Vpp@P P@@0 0pp@Pـn`4B,pp@Pv)e62dv3rnnG ՛n7#w#pp@P/ w.ozeede$6vv0 !-. /!0.7 pp@PZwڌn.nz"ev  pwnw.e-v4 .732X,pp@P$@(. v/v 6#e&v 32 Kn+v}dd6  vvj88pnQ.7˷ڥ'pp@Pv į7ѷ"c6wեnvv,6'W6468v  J opp@Pv1 %v $av ,M t$4wc%7䯽7 6 68t v#C b%o"t!pp@P" v!.#4!%v ".$4" ott b%v dd 36v9@8pp@P1v?jv*Rd2 N,v vjvAv 4jv?pp@P\j&v޸O% 67v7r8MB9%pp@P>?Caj>>4w:ޏ,:=,==[CD=`ܐ4:^wjpp@P匎`c%=%r^C%r=^cw=ܑ4=`pp@Pݴev 32"c6wn& 56o'6P7:66 6ddd6pp@Po8v 3@v Gv v7$687$Ѓv"73 n(rpp@P3 2 2ճn6.45np'.56 7ãcc"c44'M% a o-t7pp@P^ . !o)TvW%CЃr      44!tpp@PtЃhΊ-d\ 46ot.3 ><5@ edot3 Ί6pp@P),'ot  tX66 otЃt[ pp@P"# "6rdHd6n8v 37v v 7$v$7┇j v#pp@P 2!o)vfv GdUov #2 v3 26,tr6!".6L,"6pp@P5 ,"l!-!# 8/$o-v #w #vtH6"6!v %nmt$ pp@P`C nntD$E t7%4C$t7ovpp@PO#2- v2#v66'.oz7T:e/6,e 6 v"v pp@P.o i%%& &9Yir'(7w&j' ,'pp@Pdvd)6i:66'v39ld62:6'6 :d^d|ddd6o8v> 3Fpp@P h y N޶v$6 v7ȶ7v2b7$h.o$Ѓ MiR :* 6 pp@P7&v Mvn\b7(v4wԷtЃ;.4eΊtЃpp@Pb;tvt.0l;v ot4otЃvbΊv opp@Pt+o.t v4$4+7fΊ %26+v,nv,(,vXv j!6+vpp@P,vn*v i6+v,vn6+4 +41-tЃv _ pp@P ntЃrձnpr$ dvձn.o8t 769 v4$4pp@P.7 ot/otգn v0 ".# 3+6b*6Z.-pp@P9,,:61v@v 2v;3.6Ї.803 v46$o8v-$-&dd|ddNed:dd]6 z,-$ <-6pp@PdJ,.$ Vv3E۸e ଶpOX77Ժ3664vxjs5pp@Pv.o8 +7w50dj6dd6 d6 !6e+e,6-.833vnipp@P %M_dt^]. 66i|e tb `v894pp@P 7o3tj.N60v4 /l/82vvpp@Ptti<\tj.ctOvt.0xvdpp@P; #.#  4"v:,0ev# "r%,1v$no5pp@Pfvkvc7٢v1/6v 0=[L071WYotapp@Ptov86% Rdv8v.76%6 +t|v opp@Pv7n%v9Rdv b7o%v977.n:&ntt3pp@Po~.oxnnn 3 n3n[%0pp@P %/bc 47bt #4e)e6d2v,#36##4#8E6pp@P =.8;6v6t(v.$,h;,6.v$6pp@P h,77b2b6.n448>4.6 4v 7447pp@P 44696969 42 %4, knDtro8t%6{6pp@P fo,t%6o- ;Ut%2_Ho,t%6 v.pp@P 6K .v   <`=$t%2.7N pp@P o.v%6 v).97<=*v9 o-t6%pp@P ?n:Tt; '=\Y44on>vv3ٍr 2%s3n?>[tpp@P 3ٌ3s.4jso@v 769  d 7 t@>v rpp@P [?v w%6wv 2 2r*r@% %.W6n.v pp@P ..2 .B2@679 t%%v d v[oB7pp@P t769 $t4D 4>  4otAt4C t%.Wpp@P An=W% 4> :A 7*6A3Tv0.NЌ2v v .Upp@P l ..Sv .N6inZ 4v4dy,vc362 2 j2%2'A #pp@P )  / :,67>*62A)r )jr,.[,4,t+vpp@P ®A : ,@t/7697, ,tjvpp@P dt^t|+= t41%nT ЌT vL v..TG2 |i2J|6 pp@P P;|+6 .Tvi6 |i2 Kr r ns|+r nR/x! v|inS vpp@P C|+v  vT`2LLnUr.V ir ތn ȍ%w B.X2 32 pp@P nr  B nYC 6 rD E tkյnr=j pp@P l M%m4A48660816 jrrj5lM%mk  6 v pp@P Ď%276D7 4#*t*jtt ^ nAj%mv lArM%pp@P mlRtl6l03շv kklA7k3,3B 6 6 >t5%j./t43 4=[pp@P==]4tV6VAt4w?R,6Q,4z{5<>5TTjW%:4vX?pp@PΗj4Et4vj8Zxc4tVtjctj4w[4M>44pp@P>Ttj4{z?Mv<?Tt{<4^w?56Mr<.82<>r5,pp@P$5<?6????4w?v5v%55<.+{%4< M%z?pp@POt1Jp6 6v`6jjpp@Pz 6a 4 G j6:+ջ4pp@P%?%[ t6 v1  i2K2Lpp@P@% [6e4?4WndtqrZ!j4u<>>?O2;P29pp@Pv(ntr3s2"D BOuus} ຶ ϶pp@P&v stt[q>4^>s` }>v <66ttu< !>247pp@PQN t >l2tv 7>%,ZntH vyttv >4.~6pp@P2<7 tf >vrvv6vtI6v <Wxtrvv2vv8b vrIs>vrvv2vZ2 Z2pp@P@nyt B>@nzt>>4nwts2t6pp@P(iv v.tqs[%r v "r2vr"v"u< !f pp@PSst[t[n5>@O2j>>42>>?P2r1Jr5 ,%3 .2pp@P~t55 35ntuF4n|qv6 60! 6%6v{"uVnxtw +6 pp@P6]wB6x>Lv  6j v6vO vi||,4%\vpp@Pv2vN%6ej6TiW+xx7P6rtSW_vrvwLpp@P|,4>w!v;\"rvxN6 e6T6U6yxv vLvxvv7>vpp@P*xjxд>6>x>`x s +{W pp@PU9Y KlY  5j [8/ M & Db J bupp@P}T  B  Wpp@Ppp@Ppp@Ppp@P,pp@PWpP P*K,I8 IT223108PP*N,COBPH1,,,B IT223109PP*K,I6 IT223111PP*K,P8 IT223112PP*P,F IT223113PD PPHASE2"% DECK-ID A02 COBOL 1.0 SUMMARY-137Dp@P pp@P+#MAIN $1pp@PVpp@Ppp@Ppp@P?1  ?p   @pp@P.()+-Z0/0  $9:@ pp@P-@ VZ@VZ@XW pp@PX-uz`W -Z@W -Z@W -W -<W -bW -RUPFlpp@PҸU^&ZtYZtY  pp@P  0p0n`pp@Pٟ4_,O. ,v:v=-./v o%vpp@PnJVЉ ?v vG6 Dvv$6v7޶7vEv$ ävpp@P/:6$h.o$Љ<wЉvЉw ۺ к  Ձnpp@PZ!΄Љvgv #΄  o.tВv22 %.pp@Pv6$^ wЉv 22 Տ 62pp@P $΄mv -t>dnЉrv$6vd 36hd; 3vorpp@PtЉpsЉt2&22 626ϖʂpp@P55nВ55nђ55nҒ55nӴ2.-,.vCvC6$o8v<$<)v86TdBd>pp@P1dd&ddd|d]did:d6) =$T333J୶VqO? F [pp@P\v$w$o7ź66v &668|& Ѕtޟpp@P6ޝwْzv otot( ·iot8v8 BvDo%pp@PE=$6-nl, 2 .Ev $l,v5-n,.l,v BvDpp@PvН.0Do%5·iv),8n Ȥddddd<36#d<36(pp@Pv=!6v&Dv="6v % v=#6=$6 3ntΨgv pp@P3Ι nZ t޵.ݒҌn Mn kv1v56$4pp@P^c7.Vv&΃ v tv$6$47)vݔs6 %΃ gv nמt%pp@P  4%|t· o3tЈv4"l"WYotpp@P·ntnt΅n#6$,pp@Ph;,6.v$6,76.n.6 4v 7447pp@P 44696969fol,t29,-!pp@P5Ҡ  $2ݐ2 $2&pp@P`!6v!o.t6 v).99& 4> Љtpp@PJtFtt?t(v4՗4tФ2أwأvpp@P Mܤst(vo'%22՗6 2՗vpp@PktФv   t(v6܉rՍv6pp@P 9 & .tt(6՗.62pp@P7ܒr7 .W7 ВtԒ(6 (v0"+*76opp@Pbv1أأŞ)6 )6,h;7+ 6-w n v *r أŨ)6,h;ڮ"Фvܣ2 ޣ.pp@PnУ.2+t*vСvТ6* 4t6 tv*ܒ2pp@Pޒv ܒ2 ާ25՟.*t(.6! 4o.l,t( pp@Pl,t)l,Dr 36l(v:v *3sW"+.3pp@P d .6 42B7 ,(69 (4 ےf pp@P9 v pvx8N7v 6pp@Pd &87 44՛t2Ȃ6 ՙ269.pp@P2tȂ޷7t xJp8 7r2 Іv6&r6Έ}v.&r.~pp@PA x76 B2 Β3rՇr3:vCrܞsWpp@P# .Wv LЬn.Tt&$LȐЬvВt#LvЬvpp@P&w󐒆6ޑwВt՝ .W6n.v vޠ.B2pp@P;697 7$Ҡ  828ЋT v |·Јv%6 |r r pp@Pfns|Ԗr nR"x v|%nS v|vڼͶnUr.VЈv pp@P)v  nv 6 6 L v &nݒ nМvpp@PՕn)!~)r )ա4 t2ښ 2 pp@P66tЪ0.۴Н4v.n斏697 69 %rދn pp@P ȌwȘՉnv? t01$v/ܓvpp@P =r227 6 v v76%7 v2n2 Ì22pp@P hr&4n&2 H1v.۰1&wՏ.8x x4pp@P t01v01 rvڴn].4vv vnv 6.pp@P vknnvv& .W2 nDr Շw 7pp@P vvՇ7<t&4E&'4pp@P t%t?rr54&2 @rr555nIt&,): o8"#pp@P ?,#8v#.K9v#=Ydd,"dudeede 36qdt3 vҒtt&pp@P j./7n+7t5Њ.+0t48< 4==4t63t4wpp@P ?,6,4z{'/75TT&V,4v?&47t4v&/v&n t78LxUpp@P [4744>t&4{z?v/?t{/4^w&56pp@P r/.82/7r55/&6&??&4w&v5v55/.+{pp@P 4/ Lz?tϴ!66 6vpp@P A,,4,,66~6 &6ԡՋpp@P l4Ș?ȸ tT vᐖ%22pp@P ȸ 6 t6 6 t(t#v(~r8,'rpp@P 88 r 66$ vs9 6 sLȒpp@P  $ -v -$ ts 6dpp@P  ts 67۷.5 t tՉ9/yS t8v 6  rZpp@P C tйt22 866vtTtܷ4ܺtpp@P n9])йtt*+)v22Ȱpp@P vܼr)v70мt&4 )pp@P č  )мt&4ōpp@P )`) . 75Tt  .pp@P l. 3 r2 2 )6   Ջ2& pp@P E)t )6<Г 5v5*6=$pp@P p)*7)+vе08R04t*)Мtpp@P .6܍*6)*  2 Ճ6 6vpp@P   آ2 Ճ6 آv  Mآܢw"4?4pp@P ndtqr&4u/>>?2;29v(ntr3s2"D BOssqpp@P{ࣶ ึ ೶Ͷ˶v sttq>4^>s_ }>v ~/6pp@PG6ttu/ >247 t >l/v/2r2q22/pp@Prt Ќv v|tt/ 4Ȍ"v>2tv 7>,npp@Pt, vyttv >4.~6/vv>2/7 t" pp@P>vrvv6vt6/Wtb,q.v4 s>v /Wytrvv2vpp@Pw8c vrђs>vrvv2v2 2/WZtv/ MQt'vR>@nytpp@P B>@nzt>>4nwts2t6%v v.tqsr v  pp@PIr2vrvu/ " sttn5>@2&>>pp@Pt42>>?2rr53ޗ.2t55 35ntu4n|qvpp@P6 60! 6%6v{"unxtw 6 6w@6﫷xwпv$rvx6 "666yxpp@P v vLvxvv7>vx͒|&xд>6>x>`xpp@PK3 ^  ` n{xV'-u c Q p : m$ )U . O6 j jpp@Pv \ pp@Ppp@Ppp@Ppp@P"pp@PMpp@PxpP P*K,I8 IT223115PP*N,COBPH2,,,B IT223116PP*K,I6 IT223118PP*K,P8 IT223119PP*P,F IT223120PD P.PHASE3"% DECK-ID A03 COBOL 1.0 SUMMARY-151Dp@P pp@P+#MAIN $1pp@PVpp@Ppp@P1cP$;<  pp@P _P `0 -+.0 @ pp@P @ @ pp@P- P000 @``  pp@PX08ek,_NZ@pВCT+-0BNETDCUBPpp@PVZ@VZ@XW -uz`W -Z@W -pp@PZ@W -W -<W -bW -RUPFlU^ZtY&Ztpp@PٱY ,.v{v{v66( ovS6v pp@Pv66 78wwЁv 2 269v v pp@P/v77: 6t7!"v6%pp@PZ6 #7668wow>6Ѓ=!"+ot!6 pp@PZ62v;v8 6.*>.,$ # 6n8vv .,$=  0 0npp@Pv v7 6$ h.n #>edv+v) 6 k 6" 6v pp@Pۍܬn· otЋv.2 vt!"4 orj 6pp@P69.9% kPNਸ਼LJHF D/BX@8>R<R:8᝶6᥶4pp@P1ö20.,*(&$" 6,  pp@P\ !"#6 )v48$ h., z)4&44 }>$>4 ot8pp@Pv 3 6  6S 6%1e#v&t'(ot 6(w76nl$v pp@P+)ov'*v+,+ -ov+Пv..06 v,#  vvpp@Pݤ6# -:.#otvnw, tܬ4 /:01tvw, opp@PtX? 36 36GdUv3X $?6!<3Ћr;nl$vw,+)6+'vpp@P36=z2w+ o鼓(3v 77'64+( otЋv;.,$5,pp@P^$466 otvvVv%o67. 7., ,(v-v (v'ol$t+ pp@P9w77)tv)v'v Γ2+)v'*v+,+).6&.8t 9Wpp@Pv8t 9ܬr :{v;vvw,%n9%v,.<otܬ2v=pp@Pߐ>tn,$ 2 n0 nW-6 %n9vЃ=vvw,pp@P -vvwo8t vПw?&.,$)Tl)v@633$,,h;pp@P5Av., B 6v 3 65owAv., n8B 6v 3Эvpp@P`)CDotvEotF,.G1e#v*&*Hv$oIov v6pp@Pw,-(vol$t7vw)vv+)v'*v+,+kdd"dvpp@Pkdd"dv3 otv#v6X wot3Ћv;nvwЋw⌠pp@Psކ;7ۮ,-vRdv-vП=v6Jv xoyvKvL,pp@P vBv ЋvCn9v vM:N4#.65Ot5,Pt86 opp@P7 vЋv?nl$9v vM:No,Pt8v ot5,&.,$6QtRpp@PbvSotMWotsv)T 6W7Qt1R1MWvUtT,3pp@P3$'Vv&6,#wv W6Sv 64vv X :Y6Z6pp@P'n0.G. v8Ћv;.,$E.,$#v& =v odv>v ovpp@PQ $v6=6"6-t" t t Јv$(6 (>")6 )>"pp@P + 6 - 6 / 6*t*>" L 6 Јv$vG6B77 8Tpp@P 7( 26 v 8=7  v21 v vpp@P 843 l$sЀr7I6 vGw w2pp@P 4 v47 v 4 )v., tpp@P ?쒓 vKKx teot輓_ГtB$ߴe6\/4n{vfvvpp@P jw,t#)ot!v 6 6vgt0ttnwpp@P wvr=6=6hrgtv gt tt 7 6pp@P Z 6g tZt78hv/',8LR'8v%7v8:ihvПpp@P v8:?zjv7v'zk:l )v 'vП:?:?yv$q@tOpp@P #tЋv=n m tЋv ?nl$T&t.$k 6{vWt 6vpp@P Abtv tv7㌇Anl$, 6 ol$t#0 0tПv+v$pp@P l/w)6Ћrܬr܋nl$܋nvwۤ 7ϥ7$@n6)pp@P  oCl$t v n6 oCl$tЋt'vܒ4C$otpp@P ¹ otRd6Ћ=otΞ%v2.2Оt ppp@P 풞$287v 27#7ܬt͎ v pp@P TrtОs3v dnЈt;n.<6ʹ!rSrͬ$<7rt*l$v"pp@P Leibot y vs4;h,sol$tؕYpp@P 23ܬnt· Lܬnt"=n8t n 4ntpp@P ؗt7t,Wn+tv7Wn+t5ްn+Wpp@P En+t5ޱn+>nen%t4nJ?!? d?4e 46\tПtn>n,Wn+tpp@P p5n+en%t4޳nJt@A?А@??k4>2Уv޳v%޳4pp@P 4n.ܬ2·,h;,6., 6 6)v56 4pp@P 4v)n4., 3v4.w3., ~6 764 w 8vӾ ܬpp@P 2 %,66!6%9)4nt ._Пv00vtQr pp@P2 9.$b6 :.<tu d vv<9769 v5pp@PG !v w nTl$v xv.=,$0П:wv kwܬ6ޞw 69Пpp@Prvp02rv/єҬ=0.l0'x6Wnvs6 ,h;7W7+ 6-w pp@Pnyv 'r Y)6 ,h;.߮~ v2 .nv$0=t%tt9zpp@Pȫ%v̾6 6v6v{̾%l%!v>6Ѓ=%V%826 "Ѓv pp@PΉ.,$.6|vM!6ޯvޮ6r.oЃv !=pp@P"."ЃtVv Ёv܁r$r3̾w܁pp@PI4 v6 ts36E8^8769 d 6%v3ppp@Pt r 67 w69v#v;9%r%rܟ2ܬrٷ7󌅒7pp@P򮈔ͬ?86408? ܬ2%4$9#>769pp@P  ܬ6v ܥ.2 14 ޡ2$nBw679e4 vpp@Ptܬ2 v866 wܬ3,,,/v'*pp@P v"ksg v c2s  'v8ՌvSws.,$G6pp@PK7v ?w2ޮ3Ѐvޞ2ޛ67 vޞ2pp@Pvvr27ܞw7И46 ( ovПLvv pp@PФNv75nT3.(27tpp@P̐t*2tᤴgtܬ2r5t r sv#7pp@P ܞ4}s3sv#33,L , Lpp@P"a6 tП6ē- tП6-v К6LSЙtЙtpp@PMИt <ɓ-)@+OMKI  .pp@Px,d$$6 66δ Wpp@P$ $Avެrpp@Pδ $ $ <ɴ44pp@P/4n ot9676D$ tЋvvܟ6v ܟ6 vܟ6pp@P$vܟn6l$t4n4 tПLv ~޳4 rnpp@PO4n tП64 63 tП9044v ,6 tП8 pp@Pz56ܬ_2 4+64r4$'!t'vАvБ6pp@P$'t'vv6$ t'4П9V4?tvܥv'p=rpp@P4v 43 ޛ25.zc'wtܬ66ܬ44$gpp@Ptܬ66$ 4ܬ4Votܬ6v/v v!r$pp@P&S6$otܬ4tПv .4O6n$ d vpp@PQot܋2 vtܬ460c0 v3ܿ6޿6tОv pp@P|F tОvHП:p:w,\ d 6ܿ2 (6 /1.,1cv1.Kev1vYdd,/6dudeede 36qdpp@Pt3 vY6, 8(6 "tܬ6ެ./.|pp@P,v|, vv.| tvެ./2 52t48 < 4= pp@P=4t63t4w?,6,4{|'.25TTV,4v?4pp@P**t4v.vn r28?xHN4244>t4|{?,.+pp@PU56r..82.2r55.+6+??+4w+v5v55..+pp@P|ܬ4. L{?Mtô(6 #8ؗ$~$pp@P t+ 6 tt v~r{qrف pp@Pr6%   O  Q  /QZp|pp@P#(Mw %_Pe | gqt0G~3 ;$gH7y _pp@P, FGVc - 2 :. { s[v & WxUOhyn4 pp@PWb K  pp@Ppp@Ppp@Ppp@PpP P*K,I8 IT223122PP*N,COBPH3,,,B IT223123PP*K,I6 IT223125PP*K,P8 IT223126PP*P,F IT223127PD PIPHASE4"% DECK-ID A04 COBOL 1.0 SUMMARY-148Dp@P  pp@P+pp@PV LINE VERB LOCN CONTENTS LApp@PBEL OP OPERAND COMMENT pp@Ppp@P   +079?@I}pp@P 00`0$ d'P@P P0+;@j(X25_W pp@P-P?  0pp@PX0  00 pp@P? ??????DDXDFIT ADC NUM @Z{[lP}M]\Nk`pp@PKaz^L~no|J_'Om-/bcdefghij,%;>?pqrstuvwxy: ="#ABCpp@PDEFGHI)$.<(+*&QRSTUVWXY!0123456789101234567891234567pp@P89123456789234567890 %(953<TU`=t8pp@P/r7>MR Gɸ9 *tl;,:0pp@PZ/ .-:4 w - pp@P. / 0  K tv6Bώ!H ςRpp@P6O$8/ HP'rR0  ޥPR0 7pp@Pv!v v v pp@P7ɖ2tv-&k(2)82'H6 66.v26ɶ0@ZBLv pp@P1,r*v Lvώ7дT 0 "O'U %tpp@P\8JL #<=;:F߹;6`6pp@P2;6v 6vC0::6pp@P @a 6 '2 tpp@P݌`FtD`H  084  pp@P N Lz     w  pp@P3ό  v  0    8pp@P^&v   8 )Жz P!Жt" pp@P!8v"F#'!"I:#'!$%&'(4pp@P2N3:  pkl4J8"7ww w pp@PwN 7ЀTU w` pp@P 7Ѐ 7Z` к) tpp@P5v6 `8v8d6X8x7*+  ! Bpp@P`!"#%%#$&'( z,:)))HҺ ),,!Hpp@P): z),z,vF)ؔ ,z,:)OztN))pp@PZt h 6## ,0#.x)v PxK8P%x pp@Pv \xB8Gxv Nx98> hObz#xt Tx*8/,IИpp@P Ӓ |ҸI* j-. Ozpp@P7t"6Ժ)z/B   ,,:4 ) pp@Pbt B6`t TAt PEt 0414243pp@P8v$2%:)'2 r  "ݒ#pp@P0 4:,@z) &8P40:,2t)&t&r&pv &&pp@PŰr %0<&'4I&v w02@v04pp@Pc7όТv  r$4 4 Lz "tpp@P94 't'v!^v4Vմet pp@Pd,t b twº ú ĺ ƺ Ǻ Ⱥ Ŵ tvpp@Pv  v &6N7996v9vՀՂv9pp@PB # :, z,t  topp@P7 )d hf     :YBOvx67G8Opp@Pvz67=.Ov|673$Ov~67)20.,,,z,:)pp@P;, vՄ 87,r4tܩw2^F,): z)t-pp@Pfξ O tٺ pp@P6 6v  6  6 ٹv72pp@P96 T4U 4 1v ϸ? |!pp@P 87LΠ 4v/,ؔ7 6VьϠpp@P 44 6 6466ٶpp@P a" # ! )rܭVΏ1pp@P ?ؔ:2z k ܰv3  к) ؔ pp@P j rܭTϺ* О 6w46 pp@P 72=P=ؔؔؔؔpp@P 6}vd|6 Ìm fRvL2UOTn946pp@P yO=vr6 4nݘ  ӒݘӴt pp@P Htdpp@P kv>td>tv^ݴڴ, <pp@P Ē xS xO7J7+Vav ܭό<В:2z v  pp@P tذ7tM찔-3tؔ ؔM- pp@P t2DPܡ%$"776풶=$k t*vVv8tpp@P E*Ht(Έv*6 (6*(pp@P pw*(w 4 .M &TCet XYpp@P Z[\] ^:v `̀b7CJtv6 #M Ypp@P ҈ʘZ̖6Ғ˖80 tvҶӒʏ ˡY Xʔ˔̴pp@P 5X4XFx O  H  8 K 3.pp@P^ v Z P } d  o  , pp@PGpp@Prpp@Ppp@Ppp@Ppp@PpP P*K,I8 IT223129PP*N,COBPH4,,,B IT223130PP*K,I6 IT223132PP*K,P8 IT223133PP*P,F IT223134PD PPHASE5"% DECK-ID A05 COBOL 1.0 SUMMARY-148Dp@P  pp@P+pp@PV LINE VERB LOCN CONTENTS LApp@PBEL OP OPERAND COMMENT pp@Ppp@Ppp@P  1079?I}pp@P-c 00`` VW d'pp@PXETDNBO-+PUDBC@P0+;@j2Ww Ppp@P  @@ pp@P@@  0 @@`pp@Pp DDADC NUM TAPE0 1 2 3 ;]pp@P< tkkv 6r Ѐpp@P/7ܴ6x8@t867^w82Wpp@PZ1 ɔǔƬ't58A5ηнvՏ: 2< pp@P--`tܺx#v=5 -- - tpp@P-0 O -t pp@P6 6v  6  -6 7ڴ33Е.pp@P0v54շx x*wݸtO3l5`t/vtvkkk6 pp@P1sb 2 8y* 6 ' 6 78p_pp@P\n XeVTRNnLJFD@><:pp@P86420., *!("$#"$ %&'()*pp@P+ , -./012Е.03-M'v6U:c v, 4pp@Pݺ45vի6'0O@67v+x_xG8;8 Ov 76 գ8S+.գPv9:pp@PS5tխOv!:64 ;7 84Ց:нtՏ:+4իt?<5tգPO`6pp@P^tt4Ѵ@6@tAvBwk2App@P0'+L>:Cvk 75@t868 x7-pp@P:Ct-6Wƴ:+'vk:DzEvF7pp@P߸GHDIg8zJKՕw@8@ՙsø<Ie:L2 tDpp@P MDIg8u6KNzONP"QRSDpp@P5KKI{T7ӴE@czU:DXMyE@URIe:L2 K7pp@P`RD>7\/vUSIve227LD(:D 7gTEtEpp@PRg8KCwEtC6EFIg8K Ty Rյtpp@PŏK7VWJ>XY4 ŴD@Ovc6e6 g6 - z40Z :pp@P>p%[\t92[nt7.4\t%:=O]5pwTv56 pp@P ;׏^@@v_  * @ dEv` @O ,pp@P7O T@t1z@w@ty: ,%/[۶azt5,/ @vBw_bcV$pp@Pb%O%&>(,мvvnkr < t*] t%O$z>8/:6(>=pp@P4tcd7 4z84G3efgh V3hv4v 4HzWPúijÔpp@PYV U` 0@68+MLDN@sηzEz` LC@t4pp@P㔷7kꐷs zEz`E`90@t7_8)>,8 v 864)>8pp@P4ddd74 040x4 Cv qkmrηE`Evpp@P9DtExtEltKyzVpp@Pq{:|z}SKcx >0zYz=G=~jgifpp@PVHY ; lXR lSME OlP jl7z= G=~jgvpp@P;z2vf2$ W Y7ܘF/ifH87S pp@PfsT ℌzvbz8E8C:F8zK8785pp@P@5s5:6%v:9T̺=N]= Y8]39> 8pp@P4j : 4t pp@P'2 r  "#_\Aнvգnt^E :^pp@P eIнvաnǴ@skx.tt;vzq:zpp@P =ℰ6 Kq0:6zb:݌ℰ:c:]zKպEbzev#tcB]pp@P hcC]lY84@kOvv L@zٌg> zٌh>@9pp@P 9f ڌ4v z4 Օ׺W !:X:0ºYG99efX,9ºijH/ĺݸspp@P 9x8ٺiºY@w؀:b:c4@ڴ9t׆ott4pp@P 2i 54|B]tvB]qr 's|pp@P FK E:`7@e2E`lwDΔCv uvDκbpp@P ?lvk 4 :Ѐe L4@z  077 04,!pp@P jδΔEXuv DbIv vDNI{l O 4 ::Cpp@P z 46 Ѐe<4 7 ={ vL<4 ::Р :o| pp@P w {,!δOtCwukk{sCc4 E @6vpp@P k I:DO 0:Iy8TO 0:Iukk{6T4Dq4ОzP00pp@P нvk.4^1ݸg8(6qt@e8.6jt:Y D Ѻ41A pp@P A4 d˺d444&zRݹv&zR˸ִֺ&O@ʹ/pp@P lzL 9fOezxxҺx⌴X 86:6 ~OOH44iY=>pp@P \vvtv\rvv92 [802nr=11գ99pp@P 441.n4%яAA%@vkkcpp@P v  0!:nð`  - 6pp@P 6O v @ 06N@3tA7#<+ Ѻ4pp@P C лv r82= 4޴R :Y4Y@xtH>app@P n ^tIOH^!I#6%^CtCLvgkqvʘpp@P 666V2ʘ v Ov5 :)^ẏIIpp@P 88Tϰg=0=:)v6}O:Hte6teϴ^pp@P >>86^O/в6kekk6 EbιC8{vpp@P F6R~LHrdd6p;T:VIktDVI^]pp@P E8JIv 6 =EIP]v Ntէt6vв6pp@P p t t 444@ ՏT6t)v4pp@P o!k,!!O!:6vocvDl V!t!pp@P ƺY XY)t?t;v0zKt0zK@m>Ev!@n>pp@P 4@o>@@p>-4@t@4@@q]#'#8 @ >:@:4#'" pp@PCt884@CrOsCw8+4@CuOv _ @MAz4twpp@PG@44w&4 E Cv83"/01pp@Pr2:A444d@@B@@B@@@H6CEpp@PEFG@@4@@@:@OXP^wDpp@P0Rw@՛Rt@68?777=:kz_","CDpp@P@>߸<ݸ:۸8ٸ:׸8ո6ӰѰϸ2͸4˸5ɸ;Ǹ<Ÿ=ømGS!:>4pp@P,r ->0DR> pp@PI UOT>"8xV (3Y":xVW pp@Pt 3 E Ct8tؚt2 pp@P2 r 4vwtw 4pp@Pʸ:4;t247tД4ôttpp@P 8-4t87t68x )O=4pp@P 74&v:Lv:zЩ:F;؛K6&@v;pp@PKД6-:4 ; 464@?@tpRtv?6pp@Pv6^ttՁl6 pRt@Ok t1pp@P6 kr ((nt-0l%xv-r ܽ2pp@PRwnн8O684@rpR8;tx tpp@P;;@tBkpR89,l;x9'x_L08&2xҔӔpp@P"Ք֌&$@28zbxrzcبԌ@6ب8f0 k,28x^Rv pp@Px2;t26>;ttO8s>tcpp@P Lt Lt tbc4LvBwՅwr BwՅ2wpp@Pt$x 2I0بĤճv0Ӕtճv02z$&tpp@PЫv  02 r '⛆Bwߏ0w'v!^pp@P$v84W՟8%xa296 & T6pp@POU+ "9 #8 4 v ? )pp@Pz }=  ؚ. ؚw Ț'ؚapp@P  W4 v. I3$Gvpp@Pо >!" 87L 4v/,ؚ7 pp@P6W#044 06 6436pp@P&6  a" # !_Aؚpp@PQT v  A ؚ  Ypp@P| i[=P=0Ott0ؚpp@Pؚ:4QP2b202[pp@Pv/v-mxmxv Iy96 pp@Px9ϒ1v-8xxpMRcc1m6mv6  pp@P(4 Rv2:46zO]{UOT>"v W 1pp@PSA>2 i22"2"Tv W"#М2#" pp@P~mjyvFC࣒v64 pp@P   ) L )R00 tpp@P484`4 4  Lt6 t8xpp@P7r 6t|*4  t c 4ppp@P*Wkt4# M66 46  @v pp@PUts66y46   4' ! pp@P]4Vv J8=4qqv v pp@Pv⻰Ov08"4v՝O vO "### pp@Pֽ# " " v6 q6:PLLpp@Pi6v 48$8Hcq1qpp@P, vNEvXO\ vO]YOG4638z8v7t)pp@PW7t6875t 2875pp@PJ- 8xF+ t ի443v- `$pp@P'3 3tS44 4  7 tkwvpp@P6tկ20twk,c7 d7pp@Pt-t2DP$776=$ k t۬*-pp@P.  It(<v*6 (6*(<0w*pp@PY(0wV XMW 'LtvY6"AXMWYpp@PZ 680#tv [YUXpp@P5ZX4 ? qoF   t 0I Opp@P  :   p%  B j p  - Q \ 5S _pp@P )k ^K   )pp@P0<a" .H}eY  W k  D J Z "pp@P[ Qf3 :v~M d {nZpp@Ppp@Ppp@PpP P*K,I8 IT223136PP*N,COBPH5,,,B IT223137PP*K,I6 IT223139PP*K,P8 IT223140PP*P,F IT223141PD PPHASE6ٮ DECK-ID A06 COBOL 1.0 SUMMARY-151Dp@P pp@P+pp@PVpp@Ppp@P   pp@P$(017d00C7MAINDMYSEGDBUGEXTRPB d'@Ppp@P PPPP*T 0+;5 ` pp@P-P ADC DDXDFIT PNLIT TMP ACC DECASUB NUpp@PXM **    6 pp@Ppp@P/0+,-. pp@P45!"#$%&'()*+,-./0123pp@Pb*6 vՐĒ  pp@P/  !>@!>0x>    v#ܶpp@PZ83ЛPz0ܛ83?v<6'80750z-&v2 tpp@P$̎@674@8v6678Ьt6pp@Pv  ȷƈ ެ7햪.@vܶ0!6pp@PVO7@82 Ȱ6PP7pp@P2 ;   ܶ2 ܶ2ĺ pp@P1 ܶ2Ļ =6ܶ4s 69Gyب7pp@P\  !"pp@P#$%&'()*+,ͺ-./01234566pp@P789:;<=>?@ABCDEFGHIJKLpp@PݴMNOPQRSTUVдWXqYoZm[k\i]^_`app@Pa_bcdefghQiOMjkIlmCnAo?p=q;rs7tpp@P35u3v1w/x-y+z){'|%}~ pp@P^ tĹ 4  6 ttCpp@P tКLNRt%0 ܶ2 ؙM޿V Ф: ܶ4pp@P8t-k "8: zz7 pp@Pߴ( v ܗ2З08%xЗ08xܗ08 x㺙 pp@P   ȴv❸2v !Ozpp@P5v ِؐڒ  2Րޒ @8v7Чtpp@P`v  z:7亟)):0tv  pp@P7)2ວ7)8 648 64t7pp@P5@t7t7tẟpp@Pẟ tیՏ88vv ܶpp@P 67tՐޒ 5r70trpp@P77rວ70vr  Ē!7𺦴ܺpp@PbOO O  O  ккpp@P pp@P v'v Ftpp@P Ÿ pp@P zpp@P9z*Kܶ2 k z C/t :6 :6 vpp@PdĿ2F7 Đ! ϐܷ <ؙȸ޶w6 Lpp@P  šܶ4pp@P z R t7 ºܶz:pp@P Ĵ ´º# 2 ,!!!,!pp@P!ЀvƺƷ ::z:z´pp@P;ô: :O:púº9ypp@Pf9yz:z9X: ǫyz w wpp@Pzv7 9:O9,!:O!ܶ0zܶ0zvpp@P ȷt7 y9:O9:Oܶz0ܶz0pp@P´ Q%z´P0K2\ и/75"=2pp@P N !и #7%.2? ,Ƹ7 pp@P = ܖ6ޖ4 Ȟϐ(=20.,*pp@P h9753N/973/J܌ٸlRX]pp@P dʸ]=ŸXO?ϸE8K4*+v4$)/pp@P 0' ޼HtHʹYˌpp@P ̺ʹ 8(4v 2 pzzO 7O]pp@P #t ޷4py t(ȷwpp@P ?  : x x  4k48zѴpp@P jܕ6ޕvxtҰ8'x"Ӹ0 OED vpp@P 90zyI Eئv ӸTئO޸7pp@P Z<溟x1vܶvpp@P Rv76 r  ܶ4ޣ7.?t4Fpp@P y!6OQ&˜Ÿ@5  pp@P AȷwO|OGqp7ެPpp@P lS ĸ4؜Iܶ84a:zոpp@P t$=  .-̌ǰƾ ľ pp@P €ܶx 9$854:x 0848&48 484.8Tx8ʴ68I4pp@P $6Ŀ266tтpp@P 8 6ȷƈָn˂ Ƹ}¸y = pp@P C: ܶ6 v 㸝8ȴ Z x 8!6pp@P nA28ܶ 8s6xt8y)  B4#pp@P c= U ȷĺ☺t= t7Dt7)tpp@P 7)k46ܟ667ִ ˌpp@P =`$$ƴ$ tjv t tkvpp@P ^T++v^t<$pp@P EE7+6D)=$9k t*6 ,30.8 G pp@P p >;A5*!2DPt޽Hpp@P t(ܶv*6 (6*(ȷ޶w*(w  Lpp@P ƌtTtXYZ[\] ^ - . /LLLג pp@P tlXYZ [\{t\гv2XpسYسZ س[س\pp@PhtгtXY_t9XՐY֐Zג[KRtXYCJtвv6 #pp@PGLرذYƺZܿ6в80 tбvȺȻ pp@PrرذYX5X4E^aEG9^PPQoR|pp@PR+Z@W^WEZ@WWs^L^^_h^<idsVt*<*<itE߮S_Y+S_tENEӮEE`G9pp@PG98LMLLKLKLMMlPRCRRRRvlRCRNReRLVpp@PI^Y+NY+8X#XlridisLgݩ8ixieu__|WNRRvtpp@PtRZ@WvtXȝlܥ끼lZ@𨽁ljlܭ1ܭpp@Pܭ˘Lө8V8W843*l~ZN SSLSLSITpp@PSSITlLlWZ@pЭCTxee`®ܨpp@PpEeEk,E_XeXk,X_6lLĀʮR6Eߩ8itlVpp@P CNv_7WELLlTNYTSLSITSSITSSLLpMepp@PKK+TMITM`LMԺ$!Z@M' V l߇` y  ,pp@Pv + CU^^^aex~nis{  :55000:00pp@P44400;H000  5U00'*pp@P  0kN''-w0U0000pp@P 2 r u L e   9 M " X S 4  2  i 9 ] ?V  WPpp@P" % /   RW $E #H  H < S 1pp@PMpp@Px WP % /   RW $E #H  H < S 1pP P*K,I8 IT223143PP*N,COBPH6,,,B IT223144PP*K,I6 IT223146PP*K,P8 IT223147PP*P,F IT223148PD PPHASE7"% DECK-ID A07 COBOL 1.0 SUMMARY-137Dp@P dkpp@P+ 000@ pp@PVLSFSWSCMCSRSWSFS DATA NAMES DEFN pp@PREFERENCES DD LOC DISP SIZE BASE CLASS pp@P***** NO ERRORS pp@Ppp@Ppp@P-DATA SIZE = WORDS0123456789ABCDEF-W -pp@PX LINE COL ERROR CODE ERROR MESSAGES PROCEDURE NAMESLOCN REFEREpp@PNCES **** PDEFGROUP ALPHABETIC ALPHANUMERIC  NUpp@PMERIC PACKED DECIMAL BINARY INDEX DATA FLOATINGpp@P SHORT FLOATING LONG EXTERNAL FLOATING ALPHABETIC EDITED ALPHANUMERIC Epp@PDITED NUMERIC EDITED *6 833#1,38b1326 6 vpp@P/ 2v 6 9d!>)1611v1t 111!1pp@PZ41566s3pp@P56638;212112 2 ;2;;12pp@Ps;2163v823321w122wt;38Tpp@PKXv <7sس xv  buvw 6blpp@P1?Њ6?62 o 8 v6 6Њw3 8PbX bklpp@P\jl?22 62;x8X6w 2t ! cdpp@P e!f"g# ()*blbt 2v pp@P#D2 F6v {vw ls^ X - 7R t  Еt-tpp@PݫFr Jt4s<,H46h<dC5H9POSN pp@P} sZ  4;+ tC b:pp@P3ILOC BZBPPGMOUT7WTREADSLICUPPREADR -OPENFLC7MAINCLOSFLATTACHBP t PGLOBL$ DECK-ID F31 COBOL 1.0 SUMMARY-132 tt@P010123456789123456789123456789234tt@P05678900ttPGLOBL$tP*PAGE IT223169PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223171PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223173PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223232PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223234PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223236PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223238PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223240PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223242PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223244PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223246PJ P7COBVT1 DECK-ID B39 COBOL 1.0 SUMMARY-132Jr@Pr&@P+&PCOBVT1C7MAINrPC7DLIX6C7WRUT5C7RDUT4C7BSUB3C7BADD2C7BNEG1C7CVBP0C7CVBN/C7CVPB.C7CVPN-C7CVNB,C7CVNP+C7RND *C7LDFC)rrPC7LOAD(C7BLD 'C7SUB &C7ADD %C7DIV $C7MULT#C7NEG "C7SCRT!C7STIX C7BTSTC7TESTC7WRIXC7WRSQC7SZRSrrPC7SZJPC7STO C7STE C7RWIXC7RWSQC7RDIXC7RDSQC7PFMTC7PFM C7MVG C7MVA C7MVFCC7GOI C7GO rjPC7COMP C7CMPG C7CMFC C7CMPA C7BSTOC7BCMPC7BLT C7BEQ C7BGT C7BGE C7BNE C7BLE C7ALTRjP J PZC7BLD DECK-ID B01 COBOL 1.0 SUMMARY-132Jr@P hN JhLhH"hJ"JhG"hE 3:9? # h23TVOMOPQ1 )'rh@P+ H%2  f"$1 hh"hhTRM f" b0 h@PV PC7BLD PMP10 ?C7MOVE C7RCE3LP J P]C7BNAR DECK-ID B02 COBOL 1.0 SUMMARY-132Jr@PXTHXRH XOH XMdl d bHT0! hhTX1X/'"f"brr@P+bX&df"dbXHXHTXf"b" 2  d0$ r@PV " " 2PC7BADDC7BSUBC7BSTOC7BNEG.C7BCMP6C7BTST?2*PBINCMP;BSTOREDBLADDC7RCE3C7RCE25*P J P"C7BRNH DECK-ID B03 COBOL 1.0 SUMMARY-132J\@P0$ 11 ! !0d\2PC7BEQ C7BNE C7BGT C7BGE C7BLT C7BLE 2PC7RCE2!C7RCE0P J PlC7CMFC DECK-ID B05 COBOL 1.0 SUMMARY-132Jr@PhXhT""hRhNKH"'hSTih@""h>hIh9682X&rr@P+1h3X"$+h'*h&&A%h$$!h!-hhX d l0 l T[\^_r @PVZ] @Pi` PC7CMFC PMVALPHCMPALNQC7RCE0NP J PSC7CNVT DECK-ID B07 COBOL 1.0 SUMMARY-132Jr@P h h h hT/h h X2 hhTh hTrl@P+X0`(  hTD 3%} h hTl2PC7CVNBC7CVPBC7CVBNC7CVPNC7CVNP"C7CVBP,22PSTORE @DECBIN C7PACK(C7DUN BINCONOC7RCE32P J POC7DCAR DECK-ID B08 COBOL 1.0 SUMMARY-132Jr@Ph h hT hhT(rb@P+(   hhT(" 2b  % hTbJPC7ADD C7SUB C7MULTC7DIV C7COMPC7LOADC7STO $C7NEG =C7TESTHJRPTESTZRLSTORE 9LOAD COMPARDIVIDEMULTPYSUBTRCADD C7RCE3C7RCE2ERP J PEC7LDFC DECK-ID B10 COBOL 1.0 SUMMARY-132Jr@P" h5h3" h; h,+6n"h#F TC !h 3h r,@P+hT35`:, @PC PC7LDFC PC7EXITDPACK -C7RCE32P J PC7MVCM DECK-ID B12 COBOL 1.0 SUMMARY-132Jr@PhhTyl"ha"h_h`l"hZ"hXhX\qrstuvLM1Hrr@P+H"hCaFHDB?h>\stqrvuX4h13h03h10`X \^qrstuv k"rb@PVl"h"hhHTx hh"h l"hhzbl@P%h"hl"hh"hl"hhTqsuv̢ ll*PC7MVA C7MVG C7MVFC C7CMPA=C7CMPG**PCMPALNC7MOVE MVALPH`C7RCE3 C7RCE0*P J P2C7RND DECK-ID B13 COBOL 1.0 SUMMARY-132Jr@P"3 ""J  h! _h(hh" ]h hT)-T)1  r@P+,/ PC7RND PADD LOAD C7RCE3(P J P^C7SCRT DECK-ID B14 COBOL 1.0 SUMMARY-140Jr@P hThU hThPQFHX)WHhGHHG 3hCl":h9Ah:"Af"1"f"0brr@P+/f30 l h$l"h"" 2  2  h  ".r@PV PC7SCRT PC7RCE02 P J PuC7STE DECK-ID B15 COBOL 1.0 SUMMARY-132J"@P HHHmHZT"2@P % " =0$T2l@PgL"h$K"L"JhLD"hL"!L"L""   U" cgl@@PJ+-CRDB., /00 JhDhT@2@PbG dglhh T2r@PtH hx *ht.,h,.h hwhthqhqL"`hxTw"hlL" hq hi hXF  rr@PY]" "O"H$222228====<U"C8LO"444rb@P2M"$$O"h* h) U"'AQ O"  -q +O"b@PT@P$-+0r@Pw a -hU"O" O" hU"O"UMrr@P0"q O"O"hRCO"ȩO"h̴f șM" Cr2@P[ Ȑ7 M0"T2 PC7STE "PC7RCTLkC7DUN rTESTZR SIZERR`"P J PC7SZFG DECK-ID B16 COBOL 1.0 SUMMARY-132J6@P dd l l6PC7SZJPC7SZRS PC7RCE2C7RCE1C7RCE0 P J PGDFTtt@P0Ghοd]̼ l @tt@P] tt@Pf hΥdD% hdݓdݎdE DTtt@P*tt@Plld d d0T 0 n0 d tt@Pb  Lb DTtt@P0ld l llE DE D% DTtt@P*tt@Ptt@P  ftt@P" ! d" ! l" ! hLltt@PCNT+lbl lTԀd0Ttt@Pnnd  lE DE DTtt@PT_dd lTJ,tt@P  tt@Pܪ̩l T-d'T. %D)ltt@P  ! l  ! d( ۬@T T]DTtt@Ptt@P0XllŒ lTtt@P! tt@P* ttPC7RDIX!ttPINCSTKlREAD14lTSn l b  D=Ttt@P>h b ξdS̻ ltt@PS tt@PX/ ! hdLv̨ lTdT(tt@Pn̒d  lE DE DTtt@PTs0d0d lT6tt@P tt@PlT7T8 @DTtt@P̸lL  ! d5  ! TST"DTtt@P̒lDTtt@PX̅l0 dTtt@P/ tt@P6 ttPC7DLIX/ttPINCSTKDELT59READ15Ttt@P?dM ltt@PM HttPC7RSKYMttPINCSTKC7CHKY=ttPC7RSKYtJ PeC70IOK DECK-ID B27 COBOL 1.0 SUMMARY-132Jr@P h>H;h764 .#   '(!X6h$00Q"1rr@P+f"@ h0 -a"te"000000009998003021212223009110 h"r,@PV    "3424,PC70IOSC70IOIP J P C7ULRW DECK-ID B20 COBOL 1.0 SUMMARY-132Jr@P XY," '" XX Xv %F"#e"8 Xd">e"0 X<," '"  H,TSrr@P+X8#" XKa!1hAa"#e" XA 5"e"Da 3T rr@PV ` Ll " H!HBh8 bbAb b h\Yrb@Ph h hhhH h @ sκg"ȶ` a bPC7RDUTC7WRUTPC7RCTLOC7RTIORC7EXIT)P J P~CONVBP DECK-ID B41 COBOL 1.0 SUMMARY-132Jr@P &hdFhc" h_ 3h\  hZhV`    CB`"rr@P+rXX'eXAX!0 h- "!  h,H,h+&h*Fh)fh(r<@PVh' `<@Pvk PCONVBP P J PVDBLADD DECK-ID B43 COBOL 1.0 SUMMARY-132Jr@P hQhOKGhF"pe"2?a-:752  2"y1 rr@P+N  : E QLbh"a2 aE"+دr PDBLADD P J P/MP10 DECK-ID B50 COBOL 1.0 SUMMARY-150Jr@P h$h"" " H(A a H !r@P+  PMP10 P J PjC70BCN DECK-ID B21 COBOL 1.0 SUMMARY-132Jr@P h]"h[W O""hShR"""AAhC"E" 3 @h= " h87Ch6rr@P+"--h/" h5h4Tg`W`hf h+#'!h' djTX]T0_b} b تr&@PV0 \&@Pfb PBINCON PCONVBPMLOAD IC7MOVE6P J P+C70BCP DECK-ID B22 COBOL 1.0 SUMMARY-132Jr@P H&"f"bH"f"bT'('()* $0$dlr PBINCMP PCMPALN P J PC70BST DECK-ID B23 COBOL 1.0 SUMMARY-132Jr@P H5" eh#Hd" ha"Jh^"[h[hZR 1N FhTrr@P+$  d05< T}Tjni) h2+h1"h1h0( $ h&& - hrT@PV h hh# hhTisostr1 ywTJ@Py c'B?;JJ@Py c'B?;J PBSTORE "PDECBIN;C7MOVEaBINCON7BINCMP)"P J PC70CIS DECK-ID B24 COBOL 1.0 SUMMARY-132Jr@P XrTf0 Xg  _^YY  d$\`" hB" h?rr@P+h?<":h; h<H h5h504;""0"n"n"h&#&;"""n"n"hrr@PV1 l 2 l l T`"h""rr@P2H""2H"h"hf" h h h\Tnrr@P\Tf 3h 0hh\\h#\h $!  0rr@P, T- \0  } Xr\T}T Xm XdXq \rr@P\h"Jh"h \zd0 XM XB"hXZXHX;rr@P- X2X?-XK-XQX/ X&X39h X/9h" 0b  0b     rr@PX d0$X  &h Fh   """""h(0% """r(@P" " h"1(ZPC7MOVECMPALNADD SUBTRCMULTPYDIVIDELOAD STORE DPACK DUNPAK-COMPAR9Z PSIZERR P J PC70DBN DECK-ID B25 COBOL 1.0 SUMMARY-132Jr@P hmhohohohohp"hmhh"h_3 !Z"Tk Y2 6Tk hPO(Brr@P+BhM3 R hIhI hH:8JhB4h<>h;0Tx{d0m .h. h.),!-'rN@PV!!"Dh"Tr 3% Nr@Pvr % dj ("f"b%h hh" ) HrF@P # h `l""ÿ Ő1FF PDECBIN "PMP10 dSIZERRELOAD $C7PACK"P J PC70DUN DECK-ID B26 COBOL 1.0 SUMMARY-132Jr@P +h~"h}(zz" " -hshth|"hp"ho hm hk hi hg heJhcrr@P+haZ^\hUShY0Td0?MG hLCDDD<>h:81h6@T:`rr@PV10/*+. % }"  } I}"}"0F}"r,@P0 %, PC7DUN PSIZERR9DUNPAKQP J PC70MPH DECK-ID B28 COBOL 1.0 SUMMARY-132Jr@P hz""hu hl hjh he hc haJh_h]XYWYRhW OhNrr@P+hS""hNhJTx}~9?;!2h=321 h5+ h10$rr@PV( F(##1 #dh` 0}"  r@P PMVALPH PC7MOVE7 P J PC70PCK DECK-ID B29 COBOL 1.0 SUMMARY-132Jr@P "Hu"hs"hrhqokho hxj hufhsc131D1eT rr@P+_Mh]N\hLZhX/VVD O=hM%K I7 " 13?-h=/h:h.h: !rr@PV h3h'h3$ Ah h)( `F T{h r@P PC7PACK PDPACK t P J PAC70SZR DECK-ID B30 COBOL 1.0 SUMMARY-132Jr@P ""H5(22h3" 1 ) *Bh, h(h(&$    B r>@P+1  h   2   %> PSIZERR P J PC70TSZ DECK-ID B31 COBOL 1.0 SUMMARY-132J@@P "(" 0 2   d0 $ %@ PTESTZR P t PsC7EXIT DECK-ID E49 COBOL 1.0 SUMMARY-137 tt@PC7ERRMSG$$ SYSVOL 'd00#d l0d$0hDm Dnftt@P.ToT2pT5q d  d&d 0 Id d w0d dT88rtt@PYd h l"fT Htt@PottPC7EXITgttPC7RTIOTPGMOUTettPC7EXITtt PC7SEGO DECK-ID E90 COBOL 1.0 SUMMARY-137 tt@P  Ptt@Pd!d 2,00d0/ll Dp0 0 Ltt@P?p8 0 L d0Ed ! L l¶dd ! tt@Pj L ¡ L ™ hLEE؆ 10 dtt@P0"p0` dL DfT02T d lTTtt@PT DDtt@P ttPC7SEGOttPC7RTIOC7EXITC7RCTLttPC7SEGOtt P8CNVSET DECK-ID E01 COBOL 1.0 SUMMARY-132 tt@P0123456789p0 hD6 D7]L L(d" tt@P.HHttPCNVSET-ttPCNVSETtt PINCSTK DECK-ID F26 COBOL 1.0 SUMMARY-132 tt@P0 2 T  ttPINCSTK ttPC7EXITttPINCSTKtt PR9DRTN DECK-ID F29 COBOL 1.0 SUMMARY-132 tt@P0" ttPR9DRTNttPR9DRTNtJ PSTRACE DECK-ID B56 COBOL 1.0 SUMMARY-136J`P 0@P Hh j qh0 PSTRACE P J PREAD09 DECK-ID Z04 COBOL 1.0 SUMMARY-132Jr@PT`#T #T  .;T3#arr@P+  5T#T  1.:*a /0B2arr@PV2Db 2%1bXw2bDbA2 rr@P bgaBH,HWhP, hT3 p7'aϠ2h=1Drr@PhA 4h hT*(dhT  b2Db0 rJ@Pb1T  Db TEJPREAD09READ16*PERRPROSTRACER9DRTNROOT44ROOT43*P J PREAD12 DECK-ID Z06 COBOL 1.0 SUMMARY-132Jr@PT`#T $<96T 96Trr@P+ ?/b 3#aT  E1Ϡ2hh A hrr@PV hT Ab  "Db1 brr@P2Db A1b2 h hTY B2a3)h h rr@PhohT( ooQ-y+ @0b"+B2a(: *aT8rR@P' 3#aF A!7b"DbMRPREAD12READ14*PFMGETSERRPRO(STRACER9DRTNROOT43*P J PREAD13 DECK-ID Z07 COBOL 1.0 SUMMARY-132Jr@PT`#T 3#aT%&'T %.rr@P+,T#   Ob!X)h(H rr@PVoh  hT(ooQ%!%@0a2%>.a 42rr@P:*a?/bDbbh  h hT 2Db br@PTPPREAD13READ15*PFMREAD]ERRPRO/STRACER9DRTNROOT43*P J PWRIT17 DECK-ID Z08 COBOL 1.0 SUMMARY-132Jr@PT`#T 3#aT#T - 6Trr@P+  1T !!bDb 1brr@PV*h*$ah$h hT*e7'a h Π1h A hTrr@Pbb 0 A 1XT9f#A2 "f" r"@P b ! T "PWRIT17WRIT24*PERRPROjSTRACER9DRTNROOT45ROOT43~*P J PWRIT20 DECK-ID Z10 COBOL 1.0 SUMMARY-132Jr@PT`#T %T  -T3#aTrr@P+1T' !1b 8(aT/ A1bDb Arr@PVh ah A hTb 0A 2XTGrr@P bbB8a5)h 5h oh a hT( oo%A1a%:*r@Pa3#aPWRIT20ADDT30*PFMPUTSERRPROSTRACE{R9DRTNROOT43e*P J PWRIT23 DECK-ID Z12 COBOL 1.0 SUMMARY-132Jr@PT`#T 6T /-),T3#rr@P+aT1   ahhh  aH2hTh rr@PV hTM )h oh h  hT( ooT-&A1ar:@P!%:*a%=-a:"PADDT31ADDT32WRIT22WRIT23"*PFMWRIToERRPRO%STRACEwR9DRTNROOT43Y*P J PUPDT26 DECK-ID Z13 COBOL 1.0 SUMMARY-132Jr@PT`#T BT  ,T3#a/rr@P+T ?/a1T'?h  a H!hToaH'hrr@PV"Q" H"T-3;+a rr@P 8(ab A1bDb  b h hhTJ rn@P )hhohT)o b2Db?boh:*an"PUPDT27UPDT28UPDT29UPDT26"*PERRPROfSTRACE9R9DRTNROOT43FMUPDR*P J PjROOT43 DECK-ID Z17 COBOL 1.0 SUMMARY-132Jr@P Hdddh]]ddhUT%rJE"4hE@+rr@P+; 52 H/H-+(!!n!  r:@PVةFA h &Ahef:PROOT43MOVE P J PROOT44 DECK-ID Z18 COBOL 1.0 SUMMARY-132Jf@P#HTa#H#2  1b>.bfr@P' TQ;h2h0>b#$&1 -N, <,b 01rr@PR^ >.bTN_Z "." 2"8. . , rr@P}?/b$T[-/Ҡ  @0b",T >.b hrh@P bXT*JX  bB2b  bb h PROOT44 PERRPROSTRACEP J PROOT45 DECK-ID Z19 COBOL 1.0 SUMMARY-132JH@P#HTa#H1  AbHr@P h9 Ab>.bT,Q;h)>b#$11A1a r0@PF03 1<:*aTNV>0r@PW "." 2"8. ,$A1aTRA1b ?/rr@Pb3Tv:*aA1b2Dbb bb T)r @PR PROOT45 PERRPROSTRACEP J PERRO46 DECK-ID B46 COBOL 1.0 SUMMARY-132J@P PERRO46ERRPROP J PRDELT59 DECK-ID Z28 COBOL 1.0 SUMMARY-132Jr@PT`#T BT I ,T3#a'/rh@P+T T?/a)h  HohT?bo:*aTh PDELT59 "PERRPRO-STRACEOR9DRTNFMDELR@"P J PLFMMV63 DECK-ID Z29 COBOL 1.0 SUMMARY-132Jr@PXXXXXXXXXXH5 h1A"h-hTl)(l&%"h!rT@P+l llT @PK JPFMCLR FMCLOSFMDELRFMGETSFMOPEN FMPUTS FMREADFMUPDRFMWRITJRPFMCALLWRITERHUPDRECGREADR FPUTS EOPENFLDGETS CDELRECBCLOSFLACLEAR @RP J P=KEYR64 DECK-ID Z30 COBOL 1.0 SUMMARY-132Jr@PT`#$T 3#a#(T+ S DRr4@P+ T,8(a!A6T4 PKEYR64 PERRPRO/STRACE:R9DRTNP J PENDVT1 DECK-ID B44 COBOL 1.0 SUMMARY-132J @P PENDVT1 P P*K,I8 IT223309PP*J,CMUCOM,$$ IT223310PP*K,I6 IT223312PP*K,P8 IT223313PP*P,F,3,COBVT2 IT223314PJ PC7CJMP DECK-ID B04 COBOL 1.0 SUMMARY-132J @P PC7CJMP PC7CNTR P J PFMCALL DECK-ID Z31 COBOL 1.0 SUMMARY-132J PFMCALL P J P(EXENTP DECK-ID A34 ITOS 2.0 SUMMARY-132Jl@P X X ` X X X X X XH "H !H HT`l:PWTREADSLICUP ATTACH PGMIN PGMINTCHAIN PGMOUT:P J PaFMENTP DECK-ID F58 ITOS 2.0 SUMMARY-132Jr@PX%X#X!XXXXXXXXXX X X XXXXXH7rr@P+h H/32"4` aADe !aaݘ AA a ar"@PV Vh`"rPCREATE$CLEAR "DELETE OPENFLCLOSFLLOKFILUNLFILGETFCBUPDFCBRENAMEPUTS WRITERREADR GETS r*PUPDRECDELRECCOMFILVOLUSEREDUCE*P J PQC7CNTR DECK-ID B58 COBOL 1.0 SUMMARY-137Jr@PhDHDC8 T=B8h8 h56651)dR " h&h!hh"h " "%rr@P+Z6bb 0b bX<"T\=B "TQAV"rr@PV"2-2"" h"(۸h\=BK̪`"  dSh{""rr@P)[h^hTNZ\]rr@P_` ` iTdcxahbhTckTcfch Yh Xh Trr@PHSTH (sKTL BsCZ"/hhT\$rr@P"/h h hTH"/h h hTL$d] ahTrb@P-bdȽ`: COBOL ERROR-COMMERCIAL PACKAGE NOT SELECTEDbZPC7CNTRC7RCE0LC7RCE1IC7RCE2HC7RCE3GC7RCTLKC7RTIOpDMPTLKOMURIDX=MUTAB >ILOC BZBPPGMOUT7WTREADSLICUPPREADR -OPENFLC7MAINCLOSFLATTACHBP t PGLOBL$ DECK-ID F31 COBOL 1.0 SUMMARY-132 tt@P010123456789123456789123456789234tt@P05678900ttPGLOBL$tP*PAGE IT223321PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223323PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223325PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223327PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223386PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223388PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223390PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223392PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223394PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223396PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223398PJ PPAGDUM DECK-ID B51 COBOL 1.0 SUMMARY-132J @Pww P P*PAGE IT223400PJ P COBVT2 DECK-ID B40 COBOL 1.0 SUMMARY-132J@PPCOBVT2C7MAINSIZERRJPC7CLUTC7OPUTC7STOPC7OPIXC7OPRLC7OPSQC7CLIXC7CLRLC7CLSQJP t PC7CLSQ DECK-ID E37 COBOL 1.0 SUMMARY-137 tt@PI2dTW>Jl hTatt@Pj>K D DD"D ¸ÌL" L tt@P§]ȡtt@P Htt@Pd0T 0nd  l% D% DTtt@PTld ltt@P l ,TL  b@pT9% dtt@P n% d f D+ Ttt@P,< 9Xe hc2YT=02cTV=1k hT`tt@Pi=2 D DD"D ¸ÌL" L tt@P§]ȡtt@P Htt@Pd0T0nd  l% D% DTtt@PTld ltt@P l% D+D,,T3Ԁ 퀌̱ dDtt@P-΃bLb lpM@L 9L  2tt@P@ԀJXMT4 dhL D.D/  ] 1tt@Pk b Lp`,P PPd*p @tt@P+LD-bLbLb L Ab L b  tt@Pb ,bLlLld쁂 bLb Lb T8tt@P ̐ DTtt@P TTK05d*쀷 lTtt@P#  tt@P0a ttPC7OPIX#ttPINCSTKOPEN06OPEN07(CNVSEThC7SEGOC7RCTLC7EXIT ttPC7OPIXtt P5C7STOP DECK-ID F07 COBOL 1.0 SUMMARY-137 tt@P STOP RUN. 0 d d 0 d d w0d dT04/ h ltt@P,"1T ttPC7STOP2ttPC7RTIOPGMOUT0ttPC7STOPtJ P fC7ULCO DECK-ID B19 COBOL 1.0 SUMMARY-132Jr@P XO", "* HATK@"='',e"!  f" a %/ (b X7T X( #rr@P+b '"#" b b X# b X h",d"43e" H h`r0@PV Ll h\Oh" 0PC7OPUTC7CLUT'PC7RCTL&C7RTIOJC7EXIT P J PC70CIS DECK-ID B24 COBOL 1.0 SUMMARY-132Jr@P XrTf0 Xg  _^YY  d$\`" hB" h?rr@P+h?<":h; h<H h5h504;""0"n"n"h&#&;"""n"n"hrr@PV1 l 2 l l T`"h""rr@P2H""2H"h"hf" h h h\Tnrr@P\Tf 3h 0hh\\h#\h $!  0rr@P, T- \0  } Xr\T}T Xm XdXq \rr@P\h"Jh"h \zd0 XM XB"hXZXHX;rr@P- X2X?-XK-XQX/ X&X39h X/9h" 0b  0b     rr@PX d0$X  &h Fh   """""h(0% """r(@P" " h"1(ZPC7MOVECMPALNADD SUBTRCMULTPYDIVIDELOAD STORE DPACK DUNPAK-COMPAR9Z PSIZERR P t PR9DRTN DECK-ID F29 COBOL 1.0 SUMMARY-132 tt@P0" ttPR9DRTNttPR9DRTNtt PINCSTK DECK-ID F26 COBOL 1.0 SUMMARY-132 tt@P0 2 T  ttPINCSTK ttPC7EXITttPINCSTKtt P8CNVSET DECK-ID E01 COBOL 1.0 SUMMARY-132 tt@P0123456789p0 hD6 D7]L L(d" tt@P.HHttPCNVSET-ttPCNVSETtt PsC7EXIT DECK-ID E49 COBOL 1.0 SUMMARY-137 tt@PC7ERRMSG$$ SYSVOL 'd00#d l0d$0hDm Dnftt@P.ToT2pT5q d  d&d 0 Id d w0d dT88rtt@PYd h l"fT Htt@PottPC7EXITgttPC7RTIOTPGMOUTettPC7EXITtt PC7SEGO DECK-ID E90 COBOL 1.0 SUMMARY-137 tt@P  Ptt@Pd!d 2,00d0/ll Dp0 0 Ltt@P?p8 0 L d0Ed ! L l¶dd ! tt@Pj L ¡ L ™ hLEE؆ 10 dtt@P0"p0` dL DfT02T d lTTtt@PT DDtt@P ttPC7SEGOttPC7RTIOC7EXITC7RCTLttPC7SEGOtJ PSTRACE DECK-ID B56 COBOL 1.0 SUMMARY-136J`P 0@P Hh j qh0 PSTRACE P J PJOPEN01 DECK-ID Z01 COBOL 1.0 SUMMARY-132Jr@PT`#hT3#aT74" &TrP@P+JT* A !T08(aTPr@PJ3#a)H A DnB  bb H:3#bDfb b b D bbrr@Pu2@0bEDb BB1@hTHrr@PXkHbb hh:bcH h hnC TE7h rr@P8hTLX< h  hTH h 8hTLrr@P@0bhhhh  "."H-Qrn@P!B 2"Š  5@0b/ f"  nPOPEN01OPEN08*PERRPRO=STRACER9DRTNDMPTLKiROOT44*P J P!OPEN03 DECK-ID Z02 COBOL 1.0 SUMMARY-132Jr@PT`2T.-T D+)('&%# Trr@P+2T*1T4#T>(a"Dbbbbrr@PVb / B1  Ca TH B1I GTk rr@P;+b bDb a $h h.HLhyhhv h  h rr@PhT bbDbRDbd b b 1 "bb bDrr@Pb bb bb  bDb bDbT#a4$bDa rR@P(a#aTh 8h TR POPEN03 BPERRPRO{STRACE R9DRTNDMPTLKERRO46ROOT44ROOT43NTAP48BP J P4OPEN04 DECK-ID Z03 COBOL 1.0 SUMMARY-153Jr@PT`XRA1241+T3 $1T=rr@P+# T(2&T1X@0bT8(aTKr`PVr@PY# T<3#aTST_ Dc c) c aArr@Pa2 ea5ѳ-,Ѵ Ah8 !Tp&42 a($rr@P  S DRT,*!A B0a)h h ohT(rr@PoH{o:%3#ahb"(:*a$9)aK$5! a5 rr@PAhñFT>1")hoh>T(oH8o4753#arr@P0:*a##aaHK A DnE bbUd5%ad Ud7'ad Arr@P[d6&adD`b b b D bb1EDb BBrr@PTg`-T !3#aT`8&26T-rr@PX  1T"  T$7T#uX[Trr@P!T`(6T*TXa$ @ 4$a Tr4@P+BTU T,4F@PT !HhDnHecnXTF"POPEN04OPEN05OPEN06OPEN07"2PFMCLR ERRPROSTRACE1R9DRTNDMPTLKcFMOPEN2P J P]CLOS35 DECK-ID Z14 COBOL 1.0 SUMMARY-132Jr@PT`#T 3#aT6T 3a!rr@P+1  1 2b TDbhdH Mr@PVbTPCLOS35CLOS42*PERRPROSTRACEZR9DRTNDMPTLKPROOT459*P J PCLOS37 DECK-ID Z15 COBOL 1.0 SUMMARY-132Jr@PT`#T {$T p.@/+ %rr@P+b/+ bDb 2b T-TTMTrT@PVTQTTW"hdc hbTT@Pv3a- .T]TTu3#a8(aT PCLOS37 JPERRPROSTRACER9DRTNDMPTLKkERRO46NTAP55ROOT45FNTAP56ZNTAP54TJP J PCLOS38 DECK-ID Z16 COBOL 1.0 SUMMARY-132Jr@PT`X&#T 3#aT<96Trr@P+3a1'  1  Aa hB1a5)h 5hohT(5oorr@PV)hohT(oo1 h T& p:*aDbhdrr@P| bToT`XqT`Xh 3#aTVr@P6Th4"PCLOS38CLOS39CLOS40CLOS41"2PFMCLOS_FMPUTSPERRPROSTRACER9DRTNDMPTLK2P J PjROOT43 DECK-ID Z17 COBOL 1.0 SUMMARY-132Jr@P Hdddh]]ddhUT%rJE"4hE@+rr@P+; 52 H/H-+(!!n!  r:@PVةFA h &Ahef:PROOT43MOVE P J PROOT44 DECK-ID Z18 COBOL 1.0 SUMMARY-132Jf@P#HTa#H#2  1b>.bfr@P' TQ;h2h0>b#$&1 -N, <,b 01rr@PR^ >.bTN_Z "." 2"8. . , rr@P}?/b$T[-/Ҡ  @0b",T >.b hrh@P bXT*JX  bB2b  bb h PROOT44 PERRPROSTRACEP J PROOT45 DECK-ID Z19 COBOL 1.0 SUMMARY-132JH@P#HTa#H1  AbHr@P h9 Ab>.bT,Q;h)>b#$11A1a r0@PF03 1<:*aTNV>0r@PW "." 2"8. ,$A1aTRA1b ?/rr@Pb3Tv:*aA1b2Dbb bb T)r @PR PROOT45 PERRPROSTRACEP J PERRO46 DECK-ID B46 COBOL 1.0 SUMMARY-132J@P PERRO46ERRPROP J PNTAP48 DECK-ID Z20 COBOL 1.0 SUMMARY-132Jr@PXXXXXXXX, MOUNT XXXXXX ON LU XX, RING,READY? HDR1  0001000rF@P+100 YYDDD YYDDD 000000 HDR1VOL1Fr@Po RING #"a# h+hN h*hN hJrr@P Dn! q hh@  n q n q n  n  nT(o'?rr@P$$MOUNTS$$ n qX"/2.B2a)T(so hTs*rd@Ph hhhhT(soX2%<,bT(o H h Tdr@PT.  ""B0F400hD+NO hTLErr@PBT!BH>(!0T=-b*:*bTU TgDrr@Pm'TA1*TD(hCA` h h rr@P``hE` h h ``TpE KTjrr@PD41.T 2*T~D(hC?` rr@Ph h ``hE{` h h `rr@P` /Hb(R4TB hQhDh hSHBHrr@PD 0hB FhT(C.T)TaTirr@Po()V8hC?` h h `` Trr@P\l@Tl1TXHTFURTlT|B0FHB0Frr@P00HB0F4Ȁ00hTl%@Ty0TlTl- "h T6rr@P *DT(T T8(aTTTITUr@P PNTAP48 jPERRPROSTRACEFMDELRFMREADFMCLOS FMOPENERRO46NTAP55 ROOT43NTAP57NTAP53NTAP52NTAP58jP J PNTAP52 DECK-ID Z22 COBOL 1.0 SUMMARY-132Jr@P0HohXlh HXgh (h h!2 S Q H0%A h^ XJhrr@P9 HXEhXBhd(h (h /ȱnm" $ȧ 62 2 hHȜrJ@Pd- h+ h h"  h2  ؒJN@Ph hF2 N PNTAP52 P J PtNTAP53 DECK-ID Z23 COBOL 1.0 SUMMARY-132Jr@Pd0hH hhh H0%A 0FhHшHl rr@P9hƐ$" uh h Ȼ8h 0FhHȵhhȮ nȪhhr0@Pdȣ nȣȥh hثȘ蘀0 PNTAP53 P J PNTAP54 DECK-ID Z24 COBOL 1.0 SUMMARY-132Jr@PDhh h}h|y B0FHfB0Fb00H_B0FH[B0FW00HTB0Frr@P+200HL "hT} F1LBV1h!Gb *DT_(T _ h Trr@PV4_`NEOh*EOV1  r@P PNTAP54NTAP56PROOT43VNTAP55ONTAP58KP J PLNTAP55 DECK-ID Z25 COBOL 1.0 SUMMARY-132J@P6r@PHL\Hh" a!HA hh (h&hhhrP@P/ aT`HhA Hh(hT ȾP PNTAP55 PROOT43E P J PNTAP57 DECK-ID Z26 COBOL 1.0 SUMMARY-132JT@Pa h l lTH$h lu"% AlT PNTAP57 P J PNTAP58 DECK-ID Z27 COBOL 1.0 SUMMARY-132Jr@PhhH |HX hXl q" d   *#C:rrr@P/> " r < H E A a1"@Z{[lP}M]\Nk`Karr@PZz^L~no|_m [ABCDEFGHI.<(+&]JKLMNOPrl@PQR!$*);^-\/STUVWXYZ,%_>?0123456789:#@'="l PNTAP58 P J PLFMMV63 DECK-ID Z29 COBOL 1.0 SUMMARY-132Jr@PXXXXXXXXXXH5 h1A"h-hTl)(l&%"h!rT@P+l llT @PK JPFMCLR FMCLOSFMDELRFMGETSFMOPEN FMPUTS FMREADFMUPDRFMWRITJRPFMCALLWRITERHUPDRECGREADR FPUTS EOPENFLDGETS CDELRECBCLOSFLACLEAR @RP J PENDVT2 DECK-ID B45 COBOL 1.0 SUMMARY-132J @P PENDVT2 P P*K,I8 IT223437PP*J,CMUOCL,$$ IT223438PP*Z IT223441PP*CTO, COBOL 1.0 INSTALL COMPLETE IT223442PP*K,I10,P11,L9 IT223443PP*Z IT223444P