       01  W-DRG-FILLS.
           03                          PIC X(44)   VALUE
               '00336215548004277724330110643119401206431194'.
           03                          PIC X(44)   VALUE
               '01306431194014051911690160519116901705191169'.
           03                          PIC X(44)   VALUE
               '01805191169020092512490210925124902209251249'.
           03                          PIC X(44)   VALUE
               '02306431194024064311940251760636602606431194'.
           03                          PIC X(44)   VALUE
               '02706431194028176063660290923524803009235248'.
           03                          PIC X(44)   VALUE
               '03108438235032084382350330843823503418864398'.
           03                          PIC X(44)   VALUE
               '03518864398036188643980371760636603817606366'.
           03                          PIC X(44)   VALUE
               '03917606366040138803480410643119404206431194'.
           03                          PIC X(44)   VALUE
               '05209832330053098323300541069126005506431194'.
           03                          PIC X(44)   VALUE
               '05608412240057066782250580643119405906431194'.
           03                          PIC X(44)   VALUE
               '06006431194061087302340620730520106306431194'.
           03                          PIC X(44)   VALUE
               '06409251249065051911690660519116906706431194'.
           03                          PIC X(44)   VALUE
               '06806431194069051911690700873023407107305201'.
           03                          PIC X(44)   VALUE
               '07206431194073092352480740923524807506431194'.
           03                          PIC X(44)   VALUE
               '07606431194077064311940780643119407906431194'.
           03                          PIC X(44)   VALUE
               '08017606366081051911690821027028908307535236'.
           03                          PIC X(44)   VALUE
               '08405191169085102602570860643119408706431194'.
           03                          PIC X(44)   VALUE
               '08817606366089064311940900643119409108704233'.
           03                          PIC X(44)   VALUE
               '09208704233093087042330941066527209507534205'.
           03                          PIC X(44)   VALUE
               '09605191169097096022190980843823509908438235'.
           03                          PIC X(44)   VALUE
               '10007234215101064311941020643119410306431194'.
           03                          PIC X(44)   VALUE
               '11306431194114064311941150643119411606431194'.
           03                          PIC X(44)   VALUE
               '11706431194121106912601220643119412306431194'.
           03                          PIC X(44)   VALUE
               '12406431194125064311941350643119413606431194'.
           03                          PIC X(44)   VALUE
               '13706431194138064311941390519116914005191169'.
           03                          PIC X(44)   VALUE
               '14105191169142051911691430843823514408438235'.
           03                          PIC X(44)   VALUE
               '14508438235146084382351470643119414805191169'.
           03                          PIC X(44)   VALUE
               '14905191169150084382351510843823515208438235'.
           03                          PIC X(44)   VALUE
               '15306431194154176063661550643119415606431194'.
           03                          PIC X(44)   VALUE
               '15710691260158084382351590643119416328678449'.
           03                          PIC X(44)   VALUE
               '16408438235165084382351662350940016714267291'.
           03                          PIC X(44)   VALUE
               '16814267291175072532061760725320617708259216'.
           03                          PIC X(44)   VALUE
               '17805980186179059801861800843823518105191169'.
           03                          PIC X(44)   VALUE
               '18205191169183064311941840643119418506431194'.
           03                          PIC X(44)   VALUE
               '18608212206187064311941880643119418909446213'.
           03                          PIC X(44)   VALUE
               '19007303189191065781631920657816319307073190'.
           03                          PIC X(44)   VALUE
               '19406168179195051911691960643119419705191169'.
           03                          PIC X(44)   VALUE
               '19805191169199059461792000594617920105946179'.
           03                          PIC X(44)   VALUE
               '20210691260203051911692041760636620509098231'.
           03                          PIC X(44)   VALUE
               '20608438235207187733192081140022121519394338'.
           03                          PIC X(44)   VALUE
               '21619394338217193943382181939433821919394338'.
           03                          PIC X(44)   VALUE
               '22019394338221193943382221760636622317606366'.
           03                          PIC X(44)   VALUE
               '22417606366225176063662261069126022710691260'.
           03                          PIC X(44)   VALUE
               '22810691260229106912602311939433823219394338'.
           03                          PIC X(44)   VALUE
               '23319394338234193943382351939433823619394338'.
           03                          PIC X(44)   VALUE
               '23918864398240176063662411760636624217606366'.
           03                          PIC X(44)   VALUE
               '24310691260244106912602451069126024617606366'.
           03                          PIC X(44)   VALUE
               '24710691260248176063662491760636625017606366'.
           03                          PIC X(44)   VALUE
               '25117606366252193943382531939433825419394338'.
           03                          PIC X(44)   VALUE
               '25517606366256176063662571760636625810691260'.
           03                          PIC X(44)   VALUE
               '25910691260260176063662611760636626217606366'.
           03                          PIC X(44)   VALUE
               '26313518321264135183212651069126026613518321'.
           03                          PIC X(44)   VALUE
               '26713518321268064311942690643119427017606366'.
           03                          PIC X(44)   VALUE
               '27110691260272106912602731069126027410691260'.
           03                          PIC X(44)   VALUE
               '28009020234281051911692820519116928308956175'.
           03                          PIC X(44)   VALUE
               '28405191169285051911692861760636628710691260'.
           03                          PIC X(44)   VALUE
               '28811432255289077982352900779823529108612214'.
           03                          PIC X(44)   VALUE
               '29205876180293058761802940843823529508438235'.
           03                          PIC X(44)   VALUE
               '29606431194297051911692980519116929908427225'.
           03                          PIC X(44)   VALUE
               '30004918186301049181863021012524830308438235'.
           03                          PIC X(44)   VALUE
               '30417606366305106912603060837022530705191169'.
           03                          PIC X(44)   VALUE
               '30807023197309070231973100519116931105191169'.
           03                          PIC X(44)   VALUE
               '31217606366313051911693141064124731506324203'.
           03                          PIC X(44)   VALUE
               '31606324203319176063663201069126032617606366'.
           03                          PIC X(44)   VALUE
               '32710691260328051911693291760636633017606366'.
           03                          PIC X(44)   VALUE
               '33105191169332061441893330614418933405191169'.
           03                          PIC X(44)   VALUE
               '33517606366336061441893370519116933809480233'.
           03                          PIC X(44)   VALUE
               '33906144189340051911693410843823534208438235'.
           03                          PIC X(44)   VALUE
               '34308438235344084382353450614418934605191169'.
           03                          PIC X(44)   VALUE
               '34706144189348061441893490519116935009480233'.
           03                          PIC X(44)   VALUE
               '35106144189352051911693531069126035406144189'.
           03                          PIC X(44)   VALUE
               '35505191169356161063523570843823535808438235'.
           03                          PIC X(44)   VALUE
               '36810691260369051911693700519116937109480233'.
           03                          PIC X(44)   VALUE
               '37206144189373051911693741069126037506431194'.
           03                          PIC X(44)   VALUE
               '37606431194377082492023780643119437906431194'.
           03                          PIC X(44)   VALUE
               '38010120275381101202753821012027538305191169'.
           03                          PIC X(44)   VALUE
               '38405191169385091742323860917423238709174232'.
           03                          PIC X(44)   VALUE
               '38809440228389069862063900698620639108600227'.
           03                          PIC X(44)   VALUE
               '39206401195393112062673940838422539508384225'.
           03                          PIC X(44)   VALUE
               '40517606366406064311944070643119440808438235'.
           03                          PIC X(44)   VALUE
               '40906431194410064311944110824920241206431194'.
           03                          PIC X(44)   VALUE
               '41306431194414064311944150643119441606431194'.
           03                          PIC X(44)   VALUE
               '41717606366418051911694190519116942010691260'.
           03                          PIC X(44)   VALUE
               '42110691260422106912604231760636642405191169'.
           03                          PIC X(44)   VALUE
               '42505191169432083172094330831720943408317209'.
           03                          PIC X(44)   VALUE
               '43508438235436051911694370519116943811170253'.
           03                          PIC X(44)   VALUE
               '43908438235440051911694410850721744206431194'.
           03                          PIC X(44)   VALUE
               '44305191169444081412234450618620244605191169'.
           03                          PIC X(44)   VALUE
               '45317606366454088572484550885724845610132245'.
           03                          PIC X(44)   VALUE
               '45708857248458088572484591013224546008857248'.
           03                          PIC X(44)   VALUE
               '46110132245462088572484631557837746411763332'.
           03                          PIC X(44)   VALUE
               '46506431194466176063664671662740446816627404'.
           03                          PIC X(44)   VALUE
               '46916627404470166274044710885724847208857248'.
           03                          PIC X(44)   VALUE
               '47308857248474166274044751662740447608438235'.
           03                          PIC X(44)   VALUE
               '47717606366478084382354790843823548017606366'.
           03                          PIC X(44)   VALUE
               '48117606366482176063664830643119448510691260'.
           03                          PIC X(44)   VALUE
               '48610691260487106912604881760636648917606366'.
           03                          PIC X(44)   VALUE
               '49217606366493084382354940843823549517606366'.
           03                          PIC X(44)   VALUE
               '49608438235497084382354981760636649917606366'.
           03                          PIC X(44)   VALUE
               '50012704343501127043435020519116950310691260'.
           03                          PIC X(44)   VALUE
               '50410691260505106912605060519116950705191169'.
           03                          PIC X(44)   VALUE
               '50805191169509051911695100643119451106431194'.
           03                          PIC X(44)   VALUE
               '51206431194513084382355140843823551514221317'.
           03                          PIC X(44)   VALUE
               '51606431194517064311945181760636651908857248'.
           03                          PIC X(44)   VALUE
               '52008857248521088572485220885724853310691260'.
           03                          PIC X(44)   VALUE
               '53410691260535106912605360519116953710691260'.
           03                          PIC X(44)   VALUE
               '53805191169539108612925400853226754106431194'.
           03                          PIC X(44)   VALUE
               '54210691260543051911695440519116954510691260'.
           03                          PIC X(44)   VALUE
               '54605191169547051911695481002025154907238233'.
           03                          PIC X(44)   VALUE
               '55006431194551115402775520643119455317606366'.
           03                          PIC X(44)   VALUE
               '55408438235555106912605560643119455710123260'.
           03                          PIC X(44)   VALUE
               '55808243257559091012455600755024056106431194'.
           03                          PIC X(44)   VALUE
               '56210691260563106912605641013224556508857248'.
           03                          PIC X(44)   VALUE
               '56608857248570141703365711059230857208438235'.
           03                          PIC X(44)   VALUE
               '57318260460574176063665751069126057617606366'.
           03                          PIC X(44)   VALUE
               '57708438235578084382355791389333058011845309'.
           03                          PIC X(44)   VALUE
               '58105191169582176063665831059230858410691260'.
           03                          PIC X(44)   VALUE
               '58510592308592096562675930720123859407201238'.
           03                          PIC X(44)   VALUE
               '59508438235596051911695970643119459806431194'.
           03                          PIC X(44)   VALUE
               '59906431194600084382356010519116960207661212'.
           03                          PIC X(44)   VALUE
               '60305545181604077942416050643119460610206242'.
           03                          PIC X(44)   VALUE
               '60708438235614084382356150843823561616769380'.
           03                          PIC X(44)   VALUE
               '61713160364618131603646190843823562008438235'.
           03                          PIC X(44)   VALUE
               '62108438235622136593416231038129062408438235'.
           03                          PIC X(44)   VALUE
               '62513622321626106912606270838422562813622321'.
           03                          PIC X(44)   VALUE
               '62910691260630083842256370994725563808167227'.
           03                          PIC X(44)   VALUE
               '63905191169640091712306410651719164210691260'.
           03                          PIC X(44)   VALUE
               '64308438235644064311946450643119465308438235'.
           03                          PIC X(44)   VALUE
               '65408438235655084382356561069126065710691260'.
           03                          PIC X(44)   VALUE
               '65810691260659176063666600843823566108438235'.
           03                          PIC X(44)   VALUE
               '66210691260663106912606641069126066506431194'.
           03                          PIC X(44)   VALUE
               '66606431194667064311946681760636666910691260'.
           03                          PIC X(44)   VALUE
               '67010691260671064311946720643119467314259310'.
           03                          PIC X(44)   VALUE
               '67410567249675064311946820907722668307282207'.
           03                          PIC X(44)   VALUE
               '68406431194686106912606870519116968805191169'.
           03                          PIC X(44)   VALUE
               '68907271203690053911776930519116969405191169'.
           03                          PIC X(44)   VALUE
               '69505191169696051911696970883622969808836229'.
           03                          PIC X(44)   VALUE
               '69905691185700056911857070843823570808438235'.
           03                          PIC X(44)   VALUE
               '70917606366710056911857111760636671206431194'.
           03                          PIC X(44)   VALUE
               '71317606366714176063667150643119471606431194'.
           03                          PIC X(44)   VALUE
               '71717606366718064311947220519116972305191169'.
           03                          PIC X(44)   VALUE
               '72405191169725051911697260519116972707665222'.
           03                          PIC X(44)   VALUE
               '72806067208729084382357300643119473408438235'.
           03                          PIC X(44)   VALUE
               '73508438235736084382357370843823573808438235'.
           03                          PIC X(44)   VALUE
               '73913622321740106912607410519116974208438235'.
           03                          PIC X(44)   VALUE
               '74308438235744106912607451069126074608438235'.
           03                          PIC X(44)   VALUE
               '74708438235748084382357490843823575008438235'.
           03                          PIC X(44)   VALUE
               '75410691260755106912607561069126075708252248'.
           03                          PIC X(44)   VALUE
               '75806431194759064311947600643119476106431194'.
           03                          PIC X(44)   VALUE
               '76806431194769064311947700643119477606431194'.
           03                          PIC X(44)   VALUE
               '77906431194783106912607841069126078510691260'.
           03                          PIC X(44)   VALUE
               '78610691260787106912607881069126078906431194'.
           03                          PIC X(44)   VALUE
               '79006431194791064311947920643119479306431194'.
           03                          PIC X(44)   VALUE
               '79406431194795064311947960643119479706431194'.
           03                          PIC X(44)   VALUE
               '79806431194799161063528000843823580108438235'.
           03                          PIC X(44)   VALUE
               '80210691260803106912608041069126080510691260'.
           03                          PIC X(44)   VALUE
               '80610691260807106912608081069126080905191169'.
           03                          PIC X(44)   VALUE
               '81005191169811081952358120519116981306431194'.
           03                          PIC X(44)   VALUE
               '81408438235815084382358160843823581706431194'.
           03                          PIC X(44)   VALUE
               '81806431194819064311948201069126082110691260'.
           03                          PIC X(44)   VALUE
               '82210691260823106912608241069126082510691260'.
           03                          PIC X(44)   VALUE
               '82610691260827106912608281069126082910691260'.
           03                          PIC X(44)   VALUE
               '83010691260831064311948320643119483306431194'.
           03                          PIC X(44)   VALUE
               '83408438235835084382358360519116983705191169'.
           03                          PIC X(44)   VALUE
               '83805191169839051911698400927022184106431194'.
           03                          PIC X(44)   VALUE
               '84206431194843084382358440843823584508438235'.
           03                          PIC X(44)   VALUE
               '84610691260847106912608481069126084910691260'.
           03                          PIC X(44)   VALUE
               '85317227366854084382358550519116985614258338'.
           03                          PIC X(44)   VALUE
               '85712487319858051911698621087525986307282216'.
           03                          PIC X(44)   VALUE
               '86410691260865111842358660519116986711453248'.
           03                          PIC X(44)   VALUE
               '86806431194869064311948701945229487109290226'.
           03                          PIC X(44)   VALUE
               '87205851184876078812298800495917788106214203'.
           03                          PIC X(44)   VALUE
               '88206214203883062142038840515224588504901231'.
           03                          PIC X(44)   VALUE
               '88604959177887049591778940495917789504670254'.
           03                          PIC X(44)   VALUE
               '89607881229897062142039011426933090209522293'.
           03                          PIC X(44)   VALUE
               '90309522293904176063669050643119490605191169'.
           03                          PIC X(44)   VALUE
               '90715108333908084382359090843823591308438235'.
           03                          PIC X(44)   VALUE
               '91408438235915106912609161069126091710691260'.
           03                          PIC X(44)   VALUE
               '91810691260919116282819200841023992106431194'.
           03                          PIC X(44)   VALUE
               '92208438235923084382359271760636692817606366'.
           03                          PIC X(44)   VALUE
               '92917606366933084382359340643119493508438235'.
           03                          PIC X(44)   VALUE
               '93913077329940094862939410948629394506621205'.
           03                          PIC X(44)   VALUE
               '94604063163947077682019480643119494907550217'.
           03                          PIC X(44)   VALUE
               '95004201151951042011519551069126095610691260'.
           03                          PIC X(44)   VALUE
               '95710691260958106912609591069126096310691260'.
           03                          PIC X(44)   VALUE
               '96405191169965051911699691760636697017606366'.
           03                          PIC X(44)   VALUE
               '97411772232975106912609761069126097710691260'.
           03                          PIC X(44)   VALUE
               '98122674407982129293059831292930598719761393'.
           03                          PIC X(22)   VALUE
               '9881069126098906431194'.
       01  W-DRG-TABLE REDEFINES W-DRG-FILLS.
           03  WWM-ENTRY OCCURS 754 TIMES
                   ASCENDING KEY IS WWM-DRG
                   INDEXED BY WWM-INDX.
               05  WWM-DRG             PIC X(3).
               05  WWM-RELWT           PIC 9(1)V9(4).
               05  WWM-ALOS            PIC 9(2)V9(1).
