BGP13Y6 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON APR 14, 2011 ;
;;11.1;IHS CLINICAL REPORTING SYSTEM;;JUN 27, 2011;Build 33
;
START ;
K:'$G(ATXPGMC) ^TMP("ATX",$J)
S ATXPGMC=$G(ATXPGMC)+1
F ATXI=1:1 S X=$P($T(TMP+ATXI),";;",2,99) Q:X="" S X="^TMP(""ATX"",$J,"_X,ATXI=ATXI+1,Y=$P($T(TMP+ATXI),";;",2,99) S @X=Y
Q
;
TMP ;;TAXONOMY (WITH BULLETIN)
;;21,"65597-0112-90 ")
;;173
;;21,"65597-0113-10 ")
;;164
;;21,"65597-0113-30 ")
;;165
;;21,"65597-0113-90 ")
;;166
;;21,"65597-0114-30 ")
;;151
;;21,"65597-0114-90 ")
;;152
;;21,"65597-0115-30 ")
;;157
;;21,"65597-0115-90 ")
;;158
;;21,"65597-0116-30 ")
;;159
;;21,"65597-0116-90 ")
;;160
;;21,"65597-0117-30 ")
;;153
;;21,"65597-0117-90 ")
;;154
;;21,"65597-0118-30 ")
;;155
;;21,"65597-0118-90 ")
;;156
;;21,"65726-0226-15 ")
;;1303
;;21,"65726-0226-25 ")
;;1304
;;21,"65726-0227-15 ")
;;1312
;;21,"65726-0227-25 ")
;;1313
;;21,"65726-0235-10 ")
;;1319
;;21,"65726-0235-25 ")
;;1320
;;21,"65726-0236-10 ")
;;1315
;;21,"65726-0236-25 ")
;;1316
;;21,"65862-0101-05 ")
;;430
;;21,"65862-0101-90 ")
;;431
;;21,"65862-0101-99 ")
;;432
;;21,"65862-0102-05 ")
;;559
;;21,"65862-0102-90 ")
;;560
;;21,"65862-0102-99 ")
;;561
;;21,"65862-0103-05 ")
;;324
;;21,"65862-0103-90 ")
;;325
;;21,"65862-0103-99 ")
;;326
;;21,"66105-0528-01 ")
;;562
;;21,"66105-0528-03 ")
;;563
;;21,"66105-0528-06 ")
;;564
;;21,"66105-0528-09 ")
;;565
;;21,"66105-0528-10 ")
;;566
;;21,"66105-0529-01 ")
;;327
;;21,"66105-0529-03 ")
;;328
;;21,"66105-0529-06 ")
;;329
;;21,"66105-0529-09 ")
;;330
;;21,"66105-0529-10 ")
;;331
;;21,"66116-0278-30 ")
;;1665
;;21,"66116-0432-30 ")
;;685
;;21,"66116-0433-30 ")
;;708
;;21,"66116-0468-30 ")
;;1932
;;21,"66116-0492-30 ")
;;2018
;;21,"66336-0255-30 ")
;;332
;;21,"66336-0296-30 ")
;;1765
;;21,"66336-0300-30 ")
;;1873
;;21,"66336-0424-30 ")
;;1564
;;21,"66336-0669-14 ")
;;849
;;21,"66336-0683-30 ")
;;1524
;;21,"66336-0781-30 ")
;;1933
;;21,"66336-0809-30 ")
;;567
;;21,"66336-0809-90 ")
;;610
;;21,"66336-0894-30 ")
;;333
;;21,"66336-0894-90 ")
;;334
;;21,"66336-0959-30 ")
;;2019
;;21,"67286-0813-02 ")
;;1354
;;21,"67286-0813-03 ")
;;1359
;;21,"67286-0813-04 ")
;;1360
;;21,"67286-0814-03 ")
;;1355
;;21,"67286-0814-04 ")
;;1356
;;21,"67286-0815-04 ")
;;1362
;;21,"67544-0071-30 ")
;;568
;;21,"67544-0086-30 ")
;;335
;;21,"67544-0093-30 ")
;;1288
;;21,"67544-0093-53 ")
;;1289
;;21,"67544-0093-60 ")
;;1290
;;21,"67544-0093-80 ")
;;1291
;;21,"67544-0094-30 ")
;;1221
;;21,"67544-0094-53 ")
;;1222
;;21,"67544-0094-60 ")
;;1223
;;21,"67544-0094-70 ")
;;1224
;;21,"67544-0094-80 ")
;;1225
;;21,"67544-0110-30 ")
;;1402
;;21,"67544-0110-60 ")
;;1403
;;21,"67544-0111-30 ")
;;1448
;;21,"67544-0111-60 ")
;;1449
;;21,"67544-0185-60 ")
;;1476
;;21,"67544-0185-81 ")
;;1477
;;21,"67544-0185-82 ")
;;1478
;;21,"67544-0262-30 ")
;;952
;;21,"67544-0262-60 ")
;;953
;;21,"67544-0263-30 ")
;;973
;;21,"67544-0263-60 ")
;;974
;;21,"67544-0264-30 ")
;;992
;;21,"67544-0264-60 ")
;;993
;;21,"67544-0265-30 ")
;;1009
;;21,"67544-0265-60 ")
;;1010
;;21,"67544-0266-30 ")
;;1031
;;21,"67544-0266-60 ")
;;1032
;;21,"67544-0297-60 ")
;;2020
;;21,"67544-0344-30 ")
;;1249
;;21,"67544-0344-60 ")
;;1250
;;21,"67544-0388-30 ")
;;1251
;;21,"67544-0388-60 ")
;;1252
;;21,"67544-0389-30 ")
;;1292
;;21,"67544-0389-53 ")
;;1293
;;21,"67544-0389-60 ")
;;1294
;;21,"67544-0389-80 ")
;;1295
;;21,"67544-0390-30 ")
;;1226
;;21,"67544-0390-53 ")
;;1227
;;21,"67544-0390-60 ")
;;1228
;;21,"67544-0390-70 ")
;;1229
;;21,"67544-0390-80 ")
;;1230
;;21,"67544-0809-30 ")
;;1404
;;21,"67544-0809-60 ")
;;1405
;;21,"67544-0993-30 ")
;;336
;;21,"67544-1095-30 ")
;;337
;;21,"67544-1136-60 ")
;;1406
;;21,"67544-1156-60 ")
;;1450
;;21,"67544-1214-30 ")
;;338
;;21,"67544-1287-30 ")
;;569
;;21,"67544-1287-60 ")
;;570
;;21,"67544-1330-30 ")
;;339
;;21,"67544-1330-45 ")
;;340
;;21,"67767-0108-01 ")
;;1305
;;21,"67767-0109-01 ")
;;1314
;;21,"67767-0151-01 ")
;;1451
;;21,"67767-0151-05 ")
;;1460
;;21,"67767-0153-01 ")
;;1407
;;21,"67767-0153-05 ")
;;1412
;;21,"68030-6625-01 ")
;;571
;;21,"68030-6626-01 ")
;;341
;;21,"68071-0707-30 ")
;;342
;;21,"68071-0728-30 ")
;;572
;;21,"68071-1348-00 ")
;;573
;;21,"68071-1349-00 ")
;;343
;;21,"68084-0142-01 ")
;;1408
;;21,"68084-0142-11 ")
;;1409
;;21,"68084-0142-30 ")
;;1410
;;21,"68084-0142-90 ")
;;1411
;;21,"68084-0143-01 ")
;;1452
;;21,"68084-0143-11 ")
;;1453
;;21,"68084-0143-30 ")
;;1454
;;21,"68084-0143-90 ")
;;1455
;;21,"68084-0237-01 ")
;;433
;;21,"68084-0237-11 ")
;;434
;;21,"68084-0238-01 ")
;;574
;;21,"68084-0238-11 ")
;;575
;;21,"68084-0239-01 ")
;;344
;;21,"68084-0239-11 ")
;;345
;;21,"68084-0349-11 ")
;;76
;;21,"68084-0349-21 ")
;;77
;;21,"68084-0350-01 ")
;;112
;;21,"68084-0350-11 ")
;;113
;;21,"68084-0351-11 ")
;;26
;;21,"68084-0351-21 ")
;;27
;;21,"68115-0114-60 ")
;;1164
;;21,"68115-0115-30 ")
;;657
;;21,"68115-0256-30 ")
;;1525
;;21,"68115-0257-30 ")
;;1565
;;21,"68115-0263-15 ")
;;346
;;21,"68115-0263-28 ")
;;347
;;21,"68115-0263-30 ")
;;348
;;21,"68115-0263-60 ")
;;349
;;21,"68115-0263-90 ")
;;350
;;21,"68115-0283-30 ")
;;1231
;;21,"68115-0284-30 ")
;;1296
;;21,"68115-0284-60 ")
;;1297
;;21,"68115-0347-30 ")
;;1766
;;21,"68115-0347-60 ")
;;1767
;;21,"68115-0348-00 ")
;;1934
;;21,"68115-0348-30 ")
;;1935
;;21,"68115-0349-30 ")
;;2021
;;21,"68115-0349-60 ")
;;2022
;;21,"68115-0350-90 ")
;;1837
;;21,"68115-0368-00 ")
;;2023
;;21,"68115-0368-30 ")
;;2024
;;21,"68115-0441-30 ")
;;1768
;;21,"68115-0606-00 ")
;;1107
;;21,"68115-0606-15 ")
;;1108
;;21,"68115-0606-30 ")
;;1109
;;21,"68115-0612-90 ")
;;709
;;21,"68115-0636-00 ")
;;1779
;;21,"68115-0650-00 ")
;;17
;;21,"68115-0673-00 ")
;;102
;;21,"68115-0673-30 ")
;;103
;;21,"68115-0778-00 ")
;;68
;;21,"68115-0790-00 ")
;;1253
;;21,"68115-0890-15 ")
;;576
;;21,"68115-0890-30 ")
;;577
;;21,"68115-0890-60 ")
;;578
;;21,"68115-0890-90 ")
;;579
;;21,"68180-0750-09 ")
;;435
;;21,"68180-0751-03 ")
;;580
;;21,"68180-0751-09 ")
;;581
;;21,"68180-0752-03 ")
;;351
;;21,"68180-0752-09 ")
;;352
;;21,"68180-0755-01 ")
;;48
;;21,"68180-0756-01 ")
;;78
;;21,"68180-0756-02 ")
;;79
;;21,"68180-0757-01 ")
;;114
;;21,"68180-0757-02 ")
;;115
;;21,"68180-0758-01 ")
;;28
;;21,"68180-0758-02 ")
;;29
;;21,"68258-1019-01 ")
;;1526
;;21,"68258-1020-01 ")
;;1566
;;21,"68258-1021-01 ")
;;1601
;;21,"68258-6014-03 ")
;;1166
;;21,"68258-9113-01 ")
;;436
;;21,"68382-0121-01 ")
;;437
;;21,"68382-0121-05 ")
;;438
;;21,"68382-0121-16 ")
;;439
;;21,"68382-0122-01 ")
;;582
;;21,"68382-0122-05 ")
;;583
;;21,"68382-0122-16 ")
;;584
;;21,"68382-0123-01 ")
;;353
;;21,"68382-0123-05 ")
;;354
;;21,"68382-0123-16 ")
;;355
;;21,"68462-0210-10 ")
;;440
;;21,"68462-0211-10 ")
;;585
;;21,"68462-0212-10 ")
;;356
;;21,"68462-0260-01 ")
;;2025
;;21,"68462-0260-05 ")
;;2026
;;21,"68462-0294-01 ")
;;124
;;21,"68462-0295-01 ")
;;131
;;21,"68462-0296-01 ")
;;136
;;21,"68462-0329-01 ")
;;144
;;9002226,1101,.01)
;;BGP PQA CCB NDC
;;9002226,1101,.02)
;;@
;;9002226,1101,.04)
;;n
;;9002226,1101,.06)
;;@
;;9002226,1101,.08)
;;@
;;9002226,1101,.09)
;;@
;;9002226,1101,.11)
;;@
;;9002226,1101,.12)
;;@
;;9002226,1101,.13)
;;1
;;9002226,1101,.14)
;;@
;;9002226,1101,.15)
;;@
;;9002226,1101,.16)
;;@
;;9002226,1101,.17)
;;@
;;9002226,1101,3101)
;;@
;;9002226.02101,"1101,00004-0180-22 ",.01)
;;00004-0180-22
;;9002226.02101,"1101,00004-0180-22 ",.02)
;;00004-0180-22
;;9002226.02101,"1101,00004-0180-91 ",.01)
;;00004-0180-91
;;9002226.02101,"1101,00004-0180-91 ",.02)
;;00004-0180-91
;;9002226.02101,"1101,00004-0181-22 ",.01)
;;00004-0181-22
;;9002226.02101,"1101,00004-0181-22 ",.02)
;;00004-0181-22
;;9002226.02101,"1101,00004-0181-91 ",.01)
;;00004-0181-91
;;9002226.02101,"1101,00004-0181-91 ",.02)
;;00004-0181-91
;;9002226.02101,"1101,00004-0182-22 ",.01)
;;00004-0182-22
;;9002226.02101,"1101,00004-0182-22 ",.02)
;;00004-0182-22
;;9002226.02101,"1101,00004-0183-01 ",.01)
;;00004-0183-01
;;9002226.02101,"1101,00004-0183-01 ",.02)
;;00004-0183-01
;;9002226.02101,"1101,00004-0184-01 ",.01)
;;00004-0184-01
;;9002226.02101,"1101,00004-0184-01 ",.02)
;;00004-0184-01
;;9002226.02101,"1101,00025-1771-31 ",.01)
;;00025-1771-31
;;9002226.02101,"1101,00025-1771-31 ",.02)
;;00025-1771-31
;;9002226.02101,"1101,00025-1851-31 ",.01)
;;00025-1851-31
;;9002226.02101,"1101,00025-1851-31 ",.02)
;;00025-1851-31
;;9002226.02101,"1101,00025-1851-51 ",.01)
;;00025-1851-51
;;9002226.02101,"1101,00025-1851-51 ",.02)
;;00025-1851-51
;;9002226.02101,"1101,00025-1851-52 ",.01)
;;00025-1851-52
;;9002226.02101,"1101,00025-1851-52 ",.02)
;;00025-1851-52
;;9002226.02101,"1101,00025-1861-31 ",.01)
;;00025-1861-31
;;9002226.02101,"1101,00025-1861-31 ",.02)
;;00025-1861-31
;;9002226.02101,"1101,00025-1861-52 ",.01)
;;00025-1861-52
;;9002226.02101,"1101,00025-1861-52 ",.02)
;;00025-1861-52
;;9002226.02101,"1101,00025-1891-31 ",.01)
;;00025-1891-31
;;9002226.02101,"1101,00025-1891-31 ",.02)
;;00025-1891-31
;;9002226.02101,"1101,00025-1891-34 ",.01)
;;00025-1891-34
;;9002226.02101,"1101,00025-1891-34 ",.02)
;;00025-1891-34
;;9002226.02101,"1101,00025-1891-51 ",.01)
;;00025-1891-51
;;9002226.02101,"1101,00025-1891-51 ",.02)
;;00025-1891-51
;;9002226.02101,"1101,00025-1901-31 ",.01)
;;00025-1901-31
;;9002226.02101,"1101,00025-1901-31 ",.02)
;;00025-1901-31
;;9002226.02101,"1101,00025-1901-34 ",.01)
;;00025-1901-34
;;9002226.02101,"1101,00025-1901-34 ",.02)
;;00025-1901-34
;;9002226.02101,"1101,00025-1911-31 ",.01)
;;00025-1911-31
;;9002226.02101,"1101,00025-1911-31 ",.02)
;;00025-1911-31
;;9002226.02101,"1101,00025-1911-34 ",.01)
;;00025-1911-34
;;9002226.02101,"1101,00025-1911-34 ",.02)
;;00025-1911-34
;;9002226.02101,"1101,00025-2011-31 ",.01)
;;00025-2011-31
;;9002226.02101,"1101,00025-2011-31 ",.02)
;;00025-2011-31
;;9002226.02101,"1101,00025-2011-34 ",.01)
;;00025-2011-34
;;9002226.02101,"1101,00025-2011-34 ",.02)
;;00025-2011-34
;;9002226.02101,"1101,00025-2021-31 ",.01)
;;00025-2021-31
;;9002226.02101,"1101,00025-2021-31 ",.02)
;;00025-2021-31
;;9002226.02101,"1101,00025-2021-34 ",.01)
;;00025-2021-34
;;9002226.02101,"1101,00025-2021-34 ",.02)
;;00025-2021-34
;;9002226.02101,"1101,00026-8841-48 ",.01)
;;00026-8841-48
;;9002226.02101,"1101,00026-8841-48 ",.02)
;;00026-8841-48
;;9002226.02101,"1101,00026-8841-51 ",.01)
;;00026-8841-51
;;9002226.02101,"1101,00026-8841-51 ",.02)
;;00026-8841-51
;;9002226.02101,"1101,00026-8841-54 ",.01)
;;00026-8841-54
;;9002226.02101,"1101,00026-8841-54 ",.02)
;;00026-8841-54
;;9002226.02101,"1101,00026-8841-72 ",.01)
;;00026-8841-72
;;9002226.02101,"1101,00026-8841-72 ",.02)
;;00026-8841-72
;;9002226.02101,"1101,00026-8851-48 ",.01)
;;00026-8851-48
;;9002226.02101,"1101,00026-8851-48 ",.02)
;;00026-8851-48
;;9002226.02101,"1101,00026-8851-51 ",.01)
;;00026-8851-51
;;9002226.02101,"1101,00026-8851-51 ",.02)
;;00026-8851-51
;;9002226.02101,"1101,00026-8851-54 ",.01)
;;00026-8851-54
;;9002226.02101,"1101,00026-8851-54 ",.02)
;;00026-8851-54
;;9002226.02101,"1101,00026-8851-72 ",.01)
;;00026-8851-72
;;9002226.02101,"1101,00026-8851-72 ",.02)
;;00026-8851-72
;;9002226.02101,"1101,00026-8861-48 ",.01)
;;00026-8861-48
;;9002226.02101,"1101,00026-8861-48 ",.02)
;;00026-8861-48
;;9002226.02101,"1101,00026-8861-51 ",.01)
;;00026-8861-51
;;9002226.02101,"1101,00026-8861-51 ",.02)
;;00026-8861-51
;;9002226.02101,"1101,00044-1825-02 ",.01)
;;00044-1825-02
;;9002226.02101,"1101,00044-1825-02 ",.02)
;;00044-1825-02
;;9002226.02101,"1101,00044-1826-02 ",.01)
;;00044-1826-02
;;9002226.02101,"1101,00044-1826-02 ",.02)
;;00044-1826-02
;;9002226.02101,"1101,00044-1826-03 ",.01)
;;00044-1826-03
;;9002226.02101,"1101,00044-1826-03 ",.02)
;;00044-1826-03
BGP13Y6 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON APR 14, 2011 ;
+1 ;;11.1;IHS CLINICAL REPORTING SYSTEM;;JUN 27, 2011;Build 33
+2 ;
START ;
+1 IF '$GET(ATXPGMC)
KILL ^TMP("ATX",$JOB)
+2 SET ATXPGMC=$GET(ATXPGMC)+1
+3 FOR ATXI=1:1
SET X=$PIECE($TEXT(TMP+ATXI),";;",2,99)
IF X=""
QUIT
SET X="^TMP(""ATX"",$J,"_X
SET ATXI=ATXI+1
SET Y=$PIECE($TEXT(TMP+ATXI),";;",2,99)
SET @X=Y
+4 QUIT
+5 ;
TMP ;;TAXONOMY (WITH BULLETIN)
+1 ;;21,"65597-0112-90 ")
+2 ;;173
+3 ;;21,"65597-0113-10 ")
+4 ;;164
+5 ;;21,"65597-0113-30 ")
+6 ;;165
+7 ;;21,"65597-0113-90 ")
+8 ;;166
+9 ;;21,"65597-0114-30 ")
+10 ;;151
+11 ;;21,"65597-0114-90 ")
+12 ;;152
+13 ;;21,"65597-0115-30 ")
+14 ;;157
+15 ;;21,"65597-0115-90 ")
+16 ;;158
+17 ;;21,"65597-0116-30 ")
+18 ;;159
+19 ;;21,"65597-0116-90 ")
+20 ;;160
+21 ;;21,"65597-0117-30 ")
+22 ;;153
+23 ;;21,"65597-0117-90 ")
+24 ;;154
+25 ;;21,"65597-0118-30 ")
+26 ;;155
+27 ;;21,"65597-0118-90 ")
+28 ;;156
+29 ;;21,"65726-0226-15 ")
+30 ;;1303
+31 ;;21,"65726-0226-25 ")
+32 ;;1304
+33 ;;21,"65726-0227-15 ")
+34 ;;1312
+35 ;;21,"65726-0227-25 ")
+36 ;;1313
+37 ;;21,"65726-0235-10 ")
+38 ;;1319
+39 ;;21,"65726-0235-25 ")
+40 ;;1320
+41 ;;21,"65726-0236-10 ")
+42 ;;1315
+43 ;;21,"65726-0236-25 ")
+44 ;;1316
+45 ;;21,"65862-0101-05 ")
+46 ;;430
+47 ;;21,"65862-0101-90 ")
+48 ;;431
+49 ;;21,"65862-0101-99 ")
+50 ;;432
+51 ;;21,"65862-0102-05 ")
+52 ;;559
+53 ;;21,"65862-0102-90 ")
+54 ;;560
+55 ;;21,"65862-0102-99 ")
+56 ;;561
+57 ;;21,"65862-0103-05 ")
+58 ;;324
+59 ;;21,"65862-0103-90 ")
+60 ;;325
+61 ;;21,"65862-0103-99 ")
+62 ;;326
+63 ;;21,"66105-0528-01 ")
+64 ;;562
+65 ;;21,"66105-0528-03 ")
+66 ;;563
+67 ;;21,"66105-0528-06 ")
+68 ;;564
+69 ;;21,"66105-0528-09 ")
+70 ;;565
+71 ;;21,"66105-0528-10 ")
+72 ;;566
+73 ;;21,"66105-0529-01 ")
+74 ;;327
+75 ;;21,"66105-0529-03 ")
+76 ;;328
+77 ;;21,"66105-0529-06 ")
+78 ;;329
+79 ;;21,"66105-0529-09 ")
+80 ;;330
+81 ;;21,"66105-0529-10 ")
+82 ;;331
+83 ;;21,"66116-0278-30 ")
+84 ;;1665
+85 ;;21,"66116-0432-30 ")
+86 ;;685
+87 ;;21,"66116-0433-30 ")
+88 ;;708
+89 ;;21,"66116-0468-30 ")
+90 ;;1932
+91 ;;21,"66116-0492-30 ")
+92 ;;2018
+93 ;;21,"66336-0255-30 ")
+94 ;;332
+95 ;;21,"66336-0296-30 ")
+96 ;;1765
+97 ;;21,"66336-0300-30 ")
+98 ;;1873
+99 ;;21,"66336-0424-30 ")
+100 ;;1564
+101 ;;21,"66336-0669-14 ")
+102 ;;849
+103 ;;21,"66336-0683-30 ")
+104 ;;1524
+105 ;;21,"66336-0781-30 ")
+106 ;;1933
+107 ;;21,"66336-0809-30 ")
+108 ;;567
+109 ;;21,"66336-0809-90 ")
+110 ;;610
+111 ;;21,"66336-0894-30 ")
+112 ;;333
+113 ;;21,"66336-0894-90 ")
+114 ;;334
+115 ;;21,"66336-0959-30 ")
+116 ;;2019
+117 ;;21,"67286-0813-02 ")
+118 ;;1354
+119 ;;21,"67286-0813-03 ")
+120 ;;1359
+121 ;;21,"67286-0813-04 ")
+122 ;;1360
+123 ;;21,"67286-0814-03 ")
+124 ;;1355
+125 ;;21,"67286-0814-04 ")
+126 ;;1356
+127 ;;21,"67286-0815-04 ")
+128 ;;1362
+129 ;;21,"67544-0071-30 ")
+130 ;;568
+131 ;;21,"67544-0086-30 ")
+132 ;;335
+133 ;;21,"67544-0093-30 ")
+134 ;;1288
+135 ;;21,"67544-0093-53 ")
+136 ;;1289
+137 ;;21,"67544-0093-60 ")
+138 ;;1290
+139 ;;21,"67544-0093-80 ")
+140 ;;1291
+141 ;;21,"67544-0094-30 ")
+142 ;;1221
+143 ;;21,"67544-0094-53 ")
+144 ;;1222
+145 ;;21,"67544-0094-60 ")
+146 ;;1223
+147 ;;21,"67544-0094-70 ")
+148 ;;1224
+149 ;;21,"67544-0094-80 ")
+150 ;;1225
+151 ;;21,"67544-0110-30 ")
+152 ;;1402
+153 ;;21,"67544-0110-60 ")
+154 ;;1403
+155 ;;21,"67544-0111-30 ")
+156 ;;1448
+157 ;;21,"67544-0111-60 ")
+158 ;;1449
+159 ;;21,"67544-0185-60 ")
+160 ;;1476
+161 ;;21,"67544-0185-81 ")
+162 ;;1477
+163 ;;21,"67544-0185-82 ")
+164 ;;1478
+165 ;;21,"67544-0262-30 ")
+166 ;;952
+167 ;;21,"67544-0262-60 ")
+168 ;;953
+169 ;;21,"67544-0263-30 ")
+170 ;;973
+171 ;;21,"67544-0263-60 ")
+172 ;;974
+173 ;;21,"67544-0264-30 ")
+174 ;;992
+175 ;;21,"67544-0264-60 ")
+176 ;;993
+177 ;;21,"67544-0265-30 ")
+178 ;;1009
+179 ;;21,"67544-0265-60 ")
+180 ;;1010
+181 ;;21,"67544-0266-30 ")
+182 ;;1031
+183 ;;21,"67544-0266-60 ")
+184 ;;1032
+185 ;;21,"67544-0297-60 ")
+186 ;;2020
+187 ;;21,"67544-0344-30 ")
+188 ;;1249
+189 ;;21,"67544-0344-60 ")
+190 ;;1250
+191 ;;21,"67544-0388-30 ")
+192 ;;1251
+193 ;;21,"67544-0388-60 ")
+194 ;;1252
+195 ;;21,"67544-0389-30 ")
+196 ;;1292
+197 ;;21,"67544-0389-53 ")
+198 ;;1293
+199 ;;21,"67544-0389-60 ")
+200 ;;1294
+201 ;;21,"67544-0389-80 ")
+202 ;;1295
+203 ;;21,"67544-0390-30 ")
+204 ;;1226
+205 ;;21,"67544-0390-53 ")
+206 ;;1227
+207 ;;21,"67544-0390-60 ")
+208 ;;1228
+209 ;;21,"67544-0390-70 ")
+210 ;;1229
+211 ;;21,"67544-0390-80 ")
+212 ;;1230
+213 ;;21,"67544-0809-30 ")
+214 ;;1404
+215 ;;21,"67544-0809-60 ")
+216 ;;1405
+217 ;;21,"67544-0993-30 ")
+218 ;;336
+219 ;;21,"67544-1095-30 ")
+220 ;;337
+221 ;;21,"67544-1136-60 ")
+222 ;;1406
+223 ;;21,"67544-1156-60 ")
+224 ;;1450
+225 ;;21,"67544-1214-30 ")
+226 ;;338
+227 ;;21,"67544-1287-30 ")
+228 ;;569
+229 ;;21,"67544-1287-60 ")
+230 ;;570
+231 ;;21,"67544-1330-30 ")
+232 ;;339
+233 ;;21,"67544-1330-45 ")
+234 ;;340
+235 ;;21,"67767-0108-01 ")
+236 ;;1305
+237 ;;21,"67767-0109-01 ")
+238 ;;1314
+239 ;;21,"67767-0151-01 ")
+240 ;;1451
+241 ;;21,"67767-0151-05 ")
+242 ;;1460
+243 ;;21,"67767-0153-01 ")
+244 ;;1407
+245 ;;21,"67767-0153-05 ")
+246 ;;1412
+247 ;;21,"68030-6625-01 ")
+248 ;;571
+249 ;;21,"68030-6626-01 ")
+250 ;;341
+251 ;;21,"68071-0707-30 ")
+252 ;;342
+253 ;;21,"68071-0728-30 ")
+254 ;;572
+255 ;;21,"68071-1348-00 ")
+256 ;;573
+257 ;;21,"68071-1349-00 ")
+258 ;;343
+259 ;;21,"68084-0142-01 ")
+260 ;;1408
+261 ;;21,"68084-0142-11 ")
+262 ;;1409
+263 ;;21,"68084-0142-30 ")
+264 ;;1410
+265 ;;21,"68084-0142-90 ")
+266 ;;1411
+267 ;;21,"68084-0143-01 ")
+268 ;;1452
+269 ;;21,"68084-0143-11 ")
+270 ;;1453
+271 ;;21,"68084-0143-30 ")
+272 ;;1454
+273 ;;21,"68084-0143-90 ")
+274 ;;1455
+275 ;;21,"68084-0237-01 ")
+276 ;;433
+277 ;;21,"68084-0237-11 ")
+278 ;;434
+279 ;;21,"68084-0238-01 ")
+280 ;;574
+281 ;;21,"68084-0238-11 ")
+282 ;;575
+283 ;;21,"68084-0239-01 ")
+284 ;;344
+285 ;;21,"68084-0239-11 ")
+286 ;;345
+287 ;;21,"68084-0349-11 ")
+288 ;;76
+289 ;;21,"68084-0349-21 ")
+290 ;;77
+291 ;;21,"68084-0350-01 ")
+292 ;;112
+293 ;;21,"68084-0350-11 ")
+294 ;;113
+295 ;;21,"68084-0351-11 ")
+296 ;;26
+297 ;;21,"68084-0351-21 ")
+298 ;;27
+299 ;;21,"68115-0114-60 ")
+300 ;;1164
+301 ;;21,"68115-0115-30 ")
+302 ;;657
+303 ;;21,"68115-0256-30 ")
+304 ;;1525
+305 ;;21,"68115-0257-30 ")
+306 ;;1565
+307 ;;21,"68115-0263-15 ")
+308 ;;346
+309 ;;21,"68115-0263-28 ")
+310 ;;347
+311 ;;21,"68115-0263-30 ")
+312 ;;348
+313 ;;21,"68115-0263-60 ")
+314 ;;349
+315 ;;21,"68115-0263-90 ")
+316 ;;350
+317 ;;21,"68115-0283-30 ")
+318 ;;1231
+319 ;;21,"68115-0284-30 ")
+320 ;;1296
+321 ;;21,"68115-0284-60 ")
+322 ;;1297
+323 ;;21,"68115-0347-30 ")
+324 ;;1766
+325 ;;21,"68115-0347-60 ")
+326 ;;1767
+327 ;;21,"68115-0348-00 ")
+328 ;;1934
+329 ;;21,"68115-0348-30 ")
+330 ;;1935
+331 ;;21,"68115-0349-30 ")
+332 ;;2021
+333 ;;21,"68115-0349-60 ")
+334 ;;2022
+335 ;;21,"68115-0350-90 ")
+336 ;;1837
+337 ;;21,"68115-0368-00 ")
+338 ;;2023
+339 ;;21,"68115-0368-30 ")
+340 ;;2024
+341 ;;21,"68115-0441-30 ")
+342 ;;1768
+343 ;;21,"68115-0606-00 ")
+344 ;;1107
+345 ;;21,"68115-0606-15 ")
+346 ;;1108
+347 ;;21,"68115-0606-30 ")
+348 ;;1109
+349 ;;21,"68115-0612-90 ")
+350 ;;709
+351 ;;21,"68115-0636-00 ")
+352 ;;1779
+353 ;;21,"68115-0650-00 ")
+354 ;;17
+355 ;;21,"68115-0673-00 ")
+356 ;;102
+357 ;;21,"68115-0673-30 ")
+358 ;;103
+359 ;;21,"68115-0778-00 ")
+360 ;;68
+361 ;;21,"68115-0790-00 ")
+362 ;;1253
+363 ;;21,"68115-0890-15 ")
+364 ;;576
+365 ;;21,"68115-0890-30 ")
+366 ;;577
+367 ;;21,"68115-0890-60 ")
+368 ;;578
+369 ;;21,"68115-0890-90 ")
+370 ;;579
+371 ;;21,"68180-0750-09 ")
+372 ;;435
+373 ;;21,"68180-0751-03 ")
+374 ;;580
+375 ;;21,"68180-0751-09 ")
+376 ;;581
+377 ;;21,"68180-0752-03 ")
+378 ;;351
+379 ;;21,"68180-0752-09 ")
+380 ;;352
+381 ;;21,"68180-0755-01 ")
+382 ;;48
+383 ;;21,"68180-0756-01 ")
+384 ;;78
+385 ;;21,"68180-0756-02 ")
+386 ;;79
+387 ;;21,"68180-0757-01 ")
+388 ;;114
+389 ;;21,"68180-0757-02 ")
+390 ;;115
+391 ;;21,"68180-0758-01 ")
+392 ;;28
+393 ;;21,"68180-0758-02 ")
+394 ;;29
+395 ;;21,"68258-1019-01 ")
+396 ;;1526
+397 ;;21,"68258-1020-01 ")
+398 ;;1566
+399 ;;21,"68258-1021-01 ")
+400 ;;1601
+401 ;;21,"68258-6014-03 ")
+402 ;;1166
+403 ;;21,"68258-9113-01 ")
+404 ;;436
+405 ;;21,"68382-0121-01 ")
+406 ;;437
+407 ;;21,"68382-0121-05 ")
+408 ;;438
+409 ;;21,"68382-0121-16 ")
+410 ;;439
+411 ;;21,"68382-0122-01 ")
+412 ;;582
+413 ;;21,"68382-0122-05 ")
+414 ;;583
+415 ;;21,"68382-0122-16 ")
+416 ;;584
+417 ;;21,"68382-0123-01 ")
+418 ;;353
+419 ;;21,"68382-0123-05 ")
+420 ;;354
+421 ;;21,"68382-0123-16 ")
+422 ;;355
+423 ;;21,"68462-0210-10 ")
+424 ;;440
+425 ;;21,"68462-0211-10 ")
+426 ;;585
+427 ;;21,"68462-0212-10 ")
+428 ;;356
+429 ;;21,"68462-0260-01 ")
+430 ;;2025
+431 ;;21,"68462-0260-05 ")
+432 ;;2026
+433 ;;21,"68462-0294-01 ")
+434 ;;124
+435 ;;21,"68462-0295-01 ")
+436 ;;131
+437 ;;21,"68462-0296-01 ")
+438 ;;136
+439 ;;21,"68462-0329-01 ")
+440 ;;144
+441 ;;9002226,1101,.01)
+442 ;;BGP PQA CCB NDC
+443 ;;9002226,1101,.02)
+444 ;;@
+445 ;;9002226,1101,.04)
+446 ;;n
+447 ;;9002226,1101,.06)
+448 ;;@
+449 ;;9002226,1101,.08)
+450 ;;@
+451 ;;9002226,1101,.09)
+452 ;;@
+453 ;;9002226,1101,.11)
+454 ;;@
+455 ;;9002226,1101,.12)
+456 ;;@
+457 ;;9002226,1101,.13)
+458 ;;1
+459 ;;9002226,1101,.14)
+460 ;;@
+461 ;;9002226,1101,.15)
+462 ;;@
+463 ;;9002226,1101,.16)
+464 ;;@
+465 ;;9002226,1101,.17)
+466 ;;@
+467 ;;9002226,1101,3101)
+468 ;;@
+469 ;;9002226.02101,"1101,00004-0180-22 ",.01)
+470 ;;00004-0180-22
+471 ;;9002226.02101,"1101,00004-0180-22 ",.02)
+472 ;;00004-0180-22
+473 ;;9002226.02101,"1101,00004-0180-91 ",.01)
+474 ;;00004-0180-91
+475 ;;9002226.02101,"1101,00004-0180-91 ",.02)
+476 ;;00004-0180-91
+477 ;;9002226.02101,"1101,00004-0181-22 ",.01)
+478 ;;00004-0181-22
+479 ;;9002226.02101,"1101,00004-0181-22 ",.02)
+480 ;;00004-0181-22
+481 ;;9002226.02101,"1101,00004-0181-91 ",.01)
+482 ;;00004-0181-91
+483 ;;9002226.02101,"1101,00004-0181-91 ",.02)
+484 ;;00004-0181-91
+485 ;;9002226.02101,"1101,00004-0182-22 ",.01)
+486 ;;00004-0182-22
+487 ;;9002226.02101,"1101,00004-0182-22 ",.02)
+488 ;;00004-0182-22
+489 ;;9002226.02101,"1101,00004-0183-01 ",.01)
+490 ;;00004-0183-01
+491 ;;9002226.02101,"1101,00004-0183-01 ",.02)
+492 ;;00004-0183-01
+493 ;;9002226.02101,"1101,00004-0184-01 ",.01)
+494 ;;00004-0184-01
+495 ;;9002226.02101,"1101,00004-0184-01 ",.02)
+496 ;;00004-0184-01
+497 ;;9002226.02101,"1101,00025-1771-31 ",.01)
+498 ;;00025-1771-31
+499 ;;9002226.02101,"1101,00025-1771-31 ",.02)
+500 ;;00025-1771-31
+501 ;;9002226.02101,"1101,00025-1851-31 ",.01)
+502 ;;00025-1851-31
+503 ;;9002226.02101,"1101,00025-1851-31 ",.02)
+504 ;;00025-1851-31
+505 ;;9002226.02101,"1101,00025-1851-51 ",.01)
+506 ;;00025-1851-51
+507 ;;9002226.02101,"1101,00025-1851-51 ",.02)
+508 ;;00025-1851-51
+509 ;;9002226.02101,"1101,00025-1851-52 ",.01)
+510 ;;00025-1851-52
+511 ;;9002226.02101,"1101,00025-1851-52 ",.02)
+512 ;;00025-1851-52
+513 ;;9002226.02101,"1101,00025-1861-31 ",.01)
+514 ;;00025-1861-31
+515 ;;9002226.02101,"1101,00025-1861-31 ",.02)
+516 ;;00025-1861-31
+517 ;;9002226.02101,"1101,00025-1861-52 ",.01)
+518 ;;00025-1861-52
+519 ;;9002226.02101,"1101,00025-1861-52 ",.02)
+520 ;;00025-1861-52
+521 ;;9002226.02101,"1101,00025-1891-31 ",.01)
+522 ;;00025-1891-31
+523 ;;9002226.02101,"1101,00025-1891-31 ",.02)
+524 ;;00025-1891-31
+525 ;;9002226.02101,"1101,00025-1891-34 ",.01)
+526 ;;00025-1891-34
+527 ;;9002226.02101,"1101,00025-1891-34 ",.02)
+528 ;;00025-1891-34
+529 ;;9002226.02101,"1101,00025-1891-51 ",.01)
+530 ;;00025-1891-51
+531 ;;9002226.02101,"1101,00025-1891-51 ",.02)
+532 ;;00025-1891-51
+533 ;;9002226.02101,"1101,00025-1901-31 ",.01)
+534 ;;00025-1901-31
+535 ;;9002226.02101,"1101,00025-1901-31 ",.02)
+536 ;;00025-1901-31
+537 ;;9002226.02101,"1101,00025-1901-34 ",.01)
+538 ;;00025-1901-34
+539 ;;9002226.02101,"1101,00025-1901-34 ",.02)
+540 ;;00025-1901-34
+541 ;;9002226.02101,"1101,00025-1911-31 ",.01)
+542 ;;00025-1911-31
+543 ;;9002226.02101,"1101,00025-1911-31 ",.02)
+544 ;;00025-1911-31
+545 ;;9002226.02101,"1101,00025-1911-34 ",.01)
+546 ;;00025-1911-34
+547 ;;9002226.02101,"1101,00025-1911-34 ",.02)
+548 ;;00025-1911-34
+549 ;;9002226.02101,"1101,00025-2011-31 ",.01)
+550 ;;00025-2011-31
+551 ;;9002226.02101,"1101,00025-2011-31 ",.02)
+552 ;;00025-2011-31
+553 ;;9002226.02101,"1101,00025-2011-34 ",.01)
+554 ;;00025-2011-34
+555 ;;9002226.02101,"1101,00025-2011-34 ",.02)
+556 ;;00025-2011-34
+557 ;;9002226.02101,"1101,00025-2021-31 ",.01)
+558 ;;00025-2021-31
+559 ;;9002226.02101,"1101,00025-2021-31 ",.02)
+560 ;;00025-2021-31
+561 ;;9002226.02101,"1101,00025-2021-34 ",.01)
+562 ;;00025-2021-34
+563 ;;9002226.02101,"1101,00025-2021-34 ",.02)
+564 ;;00025-2021-34
+565 ;;9002226.02101,"1101,00026-8841-48 ",.01)
+566 ;;00026-8841-48
+567 ;;9002226.02101,"1101,00026-8841-48 ",.02)
+568 ;;00026-8841-48
+569 ;;9002226.02101,"1101,00026-8841-51 ",.01)
+570 ;;00026-8841-51
+571 ;;9002226.02101,"1101,00026-8841-51 ",.02)
+572 ;;00026-8841-51
+573 ;;9002226.02101,"1101,00026-8841-54 ",.01)
+574 ;;00026-8841-54
+575 ;;9002226.02101,"1101,00026-8841-54 ",.02)
+576 ;;00026-8841-54
+577 ;;9002226.02101,"1101,00026-8841-72 ",.01)
+578 ;;00026-8841-72
+579 ;;9002226.02101,"1101,00026-8841-72 ",.02)
+580 ;;00026-8841-72
+581 ;;9002226.02101,"1101,00026-8851-48 ",.01)
+582 ;;00026-8851-48
+583 ;;9002226.02101,"1101,00026-8851-48 ",.02)
+584 ;;00026-8851-48
+585 ;;9002226.02101,"1101,00026-8851-51 ",.01)
+586 ;;00026-8851-51
+587 ;;9002226.02101,"1101,00026-8851-51 ",.02)
+588 ;;00026-8851-51
+589 ;;9002226.02101,"1101,00026-8851-54 ",.01)
+590 ;;00026-8851-54
+591 ;;9002226.02101,"1101,00026-8851-54 ",.02)
+592 ;;00026-8851-54
+593 ;;9002226.02101,"1101,00026-8851-72 ",.01)
+594 ;;00026-8851-72
+595 ;;9002226.02101,"1101,00026-8851-72 ",.02)
+596 ;;00026-8851-72
+597 ;;9002226.02101,"1101,00026-8861-48 ",.01)
+598 ;;00026-8861-48
+599 ;;9002226.02101,"1101,00026-8861-48 ",.02)
+600 ;;00026-8861-48
+601 ;;9002226.02101,"1101,00026-8861-51 ",.01)
+602 ;;00026-8861-51
+603 ;;9002226.02101,"1101,00026-8861-51 ",.02)
+604 ;;00026-8861-51
+605 ;;9002226.02101,"1101,00044-1825-02 ",.01)
+606 ;;00044-1825-02
+607 ;;9002226.02101,"1101,00044-1825-02 ",.02)
+608 ;;00044-1825-02
+609 ;;9002226.02101,"1101,00044-1826-02 ",.01)
+610 ;;00044-1826-02
+611 ;;9002226.02101,"1101,00044-1826-02 ",.02)
+612 ;;00044-1826-02
+613 ;;9002226.02101,"1101,00044-1826-03 ",.01)
+614 ;;00044-1826-03
+615 ;;9002226.02101,"1101,00044-1826-03 ",.02)
+616 ;;00044-1826-03
