5I I IIII I Hz%azI&S ` I!''Ip i$Nh 7& IOJ!PGJ [hIIINFJdu#O8PO2PNFJsGJu#O8PO2PGJNFJu#O8PO2Pu#O8PO2PNFJGJu#O8PO2PGJH'H\Bu#HuSH|Au$NBHnI Nnu0H InH/FMB6HHuH6Hn6GJ@H6HHuHHuGJaHHuHHuHHuGJHHH\Bu$u(HH'u$NBu)JI4I:uY/s 0ݪllJ2HjHj8IjM8BsH6u'HF6u''%6G J$ '6uhH66HldjV4 Uj&86 H6H&6 H6H!6G!Jx H!8GJh 6Jj 6LB6v[ '[6'6 6) r =Z Y O*@@HnOnJ&!J&!OP!O !P #I!'%Mh#H#GhJ! u"#[hJ J!H!!#O!PJ8@6J[h u"S(I( u"uNGNJH06H(6H6G JuN6JFnJ!H 0GhJ!M!ICE u"HuNI'I(G J!F!J!H'u&BHCE6F!J!H(6JH!6b!H'%M'H(J!M>-6H!6b!H'%'J--N '[h u"HuNF\ -[hFhJ!uZ0In)" M 06Hn66v""G J --- -%6 J'6s@"FhJV"'%J(!u#H>%M(M06H86JL<0;SnFnGn$Fn-JN"%G %J"Hp6N %u^.Ip  Ruq8J"IxgDHx]*#u#GJdW"s"S(#H&#g0B$K"22H;22L<0822R#2g0BK#L<0d#]"'2222]"#2l(#$H(#J"L<0($((( u#GJ(HxL<0I#2R#2g0BK#L<0d#Ki#82JL#28222]L#O"P#J#$u.JL<0I#U:02 2I#G#J#2S&#L<0d#K#822v#u.s#28222K#H#J#$'272s#(GB gZ7K$'QV'Q2'Qb'Q%'QJg8BK@$g@BKe%g4BK%g&K3$g0]&Ix7Sz& L80S|QDj|Q8Jx$J$%J$J$%J$JY%J$J8'QJ'Q>[hJ$J$s$s#s$(J#(J#$'QDJ$'QDHx& L:0QVHzLBHxLB`$Q>'QPJ$HzL20Q>Hz&7L:0QP&L20Hx7& L:0QV& L:0I|F|mF|8QJJ$HzLBS|Q\H|&Q>fD@$K$)7&I|&L20J %HzL80Q>J$'\~'QV'Q%QD7L<0St&L<0QJn~Q> I<'QP)"K%:J%;atd$KF$LH0Itb&7LI|H&M 066[tHtM|6H&%M:0HxJF$$F0J~&%S|'a|H|AJ3$$uQ8J$g0B7M0I]&g'K&F'J&\'H 06'6\J&NFHF6u'Fu|'g']'F'J'u|'\''6'%6(f'S>F>6G>69?W&'a'j'"22H& I'7LR0%I!L<0`'b':"2S#2FSFNGSF u'6uEH0FM#6HFU6GJs'2H#%6 F uEJFHF6Nu's|'H'd'K'7u&BH 067676GJ'7M$B6I's'Gs' dBV(M06N$(' n$(Y(>W(U20S|`$(H|%6J''@uaQ$s' [hu"S(S(Ung($]H( [hu"I(uNGNJHng(K(g(K(GhJ(uZ0H0M:06H(6H(66Ju(JJ\d6H(6H(6s(u^.S(6u4u^.SH 066  uq8u(uZMH(H 066H6JJmMHFH@HLH:HRI/I/I/I/I/O%P!-OXP#-s(O<P8O6P2OHPDOZPVOTPPOBP>ONPJO%P%O/P@(PFO/PLNR\%uI:N4NXu0O/PPO/P8O/PJO/P@P>O/PDO!-P%O#-PVN2uD'M06HP%MR%M>%M@6u7/uY/H8& >])N4O/PRO/P:O/PLO/P@O/PFO!-P%O#-PXu0s)HnN>gDK,&gBK* LB%I>Un& gBK1* LB`>uI: \BHnLP0GJ*U& L80GJ*>]*U& L:0FJ*U&L:0SPU& LW*U77u#N4O>GD(P@(PFNR\%OJPLNXHnNnu0InU:I8u$NBN(,'%GFJ+OF?K*?W*U@M06J +UL%F%M:0FXM:0?]+H^(L20I@M:0%M@LB\(,J*Hn&L20IxHngBK=+O0^xPx&LN0`xUn&LD`xUn&L0B`xUn&LL0`xUn&L/`xUn& gB&LB%`xK+U>B`xUxF(,M=EF(,J+FXM:06F(,J+uY/H>6J(TF]+FXJ+O%^%^R?W+H86N2O@GF(P>(PDNP\%OLPJNVNnH>6u0Jg*,]wQLB>W1*>WLu#H8& M 6Jx FnJ)-\ [hL<0I$(TK_,WW,H &bJE,$[JE,I!-I#-I%-I'-N$(GhJ,u#H8F2U2O$(Q-H>Q,b$(Jn,H$(M 0FnMB0G#-M>-6G#-J,H'-H%-H#-6(T$(Kf-J,],6'6GnJ,f,69J,H!-\ 6J,\Bu#NBO8P!-N#-Jk,(TnKQ [hL40ITSB.L60gB]p-Oh?Fh]p-M7%MnM0HB.7L0IB7L=EIHL/INN<GHJ- %I<GNJ- LBM<I<N>GBJ- L40%I>M>HB.g(L@.I>]-FTJ-6H>6'6J'.ID.u#HD.6H>FbJ.(TD].G%J.H8LB>$K.GP8M>6u7/[TH<6FTJ;.GhJJD-'JV-FhJSQGnJ'%6\ JHi.bi.s^.L<0;SnFnGn$Fn-sk.G.u#N.(TDK.PD'%M06'I>J.HP%M%%MV>K.>K.%M>M"06HP0M>6u7/uS8N2u7/NVNP\%$s.';HH#-'s.H:I8NJN2(PD(P>NPs/G2JQ/H2N26N2'6s7/H86s7/G4Jp/H4N46'6sY/H:6sY/G.u$N.(TFK/PF'%M06'I@J/HR%M%%MX>K/>K/%M@M"06HP0M@6uY/uS:uY/NXNR\%$sx/(0Phpx`H@8X ?` @@pNu#FJJEOHD0FDM>GDJ}0uDFPMF06u7/b&H&76sZ0\0u#u$GCuONCN0u0JHn&L:0IHDkH8LB>$K18nQ>$J1NXf>8&Q>H>d@K1W2FXJ2U@dH0V2M0FbMB06u7/uY/s0(T>W}1\PN%NVNJJ'2FVJ$2GJ2uDOFJ3J}1J:2J3J1FXJR2HR%M%>Wx3>Kx3GJ2OJoLY2Zg2J2P[\.u.'M06'%M>%M>6u7/uI8N2u7/H%M/6OLPJOF?K 4HP%M%%M>M"06HJnL%MR%M%%MX%M@J1$',Mb% 6u7/uY/H>6H@HX%IXGbMX6J1H0J1FJJ%3H>M0FPMF0J1'M06HPk60%M>%MBMV06u7/uS86N2(P>F[J'aJZk3nJnJMT0%FM/6J3UPaRgB]3UJnLX3O>T@]3U>8nPS>I@J1'M0OLoJP|Y386UP%MR%M>%M@M0F|M/6u7/uY/G|J3HJnLZ4m88@%6J1GJ 4OJoLZg2uDHJN|8Z$4Y$4m8\|%MP%M>M06uY4F|M0J1FJJ}1uD\PuY4M$06H>J1jF't H^sY4HP%M%%MV>K4>]4\PN%J4%M>M"06H>MR06u7/uS8N2u7/\PN%$si4nFM0BJ3NR7NT7F"%u,CG"%u C$u#OD?K7?]4bP7OP7TR7W4PR7J4 [hg7K8L80Iu$(TDK5FDJA6TFK(5FFJ;6\.u.\.ux/N$(HLnJY\5b$(ZT5m8MB0IJ\5MT0%IH$(8%M06'M$(%MP%MR%M>%M@6u7/uY/G$(J5H6GhJb7[h d0Kb7dX7K6d/K6$GT7J5u5\T7[P7J5OP7fmE>]5fE>]5jP7:rmEQmErEQE'tmE'tE9TR7V6J5$s5u8M6OP7fmE>]!6$u^.7QmE6u6GT7J26u5NT7FhJ4Jb7ui4J6TF]6HR%M%%MX>K}6%M@M"06H@MR06uY/uS:uY/\RN%$O>T@Gd]6Hd% M06u7/uY/\J5'M0o@PbZ6mbbbMB06HbJ6O@P>J6Hu7u8a6OP7fE>]6$u^.7QE6u)7J&6GT7s6OP7TR7W7J69fE>K$76'QE9TR7V6J 7$J7OP7fmE>KH76'QmE9TR7VM7J.7$J=7s)7u8M6FmEHmEGmEu^.7ImE6[P7\T7u6NP7NV7(fmE>K7 'QmEbV79TR7V7J7$J7HV7 s4O0P8O>PHxg^7$K5Hu7IJ5FnJEu4Jg7K7n7s7M7s7@H>%GU8NO0P8s87L7I&\L(M0(TD]L8H%FPM7%MV%M6u7/J5H 06N"%\ %Hp6  Ruq8J IV7 nV7;!  ( 69TV7]8sq8NHxg^7$K8'IHzLBS7HxLH0S:Ux& I :u$O@P>G :H:F :'%M :GFJ9(TFKJ9H:6\F :P:M06uY/77L<0I:g:])9'7&M:67[:F:J9J5#7:#7H:77H: I|H|%J9M.0\ FXJ9HR%M%>W9>K9%M@M"06H@MD6uY/uS:NRN4uY/J9' Jj9$6F :P:HL%MR%M@uY/67L20877I|7H|%6 [:7F:J9J5M,0\ 6uY/H86G :J9H:% M6J5(G:J5769[:J9@NJ!:\OhHn& IHn&L20>];:8I<'(NxAPv(PNGJd:'''''(u.HJu;H>H8H2HP([(T]:GJ:u.HJu;H>H8H2HP'!((Hv%av!(J:FJd:Hv;(^P|k|8%M:0M06H)"(%M:0[v[v(IPI2I8I>IJ((IRI4I:I@IL%MP%MR%M>%M@6u7/uY/HJu;H8%a|%HLu;M|FMB06'H%6FxAJ~AHjM8BS8N2'a`j$6(R;[vH%FM:0%(IRI4I:I@ILMR%M%M@6u7/uY/GJr;HLu;H|FMB06Jr;(PDOP>OPJ\%NPu$u0u>JdK;\s;NN|d] <$s;nI|m|b|\s;u'GDJCO$(<QB<[$(F$(JHgB$]<&LBd>]%MV(H=sy=u.ux/u$(P?' M0N?6' %MP%MR%M>%M@6u7/uY/HnL60&IFxANH/F?J?6GHJ)?(TH]>FZJ>N1?HT%M%I'-O'-J3>J3>J>J3>J3>J>F?J@HLaJnNnY`>Z`>aNI$(m$(b$(\Jf>NI$(H%MT%M%MB%M$(6u>FxAJAF1?J3?u>JG6J>H6N66'6s>H<6s>HngB]>s>U>6u.E6H>6F"%u,C\"%u Cs>@-\1?uO<P!-O6P#-OBH?P?SB>$W?u$OHP%-I<OTP'-NTN6J3>(PBJ>H%-H#-H!-I:I4IFHBI>H?I@HNSJILH<I8O%P%OZPXO'-PRNP\%(PDN2H`I^u0u>JHn&Iu.ux/u$' M06GJ?(f2f4Q2Q49?W?' \?FxA(GxAO>P?J=HNnJaLaN@Z?J@S@`?(T?]@b?(T?V @P?%MB`$J=HJnLa@J?>--''-\)A [hdvAK@ -IFJ@7Hn&L:0IgVAW}@VZAU& L:0FJ}@U&L20`$- ->]9@UngBK9@-bhu'NxAFhJ@HnL:0IxA'--\Bu$ &;HzAu#u0FxAuANxA-vANBHngBKu.EH 066Hr6H>6NrJu^.SrH>M766sA\Bu.H>Bux/NB)OJJ@M 6s&B (P$(HnG'%uDJ{BHnL60GM(S$(Un%uDIu!DHH$(MBM6uDJuDu!D'Hn%M*0M6uDHn&L60NWBU>C6JGO8PDhD6HnL"BGJJBCH 6$6uS86'I>NV\P'ID\CJ$'@%`nON0JeCuDH0BFhu!DH/Mn6uDHnJBuDu!DHnM/6uDH0B&Hn&JBH6sDGhJODu#H>7LBI>&ICH/MC6u7/H>6s!D(&L60>VD$KeDs!D'$uwDJN2I8$swD [h7S8$& I$sDUn&gB$KeDs!D@GDJLFVJ&EHP%M%>W!E>K!E%M>M"06H>MD6u7/uS8N2u7/NP\%$sD' NVJDHp\ %s.E@ 1 HdIKEH6sEu^.S]E6u^.ScE ' '%6OnP_E $SaE6H_E6u.E6HcE6H_EL(IeEGeEJ IWEIYEI[EJEuFJ7H 06u.E6  RFuq8sF%FJGG]EJ"uFHiE6HaE6'6GeEJfFH[EHYEHWE\Bu$u(HgE'Hu$NBu)H 06H]E6N]EJ"'((HnL:0It'OtQ JGHn&Iu$'%MuGH@uGuGGJF d0KF\Bu$H@GBM0NBuGuG[JF L607SL:0I&Iu$(TF]GNFFRJGO%PFHF%M% M@OhooX$GM0uGuGHX%MR%M%%MX%MLuGGJVGu$H@uGuGGJwGu$HR%M%%MX%M@uGuGFhJF)"((F6(6$(vGJH>8 6u.E6F"%u,C\"%u CJ'((sGH4H:(sGHn&SM uGu$H@uGuG LDB7L:0I &I(''''((HuGu$OF?]$HHXad$X$HGRb@H@uGuG[FJHG J\Hu$'(H@(((H4((H:('([FJGJ}G()3N'N>H!87&>KHd'KHG'JHHH67S'M$B6H>6>KH6LB6JH6'6$b>v}H\'7&d'$KHvHH'M$B6b'e'VHHH6shH\ Oh LDBI KHng7]Io KJ&I<g9EK&I<<gJK0I<PCEHJHn&L60;$XHIMN0MCE6uDH0HIAEHS?E6IGEu#ODJIJIJIJIJIJIJIJIH(JIH0JIGVJIHP%8JIHP%M%% M>6H8LDBIEEHGE7L0MEE6%[CEFCEJcIHng7KJH9EupJgBK?JH(upJHJ6NJJH'BH1uk.JH=EuD' HJHJ(&L60>$]*JMN0H$LHHH?EHAEu KJIH?E8H>BuD'H(0HJH"LH?EHAEHH\ Ku KJIIJuJS(I(HngJKJuJI(HnuNGNJGJJJHJ6NJH06H(6H(6H0086u^.SJ6spJ @P [h u"H&#g0B$KK$OJP.2'bJ/sJIOEIMEIKEIIEIQEISEIUEGJJ1KHJ6NJH06u^.SCE6u^.SGE6H0086u^.SJ6HCE6HUEHSEu&LHQEM6H6u^.SCE6MKE6HIE6u^.SEE6HIE8dH0VKM06JKH06$HKE% 6HOE% S>6dH0VK$JK7666HME6M>6H 06HCE6HEE6HJM6H6[ KG KJLuD' HIIEHIKEJZKHGE6H06s K H(&L60I>G>s&L( ( ( ( uwDH/6H86H>6s&LGnJLuDH>BHnLJMJHn&InJBH=EI$(HJJnC'S>%M06u7/uS86(PDN2NPNJ\%sDL<&Su$$\ M 6(PDjroQS>TF]MFLJMGRJMFXJMd@]MuY/JuS8N26\PN%NJNVNbu0J'M06Hn766u#\BH>M>BHkE'u$NBu0G(JN(JgMHn&I(G(sZMJQM&L60IJ0<' T@]ANOJTL]ANOVTX]ANO2T4KDNu0sM(<6u4 VmO' GL'7SN6u7/ [h$HN%8M/H<JA'db]OdF]OuPJOU:gO]OLDBdWOuPPJOU8gO]OLDBdWOuPJOUD>VOUJ8YOZOUF>KO>]OuP$sOH:I/H4I/uuPI:N4'IFu0HFIDH@I>H:I8H4I2Nb\FH/I4H/I:sPODPFP/O>P@P/OJPLP/OPPRP/O%P%P/OVPXP/uPsPPO@?VPsP<^jPjJPO/PDO/P>O/PJO/PPO/P%O/PVsPH:I/H4I/H@I/HXI/HFI/H>nJI@'IFNR\%uI:N4NXu0H:I8N2'IDH@I>NJNVNP\%H/I:H/I4H/I@H/IXH/IFsPuZ0'%66JH-saQ& \ >WQL7HQ86GJQu.E6F"%u,C\"%u CJQ6u#H86J\ L:0I'%8M6u#u7/JHQ\ 6u#H86FhJQJ/S0SzQ4ĺCڵ:IC uX»4S uCC:u xDDC<rS|:[xKIC<u#F<uWK/BB/B /SC uBuBBډ2SzRs u"2 y ۊZ2S[|C|/S<t zCzSH[} tC CYË0SCC0SFILE SECTION ASSUMED HERE.USING/GIVING FILE'S ACCESS MODE MUST BE SEQUENTIAL.DATA DIVISION ASSUMED HERE.AREA-A VIOLATION; RESUMPTION AT NEXT PARAGRAPH/SECTION/DIVISION/VERB. INVALID SELECT-SENTENCE.UNRECOGNIZABLE ELEMENT IS IGNORED.ERRONEOUS RERUN-ENTRY IS IGNORED.ERRONEOUS FILE-NAME IS IGNORED. BLANK WHEN ZERO IS DISALLOWED. STATEMENT DELETED DUE TO ERRONEOUS SYNTAX. RECORD MIN/MAX DISAGREES WITH RECORD CONTAINS;LATTER SIZES PREVAIL. FILE NOT SELECTED; ENTRY BYPASSED. REDUNDANT FD PROCESSED AS IS.INVALID BLOCKING IS IGNORED.INVALID RECORD SIZE(S) IGNORED.'LABEL RECORD STANDARD' REQUIRED.SUBSCRIPT OR INDEX-NAME IS NOT UNIQUE.SOURCE BYPASSED UNTIL NEXT FD/SECTION.PROCEDURE DIVISION ASSUMED HERE.OMITTED WORD 'SECTION' IS ASSUMED HERE.MISORDERED/REDUNDANT SECTION PROCESSED AS IS.ERRONEOUS SUBSCRIPTING; STATEMENT DELETED.ERRONEOUS QUALIFICATION; LAST DECLARATION USED.NO PICTURE; ELEMENTARY ITEM ASSUMED TO BE BINARY.REDUNDANT CLAUSE IGNORED.NAME OMITTED; ENTRY BYPASSED.IMPROPER REDEFINITION IGNORED.OCCURS DISALLOWED AT LEVEL 01/77, OR COUNT TOO HIGH.INVALID VALUE IGNORED.WORKING-STORAGE ASSUMED HERE. LEVEL 01 ASSUMED.!PICTURE IGNORED FOR INDEX ITEM."PERIOD ASSUMED AFTER PROCEDURE-NAME DEFINITION.#GROUP ITEM, THEREFORE PIC/JUST/BLANK/SYNC IS IGNORED.$FD-VALUE IGNORED SINCE LABELS ARE OMITTED.%STATEMENT DELETED DUE TO NON-NUMERIC OPERAND.&STATEMENT DELETED BECAUSE INTEGRAL ITEM IS REQUIRED.'LITERAL TRUNCATED TO SIZE OF ITEM.(EXCESSIVE OCCURS NESTING IS IGNORED.)DATA RECORDS CLAUSE WAS INACCURATE.*GROUP SIZE GREATER THAN 4095; LENGTH SET TO 1.+EXCESSIVE NUMBER OF FILES/4KB WORKING-STORAGE BLOCKS.,A FILE-ID NAME IS UNDEFINED.-VALUE OF FILE-ID REQUIRED..A PARAGRAPH DECLARATION IS REQUIRED HERE./USING-LIST ITEM LEVEL MUST BE 01/77.0VALUE DISALLOWED--OCCURS/REDEFINES/TYPE/SIZE CONFLICT.1CLAUSES OTHER THAN VALUE DELETED.2SUBSCRIPT 0 OR OVER MAX. NO. OCCURRENCES; 1 USED.3RIGHT PARENTHESIS REQUIRED AFTER SUBSCRIPTS.4ITEM VALID ONLY 'WITH DEBUGGING MODE.'5SIGN CLAUSE IGNORED FOR UNSIGNED ITEM.6LABEL RECORDS OMITTED ASSUMED FOR PRINTER FILE.7INCOMPLETE (OR TOO LONG) STATEMENT DELETED.8TERMINAL PERIOD ASSUMED ABOVE.9VARYING ITEM MAY NOT BE SUBSCRIPTED.:SINGLE-SPACING ASSUMED DUE TO IMPROPER ADVANCING COUNT.;PROCEDURE-NAME IS UNRESOLVABLE.<KEY DECLARATION OF THIS FILE IS NOT CORRECT.=STATEMENT DELETED BECAUSE OPERAND IS NOT A FILE-NAME.>'COMP' IGNORED FOR DECIMAL ITEM.?INVALID KEY SPECIFICATION. STATEMENT DELETED.@EXCESSIVE LITERAL POOL OR DISPLAY STRING LENGTH.AFIPS HIGH-INTERMEDIATE FEATURE: CONDITIONAL STATEMENT WITHIN 'IF'.BBAD SORT/RELEASE/RETURN USAGE.CPROCEDURE RANGE SPANS SEGMENTS.DPROCEDURE RANGE NOT IN CURRENT SEGMENT.EFIPS HIGH-INTERMEDIATE FEATURE: RESUMPTION OF FIXED SEGMENT.FFIPS LOW-INTERMEDIATE FEATURE: LIBRARY. (COPY VERB)GFIPS HIGH-INTERMEDIATE FEATURE: COMMA/SEMICOLON.HFIPS HIGH-INTERMEDIATE FEATURE: CONTINUATION.IFIPS HIGH-INTERMEDIATE FEATURE: QUALIFICATION.JFIPS HIGH-INTERMEDIATE FEATURE: DATA-NAME BEGINNING WITH NON-ALPHABETIC CHARACTER.KFIPS HIGH-INTERMEDIATE FEATURE: RELATIONAL/ARITHMETIC OPERATOR.LFIPS COBOL LANGUAGE EXTENSION: APOSTROPHE AS SUBSTITUTE FOR QUOTE.MFIPS COBOL LANGUAGE EXTENSION.NFRACTIONAL EXPONENT OR NEGATIVE SCALED BASE (99P).PILLEGAL MOVE OR COMPARISON IS DELETED.RFILE NEVER OPENED.SFILE NEVER CLOSED.TINCONSISTENT READ USAGE.UINCONSISTENT WRITE USAGE.VREWRITE VALID ONLY FOR DISK FILE.XKEYS MAY ONLY APPLY TO AN INDEXED/RELATIVE FILE.YCHECK-DIGIT CONFLICT.ZFILL CHARACTER CONFLICT.[JUSTIFICATION CONFLICT.\FIPS LOW-INTERMEDIATE FEATURE.]FIPS HIGH-INTERMEDIATE FEATURE.^FIPS HIGH LEVEL FEATURE._SYNTAX ERROR IN SCREEN DESCRIPTION.`SEMANTICAL ERROR IN SCREEN DESCRIPTION.aCOMMUNICATION/CD SYNTAX ERROR.cIMPROPER SIZE OF COMMUNICATION '01'.dEXCESSIVE SEGMENT NUMBER.eEXCESSIVE SEGMENT NUMBER IN DECLARATIVES.gNON-CONTIGUOUS SEGMENT DISALLOWED.hMAX. # SORT KEYS IS 12.iIMPERATIVE STATEMENT REQUIRED. STATEMENT DELETED.jILLEGAL CHARACTER.kINVALID QUOTED LITERAL.lIMPROPER PUNCTUATION.mIMPROPERLY FORMED ELEMENT.nELEMENT LENGTH ERROR.oILLEGAL COPY FILENAME.pIMPROPER PICTURE. PIC X ASSUMED.qIMPROPER CHARACTER IN COLUMN 7.rAREA A NOT BLANK IN CONTINUATION LINE.NO MSG FOR MSG NO.HNd'Khdu&BH0J(