dumpfloppy 1: 18/01/2013 18:35:15 (PF handwriting) CIS COBOL MASTER 28/4/86   1_!i˞~ ]~ >12fK!+``*!"`:`O 8GQ{eze*`"`!}d|d>Dh!`͠`͗`͗` !`͇`>2`2`7H!w`~#( OBoot !`͇``͠`!`͠`͗`͗`@0N#(~# w 6<---\X COPYRIGHT (C) 1979, DIGITAL RESEARCH _͌> ͒> Ò> Ò͘~#͌ì _2<ï2 ć!ʶ2:2a{_:ʷʖ:ʷ>Ľʖ:=2–!B!6#5ʖ:ʷĽ!ͬʧ )!F#xʺ~0wëw!" !~6ͽ:ý(!#͘*~ "ŷ"͌#>?͌͘ =_.:;<> OŅo$>!Y2*O"ʉ@G:ʐ:wÖx2p0ʹ#*©6?ëw˜0ï#6 ¹.0#*6?w0#6 #6" =qf^!~2>`~2ʯ2\!!B!~> >#0~O#Cx2͘1)ͽÂf zͧÆBAD LOADCOMf^: !ʶ Â$$$ SUB˙˥˫˱"C{2!"E9"1Aί22!ty)K!G_^#V*C͐~׃Eלץ׫ ,&-AGMSΛ!!ô!ô!Bdos Err On : $Bad Sector$Select$File R/O$:BA2!~6 O͐  :ηE B 2>: ηb# : ηy! 4 5~yy5 6yҐ^H@Oy H H: –ͬ  #H: ! ξ Hù H H $O͐: 2 *CN# x: 2 p&x~+é7̯2 H! >w_: ! ξ5ͤNkͱ¦ͱxʊ#Nx: η! Ζ2 ͤ! 5™#wO~x½p Hy<< ٷʑ :!qMD##~?  xDIR ERA TYPESAVEREN USER!yO#< Ty#O 3Ư21y_͸2y2ͽ:÷˜1͘A͌>>͌92^ :ʷ¥.!_~#fow]ȭɎɥ!v"!çREAD ERRORçNO FILE^:ʷ ! ~ 3#0 Wx x ŀ ł G ~ # 3x~#B!Y~ɯ2:ʷ=!ʾý:ʷ=!ʾ:ý^T!~  6?#ˆ:`O> K{͘A͒>:͒͢>:͒͢xK > K > ͒x  ͢ØÆ^ BRͧ9!5‚#~Y‚#"T<ÆALL (Y/N)?^ Tʧ͘!6!~ڇ ȯw4!Y~ʆ͌†t=ʆf ^ T ȯ2o&)|+!<ͧÆNO SPACE^ :Ty!B*O=?_s#"^sG!~Yɸpsp2mÆÆf ͧÆFILE EXISTS _: É: :ʷʉ=2)ͽÉ T!@k!}|q2E>! ^#V w#P:BO|^#V#"##"##"##"!O*!O*|!6ʝ6>ٯ*w#w*w#w'û*ٷ! J*""!N#F*^#V*~#foyx*{_zW+*yx#*DM*s#r*s#ryOxG*0MD!!N:ط EG>O: \ϷSπ*C :طqn& ^#V>O^"*}:*)=":O:ءo"*C *C!ͮ~2~2ͦ:ئ2ͮ:ϯO:؁w:w |g}o*د#  ):BO!yoxg*:BO}!N#F "*#*s#r^ ~!J! J*:؅o$*C~i6iw**{#zr+s{ozg**͕** о,w͜͸Ͳ!!N#F$**O!~#:Aξ#~$=2Ek͌  ::/GyO>2!q*C"͡ʔ*JҔ^:Oyʃ?|x | sҖ-|N-# S:2E!~Яw>T D^6k-äPYy 5*{zBK5ڋ>*Cw~#+w#w+ɯ2E22i^ *C :ط~w~͔͔# #  w ~>2!E5T*C!"C"C!w# F! w͌xЯ2͢*C ~<wʃG:ؠ!ئʎì 4~ʶ¬:<ʶ$ʶïZͻϯx>2>2ͻ:!ؾZԯ2:Eηẅ́͊Ͳ>2>2T*CGͻ:ẅ́n>2;O ^DM;}H>"*C :ط:ddslO s#r:Eη͊:==»y==»*Ww#*"͸*:G#š"͸:!ؾw4!iw:Z!E~=26:O͔|(~O6#:̈́ :̈́!:̈́ $:ͅ'*-:ͅ 036:̈́ 9<:̈́?BEH_~#fo!y(2o))))U.2:޷ 2y2y=2`i"&`i#z n&ɯ2>2$2#>2%b2$y2% >2:2:2 :2!:޷(1=2:!޾ $:! ޾ :!!޾ 4>@ 6! 42#2<2#s 12":޷2!~6(":!޾ :!޾ :!޾($:޷:2:2:2:#޷ۯ2:o&)))))))7[&:$޷ >2:%:" 2:"{ >E>F2 > 2>( !JQ!JQ>ʹo !ow( : E !r: O:ʹ͊>ʹ́:2͊!Q:O<2ޯa(<2>Dh: O7!C(!UG(&{dzd}e|eyʹ!́~# !w# : 2">: ސ2 :=2>2"ޯ2<ɴx 266"!^(!u*~| } !|Y8aBIOS Error NRWPY8aKY(>́(Oy@8(y2:́́(::(w @0ɯ!(Q>>́>́>́ϯ2*C!!~~#~O~G#n,-.‹! w! yG!x͢.:E<ʄ! q!pQ:E<. ʄ$.:E<ʄi6}2ExN! ~态O>G~G!~G} *C!r#r#r ^ͥ_y#x#{s+p+q-*C ͥ!!q#p#w*:BOYG}*MD "ã:!Bξw!>2*C~=2u:B2~2wE:A*Cζw>"!""د2B!"!rQQQâ~?ͦ~?rQ*"CQ-Q͜QüQrQ$Q*):B"*)*)Q;*"E:;:A2AQÓQÜQ*C}/_|/*ؤW}_*"}o|g":طʑ*C6:طʑw:2E**E}DQ>27ã(6dSDôÔÿt BootInsert PC-CP/M-System diskޅ(xޅHލޔhޢ@  ?1N:(22 22>۷(!3֯22!9(>!2"!2"2261222>2!"*!:G>(=#x(w#!} 56K CP/M 2.2 / 3.01 alphatronic PC Serial number 00000   |{0*w#"!4BIOS II alphatronic PC V 3.0 13.03.84  @$@B B HH II$@DI ABI$"$H$H@$$I! H*  $H@@A I $D!!$I"BI"I"@$BIIH$$$$BBI$@BI!"$$A DI$@ A$@$$@H! "!$$" @B$!!!DH$$"H @@BHH  !$$A"D@ "A" "BHA " !$ D B I $ !$$ H@BD D$ HI DIA!$$$ $" "$D ! $"  $AB " BDD $$D!"DI$!$BH!"IB I$"D HD" " $"! @H !BI " I  $I$I$DI$ !I$@"$"$! $I$I HA HA @@B  "$HA B  $I B! @@@BH@B@DH@!DHB!I HH    PIP COM:STAT COM,COBOL COM COBOL COM"CONSOL INTCONSOL LSTCOBOL I018COBOL I02h !"#$%&COBOL I038'()*COBOL I04+,  (INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE) COPYRIGHT (C) 1979, DIGITAL RESEARCH, PIP VERS 1.5$$$ SUB =.:,<> _[]INPIRDPTRUR1UR2RDROUTLPTUL1PRNLSTPTPUP1UP2PUNTTYCRTUC1CONNULEOFDISK READ ERROR$DISK WRITE ERROR$VERIFY ERROR$NOT A CHARACTER SINK$READER STOPPING $NOT A CHARACTER SOURCE$ABORTED$BAD PARAMETER$INVALID USER NUMBER$RECORD TOO LONG$INVALID DIGIT$END OF FILE, CTL-Z?$CHECKSUM ERROR$CORRECT ERROR, TYPE RETURN OR CTL-Z$INVALID FORMAT$HEX$$$$NO DIRECTORY SPACE$NO FILE$COM$START NOT FOUND$QUIT NOT FOUND$CANNOT CLOSE DESTINATION FILE$DESTINATION IS R/O, DELETE (Y/N)?$**NOT DELETED**$$$$$$$NOT FOUND$COPYING -$REQUIRES CP/M 2.0 OR NEWER FOR OPERATION.$UNRECOGNIZED DESTINATION$CANNOT WRITE$INVALID PIP FORMAT$CANNOT READ$INVALID SEPARATOR$1 :2L> ̈́M9 !p+q* !q*& *M *M !p+q*!!p+q*"!p+q*$!6  !kp+q*j> >ڪ Þ !qp+q/ *pDM9: :M2r:N!r !:r *r& N!r4 !6:͔: :ͳ.!ws+p+q+p+q:w=2wN *s*u w*s#"s*u#"u' !"*M^7 !x6:!xھ **DM͆ 2yʭ :yʗ ͯ *"*6:2x÷ *"!x4d !"/ !j}=2| !"*KM^'_ !z6:|!z1 * "}*}DM͆ ' ͯ *"!z4 :e !"͆ !z6:|!z '? 2*H#"H!{6:{ր!Ң *{& :{4 2!{4m *":ڹ ͯ !z4I '2!"!q: !4>!S :S! :2*M! ^#V͎ * :w*#" = = = = = ͯ  *M !6q  !6q  !6q  *& !6à  !6 à  !60à  *& !6  !6  !6  *& . 1 4 7 : = F P [ f q  221@:2!o6+6+6!6#6!6#6:G*o .!N6:^*M^!K6!6!6+6' :$::=2K  :ʤ\:ҷ\x'Ͳ:!\͢  :͈'! :$: $͈Ͳ!N6' :!Cwͯ !6:^͢c!6{:/>!/H{ͯ :<2Š ::=HҮͯ !6:Ҿ:2 !6::/H͈;!6:> !/>HHͯ :^!w:<2:0}:@E}:!S!W6: z!]6:cm!c6:_z!_6l ::,: HHҰͯ : 2ó:E:1:2v!q!*8!*6: >ͦ>ͦ!q:_  !p+q.*   !q*&!p+q*2!p+q*2!p+q*22!p+q*!p+q*!p+q*!p+q*2!p+q* :2!q: " *M n :c4 *M n :2!c:Q !c:2: !:cw>!n !5 Y : { !6!q:!lwҙ  â :0O !q:O| :O| !6:]2l:o'2o:n'2n:m'2m*mMͣ *nMͣ *oMͣ :]:   *}2D" * * *&"!q:UY: Y:ҩ: ʩ:_2ʘ:€!6<:<2!ژ!6 >!]Ҥ; !6:Q::H: !6*M : !6!q:a/>z!/H:_2:!q:A/>Z!/H8: 2::=O>m:W!Q} Hmd>9>!6:2*M!E ^#V͎ڗO **~2*#"m2m͖ 2m!6m!6m!6 m2mͯ m!62m!62m!62m!62m'2:2:TҒ:2!6*ME:2::Ҳ:<22ý: 2:} >ͯ :i:2:d*M:[   *M:>!(:=2%> >>!F!5+N! ~2!4<2T>>!b}*bMͭz:b2!b6:<2é>!`ҥ*`MͭҞ!`6!6> :é:(!q:!wO! ~2*& :w>!:!4!6>:N<2N!> *N& N2 !p+q!6!6+6 !6: S: M!6g8:N2M*M8p!6!6!6>!ڕ*&P 6!4z!6!6#6#6!6*M8:ھ:*͇g2ê::¿::,͡A<2O>*M8):[ͱ!N5!6ñ:5!6#6>!ڰ!6:<2O>/:!O!T *M͡H~K:¡!6[–ͱ!N5:2:2!4=:[¼ͱ4:!6:.2O8: :* ͇g:[ ͱ!N5!6:%:<2*6 * 6å!q!6> !d*&I :]>!4A>:<2O* :w:?†!6!q!6?!:ҠgÐ!q*&*~!6:22: :]Hں:A2O>: 2ͯ 2*">!b!ͯ >!`0ͯ !q:E:24J!46*}a!44EJ *KM^'́:‚ͯ !36'n::0:f9OY#9.3'ͳ.:020' 'ͳ'7 6'!j>A+!s!"@͓1!"<**"͓n "Dn"":!Q2҂:X!Wғä:ڤ*MEÓ:ұ@@:O2Mc;!6#6>!)*&P ~"::H:H:H:H"!6!4:_jYO jM*"S*" 3@bl*M1͓!""7 *M^͆ \͔!":͎H*#"ͧÝ/ :>͛9ͯ .*#":_!' !'6!36' :1/!aE*#">z?C9IͲÁ.!6> !ڇ*&' ~2 ʀ: y.*M!4Q>!қ:=2á:2:Ҭ\>!ҿ:=2K:2K!:!:K\: \!p+q͈*÷:S:QHI:N<22: H@"2Í202O> c!6Í202O> ڍ*&O*& !sc*&P :w:·>!ұͯ :22:_!6=!6>'!E!4!p+q*0 !r+s+p+q*~$7*>*>H&>*#"*#"> 2:R͎:!6!6=2:ʙ!6:“H9Ž>!6-e!6ͻ2=2ʺ-é:>>"ͻ2:!!5ͻ2ͬ!\-:>>!p+q:,!6*DM9:<!6:z 2W!6D*&L :w:<2Ov*:>=20O> ڒ:0:AO>Ҥ::A }}Hͬ!wͻO`idͻV[2O>2:!X!6:!:=O!L NE!4 E E:/.*&L 6$L9k9.Xͯ *KM^020 :020:121'ͳ':²ͯ !G6!"!"7 *M^n/ :a/:H!6:ͯ !&6DM!  ::=H-\:N2O_og_{ozg^#V))) _{ozg^#V) d^#V|g}o n_{ozgO{ozgi`N#Fogo&og H ©=¨!j>A+!s!"@͓1!"<**"͓n "Dn"":!Q2҂:X!Wғä:ڤ*MEÓ:ұ@@:O2Mc;!6#6>!)*&P ~"::H:H:H:H"!6!4:_jYO jM*"S*" 3@bl*M1͓!""7 *M^͆ \͔!":͎H*#"ͧÝ/ :>͛9ͯ .*#":_!' !'6!36' :1/!aE*#">z?C9IͲÁ.!6> !ڇ*&' ~2 ʀ: y.*M!4Q>!қ:=2á:2:Ҭ\>!ҿ:=2K:2K!:!:K\: \!p+q͈*  3 Copyright (c) 1979, Digital Research????????????CON:RDR:PUN:LST:DEV:VAL:USR:DSK:TTY:CRT:BAT:UC1:TTY:PTR:UR1:UR2:TTY:PTP:UP1:UP2:TTY:CRT:LPT:UL1:R/OR/WSYSDIRR/O R/W SYS DIR ** Aborted **Active User :Active Files: Drive Characteristics65536: 128 Byte Record CapacityKilobyte Drive Capacity32 Byte Directory EntriesChecked Directory EntriesRecords/ ExtentRecords/ BlockSectors/ TrackReserved Tracks is Temp R/O Disk: d:=R/OSet Indicator: d:filename.typ $R/O $R/W $SYS $DIRDisk Status : DSK: d:DSK:User Status : USR:Iobyte Assign: =Bad DelimiterInvalid AssignmentBad Delimiter: Bytes Remaining On R/, Space: Invalid File Indicator** Too Many Files **File Not Found Size Recs Bytes Ext Acc65536 set to R/O Invalid Disk AssignmentWrong CP/M Version (Requires 2.0)!9"2!T OË!]6:\:] Hr3 Ë:\ʀË͇ /ҋͺ *2!"q*"&L ͐ ͐ ͐!$p+q*#~*#N͐*##"#÷!&p+q͠*%DMͱ O O!(q*(&>!H% - *DM ͱͷDM  ͱ* N#F 9ͱ * ^#V))DM Tͱ* ~ *} *M!+s#r#4 !s+p+q!6!66:!ڄ !6!6>!r *&**&Y i !6!4+4A :} :!4- >!699 2¨ :!4: :2!6+6>! :O!9 DMi ͱ:!O!Y DMi :2:2͠!4 F :® )!6>!ګ ͠:O!9 DMi 8ͱ!6> !ڤ Å :2k ä  ͐:!O!Y DMi w !4C F :¿ >F : F :=229:Y= ;>9*&Y DM =2 I>!6:=28 :2:2 :!!29:Y T >:Y,e \>Ì !p+q*~:ʉ *N͐*#"o :͐!p+q!'"!6> **{2*́"PY! ">!+~H !6:0O͐à k͐L!*p+q*)O2'!,p+q*+O2'O2'O!.p+q*-LRRLR\LR" O!/q*/& L!1p+q*0#L~*##N!ͽ͞"T!Vq*VMͳ!Xp+q!W* >Wr#MͲ!_p+q!`6>!`6*`&*^*`&Y />!`4 >*]& ~ O!]49!a6:a*]& ~2bO>z*bM >!b/~,H~:H~*H~.H~>H~<H~=H*]& 6!]4T!]4!cq*a&Y :cw!a4!gr+s+p+q!h6>fr*d*f!is*d́"dPY! "f>!h#~Haͫo!h6:i0O͐!mr+s+p+q*lTZs#r*lڶ*l+s#r*jN#F+q#pÌ!nq!"o"q}2uo&"s* s:n*sDM2u:uqos*s"s*o͊O !v6>!vQ*v&w 6`i+46)A*:'ʓ:'O!) ~2vʍ:vO!w 6,]!v6>!v*v&w ~һ*vM !v4˜8AO͐:͐ͱ*##N!ͽ"* N#F*͠"͠Q" 8AO͐jͱͷDM͏ m  Z"l"!6>ʥ *}҆ *M ͱ*}x O͐} W͐ͱ !+s#r!+s#r#4D ͠:\ʹ :\=Oͳͩ !6!)6l :) :)=2) :] & !"}2\!h6?!j6?\:'C:'ƀo&")!)6!"):)/)HҘ]!)6> !)ڎ*)&*)*)&*) y!)6 Ä:) 2):)<2)M*)#")/:)ҩ*)+")`*")#"]!*)!/H!")!"]*)) *)s#r!)6> !).*)&*)*)&*) w:)<2)*)) >w#6*)) w#6*)!) w#6*)%) w#6*)) N#F*)) q#p*)%) *) ~e *) * ~o&͞ *)%) q#p!)6* >!)6!)6>!)=:)!)w=*)&*)~2):)*)& *):)2):):*)!) *)) s, >X\:)“>!d!")>!)d!")!")*++!)a*)) ^#V")]*)")*)) ^#V")]!)6> !)T*)&*)~2)*)&*)~2)O;*)) ^#V"  )*)) *)) N#Fq#p*)) *)s#r*)#")!)6 J:)!)J!)6 :)<2)*)")҈q:tw͠ͱ!"))ҍ*)) ^#V")]͠.*)DM\ -°!\6:\ͣ:ͱ*}DM'ͫ*)%) N#F'ͫ*)!) N#F'k͐ͫ*)) N#FͫR͐/͐ *) ~IO͐NW͐ͫ8AO͐:͐ *) ~2)t(͐:)҃)͐*)#")Ã& \!"))\Ұ*)")]͠*)M! ^#V *) >*) w *) >*) w *) >*) w *) >*) w.*)DM\ -+!\6uͱ:)O! DMͱ*)#")Ù*))))))"):m w>.Yn -:YS:Z Hҧ!6> 2)½>!)6> !)*)&*)>2) :) .͐*)M͐:)<2)99:Y=/9&ͩ c,Hͩ 9 EHͺ i`N#Fog_og_ogDM!>))덑o|gҘ =†DM!>))ҭ =¥~ ³^#V) ½^#V|g}o _{ozgi`N#Fogo&og_{_z#W!-#YRI<%þ"o#!x$$Ö# $# (C) 1978, 1982 MICRO FOCUS LTDAC BDO   YX =u24C7  (08@H-< i?SÃO$+q+p+qy͏ , $  ͌ 9!z6 # L!zw͌j# X:z 0 ͘=N#Fy}80*z{¯u2BppBB9B4h.,$ =T9!rͷ=\ = u2`u2=H 00P}QxQ!ͷ͓00 y͓Gþ!ͷ6 002͓+Q70uo0s9V  Go%%&,%%%EXI AAAA$.,u&/Q**(~#" <AOG COBOL N# 0202056 :10013000444454205645525320322E32243100027A :10014000C5C51130010E09CD0500C12107007E3D56 :1001500090571E00D521000278B1 yx # *DM*s#r*s#ryOxG*0MD!!N: E G>O: \ S *C  :q n& ^#V> O^ "*}:*)= ":O:o"*C  *C !ͮ ~2~2ͦ :2ͮ : O:w:w |g}o *#  w *) >*) w.*)DM\ -+!\6uͱ:)O! DMͱ*)#")Ù*))))))"):m w>.Yn -:YS:Z Hҧ!6> 2)½>!)6> !)*)&*)>2) :) .͐*)M͐:)<2)99:Y=/9&ͩ c,Hͩ 9 EHͺ i`N#Fog_og_ogDM!>))덑o|gҘ =†DM!>))ҭ =¥~ ³^#V) ½^#V|g}o _{ozgi`N#Fogo&og_{_z#Wz8INT N#NCOBOL.I00 ?ERROR 123 COBOL PC 4567 gg >>55555555555555555555555555555555555555555555555555555555555554& 95555555?Or555a55555555555555555(5(,5,555555555u2>99 ISR I00 00000iERROR ON OPENING FILE: ɣ͒qyO!b q!vz͒q.?*!9"8"͉COBOL I00.+,-,,--uo0s9V  Go%%&,%%%EXI AAAA$.,u&/LDMOV ADD ADC SUB SBB ANA XRA ORA CMP INR DCR MVI LXI STAXINX DAD LDAXDCX RST PSW POP PUSHNZZ NCC POPEP M B C D E H L M A B D H SP PSW ??= ÖäìEnQ_Ð"R*"!"!""2W2N2%2T!" "e""!1!++""P>28!"9:]   !w 1_ĤU># !L6-75A_!N#V- g  g Rů2[\ͤ>2N!""͖ Q¾:L͕ =" ͖ Q" ="=> 2 Q=&="&! BL<"e=L=W*e}o"gU_ *e"iͧ>::Mʓ^#V#ͧ;ڧ zç~E#;ڧ}“"e*iͯ*e}¸|¸*e; ZQ{z| }2FUQ2G"H"JDM1 !F6M ; "=M ͡ =M YP͡ !&~ʇ #^#:Fʀ *{€ z€ "#~62"Ç #w6 R 1**!W~4ʼ #~#F#¼ x¼ ~#s#r#w>Qʅ = =Uͧᯕo>gͧ 'd Un>#! ^#V#0}o|g- xD y0K GW yW W GD  z { < >'{>' *##V+^+N+y Uͧ ʮ ~+â _ Ê x. * w#͹ ͹  * ͹ ?r# :L== C"3"7   !># 1 UQ =xҏ|}ͤgA>͉Ag}͉ ÉŸ|}!w s#r :[_!~![4\ͤµ2[õ7U>?PP:=Tb_ OgFF 22 $6U:4*"u*u*'*(!*:_Ŀ3Ð{z##Ç2jÖѯ2jҼar4?O!{ ~#fo]T##~N#* 2…N#^#P* 2F#N#xH* 2F#N#xHV#^#zT* YUJweÊ }^Ð~#~Ïg#>pq2ÏÏ#+ÏÏ#+Ï„*O~v„*O~v„*v„*v„*v„*vÐ":<Ç-"=ʐ"ʐ=ʐÇ…'#Ѓ'#'#gʏ{OzÐ…'~#gШ*~ʧ&oڧ+)v&o)9‡믾#F#N#*HG* ~**#O ~#fo"#&o)Oy-Fn!Ow #w q!\ͷ  ͹ :5 @w#ͷ : G6# .̹  U ͹ I 6# W  6  w#j !ex#y#*}|̈́ ":N!̈́ Q1 !=:L  ! !|"!&~ #~#V z :w  :!&~% :w#r   !&~[ :LH 6[ U~E#^#Vn 6 Q!w ="!l~# ‚ :]?@ ͂>HXEw * \ͤ@ w# ͎ î : W2 _2 2 O { x! i`"@ 2 2 w# 2 ͎  ͪͪ GтWx!̈́ P :N̕>ULTw !\~# a 2|:] !6 ͂<COBOL COMIJ--, 6Pf LPTLST:LP:BB:CI:COCONPUN:TP:HPRDR:TR:HR CON: CON: <>.,;:=?*[]L? COBOL.INT = COBOL.COM OSNAMESIZE(18) VERSION(4.5) Uͧ:My^#Vͧ}~E .š:n >."¯  \w#àT=:Ms#r#\}w#:M\#\>>2TB!"P#}#N#! ** =![ ƒ„7…BK 7GO* 60 S~#*w !F#N* w9#wzO!~y>!~<*wÏͿ*k*s{zڟͷÏͷ*y:nG}|ʏp#ëDM*w*o~# yͿ*k*s{zg*q:vgg*y:n?gDM*w*o# x G|}x#6GO* GO* F#N* i`\MD\=}! =· !k!sÇGOHq#p#6#6 ##O*GN#H* DMq#p# DMq#pɷ)w#s#r# s#r>=>2p2oo*W!W"W*{z!fvvS GxƐ'@'w# &"`iOV#^F~#ng*y x> ~# V V!c*~#`iO > M+#}ww"n&+~AQ[`ah{h `-`0h:h_#5 ƀFyOwqpsr*"~n&+W~0ڤ:#Ó #~ +y<_àyWw{4sr~w`iB6*:: 2"(   >/`i0w",$~  +~w* H "$,"̓wOG@>O>а͙͑~̓wG̓x͙͑~Y͑w!5*+~"!5`iF#NV#^.2Ur#s`iF#NV#^!Q2r#s2y2͡2"x~# *!P2Z:͇*~@w#s#r#q#p:͇~ w**):w#:w::*DMUSAVE :l*"***'*|eo>x>*/*x:Q¶: #: *""~>*U\V#^#**++DMxyMD~+ z`i":""s#r:2!*"**'>*"**"+^+V*":2 Ow# {p!ZFҜ#G_x>=$!>3G>=w# ·6 #¿!*(~ # ![~@~>`i>=!$!Qd/2$2'!-"y2x2:!2(! 2#|+\!go: !2("!"Gw! w!x2ʉ!w#~!6 #6 #6 2#!!}lg"!}lg"!5 ~#!µ!6#!5 w#w!+6!5 ~##!!#"$^#V22<%~!+61!:$ɯ2!!DM! ;">N":!w! 6#Z"!6!b"! b"ʃ"#w"¨"#¨"#¨"#~:ʺ">ʹ"Ì""͸#͆""ͮ#6 6 :h#~: #G#~Fb"#~0b":b"#~:b"#'##~+:G'#~#Ab"Qb"~# ͸# ~.G# G#j"# /#b"͸#~.h##~ h#j" U#b"x:*"͸#ͮ#ͮ# ʒ#6.#ͮ#*ͮ#`iͮ#ͮ# w#î#>  »#*+:!!#y#>#>(#y#>#>)#O#yO: $Y 2$!$* y:!!N$N$O@$:*K$K$>L$:*2*%$:f$ 2X$r$!r$*!+" 211$ 21$ zڿ$${$Þ$1$>=!$6\+": % 2 %!%:#^#V*'8# ~ 8~ KxF#N#F#^#V:Z>=![~#j:ZUx!""!1F#~#+ʶ^#V#N#FyOxG w#w#w#w#ú*yxڶ"`i" z*V+^+"V+^"*}|ɯ2"ͻ|g"ͩͩ2ͻ"! *ͻ|()"ͻ"ͻ"Ͱ*"**"*""ͻ"! ͻ|2}2ͻ|2ͻ*Ͱ*"!":*:w|g}o}/o|/g g o!x!!!2"!|eo"!*(zD+͖>2>2 >­͖ >:0͖!|eo"&."!" :1>**" w#ˆ"]*!"":>=*|eo~# ¿E >=+:>=͇#^#V"^#V!*6*>=jc"ha"͖ !" [ !! ! !`iV#^>2*zŽ ʏ <Ž ![ w#{ *22_!_ ʣ !~#¥ ͊!#!>=>`iw>`i~>`ic."w>`ic."'x11À>=*"\ʀ=bk"60#60###~#2~#b%>2'2'2~#2~2!9" !&V#^#"V#^*" o Һ% 2}*̈́+%+)7))))+A,,%&+>=2%:t( +* ~:6&++~F6&͆">=+W~&z>&z>&>p(2=̈́+,&"&,&"&"&S(z=>p(S(z>p(S(:> p(2+":>p(#81:# g&>p(<2#!ʙ& #&y&:#=2#> p(!q&ͭ!>p("/ "1*"$ s#r:'='11> (:'2>͸0:&:'&|,,0S(1> ('1&!":n'G21C':(x/'x&21:=2C'O:g怱o"í'!~ʜ' 2 2#1_ 2á'#1*|&+"ͽ/*T] x+' ¼''>'xQ BT]+' '~#((Hy2:%(>2%%(^#V#~"2%(V#^#~2{ozg}o"0:!};(*:2"J(/S(>͸0:*w!wN1:%=+(:̈́1(:•(:((:0*:ʧ(#">͸0* *}G)r#>w#:w01(> (*!!#~(5*6(>  2=+́1>2:=.)+::)-͓)N1́1k)C)N1́1C)k)N1:! ʓ)! ғ)! ͓)=[)-:‡)+{ʊ)~ w)*͓)!Ó)"":"/Oz^#2æ)̈́1:=>=+,\-,-/N1̈́1-:=!*’+:*+ʡ*g+Oz2)g+* ) w#)+:T*:*g+O)͡*+~ Q* Q*+~ Q*6 "21g+.+~ ʂ*>=+6 *":2N16 +~ >=+6 N1,21g+.N1:O*  2  2#~O#"~g++ 6 +6 ***z*~#w# *"y2! ! F#N* !#~2qz"+6 #+)>~2 2 29O*!p#q> +:o11:'2'* 01@+42@+32@+22@+>=+`iO ~#fo,-)1g+.$-,ʒ+N1̈́1-x-s+s+.$-G:'+xs+,N1:+,-/F-,N1:' ,̀-s+ ,!-y+x-m+-/F-N1:(,\- ,:' ,̀-m+s+!-s+ , ̈́1:c,\-x-++-|,N1:'Q,̀-m+s+!-s+Q,2!"!"*#"/ړ,@̈́1:==,ʿ,̀-ʿ,s+!-,r-s+!-E1,ÿ,̀-s+s+!-s+x-+-,N1*":2'1* w#w#r#sG*|}:.-*:1-1!p#6# =1+-0::E1:'G2':01*!/~# x1:>=+—1x>=+:'ʮ1*##)}®1>2'* +:!$F#fh"/x1"1*g-|+!1* 2:22 2o1* 2*/x1y?2oxE?2J !)L2 D2>))]2#}o|gn2n2 =S2Ɂ0  COBOL.INT  00 / PICON: 00 p PCON: P   P  Po P 3 PCOBOL.COM P t  P -"2*"*"*:#-!"!".*} D-| D-ɯ! "!"!""/:=+}/o|/g*Ì-*##Ã-!g-Ï-.*^+V+~+-z«-x<:'³-*##.2-UlgW_ {{2|o{g"-z-)1><>=+**}(.|(.)1.:_:͸00:2021U.)1U.:.:0*#"2‰.ï.:0)1w.*"2:'Ľ/.*"2ͽ/.:_>͸00:".:¯.:0.*":͸00:_>͸0.X>͸0**#"z+.{+ʯ.0.-̓/G:=xG//|2͚/BK /-0̓/G/5/|20͚/|C/0(/|}_/$ a/+|H/g v/~/2&:& q/!*DM2&*W:_*o>20*#"2-*::/21/>ø0:/!1///=+N01X>͸00:>0""*0:'0:0*0(1I090*0>=+N01902:*}|g:(ܳ0}o:ʭ0<‚0:0}‚011̳0811ª01̳01}2>=+*p#=0=>2221-2"*##gzo{W>_&+Q2:  P   P 7  CCEPTED - VERSION(4.5)  = COBOL.COM OSNAMESIZE(18) VERSION(4.5)       \H\H       "H . H  <] zK  AAAA$., ** CIS COBOL V4.5 PAGE: 5VCIS HIGHH-I L-I LOW COBOL.MSG 00  = c c ŠE % ` 'd  o .D% m,rKjd 9]w  %b Nr^ F6C#.C#C#C#kCP#*CPo#C#CP#gCPI#&CP #ACP #CP #àCP #CP #ECP #CP #ǠCP #Ҁ©RIGHT (C) 1978,1982 MICRO FOCUS LTDрCҀOOc0 Ҁc1 Ҁ cgҀ ( s |( u ~l |l ~CyҀЀ`@yؠ w( yDyЀ@ [Z` ,pEFEO O` AҀAc1 @a@)ҀЀ * l sCl uЀGOo`N  */cZ CBh ` #@ @CaҀc Ҁ D$ ^ @@Ҁc @Ѐ"D P[Ca@@ҀЀ$.&Ѐ$Ѐ$C6Ѐ$cHҀ(@р*,@р*,[CaҀ,Ҁ*EC `H`HA.[0a2{0Ҁ204: 0123456789ABCDLPRSVXZ *+-,.;()"/= INPUT-OUTPUT,INSTALLATION,$   ......  :E. Qy'%03[}U:Km9I YaLRAeeP]F/j [~u?,&6>2;8;2EЀ:.<,>"@-B+B(D)DDҀ` ؠ`  Af A"FCXKҀFCgҀHCgҀJCЀL@JLJрNPR@c Ѐ:` TCҀTCĠ. ߀,MJрVXҀT 0. ߀,,@g@9E PCSЀ:CsЀ: Z\^`bd` AҀfCҀhЀj( s w  yE > >` A D`MЀGO >`M > >Ѐ"`  AhCeAgЀl A3ptc\dZЀjEc\ > >Ѐ [Z( s zl zc0 ҀhAA   @$\ZЀnCҀ,,ܖprCgҀrЀ:@g A B! A! C A# E A' I A/ Q A? a? A? Ҁf@. ߀,Ҁ,ؠ` AҀfؠ`  AҀf`" A?@9H `0 A@CҀT  AD'~ BCgC ҀDҀrCgҀrDgCDҀtE0T9Tc.~ҀTҀvЀ:Ec,~+0+9+E@'~ ACҀx-6Ax[6ax{6@9@ҀT@ҀzCgҀrDg Ag-rE!"rE"|ECIЀLEр~"  Eр~"rCgҀrҀCI "0r:ArFrEE0DD@@@8ҀPؠ,. (JiHL@gD` =MKNZNLgI(Iiأ A=ML0 0(KR8PL.L.P73389S899:T9: ,L,  K'L0.0L0 0L0ڀPC^Ҁg@KNuKL(3J3gHҀ(J-(3JЀ@4Ѐ.,4Ѐ f Ҁg4 A#0@ҀHJhJ@gd -3LD4  LD4-KL0 0L0 O,C5ҀL, P,M,@5CҀcaЀ@e`Bc`ҀlK(KIЀ#L#ԠOoOILOoЀOIOocNЀ cM O >OoЀ`MeZЀ`NdZ#BC cZdBЀؠA**OocBkK 8ؠ<cZ ; +c*o ;Ѐ`NрO >OIOoO >cM OIOo ;`M cMc_ĠO >Oo YZрOoO >H+%`Mc*oЀ(I KOoA**!oF*******'@@*рԀ oPD@ +ЀؠOoOIcel ! 21 4A**Oo#! 1#qF-------'c 1@@@-@Wc ĠA**Go^FLAG APPLIES TO WHOLE STATEMENT<W` 1 4! 2cb` 1qcb` 1qcb` 1qcb` 1qcb` 1qc0 Šp4dҀc0 Š4dҀc0 Š4dҀؠ34dҀc0 Št4dҀc0 Š4dҀc0 Š4dҀc0 Š74dҀ@S* FATAL I-O ERROR : OooIAE#OҀҀΠ©RIGHT (C) 1978,1982 MICRO FOCUS LTDC `gC `jSPACEPATCHSPACEPATCHSPACE OC@)CҀcRĠD CIS $cRĠDiCIS-$  A cu( { d0 d0p/IOI©RIGHT (C) 1978,1982 MICRO FOCUS LTD<\/Ѐ ®AЀHb@Ѐޣ@= AҀҀM00  RINSUFFICIENT REGIONOI`@`\`]`^` ` C^Ѐ@H@^Ѐޠ A3`iЀEрg ECЀ D` ,p`(-D3g`)-@gDgc Ag iEgCEEgCgEgED c]Ѐ hZ@ЀCe @eii   eiCi @qqiЀ  qYDqЀcNĠ@*OodNX"w!NcN XZҀX Z`  A Z@qeq pҀ A**Ҁ A p AKҀM elIc^Ҁ(IIЀK$o@0 tؠo% c*uҀc_ҀC^ZC2Ҁ YҀX+P#ҀC ^Ҁ(#X-XЀX! #YЀX! $YЀX! YXX X%Yc XdXc YdYl00XKIDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDLPCҀE@ҀЀchЀ@@5@i [Z`c@C@C@@C@Ҁ OҀE# r  r+ F/CwOIAuA**oOo` /I/IOoЀ cMŠO >OoЀ@`i33F**BUILTOI3.UҀEgؠECONSOL A@gH-g EC@`,ED AEE(F`i@+ A`iЀw@* AҀ@. AҀp A`@p A@gc Ag%9Ҁ ApCg)9 A3IBINTOI3IBLSTOI3IBSDBOI3IBSCPOI73I@PH #ؠ` ` ЀCҀCҀA**OI` p`@p33ApDUDc0 Ҁ`0 ` `aca@eDUDc0 Ҁ`0 ` 33cZ`]`^`_``à`  A3 A3 A`e Z[DUDc0 ҀcgҀǠ`c0 Ҁ`c0 ҀՠJ**COMPILINGOIc@pEUELCONSOLE INPUT.U Ft A` 333t A3+ Fchc0 `hch` 3/ҀO` Ҁ! 21 4T** OPTIONS SELECTED :Oo +` #qOIu +` ŠIu +` ŠIu + X1 4! 2@@ȭCH@E\C^  @@` @icg ` @)caAؠ` 4dJOPEN FAIL :+I@рHbЀ@& AҀGCOPYLIST AҁCFLAG AҁDRESEQ AҁFERRLIST AҁBINT AҁCECHO Aҁ CLIST Aҁ CFORM AҁBREF AҁCDATE Aҁ@; AҀ@. AN@* AҁDQUIET AҁBREV AҁFINTLIST AҁCCOMP AҁFVERSION AҁIOSNAMESIZE Aҁ HPAGETHROW Aҁ"HERRORFILE Aҁ$GRESTRICT Aҁ&IDERESTRICT Aҁ(ECOMMIT Aҁ*GROLLBACK Aҁ,CANIM Aҁ.CSORT Aҁ4HFILESHARE Aҁ2ҁ4Ё6Ѐܣ` ĠOO] %\ҁ8ciҁ4 %]ҁ8`bC ҁ8Ё:BLOW A`bҁciҁ4K ҁ4 (Dҁ8C ҁ4Ё>ciҁ4 (ҁ8Ё:ciҁ4 A+ Fҁ8C ``ҁ8Ё>K ҁ4 (C (Bҁ8 %_ҁ8Ё:` ,C-g@-gH-gD     A`fҁ8ciҁ4]@ ҁ@@ ҁ@@ ҁ@@ Ё:cjҁ4NLINE-SEQUENTIAL A & ҁ8ISEQUENTIAL A & ҁ8FINDEXED A & ҁ8GRELATIVE A & !ҁ8ҁ4g`mҁ8`kҁ8vҁ8@@cЁ6]Aؠ@ OA@CcĠJ*ACCEPTED -OIJ*REJECTED -OI@ ЁB PbIPCPDDbb@ЀkNO A@ bDЀ@ ؠ`  A@gсDFЁH GFCbbCҁJaJzJE ЁLЁH F(F)FF[сNP(R TЁH@7)P TЁH@cE@g'~ A ACPD P@Dg Ag@aCOPY,ALL,LOW-VALUE,LOW-VALUES.SPACE,SPACES.QUOTE,QUOTES.ZERO,ZEROES.ZEROS.HIGH-VALUE,HIGH-VALUES.$a _ЁV@ %RELEASE,RETURN,SORT,SORT-MERGE.MERGE,$a _ЁV@ PCOMMIT,ROLLBACK,$a _ЁV@^MOVE,SET,ADD,SUBTRACT,MULTIPLY,DIVIDE,IF,GO,PERFORM,ALNPUT,WORKING-STORAGE,UNTIL,RERUN,$a _ЁV[WORDS,RIGHT,SAME,SEGMENT,SEPARATE,AUTHOR,BEFORE,SIZE,PROGRAM,COLLATING,SEQUENCE,STANDARD-1,$a _ЁVKNATIVE,EXCESS-3,OVERFLOW,EXTEND,STANDARD,FILLER,GIVING,MEMORY,TABLE,OUTPUT,$a _ЁV@YTALLYING,SELECT,THAN,SWITCH,TIMES,DYNAMIC,INDEXED,INVALID,WHEN,TYPE,UNIT,ROUNDED,SECTION,$a _ЁV[DIVISION,UP,SECURITY,SENTENCE,VALUES,CRT-UNDER,DEBUGGING,OBJECT-COMPUTER,PROCEDURE,VARYING,$a _ЁVBREMAINDER,SD,SPECIAL-NAMES,AT,WITH,ASCENDING,DESCENDING,LINE,INTO,$a _ЁV@ߧF,PROGRAM-ID,SEQUENTIAL,ENVIRONMENT,IDENTIFICATION,SYSIN,SEGMENT-LIMIT,$a _ЁV@槠,,CONFIGURATION,,,,DATE-WRITTEN,FILE-CONTROL,$a _ЁVZINPUT-OUTPUT,INSTALLATION,$a _ЁV@сXZ@K@g`  AD _b.\,^$Z.`KDg Ag%DCg%dAg@JLJd@5  <%خ)x@. M[ E/ # Y>/KM12Il gUf"  { GHQD |  `  s X ; O " . e i  P q #'   ~W^@i7rTN3.#"!]Dj_h~uo0s9V  Go%%&,%%%EXI AAAA$.,u&/҂|  @ЁRT Ё@iڂтC+҂ݗz҂ݡz҂D҂|݈ @i@C ЂC* ЁRЁCgт*т*C8 C8C8 @тC+.C.@@Ђ.@7ЂтhЂj  RH@` @7 ҂ЂЂ S /$/$DC8/$Cтт8 ҂. 6CMM 0D҂ЂKFЂ/$F.ЂтhЂj R RЂ/$El`ЂX+%`@7/$h`'% /тh =ЂCi҂K9҂C҂҂=  @kЁj =   XЂK9@ XK9҂HP0 'C?E@C@E @D@ЁRЂ>Cd  ЁтhЂjCЂ@ЂK XK9 C8DC*C9C8DЁPCD ЁЂjCЁЂЂݿ@K @iHdR64$ANIM V45bRUNCV4 HEX RUNCV4 HEX_kRUNCV4 COMpCONFIG INTa !"#$%COBOL INTD&'()*COBOL I00-+,-RUNCPX SYM}+=>?RUNCP2 SYMs(@ABCOBOL I017./01COBOL I02g2345678COBOL I0379:;<COBOL I04CDRUNA COMWXYZ[\]^RUNA COM_`abcdefRUNA COMgVRUNCV5 COMhijmnopqRUNCV5 COMrCOBOL ISRECONFIG COMQRSTUxyzCONFIG COM{|}~CONFIG COM STOCK1 INT kSTOCK IDXlFILEMARKCOM COBOL MSG0FGHCOBOL I04COBOL ISRCOBOL MSG0STOCK IT sPIP COM:tuvwCONFIG INTCRUNCV4 SYM   hӠA<-UУ@Y O@A=-U@ң@N Oҁ AV+UCҁ @ DD  ҁ Z TؠA>-UУ@N Oҁ"@AU@@h;:ҁ BZX-UУ@N Oҁ AYWU@ УO CO C0ҁ$@\UؠO+D;== > ;@UCO.T ;/^ B256 ؠD^_ Q-UУ@N Oҁ&@BR -UУ@N Oҁ&ASDU@@4 @hijkATDU@@2 hiؠAU-UУ@Y O@@Bb)-UУ@Y OĠA/AU@@ ZؠC -UУ@N Oҁ(@@A15! A ,UhKҁ*cҁ*C -UУ@N Oҁ*B-UУ@Y O`ҁ,AG-UУ@Y O`ҁ,`A-UУ@Y Oҁ,A0-UУ@Y O@U    GFGL00C9DC9Dؠ! ! @U 5 5 x ) 5 5yy 5 5'YOUR RUN TIME SYSTEM HAS BEEN CONFIGURED/ ҁ.AWUРOB257 jB256 ؠ@UЮخ k0f7H0;A:COBOLMSGA:COBOLMSG:F1:COBOLMSG:F1:COBOL.MSG @:F1:COBOLMSG ):BO!yoxg*:BO}!N#F "*#*s#r^ ~!J! J*:o$*C~i6iw*X:F0:X 6~d7N OY~o~L |oH p~~ H@N O}D~ }+UloIW~oY~ohؠ.DO YOU W~ TO S~5~W~U~W~AY HOMING?6W~~~W~ DEFAULT - HOME ONLY AFTER ACCEPT FROM CRT)N9@-UУ@N Oҁ@ 1DO YOU WISH THE CURSOR 'HOMED' AFTER EACH DISPLAY?N9@-UУ@Y OĠ@ 0DO YOU WISH THE CURSOR 'HOMED' AFTER EACH ACCEPT?N9@-UУ@N Oҁ@ Ġ@ ҁ@ ؠA9-UУ@N Oҁ A:AU@@h@@A;-UУ@N Oҁ AV+Uk #LYer)6BNZ'3@MZgs*S`mz ".:FR_#/<IVcp}}N k ;  & TA)U^w:WRU COAAAA$., :40Ȅ)ʰ f ,f-ʋ+ȄDʳ ʺ080_z!~wfz2fz2&===>>EINT-TEM AAAA$.,uAc COPALLOW-VALULOW-VALUE SPACZ SPACE QUOT QUOTEY ZER ZEROE ZEROHIGH-VALU%HIGH-VALUE RELEAS v RETUR SOR SORT-MERG MERG COMMI ROLLBAC' MOVSEAD SUBTRAC MULTIPL DIVIDNIG PERFOR0 ALTE = EXI STO CAL CANCE ENTE INSPEC* OPE CLOS! REA" WRIT# REWRIT$ DELET%   STAR&US'EN( ACCEP* DISPLA+ NEX,B ELS-I6 NUMERI7ALPHABETI8 LES9 EQUA: GREATE;NO? COMP-F<COMPUTATIONAL-FC COMG<COMPUTATIONAGq INDEI USAGJREDEFINEK PICTURLPIL SIGM LEADINN TRAILINOSYNCHRONIZEP SYNPJUSTIFIEQ JUSQ BLANR OCCURS VALUT DATU CODE-SEV BLOCW LABEX RECORY RELATIVZ STATU[ FIL\ ACCES]ORGANIZATIO^r ASSIG_ CURRENC`DECIMAL-POINa CURSOb KEPcEXCLUSIVeAUTOMATIf MANUAgADVANCINhANi ARjR AREkCHARACTEmCHARACTERnCLOCK-UNITo COBOp CONTAINqDATE-COMPILErDECLARATIVEs DOWt% ERROu EVERvNEXCEPTIOw FIRSxFOyfI-O-CONTROz t INITIA{ SYSOU|h LEF} LIMI~ LIMITOƀBفFĂ LINEӃ U LINKAGń LOC˅Tφ MODULEӇzCRԈ CONSOLʼnI-ϊKEً NEGATIVŌOFƍRUΎTADEPENDINǐ3OΑ USINFILE-CONTROINPUT-OUTPUINSTALLATIOr{!XV8lyr2Y2UV2mV!]V6!kV6 #6 2X>2VV2X<2nV2!TĮ RERUΩ WORDӪ RIGHԫ SAMŬ SEGMENԭ~ SEPARATŮ AUTHOү BEFORŰ SIZű PROGRAͲCOLLATINdz SEQUENCŴSTANDARD- NATIVŶ EXCESS- OVERFLO׸ EXTENĹ STANDARĺ FILLEһ GIVINǼ MEMORٽ TABL OUTPUԿ TALLYIN SELEC THA F SWITC TIME DYNAMI INDEXE INVALI WHE TYP UNI ROUNDE SECTIO DIVISIOU SECURIT d SENTENC VALUECRT-UNDE DEBUGGINOBJECT-COMPUTEPROCEDUR VARYINREMAINDESSPECIAL-NAMEA WITASCENDINDESCENDIN LIN INTPROGRAM-ISEQUENTIAENVIRONMENIDENTIFICATIO SYSISEGMENT-LIMICONFIGURATIODATE-WRITTEǒ OMITTEēOҔ POSITIVŕPROCEDUREӖ FRO͗ MODŘ PROCEEę RANDO͚ Rě PAGŜ RECORDӝ 4 REE̞ THEΟ THRՠ THROUGȠ3 UPOΡSOURCE-COMPUTEҢ AFTEң REPLACINǤ COMM INPUԦWORKING-STORAGŧ UNTĮ RERUΩ WORDӪ RIGHԫ SAMŬ SEGMENԭ~ SEPARATŮ AUTHOү BEFORŰ SIZű PROGRAͲCOLLATINdz SEQUENCŴSTANDARD- NATIVŶ EXCESS- OVERFLO׸ EXTENĹ STANDARĺ FILLEһ GIVINǼ MEMORٽ TABL OUTPUԿ TALLYIN SELEC THA F SWITC TIME DYNAMI INDEXE INVALI WHE TYP UNI ROUNDE SECTIO DIVISIOU SECURIT d SENTENC VALUECRT-UNDE DEBUGGINOBJECT-COMPUTEPROCEDUR VARYINREMAINDESSPECIAL-NAMEA WITASCENDINDESCENDIN LIN INTPROGRAM-ISEQUENTIAENVIRONMENIDENTIFICATIO SYSISEGMENT-LIMICONFIGURATIODATE-WRITTE   ҀΠ©RIGHT (C) 1978,1982 MICRO FOCUS LTD"|KfҀrCa" TCHSPACEPATCHSPACEPATCHSPACg OCҀC^Ҁ@@<@^`UM  FH+aLF``'FDҀ@@<C bc Ҁ.܂ܧ܄ՀL E<.5E 5JE J bc@р K Ѐ KM Ѐ`  |BB , @4@25@ < L@@Kсgҁ$AfDdAg@JLJd@5 X  <*` A @85 XLX L܂؁Ҁ@@ bcC C8 ` C:?C:#` 0XX9:DC@ҁck 1@K9 @ .0L0 l@.T ES   C $@q}@ЁCCn@q}@ЁC@Ё@n}$CYC@j} CC @$݀  CYC6CCj $C C8 C9 C>>>>>>BDFHJJLNPRT@<. CҁVX\X@ЁXCIҁZCIҁZс\^ҀC@P K@P с\^CҀKM CMҀK CҀ M` 1 C 1C Ec0P1сb,@сbL.`.30= We cMŠO >Oo OOoO >@@ؠ'H#ҁd@#@cMC@ cEE$c@E$cE`'Hڀf@ڀh@ڀjX-#-KMC K $#--Cllڀllڀn-l-#ss-s,#s+s# ڀpX Z h Ёrڀte MH+s!ҁtc +!s(!sMHnC c @` (3(s!CҁvCٴҁv ٴdCҁxCݵҁx ݵd@Kҁz LH'H   DXdFCҁ|с~(3D5ҁCIҁCKM  ҁ` H X H (3tyCCg1CFK H@^  C8ҁC8  9: C: Ё  MeL@ < 5 C8=0 Wd@@@XFH` с @ XXXT  c ҁ"(s LX(s LXIDEBUG-ITEM A@ g@H5 HU *(s IDEBUG-LINE A@%1LX8@ 1LX(s IDEBUG-NAME A@ g@=1LX8@21LX(s MDEBUG-CONTENTS A@g@=1LX(s"Cҁ$Ҁ@@ bc(PlPHpyCCg1CҀ` @ ^@H\@@@FHс&@K\\X7(s$ 6 Cҁ(Ҁ@#@ bcHpyCCg1Cҁ*` @@^@@@@FHс&@XZ Ҁ(s&Cՠҁ,@w@ bc@@)C CM  Hؠ`!` #.ܻ0Ł2 ` A@ҁ4C C ` A@0^@H ҁ6gC8ҁ6C8 C8ҁ6C8  ҁ69:8: < Ё ЁC: C:  @P+>D@EC H@5ҁH d@H5C ` Cҁ+PsҁX- <ҁKX X d 0C(3Cҁ D 5dKҁCI@P CDD  .D5dCҁC 6 CҁсCҁ5CҁCFҁCGҁCI ҁЁ 4 AҁЁ Aؠ A iЁrҁC ضDdҁCҁC+ҁ5CҁCFЁCGЁCIH` 4ЁҁLc 4 ] oCҁPPD05(s#LH'HcN X+s# Ci   A L K d c 1.;C8.Ԡ;.!C CFCGC+CI!C CNCO @CND@CD Cm!C C}!@}!C @}!C @} c0 A !CI CI K  C K c+ A c- A @}CƠ!CC !C  _ f `(I aM"   A/ C     ؠ A gi!C @E !cIiEҁ6 !c@HREC`C{E E (@B@0@ /@,@.@+@-@C@ D@#}ҁ@Z@ *@9@A@X@S@ V@ P  E  E RKR MRȬ@KR!!@TXXXXXX00XXXXXXXXX0X0X 8ҁ@TXXXXXX00XXXXXXXXX0X0X 8ҁ@TXXXXXX00XXXXXXXXX0X0X 8ҁEE c.~ҁ@@TXXXXXX00XXXXXXXX00X0X 8ҁEE c.~"@@@TXXXX0X00XX0X0X0X00000 8ҁCҁ Cҁc 2ҁc ,ҁ@T000000000000000000000 8ҁ@@TXXXXX000XXX00XXX00XXX 8ҁECCR CDB C HR@TXXXXX000XXX00XXX00XXX 8ҁCҁ@@ T00000X000000000000000 8ҁC Cҁ@ TXXXX0X00XX00000000000 8ҁ@ TXXXXXX00XXX0000000X0X 8ҁ` (` )Cҁ@ TXXXX0000X00X000000000 8ҁ@ TXXXXX000X00XX00000X0X 8ҁ` +Cҁ@TXXXX0X0000000X0000000 8ҁ@TXXXXXX0000000XX000X0Xg ADL )@ggЁ)jCCMCgEKҁC AMCE)CCЁ)c0 A c 4ҁC@C ⋁C-d@ҁc0A Ec0A D@ f @c0 A @+i)خ)x@. M[ E/ # Y>/KM12Il gUf"  { GHQD |  `  s X ; O " . e i  P q #' ~W^@"e1h!r<J]T7b w8-wP&H=hs\}!c + N f !7uF5aganbj'({fD(*oShx0!!"="w"""##R#$$?%?%i%%%'&0#*$#$$y$%& &&(-''m*K*X)v*8)*%VAL-TIDY-EXI 000000000000000000000000000000AAAA$.,u*r7 8ҁCS@TXXXXXX00XX0X0X0XXXX0X 8ҁCX@@TXXX000000000000XX0000 8ҁ@T000000000000000000000 8ҁ@@TXXXX0X00XX0X0X0X0X0X0 8ҁSƣ` ,ҁ@TXXXX0X00XX0X0X0X0X0X0 8ҁ@@T00000X00X00000000XX0X 8ҁ@c08c# D&4`#C RCҁ M (( ҁ@ M ( R K ҁ (M ! RMRH  (M C ģ`. #! DMRR &K !Mã`. #ҁCҁc 3ҁ@5 c 4CL` 4ҁҁ@`! 6c 6DCE DC@Ec 4DC,CEC CED5D@CFD5D D ҁ@5K CD5CD5KL  <ҁ@ 5Ec 3C c 3DD5CD5D@CD@ ݱ u @Ё@C` `c @i@ЁB ) * *$*ЁDC9K9 @@K9@ЁFC9ЁHЁJЁL@@ @@ @@ @@ ˁN oCDD o` rC9r c 1d <ЁP@ЁHFpy` rC9K9rc 1d FpC@ЁRЁT0@VC9ҁVD&@ЁRCueo@ЁR@ЁH-D`U(`U@ CDCEсЁЁ^Ё@c>ҁ?ҁD7 E6  c?Dh>@9` A@g@@ҁc>c. @@c>c?DҁED@ҁ@}ҁED1@@ЁЁ^Ёc'ҁc>ҁЁ@Ё OI + , ,$, I  +$,om *Ё ) * *%* )OI)OI)]Ёc>ҁCҁk@`Ёjҁ@CD@Ёiq + ,I,Do  ii@1ЁRсȁI, , +$,H1 Ёсȁqiҁ@Cc.Ё`.ҁ@Ё )@ЁrЁL) )@Ёr@ЁDo@ЁrЁL@ЁRҁЁ@ЁЁr( h3=8с`b(1m .)Rh3=8с`bc.(1C(1+11C1oݟC1CcUҁ @@ЁR`U ^ L^Ё@ЁR@ЁR Ё Z@ЁRЁ^cH^ 6U@38 ܼ݆ @q-ݗ 0@ЁRܼ@c. -݁ 0@ЁRܼ@n-0߁X݁ ݼ @ЁRܼZ@nFp 0Ё\k>@@@Ё^с`bЁdi݆ @Ёf Ck> 3C Cc&c>h>с`b )3Ёh@ '&c=c'@ kC@`Ёj('CЁlЁnc'$(&H+%$>&c>$?&D $  ڰp޳pCDCc>C@ Ёrk>ҁtk>ҁt݂vC@ЁrЁxC@Ё@` )Ёz )@o ) )EЁ| )$*ЁJ Cс`bCCҁ~ .с+ 1LH )ЁhЁ@Ёrm ,Ё|+ 1+ 1ҁ-1 ҁoiH` Ё3ЁhЁЁr- 1-13,15oiЁh3ЁhC9K9 Ё o@o@ o>oЁH@ЁR΁t݆iЁd@@:> ЁzomoSoSDЁ|Co@ҁ@݁ Ёd@@:> ЁzoS ًoS`Co@@ЁRE@C ЁRC Ёҁ @!5 ^ eAgDg`AggCd@` A ЁLd40cH C6U C@L@ ЁC@ 3C Ёc ҁсށC k ҁKC ҁCҁc ЁC ҁc ( '( 'ЁC KH㠀.;8 ЁҁC: 3C  Kҁ 0ҁ3eЁCC:@"5Ё  ҁM0Z WM0 C ҁc Ёсށ. ;.;C8~H @}3Kc (  ҀC2C2 Ҁ @ ;.ҁ,MЁ+3J03('J=0ҁL.d.K  W)EC#c #{ ?#Dk ЁЁC K( 'Ё` c Ё` ( LK ЁсȁH Ё Ё@ЁRs pt@K @` c ЁHc    ` Z c @L @  ( L `  E ЁC6UC@JLJсށk ҁЁЁ@ЁRTS݆ ݙ݆ Sk ҂   Ёd( +( Ё(+ ЁЁz1cHCЀ c Ђ@ЁRCS@.@C ЁTMZC8ЁZ WLZ @@Ё@@ܐSM0D!d Ёd@}@@ЁHЁJЂ H Ёсȁ Ёz`  c ЁЁ( 'ЁЁ@ЁRSݠ d SܨcH҂CЂЂ Ёd-< @ЁR Ёz҂ЁdZ\@DoE@Ёz@ЁR\ Ёc c ЁdC҂@ЁRZ L Ё@ЁR @Ё( 'ЁЁzC ` A @!5Ё@ЁH@ЁfC#҂1 =Sc>@@ЁRiqݒЂDЂ # qݑ"ݸ ݸ11@ЁH@ЁJc>#4@C#@ЁRC.tݎ$@ЁR &@@g@9C9@@ЁRт(*(T!L(V#ЁhHTЁh@cЁRЁR Ё@ICڠ( @1(,$`cj҂.C۠҂0Cc҂2C҂2 Cc҂2C҂.0L00 'C @Ё@` C҂4C@ c ` ` C ҂6C? c ` ` c(&%:@ЁH%%c?c?&@Y}c>%:@ЁR@ЁR` %%c?c>L03 3 @݋\@=^:`@>^;b@? <^9 @҂d@}҂fC8C 8тhЂj    YЁRc?&%:cj H Ёcj H ЁK C ݣl@}Cwu  @}nC8%3 WCCCC1 ؠ @ i % % @ g L? Ё gi A eg  @i @ЁRЁ ( '+Sc + @i( 'Ё( +`` c ҁk ҁC8C:҂ph ҁc L03(' M0` ( @y} c ҂r#(u l 㠠 @ ik ` @}܂tc ` ( C6U C8    @#5 ` ,G\` #\,( *C,}Ё,}ЁCЀ6U@ @@ЁRV Ё@ЁH@Ёfc>c?с`b )(1!L(V#Ёh3Ёh@ڂvܗxcS҂z@2ǂ,$`@}0L03K K  $`c ҂8 ЁЁ@ЁR ЁC:C:?C:#  C8Ђ:03 Ёc %` Ђ<ЁHeAgDg`Agg3 0%("KL0@Ђ>ؠ)C"߂@ݗ@C"Ёd@ЁHC"&#Ёfc. c>с`b )3ЁhC"&# ЁzЁd@ЂB Ёz@ЂBL c@ЁRCЂDЂFЂFЂD- DiH Ё L+ Ё@H ܦHD ܿHD ܊HD ܹHC C1%DCC:1K C: Ё%c c?C ' C8')( ''AH %Ё%c?҂JCCʠ҂L܅NۂL݅ C8C:1( ''@ЁH%%c?҂Pc>` C,c>C,Ђ<` c?c &&@Y}`-&3&$%9 c %:c c %:c c %:$yc??1@%`-&3&c(%:c(c'&%:&%:@ܰRDݣ@h}@Ё@  TV@ ܜX@ ݏ ҂ZC9(܃( ( @%`-&3&c(c(C܈| @ (TL(VK DЂ~ЂЁ^c>c?Ёc>c.@@@Ёrс`bk1h1Ёh-1,1cH -i@ڂvܡcS҂z҂C҂܈|D҂|  @ЁRT Ё@iڂтC+҂ݗz҂ݡz҂D҂|݈ @i@C ЂC* ЁRЁCgт*т*C8 C8C8 @тC+.C.@@Ђ.@7ЂтhЂj  RH@` @7 ҂ЂЂ S /$/$DC8/$Cтт8 ҂. 6CMM 0D҂ЂKFЂ/$F.ЂтhЂj R RЂ/$El`ЂX+%`@7/$h`'% /тh =ЂCi҂K9҂C҂҂=  @kЁj =   XЂK9@ XK9҂HP0 'C?E@C@E @D@ЁRЂ>Cd  ЁтhЂjCЂ@ЂK XK9 C8DC*C9C8DЁPCD ЁЂjCЁЂЂݿ@K @iH    @i R@ЂCg ЁPт*҂ ЂтhKX @9@0 ЁRH Ё@@ЁHЁJЂc.тhfRKR@ ЁR@ЁR@@ Ё@ ЁRC҂ܣݰEE@{}1 Ё1 ЁЁ\тh@ЁroiЂjЁH Ё@ЁRHÑ ЁR M Ё@ЁRH ЁH Ё@ЁR@1H Ё @@Ёdi@Ёr@1H Ё y @n@N@ 1H Ё1H Ё@HH12@ݤn@N@x@ 1H ЁC҂1H ݁ 1H Ё@HH12 LG$INSPECT @ iC@1H Ё ЁzKZ@ CaCc>c>t@L03K M0+ ( *cH'*zcgҀQc`cdE c``% % Ёh EB300 @iz Ёck 1@%M03 (>>3&3&@1%Qck 1@ЁH%%3@Y}@"&3&$y($y @ЁRH ЁЁR3.L03 3@ikDi@}@C@݂@} DтhЂj ЁE3Ё0=0F@D6Lco9MLF667j=FEC69}LFC9nc=҃c =҃҃ E3Ё0F667j @҂ 0 0"#k>E3Ё҂(1 CCg H C҃gD C ҃E D C҃C-d@AgEg< B=M=M Ag C ҃ @   ҃ЁC g҂gD?҃@gC9@@` /ЁR҂*f L ('/Ё A gi *%)* ,Ђؠ7.=8 .Ci 3Ђ>K i 0:! Di:H ' Di: !!CE Ёn'  'Di i:;ioDk k + , , +$,Diio XHFH CL0L0у S  . 6M 03 F҃L 0҃L 03 FR 3 FC8R <^C 8R <^3 3<^@ EC@E@@@C E @C E @@C@ E@ RC E C҃ E( ( D SC҃"C RC on ]nDSn҃$C҃$R ЁC9@ & C DDЁRЁR45H ЁC Ђ@ikDiܦݒ C: 3D5C ЁdHЁh( 3HЁh ЁzC1C Ђܿݼ @ЁR34"@ЁR4" HЁhC1( ( 3HЁhck C?@1@4ck ?@4 C-H HC  HC Ђ Ђa#F F FMFEЂC8K9E3Ђ ЂK9҂3K  .Ђ 6.M. .F Ђ@@-C ݣЂC-M L Ђ6F0@3ЂvЂuv !- ڋ!-d-c!-d!-e-d!- -c-7u7 - -7@  -  C$m7omEmuЁ ]  + -c-$- -787C@u KN ^N3u 208G' ^Du8GDu ]@u8GЂ@i@o@ЁЂ~@i@o@ЁJؠ)`)h3 ..78= )is@u@vт8ЁJт8@8( S E3C RDS@RR L CE CE@A1HPC8@3E3 T&(*<=CҁHX''C E D X  C ҃,C ҃,C҃,  XLX҃.@C ҃0E 0L0E3=X  C ҃2M0D3 @ C L  RCRE R@AX>d;3M0<=CCC9CC8C8k3ҁbc.(13l3ҁb7.=m>X(%/CD ('3( 1>d('5 )>?/3; `*`>c>?0k>`>c.`.`>@g )@@;; ًoc.do Z @ 5?@$5?.0 60M0K'IR 6. .?@8C@JLJd EEomoqmqsmsmmm#)$ )#+$ +#-$ -@@'immii   i@'ii:im@@@m@ )@io @iio MJKLJg A= @JKLJg=  A.;7A;.A7(m     MR(m "|KfҀrkخ)x@. M[ E/ # Y>/KM12Il gUf"  { GHQD |  `  s X ; O " . e i  P q #' ~W^@?7+iy4Y46P6n*L*c_4N{p!x"G #$ #?##2%'''())K){*z *,-PL~@I8@ ;9?p?;8?M>?/@8; ;;S;w?b@@|=s>X; ;"i"">"##l##>>#$$-9:%Q%9$$%%5%8(;&&&&'5'''(=()(()*<*)))*=m>d+*+,},G.5-:.y.r8?c-.."..H1R1.[.m:..::./S?A#/`/T00o0p0///;A*?00_01+1K1v222223T33&===>>EINT-TEM AAAA$.,uAcgҀΠ©RIGHT (C) 1978,1982 MICRO FOCUS LTDcoPeoPDK  'ACEPATCHSPACE OCҀCҀ@CaҀC^ҀҀ@E(  'ҀC^ @^`ڠ`ˠ`HZ@@HȠ`1 #HHH@ Ѐр( 'Ѐ @)(CXz ~X DЀY |('-' X XLX@ss X X 6 (ssЀ |@*B;HK;ЀB; ;$Ѐ ;&Ѐ@*(uq*c 0.@7@+Ѐ89:D   Ё .0 60M03(' l& L03(' M0H  W3K (' Ё ҁсK KX ('ҁ сK L %(s ( l (' ЁҁсK KX Ё( (' Ё @ i ЁЁ .0 60M03 3K ҁ .@7ЀсЁ hC `# h l `" HTЁ"EVЁ" ҁ$` ` @iCҁ&#@,Cҁ& .$ .& .MB; ;Ѐ ; Lc2 `3C8Ё(d  @-C. sH@Ѐ^ ЀL^ c ҁ*LSTART PROGRAM @ i(u Ё,KFALL THROUGH @ i(u Ё,KPERFORM LOOP @ i(u Ё,LUSE PROCEDURE @ i(u Ё,` @i(u Ё,@Ѐ py(u I ` ĠECONSOLBTM1 tI BTM2 I @)@?i@Ё.hؠ  @=Ѐ( 'Ѐ @JLJg/ AL" _ `fgC fH X ( a- LX@5 ;.@7ЀсЁ (' @iZX Ѐ |BB , @4@25@ < VV;B]V-]B@2A+u Ё0 C^C@'c @Ѐ( 'Ѐҁ2K@Ѐ@Ѐ ЀЁ4@Ѐ ^! 2@^Cc Ё6Ё8! 2^^` Ҁ@@Ё:Ё@.C2 E1c#2 `#2+u ҁ@@Ѐ Ѐ Kҁ6@Ё:Ё<I A `D I A `ЁBЁD`HJ@(Ji N(iJLJKJ^ҀZ@ЁFH@Ё:ZlqЁ<^K Z ЁHgL03eЁJCC:@&5ЁL  I A ЁN`I    I A ca`ЁB$d) ( ` MJ f LJ  ͠ A= @J fLJ = Ϡ AЁHw   @Ѐ Ѐ (u Z [ ] _ ` ^ cZsOIOI` ' `Z`[`]`_```^sc ` $kIC6UЁPI0K1 I ( s Z [ ] _ ` ^OIOIcZc0 s@ ${LJgL03eЁJCC:@&5ЁL  @)c `  pA[ ЁP T CxҁR`|@x(u h ` $xDxcgIeсTVDCҁXC@ ҁVCE  сZ\DCҁ^CE@ ҁ\Cҁ`CE  \@EE@C@CEEtOItOIC@CE@   gK@Ёb ADg C   gK@`  AЁd A @сD!Jc0 ҁ+L!dcgҁHJKJҁ(JiKNҁ N N*ҁ@!(iJLJ!I A BDDC I A (9 ( s ( u *   AOoGREVISION( cRЁ +2** COMPILER COPYRIGHT (C) 1978,1982 MICRO FOCUS LTDOo +6** ERRORS= DATA= CODE= DICT= : /Oo(kI K$ycb( I K$D OFF$(qI*W,I K$(I K$(3I-7I(I1 K$ ƠDNONE $(/I-3I,I1 K$(1I K$IGSA FLAGS=)`N/`eW`NcZsؠKURN / / ! c!( eI #L#! g!Ci 3ЁK i 0$! Di$H ' Di$@a@Ca zcHCaЁH'  'Di i$$ioDk k + , , +$,Diio XHFH CL0L0с S Dg.. L ` OI@gЁfL Dg' IPgڀ]eIPg@f AIЀ HeAgЁh LHCЁh@ H ЀC.HЀ@ . H@(uCHK Ѐ |*.@7сjlC8ҁlnC@C8#C:C:Ёp##ЁrC:M03C ЀC I A ^`D I A `Ёt`Ёvсxz]jC ҁzgMJC 3C  jE1`#2@2Ccҁ|E1c#2DI A BISR I A ca`ЁB ЀC ҁ~ ЀЀ K @ Ёhv]Ce ca`Ҁ A**Oo`N@@ЁDD AoPgf +C ' ' @*Oo T* CODE OUTPUT TO FILEOo@@o @*Oo c] -sq-s--H%l* dL d L m l ,,,s,sq ZZca `@Ёؠ`D ЁhLh hh h` + c] ` h@i . 6M 03 FҁL 0ҁL 03 FR 3 FC8R %oC 8R %o3 3%o@ EC@E@@@C E @C E @@C@ E@ RC E CҁE( ( D SCҁC RC on ]nDSnҁCҁC RDS@RR L CE CE@*BHPC8@3E3 T%&TҁHX''C E D X  C ҁC ҁCҁ  XLXҁ@C ҁE 0L0E3&X  C ҁM0D3 @ C L  RCRE R@*MCD RXC@ 0(,'3M0&~'i'u$MC 8C8C9'3M0%&TCC9CC8C8k3ҁc.(13l3ҁ7.&~'i(%/CD ('3( 1'u('5 )'(@3$1`*`>c>(Ak>`>c.`.`>@g )@@$$ ًoc.do Z @ 5(@$5(.0 60M0K'IR 6. .(@8C@JLJd EE   omoqmqsmsmmm#)$ )#+$ +#-$ -@)8immii   i)8ii$im) )@m) ))io @iio MJKLJg A= @JKLJg=  A.;7A;.A7(m  (m MRkqmI-I؋kخ)x@. M[ E/ # Y>/KM12Il gUf"  { GHQD |  `  s X ; O " . e i  P q #' ~W^@!?G$$H$Mt(C*4h&gr'*;&~'i'u$1'?)z ^ T *((^*e\<.]#Z>[(!A; !J!"A!!#$$%%o%8%%p&&C&T&'7&' ''0'V(@INT-TEM INT-TEM E= DICT= : /AAAA$.,u*t7ҀΠ©RIGHT (C) 1978,1982 MICRO FOCUS LTD?   > $ CaҀ "|CHSPAC OC^ CҀ bc@ 6 Ҁ@@(CҀ.UC\C̠@ bcҀ܂ܧՀ@I@C @( Ҁ`cCҁccCr` NҀ@ bcЁ Cҁ ccCr` NҀ@ bcЁCҁҀ@ bcЁCҁҀ@ bcЁCҁҀ@ bcЁCrҁҀ@ bccfҁc N1ЁҀD@HCH  o m`.oPc N1 . Z[\` #Ҁ`Z  [ZwCϠҁҀ@ bcЁCҁccNҀ@ bcЁ CҁccNҀ@ bcЁ Cҁ ccNҀ@ bcЁ @}Ӂ"#ݘ ` `. CԠҁ$ccNҀ@ bcЁ ܽ&ܲ(ܳ(ܴ(.*, @}C ClCnlCl @}@}ݴ Ё.@5 lfC `lC٠ҁ0Ҁ@ bcpt2`4a6b8܉:Á<|>܏>>C@ tyҀC8ҁ@C8 C9 C: .L`@@5 @C@C@C@ CЁ.@5.;ЁB@M}6  Cg @D# A " A}6 ݥ ƠA,.!~݈ `S  K  6DH CH CH K @[}6 C @5K D5@  <L  p bc@@@(CҁFccЁҁҁ@ bcЁ ЁHZTI BIЁJЁHZV BIIЁJCҁLccNҁ@ bcЁ CҁNҁPЁH@ bcЁ.@5.;X H       `@ЁR.TY EX VVXZ\^`܅bсTd C @@} A BgC#D ҁf@Ё.c D DD  < D.@ XL/ @5 IIC Cޠҁh@ ҁjC@CƠ@?CZ@#C CC @}C@C@CŠ@ C?1C C @}Ё.CY@5?@5#ЁB[ C @   Ё.@5d ЁBcj C NCC6Ce@Cf@Cg@C C C@C@C Cҁlc @C@cDcDCD@EEL; ;L= =D  npr C CҁdCW  $  ЁtXCzҁvҁ@ bcpt@SDSܩxܬzCSҁ|tyҁ.ҁCҁ~Ё@v}(ܞʁ @(}@}@}@}@}Ёoݝ ݀ Ё ck ?@k}@y} ЁmCUҀccNҁ@ bcЁ C\ҁҁ@ bcЁ CҀCؠҁCҀCҁCՠҀ@)py. \` #\  Cd C8 C9 C:C:?C:#= H  ZX(o (uo@il@/i` (u ` D( (u l/ l B Ag@  A gilC D X 6 ؠ B A@Ё(T (V Dc AEخ)x@. M[ E ** CIS COBOL V4.5 CONSOL PAGE: 0001 ** 0118 0118  0118 0118 0118  0118 0118 0118 ddd  0118 sdsdsd 0118 d 0118 d 0118 / # Y>/KM12Il gUf"  { GHQD |  `  s X ; O " . e i  P q #' ~W^@VKXxu+C`J,OA[psLd.&XPrIT]fE+)\ASS-SI ASS-SI AAAA$.,uЁ CҀCؠҁCҀCҁCՠҀ@)py. \` #\  Cd C8 C9 C:C:?C:#= H  ZX(o (uo@il@/i` (u ` D( (u l/ l B Ag@  A gilC D X 6 ؠ B A@Ё(T (V Dc AEخ)x@. M[ E 0118  0118 **004***** *******   0118 **004***** *******  0118 **004*****  ******* 11 0118  0118 **004*****  ******* sort.file=SD sort.file name 0118 **007* ******* BLOCK CONTAINS 10 RECORDS LABEL RECORDS 0118    **007* ******* END 0118 0118  0118  0118 **004***** ******* HELP  0118 0118  0118 **004*****  ******* BLOCK 0118 DD 0118 D 0118 DDD 0118 1 0118  0118 **004*****  ******* 01 HELP 0118 **007***** ******* RUN  0118 0118  0118 **004*****  ******* PROGRAM=HELPER 0118 **007* ******* IDENTIFICATION DIVISION 0118                                                                               !  !  "  "  #  #  $  $  %  %  &  &  '  '