Routine: SR206UT1

SR206UT1 ;HPS/JSG - FY22 CPT EXCLUSION UTILITY, CONTINUED ; May 10, 2022@15:00

 ;;3.0;Surgery;**206**;24 Jun 93;Build 2

EX ; populate the CPT file EXCLUSIONS file (#137)

 F SRJ=1:1 S SRLIST=$P($T(LIST+SRJ)," ;;",2) Q:SRLIST=""  F SRI=1:1 S SRX=$P(SRLIST,",",SRI) Q:SRX=""  I $D(^ICPT("B",SRX)) D INT

INT S SRY=0,SRY=$O(^ICPT("B",SRX,SRY)) Q:SRY=""

 K DA,DIC,DD,DO,DINUM S (DINUM,X)=SRY,DIC="^SRO(137,",DIC(0)="L" D FILE^DICN

LIST ;

 ;;36471,36473,36474,36481,36482,36483,36500,3650F,36510,36511,36512,36513,36514

 ;;36516,36522,36555,36556,36557,36558,36560,36561,36563,36565,36566,36568,36569

 ;;36570,36571,36572,36573,36575,36576,36578,36580,36581,36582,36583,36584,36585

 ;;36589,36590,36591,36592,36593,36595,36596,36597,36598,36600,36620,36625,36640

 ;;36660,36680,36800,36810,36815,36818,36819,36820,36821,36825,36830,36831,36832

 ;;36833,36835,36838,36860,36861,36901,36902,36903,36904,36905,36906,36907,36908

 ;;36909,3700F,37191,37192,37193,37195,37197,37200,3720F,37211,37212,37213,37214

 ;;37246,37247,37248,37249,37252,37253,3725F,3750F,3751F,3752F,3753F,3754F,3755F

 ;;3756F,3757F,3758F,3759F,37607,37609,3760F,3761F,3762F,3763F,37700,37718,37722

 ;;37735,3775F,37760,37761,37765,37766,3776F,37780,37785,38200,38204,38205,38206

 ;;38207,38208,38209,38210,38211,38212,38213,38214,38215,38220,38221,38222,38230

 ;;38232,38240,38241,38242,38243,38300,38305,38308,38500,38505,38510,38520,38525

 ;;38530,38531,38562,38564,38570,38790,38792,38794,38900,39401,39402,39503,4000F

 ;;4001F,4003F,4004F,4005F,4008F,4010F,4011F,4012F,4013F,4014F,4015F,4016F,4017F

 ;;4018F,4019F,4025F,4030F,4033F,4035F,4037F,4040F,4041F,4042F,4043F,4044F,4045F

 ;;4046F,4047F,4048F,40490,4049F,40500,4050F,40510,4051F,40520,40525,40527,4052F

 ;;40530,4053F,4054F,4055F,4056F,4058F,4060F,4062F,4063F,4064F,40650,40652,40654

 ;;4065F,4066F,4067F,4069F,4070F,4073F,4075F,4077F,40799,4079F,40800,40801,40804

 ;;40805,40806,40808,40810,40812,40814,40816,40818,40819,40820,40830,40831,40840

 ;;4084F,4086F,4090F,4095F,4100F,41010,41015,41019,41100,41105,41108,4110F,41110

 ;;41115,4115F,4120F,4124F,41250,41251,41252,4130F,4131F,4132F,4133F,4134F,4135F

 ;;4136F,4140F,4142F,4144F,4145F,4148F,4149F,4150F,41510,4151F,41520,4153F,4155F

 ;;4157F,4158F,4159F,4163F,4164F,4165F,4167F,4168F,4169F,4171F,4172F,4174F,4175F

 ;;4176F,4177F,4178F,4179F,41800,41805,41806,4180F,4181F,41820,41821,41822,41823

 ;;41825,41826,41827,41828,4182F,41830,41850,4185F,4186F,41870,41872,41874,4187F

 ;;4188F,41899,4189F,4190F,4191F,4192F,4193F,4194F,4195F,4196F,42000,4200F,4201F

 ;;42100,42104,42106,42107,4210F,42120,42140,42145,42160,42180,42182,42200,42205

 ;;4220F,42210,42215,4221F,42220,42225,42226,42227,42235,42260,42280,42281,42299

 ;;42300,42305,4230F,42310,42320,42330,42335,42340,42400,42405,42408,42409,4240F

 ;;4242F,42440,42450,4245F,4248F,42500,42505,42507,42509,4250F,42510,42550,4255F

 ;;4256F,42600,4260F,4261F,42650,4265F,42660,42665,4266F,4267F,4268F,42699,4269F

 ;;4270F,4271F,4274F,4276F,4279F,42800,42804,42806,42808,42809,4280F,42810,42815

 ;;42820,42821,42825,42826,42830,42831,42835,42836,42860,42870,42900,4290F,4293F

 ;;42955,42975,4300F,4301F,4305F,4306F,43191,43192,43193,43194,43195,43196,43197

 ;;43198,43200,43201,43202,43204,43205,43206,4320F,43210,43211,43212,43213,43214

 ;;43215,43216,43217,43220,43226,43227,43229,4322F,43231,43232,43233,43235,43236

 ;;43237,43238,43239,43240,43241,43242,43243,43244,43245,43246,43247,43248,43249

 ;;4324F,43250,43251,43252,43253,43254,43255,43257,43259,4325F,43260,43261,43262

 ;;43263,43264,43265,43266,4326F,43270,43273,43274,43275,43276,43277,43278,4328F

 ;;4330F,4340F,43450,43453,43460,4350F,43605,43653,43752,43753,43754,43755,43756

 ;;43757,43761,43762,43763,43830,43831,43832,43870,43886,43887,43888,4400F,44015

 ;;44100,44132,44186,44300,44360,44361,44363,44364,44365,44366,44369,44370,44372

 ;;44373,44376,44377,44378,44379,44380,44381,44382,44384,44385,44386,44388,44389

 ;;44390,44391,44392,44394,44401,44402,44403,44404,44405,44406,44407,44408,44500

 ;;4450F,44705,4470F,44715,44720,44721,4480F,4481F,4500F,45100,45108,4510F,45150

 ;;45171,45172,45190,4525F,4526F,45300,45303,45305,45307,45308,45309,45315,45317

 ;;45320,45321,45327,45330,45331,45332,45333,45334,45335,45337,45338,45340,45341

 ;;45342,45346,45347,45349,45350,45378,45379,45380,45381,45382,45384,45385,45386

 ;;45388,45389,45390,45391,45392,45393,45398,4540F,4541F,45505,4550F,4551F,45520

 ;;4552F,4553F,4554F,4555F,4556F,4557F,4558F,4559F,4560F,4561F,4562F,4563F,45900

 ;;45905,45910,45915,45990,46020,46030,46050,46070,46080,46083,46200,46220,46221

 ;;46230,46250,46255,46257,46258,46260,46261,46262,46270,46275,46280,46285,46288

 ;;46320,46500,46505,46600,46601,46604,46606,46607,46608,46610,46611,46612,46614

 ;;46615,46700,46705,46706,46707,46750,46751,46753,46754,46760,46761,46900,46910

 ;;46916,46917,46922,46924,46930,46940,46942,46945,46946,46947,46948,46999,47000

 ;;47001,47100,47133,47143,47144,47145,47146,47147,47383,47490,47531,47532,47533

 ;;47534,47535,47536,47537,47538,47539,47540,47541,47542,47543,47544,47552,47553

 ;;47554,47555,47556,48100,48102,48400,48550,48551,48552,49082,49083,49084,49180

 ;;49185,49320,49321,49322,49324,49325,49326,49327,49400,49405,49406,49407,49411

 ;;49412,49418,49419,49421,49422,49423,49424,49427,49428,49429,49440,49441,49442

 ;;49446,49450,49451,49452,49460,49465,49491,49492,49495,49496,49500,49501,49580

 ;;49582,49605,49606,49610,49611,5005F,50080,50081,5010F,5015F,50200,50205,5020F

 ;;50300,50323,50325,50327,50328,50329,50382,50384,50385,50386,50387,50389,50390

 ;;50391,50396,50430,50431,50432,50433,50434,50435,50436,50437,5050F,50551,50553

 ;;50555,50557,50561,50562,50570,50572,50574,50575,50576,50580,50590,50592,50593

 ;;50606,5060F,5062F,50684,50686,50688,50690,50693,50694,50695,50705,50706,50951

 ;;50953,50955,50957,50961,50970,50972,50974,50976,50980,5100F,51040,51050,51100

 ;;51101,51102,51600,51605,51610,51700,51701,51702,51703,51705,51710,51715,51720

 ;;51725,51726,51727,51728,51729,51736,51741,51784,51785,51792,51797,51798,52000

 ;;52001,52005,52007,5200F,52010,52204,52214,52224,52250,52260,52265,52270,52275

 ;;52276,52277,52281,52282,52283,52285,52287,52290,52300,52301,52305,52310,52315

 ;;52317,52318,52320,52325,52327,52330,52332,52334,52341,52342,52343,52351,52352

 ;;52353,52354,52355,52356,52441,52442,52450,5250F,53020,53025,53060,53200,53270

 ;;53275,53453,53454,53600,53601,53620,53621,53660,53661,53850,53852,53854,53855

 ;;53860,53899,54000,54001,54015,54050,54055,54056,54057,54060,54065,54100,54105

 ;;54150,54160,54161,54162,54163,54164,54200,54205,54220,54230,54231,54235,54240

 ;;54250,54400,54401,54405,54406,54408,54410,54415,54416,54435,54437,54438,54450

 ;;54500,54505,54512,54520,54530,54535,54700,54800,54830,55000,55100,55200,55250

 ;;55300,55400,55500,55520,55559,55700,55705,55706,55870,55874,55876,55880,55920

 ;;56405,56420,56440,56441,56501,56515,56605,56606,56700,56820,56821,57020,57022

 ;;57023,57061,57065,57100,57105,57150,57155,57156,57160,57170,57180,57400,57410

 ;;57420,57421,57452,57454,57455,57456,57460,57461,57465,57500,57505,57510,57511

 ;;57513,57700,57800,58100,58110,58120,58300,58301,58321,58322,58323,58340,58345

 ;;58346,58353,58555,58558,58559,58560,58561,58562,58563,58674,58900,58970,58974

 ;;58976,59000,59001,59012,59015,59020,59025,59030,59050,59051,59070,59072,59074

 ;;59076,59100,59160,59200,59300,59320,59325,59400,59409,59410,59412,59414,59425

 ;;59426,59430,59510,59514,59515,59525,59610,59612,59614,59618,59840,59841,59850

 ;;59851,59852,59855,59856,59857,59866,59871,59897,59898,59899,6005F,60100,6010F

 ;;6015F,6020F,60300,6030F,6040F,6045F,6070F,6080F,6090F,61001,6100F,6101F,61026

 ;;6102F,61050,61055,61070,6110F,61140,6150F,61623,61630,61640,61641,61642,61645

 ;;61650,61651,61750,61751,61782,61790,61791,61796,61797,61798,61799,61800,62140

 ;;62141,62142,62143,62146,62252,62263,62264,62267,62268,62269,62270,62272,62273

 ;;62280,62281,62282,62284,62287,62290,62291,62292,62294,62302,62303,62304,62305

 ;;62320,62321,62322,62323,62324,62325,62326,62327,62328,62329,62350,62355,62360

 ;;62361,62362,62365,62367,62368,62369,62370,63600,63610,63620,63621,63650,63661

 ;;63663,63685,63688,64400,64405,64408,64415,64416,64417,64418,64420,64421,64425

 ;;64430,64435,64445,64446,64447,64448,64449,64450,64451,64454,64455,64461,64462

 ;;64463,64479,64480,64483,64484,64486,64487,64488,64489,64490,64491,64492,64493

 ;;64494,64495,64505,64510,64517,64520,64530,64553,64555,64561,64566,64568,64569

 ;;64570,64575,64580,64581,64584,64585,64590,64595,64600,64605,64610,64611,64612

 ;;64615,64616,64617,64620,64624,64625,64628,64629,64630,64632,64633,64634,64635

 ;;64636,64640,64642,64643,64644,64645,64646,64647,64650,64653,64680,64681,64702

 ;;64704,64716,64718,64719,64721,64732,64734,64736,64738,64740,64742,64744,64774

 ;;64776,64778,64782,64783,64784,64786,64787,64788,64790,64792,64795,64820,64821

 ;;64822,64823,64831,64832,64834,64835,64836,65091,65093,65101,65103,65105,65110

 ;;65112,65114,65125,65130,65135,65140,65150,65155,65175,65205,65210,65220,65222

 ;;65235,65260,65265,65270,65272,65273,65275,65280,65285,65286,65290,65400,65410

 ;;65420,65426,65430,65435,65436,65450,65600,65710,65730,65750,65755,65756,65757

 ;;65760,65765,65767,65770,65771,65772,65775,65778,65779,65780,65781,65782,65785

 ;;65800,65810,65815,65820,65850,65855,65860,65865,65870,65875,65880,65900,65920

 ;;65930,66020,66030,66130,66150,66155,66160,66170,66172,66174,66175,66179,66180

 ;;66183,66184,66185,66225,66250,66500,66505,66600,66605,66625,66630,66635,66680

 ;;66682,66700,66710,66711,66720,66740,66761,66762,66770,66820,66821,66825,66830

 ;;66840,66850,66852,66920,66930,66940,66982,66983,66984,66985,66986,66987,66988

 ;;66989,66990,66991,66999,67005,67010,67015,67025,67027,67028,67030,67031,67036

 ;;67039,67040,67041,67042,67043,67101,67105,67107,67108,67110,67113,67115,67120

 ;;67121,67141,67145,67208,67210,67218,67220,67221,67225,67227,67228,67229,67250

 ;;67255,67299,67311,67312,67314,67316,67318,67320,67331,67332,67334,67335,67340

 ;;67343,67345,67346,67399,67400,67405,67412,67413,67414,67415,67420,67430,67440

 ;;67445,67450,67500,67505,67515,67550,67560,67570,67599,67700,67710,67715,67800

 ;;67801,67805,67808,67810,67820,67825,67830,67835,67840,67850,67875,67880,67882

 ;;67900,67901,67902,67903,67904,67906,67908,67909,67911,67912,67914,67915,67916

 ;;67917,67921,67922,67923,67924,67930,67935,67938,67950,67961,67966,67971,67973

 ;;67974,67975,67999,68020,68040,68100,68110,68115,68130,68135,68200,68320,68325

 ;;68326,68328,68330,68335,68340,68360,68362,68371,68399,68400,68420,68440,68500

 ;;68505,68510,68520,68525,68530,68540,68550,68700,68705,68720,68745,68750,68760

 ;;68761,68770,68801,68810,68811,68815,68816,68840,68841,68850,68899,69000,69005

 ;;69020,69090,69100,69105,69110,69120,69140,69145,69200,69205,69209,69210,69220

 ;;69222,69300,69310,69320,69399,69420,69421,69424,69433,69436,69440,69450,69501

 ;;69502,69505,69511,69535,69540,69550,69552,69554,69601,69602,69603,69604,69610

 ;;69620,69631,69632,69633,69635,69636,69637,69641,69642,69643,69644,69645,69646

 ;;69650,69660,69661,69662,69666,69667,69670,69676,69700,69705,69706,69710,69711

 ;;69714,69715,69717,69718,69720,69740,69799,69801,69805,69806,69949,69950,69955

 ;;69960,69970,69979,69990,70010,70015,70030,70100,7010F,70110,70120,70130,70134

 ;;70140,70150,70160,70170,70190,70200,7020F,70210,70220,70240,70250,7025F,70260

 ;;70300,70310,70320,70328,70330,70332,70336,70350,70355,70360,70370,70371,70380

 ;;70390,70450,70460,70470,70480,70481,70482,70486,70487,70488,70490,70491,70492

 ;;70496,70498,70540,70542,70543,70544,70545,70546,70547,70548,70549,70551,70552

 ;;70553,70554,70555,70557,70558,70559,71045,71046,71047,71048,71100,71101,71110

 ;;71111,71120,71130,71250,71260,71270,71271,71275,71550,71551,71552,71555,72020

 ;;72040,72050,72052,72070,72072,72074,72080,72081,72082,72083,72084,72100,72110

 ;;72114,72120,72125,72126,72127,72128,72129,72130,72131,72132,72133,72141,72142

 ;;72146,72147,72148,72149,72156,72157,72158,72159,72170,72190,72191,72192,72193

 ;;72194,72195,72196,72197,72198,72200,72202,72220,72240,72255,72265,72270,72275

 ;;72285,72295,73000,73010,73020,73030,73040,73050,73060,73070,73080,73085,73090

 ;;73092,73100,73110,73115,73120,73130,73140,73200,73201,73202,73206,73218,73219

 ;;73220,73221,73222,73223,73225,73501,73502,73503,73521,73522,73523,73525,73551

 ;;73552,73560,73562,73564,73565,73580,73590,73592,73600,73610,73615,73620,73630

 ;;73650,73660,73700,73701,73702,73706,73718,73719,73720,73721,73722,73723,73725

 ;;74018,74019,74021,74022,74150,74160,74170,74174,74175,74176,74177,74178,74181

 ;;74182,74183,74185,74190,74210,74220,74221,74230,74235,74240,74246,74248,74250

 ;;74251,74261,74262,74263,74270,74280,74283,74290,74300,74301,74328,74329,74330

 ;;74340,74355,74360,74363,74400,74410,74415,74420,74425,74430,74440,74445,74450

 ;;74455,74470,74485,74710,74712,74713,74740,74742,74775,75557,75559,75561,75563

 ;;75565,75571,75572,75573,75574,75600,75605,75625,75630,75635,75705,75710,75716

 ;;75726,75731,75733,75736,75741,75743,75746,75756,75774,75801,75803,75805,75807

 ;;75809,75810,75820,75822,75825,75827,75831,75833,75840,75842,75860,75870,75872

 ;;75880,75885,75887,75889,75891,75893,75894,75898,75901,75902,75956,75957,75958

 ;;75959,75970,75984,75989,76000,76010,76080,76098,76100,76101,76102,76120,76125

 ;;76140,76145,76376,76377,76380,76390,76391,76496,76497,76498,76499,76506,76510

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HSR206UT1   13575     printed  Mar 13, 2025@21:43:38                                                                                                                                                                                                   Page 2

SR206UT1  ;HPS/JSG - FY22 CPT EXCLUSION UTILITY, CONTINUED ; May 10, 2022@15:00

 +1       ;;3.0;Surgery;**206**;24 Jun 93;Build 2

 +2       ;

 +3        QUIT

EX        ; populate the CPT file EXCLUSIONS file (#137)

 +1        FOR SRJ=1:1

               SET SRLIST=$PIECE($TEXT(LIST+SRJ)," ;;",2)

               if SRLIST=""

                   QUIT

               FOR SRI=1:1

                   SET SRX=$PIECE(SRLIST,",",SRI)

                   if SRX=""

                       QUIT

                   IF $DATA(^ICPT("B",SRX))

                       DO INT

 +2        QUIT

INT        SET SRY=0

           SET SRY=$ORDER(^ICPT("B",SRX,SRY))

           if SRY=""

               QUIT

 +1        KILL DA,DIC,DD,DO,DINUM

           SET (DINUM,X)=SRY

           SET DIC="^SRO(137,"

           SET DIC(0)="L"

           DO FILE^DICN

 +2        QUIT

LIST      ;

 +1       ;;36471,36473,36474,36481,36482,36483,36500,3650F,36510,36511,36512,36513,36514

 +2       ;;36516,36522,36555,36556,36557,36558,36560,36561,36563,36565,36566,36568,36569

 +3       ;;36570,36571,36572,36573,36575,36576,36578,36580,36581,36582,36583,36584,36585

 +4       ;;36589,36590,36591,36592,36593,36595,36596,36597,36598,36600,36620,36625,36640

 +5       ;;36660,36680,36800,36810,36815,36818,36819,36820,36821,36825,36830,36831,36832

 +6       ;;36833,36835,36838,36860,36861,36901,36902,36903,36904,36905,36906,36907,36908

 +7       ;;36909,3700F,37191,37192,37193,37195,37197,37200,3720F,37211,37212,37213,37214

 +8       ;;37246,37247,37248,37249,37252,37253,3725F,3750F,3751F,3752F,3753F,3754F,3755F

 +9       ;;3756F,3757F,3758F,3759F,37607,37609,3760F,3761F,3762F,3763F,37700,37718,37722

 +10      ;;37735,3775F,37760,37761,37765,37766,3776F,37780,37785,38200,38204,38205,38206

 +11      ;;38207,38208,38209,38210,38211,38212,38213,38214,38215,38220,38221,38222,38230

 +12      ;;38232,38240,38241,38242,38243,38300,38305,38308,38500,38505,38510,38520,38525

 +13      ;;38530,38531,38562,38564,38570,38790,38792,38794,38900,39401,39402,39503,4000F

 +14      ;;4001F,4003F,4004F,4005F,4008F,4010F,4011F,4012F,4013F,4014F,4015F,4016F,4017F

 +15      ;;4018F,4019F,4025F,4030F,4033F,4035F,4037F,4040F,4041F,4042F,4043F,4044F,4045F

 +16      ;;4046F,4047F,4048F,40490,4049F,40500,4050F,40510,4051F,40520,40525,40527,4052F

 +17      ;;40530,4053F,4054F,4055F,4056F,4058F,4060F,4062F,4063F,4064F,40650,40652,40654

 +18      ;;4065F,4066F,4067F,4069F,4070F,4073F,4075F,4077F,40799,4079F,40800,40801,40804

 +19      ;;40805,40806,40808,40810,40812,40814,40816,40818,40819,40820,40830,40831,40840

 +20      ;;4084F,4086F,4090F,4095F,4100F,41010,41015,41019,41100,41105,41108,4110F,41110

 +21      ;;41115,4115F,4120F,4124F,41250,41251,41252,4130F,4131F,4132F,4133F,4134F,4135F

 +22      ;;4136F,4140F,4142F,4144F,4145F,4148F,4149F,4150F,41510,4151F,41520,4153F,4155F

 +23      ;;4157F,4158F,4159F,4163F,4164F,4165F,4167F,4168F,4169F,4171F,4172F,4174F,4175F

 +24      ;;4176F,4177F,4178F,4179F,41800,41805,41806,4180F,4181F,41820,41821,41822,41823

 +25      ;;41825,41826,41827,41828,4182F,41830,41850,4185F,4186F,41870,41872,41874,4187F

 +26      ;;4188F,41899,4189F,4190F,4191F,4192F,4193F,4194F,4195F,4196F,42000,4200F,4201F

 +27      ;;42100,42104,42106,42107,4210F,42120,42140,42145,42160,42180,42182,42200,42205

 +28      ;;4220F,42210,42215,4221F,42220,42225,42226,42227,42235,42260,42280,42281,42299

 +29      ;;42300,42305,4230F,42310,42320,42330,42335,42340,42400,42405,42408,42409,4240F

 +30      ;;4242F,42440,42450,4245F,4248F,42500,42505,42507,42509,4250F,42510,42550,4255F

 +31      ;;4256F,42600,4260F,4261F,42650,4265F,42660,42665,4266F,4267F,4268F,42699,4269F

 +32      ;;4270F,4271F,4274F,4276F,4279F,42800,42804,42806,42808,42809,4280F,42810,42815

 +33      ;;42820,42821,42825,42826,42830,42831,42835,42836,42860,42870,42900,4290F,4293F

 +34      ;;42955,42975,4300F,4301F,4305F,4306F,43191,43192,43193,43194,43195,43196,43197

 +35      ;;43198,43200,43201,43202,43204,43205,43206,4320F,43210,43211,43212,43213,43214

 +36      ;;43215,43216,43217,43220,43226,43227,43229,4322F,43231,43232,43233,43235,43236

 +37      ;;43237,43238,43239,43240,43241,43242,43243,43244,43245,43246,43247,43248,43249

 +38      ;;4324F,43250,43251,43252,43253,43254,43255,43257,43259,4325F,43260,43261,43262

 +39      ;;43263,43264,43265,43266,4326F,43270,43273,43274,43275,43276,43277,43278,4328F

 +40      ;;4330F,4340F,43450,43453,43460,4350F,43605,43653,43752,43753,43754,43755,43756

 +41      ;;43757,43761,43762,43763,43830,43831,43832,43870,43886,43887,43888,4400F,44015

 +42      ;;44100,44132,44186,44300,44360,44361,44363,44364,44365,44366,44369,44370,44372

 +43      ;;44373,44376,44377,44378,44379,44380,44381,44382,44384,44385,44386,44388,44389

 +44      ;;44390,44391,44392,44394,44401,44402,44403,44404,44405,44406,44407,44408,44500

 +45      ;;4450F,44705,4470F,44715,44720,44721,4480F,4481F,4500F,45100,45108,4510F,45150

 +46      ;;45171,45172,45190,4525F,4526F,45300,45303,45305,45307,45308,45309,45315,45317

 +47      ;;45320,45321,45327,45330,45331,45332,45333,45334,45335,45337,45338,45340,45341

 +48      ;;45342,45346,45347,45349,45350,45378,45379,45380,45381,45382,45384,45385,45386

 +49      ;;45388,45389,45390,45391,45392,45393,45398,4540F,4541F,45505,4550F,4551F,45520

 +50      ;;4552F,4553F,4554F,4555F,4556F,4557F,4558F,4559F,4560F,4561F,4562F,4563F,45900

 +51      ;;45905,45910,45915,45990,46020,46030,46050,46070,46080,46083,46200,46220,46221

 +52      ;;46230,46250,46255,46257,46258,46260,46261,46262,46270,46275,46280,46285,46288

 +53      ;;46320,46500,46505,46600,46601,46604,46606,46607,46608,46610,46611,46612,46614

 +54      ;;46615,46700,46705,46706,46707,46750,46751,46753,46754,46760,46761,46900,46910

 +55      ;;46916,46917,46922,46924,46930,46940,46942,46945,46946,46947,46948,46999,47000

 +56      ;;47001,47100,47133,47143,47144,47145,47146,47147,47383,47490,47531,47532,47533

 +57      ;;47534,47535,47536,47537,47538,47539,47540,47541,47542,47543,47544,47552,47553

 +58      ;;47554,47555,47556,48100,48102,48400,48550,48551,48552,49082,49083,49084,49180

 +59      ;;49185,49320,49321,49322,49324,49325,49326,49327,49400,49405,49406,49407,49411

 +60      ;;49412,49418,49419,49421,49422,49423,49424,49427,49428,49429,49440,49441,49442

 +61      ;;49446,49450,49451,49452,49460,49465,49491,49492,49495,49496,49500,49501,49580

 +62      ;;49582,49605,49606,49610,49611,5005F,50080,50081,5010F,5015F,50200,50205,5020F

 +63      ;;50300,50323,50325,50327,50328,50329,50382,50384,50385,50386,50387,50389,50390

 +64      ;;50391,50396,50430,50431,50432,50433,50434,50435,50436,50437,5050F,50551,50553

 +65      ;;50555,50557,50561,50562,50570,50572,50574,50575,50576,50580,50590,50592,50593

 +66      ;;50606,5060F,5062F,50684,50686,50688,50690,50693,50694,50695,50705,50706,50951

 +67      ;;50953,50955,50957,50961,50970,50972,50974,50976,50980,5100F,51040,51050,51100

 +68      ;;51101,51102,51600,51605,51610,51700,51701,51702,51703,51705,51710,51715,51720

 +69      ;;51725,51726,51727,51728,51729,51736,51741,51784,51785,51792,51797,51798,52000

 +70      ;;52001,52005,52007,5200F,52010,52204,52214,52224,52250,52260,52265,52270,52275

 +71      ;;52276,52277,52281,52282,52283,52285,52287,52290,52300,52301,52305,52310,52315

 +72      ;;52317,52318,52320,52325,52327,52330,52332,52334,52341,52342,52343,52351,52352

 +73      ;;52353,52354,52355,52356,52441,52442,52450,5250F,53020,53025,53060,53200,53270

 +74      ;;53275,53453,53454,53600,53601,53620,53621,53660,53661,53850,53852,53854,53855

 +75      ;;53860,53899,54000,54001,54015,54050,54055,54056,54057,54060,54065,54100,54105

 +76      ;;54150,54160,54161,54162,54163,54164,54200,54205,54220,54230,54231,54235,54240

 +77      ;;54250,54400,54401,54405,54406,54408,54410,54415,54416,54435,54437,54438,54450

 +78      ;;54500,54505,54512,54520,54530,54535,54700,54800,54830,55000,55100,55200,55250

 +79      ;;55300,55400,55500,55520,55559,55700,55705,55706,55870,55874,55876,55880,55920

 +80      ;;56405,56420,56440,56441,56501,56515,56605,56606,56700,56820,56821,57020,57022

 +81      ;;57023,57061,57065,57100,57105,57150,57155,57156,57160,57170,57180,57400,57410

 +82      ;;57420,57421,57452,57454,57455,57456,57460,57461,57465,57500,57505,57510,57511

 +83      ;;57513,57700,57800,58100,58110,58120,58300,58301,58321,58322,58323,58340,58345

 +84      ;;58346,58353,58555,58558,58559,58560,58561,58562,58563,58674,58900,58970,58974

 +85      ;;58976,59000,59001,59012,59015,59020,59025,59030,59050,59051,59070,59072,59074

 +86      ;;59076,59100,59160,59200,59300,59320,59325,59400,59409,59410,59412,59414,59425

 +87      ;;59426,59430,59510,59514,59515,59525,59610,59612,59614,59618,59840,59841,59850

 +88      ;;59851,59852,59855,59856,59857,59866,59871,59897,59898,59899,6005F,60100,6010F

 +89      ;;6015F,6020F,60300,6030F,6040F,6045F,6070F,6080F,6090F,61001,6100F,6101F,61026

 +90      ;;6102F,61050,61055,61070,6110F,61140,6150F,61623,61630,61640,61641,61642,61645

 +91      ;;61650,61651,61750,61751,61782,61790,61791,61796,61797,61798,61799,61800,62140

 +92      ;;62141,62142,62143,62146,62252,62263,62264,62267,62268,62269,62270,62272,62273

 +93      ;;62280,62281,62282,62284,62287,62290,62291,62292,62294,62302,62303,62304,62305

 +94      ;;62320,62321,62322,62323,62324,62325,62326,62327,62328,62329,62350,62355,62360

 +95      ;;62361,62362,62365,62367,62368,62369,62370,63600,63610,63620,63621,63650,63661

 +96      ;;63663,63685,63688,64400,64405,64408,64415,64416,64417,64418,64420,64421,64425

 +97      ;;64430,64435,64445,64446,64447,64448,64449,64450,64451,64454,64455,64461,64462

 +98      ;;64463,64479,64480,64483,64484,64486,64487,64488,64489,64490,64491,64492,64493

 +99      ;;64494,64495,64505,64510,64517,64520,64530,64553,64555,64561,64566,64568,64569

 +100     ;;64570,64575,64580,64581,64584,64585,64590,64595,64600,64605,64610,64611,64612

 +101     ;;64615,64616,64617,64620,64624,64625,64628,64629,64630,64632,64633,64634,64635

 +102     ;;64636,64640,64642,64643,64644,64645,64646,64647,64650,64653,64680,64681,64702

 +103     ;;64704,64716,64718,64719,64721,64732,64734,64736,64738,64740,64742,64744,64774

 +104     ;;64776,64778,64782,64783,64784,64786,64787,64788,64790,64792,64795,64820,64821

 +105     ;;64822,64823,64831,64832,64834,64835,64836,65091,65093,65101,65103,65105,65110

 +106     ;;65112,65114,65125,65130,65135,65140,65150,65155,65175,65205,65210,65220,65222

 +107     ;;65235,65260,65265,65270,65272,65273,65275,65280,65285,65286,65290,65400,65410

 +108     ;;65420,65426,65430,65435,65436,65450,65600,65710,65730,65750,65755,65756,65757

 +109     ;;65760,65765,65767,65770,65771,65772,65775,65778,65779,65780,65781,65782,65785

 +110     ;;65800,65810,65815,65820,65850,65855,65860,65865,65870,65875,65880,65900,65920

 +111     ;;65930,66020,66030,66130,66150,66155,66160,66170,66172,66174,66175,66179,66180

 +112     ;;66183,66184,66185,66225,66250,66500,66505,66600,66605,66625,66630,66635,66680

 +113     ;;66682,66700,66710,66711,66720,66740,66761,66762,66770,66820,66821,66825,66830

 +114     ;;66840,66850,66852,66920,66930,66940,66982,66983,66984,66985,66986,66987,66988

 +115     ;;66989,66990,66991,66999,67005,67010,67015,67025,67027,67028,67030,67031,67036

 +116     ;;67039,67040,67041,67042,67043,67101,67105,67107,67108,67110,67113,67115,67120

 +117     ;;67121,67141,67145,67208,67210,67218,67220,67221,67225,67227,67228,67229,67250

 +118     ;;67255,67299,67311,67312,67314,67316,67318,67320,67331,67332,67334,67335,67340

 +119     ;;67343,67345,67346,67399,67400,67405,67412,67413,67414,67415,67420,67430,67440

 +120     ;;67445,67450,67500,67505,67515,67550,67560,67570,67599,67700,67710,67715,67800

 +121     ;;67801,67805,67808,67810,67820,67825,67830,67835,67840,67850,67875,67880,67882

 +122     ;;67900,67901,67902,67903,67904,67906,67908,67909,67911,67912,67914,67915,67916

 +123     ;;67917,67921,67922,67923,67924,67930,67935,67938,67950,67961,67966,67971,67973

 +124     ;;67974,67975,67999,68020,68040,68100,68110,68115,68130,68135,68200,68320,68325

 +125     ;;68326,68328,68330,68335,68340,68360,68362,68371,68399,68400,68420,68440,68500

 +126     ;;68505,68510,68520,68525,68530,68540,68550,68700,68705,68720,68745,68750,68760

 +127     ;;68761,68770,68801,68810,68811,68815,68816,68840,68841,68850,68899,69000,69005

 +128     ;;69020,69090,69100,69105,69110,69120,69140,69145,69200,69205,69209,69210,69220

 +129     ;;69222,69300,69310,69320,69399,69420,69421,69424,69433,69436,69440,69450,69501

 +130     ;;69502,69505,69511,69535,69540,69550,69552,69554,69601,69602,69603,69604,69610

 +131     ;;69620,69631,69632,69633,69635,69636,69637,69641,69642,69643,69644,69645,69646

 +132     ;;69650,69660,69661,69662,69666,69667,69670,69676,69700,69705,69706,69710,69711

 +133     ;;69714,69715,69717,69718,69720,69740,69799,69801,69805,69806,69949,69950,69955

 +134     ;;69960,69970,69979,69990,70010,70015,70030,70100,7010F,70110,70120,70130,70134

 +135     ;;70140,70150,70160,70170,70190,70200,7020F,70210,70220,70240,70250,7025F,70260

 +136     ;;70300,70310,70320,70328,70330,70332,70336,70350,70355,70360,70370,70371,70380

 +137     ;;70390,70450,70460,70470,70480,70481,70482,70486,70487,70488,70490,70491,70492

 +138     ;;70496,70498,70540,70542,70543,70544,70545,70546,70547,70548,70549,70551,70552

 +139     ;;70553,70554,70555,70557,70558,70559,71045,71046,71047,71048,71100,71101,71110

 +140     ;;71111,71120,71130,71250,71260,71270,71271,71275,71550,71551,71552,71555,72020

 +141     ;;72040,72050,72052,72070,72072,72074,72080,72081,72082,72083,72084,72100,72110

 +142     ;;72114,72120,72125,72126,72127,72128,72129,72130,72131,72132,72133,72141,72142

 +143     ;;72146,72147,72148,72149,72156,72157,72158,72159,72170,72190,72191,72192,72193

 +144     ;;72194,72195,72196,72197,72198,72200,72202,72220,72240,72255,72265,72270,72275

 +145     ;;72285,72295,73000,73010,73020,73030,73040,73050,73060,73070,73080,73085,73090

 +146     ;;73092,73100,73110,73115,73120,73130,73140,73200,73201,73202,73206,73218,73219

 +147     ;;73220,73221,73222,73223,73225,73501,73502,73503,73521,73522,73523,73525,73551

 +148     ;;73552,73560,73562,73564,73565,73580,73590,73592,73600,73610,73615,73620,73630

 +149     ;;73650,73660,73700,73701,73702,73706,73718,73719,73720,73721,73722,73723,73725

 +150     ;;74018,74019,74021,74022,74150,74160,74170,74174,74175,74176,74177,74178,74181

 +151     ;;74182,74183,74185,74190,74210,74220,74221,74230,74235,74240,74246,74248,74250

 +152     ;;74251,74261,74262,74263,74270,74280,74283,74290,74300,74301,74328,74329,74330

 +153     ;;74340,74355,74360,74363,74400,74410,74415,74420,74425,74430,74440,74445,74450

 +154     ;;74455,74470,74485,74710,74712,74713,74740,74742,74775,75557,75559,75561,75563

 +155     ;;75565,75571,75572,75573,75574,75600,75605,75625,75630,75635,75705,75710,75716

 +156     ;;75726,75731,75733,75736,75741,75743,75746,75756,75774,75801,75803,75805,75807

 +157     ;;75809,75810,75820,75822,75825,75827,75831,75833,75840,75842,75860,75870,75872

 +158     ;;75880,75885,75887,75889,75891,75893,75894,75898,75901,75902,75956,75957,75958

 +159     ;;75959,75970,75984,75989,76000,76010,76080,76098,76100,76101,76102,76120,76125

 +160     ;;76140,76145,76376,76377,76380,76390,76391,76496,76497,76498,76499,76506,76510

SR206UT1.m