       01  BUN-DATE-FILLER.
           05                               PIC X(33)  VALUE
               '201101010012012010100220130101003'.
       01  BUN-DATE-TABLE REDEFINES BUN-DATE-FILLER.
           05  BUN-DATE-ENTRY OCCURS 3 TIMES.
               10  BUN-DATE                 PIC  X(08).
               10  BUN-DATE-CODE            PIC  9(03).
       01  BUN-MAX-DATE                     PIC S9(07) COMP-3 VALUE +3.
       01  BUN-SUB                          PIC S9(07) COMP-3.
       01  BUN-CBSA-FILLER.
           05                               PIC  X(50) VALUE
               '     00000   0100003   0200006   0300009   0400012'.
           05                               PIC  X(50) VALUE
               '   0500015   0600018   0700021   0800024   1000027'.
           05                               PIC  X(50) VALUE
               '   1100030   1200033   1300036   1400039   1500042'.
           05                               PIC  X(50) VALUE
               '   1600045   1700048   1800051   1900054   2000057'.
           05                               PIC  X(50) VALUE
               '   2100060   2200063   2300066   2400069   2500072'.
           05                               PIC  X(50) VALUE
               '   2600075   2700078   2800081   2900084   3000087'.
           05                               PIC  X(50) VALUE
               '   3200090   3300093   3400096   3500099   3600102'.
           05                               PIC  X(50) VALUE
               '   3700105   3800108   3900111   4000114   4200117'.
           05                               PIC  X(50) VALUE
               '   4300120   4400123   4500126   4600129   4700132'.
           05                               PIC  X(50) VALUE
               '   4800135   4900138   5000141   5100144   5200147'.
           05                               PIC  X(50) VALUE
               '   5300150   5500152   6700154   6800156   6900158'.
           05                               PIC  X(50) VALUE
               '   7000160   7100162   7200164   7300166   7400168'.
           05                               PIC  X(50) VALUE
               '   7500170   7600172   7700174   7800176   8000178'.
           05                               PIC  X(50) VALUE
               '10180001811038000184104200018710500001901058000193'.
           05                               PIC  X(50) VALUE
               '10740001961078000199109000020211020002051110000208'.
           05                               PIC  X(50) VALUE
               '11180002111126000214113000021711340002201146000223'.
           05                               PIC  X(50) VALUE
               '11500002261154000229117000023212020002351206000238'.
           05                               PIC  X(50) VALUE
               '12100002411222000244122600024712420002501254000253'.
           05                               PIC  X(50) VALUE
               '12580002561262000259127000026212940002651298000268'.
           05                               PIC  X(50) VALUE
               '13020002711314000274133800027713460002801364400283'.
           05                               PIC  X(50) VALUE
               '13740002861378000289138200029213900002951398000298'.
           05                               PIC  X(50) VALUE
               '14020003011406000304142600030714484003101450000313'.
           05                               PIC  X(50) VALUE
               '14540003161474000319148600032215180003251526000328'.
           05                               PIC  X(50) VALUE
               '15380003311550000334155400033715764003401580400343'.
           05                               PIC  X(50) VALUE
               '15940003461598000349160200035216180003551622000358'.
           05                               PIC  X(50) VALUE
               '16300003611658000364166200036716700003701674000373'.
           05                               PIC  X(50) VALUE
               '16820003761686000379169400038216974003841702000387'.
           05                               PIC  X(50) VALUE
               '17140003901730000393174200039617460003991766000402'.
           05                               PIC  X(50) VALUE
               '17780004051782000408178600041117900004141798000417'.
           05                               PIC  X(50) VALUE
               '18020004201814000423185800042618700004291888000432'.
           05                               PIC  X(50) VALUE
               '19060004351912400438191400044119180004441926000447'.
           05                               PIC  X(50) VALUE
               '19340004501938000453194600045619500004591966000462'.
           05                               PIC  X(50) VALUE
               '19740004651978000468198040047120020004742010000477'.
           05                               PIC  X(50) VALUE
               '20220004802026000483205000048620740004892076400492'.
           05                               PIC  X(50) VALUE
               '20940004952106000498211400050121300005042134000507'.
           05                               PIC  X(50) VALUE
               '21500005102166000513217800051621820005192194000522'.
           05                               PIC  X(50) VALUE
               '22020005252214000528221800053122220005342238000537'.
           05                               PIC  X(50) VALUE
               '22420005402250000543225200054622540005492266000552'.
           05                               PIC  X(50) VALUE
               '22744005542290000557230600056023104005632342000566'.
           05                               PIC  X(50) VALUE
               '23460005692354000572235800057523844005782402000581'.
           05                               PIC  X(50) VALUE
               '24140005842422000587243000059024340005932450000596'.
           05                               PIC  X(50) VALUE
               '24540005992458000602246600060524780006082486000611'.
           05                               PIC  X(50) VALUE
               '25020006142506000617251800062025260006232542000626'.
           05                               PIC  X(50) VALUE
               '25500006292554000632256200063525860006382598000641'.
           05                               PIC  X(50) VALUE
               '26100006442618000647263000065026380006532642000656'.
           05                               PIC  X(50) VALUE
               '26580006592662000662268200066526900006682698000671'.
           05                               PIC  X(50) VALUE
               '27060006742710000677271400068027180006832726000686'.
           05                               PIC  X(50) VALUE
               '27340006892750000692276200069527740006982778000701'.
           05                               PIC  X(50) VALUE
               '27860007042790000707280200071028100007132814000716'.
           05                               PIC  X(50) VALUE
               '28420007192866000722287000072528740007282894000731'.
           05                               PIC  X(50) VALUE
               '29020007342910000737291400074029180007432934000746'.
           05                               PIC  X(50) VALUE
               '29404007492942000752294600075529540007582962000761'.
           05                               PIC  X(50) VALUE
               '29700007642974000767298200077029940007733002000776'.
           05                               PIC  X(50) VALUE
               '30140007793030000782303400078530460007883062000791'.
           05                               PIC  X(50) VALUE
               '30700007943078000797308600080030980008033102000806'.
           05                               PIC  X(50) VALUE
               '31084008093114000812311800081531340008183142000821'.
           05                               PIC  X(50) VALUE
               '31460008243154000827317000083031740008333186000836'.
           05                               PIC  X(50) VALUE
               '31900008393242000842325800084532780008483282000851'.
           05                               PIC  X(50) VALUE
               '32900008543312400857331400086033260008633334000866'.
           05                               PIC  X(50) VALUE
               '33460008693354000872336600087533700008783374000881'.
           05                               PIC  X(50) VALUE
               '33780008843386000887340600089034100008933458000896'.
           05                               PIC  X(50) VALUE
               '34620008993474000902348200090534900009083494000911'.
           05                               PIC  X(50) VALUE
               '34980009143500400917350840092035300009233538000926'.
           05                               PIC  X(50) VALUE
               '35644009293566000932358400093535980009383608400941'.
           05                               PIC  X(50) VALUE
               '36100009443614000947362200095036260009533642000956'.
           05                               PIC  X(50) VALUE
               '36500009593654000962367400096536780009683698000971'.
           05                               PIC  X(50) VALUE
               '37100009743734000977373800098037460009833762000986'.
           05                               PIC  X(50) VALUE
               '37700009893776400992378600099537900009983796401001'.
           05                               PIC  X(50) VALUE
               '38060010043822001007383000101038340010133854001016'.
           05                               PIC  X(50) VALUE
               '38660010193886001022389000102538940010283910001031'.
           05                               PIC  X(50) VALUE
               '39140010343930001037393400104039380010433946001046'.
           05                               PIC  X(50) VALUE
               '39540010493958001052396600105539740010583982001061'.
           05                               PIC  X(50) VALUE
               '39900010644006001067401400107040220010734034001076'.
           05                               PIC  X(50) VALUE
               '40380010794042001082404840108540580010884066001091'.
           05                               PIC  X(50) VALUE
               '40900010944098001097410600110041100011034114001106'.
           05                               PIC  X(50) VALUE
               '41180011094142001112415000111541540011184162001121'.
           05                               PIC  X(50) VALUE
               '41660011244170001127417400113041780011334188401136'.
           05                               PIC  X(50) VALUE
               '41900011394194001142419800114542020011484204401151'.
           05                               PIC  X(50) VALUE
               '42060011544210001157421400116042220011634234001166'.
           05                               PIC  X(50) VALUE
               '42540011694264401172426800117543100011784330001181'.
           05                               PIC  X(50) VALUE
               '43340011844358001187436200119043780011934390001196'.
           05                               PIC  X(50) VALUE
               '44060011994410001202441400120544180012084422001211'.
           05                               PIC  X(50) VALUE
               '44300012144460001217447000122044940012234506001226'.
           05                               PIC  X(50) VALUE
               '45104012294522001232453000123545460012384550001241'.
           05                               PIC  X(50) VALUE
               '45780012444582001247459400125046060012534614001256'.
           05                               PIC  X(50) VALUE
               '46220012594634001262465400126546660012684670001271'.
           05                               PIC  X(50) VALUE
               '47020012744722001277472600128047300012834738001286'.
           05                               PIC  X(50) VALUE
               '47580012894764401292478940129547940012984814001301'.
           05                               PIC  X(50) VALUE
               '48300013044842401307485400131048620013134866001316'.
           05                               PIC  X(50) VALUE
               '48700013194886401322489000132549020013284918001331'.
           05                               PIC  X(50) VALUE
               '49340013344942001337495000134049620013434966001346'.
           05                               PIC  X(20) VALUE
               '49700013494974001352'.
       01  BUN-CBSA-TABLE REDEFINES BUN-CBSA-FILLER.
           05  BUN-CBSA-ENTRY OCCURS 457 TIMES
                   ASCENDING KEY IS BUN-CBSA-VALUE
                   INDEXED BY BUN-INDX.
               10  BUN-CBSA-VALUE           PIC  X(05).
               10  BUN-PTR                  PIC  9(05).
       01  BUN-MAX                         PIC S9(07) COMP-3 VALUE +457.
       01  BUN-WAGE-INDEX-FILLER.
           05                               PIC  X(32) VALUE
               '00107380002072600030712100112626'.
           05                               PIC  X(32) VALUE
               '00212846003128070010909500208826'.
           05                               PIC  X(32) VALUE
               '00309182001072220020719400307350'.
           05                               PIC  X(32) VALUE
               '00112056002121940031256700109933'.
           05                               PIC  X(32) VALUE
               '00210126003102080011112800211287'.
           05                               PIC  X(32) VALUE
               '00311128001097570021000800310171'.
           05                               PIC  X(32) VALUE
               '00108409002083610030806200107566'.
           05                               PIC  X(32) VALUE
               '00207547003074210011118900211200'.
           05                               PIC  X(32) VALUE
               '00310728001075560020753100307583'.
           05                               PIC  X(32) VALUE
               '00108343002084260030843800108391'.
           05                               PIC  X(32) VALUE
               '00208551003084720010854500208618'.
           05                               PIC  X(32) VALUE
               '00308351001079810020804100307997'.
           05                               PIC  X(32) VALUE
               '00107830002078250030787700107712'.
           05                               PIC  X(32) VALUE
               '00207749003077180010858800208581'.
           05                               PIC  X(32) VALUE
               '00308300001091750020929100308797'.
           05                               PIC  X(32) VALUE
               '00111769002139620031354000108555'.
           05                               PIC  X(32) VALUE
               '00208295003083870010903800209107'.
           05                               PIC  X(32) VALUE
               '00309053001076200020753900307537'.
           05                               PIC  X(32) VALUE
               '00107655002076730030762200108517'.
           05                               PIC  X(32) VALUE
               '00208615003086000010891100208872'.
           05                               PIC  X(32) VALUE
               '00308733001093500020963700309739'.
           05                               PIC  X(32) VALUE
               '00110207002104410031037200108911'.
           05                               PIC  X(32) VALUE
               '00208878003088790010818500208152'.
           05                               PIC  X(32) VALUE
               '00308199001083590020828800308271'.
           05                               PIC  X(32) VALUE
               '00106831002072950030689100108561'.
           05                               PIC  X(32) VALUE
               '00208455003084700010786000207848'.
           05                               PIC  X(32) VALUE
               '00307783001100290021033700309500'.
           05                               PIC  X(32) VALUE
               '00108480002084500030838000106000'.
           05                               PIC  X(32) VALUE
               '00205500003050000010841300208277'.
           05                               PIC  X(32) VALUE
               '00308338001085360020830000308124'.
           05                               PIC  X(32) VALUE
               '00107886002077340030755900107806'.
           05                               PIC  X(32) VALUE
               '00207934003079780010864900208719'.
           05                               PIC  X(32) VALUE
               '00308516001095910020970900309725'.
           05                               PIC  X(32) VALUE
               '00107993002075050030718500107841'.
           05                               PIC  X(32) VALUE
               '00207817003077280011018400210231'.
           05                               PIC  X(32) VALUE
               '00310092001074740020737100307333'.
           05                               PIC  X(32) VALUE
               '00109186002089770030914200109528'.
           05                               PIC  X(32) VALUE
               '00209433003092380011205600212194'.
           05                               PIC  X(32) VALUE
               '00107806002079340010840900208361'.
           05                               PIC  X(32) VALUE
               '00108409002083610010798100208041'.
           05                               PIC  X(32) VALUE
               '00107712002077490010856100208455'.
           05                               PIC  X(32) VALUE
               '00108480002084500010780600207934'.
           05                               PIC  X(32) VALUE
               '00112056002121940010854500208618'.
           05                               PIC  X(32) VALUE
               '00109038002091070010834300208426'.
           05                               PIC  X(32) VALUE
               '00109175002092910010800300208444'.
           05                               PIC  X(32) VALUE
               '00308324001060000020550000305000'.
           05                               PIC  X(32) VALUE
               '00108843002088140030872900109036'.
           05                               PIC  X(32) VALUE
               '00208687003084350010865300208680'.
           05                               PIC  X(32) VALUE
               '00308647001094560020955000309542'.
           05                               PIC  X(32) VALUE
               '00107995002080260030785700109194'.
           05                               PIC  X(32) VALUE
               '00209260003090840010862000208917'.
           05                               PIC  X(32) VALUE
               '00308898001086440020871400308506'.
           05                               PIC  X(32) VALUE
               '00109970002100090030959500111964'.
           05                               PIC  X(32) VALUE
               '00212133003121470010919200209266'.
           05                               PIC  X(32) VALUE
               '00309547001086910020852400308929'.
           05                               PIC  X(32) VALUE
               '00110124002101280031011500107918'.
           05                               PIC  X(32) VALUE
               '00207979003075390010936100209226'.
           05                               PIC  X(32) VALUE
               '00309268001090010020891800308555'.
           05                               PIC  X(32) VALUE
               '00109659002096420030948800109549'.
           05                               PIC  X(32) VALUE
               '00209575003095170011112900211033'.
           05                               PIC  X(32) VALUE
               '00311977001071900020787700307437'.
           05                               PIC  X(32) VALUE
               '00109538002095290030937300109514'.
           05                               PIC  X(32) VALUE
               '00209535003097460011170700211817'.
           05                               PIC  X(32) VALUE
               '00311611001102550021015100310147'.
           05                               PIC  X(32) VALUE
               '00109777002099790031018400112823'.
           05                               PIC  X(32) VALUE
               '00212838003128430010858300208523'.
           05                               PIC  X(32) VALUE
               '00308147001096560020993500309912'.
           05                               PIC  X(32) VALUE
               '00109221002089270030918100108488'.
           05                               PIC  X(32) VALUE
               '00208723003085330011139000211748'.
           05                               PIC  X(32) VALUE
               '00311415001113720021139500311119'.
           05                               PIC  X(32) VALUE
               '00110525002103050031037400108674'.
           05                               PIC  X(32) VALUE
               '00208576003087370010871900208731'.
           05                               PIC  X(32) VALUE
               '00308707001086110020843600308516'.
           05                               PIC  X(32) VALUE
               '00107348002072320030726100108314'.
           05                               PIC  X(32) VALUE
               '00208281003083480010898900208725'.
           05                               PIC  X(32) VALUE
               '00308752001094390020947700309502'.
           05                               PIC  X(32) VALUE
               '00109273002092790030889700112178'.
           05                               PIC  X(32) VALUE
               '00212283003123780011006500210086'.
           05                               PIC  X(32) VALUE
               '00310574001086660020859900308665'.
           05                               PIC  X(32) VALUE
               '00110667002112880031082900112547'.
           05                               PIC  X(32) VALUE
               '00212914003131700010917300209183'.
           05                               PIC  X(32) VALUE
               '00308612001092090020906800308792'.
           05                               PIC  X(32) VALUE
               '00109530002097500030999900108863'.
           05                               PIC  X(32) VALUE
               '00208665003084850010994700210021'.
           05                               PIC  X(32) VALUE
               '00309997001112500021121000311262'.
           05                               PIC  X(32) VALUE
               '00110386002102020031047400108749'.
           05                               PIC  X(32) VALUE
               '00208939003088340010919500209341'.
           05                               PIC  X(32) VALUE
               '00309153001089830020867200308860'.
           05                               PIC  X(32) VALUE
               '00110465002105970031055900109655'.
           05                               PIC  X(32) VALUE
               '00210117003101430010884400208831'.
           05                               PIC  X(32) VALUE
               '00308944001102350020989000309907'.
           05                               PIC  X(32) VALUE
               '00107895002081440030805000109354'.
           05                               PIC  X(32) VALUE
               '00209063003088200010942000209321'.
           05                               PIC  X(32) VALUE
               '00309215001093420020918800309195'.
           05                               PIC  X(32) VALUE
               '00108829002087400030867800109392'.
           05                               PIC  X(32) VALUE
               '00209844003097300011059300210600'.
           05                               PIC  X(32) VALUE
               '00111533002110940031119700109699'.
           05                               PIC  X(32) VALUE
               '00209430003095080010788800208193'.
           05                               PIC  X(32) VALUE
               '00308082001077310020767400307592'.
           05                               PIC  X(32) VALUE
               '00109050002089410030908200109364'.
           05                               PIC  X(32) VALUE
               '00209367003092180010958800209690'.
           05                               PIC  X(32) VALUE
               '00309584001094810020984600309364'.
           05                               PIC  X(32) VALUE
               '00108282002081050030833900108733'.
           05                               PIC  X(32) VALUE
               '00208758003085600010902700209040'.
           05                               PIC  X(32) VALUE
               '00308857001094340020972300309564'.
           05                               PIC  X(32) VALUE
               '00110141002099940030976300108585'.
           05                               PIC  X(32) VALUE
               '00208677003085910011045500210898'.
           05                               PIC  X(32) VALUE
               '00310715001088420020896100308916'.
           05                               PIC  X(32) VALUE
               '00108186002078250030883600109860'.
           05                               PIC  X(32) VALUE
               '00209844003098350010862200208374'.
           05                               PIC  X(32) VALUE
               '00308828001096930020983200309977'.
           05                               PIC  X(32) VALUE
               '00108168002078960030821800108400'.
           05                               PIC  X(32) VALUE
               '00209056003091450010914000209281'.
           05                               PIC  X(32) VALUE
               '00309136001076210020733400307261'.
           05                               PIC  X(32) VALUE
               '00107916002080080030799300108736'.
           05                               PIC  X(32) VALUE
               '00208865003087160011071800210647'.
           05                               PIC  X(32) VALUE
               '00310469001096210020980100309616'.
           05                               PIC  X(32) VALUE
               '00109699002095110030936100107435'.
           05                               PIC  X(32) VALUE
               '00207390003073980010992100209909'.
           05                               PIC  X(32) VALUE
               '00309893001087740020869800308662'.
           05                               PIC  X(32) VALUE
               '00110565002103350031074100109664'.
           05                               PIC  X(32) VALUE
               '00209699003095250010963900209597'.
           05                               PIC  X(32) VALUE
               '00309705001110060021086800310806'.
           05                               PIC  X(32) VALUE
               '00109258002096010030860200108449'.
           05                               PIC  X(32) VALUE
               '00208719003082940010946500209405'.
           05                               PIC  X(32) VALUE
               '00309097001084450020852200308205'.
           05                               PIC  X(32) VALUE
               '00108475002085150030842600108360'.
           05                               PIC  X(32) VALUE
               '00208147003078230011138400211587'.
           05                               PIC  X(32) VALUE
               '00311454001084330020867900308401'.
           05                               PIC  X(32) VALUE
               '00111080002113220031081600106000'.
           05                               PIC  X(32) VALUE
               '00205500003050000010806400208136'.
           05                               PIC  X(32) VALUE
               '00308108001093390020979500309323'.
           05                               PIC  X(32) VALUE
               '00109323002092130030897100108616'.
           05                               PIC  X(32) VALUE
               '00209263003092880011244300212427'.
           05                               PIC  X(32) VALUE
               '00312369001114960021113700311257'.
           05                               PIC  X(32) VALUE
               '00108252002082170030808700108144'.
           05                               PIC  X(32) VALUE
               '00207738003076790010922300209291'.
           05                               PIC  X(32) VALUE
               '00309158001098920020987600309833'.
           05                               PIC  X(32) VALUE
               '00110160003103630010759900207620'.
           05                               PIC  X(32) VALUE
               '00307848001093620020936800309633'.
           05                               PIC  X(32) VALUE
               '00109474002095250030951600111422'.
           05                               PIC  X(32) VALUE
               '00211281003115930010718000207934'.
           05                               PIC  X(32) VALUE
               '00307697001091600020937500309631'.
           05                               PIC  X(32) VALUE
               '00109223002090100030932700109084'.
           05                               PIC  X(32) VALUE
               '00209193003092590010850700208504'.
           05                               PIC  X(32) VALUE
               '00308340001090670020869000308560'.
           05                               PIC  X(32) VALUE
               '00107717002075730030725000109850'.
           05                               PIC  X(32) VALUE
               '00209394003094150010916900209145'.
           05                               PIC  X(32) VALUE
               '00309125001082890020846200307927'.
           05                               PIC  X(32) VALUE
               '00109496002095530030959300109586'.
           05                               PIC  X(32) VALUE
               '00209824003097930010888200208798'.
           05                               PIC  X(32) VALUE
               '00308638001093700020963700309694'.
           05                               PIC  X(32) VALUE
               '00109644002096200030973700106000'.
           05                               PIC  X(32) VALUE
               '00205500003050000010887700208505'.
           05                               PIC  X(32) VALUE
               '00308544001092540020916800309422'.
           05                               PIC  X(32) VALUE
               '00111205002107000031099200109296'.
           05                               PIC  X(32) VALUE
               '00209400003095250010915800208773'.
           05                               PIC  X(32) VALUE
               '00309087001109270021070000310869'.
           05                               PIC  X(32) VALUE
               '00107714002079400030803500108693'.
           05                               PIC  X(32) VALUE
               '00208859003086770010895800208926'.
           05                               PIC  X(32) VALUE
               '00308843001086320020852300308024'.
           05                               PIC  X(32) VALUE
               '00111807002116980031215600109151'.
           05                               PIC  X(32) VALUE
               '00209076003089440010785200207841'.
           05                               PIC  X(32) VALUE
               '00307928001098240020994500309933'.
           05                               PIC  X(32) VALUE
               '00108953002088930030863500109191'.
           05                               PIC  X(32) VALUE
               '00208996003086670010966300209336'.
           05                               PIC  X(32) VALUE
               '00309114001096720020966200309870'.
           05                               PIC  X(32) VALUE
               '00109657002100700031012000109842'.
           05                               PIC  X(32) VALUE
               '00208819003092490010915500208938'.
           05                               PIC  X(32) VALUE
               '00308511001080420020817200308177'.
           05                               PIC  X(32) VALUE
               '00108404002081490030767200108884'.
           05                               PIC  X(32) VALUE
               '00208882003088830010780700208074'.
           05                               PIC  X(32) VALUE
               '00307957001094150020923400309458'.
           05                               PIC  X(32) VALUE
               '00108434002082220030826300108105'.
           05                               PIC  X(32) VALUE
               '00207796003073590010809000208715'.
           05                               PIC  X(32) VALUE
               '00308116001077570020771800308084'.
           05                               PIC  X(32) VALUE
               '00108214002082270030782800110292'.
           05                               PIC  X(32) VALUE
               '00209939003098340011061900209807'.
           05                               PIC  X(32) VALUE
               '00310127001096520020963700309614'.
           05                               PIC  X(32) VALUE
               '00109976002095820030970800108798'.
           05                               PIC  X(32) VALUE
               '00209501003091020010758800207399'.
           05                               PIC  X(32) VALUE
               '00307325001090750020917000308953'.
           05                               PIC  X(32) VALUE
               '00107842002078380030757500109130'.
           05                               PIC  X(32) VALUE
               '00209186003087560010980300209685'.
           05                               PIC  X(32) VALUE
               '00310070001092890020950700309316'.
           05                               PIC  X(32) VALUE
               '00108489002083190030856500108196'.
           05                               PIC  X(32) VALUE
               '00207998003078130011078100210311'.
           05                               PIC  X(32) VALUE
               '00310558001102350020996700309760'.
           05                               PIC  X(32) VALUE
               '00108447002084320030826200109344'.
           05                               PIC  X(32) VALUE
               '00209439003094520011029800210477'.
           05                               PIC  X(32) VALUE
               '00310065001079140020773000307486'.
           05                               PIC  X(32) VALUE
               '00109296002091060030904400112099'.
           05                               PIC  X(32) VALUE
               '00212050003120760010853300208853'.
           05                               PIC  X(32) VALUE
               '00308676001082850020854500308351'.
           05                               PIC  X(32) VALUE
               '00107807002080420030799400109358'.
           05                               PIC  X(32) VALUE
               '00209067003093260010890300209038'.
           05                               PIC  X(32) VALUE
               '00309178001088170020883300309023'.
           05                               PIC  X(32) VALUE
               '00109271002093710030922600109617'.
           05                               PIC  X(32) VALUE
               '00209612003097260010854600208558'.
           05                               PIC  X(32) VALUE
               '00308595001087940020859200308456'.
           05                               PIC  X(32) VALUE
               '00108563002085300030855000110296'.
           05                               PIC  X(32) VALUE
               '00209989003100810011213000212287'.
           05                               PIC  X(32) VALUE
               '00312293001088960020890000308862'.
           05                               PIC  X(32) VALUE
               '00108847002087940030887000108694'.
           05                               PIC  X(32) VALUE
               '00208768003086150010920200209122'.
           05                               PIC  X(32) VALUE
               '00308584001079860020811400308050'.
           05                               PIC  X(32) VALUE
               '00111294002112340031126400109869'.
           05                               PIC  X(32) VALUE
               '00210083003100420010784700207912'.
           05                               PIC  X(32) VALUE
               '00307839001090830020934600309413'.
           05                               PIC  X(32) VALUE
               '00108918002092150030899300106000'.
           05                               PIC  X(32) VALUE
               '00205500003050000010883700208878'.
           05                               PIC  X(32) VALUE
               '00308603001100610021031800310400'.
           05                               PIC  X(32) VALUE
               '00109268002092750030904900112359'.
           05                               PIC  X(32) VALUE
               '00212424003129960011012800210085'.
           05                               PIC  X(32) VALUE
               '00310130001094700020935800309694'.
           05                               PIC  X(32) VALUE
               '00109711002105140031064000110183'.
           05                               PIC  X(32) VALUE
               '00209961003099310011114300211105'.
           05                               PIC  X(32) VALUE
               '00311336001089210020915400309001'.
           05                               PIC  X(32) VALUE
               '00107960002080020030746700112104'.
           05                               PIC  X(32) VALUE
               '00212670003128410010799300207964'.
           05                               PIC  X(32) VALUE
               '00307717001086840020872700308472'.
           05                               PIC  X(32) VALUE
               '00108442002081030030785800108137'.
           05                               PIC  X(32) VALUE
               '00208197003082840010704100207031'.
           05                               PIC  X(32) VALUE
               '00306768001103630021023500310340'.
           05                               PIC  X(32) VALUE
               '00108206002078170030873400109809'.
           05                               PIC  X(32) VALUE
               '00209967003110070010873800208653'.
           05                               PIC  X(32) VALUE
               '00308717001146040021451100316045'.
           05                               PIC  X(32) VALUE
               '00109698002097400030926500109457'.
           05                               PIC  X(32) VALUE
               '00209340003090610011231500212416'.
           05                               PIC  X(32) VALUE
               '00312698001114600021132200311223'.
           05                               PIC  X(32) VALUE
               '00111515002115560031206100109070'.
           05                               PIC  X(32) VALUE
               '00209026003089320011295500213052'.
           05                               PIC  X(32) VALUE
               '00312914001088720020865300308237'.
           05                               PIC  X(32) VALUE
               '00109481002094350030937500111215'.
           05                               PIC  X(32) VALUE
               '00211227003113760011635400216080'.
           05                               PIC  X(32) VALUE
               '00316654001084680020844900308455'.
           05                               PIC  X(32) VALUE
               '00110879002106410031030700109436'.
           05                               PIC  X(32) VALUE
               '00209809003097410010926700209220'.
           05                               PIC  X(32) VALUE
               '00309031001088770020893400308810'.
           05                               PIC  X(32) VALUE
               '00111269002113390031139700109583'.
           05                               PIC  X(32) VALUE
               '00209864003100370010916300209128'.
           05                               PIC  X(32) VALUE
               '00309082001095660020931900309433'.
           05                               PIC  X(32) VALUE
               '00108370002082020030811700112377'.
           05                               PIC  X(32) VALUE
               '00212830003130790010921100209042'.
           05                               PIC  X(32) VALUE
               '00308838001084050020937300309880'.
           05                               PIC  X(32) VALUE
               '00107954002083880030797600107455'.
           05                               PIC  X(32) VALUE
               '00207647003074870010829900207885'.
           05                               PIC  X(32) VALUE
               '00307662001109790021069800310551'.
           05                               PIC  X(32) VALUE
               '00108254002080130030781900109149'.
           05                               PIC  X(32) VALUE
               '00208830003088820011080300210760'.
           05                               PIC  X(32) VALUE
               '00310806001106420021056600310477'.
           05                               PIC  X(32) VALUE
               '00108012002077000030784700108605'.
           05                               PIC  X(32) VALUE
               '00208669003085850011037100210616'.
           05                               PIC  X(32) VALUE
               '00310721001095070020942600309555'.
           05                               PIC  X(32) VALUE
               '00106000002055000030500000109899'.
           05                               PIC  X(32) VALUE
               '00209661003099750011147600211454'.
           05                               PIC  X(32) VALUE
               '00311673001107230020978400309577'.
           05                               PIC  X(32) VALUE
               '00111354002113390031132500112234'.
           05                               PIC  X(32) VALUE
               '00212261003120090011071400210639'.
           05                               PIC  X(32) VALUE
               '00310699001093210020940400309133'.
           05                               PIC  X(32) VALUE
               '00108721002086680030851800108759'.
           05                               PIC  X(32) VALUE
               '00208801003085900011058000208630'.
           05                               PIC  X(32) VALUE
               '00309158001098110020964800309488'.
           05                               PIC  X(32) VALUE
               '00110442002102030030982300108904'.
           05                               PIC  X(32) VALUE
               '00209212003090720011413400215584'.
           05                               PIC  X(32) VALUE
               '00314555001104190021059600310328'.
           05                               PIC  X(32) VALUE
               '00109661002097910030969500111570'.
           05                               PIC  X(32) VALUE
               '00211463003113960010882700209166'.
           05                               PIC  X(32) VALUE
               '00309088001109420021080200310708'.
           05                               PIC  X(32) VALUE
               '00108595002086020030870400110033'.
           05                               PIC  X(32) VALUE
               '00209938003099350011002600210185'.
           05                               PIC  X(32) VALUE
               '00310234001090340020901800308898'.
           05                               PIC  X(32) VALUE
               '00108635002088380030884400114053'.
           05                               PIC  X(32) VALUE
               '00213777003147520010872800208512'.
           05                               PIC  X(32) VALUE
               '00308820001110420021072400311010'.
           05                               PIC  X(32) VALUE
               '00109133002090700030887000110302'.
           05                               PIC  X(32) VALUE
               '00210255003098560010909000209165'.
           05                               PIC  X(32) VALUE
               '00309420001111330021122400311069'.
           05                               PIC  X(32) VALUE
               '00115686002156040031607400109005'.
           05                               PIC  X(32) VALUE
               '00209227003092600010926600209415'.
           05                               PIC  X(32) VALUE
               '00309063001083030020827300308221'.
           05                               PIC  X(32) VALUE
               '00108998002090060030893600111979'.
           05                               PIC  X(32) VALUE
               '00211950003119220010868600208167'.
           05                               PIC  X(32) VALUE
               '00308347001157330021590400316327'.
           05                               PIC  X(32) VALUE
               '00106000002055000030500000116703'.
           05                               PIC  X(32) VALUE
               '00216878003173960010600000205500'.
           05                               PIC  X(32) VALUE
               '00305000001129150021307200313081'.
           05                               PIC  X(32) VALUE
               '00112162002120420031203800111909'.
           05                               PIC  X(32) VALUE
               '00212246003126700011674000217111'.
           05                               PIC  X(32) VALUE
               '00318062001108470021066000310400'.
           05                               PIC  X(32) VALUE
               '00116143002161020031644000108907'.
           05                               PIC  X(32) VALUE
               '00209095003089680010823800208328'.
           05                               PIC  X(32) VALUE
               '00308260001115560021154100311771'.
           05                               PIC  X(32) VALUE
               '00109097002090320030885000109233'.
           05                               PIC  X(32) VALUE
               '00209303003095150010827900208011'.
           05                               PIC  X(32) VALUE
               '00308544001085360020850500308412'.
           05                               PIC  X(32) VALUE
               '00109091002095380030901000109299'.
           05                               PIC  X(32) VALUE
               '00209153003083380010994800209426'.
           05                               PIC  X(32) VALUE
               '00309531001093830020932500309186'.
           05                               PIC  X(32) VALUE
               '00110571002105040031082400109130'.
           05                               PIC  X(32) VALUE
               '00208958003091790011025100210247'.
           05                               PIC  X(32) VALUE
               '00310377001083710020868000308581'.
           05                               PIC  X(32) VALUE
               '00109234002089810030923600108779'.
           05                               PIC  X(32) VALUE
               '00209251003095100010731500207054'.
           05                               PIC  X(32) VALUE
               '00307640001126440021305200313356'.
           05                               PIC  X(32) VALUE
               '00107860002075510030745400109905'.
           05                               PIC  X(32) VALUE
               '00209776003098290011134300211384'.
           05                               PIC  X(32) VALUE
               '00311741001088060020859300308521'.
           05                               PIC  X(32) VALUE
               '00109054002090720030903200109205'.
           05                               PIC  X(32) VALUE
               '00209209003091130010774800207937'.
           05                               PIC  X(32) VALUE
               '00307967001094320020914800309034'.
           05                               PIC  X(32) VALUE
               '00108952002088180030896900110150'.
           05                               PIC  X(32) VALUE
               '00210062003103600010948000209318'.
           05                               PIC  X(32) VALUE
               '00309065001087930020836200308139'.
           05                               PIC  X(32) VALUE
               '00108843002086640030853300108065'.
           05                               PIC  X(32) VALUE
               '00208335003083610010847100208441'.
           05                               PIC  X(32) VALUE
               '00308653001079410020799700307918'.
           05                               PIC  X(32) VALUE
               '00114931002146360031584400108219'.
           05                               PIC  X(32) VALUE
               '00208434003089920011053400210222'.
           05                               PIC  X(32) VALUE
               '00310596001089610020900100309208'.
           05                               PIC  X(32) VALUE
               '00110738002103430031034900108403'.
           05                               PIC  X(32) VALUE
               '00208559003084580010802800208245'.
           05                               PIC  X(32) VALUE
               '00308197001096480020962500309543'.
           05                               PIC  X(32) VALUE
               '00110723002108070031065900108462'.
           05                               PIC  X(32) VALUE
               '00208372003084220010956300208962'.
           05                               PIC  X(32) VALUE
               '00308921001096150021016800310037'.
           05                               PIC  X(32) VALUE
               '00109934002098230030966100106675'.
           05                               PIC  X(32) VALUE
               '00206735003068630010889800208696'.
           05                               PIC  X(32) VALUE
               '00308681001095660021009700309048'.
           05                               PIC  X(32) VALUE
               '00107256002080840030823000110580'.
           05                               PIC  X(32) VALUE
               '00210662003106870010920200209107'.
           05                               PIC  X(32) VALUE
               '00309155001100020020910600309249'.
           05                               PIC  X(32) VALUE
               '00108939002083430030866000111012'.
           05                               PIC  X(32) VALUE
               '00211076003112050011006700210433'.
           05                               PIC  X(32) VALUE
               '00310097001060000020550000305000'.
           05                               PIC  X(32) VALUE
               '00109983002096750030955700108625'.
           05                               PIC  X(32) VALUE
               '00208328003082830011104300211808'.
           05                               PIC  X(32) VALUE
               '00312004001092830020935000309517'.
       01  BUN-WAGE-INDEX-TABLE REDEFINES BUN-WAGE-INDEX-FILLER.
           05  BUN-WI-ENTRY OCCURS 1352 TIMES.
               10  BUN-WI-DATE-CODE         PIC  9(03).
               10  BUN-WAGE-INDEX           PIC  9V9(04).
