Acorn CPCPMDISC/M  0FORMS2 COM FORMS2 COM;COBOL COM !"#$%COBOL COM'&'(COBOL I01=)*+,COBOL I02j-./0123COBOL I03;4567COBOL I0489COBOL MSG::;<=CONFIG COM>?@ABCDEFGHIJKLMCONFIG COM NPI CBLOPSTOCK1 CBLQRSTOCK2 CBL%STUCALL ASM=VWXYCALL HEXZCALL PRNU[\]^_`FILEMARKCOM a$ANIM V45abcdefghRUN COMFORMS2 I51iFORMS2 I52/jklFORMS2 I53*mnoFORMS2 CH1pFORMS2 CH2qFORMS2 GN1rFORMS2 GN27stuvFORMS2 H01wFORMS2 H02 xFORMS2 H03 yFORMS2 H04 zFORMS2 I01{FORMS2 I02|FORMS2 W01}FORMS2 W02 ~RUNA COMRUNA COMYØÞ`ÑC5I5=5Ù TûS]TU'UjUUUVUV,UNU (C) 1978, 1983 MICRO FOCUS LTDBQ BCO XY JVsXyc  (08@H J0G p+qy͏VZt zŝY ŝ V`VŝHZHJ 005C=!z{w#  005I}*w#"P @002@Eͷ~Pͷ+<V!ͷªP}Qx!ͷ͓G@Qͷ y͓Gþ!ͷ ͓Q!ͷ QFORMS2 .ͷ6y#G͙QINT !2ͷQFORMS2.ISR SDB CBL SCP DDC >>>>A A A A A A A A A A A A 9999;;>=>> > >q?Z?ANBX>A A A A A GGGA A > V??DD>EDEGGA A A A A A tospqrVA A A A A ~77&-A 7ZY[EGACJJA A JJA A JJA A JJA A A m A A A XySEGMENT: RTERROR 123 COBOL PC 4567  ISR I I܀Q<ERROR ON OPENING FILE: ANIMATION OF ROOT PROGRAM INHIBITED - MISSING FILESaO $q$,!;,!Ù!;qz8O! !;,z;qyO! ͣͣW_͕qyO! ͣ͒qy#ng* x>  ~# y? oxE? J y? ox? zW!)N  F !>))b #}o|gs s  =X ~ og*6*9د2>C >ʢ ң 2E w#è yw# ñ #ý > w# /2>/<`i w:=2 #x >0w!)DM)) O = >* G|x*%D * D >:X `u ͠t**2> r #h *4*{zڟ :_>!  _>! z! { G xƐ'@'w# O*[ F#N#*xO!b q!vz͒q.?*!9"8"**_****** ŝh":…ͫ*>2!"*""`+ʤ:G:*N6 #=:*"{ozg"j*( !9"*%:_G:!>2#"$!X>:Xy*tX&!ѯXʔ&O! ~#fo!A6Pw! bxbklÆN#* N#* GO*- ҩGî* GO*- G`i*   /  X 7 (  5   x\ *- *[ */ # *1[ *#:32V#^#yxQ gyoV ##:=2- T ++++N#F DM|^#V# DM~w +w+w##w###q#p#ɡ<ʏ xG* F#N#F#N#~# N#*õ F#N#* ʿ F#N :A +} }|>C }! = [ !P !^6#GOHq#p#6#6 ## s#r*ws#r# s#r*_DM*Q|K}PDM*Z*h^2A ;ұ ͱ *j:TG}„|p#|2A ;xʱ #ʠÙ ʙ *j:TG}|ʙ ™ ÿ*\:bG|}ʙ x™ #**%}| #/w+ /w w# w ! # ?͙ # w + wi`F#NV#^M r#s0 S i`N^M I >ڈ BK c <, O2o&!9" !i,-v ! `ie :͋ *Z:QGOT]0ڦ :Ҧ ‡ y { *ú C7~* C7*4< 5#_^#V"PY= ! ** "`iOV#^F~GOx;G*' F#Nx;G* :/>3~2#F#N<*% 2*ó2*O~ó<<<<<C *4##:=IxG͋ ],͋ ! 4:*% +~*4####gLBKʶ*4 :!8IÒ,,ͼ )~ )~ ;xF#N#F#^#V#####:>, !~x:E!""!F#~#+ʠ^#V#N#FyOxG‹w#w#w#w#ä*yxڠ"" e*###V+^+"V+^*}|* DM 28 26 27́}<"9́"+"́~ "1́"!́" DḾ|gyy23́*!"#"%"'*~ ")*!~ "-*1"/*%~ "422<2 *:wɷ|g}o g o>!@t! 1!2"n!@|eo"p!  $*(! z1Yc ɯ2i<2h!"&":xGxGM*~LL&oL+)&o) :f>C !#~A #w#wË!:>Oç :;<!<V#^z<*##ÜO*$y=O! ~!a!/ú!f) 2y2͠ 2*͈̓~ wfxB#"B@2p̓*~`w#s#r#q#p*:w#:w:X:*DMkSAVE >2J:`i9"͊W"*6 "!.":~ͽw͐*%!ͧ *%*)b !3c ¡:c0*"**{z*|eo"c :c1*"*"!"".ͽe*"."!"".Ö:›*p\Ubk> #½>, :>*>*%C !jc"\ha"Z4 +m* *  !juou,xu?x&xxxuxMV vvv9?Bcv^ ov|vvvwwwgw}w*`iç `iV#^>2*z›ʜ<›! *22_!_ =ʯ<* ç >`i w>`i ~>`i c."%%w>`i c."%~%>`i !_2*F#N>1:y12>C>m:[::m>>>j*p|eo>t*~ͧ "!;ͧ ~*pU\͈*!V#^#:"**%ͽ*++ͽDMxyMD~+ z`i":"s#rͽ::2_>! j͈**%"*+^+V"'** Ow# wp:!Fқ#G_x>, $!@>3G* ͧ H 1 !*(1 ~ # !~@+#^#V*R*(+:G:_ȯ2[5ɯ2p62s6!Y"y2x2: 2t6! ͦ*#|+Vgo: 2t6̀+!`5"\5Gq qx2[5ʃw#x6 #6 #6 2o6!C5}lg"!I5}lg"A!+ ~#ʻ¯6#!+ w#w+6!+ ~##$^#V2i62j6i6͞~0+6͍*:p6 y6:0P+2f6!i6!DM! X:i6=]͜* ͧ> "g6/ "5͇**`6"4$ s#r:b6r=͍*͍*> |!:s624>K):]6l:s6l)%ͫ%h) ͍*> |!Ë͍*:!"4:d6G24͍*ʰ:t6xҜxF24͍*:4=24O:4g怱o"4 !4~  ͜* ͜*#͍*_ ͜*4 #͍**4|F+"4h(*5T] x+5 ) [ >[ xQ BT]+Z E ~#} n Hy24:]6ʒ >2q6Ò ^#V#~"424Ò V#^#~24{ozg}o"4h):b6!}¨ *4:424"4ʷ ~( >K):\6*`6w!w):q6#À!:_6*_!:4!:e6>!M!"Z6 46 6 :ú~:_G#~Fu#~0u:u#~:u#y#~+:Gy~#AuQu~#  ~.ʙ ʙ}# u ~.º#~ ʺ} §ux:*Z6"Z6  6.#*Z6=5`iI5C5 w#>  *+:O:d6C:e6:Yͦ*MYͦ*M* >$y:d6~:e6rͦ*dÈͦ*rÈ*>$O:!46ͦ*͍*͍*ͦ*͍* z{÷͍*>C !p66\6:4ij(*4:4!#"4>K)*5 *4}G)r#>w#:4wͳ(͍*M!> |!*g6!o6~\!5~**`66:e6=:d60M!>2\6#*>2b6:]6=!‡$:\6ʻ!͵%")*!!)*!!):b6!U6"!T6"!S6"=!͵%:]6"+{ "~ !*4"!R6""4"4:\6'Oz^#͜*'"*:]6=>#$ &͞%͵%')*͵%:]6="?$:\6#͔#"#$Oz͜*"$ʜ" " w#"͔#:\6"ʻ"$O""#+~ " "+~ "6 "4)$ͧ'+~ #>#6 *4"4:424:f6E:d60Mͦ*E#ͦ**}|EE|=E!q' *1À>C ~.f f#U>/E*"\ʀ=!á*"V6`i"w6bk"`660#60###~#2\6~#>2s62s62]6~#2^6~2_6!9"X6!&V#^#"4V#^*V6"4 o ' 2b6}*`61$,!!!5"V"\$$L%'#>C 2q6:b6 ͊#w# ~:£++~Fʣ>#W~|z>|z>|> 2\6=1$ z=> z> :_6> 2\646:f6> #):o6 > <2o64 #:o6=2o6> )6 +~ >#6 )ͫ%)$ͧ'):[5OS# ^5ͦ* ͦ*#~O#"\5~$+ 6 +6 *4*4*\5zn#~#w# ^#"\5y2[5! ! F#N*V6 !#~2c6qzʣ#6 #×# #'''1$V"V"\$\$##2b6ͯ!R # B# æ*9O*`6!p#q>͊#:\6*~*:s62s6*X601#42#32#22#>#`iO ~#fo͞%͵%ͼ)$ͤ'%ͫ%?$)*͵%%& $ $ͤ'%G:s6$x $ͫ%):^6 $͞%͵%'%ͫ%):s6¶$-& $ڶ$%&$%&$͵%'%):^6$ &ö$:s6¶$-&$ $% $ö$ *:^6% &%@)<):4)})~*͍*F))͍*=)͍*F)̈́*}24>#*5p#=S)=>2424)%24"4*4##gzo{W>_&,$V :s6š)*`6 w#w#r#sG*4|}:4.-*4:4è)%è)!4p#6# )+%t):\6:]6):s6G2s6:4ij(~**g6!4/~# *:_6)*:2\6>#3*x>#:s6J**4##)}J*>2s6*`6͊#:\6!$F#fh"g64/ *"5͇**4&|,$!Ç**5æ*:e6ʫ*4Ý*ͦ***g6ͦ**g64/ * **2+9:+9 *!*7DM2+9*7W:7_*7o&,$,$ͥ&)%):s6$-&$ $% $$25!5"4!"4*4#'@%@*:b6==%l%-&l% $%%& $%)%l%-& $ $% $%&,$ͥ&ͫ%)*4"4:424%"424*4"4*4"4*4:4#ͥ&!5"4!"4ͧ'*5} %| %ɯ! "5!5"4!"4':c6>#}/o|/g*49&*4##0&!&<&.*`6^+V+~+Ġ&zX&x<:s6`&*4## Ġ&UlgW_ {{24|o{g"4ܠ&zĠ&ͼ)><>#*4*4}&|&ͼ)&:4_:4K)[):424d))'ͼ)':4E':4ij(*4#"424I'>27,*7#"727^)*7:7:97+~,7+>,:9X+!F-N+A+>!F->!p+,:9:+:>C "d6!+w#w##w#w#w>2+!+>}_|W~wG œ+x 2+ B FORMS2 ISRc( 34$3 4 5#555 4< !L2-18$6 L3-12$6 !L3-13%6 !L3-14% A !L4-DIS%1 !L4-1&F6 !L4-2&d%OVERLAY-,|(a,!7p#6# ‰,+|(-,:9:9̑,:,9G2,9:7l+7-* 9!7/~# ,:9,:29>ͣ&,x>ģ&:,9-*7##)}->$':4ij(ͼ)$'*4"424:s6h(&*4"424:4B'>K)E'h(ʼ&:4_>K)ͳ({'*4"4:4K)[):4_>K)&X>K)*4*4#"4z,$ž'{,$Z'ͳ({'ͥ&.(G:]6=x''|24E(BKô'ͥ&[).(''|24d)E(|'[)'|} ($  (+|'g !()(2r6:r6 (!*4DM2r6*5W:4_*4o>24d)*4#"424ͥ&*5:4:]6~()~(>K):d6ʟ(!͍*•(ˆ(ڨ(>#(͍*X>K)[):d6("͍*((½(>#(͍*(24:d6*4}|g:t6F)}o:42,9*9C&:9!$F#fh" 97/,"7@-*(|&!@-*7_-:9d-7V-_-ͻ,* 9_-* 97/, ## :V :VO: --)1><>=+** ERROR(. USER PC _: STATUS=2 D= T=U S=. .:0*#":F0:ISIS.CLI J. 6'616J. 0ISISI00:".V..0F IJ..*":͸0 0 b- :A k.k.0 .. 6+ @@0 o.e.G:ʐ:wÖx2p0ʹ#*©6?ëw˜0ï#6 ¹.0#*6?w0#6 #6" #~?  xDIR ERA TYPESAVEREN USERd!yO#< Ty#O 3߯21y_͸2y2ͽ:ܷ˜1͘A͌>>͌2^ :¥.!_~#fow]!v"!çREAD ERRORçNO FILE^: ! ~ 3#0 Wx x ހ ނ G ~ # 3x~#SAVE ggc<< =xLLLLL4444 /-0̓/G/5/|20͚/|C0(/|}_/$ a/+|H/g v/~/2&:& q/!*DM2&*W:_*o2/-:ø01-00//ISISCLIg00.Py{0!0~#0À1!}y|zxʐyҀ{€Š3܀\X COPYRIGHTC) 1979, DIGITAL RESEARCH +LPTLST:LP:BB:CI:COCONPUN:TP:HPRDR:TR:HRPRN CON: CON: <>.,;:=?*[]p5-I = FORMS2.INT ^ BRͧ9!5‚#~Y‚#"T<ÆALL (Y/N)?^ Tʧ͘!6!~ڇ w4!Y~ʆ͌†t=ʆf ^ T 2o&) INc0"+ HIT KEY TO EXIT:$6ʘ6s#r6ʵ6ʿ6w#w#^w#Vwÿ66s#r#PYs#r!6!:^#V+{667676=6_͌> ͒> Ò> Ò͘~#͌ì _2<ܯ2 ݇!2:2a{_:ʖ:>Ľʖ:=2–!B!6#5ʖ:Ľͬʧ )!F#xʺ~0wëw!" !~6ͽ:ý(!#͘*~ "޷"͌#>?͌͘ =_.:;<> Oޅo$>!Y2*O"ʉ@{z**~#~͆~w͂͆#^#V͈q* *%* ##* ^#V*4" !9"|*͂:QO*~*Z:#7 *Z:QO͠Oxy͆~w#N#F#^#V͊6*͂`i"T]*F}_|7!"F͈͒"͈ 7Oo&*||#^#{ 8O V#^#*#:3GG8z##B8+{#B8w#w#8##8 8!la8!Pa8T8!^F#N#> x8> w8+~>@W>w#>O>_ڦ8<_y_> O s#r#q#w#x8@8yBKm9P_ q#p (2&=:> &=<!2( F9:_*+ :m?>x*vF#Nf>xʀ>]>l94ʀ>##8BKʀ>ڀ>ڀ> V#^#0 N#F r+s>C >2W!U *) !q `ip#q *U*c"U"c#DM*Z "Z!"QPX~9# 9 y2-N#"+8 !-5!pbk)T]))))*+9^bk#N9^bk###7?~#N#Fm92(O! >j?>2Exw? :2./2!#œ?# ‘?"/"4y? O+ ʮ?:.G:?'w+ ?6}|>2*4*/ ͼ @>2E2!w# ?"@>'w+ @!~/w7>'w+ #@!E>w>2!w#w#~p# V@ w# b@!/x@7ˆ@ {@ѯs#r# ʒ@s#r#q#ʡ@  -@@  !$'5?0_z $(26z2 %05@E-D^#V!")ͧ ';';5:(OY9?9 d!:=; !:"+*)!(5;G;4N")*+`;_z^#W~r~;4y;5# Y;_Qx  ;{w!:"+d@;{_!8^''^+w@;^8 <9!"+A ͧ +;P+>;><'w<+>D<;^8 !"+:N<:D<2F9*+~0<#x2*w^@g)))){'g{'_|'W ;@?:*1*6! {ozg:3O:8=?*6:8O*1FOJA>W~'w+~'w AA+6*1+"1!35A>g<'o}'|'&B }'o|'gB x'G{'oz'&BW]&BO ~'w+ AB6 ;@??:!ͧ */~PҏB:3=B*4:8=BjB"4!84jB*/=*4ңB+"4 }o|gBgC?*/F*4+#~BB+"4!{zgC*4V#^hB:3Bw#sOCO_2G> hG:6~#GGx7G-XG2GG+:H~#XGCJG~R+~#JG>-2GGDXG~BBG+~#0G:GG:G!P6#p#q#6ҁG/w#6 s#rrC *h2H:AFD ^8 *Z>2H:QF> *QDM*Z~ GAڙ ZGҙ # xGÙ *Q*ZBHT8 *Q*Z:PBH+H%H+~DH~8H6H~#DH~#-BH+™ ~#0ڙ 9QHҙ zBHÙ p+qy͏ZHZIpIpIpIwJ.,$ *1NJA>'W>'w+>'?w+ COCxƙ'G:3*4<_O*1'+ BC-CxYCpûB#*4#"4B!ç !^":29G<2>O!"Cx>C C2G2Ego"A D rC !BE:9 $INSPECT    ҀҀأ @ҀCҀҀ LҀCҀC Ҁ @  ҀҀأ@ ҀC Ҁ Ҁ C ҀҀC ҀCҀ @ L<Jzn]eҀC Ҁ Ҁ C ҀAAAA$.,bk+~2" "?"\*Z"_>J2Aj>rC ;ErC <:BEɋEEEEEEEEEE_EE_EEE_E*h+~602F:>O*j*?*< $F!D!EʁE!"Eo}E$~#fo :9E:> äE:>+E>->0:8:7:9E!RCE>/!BD:E! +s+r_E:6+wE_E+~0E2FE_EFFFFFFFFFFFFVFFFw:9G:FGFx> F:E:CF:C<ȯO*:*h!D!zFtF!FopF$~#fo0ŒFq#FUF:D<+QʣF:ʣF6-:Cw:CO>0q#¯FUFyF:C*F> UFw#F}oUF$UF*:AO*h :6F6*# FO >+ K*? ɯ2ͯS!"N*C (K"CHI*9|+++:ͰKX:ͰKk`"K:KʂK:}K*H#~‚KMVhS:K:A*Z:ͰKҟKGX:ͰKҪKGk`"C~#GG~#=GK*#~`K#~ K:A?>2B*C"K̈́O:A\L:L*Q*ZM\L:JLÞL:B2A\L:KMV\M*\"~uL~2#"\K:AL*?:ڐL–L:ҖL*\jL:L:PB:BJL*Z*Q>2B=2:!9++"O͵S\L*\"?!"C!MLvSM:MvSG P"\}o|g"Z*>-Q|-QNQ{_zW!N S E*}o:g"**bk"SzpQͫOdQ*"Q"äQ{ŠQzʺQMںQB͵S*ZQ*\DMbk Q~Q͵SB Q W _ëQDM:I$R:U$R*3R*K3R{OzG*Q3R{_zWyx$R**S>2VMںQ"\*:<_WMG0 lgͫOZRZRdRzKRO*S `i:Q_:RWzʓR wS+ OS{R>0wS+*|ʪROSz”R"S !U6*|R~RG:<#RRR!~=*"Ng"K>2I2MMvS*Z1M:1M1M}*g""Z?:OS *&WM:WMek%M7!9"*Z*Q:BƒM2BM*Z:V‘M2VS:I¥M2UN*:MM:NM:OMM2M<2"N=M͂SM2I2ÃMM>2I:N:N͂SMM:OʃMOEʃM:EN:61NJRwPÃM02QN>2:N=ͫON*":=NNN=NzbObO:5OzONKSO3:I**}(SqSBS{2SzBS*DM*6*"*$:bS:bS!"!":A9!"*:K:L*$,]>*9 #2IZ> >2P>2P:SUS*L*Nq"L:KS:S:Gy2QT! TT:G:!QT:R:GQT!?T5T:GQT!!q#p#6ͦV:ʄTկGg:SN:pOT2OͫO}O>"Z*\~_ڗOW#^#:¢O##"\"Q*$:ҿO,:&?"*>O:g-O%":P:=POK:P>2O2!FPo:fP:ʔP:wP:ʼP:WQ:HP:R}ɯͯS*a"*j~2"\*h"Z*:JďS>2A*zʈPͫOҐPʐPWQBSͯS*Q{³Pz³P>2BͼP2BBOS ͯS*Q}o|g*} Q*?zPP{PPPBOSͦVUͦV:U!"L:K!V:*|:ͦV22!V*|ͦV!^W!VͦV:ʌU:G*N:O {U:K9:ʩU!V y¢U: +ŽV V[VyP]TN#S=˜V[V"W!V*W 0101250101240000000000000101 0101 BC00000000000000000000000000 FORM-00-0000FOREBACKPIC X(0000).COPY "CH1 DDS DISPLAYACCEPTMOVEFIELDTOSPECIAL-NAMES.CONSOLE IS CRT REDEFINES ? < > (Y=YES) FORMS2 H00 (C) 1978, 1983 MICRO FOCUS LTDBQ BC FORMS2.INT  IzKCON: PzKCON: N  = N 268269270289 00012000 0001 0001 0000 00000000000000000000000000002000 000100020003000400 9_$.,NNYNN0 0NY 01LY M A4YNNNN24 010101010102 00 URN / / --------------------------------------------------------------------------------FORMS2 COPYRIGHT (C) 1979,1982 MICRO FOCUS LTD LY NOT = SPACEDpؠ` O%ޠ@Aؠ` O%%2Π@" @. ؠ` O-H@3Ҁ` O@$Ҁ"SCURRENCY SIGN IS "$"DÑP أ@.ҀUDECIMAL-POINT IS COMMADؠ` OA05"$$@- ++ؠOO` OA03"^b0^KRECORD-DATA.AOO` O؀376` 'Š@S د1fff#` 0++Ñ$P ) ŰV#V^^ؚ6P@. 1fff#V^^ؠWWORK CPP#CPN#CP#CPP#ʠCP#4CPR#PҀ` أ *Ҁ=`0  0Ҁ2 2=1AЀҀ11Eؠ *0` د1Ҁ c1Ҁ POOc1ؠ@1` O)أ@PҀ1@YҀBҀJрnJҀ؂nr80nnnv1nn؂n80vvvING-STORAGE SECTION.HؠP01 SAVED-RECORD.H` OK03 SAVED-KEYD+0b#CDATA#^#` O邃srA01HSPIC 9(4) VALUE 0000.0KSTART-OF-KEYj#LSTART-OF-DATAn#JEND-OF-DATAr#FƂF23980ƂСbbOCOMMENT-POSITIONb#` OEMOVE "%BDAT|u@" N TO FILE-NAME./LDISPLAY-FORM.H` O&נ+ A00HUPON CRT.+rrrr0Ā801ؠ 07ؠ+0HA03"4Ҁʯ 0Š21AЀҀؠ` O%ޠPW-REPLY FROM CRT.<أ@3Ҁ@$ģ@.Ҁр` OÑP@. ؠ` OMDATA DIVISION.HЀ]01 W-REPLY PIC X VALUE SPACE.H` Oؠ` O%%uҠ@" @. ؠ` O%%1Π@" @. ؠ` O&נNSPACE UPON CRT.<Ҁ ؠ` O&נ@Dؠ+ AAT fŠA01!Ǡ@. Ҁ ؠ` OUIF W-REP` O#DSPACE !"Ġ+ Ǡ@. MACCEPT-RECORD.H` O%ޠ+ HFROM CRT.+MSET-UP-RECORD.H` O$$ˠ+ ؠ@- !"Ġ#@- Р@. Հ0Vد1VVV#V#VfؠMSET-UP-SCREEN.H` O$$+ eNDISPLAY-RECORD.H` O&נ+ HUPON CRT.++vFile created = 15vvv1A؀1ؘP )` ŘPP ) y180 j؀01v ؘJ 1JJJ0 Press RETURN to continue24أ@aĠ@A@bĠ@B@cĠ@C@dĠ@D@eĠ@E@fĠ@F@gĠ@G@hĠ@H@iĠ@I@jĠ@Jأ@MŠ@A` Ġ@A@Cؠ` ؠIFORMS2 W01 I    렠렕9/0(&''h'w=+0'6렡ᡮҀBؠ@1` 1أ@YҀD` @YҀF0515v21A /أ@YҀH@Y&ҀJ@D5ؘPOO)POOyO)` Ҁ$Oy` ĠO)OyҀ& b Ҁ&أ@YҀ(11@1Ҁ&Ҁ*أOy` Ҁ*؂Oyد1 ؠ@Yأ@1įf1^O@1ăhbO؀1ؘPOO)O)` Ҁ,POOyOy` ĚPO)OҀ, b POyOد1Ҁ. ؀1ؘPOO)O)` Ҁ0POOyOy` ĚPO)OҀ0 b POyOد1Ҁ.+؀0715v21A /ҀL1015END OF FORMS2 RUN2015-ҀN` 1014FORMS2 RUN ABANDONED2014-ҀN` 0714OPEN failure on 07301Aؠ@N` 0709File already exists:07301A0930overwrite ? [N] (Y=Yes)0943@yĠ@Y` 0713WRITE failure on07301Aخ@PAs_-+  G : Z !  - %  OVERL fAAAA$.,~F ( 34$3 4 5#555 4< !L2-18$6 L3-12$6 !L3-13%6 G؀0111` Ҁ20703Specify Screen Image File [0780]`0 ` 107301ؠ12=2=1Aد 0Ѐ1014Ѐ4` 'Ҁ.د1Ҁ6c1Ҁ8O` h@AĘPOOyPOOyOy` ĠOOyҀ:OO) b أ@AĚPOyOPOyO hҀ.ؠ` c1  %؀001 - 0Ѐ1014Ѐ4` 'Ҁ<` د1Ҁ>c1Ҁ@O` O sc1!L3-14% A !L4-DIS%1 !L4-1&F6 !L4-2&d%OVERLAY-_ f0ڦ8Ҧ0_z!~wz2z2`u-2D.** CIS COBOL RTS V4.5 REV 006 (C) 1978, 1983 MICRO FOCUS LTD URN BQ/0000/BF c"!ͧ :02:02!`0w# !LJw#w!χw#w*U\!ɇ> !ɇ6/PFORMS2.INT };La*97&6 *6;p+q>p;Wu6:J#"r;p;ZҖ*p;DMr*6DM#xr;Z®ö*r;DM͵r;p;J+s#r>!p;b:6/H6:J#"r;p;Z*p;DMr!"p; 797ȱ7ȱ797ȘL H ,> ) h' 0 * 0٢l 0̥6 Ľ h L %L : ɋ8 # L  ef : ɋ~,; pHH )hh  ߞ86  e6 X6L,*H V  h VLj ݒ )ڥ* % 㒤* e % `   'Ɋɉ8` p"8` Missing " Xȱ "Ȅ"Я W W ( L   ," Օ*ȥ*ȥ+hJ 7 8 Ы ;i;< ϿFailed at ȱ +ȱ *  %ȱ7e778` i*H #  Q hHe**+LL A? ݒ "-,0*e+e> 3(< : 7 8; W ߗ L ưr~LL ɤ LLNo =*[# m ɋ  W : ϐ߂7Q8l7   ݕ A , 1 " ' L ' LL*Type mismatch 꽥,ɀ{*6U,-6iH*q*Eq*E-8*eiHh*-*,*6**-*,,6` **`No room9ɀ':79ȱ7:97Lܽ ȱ7ԥ*+,-@' 'L Bad e 78? Y($% ?7(Lߐ9 iг  1?HH خ !+),-В "h*ȥ+ȘH 1 ,)L'hh?@ 6e**+87e*+e4-7e78788 ,LL/ space* +,-`? F@f? e*e+*&+?@*+`L' 뒥*+L 뒥*+ / 뒥+L W ߗ ɇ ! W*!+" L W W 뒢*. L )L 0 ` 'LL 0 ݒ,̢9 =+=e==>=* e==>`Division by zero' -H q ' h8E-7 q9 =>?@-*+, A9&:&;&<&9&:&;&<&=&>&?&@8=*H>+H?,@- @?h>h=hh`' Q  ~ Lb Q B' ~ N';);.);=0>1?2 @3A4`jE;*`LG0 B0-I-8**ȱ++ȱ,,ȱI-*+,e(` BЪ7696 :;: ::;::ȑ91ȱ79`ȑ8e :L`70@ : _[`{` 1 ɕ ,! $I?8`H L 㒥+,8`$ range   Ȅ @[ *+ȱ% ,(f,e7ʆ87A 0:[_{ڈ/$g%,ȱ79(L i!?`8``HȄ , +H*H he**he++h,`9 ߖLaȄ9,7( i,8`9, ߖ,8`Array i,H*H+H*u خ- :: ȱ96 ܽ7(`    r !'` k ** @ k Y**0 ` 9** @ B?<`>: *+,-@`= >  ِװ ͪ= 𿰼 String too long j7e6ڪH6ʈ ˽h67 ѝ+-h`08 Ν/0Le**ȱe++ȱe,,ȱe--i@L Q ѝ'0 ~ 'О' Q L0' Ν088**ȱ++ȱ,,ȱ-Lw Q ѝ'0 ~ L' !-#YRI<%þ"o#!x$$Ö# $# (C) 1978, 1983 MICRO FOCUS LTDBQ BCO   YX =u2u24C7  (08@H-< lUԭÃO$+q+p+qy͏ , $  ͌ 9!z6 # L!zw͌j# X:z 0 ͘=N#Fy}80*z{¯u2BBB9Bj.,$ W9!rͷQ ~ ФL Q L, Q ' ~ V'LԝL0ߥ-,34$3 4 5#555 4< !L2-18$6 L3-12$6 !L3-13%6 !L3-14% A !L4-DIS%1 !L4-1&F6 !L4-2&d%OVERLAY-ʦ'LԝL< */ !&` Q ' ~ ':@L Q ѝ'0 ~ 'О' Q L0' Ν088**ȱ++ȱ,,ȱ-Lw Q ѝ'0 ~ L' Z  u2`u2H 00P}QxQ!ͷ͓00 y͓Gþ!ͷ6 002͓-Q70EXI AAAA$., X'Q**(~#" <AOG COBOL N# z8INT N#NCOBOL.I00 ?ERROR 123 COBOL PC 4567 *j+j 5?S?55555555555555555555555555555555555555555555555555555555555554& 95555555?Or555a55555555555555555(5(,5,555555555u27?99 ISR I00 00000lERROR ON OPENING FILE: ɣ͒qy 2|2\  !]w# ʥ .&  0 6 #& .K !e K w# ʥ : U 6 #K 6W w#] !e~H#~E#~X*}|{ "!{ ͊ !ʦ =¥ ` kʥ j \͢@ w# ͅ ú n ʥ : W _ O { `i"@  ͅ ¥ n S n S GтWx ͢!i ~T #H  *( Ϳ *(  NEXT PC͊ =¥ `  ( Ϳ ~ Ϳ Ͱ ʵ .͍ =¥ ` |¥ }w#~ ÿ 2F͊ ! =¥ ` }ʥ +"G> Å >  !  # O!b q!vz͒q.?*!9"8"͉COBOL I000..//EXI AAAA$., X'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 ??= Öâê ð ' `  "D*"!"!"2I!" "W""!1!++""G>28!"9:] !ç 1 ¥   Ϳ Ͱ ͊ =¥ ` xS |¥ }ҥ gA>M Ag}M M c |¥ }!w s#r:[ʎ _!~ʠ ![4á \͢  2[y 7 >?  _͢!a"]> _͢a_!`~> 5*]~#"] 0 7   > >  | } : >. *Y}o| , 0 å ^#V#!S ))))o J k s#r#!P4 !P6# ,¨ >2Pë g  g  g  ¥ ʥ ! XN!~  ! ͍ !" >- Ͱ Aڥ ҥ _!7^#V~  \p Z t ů2[\͍͢ ҥ ͊ =¥ ` " ͍ ҥ ͊ ʻ` " =ʻ` "=¥ ý> 2͊ ` "W=` =¥ *W}o"Y  *W"[( Ϳ ~ #? }"W*[Ϳ 0 *W}#|#*W? ͊ ¥ ` ` ` {zA|¥ W}d ͊ ` ` ` DMʡڏ"=ʡͲ=ʡYPͲ1**!I~4#~#F#x~#s#r#w>͊ ¥ ` `  ( Ϳ ᯕo>g(_^! ^#V~ x% >= 7 !~ ( !   #x ` F Ϳ F Ϳ ͍ Ҁ *" !6é +COBOL COM//. 6PfLPTLST:LP:BB:CI:COCONPUN:TP:HPRDR:TR:HR CON: CON: <>.,;:=?*[]L? COBOL.INT = COBOL.COM OSNAMESIZE(18) VERSION(4.5) \" ( *"W !)~##{nZ*F#h!Cs!^#V   ##::^#V#þ*^#V>%#x'8_#*#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;# C"3"7 "T6*}^!T42 G Ͱ *hMͽG:ͮ+GGW +GU!ͩ>̀+! @!!BH @@ABH B! "BHI$$PP:Wb O1jFF 22 $TW:4*"u*u*'*(!*:_Ŀ3Ð{z##Ç2jÖѯ2jҼar4?O!{ ~#fo]T##~N#* 2…N#^#P* 2F#N*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"(#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-F >/`i0w",$~  +~w* H "$,"̓wOG@>O>а͙͑~̓wG̓x͙͑~Y͑w!5*+~"!5`iF#NV#^.2Ur#s`iF#NV#^!Q2r#s2y2͡2"x~# *!PD+͖>2>2 >­͖ >:0͖!|eo"&."!" :1>**" w#ˆ"]*!"":>=*|eo~# ¿E >=+:>=͇#^#V"^#V!*6*>=jc"ha"͖ !" [ !! ! !`iV#^>2*zŽ ʏ <Ž ![ w#{ *22_!_ ʣ !~#¥ ͊!#!>=>`iw>`i~>`ic."w>`ic."2Z:͇*~@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":#^#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"!*(z#~: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 %!%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! ! '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:&:'&|,,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*":20S(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*"*"*:#-!"!".*} 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.-̓/ COBOL.INT  00 / PICON: 00 p PCON: P   P  Po P 3 PCOBOL.COM P t  P 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) '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 0123456789ABCDLPRSVXZ *+-,.;()"/=  YY      "H . H   INPUT-OUTPUT,INSTALLATION,$  ...... :E. Qy'%03[}U:Km9I  <] zK  AAAA$., ** CIS COBOL V4.5 PAGE: 6VCIS HIGHH-I L-I LOW COBOL.MSG 00 = c c ŠE % ` 'd  YaLRAeeP]F/j [~u?,&o .D% m,rKjd 9]w  %b Nr^ F6 C#.C#CCgҀHCgҀJcgҀJCЀL@JLJрNPR@c nЀ:` nTCҀTCĠ. ^,MJрVXҀT 0. ^,,@g@9E PCSЀ:CsЀ: Z\^`bd` ҀfCҀhЀj(  E  ` A `ЀGO `  Ѐ"`  WhCegЀl 3$(cdЀjEc  Ѐ ( l c0 ҀhAA s m m@$Ѐn`CҀ,N,ܖprCgҀrЀ:@g ! !   ##C#kCP#*CPo#C#CP#gCPI#&CP #ACP #CP #àCP #CP #ECP #CP #ǠCP #Ҁ©RIGHT (C) 1978,1982 MICRO FOCUS LTDc tc*Ѐ456789012345678901234567890'1234567890123456789012345678901234567890'1234567890123456789012345678901234567890'1234567890123456789012345678901234567890рCҀOOc0 Ҁc1 Ҁ cҀ ( ( l l CyҀЀ`@yؠ ( yDyЀ@ ` ,p Ġ ' Ƞ / Р ? ࠠ? ? Ҁf@. ^,Ҁ,ؠ` Ҁfؠ`  Ҁf`" @9H `0 @CCҀT  D' CgC ҀDҀrCgҀrDgCDҀt0T9Tc.ҀTҀvЀ:uc,09E@' CҀx-Ax[ax{@9@ҀT@ҀzCgҀrDg g|-r!w"r"|"|KfҀrCIoXЀLMр~"р~"rXCgҀrҀCIo"0r:ArGarfrO mO` AҀAc1 @a@)ҀЀ * l Cl ЀGOo`  */c h ` #@ @|CaҀc Ҁ D$ ^ @@Ҁc @Ѐ"D PCa@@ҀЀ$.&Ѐ$Ѐ$C6Ѐ$cҀ(@р*,@р*,CaҀ,Ҁ*C ``A.[0a2{0`Ҁ204:6>2;8;2Ѐ:u.<,>"@-B+B(D)DDҀ` nؠ`  f "FCXKҀFE'ҀEE0DD@@@8ҀPؠ,. ^( JiHL@gD` =MKN8NLgI(Iiأ =MlL0 0(KR8PL.L.P73389S899:T9: ,L,  K'L0.0L0 0L0ڀ .C^ҀE@KNv SKL(3 J3gHҀ( J-(3 JЀ@4Ѐ.,4Ѐ f Ҁg4 #0@ҀHJh J@g B  -3LD #Ѐ! $Ѐ!  %c dc dl00KIDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDLPCҀE@ҀЀcЀ@@5@i `@C@C@@C@Ҁ ҀE#   + /C`OIAuA**oOoO` /I/IOOoЀ cŠO OoЀ`(IrKOoA**!oF*******'4  LD4-KL0 0L0 O,C5ҀL, P,M,@5CcҀҀcЀ@e`cҀl(IЀ#L# )OoOILOoЀЀOIOocЀ c O OoЀ`eЀ`d# cdЀؠA**Oock 8 -<c # c*o #Ѐ`рO OIOoO c OIOo #` ccĠO Oo 9ZрOoO H+%рg CЀ D` ,p@@*рր oPD% ЀؠOoOIcl p! 1 ΠA**Oo#r! #qF-------'c @@@-%BL-I `ҁ>BH-I `ҁ>CHIGH `ҁ>BCIS `ҁ>ҁ6ؠCFLAG \`( a#r!" b`) ecĠ#r! a`( `ҁ:Ё?RUNCPX HEX#t@ABCDEFGRUNC COMpHIJKLMNCALL ASMo=OPQRFILMRK ASMSTUVWXYZFILMRK ASM\jPI CBL*klRUNCP2 HEX[\]^_`abRUNCP2 HEX_kcdefghiSTOCK1 CBL<mnSTOCK2 CBLd%opqCONFIG INTarstuvwCOBOL MSG:xyz{RUNA COM}~  >C B&/" Z E rX @ l # ~ 8  M Q g 9 Y  g<C%8F.3 MN<W]dkr%F,Y>vu Yq=#6'0'9''f'{'EXI EXI AAAA$., X'҂d+҂z݈N@i`LcNЂc*. +2Ё4ЁCgт&т&i64CMP MRUNA COMRUNA COMCOBOL INTH|COBOL I00/COBOL I04COBOL I01<COBOL I02iCOBOL ISRCOBOL I03:FILEMARKCOM CONFIG COMCONFIG COMCONFIG COM COBOL COMCOBOL COMCOBOL COM&DCOPY MDCOPY1A MDCOPY1 MDCOPY2 MDDFORM MDDT M& DUMP M ED M4 ERAQ MPIP M:SID M8STAT M)SUBMIT M SYSGEN MXSUB MRUNCPX HEX !"#$% 5::F0:V4*B:COBOL*B:COBOLI03:F0:V4I03:F0:V4.I03 8d:F0:V4I03s;Q2YsJqYsJYsJ4 ?     X:F1:X ~7~XY~ c$ 99(8C@uKN N3u 209i' Du9iDu 2@u9iNЂ@i@o`,ЁNЂ|@i@o`,ЁHؠ~g`~h .8 ~is@u@vт9(NЁHт9bB; ;.Ђ:5Lc2;VV9$ .$҂ .&҂:1 S E3҂E3Ё0=0F`1d17Lco:LF778=Fe1 10c07:LFc1:c҂c ҂҂E3Ё0F778@҂ 0 0" q #~r |q r*~~ y тf~}D~ ~Rl qIW~ qY~ q.҂NܣݰW~.eS~5~W~LU~W~N5(7W~~~W~ `+ЁnoiЂhЁH Ё`2Ё4HÑ ЁR M Ё`2Ё4H ЁH Ё`2Ё4`25XH Ё N`.`'Ё``2Ё4HÑ ЁH Ё`25XH Ё yW`.n`.N`.N5cH Ё5H Ё`.hQhS55`.ݤWn`.N`.x`.5H Ёc.҂N5cH ЁN݁N5cH Ё`.hQhSkE3Ё҂(CCgH C҃gD C ҃E D C҃C-d@gEg< =M=M g C ҃ @   ҃ЁC g҂ 2d?2҃@gC9`2``2 2Ё4҂&f L ('Ё  gi %~ Ђؠ.8 Ci3Ђ:K i 0>ҁ~HX'JUSTIFIEQ 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 'C E D X  C ҃ C ҃ C҃   XLX҃"`MC ҃$E 0L0E3?bX  C ҃&/556667>77%988q9r8|8O899:g>>?6???????INTAAAA$., XCZ COPALLOW-VALULOW-VALUE SPACZ SPACE QUOT QUOTEY ZER ZEROE ZEROHIGH-VALU%HIGH-VALUE RELEAS v RETUR SOR SORT-MERG MERG COMMI ROLLBAC' MOVSELEF} LIMI~ LIMITOƀBفFĂ LINEӃ U LINKAGń LOC˅Tφ MODULEӇzCRԈ CONSOLʼnI-ϊKEً NEGATIVŌOFƍRUΎTADEPENDINǐ3OΑ USINǒ 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ԭAD 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 SYNP~ 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-WRITTEFILE-CONTROINPUT-OUTPUINSTALLATIOALU& d SENTENC VALUECRT-UNDE DEBUGGINOBJECT-COMPUTEPROCEDUR VARYINREMAINDESSPEҀР©RIGHT (C) 1978,1982 MICRO FOCUS LTDCag90123456789012345678901234567890'1234567890123456789012345678901234567890'1234567890123456789012345678901234567890'1234567890123456789012345678901234567890 CҀC^Ҁ@@<@^`UM FH+aLF`m`mm'FDҀ@@<C  $(Ҁ.܂ܧ܄ՀLWN .  N f@р dK ЁDKM Ё` o ZBB , @4@25@  nlP@@Kсgҁ$fDYdg@JLJ B @5 nX ` @85 n(XsLX-ZXlVXV O܂؁Ҁ`dD@ NCC8` nC:$C:` n(KV(sZ(sX TUU$UUdUcO`Tҁc`NK9@ .0L0 J`TN. TES  cON@q1@ЁCCn{N@q1@ЁCN@Ё@n1NCYN:CN@j1CC` `Aҁ6c$cM` @0^`+h, ҁ8EC8ҁ8C8C8ҁ8C8(`'+'Vҁ89::< >Ё YЁ C:+'VYC:+'VYN@P+@DBEC @@@@@@DFHJLLNPRTV@<.c+ҁXX\(,s`MЁZcI ҁ\cIHҁ\с^`NҀ@Pc*kIcBcCcE@<Nс^` $%CҀKM cM$ҀK cMҀ ($ $Mb1C C Ec0Pсd`$сdL.``T{N݀WN:9NCYWC6WCWCjWWN:CC8C9{cT(-CCgCK h`D@^ ($NC8ҁC8('\9:C:Ё ('`(\'MeL@ (V- UP nC8=0 5 B `)`*`%(ZsFH` oс"@+sX(sX(ZsN c ҁ$(s LX(s LXIDEBUG-ITEM @ gM@H5 nHU (s IDEBUG-LINE M@%L. 0= 5 C cŠO Oo 8OoO `&@ؠ'Hm#$nҁf`&#$n`&cMnc$`& mmcme*e)$mmcm`!e)$mmcme)`mm'Hڀh`ڀj` ڀlX-s-KMCK$#o--oCloloڀnloڀpo-loo"-ssso-s,ss+ssڀr(s.-u.+.Ёtڀve oMH+sqҁvcn+qs(qsMH`c&X@ LX(s IDEBUG-NAME @ gM@=LX@2LX(s MDEBUG-CONTENTS @gM@=LX(s"Cҁ&Ҁ`d@ N(lhV$-CCgCҀ` o@ ^`MH\`)`*`%FHс(@K\\X(s$  Cҁ*Ҁ`d@ N(PRhV$-CCgCҁ,` o@@^`M`)`*`%FHс(@\XZ(P+-R+(+RҀ(s&Cՠҁ.@CaҀ@ NN@@C CM  ($Nh`ؠ`!+` z0ܻ2Ł4mcm@`m $n(3o(sqcDҁxc#Dҁx DdmcHҁzc #H ҁzcGc+HcFc+H`. zc+Hc c+H H d@mk?ҁ|#$%LH'He#$f+g? #?,?+?gd)(isdm7cBҁ~с(3oD5ҁcI ҁCKM #($ҁ`BH X H (3oh.@5ҁH dm@H5cA`EcMҁ+sҁX- ҁKXX d 0cB(3oc*ҁ( $IiEҁN6$`BHRC`C{E E ( 3@B@0@ /@,@.@+@-@C@ D@#ҁ@Z@ *@9@A@X@S@ V@ P NNE RKRMR 3 3`3KR$?$d`KTXXXXXX00XXXXXXXXX0X0X ҁ`KTXXXXXX00XXXXXXXXX0X0X ҁ`KTXXXXXX00XXXXXXXXX0X0X ҁE c.ҁ@`KTXXXXXX00XXXXXXXX00X0X ҁE c.%`5@`KTXXXX0X00XX0X0X0X00000 ҁc:#:ҁ"- D 5dmkIҁcI @Pc*d*d)(I- ("- (I"D5dmcCҁc)  cBҁсc ҁ5CҁcF ҁcG ҁcI ҁЁ /ҁЁ /ؠ /ЁtҁcC C!d)dmҁc ҁc+ ҁ5CҁcF ЁcG ЁcI h.` Ёҁl./c !// !//cAҁPPD05(ssLHm'Hc l,.s+ss nCi (.)  4 k?d oc :c5ҁc ҁc ҁ`KT000000000000000000000 ҁ`5`KTXXXXX000XXX00XXX00XXX ҁcC3RcD3Bc;#; ;HR`KTXXXXX000XXX00XXX00XXX ҁc<ҁ`<` KT00000X000000000000000 ҁc=#= =c5ҁ` KTXXXX0X00XX00000000000 ҁ` KTXXXXXX00XXX0000000X0X ҁ` ` c5ҁ` KTXXXX0000X00X000000000 ҁ` KTXXXXX000X00XX00000X0X ҁ` c5ҁ`KTXXXX0X0000000X0000000 ҁ`KTXXXXXX0000000XX000X0X ҁ o.;NC8(I?;.NN:cHCFCGC+CI HNN:cDCNCO`DCNd@DNCd DNCmNcE ENC}N@1cF FN@1cGN@1c0  GNcIHcI kINc$('IkIc+ c- N@1CƠWCWCC  f (I M"  /W#cCN: C giNcB`3c5$n0`KTXXXXXX00XX0X0X0XXXX0X ҁCX`>`KTXXX000000000000XX0000 ҁ`KT000000000000000000000 ҁ`5`KTXXXX0X00XX0X0X0X0X0X0 ҁ$n1` ҁ`KTXXXX0X00XX0X0X0X0X0X0 ҁ`5`KT00000X00X00000000XX0X ҁ@c0czD)"`z!KcK,m.cLҁ  !L(( ҁ@  !L( R K ҁ ( !L$? RMRH  ( !Lc Lģ`. z$?dLMRR )k.Nm.`. zҁcOZem|  >C B&/" Z E rX @ l # ~ 8  M Q g 9 Y  g<C%f5\ "Ys{.VR9)r ,R"U!"N"$""""##2#>7_9!X^k!t?Y* +  , p!%! +-! !r !!!$4$?$%/%R%u%%&&&'((M(y(())%'u&g''R''())+F+*r--,-- -pVAL-TIDY-EXI 0000000000000000000000000000000000000000000000000AAAA$., X-Gҁc ҁ@5 /- /$1c Cl.` ҁҁ@`! $0.c $1.D%1.CE DC@Ec Dc, $.CEccE D5D@cF D5D D ҁ@5k.c>D5cFD5k.(.-L / ҁ@ 5 LEc cGc DD5c>D5D@cGD@ ?  L ҁl.ؠ  ig5 CE @`0 /c0Cc+ 2c- 2c2`+2`0 c c #<5\ "Ys{.VR9)r ,R"U!"N"$""""##2#>7_9!X^k!t?Y* +  , p!%! +-! !r !!!$4$?$%/%R%u%%&&&'((M(y(())%'u&g''R''())+F+*r--,-- -pVAL-TIDY-EXI 0000000000000000000000000000000000000000000000000AAAA$., X-‚1%1@gc C$1c0ҁ(.6%07c cm6(68l6Cҁg #6Dl6+6.,xggЁ,c0(86(.6cm6CgEk6ҁC #6m6CE,CCЁ-c0 c ҁ / C@C 2c-2d@ҁc0Ec0D@+.@c0 `+2 /-*خ,Bk _2Nu7+M' E3 D ҀР©RIGHT (C) 1978,1982 MICRO FOCUS LTDC.@.hWF56789012345678901234567890'1234567890123456789012345678901234567890'1234567890123456789012345678901234567890'1234567890123456789012345678901234567890 `_CҀ@#@d`)`^`O`Pc29Ҁc ҀҀMC /CcЀҀWF@(B `Ƞ @i`KҀNKZ@CaҀ _``_ .`Ok7(u7 c Ѐ(c'cҀCx#9ҀcҀ`@x 9(u ( cMclc{chс\^ ~Ёd@ |&cc|@ gcl``2Ёf(q'clЁhЁjc|$}&H+%$&c$&D N$  +ڰl޳lcld+cQcc+`+Ёnkҁpkҁp݂rcl`+ЁnЁtcl@Ё>` g~Ёv ~@o ~ ~EЁx ~$ЁHcl&(oaqcс\^clc+ҁzu.с|~ 3(a+a&(aclche ~cЁdЁ`+Ёnm Ёx+a&+aҁ-a-ac,aeҁoiH`  e Cd  $xDxcP`PcPdPE $  "$&(*,. C.`OЁ0Nҁ2 CaҀC.`OЁ0cOЁ0@@c)`2Ё4 Ё6`) `JcIЁ8 ܑ:ܱ<NݱNu@Ё>C` `c @i`2Ё@ ~  $ЁBNC9K9`,`2K9`2ЁDNC9ЁFЁHЁJN`2`,`2`,`2`,`2`, ЁЁdЁЁn-a-,oicЁdЁd&NC9K9Ё o@o`,N 2b 2ЁF`2Ё4΁t݆Ё``2`,^b ЁvomowowDЁxCo`+ҁ`+N݁Ё``2`,^b Ёvow +ow`Co`J`2Ё4eI`_cJЁ4cIdI`!I\`!I`J c-d-c-e-сЁЁZЁ`-cҁN:?$K-ҁd-%K-N7E6 cd-h@9`ˁL oCDD oN` o>C9>c od oЁN`2ЁFHQ` o>C9K9>c od oHcN`2Ё4ЁP`NRC9ҁRdN`2Ё4Cueo`2Ё4`2ЁF ܼ݆`+I ݗ`2Ё4ܼ`+cu ݁`2Ё4ܼ`+Q ߁T݁ݼ`2Ё4ܼV`+QHЁXk`Q`Q`MЁZс\^Ё` 'N݆`,ЁbcQkcQcc @g@@ҁcc`k`+$+ccd+ҁe-d-N@ҁN@1ҁe-d-N`+`,ЁЁZЁc|ҁcҁЁ`,Ё OI  i   $ Ij j i$iom Ё ~  % ~gOI~gOI~Ёcҁclҁ g``2Ёfҁ`+cld+@Ёiq  IDo g  h h g g$h`12Ё4сāI  $H1 Ёсāqiҁ`+clcЁ`ҁ=0ҁL.d.kSP('S(S- 5Ec9c o#{ o$D"Nzk ЁЁc _k<( 'Ё` c Ё` ( VLK ЁсāH Ё Ё`2Ё4Ns$(`Ok<`_` c ЁgzHc(A-"(C-"(E-"(G-"`A(7A (u<Nc @L @  ( L `  E#g ЁWC3C@JLJсځk ҁЁЁ`2Ё4N݆NݙN݆Nk ҁЁ`( +(  Ё(+ ЁЁ@Ё ~`+ЁnЁJg~ ~`+Ёn@ЁDo`+ЁnЁJ`2Ё4ҁЁ`,ЁfЁn -2\ h8с\^(m g~(mo lh8с\^c(ocl(o+ocINݟcIcIc!IҁH `J`2Ё4`!IN^ L^PЁ`2Ё4`2Ё4(7'Ё (u7`2Ё4NЁ*c*N3@38Ёҁ @!5 n^ XegDg`gEC B @` ЁlQd#Q`vWcCЀ#c Ђ`2Ё4NCN`_N.`Oc `ЁMZC8ЁZ 5LZ`_@Ё>`NܐM0dNN$d Ё`N@1`2`,ЁFЁHЂH Ёсā Ёv` N c ЁЁ( 'ЁЁ`2Ё4Nݠd Nܨ c҂ CЂЂЁ` `2Ё4 Ёv҂Ё`Z\`KdJeJ`KЁv`2Ё4\ ЁHNc c Ё`c2҂`2Ё4Z L Ё`2Ё4X_ @Ё( 'ЁЁvC_ ` @!5Ё`P% % cC3cO`O` _Ё UNC` _(`Oc`Ё Uc ҁсځc _k ҁk` C҂0C@c ` ` NC҂2C?N,܃, ( `2(`)<)c}c}c})(9`2ЁF((cc)@Y1c(9`2Ё4`2Ё4` n((ccL0    `2݋ZN:`2=\:^`2>\;``2?N<\9N@҂bN@1҂dNC8C 8тf~Ђh   2 N t2Ё4c)(9cH ЁcH Ёk<c `NݣjN@1CwuNN@1lC8(L0 K M0(7- 5C(7AC(7Cc ` ` N@2ǂ('WN@1(SKL0 K kA(A' 'Wc ҂4 ЁЁ`2Ё4 ЁHC:C:$C: n oNC8Ђ6(KS ('QЁc o(` nЂ8NЁFNegDg`gE  0((wKL0@Ђ:ؠ~gc".߂<ݗ<Ё``2ЁFc".), k,Ёbccс\^ ~Ёdc".Ђ>), ЁvNЁ`@Ђ@ Ёv@Ђ@(S-L c`2Ё4CЂBЂDЂDЂB- DiH Ё(Q'L+ ЁN`C(7EC(7Gؠ  @ i % % @ g L? Ё gi eg  @i `2Ё4Ё ( '.c .Q @i( 'Ё(V .` c ҁk ҁC8C:҂nh ҁc L0 (' M0` ( @y1c ҂p(u l (7S @ igzk ` N@1܂rc ` (S C3C8P  (S- @#5 n` /` #/W("C/Ё Q RW/ЁcR QЀ3` _ `N`NH ܦFD ܿFD ܊FD ܹFcNC(dNcNC:K C:Ё(c cC * C8*>( '*WH (Ё(c҂HCNCʠN҂J܅LۂJN݅NC8C:( '*`2ЁF((c҂Nc` C,NcC,Ђ8` Ncc ))@Y1`)<)'(8 c (9c c (9c c (9'vc$`2(`)<)c}(9c}c|)(9)(9`2ܰPd2ݣN@h1@Ё> 2 RT@ ܜV@ ݏN҂XC92Ё4V Ё`2ЁF`,Ёbccс\^ ~(!L(#ЁdЁdN`+ڂtܗvc҂xNC܈z`NN(QlQ(SkQdNЂ|Ђ~ЁZccЁcc`+`+`+Ёnс\^khQЁd-Q,SNc 0`+ڂtܡc҂x҂NC҂܈zd+҂zN `2Ё4T Ё@iڂтNc+.҂ݗxN҂ݡxN҂d+҂z݈N@i`LcNЂc*. +2Ё4ЁCgт&т& M Ё`2Ё4H ЁH Ё`2Ё4`25XH Ё N`.`'Ё``2Ё4HÑ ЁH Ё`25XH Ё yW`.n`.N`.N5cH Ё5H Ё`.hQhS55`.ݤWn`.N`.x`.5H Ёc.҂N5cH ЁN݁N5cH Ё`.hQhS55 LG$INSPECT @ ic'`25XH Ё Ёv`+Ёn`2Ё4 ЁvNNC-H HC  HC Ђ Ђa#F F FMFe0ЂC8K9E3ЂЂK9҂ KC8C8C8`Zтc+.2cZ2`Z`LЂ2@@7Ђтf~Ђh('Q('S,mShW`Y` @7+QS҂ЂЂ S 낤22dYC82cZтт8 ҂. 6c/MM 0dY҂ЂKFЂ2F.Ђтf~Ђh R+UmЂ2eYl`!YЂ(sU+%`!Y@72h`!Y'%,%U3 тf~ =ЂCi҂K9҂c4҂#34҂= %4( (2@kЁf = $4(%3(-sUЂK9`Z ,sQK9҂ & .0 C?  .Ђ 6.M. .FЂ`L`-LNC LЂC-M L Ђ7F0@3ЂN 2Ђuv ! ,!dc!d!ed! c88  k8`k    C$m9omEmuЁ    c$ 99(8C@uKN N3u 209i' Du9iDu 2@u9iNЂ@i@o`,ЁNЂ|@i@o`,ЁHؠ~g`~h .8 ~is@u@vтE@C`/E `/D`2Ё4Ђ:c/d (Q'Ётf~ЂhcLЂ`LЂkW,sQK9 +,C8d+c*.C9C8d+ЁNc/D ЁЂhcLЁЂЂ$L,`L ,+kW+'W@ihW+'U(UW@i('U,mU +-`+NЂCgЁNт&҂Ђтf~KX@9`L4 -+Ё4H Ё`,`2ЁFЁHЂ~cтf~fRKR` 2Ё4`2Ё4@@ .(Ё` 2Ё4c.҂Nܣݰe.e.N@{15c(S'ЁN5(Q'ЁЁXтf~`+ЁnoiЂhЁH Ё`2Ё4HÑ ЁR9(NЁHт9bB; ;.Ђ:5Lc2;VV9$ .$҂ .&҂:1 S E3҂E3Ё0=0F`1d17Lco:LF778=Fe1 10c07:LFc1:c҂c ҂҂E3Ё0F778@҂ 0 0"kE3Ё҂(CCgH C҃gD C ҃E D C҃C-d@gEg< =M=M g C ҃ @   ҃ЁC g҂ 2d?2҃@gC9`2``2 2Ё4(,' M0? @@ >c4C9CC8C8kҁ^c(lҁ^.? @(%c/D ('(5@ (' ~@@۠<``c@k`c``@g ~`@2=, +2= +ocdo nZ @ 5AS@$5AS.0 60M0K'IR 6. .A@8C@JLJ B EEomoqmqsms#g$ gck#i$ i#k$ k#~҂&f L ('Ё  gi %~ Ђؠ.8 Ci3Ђ:K i 0C B&/" Z E rX @ l # ~ 8  M Q g 9 Y @c 3e 3`/C E @@C@ E@ RC E (4c3҃e3($(3(%(4d 4 3nC҃C RC !3n !3nDSn҃C҃C RDS@RR L c/E c4e4`4#34 34(m5 36 & .C8`/ E3 T>>ҁ~HX''C E D X  C ҃ C ҃ C҃   XLX҃"`MC ҃$E 0L0E3?bX  C ҃&M0D3 @ C L  RCRE R`/MR(m5c/D RXc/@ 0  g<C%B"sgA ."-C-r-/^~$C%#&&&&&5**++,9,h,00E=CHJRB9b=%:(ABHA-9@@@B:!<=,<<A6q&BB=?@=;C%y%@q%%&L&&w@@/&''";Z<3(P(8''((4(9+<)B))**K***+V+,$,,,0-b-$-- --(? @ /$. .//10119A1B1^11|155O11`9h7`1 zh%h#h!` 2Ѐр( 'Ѐ @)( DЀ Z('-' X,RR,RR,RsLX@ss-Rs X  (sЀ Z@*B;HK5/556667>77%988q9r8|8O899:g>>?6???????INTAAAA$., XCZi+%y%@q%%&L&&w@@/&''";Z<3(P(8''((4(9+<)B))**K***+V+,$,,,0-b-$-- --(? @ /$. .//10119A1B1^11|155O11ҁ\c@`@ !@2ҁZc@ @ E 2 !@2с^`d?c>ҁbc?Ex`? 2!?ҁ`c?ҁdc? ? E 2 2!?ҁ``> D H X ( - LX@5 n;.@7Ѐс Ё"(' @iZX Ѐ ZBB , @4@25@  nVV;B]V-]B@2A+u  Ё2 C^CcI`Ic `2Ѐ( 'Ѐҁ4k7`2Ѐ`2Ѐ(7'ЀЁ6`2Ѐ ^! @^c>c Ё8Ё:! ^(y#` Ҁ`Q`QЁ<Ё>c ҁ:c>Ҁҁ@@.c29 9E1cz2`z2+u ҁB`2Ѐ(S'Ѐ k!ҁ8`QЁ<Ё>I `D I EЁD(%+ЁFExEx`?c>`2c>ExExtOItOIc>`@c>Ex`? &2 '2 (2 2 f2@Ёf 2Dg\ 2&C \ 2'\ 2(\ 2\ 2f@`  Ёh\ 2Dg). L ` OI@gЁjL Dg  IPgڀXeIPg@f IЀ CegЁl(:'l:CCЁl@ H ЀcQ.HЀ@+I%+c%@P(ucQ(:Rh:k<(<'Ѐ EHJ@( Ji+%iv5(i JLJKJ&(%3(#yҀ(u!`>ЁHh:`QЁ<(ulЁ>(y#(3%k<(!u ЁJEL0  C ЁLCC:@&5ЁN  I ЁP`I I cEЁD@a@ 9 (  ` MJ f #LJ  $ = &@J #fLJ $= & ЁJ*   9 `2Ѐ(S'Ѐ (u        !  "  %cXOIOI` '``````Xc ` WCa ҁ2cC Z*.@7сnpC8ҁprcQ`Q(R:C8 -C:C:Ёt - -ЁvC:M0 C Ѐc> I `D I E(%+ЁxEЁzс|~=KC ҁ~MJC  C K 9&  K 9E1`z2 `29cc9ҁ 9E1cz2 d9!9I BISR I cEЁD('ЀC ҁ &2ЀЀ K @ Ёl!=Ce cEҀ A**Oo`@@ЁDD oPg!cRN / / ! !( Ir#L#! !Ci3ЁK i 0&K! Di&KH ' Di&K !!CE Ё'  'Di 2i&K&ioDk 2k    $Diio XHFH c/L0L0с S . 6M 0  FҁL 0ҁL 0  FR  FC8R 'C 8R '  '`/ '3e3c@3e@3@@c 3e 3`/C E @@C@ oPeoPD C @*Oo lT* CODE OUTPUT TO FILEOo@@o l@*Oo lc"H----H%* dL d 4    ,,,,+u(uc E@Ёؠ ED#ЁhLh hh h` + c E h@i #5@с D#c0 ҁ+L#cҁHJKJҁ( JiKNҁ N N*ҁ@v#(i JLE@ RC E (4c3ҁe3($(3(%(4d 4 3nCҁC RC !3n !3nDSnҁCҁC RDS@RR L c/E c4e4`4#34 34(m5 36 & .C8`/ E3 T'(ҁ HX''C E D X  C ҁC ҁCҁ  XLXҁ`MC ҁE 0L0E3)=X  C ҁM0D3 @ C L  RCRE R`/MR(m5c/D RXc/@ 0(,' M0())&C 8J#I BDDC I (9 ( (  *#  OoGREVISION( jcЁ 2** COMPILER COPYRIGHT (C) 1978,1982 MICRO FOCUS LTDOo 6** ERRORS= DATA= CODE= DICT= : /Oo(kIrK$yc( pIrK$D OFF$( I-I,IrK$(IrK$(3I-7I(I1rK$ ƠDNONE $(/I-3I,I1rK$(1IrK$IGSA FLAGS=)`/`<`cXؠKUC8C9* M0'(c4C9CC8C8kҁc(lҁ.()(%c/D ('(5)(' ~*k*&u``c*k`c``@g ~`@2' +2& +ocdo nZ @ 5+.@$5+..0 60M0K'IR 6. .+a@8C@JLJ B EEomoqmqsms#g$ gck#i$ i#k$ k#~$ ~#$ #$ @+immii   i+ii&Kim+,T@m,A ~,A ' ( @i ' ( MJKLJg = @@JKLJg= @ ) * ' @i ) *' .;7A;.A7`2&-& o +-Dk kخ,Bk _2Nu7+M' E3 D OZem|  >C B&/" Z E rX @ l # ~ 8  M Q g 9 Y  g<C%#.Cj/ҀР©RIGHT (C) 1978,1982 MICRO FOCUS LTD'1234567890123456789012345678901234567890'1234567890123456789012345678901234567890'1234567890123456789012345678901234567890'1234567890123456789012345678901234567890 C^CҀ @  Ҁ@@(CҀ.UC\WC̠@ Ҁ(܂ܧՀW(@IN@C @( Ҁ`Cҁ cCr` nҀ@ NЁ CҁcCr` nҀ@ ЁCҁe&&&fC+w!h,*],())&u* _,_;5Pg"!_"#,+?+.,0b<)X! - h L i+F# !!a!!##5##$$#$&&[&'\''}''(^(())))v){))*INT-TEM AAAA$., X-5:  >C B&/" Z E rX @ l # ~ 8  M Q g 9 Y  g<C%#.Cj/@ ЁCҁҀ@ ЁCҁҀ@ ЁCrҁҀ@ cҁc nЁҀD@HCH - f io  - f i  $ i`.oP`.Pc n N. ` #NҀ` CϠҁҀ@ ЁCҁcҀ@ NЁ Cҁ cҀ@ NЁ Cҁ"cҀ@ Ё N@1Ӂ$Nݘ` `N.NCԠҁ&cҀ@ Ё Nܽ(ܲ*ܳ*ܴ*.,.N@1CNCZ`,c,/c-c-N@1:C`-C`-CŠ` -c,$c-/c. .N@1:Ё0cY.@5$@5ЁD/N[c/`/N:Ё0@5d ЁD/cc0NCNC6NCe`0Cf`0Cg`0c0/c+c,`,c-`-c0 s!,0c0ҁncr!,@c0@cr!,d0cr!,d0c0D@e,e- ,1$-1L; 1;L= =d1  !1prtc.c.ҁfCCnC@1@1ݴN:Ё0@5 n$N:C `NC٠ҁ2ҁ@ $(N4`6a8b:܉<Á>|@܏@@C@ (-ҁC8ҁBC8C9C:.L`@@5 nN:@C@C@C@CN:Ё0@5.;ЁDN@M16NCg@D# "u N6NݥA,.!N:݈`N:NK  N6FNNH CH CH K N@[16%,.cW. , $-  0 ЁvNCzҁxҁ@ $(@SNDSܩzܬ|CSҁ~(-ҁ.NҁNCҁNЁ@v1(ܞʁf@(1@1@1@1@1ЁjNofݝN݀NЁjN c$N@k1@y1Ё*jCUҀcҁ@ NЁ C\ҁҁ@ NЁ CҀCؠҁCҀCҁCՠҀCaҀ@$-N.` #NC B C8C9C:C:$C:NC @5K D5@  L nN @@@(CҁHcЁҁҁ@ NЁ ЁJZTI IЁLЁJZV IIЁLCҁNcҁ@ Ё CҁPҁRЁJ@ NЁ0@5.;X H n`+`0ЁTN.VYEX XXZ\^`b܅dсVfc+`+N@1  2C#ҁh`2Ё0c  D   .@ XL/ @5 nN3c,N:Cޠҁj`,NҁlC`,CƠ`,$N= H n ZX( (u@i1@/i` (u `  ( (u l/ 1  2@ X gi1c2  X  ؠ  `2ЁI( &( (qd2c !2e2خ,Bk _2Nu7+M' E3 D OZem|  >C B&/" Z E rX @ l # ~ 8  M Q g 9 Y  g<C%(pJy-E]/Wya5R !9Qi#Dl :u]U error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; 8 8II<9c/ ,  qU]i}ASS-SI AAAA$., X+M' E3 D OZem|  >C B&/" Z E rX @ l # ~ 8  M Q g 9 Y  g<C%(pJy-E]/Wya5R !9Qi#Dl :u]Uconsult your Technical Support service 'DIVISION' missing 'SECTION' missing 'IDENTIFICATION' missing 'PROGRAM-ID' missing 'AUTHOR' missing 'INSTALLATION' missing 'DATE-WRITTEN' missing 'SECURITY' missing 'ENVIRONMENT' missing 'CONFIGURATION' missing 'SOURCE-COMPUTER' missing OBJECT-COMPUTER or SPECIAL-NAMES clause in error 'OBJECT-COMPUTER' missing Compiler error; consult your Technical Support service 'SPECIAL-NAMES' missing SWITCH clause in error DECIMAL-POINT clause in error CONSOLE claCompiler error; consult your Technical Support service Illegal format of name Illegal format of literal or invalid use of ALL Illegal format of character, or name required Data-name declared twice Too many data or procedure names declared - compilation abandoned Illegal character in column 7 or continuation line error Nested COPY statement or unknown file specified '.' missing The statement starts in the wrong area of the source line Compiler error; consult your Technical Support service Compileruse in error Illegal currency symbol Compiler error; consult your Technical Support service 'DIVISION' missing' 'SECTION' missing 'INPUT-OUTPUT' missing 'FILE-CONTROL' missing 'ASSIGN' missing 'SEQUENTIAL' or 'RELATIVE' or 'INDEXED' missing 'ACCESS' missing on indexed or relative file 'SEQUENTIAL' or 'DYNAMIC' missing Illegal combination of ORGANIZATION/ACCESS/KEY Unrecognized clause in SELECT statement RERUN clause contains syntax error SAME AREA clause contains syntax error File-name missinor more than 8192 bytes REDEFINES of different levels or unequal field lengths Data Division exceeds 32k and data item has address above 7FFF Compiler error; consult your Technical Support service Data description clause inappropriate or repeated REDEFINES data-name not declared USAGE must be COMP, DISPLAY or INDEX SIGN must be LEADING or TRAILING SYNCHRONIZED must be LEFT or RIGHT JUSTIFIED must be RIGHT BLANK must be ZERO OCCURS must be numeric, non-zero and unsigned VALUE must be a literal, ng or illegal 'DATA DIVISION' missing 'PROCEDURE DIVISION' missing or unknown statement 'EXCLUSIVE', 'AUTOMATIC' OR 'MANUAL' missing Non-exclusive lock mode specified for restricted file Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service 'DIVISION' missing 'SECTION' missing File-name not specified in SELECT statement RECORD SIZE integer missing Illegal level number or level 01 requireumeric literal or figurative constant PICTURE string has illegal character or illegal precedence INDEXED data-name missing or already declared Numeric edited PICTURE string is too large Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Compiler error; consult your Technical Supd FD qualification contains syntax error 'WORKING-STORAGE' missing 'PROCEDURE DIVISION' missing or unknown statement Unrecognized clause in data description or previous '.' missing Incompatible clauses in data description BLANK is illegal with a non-numeric data-item PICTURE clause is too long VALUE with non-elementary item, wrong data-type or value truncated VALUE clause in error or illegal for PICTURE type FILLER/SYNC/JUST/BLANK clause for non-elementary item Preceding item at this level has 0 port service Compiler error; consult your Technical Support service Compiler error; consult your Technical Support service Unrecognized verb IF....ELSE mismatch, or EXIT statement not alone in paragraph Data-item has wrong data-type or is not declared Procedure nam