       01  BUN-DATE-FILLER.
           05                               PIC X(22)  VALUE
               '2011010100120120101002'.
       01  BUN-DATE-TABLE REDEFINES BUN-DATE-FILLER.
           05  BUN-DATE-ENTRY OCCURS 2 TIMES.
               10  BUN-DATE                 PIC  X(08).
               10  BUN-DATE-CODE            PIC  9(03).
       01  BUN-MAX-DATE                     PIC S9(07) COMP-3 VALUE +2.
       01  BUN-SUB                          PIC S9(07) COMP-3.
       01  BUN-CBSA-FILLER.
           05                               PIC  X(50) VALUE
               '     00000   0100002   0200004   0300006   0400008'.
           05                               PIC  X(50) VALUE
               '   0500010   0600012   0700014   0800016   1000018'.
           05                               PIC  X(50) VALUE
               '   1100020   1200022   1300024   1400026   1500028'.
           05                               PIC  X(50) VALUE
               '   1600030   1700032   1800034   1900036   2000038'.
           05                               PIC  X(50) VALUE
               '   2100040   2200042   2300044   2400046   2500048'.
           05                               PIC  X(50) VALUE
               '   2600050   2700052   2800054   2900056   3000058'.
           05                               PIC  X(50) VALUE
               '   3200060   3300062   3400064   3500066   3600068'.
           05                               PIC  X(50) VALUE
               '   3700070   3800072   3900074   4000076   4200078'.
           05                               PIC  X(50) VALUE
               '   4300080   4400082   4500084   4600086   4700088'.
           05                               PIC  X(50) VALUE
               '   4800090   4900092   5000094   5100096   5200098'.
           05                               PIC  X(50) VALUE
               '   5300100   5500102   6700104   6800106   6900108'.
           05                               PIC  X(50) VALUE
               '   7000110   7100112   7200114   7300116   7400118'.
           05                               PIC  X(50) VALUE
               '   7500120   7600122   7700124   7800126   8000128'.
           05                               PIC  X(50) VALUE
               '10180001301038000132104200013410500001361058000138'.
           05                               PIC  X(50) VALUE
               '10740001401078000142109000014411020001461110000148'.
           05                               PIC  X(50) VALUE
               '11180001501126000152113000015411340001561146000158'.
           05                               PIC  X(50) VALUE
               '11500001601154000162117000016412020001661206000168'.
           05                               PIC  X(50) VALUE
               '12100001701222000172122600017412420001761254000178'.
           05                               PIC  X(50) VALUE
               '12580001801262000182127000018412940001861298000188'.
           05                               PIC  X(50) VALUE
               '13020001901314000192133800019413460001961364400198'.
           05                               PIC  X(50) VALUE
               '13740002001378000202138200020413900002061398000208'.
           05                               PIC  X(50) VALUE
               '14020002101406000212142600021414484002161450000218'.
           05                               PIC  X(50) VALUE
               '14540002201474000222148600022415180002261526000228'.
           05                               PIC  X(50) VALUE
               '15380002301550000232155400023415764002361580400238'.
           05                               PIC  X(50) VALUE
               '15940002401598000242160200024416180002461622000248'.
           05                               PIC  X(50) VALUE
               '16300002501658000252166200025416700002561674000258'.
           05                               PIC  X(50) VALUE
               '16820002601686000262169400026416974002661702000268'.
           05                               PIC  X(50) VALUE
               '17140002701730000272174200027417460002761766000278'.
           05                               PIC  X(50) VALUE
               '17780002801782000282178600028417900002861798000288'.
           05                               PIC  X(50) VALUE
               '18020002901814000292185800029418700002961888000298'.
           05                               PIC  X(50) VALUE
               '19060003001912400302191400030419180003061926000308'.
           05                               PIC  X(50) VALUE
               '19340003101938000312194600031419500003161966000318'.
           05                               PIC  X(50) VALUE
               '19740003201978000322198040032420020003262010000328'.
           05                               PIC  X(50) VALUE
               '20220003302026000332205000033420740003362076400338'.
           05                               PIC  X(50) VALUE
               '20940003402106000342211400034421300003462134000348'.
           05                               PIC  X(50) VALUE
               '21500003502166000352217800035421820003562194000358'.
           05                               PIC  X(50) VALUE
               '22020003602214000362221800036422220003662238000368'.
           05                               PIC  X(50) VALUE
               '22420003702250000372225200037422540003762266000378'.
           05                               PIC  X(50) VALUE
               '22744003792290000381230600038323104003852342000387'.
           05                               PIC  X(50) VALUE
               '23460003892354000391235800039323844003952402000397'.
           05                               PIC  X(50) VALUE
               '24140003992422000401243000040324340004052450000407'.
           05                               PIC  X(50) VALUE
               '24540004092458000411246600041324780004152486000417'.
           05                               PIC  X(50) VALUE
               '25020004192506000421251800042325260004252542000427'.
           05                               PIC  X(50) VALUE
               '25500004292554000431256200043325860004352598000437'.
           05                               PIC  X(50) VALUE
               '26100004392618000441263000044326380004452642000447'.
           05                               PIC  X(50) VALUE
               '26580004492662000451268200045326900004552698000457'.
           05                               PIC  X(50) VALUE
               '27060004592710000461271400046327180004652726000467'.
           05                               PIC  X(50) VALUE
               '27340004692750000471276200047327740004752778000477'.
           05                               PIC  X(50) VALUE
               '27860004792790000481280200048328100004852814000487'.
           05                               PIC  X(50) VALUE
               '28420004892866000491287000049328740004952894000497'.
           05                               PIC  X(50) VALUE
               '29020004992910000501291400050329180005052934000507'.
           05                               PIC  X(50) VALUE
               '29404005092942000511294600051329540005152962000517'.
           05                               PIC  X(50) VALUE
               '29700005192974000521298200052329940005253002000527'.
           05                               PIC  X(50) VALUE
               '30140005293030000531303400053330460005353062000537'.
           05                               PIC  X(50) VALUE
               '30700005393078000541308600054330980005453102000547'.
           05                               PIC  X(50) VALUE
               '31084005493114000551311800055331340005553142000557'.
           05                               PIC  X(50) VALUE
               '31460005593154000561317000056331740005653186000567'.
           05                               PIC  X(50) VALUE
               '31900005693242000571325800057332780005753282000577'.
           05                               PIC  X(50) VALUE
               '32900005793312400581331400058333260005853334000587'.
           05                               PIC  X(50) VALUE
               '33460005893354000591336600059333700005953374000597'.
           05                               PIC  X(50) VALUE
               '33780005993386000601340600060334100006053458000607'.
           05                               PIC  X(50) VALUE
               '34620006093474000611348200061334900006153494000617'.
           05                               PIC  X(50) VALUE
               '34980006193500400621350840062335300006253538000627'.
           05                               PIC  X(50) VALUE
               '35644006293566000631358400063335980006353608400637'.
           05                               PIC  X(50) VALUE
               '36100006393614000641362200064336260006453642000647'.
           05                               PIC  X(50) VALUE
               '36500006493654000651367400065336780006553698000657'.
           05                               PIC  X(50) VALUE
               '37100006593734000661373800066337460006653762000667'.
           05                               PIC  X(50) VALUE
               '37700006693776400671378600067337900006753796400677'.
           05                               PIC  X(50) VALUE
               '38060006793822000681383000068338340006853854000687'.
           05                               PIC  X(50) VALUE
               '38660006893886000691389000069338940006953910000697'.
           05                               PIC  X(50) VALUE
               '39140006993930000701393400070339380007053946000707'.
           05                               PIC  X(50) VALUE
               '39540007093958000711396600071339740007153982000717'.
           05                               PIC  X(50) VALUE
               '39900007194006000721401400072340220007254034000727'.
           05                               PIC  X(50) VALUE
               '40380007294042000731404840073340580007354066000737'.
           05                               PIC  X(50) VALUE
               '40900007394098000741410600074341100007454114000747'.
           05                               PIC  X(50) VALUE
               '41180007494142000751415000075341540007554162000757'.
           05                               PIC  X(50) VALUE
               '41660007594170000761417400076341780007654188400767'.
           05                               PIC  X(50) VALUE
               '41900007694194000771419800077342020007754204400777'.
           05                               PIC  X(50) VALUE
               '42060007794210000781421400078342220007854234000787'.
           05                               PIC  X(50) VALUE
               '42540007894264400791426800079343100007954330000797'.
           05                               PIC  X(50) VALUE
               '43340007994358000801436200080343780008054390000807'.
           05                               PIC  X(50) VALUE
               '44060008094410000811441400081344180008154422000817'.
           05                               PIC  X(50) VALUE
               '44300008194460000821447000082344940008254506000827'.
           05                               PIC  X(50) VALUE
               '45104008294522000831453000083345460008354550000837'.
           05                               PIC  X(50) VALUE
               '45780008394582000841459400084346060008454614000847'.
           05                               PIC  X(50) VALUE
               '46220008494634000851465400085346660008554670000857'.
           05                               PIC  X(50) VALUE
               '47020008594722000861472600086347300008654738000867'.
           05                               PIC  X(50) VALUE
               '47580008694764400871478940087347940008754814000877'.
           05                               PIC  X(50) VALUE
               '48300008794842400881485400088348620008854866000887'.
           05                               PIC  X(50) VALUE
               '48700008894886400891489000089349020008954918000897'.
           05                               PIC  X(50) VALUE
               '49340008994942000901495000090349620009054966000907'.
           05                               PIC  X(20) VALUE
               '49700009094974000911'.
       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
               '00107380002072600011262600212846'.
           05                               PIC  X(32) VALUE
               '00109095002088260010722200207194'.
           05                               PIC  X(32) VALUE
               '00112056002121940010993300210126'.
           05                               PIC  X(32) VALUE
               '00111128002112870010975700210008'.
           05                               PIC  X(32) VALUE
               '00108409002083610010756600207547'.
           05                               PIC  X(32) VALUE
               '00111189002112000010755600207531'.
           05                               PIC  X(32) VALUE
               '00108343002084260010839100208551'.
           05                               PIC  X(32) VALUE
               '00108545002086180010798100208041'.
           05                               PIC  X(32) VALUE
               '00107830002078250010771200207749'.
           05                               PIC  X(32) VALUE
               '00108588002085810010917500209291'.
           05                               PIC  X(32) VALUE
               '00111769002139620010855500208295'.
           05                               PIC  X(32) VALUE
               '00109038002091070010762000207539'.
           05                               PIC  X(32) VALUE
               '00107655002076730010851700208615'.
           05                               PIC  X(32) VALUE
               '00108911002088720010935000209637'.
           05                               PIC  X(32) VALUE
               '00110207002104410010891100208878'.
           05                               PIC  X(32) VALUE
               '00108185002081520010835900208288'.
           05                               PIC  X(32) VALUE
               '00106831002072950010856100208455'.
           05                               PIC  X(32) VALUE
               '00107860002078480011002900210337'.
           05                               PIC  X(32) VALUE
               '00108480002084500010600000205500'.
           05                               PIC  X(32) VALUE
               '00108413002082770010853600208300'.
           05                               PIC  X(32) VALUE
               '00107886002077340010780600207934'.
           05                               PIC  X(32) VALUE
               '00108649002087190010959100209709'.
           05                               PIC  X(32) VALUE
               '00107993002075050010784100207817'.
           05                               PIC  X(32) VALUE
               '00110184002102310010747400207371'.
           05                               PIC  X(32) VALUE
               '00109186002089770010952800209433'.
           05                               PIC  X(32) VALUE
               '00112056002121940010780600207934'.
           05                               PIC  X(32) VALUE
               '00108409002083610010840900208361'.
           05                               PIC  X(32) VALUE
               '00107981002080410010771200207749'.
           05                               PIC  X(32) VALUE
               '00108561002084550010848000208450'.
           05                               PIC  X(32) VALUE
               '00107806002079340011205600212194'.
           05                               PIC  X(32) VALUE
               '00108545002086180010903800209107'.
           05                               PIC  X(32) VALUE
               '00108343002084260010917500209291'.
           05                               PIC  X(32) VALUE
               '00108003002084440010600000205500'.
           05                               PIC  X(32) VALUE
               '00108843002088140010903600208687'.
           05                               PIC  X(32) VALUE
               '00108653002086800010945600209550'.
           05                               PIC  X(32) VALUE
               '00107995002080260010919400209260'.
           05                               PIC  X(32) VALUE
               '00108620002089170010864400208714'.
           05                               PIC  X(32) VALUE
               '00109970002100090011196400212133'.
           05                               PIC  X(32) VALUE
               '00109192002092660010869100208524'.
           05                               PIC  X(32) VALUE
               '00110124002101280010791800207979'.
           05                               PIC  X(32) VALUE
               '00109361002092260010900100208918'.
           05                               PIC  X(32) VALUE
               '00109659002096420010954900209575'.
           05                               PIC  X(32) VALUE
               '00111129002110330010719000207877'.
           05                               PIC  X(32) VALUE
               '00109538002095290010951400209535'.
           05                               PIC  X(32) VALUE
               '00111707002118170011025500210151'.
           05                               PIC  X(32) VALUE
               '00109777002099790011282300212838'.
           05                               PIC  X(32) VALUE
               '00108583002085230010965600209935'.
           05                               PIC  X(32) VALUE
               '00109221002089270010848800208723'.
           05                               PIC  X(32) VALUE
               '00111390002117480011137200211395'.
           05                               PIC  X(32) VALUE
               '00110525002103050010867400208576'.
           05                               PIC  X(32) VALUE
               '00108719002087310010861100208436'.
           05                               PIC  X(32) VALUE
               '00107348002072320010831400208281'.
           05                               PIC  X(32) VALUE
               '00108989002087250010943900209477'.
           05                               PIC  X(32) VALUE
               '00109273002092790011217800212283'.
           05                               PIC  X(32) VALUE
               '00110065002100860010866600208599'.
           05                               PIC  X(32) VALUE
               '00110667002112880011254700212914'.
           05                               PIC  X(32) VALUE
               '00109173002091830010920900209068'.
           05                               PIC  X(32) VALUE
               '00109530002097500010886300208665'.
           05                               PIC  X(32) VALUE
               '00109947002100210011125000211210'.
           05                               PIC  X(32) VALUE
               '00110386002102020010874900208939'.
           05                               PIC  X(32) VALUE
               '00109195002093410010898300208672'.
           05                               PIC  X(32) VALUE
               '00110465002105970010965500210117'.
           05                               PIC  X(32) VALUE
               '00108844002088310011023500209890'.
           05                               PIC  X(32) VALUE
               '00107895002081440010935400209063'.
           05                               PIC  X(32) VALUE
               '00109420002093210010934200209188'.
           05                               PIC  X(32) VALUE
               '00108829002087400010939200209844'.
           05                               PIC  X(32) VALUE
               '00110593002106000011153300211094'.
           05                               PIC  X(32) VALUE
               '00109699002094300010788800208193'.
           05                               PIC  X(32) VALUE
               '00107731002076740010905000208941'.
           05                               PIC  X(32) VALUE
               '00109364002093670010958800209690'.
           05                               PIC  X(32) VALUE
               '00109481002098460010828200208105'.
           05                               PIC  X(32) VALUE
               '00108733002087580010902700209040'.
           05                               PIC  X(32) VALUE
               '00109434002097230011014100209994'.
           05                               PIC  X(32) VALUE
               '00108585002086770011045500210898'.
           05                               PIC  X(32) VALUE
               '00108842002089610010818600207825'.
           05                               PIC  X(32) VALUE
               '00109860002098440010862200208374'.
           05                               PIC  X(32) VALUE
               '00109693002098320010816800207896'.
           05                               PIC  X(32) VALUE
               '00108400002090560010914000209281'.
           05                               PIC  X(32) VALUE
               '00107621002073340010791600208008'.
           05                               PIC  X(32) VALUE
               '00108736002088650011071800210647'.
           05                               PIC  X(32) VALUE
               '00109621002098010010969900209511'.
           05                               PIC  X(32) VALUE
               '00107435002073900010992100209909'.
           05                               PIC  X(32) VALUE
               '00108774002086980011056500210335'.
           05                               PIC  X(32) VALUE
               '00109664002096990010963900209597'.
           05                               PIC  X(32) VALUE
               '00111006002108680010925800209601'.
           05                               PIC  X(32) VALUE
               '00108449002087190010946500209405'.
           05                               PIC  X(32) VALUE
               '00108445002085220010847500208515'.
           05                               PIC  X(32) VALUE
               '00108360002081470011138400211587'.
           05                               PIC  X(32) VALUE
               '00108433002086790011108000211322'.
           05                               PIC  X(32) VALUE
               '00106000002055000010806400208136'.
           05                               PIC  X(32) VALUE
               '00109339002097950010932300209213'.
           05                               PIC  X(32) VALUE
               '00108616002092630011244300212427'.
           05                               PIC  X(32) VALUE
               '00111496002111370010825200208217'.
           05                               PIC  X(32) VALUE
               '00108144002077380010922300209291'.
           05                               PIC  X(32) VALUE
               '00109892002098760011016000107599'.
           05                               PIC  X(32) VALUE
               '00207620001093620020936800109474'.
           05                               PIC  X(32) VALUE
               '00209525001114220021128100107180'.
           05                               PIC  X(32) VALUE
               '00207934001091600020937500109223'.
           05                               PIC  X(32) VALUE
               '00209010001090840020919300108507'.
           05                               PIC  X(32) VALUE
               '00208504001090670020869000107717'.
           05                               PIC  X(32) VALUE
               '00207573001098500020939400109169'.
           05                               PIC  X(32) VALUE
               '00209145001082890020846200109496'.
           05                               PIC  X(32) VALUE
               '00209553001095860020982400108882'.
           05                               PIC  X(32) VALUE
               '00208798001093700020963700109644'.
           05                               PIC  X(32) VALUE
               '00209620001060000020550000108877'.
           05                               PIC  X(32) VALUE
               '00208505001092540020916800111205'.
           05                               PIC  X(32) VALUE
               '00210700001092960020940000109158'.
           05                               PIC  X(32) VALUE
               '00208773001109270021070000107714'.
           05                               PIC  X(32) VALUE
               '00207940001086930020885900108958'.
           05                               PIC  X(32) VALUE
               '00208926001086320020852300111807'.
           05                               PIC  X(32) VALUE
               '00211698001091510020907600107852'.
           05                               PIC  X(32) VALUE
               '00207841001098240020994500108953'.
           05                               PIC  X(32) VALUE
               '00208893001091910020899600109663'.
           05                               PIC  X(32) VALUE
               '00209336001096720020966200109657'.
           05                               PIC  X(32) VALUE
               '00210070001098420020881900109155'.
           05                               PIC  X(32) VALUE
               '00208938001080420020817200108404'.
           05                               PIC  X(32) VALUE
               '00208149001088840020888200107807'.
           05                               PIC  X(32) VALUE
               '00208074001094150020923400108434'.
           05                               PIC  X(32) VALUE
               '00208222001081050020779600108090'.
           05                               PIC  X(32) VALUE
               '00208715001077570020771800108214'.
           05                               PIC  X(32) VALUE
               '00208227001102920020993900110619'.
           05                               PIC  X(32) VALUE
               '00209807001096520020963700109976'.
           05                               PIC  X(32) VALUE
               '00209582001087980020950100107588'.
           05                               PIC  X(32) VALUE
               '00207399001090750020917000107842'.
           05                               PIC  X(32) VALUE
               '00207838001091300020918600109803'.
           05                               PIC  X(32) VALUE
               '00209685001092890020950700108489'.
           05                               PIC  X(32) VALUE
               '00208319001081960020799800110781'.
           05                               PIC  X(32) VALUE
               '00210311001102350020996700108447'.
           05                               PIC  X(32) VALUE
               '00208432001093440020943900110298'.
           05                               PIC  X(32) VALUE
               '00210477001079140020773000109296'.
           05                               PIC  X(32) VALUE
               '00209106001120990021205000108533'.
           05                               PIC  X(32) VALUE
               '00208853001082850020854500107807'.
           05                               PIC  X(32) VALUE
               '00208042001093580020906700108903'.
           05                               PIC  X(32) VALUE
               '00209038001088170020883300109271'.
           05                               PIC  X(32) VALUE
               '00209371001096170020961200108546'.
           05                               PIC  X(32) VALUE
               '00208558001087940020859200108563'.
           05                               PIC  X(32) VALUE
               '00208530001102960020998900112130'.
           05                               PIC  X(32) VALUE
               '00212287001088960020890000108847'.
           05                               PIC  X(32) VALUE
               '00208794001086940020876800109202'.
           05                               PIC  X(32) VALUE
               '00209122001079860020811400111294'.
           05                               PIC  X(32) VALUE
               '00211234001098690021008300107847'.
           05                               PIC  X(32) VALUE
               '00207912001090830020934600108918'.
           05                               PIC  X(32) VALUE
               '00209215001060000020550000108837'.
           05                               PIC  X(32) VALUE
               '00208878001100610021031800109268'.
           05                               PIC  X(32) VALUE
               '00209275001123590021242400110128'.
           05                               PIC  X(32) VALUE
               '00210085001094700020935800109711'.
           05                               PIC  X(32) VALUE
               '00210514001101830020996100111143'.
           05                               PIC  X(32) VALUE
               '00211105001089210020915400107960'.
           05                               PIC  X(32) VALUE
               '00208002001121040021267000107993'.
           05                               PIC  X(32) VALUE
               '00207964001086840020872700108442'.
           05                               PIC  X(32) VALUE
               '00208103001081370020819700107041'.
           05                               PIC  X(32) VALUE
               '00207031001103630021023500108206'.
           05                               PIC  X(32) VALUE
               '00207817001098090020996700108738'.
           05                               PIC  X(32) VALUE
               '00208653001146040021451100109698'.
           05                               PIC  X(32) VALUE
               '00209740001094570020934000112315'.
           05                               PIC  X(32) VALUE
               '00212416001114600021132200111515'.
           05                               PIC  X(32) VALUE
               '00211556001090700020902600112955'.
           05                               PIC  X(32) VALUE
               '00213052001088720020865300109481'.
           05                               PIC  X(32) VALUE
               '00209435001112150021122700116354'.
           05                               PIC  X(32) VALUE
               '00216080001084680020844900110879'.
           05                               PIC  X(32) VALUE
               '00210641001094360020980900109267'.
           05                               PIC  X(32) VALUE
               '00209220001088770020893400111269'.
           05                               PIC  X(32) VALUE
               '00211339001095830020986400109163'.
           05                               PIC  X(32) VALUE
               '00209128001095660020931900108370'.
           05                               PIC  X(32) VALUE
               '00208202001123770021283000109211'.
           05                               PIC  X(32) VALUE
               '00209042001084050020937300107954'.
           05                               PIC  X(32) VALUE
               '00208388001074550020764700108299'.
           05                               PIC  X(32) VALUE
               '00207885001109790021069800108254'.
           05                               PIC  X(32) VALUE
               '00208013001091490020883000110803'.
           05                               PIC  X(32) VALUE
               '00210760001106420021056600108012'.
           05                               PIC  X(32) VALUE
               '00207700001086050020866900110371'.
           05                               PIC  X(32) VALUE
               '00210616001095070020942600106000'.
           05                               PIC  X(32) VALUE
               '00205500001098990020966100111476'.
           05                               PIC  X(32) VALUE
               '00211454001107230020978400111354'.
           05                               PIC  X(32) VALUE
               '00211339001122340021226100110714'.
           05                               PIC  X(32) VALUE
               '00210639001093210020940400108721'.
           05                               PIC  X(32) VALUE
               '00208668001087590020880100110580'.
           05                               PIC  X(32) VALUE
               '00208630001098110020964800110442'.
           05                               PIC  X(32) VALUE
               '00210203001089040020921200114134'.
           05                               PIC  X(32) VALUE
               '00215584001104190021059600109661'.
           05                               PIC  X(32) VALUE
               '00209791001115700021146300108827'.
           05                               PIC  X(32) VALUE
               '00209166001109420021080200108595'.
           05                               PIC  X(32) VALUE
               '00208602001100330020993800110026'.
           05                               PIC  X(32) VALUE
               '00210185001090340020901800108635'.
           05                               PIC  X(32) VALUE
               '00208838001140530021377700108728'.
           05                               PIC  X(32) VALUE
               '00208512001110420021072400109133'.
           05                               PIC  X(32) VALUE
               '00209070001103020021025500109090'.
           05                               PIC  X(32) VALUE
               '00209165001111330021122400115686'.
           05                               PIC  X(32) VALUE
               '00215604001090050020922700109266'.
           05                               PIC  X(32) VALUE
               '00209415001083030020827300108998'.
           05                               PIC  X(32) VALUE
               '00209006001119790021195000108686'.
           05                               PIC  X(32) VALUE
               '00208167001157330021590400106000'.
           05                               PIC  X(32) VALUE
               '00205500001167030021687800106000'.
           05                               PIC  X(32) VALUE
               '00205500001129150021307200112162'.
           05                               PIC  X(32) VALUE
               '00212042001119090021224600116740'.
           05                               PIC  X(32) VALUE
               '00217111001108470021066000116143'.
           05                               PIC  X(32) VALUE
               '00216102001089070020909500108238'.
           05                               PIC  X(32) VALUE
               '00208328001115560021154100109097'.
           05                               PIC  X(32) VALUE
               '00209032001092330020930300108279'.
           05                               PIC  X(32) VALUE
               '00208011001085360020850500109091'.
           05                               PIC  X(32) VALUE
               '00209538001092990020915300109948'.
           05                               PIC  X(32) VALUE
               '00209426001093830020932500110571'.
           05                               PIC  X(32) VALUE
               '00210504001091300020895800110251'.
           05                               PIC  X(32) VALUE
               '00210247001083710020868000109234'.
           05                               PIC  X(32) VALUE
               '00208981001087790020925100107315'.
           05                               PIC  X(32) VALUE
               '00207054001126440021305200107860'.
           05                               PIC  X(32) VALUE
               '00207551001099050020977600111343'.
           05                               PIC  X(32) VALUE
               '00211384001088060020859300109054'.
           05                               PIC  X(32) VALUE
               '00209072001092050020920900107748'.
           05                               PIC  X(32) VALUE
               '00207937001094320020914800108952'.
           05                               PIC  X(32) VALUE
               '00208818001101500021006200109480'.
           05                               PIC  X(32) VALUE
               '00209318001087930020836200108843'.
           05                               PIC  X(32) VALUE
               '00208664001080650020833500108471'.
           05                               PIC  X(32) VALUE
               '00208441001079410020799700114931'.
           05                               PIC  X(32) VALUE
               '00214636001082190020843400110534'.
           05                               PIC  X(32) VALUE
               '00210222001089610020900100110738'.
           05                               PIC  X(32) VALUE
               '00210343001084030020855900108028'.
           05                               PIC  X(32) VALUE
               '00208245001096480020962500110723'.
           05                               PIC  X(32) VALUE
               '00210807001084620020837200109563'.
           05                               PIC  X(32) VALUE
               '00208962001096150021016800109934'.
           05                               PIC  X(32) VALUE
               '00209823001066750020673500108898'.
           05                               PIC  X(32) VALUE
               '00208696001095660021009700107256'.
           05                               PIC  X(32) VALUE
               '00208084001105800021066200109202'.
           05                               PIC  X(32) VALUE
               '00209107001100020020910600108939'.
           05                               PIC  X(32) VALUE
               '00208343001110120021107600110067'.
           05                               PIC  X(32) VALUE
               '00210433001060000020550000109983'.
           05                               PIC  X(32) VALUE
               '00209675001086250020832800111043'.
           05                               PIC  X(24) VALUE
               '002118080010928300209350'.
       01  BUN-WAGE-INDEX-TABLE REDEFINES BUN-WAGE-INDEX-FILLER.
           05  BUN-WI-ENTRY OCCURS 911 TIMES.
               10  BUN-WI-DATE-CODE         PIC  9(03).
               10  BUN-WAGE-INDEX           PIC  9V9(04).