BGP48F6 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 17, 2014;
;;14.1;IHS CLINICAL REPORTING;;MAY 29, 2014;Build 114
;
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,"67544-0857-15 ")
;;1868
;;21,"67544-0857-45 ")
;;1869
;;21,"67544-0857-60 ")
;;1870
;;21,"67544-1001-30 ")
;;1249
;;21,"67544-1001-60 ")
;;1250
;;21,"67544-1003-15 ")
;;1965
;;21,"67544-1003-45 ")
;;1966
;;21,"67544-1003-53 ")
;;1967
;;21,"67544-1029-99 ")
;;420
;;21,"67544-1030-99 ")
;;414
;;21,"67544-1032-15 ")
;;865
;;21,"67544-1032-45 ")
;;866
;;21,"67544-1032-82 ")
;;867
;;21,"67544-1032-99 ")
;;868
;;21,"67544-1078-30 ")
;;1791
;;21,"67544-1254-15 ")
;;1654
;;21,"67544-1254-45 ")
;;1655
;;21,"67544-1255-15 ")
;;1859
;;21,"67544-1255-30 ")
;;1860
;;21,"67544-1255-45 ")
;;1861
;;21,"67544-1255-60 ")
;;1862
;;21,"67544-1256-15 ")
;;1467
;;21,"67544-1256-30 ")
;;1468
;;21,"67544-1256-45 ")
;;1469
;;21,"67544-1257-45 ")
;;1308
;;21,"67544-1257-60 ")
;;1309
;;21,"68071-0154-30 ")
;;178
;;21,"68071-0263-30 ")
;;862
;;21,"68071-0310-30 ")
;;285
;;21,"68071-0399-30 ")
;;67
;;21,"68071-0433-30 ")
;;831
;;21,"68071-0699-30 ")
;;1472
;;21,"68071-0716-30 ")
;;1317
;;21,"68071-0784-30 ")
;;789
;;21,"68071-0914-30 ")
;;54
;;21,"68071-0915-30 ")
;;151
;;21,"68071-0916-30 ")
;;249
;;21,"68084-0097-01 ")
;;63
;;21,"68084-0097-11 ")
;;64
;;21,"68084-0098-01 ")
;;162
;;21,"68084-0098-11 ")
;;163
;;21,"68084-0099-01 ")
;;260
;;21,"68084-0099-11 ")
;;261
;;21,"68084-0133-01 ")
;;669
;;21,"68084-0133-11 ")
;;670
;;21,"68084-0161-01 ")
;;1230
;;21,"68084-0161-11 ")
;;1231
;;21,"68084-0163-01 ")
;;1475
;;21,"68084-0163-11 ")
;;1476
;;21,"68084-0165-01 ")
;;1863
;;21,"68084-0165-11 ")
;;1864
;;21,"68084-0186-01 ")
;;942
;;21,"68084-0186-11 ")
;;943
;;21,"68084-0187-01 ")
;;1048
;;21,"68084-0187-11 ")
;;1049
;;21,"68084-0188-01 ")
;;1160
;;21,"68084-0188-11 ")
;;1161
;;21,"68084-0500-01 ")
;;937
;;21,"68084-0500-11 ")
;;938
;;21,"68084-0501-01 ")
;;1039
;;21,"68084-0501-11 ")
;;1040
;;21,"68084-0502-01 ")
;;1153
;;21,"68084-0502-11 ")
;;1154
;;21,"68084-0510-01 ")
;;1225
;;21,"68084-0510-11 ")
;;1226
;;21,"68084-0511-01 ")
;;1325
;;21,"68084-0511-11 ")
;;1326
;;21,"68084-0512-01 ")
;;1501
;;21,"68084-0512-11 ")
;;1502
;;21,"68084-0513-01 ")
;;1689
;;21,"68084-0513-11 ")
;;1690
;;21,"68084-0514-01 ")
;;1876
;;21,"68084-0514-11 ")
;;1877
;;21,"68084-0558-01 ")
;;433
;;21,"68084-0558-11 ")
;;425
;;21,"68084-0559-01 ")
;;625
;;21,"68084-0559-11 ")
;;626
;;21,"68084-0560-01 ")
;;648
;;21,"68084-0560-11 ")
;;643
;;21,"68084-0564-01 ")
;;60
;;21,"68084-0564-11 ")
;;43
;;21,"68084-0565-01 ")
;;142
;;21,"68084-0565-11 ")
;;143
;;21,"68084-0589-01 ")
;;234
;;21,"68084-0589-11 ")
;;235
;;21,"68084-0590-25 ")
;;306
;;21,"68084-0590-95 ")
;;305
;;21,"68115-0218-30 ")
;;453
;;21,"68115-0219-30 ")
;;592
;;21,"68115-0219-60 ")
;;593
;;21,"68115-0494-30 ")
;;201
;;21,"68115-0494-60 ")
;;202
;;21,"68115-0658-00 ")
;;667
;;21,"68115-0658-60 ")
;;668
;;21,"68115-0664-90 ")
;;1061
;;21,"68115-0668-15 ")
;;262
;;21,"68115-0668-30 ")
;;263
;;21,"68115-0668-90 ")
;;264
;;21,"68115-0672-30 ")
;;1651
;;21,"68115-0720-30 ")
;;1454
;;21,"68115-0759-30 ")
;;2002
;;21,"68115-0777-30 ")
;;1848
;;21,"68115-0777-90 ")
;;1849
;;21,"68115-0800-90 ")
;;164
;;21,"68115-0836-30 ")
;;77
;;21,"68115-0836-90 ")
;;78
;;21,"68180-0467-01 ")
;;434
;;21,"68180-0467-03 ")
;;435
;;21,"68180-0467-07 ")
;;436
;;21,"68180-0468-01 ")
;;609
;;21,"68180-0468-03 ")
;;610
;;21,"68180-0468-05 ")
;;611
;;21,"68180-0468-07 ")
;;612
;;21,"68180-0469-01 ")
;;644
;;21,"68180-0469-03 ")
;;645
;;21,"68180-0469-05 ")
;;646
;;21,"68180-0469-07 ")
;;647
;;21,"68180-0478-01 ")
;;1330
;;21,"68180-0478-02 ")
;;1331
;;21,"68180-0478-03 ")
;;1332
;;21,"68180-0479-01 ")
;;1491
;;21,"68180-0479-02 ")
;;1492
;;21,"68180-0479-03 ")
;;1493
;;21,"68180-0480-01 ")
;;1694
;;21,"68180-0480-02 ")
;;1695
;;21,"68180-0480-03 ")
;;1696
;;21,"68180-0481-01 ")
;;1879
;;21,"68180-0481-02 ")
;;1880
;;21,"68180-0481-03 ")
;;1881
;;21,"68180-0482-06 ")
;;1223
;;21,"68180-0482-09 ")
;;1224
;;21,"68180-0485-02 ")
;;940
;;21,"68180-0485-09 ")
;;941
;;21,"68180-0486-02 ")
;;1045
;;21,"68180-0486-09 ")
;;1046
;;21,"68180-0487-02 ")
;;1155
;;21,"68180-0487-09 ")
;;1156
;;21,"68180-0488-02 ")
;;1221
;;21,"68180-0488-09 ")
;;1222
;;21,"68258-1040-01 ")
;;168
;;21,"68258-1057-01 ")
;;595
;;21,"68258-6000-03 ")
;;87
;;21,"68258-6000-09 ")
;;88
;;21,"68258-6001-03 ")
;;176
;;21,"68258-6001-09 ")
;;177
;;21,"68258-6002-03 ")
;;283
;;21,"68258-6002-09 ")
;;284
;;21,"68258-6009-03 ")
;;1419
;;21,"68258-6009-09 ")
;;1420
;;21,"68258-6013-03 ")
;;1206
;;21,"68258-6013-09 ")
;;1207
;;21,"68258-6016-03 ")
;;800
;;21,"68258-6017-03 ")
;;799
;;21,"68258-6041-03 ")
;;55
;;21,"68258-6042-03 ")
;;153
;;21,"68258-6043-03 ")
;;246
;;21,"68258-6043-09 ")
;;247
;;21,"68258-6044-03 ")
;;345
;;21,"68258-6044-09 ")
;;346
;;21,"68258-6049-03 ")
;;948
;;21,"68258-6050-03 ")
;;1232
;;21,"68258-6970-03 ")
;;2055
;;21,"68258-6983-03 ")
;;882
;;21,"68258-6984-03 ")
;;2088
;;21,"68258-6985-09 ")
;;1262
;;21,"68258-6992-09 ")
;;40
;;21,"68258-6993-09 ")
;;139
;;21,"68258-9001-01 ")
;;381
;;21,"68258-9128-01 ")
;;888
;;21,"68258-9154-01 ")
;;304
;;21,"68382-0065-05 ")
;;1236
;;21,"68382-0065-06 ")
;;1237
;;21,"68382-0065-10 ")
;;1238
;;21,"68382-0065-14 ")
;;1239
;;21,"68382-0065-16 ")
;;1240
;;21,"68382-0066-05 ")
;;1423
;;21,"68382-0066-06 ")
;;1424
;;21,"68382-0066-10 ")
;;1425
;;21,"68382-0066-14 ")
;;1426
;;21,"68382-0066-16 ")
;;1427
;;21,"68382-0066-24 ")
;;1428
;;21,"68382-0067-05 ")
;;1607
;;21,"68382-0067-06 ")
;;1608
;;21,"68382-0067-10 ")
;;1609
;;21,"68382-0067-14 ")
;;1610
;;21,"68382-0067-16 ")
;;1611
;;21,"68382-0067-24 ")
;;1612
;;21,"68382-0068-05 ")
;;1807
;;21,"68382-0068-06 ")
;;1808
;;21,"68382-0068-10 ")
;;1809
;;21,"68382-0068-14 ")
;;1810
;;21,"68382-0068-16 ")
;;1811
;;21,"68382-0068-40 ")
;;1812
;;21,"68382-0069-05 ")
;;1973
;;21,"68382-0069-06 ")
;;1974
;;21,"68382-0069-10 ")
;;1975
;;21,"68382-0069-14 ")
;;1976
;;21,"68382-0069-16 ")
;;1977
;;21,"68382-0070-05 ")
;;901
;;21,"68382-0070-16 ")
;;902
;;21,"68382-0071-05 ")
;;976
;;21,"68382-0071-16 ")
;;977
;;21,"68382-0072-05 ")
;;1082
;;21,"68382-0072-16 ")
;;1083
;;21,"68382-0073-05 ")
;;1208
;;21,"68382-0073-16 ")
;;1209
;;21,"68462-0195-05 ")
;;897
;;21,"68462-0195-90 ")
;;898
;;21,"68462-0196-05 ")
;;978
;;21,"68462-0196-90 ")
;;979
;;21,"68462-0197-05 ")
;;1084
;;21,"68462-0197-90 ")
;;1085
;;21,"68462-0198-05 ")
;;1204
;;21,"68462-0198-90 ")
;;1205
;;21,"68645-0261-54 ")
;;1494
;;21,"68645-0262-54 ")
;;1693
;;21,"68645-0263-54 ")
;;1882
;;21,"68645-0402-70 ")
;;61
;;21,"68645-0403-70 ")
;;161
;;21,"68645-0417-54 ")
;;259
;;21,"68645-0418-54 ")
;;357
;;21,"68645-0458-70 ")
;;56
;;21,"68645-0459-70 ")
;;152
;;21,"68645-0460-54 ")
;;248
;;21,"68645-0461-54 ")
;;344
;;21,"68645-0470-54 ")
;;1471
;;21,"68645-0471-54 ")
;;1670
;;21,"68645-0472-54 ")
;;1856
;;9002226,1201,.01)
;;BGP PQA STATIN NDC
;;9002226,1201,.02)
;;@
;;9002226,1201,.04)
;;n
;;9002226,1201,.06)
;;@
;;9002226,1201,.08)
;;@
;;9002226,1201,.09)
;;3140317
;;9002226,1201,.11)
;;@
;;9002226,1201,.12)
;;@
;;9002226,1201,.13)
;;1
;;9002226,1201,.14)
;;@
;;9002226,1201,.15)
;;@
;;9002226,1201,.16)
;;@
;;9002226,1201,.17)
;;@
;;9002226,1201,3101)
;;@
;;9002226.02101,"1201,00002-4770-90 ",.01)
;;00002-4770-90
;;9002226.02101,"1201,00002-4770-90 ",.02)
;;00002-4770-90
;;9002226.02101,"1201,00002-4771-90 ",.01)
;;00002-4771-90
;;9002226.02101,"1201,00002-4771-90 ",.02)
;;00002-4771-90
;;9002226.02101,"1201,00002-4772-90 ",.01)
;;00002-4772-90
;;9002226.02101,"1201,00002-4772-90 ",.02)
;;00002-4772-90
;;9002226.02101,"1201,00003-5154-05 ",.01)
;;00003-5154-05
;;9002226.02101,"1201,00003-5154-05 ",.02)
;;00003-5154-05
;;9002226.02101,"1201,00003-5168-11 ",.01)
;;00003-5168-11
;;9002226.02101,"1201,00003-5168-11 ",.02)
;;00003-5168-11
;;9002226.02101,"1201,00003-5169-11 ",.01)
;;00003-5169-11
;;9002226.02101,"1201,00003-5169-11 ",.02)
;;00003-5169-11
;;9002226.02101,"1201,00003-5173-11 ",.01)
;;00003-5173-11
;;9002226.02101,"1201,00003-5173-11 ",.02)
;;00003-5173-11
;;9002226.02101,"1201,00003-5174-11 ",.01)
;;00003-5174-11
;;9002226.02101,"1201,00003-5174-11 ",.02)
;;00003-5174-11
;;9002226.02101,"1201,00003-5178-05 ",.01)
;;00003-5178-05
;;9002226.02101,"1201,00003-5178-05 ",.02)
;;00003-5178-05
;;9002226.02101,"1201,00003-5178-06 ",.01)
;;00003-5178-06
;;9002226.02101,"1201,00003-5178-06 ",.02)
;;00003-5178-06
;;9002226.02101,"1201,00003-5178-75 ",.01)
;;00003-5178-75
;;9002226.02101,"1201,00003-5178-75 ",.02)
;;00003-5178-75
;;9002226.02101,"1201,00003-5183-11 ",.01)
;;00003-5183-11
;;9002226.02101,"1201,00003-5183-11 ",.02)
;;00003-5183-11
;;9002226.02101,"1201,00003-5184-11 ",.01)
;;00003-5184-11
;;9002226.02101,"1201,00003-5184-11 ",.02)
;;00003-5184-11
;;9002226.02101,"1201,00003-5194-10 ",.01)
;;00003-5194-10
;;9002226.02101,"1201,00003-5194-10 ",.02)
;;00003-5194-10
;;9002226.02101,"1201,00003-5194-33 ",.01)
;;00003-5194-33
;;9002226.02101,"1201,00003-5194-33 ",.02)
;;00003-5194-33
;;9002226.02101,"1201,00003-5195-10 ",.01)
;;00003-5195-10
;;9002226.02101,"1201,00003-5195-10 ",.02)
;;00003-5195-10
;;9002226.02101,"1201,00003-5195-33 ",.01)
;;00003-5195-33
;;9002226.02101,"1201,00003-5195-33 ",.02)
;;00003-5195-33
;;9002226.02101,"1201,00006-0533-31 ",.01)
;;00006-0533-31
;;9002226.02101,"1201,00006-0533-31 ",.02)
;;00006-0533-31
;;9002226.02101,"1201,00006-0533-54 ",.01)
;;00006-0533-54
;;9002226.02101,"1201,00006-0533-54 ",.02)
;;00006-0533-54
;;9002226.02101,"1201,00006-0535-31 ",.01)
;;00006-0535-31
;;9002226.02101,"1201,00006-0535-31 ",.02)
;;00006-0535-31
;;9002226.02101,"1201,00006-0535-54 ",.01)
;;00006-0535-54
;;9002226.02101,"1201,00006-0535-54 ",.02)
;;00006-0535-54
;;9002226.02101,"1201,00006-0537-31 ",.01)
;;00006-0537-31
;;9002226.02101,"1201,00006-0537-31 ",.02)
;;00006-0537-31
;;9002226.02101,"1201,00006-0537-54 ",.01)
;;00006-0537-54
;;9002226.02101,"1201,00006-0537-54 ",.02)
;;00006-0537-54
;;9002226.02101,"1201,00006-0543-28 ",.01)
;;00006-0543-28
;;9002226.02101,"1201,00006-0543-28 ",.02)
;;00006-0543-28
;;9002226.02101,"1201,00006-0543-31 ",.01)
;;00006-0543-31
;;9002226.02101,"1201,00006-0543-31 ",.02)
;;00006-0543-31
;;9002226.02101,"1201,00006-0543-54 ",.01)
;;00006-0543-54
;;9002226.02101,"1201,00006-0543-54 ",.02)
;;00006-0543-54
;;9002226.02101,"1201,00006-0543-61 ",.01)
;;00006-0543-61
;;9002226.02101,"1201,00006-0543-61 ",.02)
;;00006-0543-61
;;9002226.02101,"1201,00006-0543-82 ",.01)
;;00006-0543-82
;;9002226.02101,"1201,00006-0543-82 ",.02)
;;00006-0543-82
;;9002226.02101,"1201,00006-0726-28 ",.01)
;;00006-0726-28
;;9002226.02101,"1201,00006-0726-28 ",.02)
;;00006-0726-28
;;9002226.02101,"1201,00006-0726-31 ",.01)
;;00006-0726-31
;;9002226.02101,"1201,00006-0726-31 ",.02)
;;00006-0726-31
;;9002226.02101,"1201,00006-0726-54 ",.01)
;;00006-0726-54
;;9002226.02101,"1201,00006-0726-54 ",.02)
;;00006-0726-54
;;9002226.02101,"1201,00006-0726-61 ",.01)
;;00006-0726-61
;;9002226.02101,"1201,00006-0726-61 ",.02)
;;00006-0726-61
;;9002226.02101,"1201,00006-0726-82 ",.01)
;;00006-0726-82
;;9002226.02101,"1201,00006-0726-82 ",.02)
;;00006-0726-82
;;9002226.02101,"1201,00006-0730-61 ",.01)
;;00006-0730-61
;;9002226.02101,"1201,00006-0730-61 ",.02)
;;00006-0730-61
;;9002226.02101,"1201,00006-0731-28 ",.01)
;;00006-0731-28
;;9002226.02101,"1201,00006-0731-28 ",.02)
;;00006-0731-28
;;9002226.02101,"1201,00006-0731-61 ",.01)
;;00006-0731-61
;;9002226.02101,"1201,00006-0731-61 ",.02)
;;00006-0731-61
;;9002226.02101,"1201,00006-0731-82 ",.01)
;;00006-0731-82
;;9002226.02101,"1201,00006-0731-82 ",.02)
;;00006-0731-82
;;9002226.02101,"1201,00006-0731-87 ",.01)
;;00006-0731-87
;;9002226.02101,"1201,00006-0731-87 ",.02)
;;00006-0731-87
;;9002226.02101,"1201,00006-0731-94 ",.01)
;;00006-0731-94
;;9002226.02101,"1201,00006-0731-94 ",.02)
;;00006-0731-94
;;9002226.02101,"1201,00006-0732-61 ",.01)
;;00006-0732-61
;;9002226.02101,"1201,00006-0732-61 ",.02)
;;00006-0732-61
;;9002226.02101,"1201,00006-0732-82 ",.01)
;;00006-0732-82
;;9002226.02101,"1201,00006-0732-82 ",.02)
;;00006-0732-82
;;9002226.02101,"1201,00006-0732-87 ",.01)
;;00006-0732-87
;;9002226.02101,"1201,00006-0732-87 ",.02)
;;00006-0732-87
BGP48F6 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 17, 2014;
+1 ;;14.1;IHS CLINICAL REPORTING;;MAY 29, 2014;Build 114
+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,"67544-0857-15 ")
+2 ;;1868
+3 ;;21,"67544-0857-45 ")
+4 ;;1869
+5 ;;21,"67544-0857-60 ")
+6 ;;1870
+7 ;;21,"67544-1001-30 ")
+8 ;;1249
+9 ;;21,"67544-1001-60 ")
+10 ;;1250
+11 ;;21,"67544-1003-15 ")
+12 ;;1965
+13 ;;21,"67544-1003-45 ")
+14 ;;1966
+15 ;;21,"67544-1003-53 ")
+16 ;;1967
+17 ;;21,"67544-1029-99 ")
+18 ;;420
+19 ;;21,"67544-1030-99 ")
+20 ;;414
+21 ;;21,"67544-1032-15 ")
+22 ;;865
+23 ;;21,"67544-1032-45 ")
+24 ;;866
+25 ;;21,"67544-1032-82 ")
+26 ;;867
+27 ;;21,"67544-1032-99 ")
+28 ;;868
+29 ;;21,"67544-1078-30 ")
+30 ;;1791
+31 ;;21,"67544-1254-15 ")
+32 ;;1654
+33 ;;21,"67544-1254-45 ")
+34 ;;1655
+35 ;;21,"67544-1255-15 ")
+36 ;;1859
+37 ;;21,"67544-1255-30 ")
+38 ;;1860
+39 ;;21,"67544-1255-45 ")
+40 ;;1861
+41 ;;21,"67544-1255-60 ")
+42 ;;1862
+43 ;;21,"67544-1256-15 ")
+44 ;;1467
+45 ;;21,"67544-1256-30 ")
+46 ;;1468
+47 ;;21,"67544-1256-45 ")
+48 ;;1469
+49 ;;21,"67544-1257-45 ")
+50 ;;1308
+51 ;;21,"67544-1257-60 ")
+52 ;;1309
+53 ;;21,"68071-0154-30 ")
+54 ;;178
+55 ;;21,"68071-0263-30 ")
+56 ;;862
+57 ;;21,"68071-0310-30 ")
+58 ;;285
+59 ;;21,"68071-0399-30 ")
+60 ;;67
+61 ;;21,"68071-0433-30 ")
+62 ;;831
+63 ;;21,"68071-0699-30 ")
+64 ;;1472
+65 ;;21,"68071-0716-30 ")
+66 ;;1317
+67 ;;21,"68071-0784-30 ")
+68 ;;789
+69 ;;21,"68071-0914-30 ")
+70 ;;54
+71 ;;21,"68071-0915-30 ")
+72 ;;151
+73 ;;21,"68071-0916-30 ")
+74 ;;249
+75 ;;21,"68084-0097-01 ")
+76 ;;63
+77 ;;21,"68084-0097-11 ")
+78 ;;64
+79 ;;21,"68084-0098-01 ")
+80 ;;162
+81 ;;21,"68084-0098-11 ")
+82 ;;163
+83 ;;21,"68084-0099-01 ")
+84 ;;260
+85 ;;21,"68084-0099-11 ")
+86 ;;261
+87 ;;21,"68084-0133-01 ")
+88 ;;669
+89 ;;21,"68084-0133-11 ")
+90 ;;670
+91 ;;21,"68084-0161-01 ")
+92 ;;1230
+93 ;;21,"68084-0161-11 ")
+94 ;;1231
+95 ;;21,"68084-0163-01 ")
+96 ;;1475
+97 ;;21,"68084-0163-11 ")
+98 ;;1476
+99 ;;21,"68084-0165-01 ")
+100 ;;1863
+101 ;;21,"68084-0165-11 ")
+102 ;;1864
+103 ;;21,"68084-0186-01 ")
+104 ;;942
+105 ;;21,"68084-0186-11 ")
+106 ;;943
+107 ;;21,"68084-0187-01 ")
+108 ;;1048
+109 ;;21,"68084-0187-11 ")
+110 ;;1049
+111 ;;21,"68084-0188-01 ")
+112 ;;1160
+113 ;;21,"68084-0188-11 ")
+114 ;;1161
+115 ;;21,"68084-0500-01 ")
+116 ;;937
+117 ;;21,"68084-0500-11 ")
+118 ;;938
+119 ;;21,"68084-0501-01 ")
+120 ;;1039
+121 ;;21,"68084-0501-11 ")
+122 ;;1040
+123 ;;21,"68084-0502-01 ")
+124 ;;1153
+125 ;;21,"68084-0502-11 ")
+126 ;;1154
+127 ;;21,"68084-0510-01 ")
+128 ;;1225
+129 ;;21,"68084-0510-11 ")
+130 ;;1226
+131 ;;21,"68084-0511-01 ")
+132 ;;1325
+133 ;;21,"68084-0511-11 ")
+134 ;;1326
+135 ;;21,"68084-0512-01 ")
+136 ;;1501
+137 ;;21,"68084-0512-11 ")
+138 ;;1502
+139 ;;21,"68084-0513-01 ")
+140 ;;1689
+141 ;;21,"68084-0513-11 ")
+142 ;;1690
+143 ;;21,"68084-0514-01 ")
+144 ;;1876
+145 ;;21,"68084-0514-11 ")
+146 ;;1877
+147 ;;21,"68084-0558-01 ")
+148 ;;433
+149 ;;21,"68084-0558-11 ")
+150 ;;425
+151 ;;21,"68084-0559-01 ")
+152 ;;625
+153 ;;21,"68084-0559-11 ")
+154 ;;626
+155 ;;21,"68084-0560-01 ")
+156 ;;648
+157 ;;21,"68084-0560-11 ")
+158 ;;643
+159 ;;21,"68084-0564-01 ")
+160 ;;60
+161 ;;21,"68084-0564-11 ")
+162 ;;43
+163 ;;21,"68084-0565-01 ")
+164 ;;142
+165 ;;21,"68084-0565-11 ")
+166 ;;143
+167 ;;21,"68084-0589-01 ")
+168 ;;234
+169 ;;21,"68084-0589-11 ")
+170 ;;235
+171 ;;21,"68084-0590-25 ")
+172 ;;306
+173 ;;21,"68084-0590-95 ")
+174 ;;305
+175 ;;21,"68115-0218-30 ")
+176 ;;453
+177 ;;21,"68115-0219-30 ")
+178 ;;592
+179 ;;21,"68115-0219-60 ")
+180 ;;593
+181 ;;21,"68115-0494-30 ")
+182 ;;201
+183 ;;21,"68115-0494-60 ")
+184 ;;202
+185 ;;21,"68115-0658-00 ")
+186 ;;667
+187 ;;21,"68115-0658-60 ")
+188 ;;668
+189 ;;21,"68115-0664-90 ")
+190 ;;1061
+191 ;;21,"68115-0668-15 ")
+192 ;;262
+193 ;;21,"68115-0668-30 ")
+194 ;;263
+195 ;;21,"68115-0668-90 ")
+196 ;;264
+197 ;;21,"68115-0672-30 ")
+198 ;;1651
+199 ;;21,"68115-0720-30 ")
+200 ;;1454
+201 ;;21,"68115-0759-30 ")
+202 ;;2002
+203 ;;21,"68115-0777-30 ")
+204 ;;1848
+205 ;;21,"68115-0777-90 ")
+206 ;;1849
+207 ;;21,"68115-0800-90 ")
+208 ;;164
+209 ;;21,"68115-0836-30 ")
+210 ;;77
+211 ;;21,"68115-0836-90 ")
+212 ;;78
+213 ;;21,"68180-0467-01 ")
+214 ;;434
+215 ;;21,"68180-0467-03 ")
+216 ;;435
+217 ;;21,"68180-0467-07 ")
+218 ;;436
+219 ;;21,"68180-0468-01 ")
+220 ;;609
+221 ;;21,"68180-0468-03 ")
+222 ;;610
+223 ;;21,"68180-0468-05 ")
+224 ;;611
+225 ;;21,"68180-0468-07 ")
+226 ;;612
+227 ;;21,"68180-0469-01 ")
+228 ;;644
+229 ;;21,"68180-0469-03 ")
+230 ;;645
+231 ;;21,"68180-0469-05 ")
+232 ;;646
+233 ;;21,"68180-0469-07 ")
+234 ;;647
+235 ;;21,"68180-0478-01 ")
+236 ;;1330
+237 ;;21,"68180-0478-02 ")
+238 ;;1331
+239 ;;21,"68180-0478-03 ")
+240 ;;1332
+241 ;;21,"68180-0479-01 ")
+242 ;;1491
+243 ;;21,"68180-0479-02 ")
+244 ;;1492
+245 ;;21,"68180-0479-03 ")
+246 ;;1493
+247 ;;21,"68180-0480-01 ")
+248 ;;1694
+249 ;;21,"68180-0480-02 ")
+250 ;;1695
+251 ;;21,"68180-0480-03 ")
+252 ;;1696
+253 ;;21,"68180-0481-01 ")
+254 ;;1879
+255 ;;21,"68180-0481-02 ")
+256 ;;1880
+257 ;;21,"68180-0481-03 ")
+258 ;;1881
+259 ;;21,"68180-0482-06 ")
+260 ;;1223
+261 ;;21,"68180-0482-09 ")
+262 ;;1224
+263 ;;21,"68180-0485-02 ")
+264 ;;940
+265 ;;21,"68180-0485-09 ")
+266 ;;941
+267 ;;21,"68180-0486-02 ")
+268 ;;1045
+269 ;;21,"68180-0486-09 ")
+270 ;;1046
+271 ;;21,"68180-0487-02 ")
+272 ;;1155
+273 ;;21,"68180-0487-09 ")
+274 ;;1156
+275 ;;21,"68180-0488-02 ")
+276 ;;1221
+277 ;;21,"68180-0488-09 ")
+278 ;;1222
+279 ;;21,"68258-1040-01 ")
+280 ;;168
+281 ;;21,"68258-1057-01 ")
+282 ;;595
+283 ;;21,"68258-6000-03 ")
+284 ;;87
+285 ;;21,"68258-6000-09 ")
+286 ;;88
+287 ;;21,"68258-6001-03 ")
+288 ;;176
+289 ;;21,"68258-6001-09 ")
+290 ;;177
+291 ;;21,"68258-6002-03 ")
+292 ;;283
+293 ;;21,"68258-6002-09 ")
+294 ;;284
+295 ;;21,"68258-6009-03 ")
+296 ;;1419
+297 ;;21,"68258-6009-09 ")
+298 ;;1420
+299 ;;21,"68258-6013-03 ")
+300 ;;1206
+301 ;;21,"68258-6013-09 ")
+302 ;;1207
+303 ;;21,"68258-6016-03 ")
+304 ;;800
+305 ;;21,"68258-6017-03 ")
+306 ;;799
+307 ;;21,"68258-6041-03 ")
+308 ;;55
+309 ;;21,"68258-6042-03 ")
+310 ;;153
+311 ;;21,"68258-6043-03 ")
+312 ;;246
+313 ;;21,"68258-6043-09 ")
+314 ;;247
+315 ;;21,"68258-6044-03 ")
+316 ;;345
+317 ;;21,"68258-6044-09 ")
+318 ;;346
+319 ;;21,"68258-6049-03 ")
+320 ;;948
+321 ;;21,"68258-6050-03 ")
+322 ;;1232
+323 ;;21,"68258-6970-03 ")
+324 ;;2055
+325 ;;21,"68258-6983-03 ")
+326 ;;882
+327 ;;21,"68258-6984-03 ")
+328 ;;2088
+329 ;;21,"68258-6985-09 ")
+330 ;;1262
+331 ;;21,"68258-6992-09 ")
+332 ;;40
+333 ;;21,"68258-6993-09 ")
+334 ;;139
+335 ;;21,"68258-9001-01 ")
+336 ;;381
+337 ;;21,"68258-9128-01 ")
+338 ;;888
+339 ;;21,"68258-9154-01 ")
+340 ;;304
+341 ;;21,"68382-0065-05 ")
+342 ;;1236
+343 ;;21,"68382-0065-06 ")
+344 ;;1237
+345 ;;21,"68382-0065-10 ")
+346 ;;1238
+347 ;;21,"68382-0065-14 ")
+348 ;;1239
+349 ;;21,"68382-0065-16 ")
+350 ;;1240
+351 ;;21,"68382-0066-05 ")
+352 ;;1423
+353 ;;21,"68382-0066-06 ")
+354 ;;1424
+355 ;;21,"68382-0066-10 ")
+356 ;;1425
+357 ;;21,"68382-0066-14 ")
+358 ;;1426
+359 ;;21,"68382-0066-16 ")
+360 ;;1427
+361 ;;21,"68382-0066-24 ")
+362 ;;1428
+363 ;;21,"68382-0067-05 ")
+364 ;;1607
+365 ;;21,"68382-0067-06 ")
+366 ;;1608
+367 ;;21,"68382-0067-10 ")
+368 ;;1609
+369 ;;21,"68382-0067-14 ")
+370 ;;1610
+371 ;;21,"68382-0067-16 ")
+372 ;;1611
+373 ;;21,"68382-0067-24 ")
+374 ;;1612
+375 ;;21,"68382-0068-05 ")
+376 ;;1807
+377 ;;21,"68382-0068-06 ")
+378 ;;1808
+379 ;;21,"68382-0068-10 ")
+380 ;;1809
+381 ;;21,"68382-0068-14 ")
+382 ;;1810
+383 ;;21,"68382-0068-16 ")
+384 ;;1811
+385 ;;21,"68382-0068-40 ")
+386 ;;1812
+387 ;;21,"68382-0069-05 ")
+388 ;;1973
+389 ;;21,"68382-0069-06 ")
+390 ;;1974
+391 ;;21,"68382-0069-10 ")
+392 ;;1975
+393 ;;21,"68382-0069-14 ")
+394 ;;1976
+395 ;;21,"68382-0069-16 ")
+396 ;;1977
+397 ;;21,"68382-0070-05 ")
+398 ;;901
+399 ;;21,"68382-0070-16 ")
+400 ;;902
+401 ;;21,"68382-0071-05 ")
+402 ;;976
+403 ;;21,"68382-0071-16 ")
+404 ;;977
+405 ;;21,"68382-0072-05 ")
+406 ;;1082
+407 ;;21,"68382-0072-16 ")
+408 ;;1083
+409 ;;21,"68382-0073-05 ")
+410 ;;1208
+411 ;;21,"68382-0073-16 ")
+412 ;;1209
+413 ;;21,"68462-0195-05 ")
+414 ;;897
+415 ;;21,"68462-0195-90 ")
+416 ;;898
+417 ;;21,"68462-0196-05 ")
+418 ;;978
+419 ;;21,"68462-0196-90 ")
+420 ;;979
+421 ;;21,"68462-0197-05 ")
+422 ;;1084
+423 ;;21,"68462-0197-90 ")
+424 ;;1085
+425 ;;21,"68462-0198-05 ")
+426 ;;1204
+427 ;;21,"68462-0198-90 ")
+428 ;;1205
+429 ;;21,"68645-0261-54 ")
+430 ;;1494
+431 ;;21,"68645-0262-54 ")
+432 ;;1693
+433 ;;21,"68645-0263-54 ")
+434 ;;1882
+435 ;;21,"68645-0402-70 ")
+436 ;;61
+437 ;;21,"68645-0403-70 ")
+438 ;;161
+439 ;;21,"68645-0417-54 ")
+440 ;;259
+441 ;;21,"68645-0418-54 ")
+442 ;;357
+443 ;;21,"68645-0458-70 ")
+444 ;;56
+445 ;;21,"68645-0459-70 ")
+446 ;;152
+447 ;;21,"68645-0460-54 ")
+448 ;;248
+449 ;;21,"68645-0461-54 ")
+450 ;;344
+451 ;;21,"68645-0470-54 ")
+452 ;;1471
+453 ;;21,"68645-0471-54 ")
+454 ;;1670
+455 ;;21,"68645-0472-54 ")
+456 ;;1856
+457 ;;9002226,1201,.01)
+458 ;;BGP PQA STATIN NDC
+459 ;;9002226,1201,.02)
+460 ;;@
+461 ;;9002226,1201,.04)
+462 ;;n
+463 ;;9002226,1201,.06)
+464 ;;@
+465 ;;9002226,1201,.08)
+466 ;;@
+467 ;;9002226,1201,.09)
+468 ;;3140317
+469 ;;9002226,1201,.11)
+470 ;;@
+471 ;;9002226,1201,.12)
+472 ;;@
+473 ;;9002226,1201,.13)
+474 ;;1
+475 ;;9002226,1201,.14)
+476 ;;@
+477 ;;9002226,1201,.15)
+478 ;;@
+479 ;;9002226,1201,.16)
+480 ;;@
+481 ;;9002226,1201,.17)
+482 ;;@
+483 ;;9002226,1201,3101)
+484 ;;@
+485 ;;9002226.02101,"1201,00002-4770-90 ",.01)
+486 ;;00002-4770-90
+487 ;;9002226.02101,"1201,00002-4770-90 ",.02)
+488 ;;00002-4770-90
+489 ;;9002226.02101,"1201,00002-4771-90 ",.01)
+490 ;;00002-4771-90
+491 ;;9002226.02101,"1201,00002-4771-90 ",.02)
+492 ;;00002-4771-90
+493 ;;9002226.02101,"1201,00002-4772-90 ",.01)
+494 ;;00002-4772-90
+495 ;;9002226.02101,"1201,00002-4772-90 ",.02)
+496 ;;00002-4772-90
+497 ;;9002226.02101,"1201,00003-5154-05 ",.01)
+498 ;;00003-5154-05
+499 ;;9002226.02101,"1201,00003-5154-05 ",.02)
+500 ;;00003-5154-05
+501 ;;9002226.02101,"1201,00003-5168-11 ",.01)
+502 ;;00003-5168-11
+503 ;;9002226.02101,"1201,00003-5168-11 ",.02)
+504 ;;00003-5168-11
+505 ;;9002226.02101,"1201,00003-5169-11 ",.01)
+506 ;;00003-5169-11
+507 ;;9002226.02101,"1201,00003-5169-11 ",.02)
+508 ;;00003-5169-11
+509 ;;9002226.02101,"1201,00003-5173-11 ",.01)
+510 ;;00003-5173-11
+511 ;;9002226.02101,"1201,00003-5173-11 ",.02)
+512 ;;00003-5173-11
+513 ;;9002226.02101,"1201,00003-5174-11 ",.01)
+514 ;;00003-5174-11
+515 ;;9002226.02101,"1201,00003-5174-11 ",.02)
+516 ;;00003-5174-11
+517 ;;9002226.02101,"1201,00003-5178-05 ",.01)
+518 ;;00003-5178-05
+519 ;;9002226.02101,"1201,00003-5178-05 ",.02)
+520 ;;00003-5178-05
+521 ;;9002226.02101,"1201,00003-5178-06 ",.01)
+522 ;;00003-5178-06
+523 ;;9002226.02101,"1201,00003-5178-06 ",.02)
+524 ;;00003-5178-06
+525 ;;9002226.02101,"1201,00003-5178-75 ",.01)
+526 ;;00003-5178-75
+527 ;;9002226.02101,"1201,00003-5178-75 ",.02)
+528 ;;00003-5178-75
+529 ;;9002226.02101,"1201,00003-5183-11 ",.01)
+530 ;;00003-5183-11
+531 ;;9002226.02101,"1201,00003-5183-11 ",.02)
+532 ;;00003-5183-11
+533 ;;9002226.02101,"1201,00003-5184-11 ",.01)
+534 ;;00003-5184-11
+535 ;;9002226.02101,"1201,00003-5184-11 ",.02)
+536 ;;00003-5184-11
+537 ;;9002226.02101,"1201,00003-5194-10 ",.01)
+538 ;;00003-5194-10
+539 ;;9002226.02101,"1201,00003-5194-10 ",.02)
+540 ;;00003-5194-10
+541 ;;9002226.02101,"1201,00003-5194-33 ",.01)
+542 ;;00003-5194-33
+543 ;;9002226.02101,"1201,00003-5194-33 ",.02)
+544 ;;00003-5194-33
+545 ;;9002226.02101,"1201,00003-5195-10 ",.01)
+546 ;;00003-5195-10
+547 ;;9002226.02101,"1201,00003-5195-10 ",.02)
+548 ;;00003-5195-10
+549 ;;9002226.02101,"1201,00003-5195-33 ",.01)
+550 ;;00003-5195-33
+551 ;;9002226.02101,"1201,00003-5195-33 ",.02)
+552 ;;00003-5195-33
+553 ;;9002226.02101,"1201,00006-0533-31 ",.01)
+554 ;;00006-0533-31
+555 ;;9002226.02101,"1201,00006-0533-31 ",.02)
+556 ;;00006-0533-31
+557 ;;9002226.02101,"1201,00006-0533-54 ",.01)
+558 ;;00006-0533-54
+559 ;;9002226.02101,"1201,00006-0533-54 ",.02)
+560 ;;00006-0533-54
+561 ;;9002226.02101,"1201,00006-0535-31 ",.01)
+562 ;;00006-0535-31
+563 ;;9002226.02101,"1201,00006-0535-31 ",.02)
+564 ;;00006-0535-31
+565 ;;9002226.02101,"1201,00006-0535-54 ",.01)
+566 ;;00006-0535-54
+567 ;;9002226.02101,"1201,00006-0535-54 ",.02)
+568 ;;00006-0535-54
+569 ;;9002226.02101,"1201,00006-0537-31 ",.01)
+570 ;;00006-0537-31
+571 ;;9002226.02101,"1201,00006-0537-31 ",.02)
+572 ;;00006-0537-31
+573 ;;9002226.02101,"1201,00006-0537-54 ",.01)
+574 ;;00006-0537-54
+575 ;;9002226.02101,"1201,00006-0537-54 ",.02)
+576 ;;00006-0537-54
+577 ;;9002226.02101,"1201,00006-0543-28 ",.01)
+578 ;;00006-0543-28
+579 ;;9002226.02101,"1201,00006-0543-28 ",.02)
+580 ;;00006-0543-28
+581 ;;9002226.02101,"1201,00006-0543-31 ",.01)
+582 ;;00006-0543-31
+583 ;;9002226.02101,"1201,00006-0543-31 ",.02)
+584 ;;00006-0543-31
+585 ;;9002226.02101,"1201,00006-0543-54 ",.01)
+586 ;;00006-0543-54
+587 ;;9002226.02101,"1201,00006-0543-54 ",.02)
+588 ;;00006-0543-54
+589 ;;9002226.02101,"1201,00006-0543-61 ",.01)
+590 ;;00006-0543-61
+591 ;;9002226.02101,"1201,00006-0543-61 ",.02)
+592 ;;00006-0543-61
+593 ;;9002226.02101,"1201,00006-0543-82 ",.01)
+594 ;;00006-0543-82
+595 ;;9002226.02101,"1201,00006-0543-82 ",.02)
+596 ;;00006-0543-82
+597 ;;9002226.02101,"1201,00006-0726-28 ",.01)
+598 ;;00006-0726-28
+599 ;;9002226.02101,"1201,00006-0726-28 ",.02)
+600 ;;00006-0726-28
+601 ;;9002226.02101,"1201,00006-0726-31 ",.01)
+602 ;;00006-0726-31
+603 ;;9002226.02101,"1201,00006-0726-31 ",.02)
+604 ;;00006-0726-31
+605 ;;9002226.02101,"1201,00006-0726-54 ",.01)
+606 ;;00006-0726-54
+607 ;;9002226.02101,"1201,00006-0726-54 ",.02)
+608 ;;00006-0726-54
+609 ;;9002226.02101,"1201,00006-0726-61 ",.01)
+610 ;;00006-0726-61
+611 ;;9002226.02101,"1201,00006-0726-61 ",.02)
+612 ;;00006-0726-61
+613 ;;9002226.02101,"1201,00006-0726-82 ",.01)
+614 ;;00006-0726-82
+615 ;;9002226.02101,"1201,00006-0726-82 ",.02)
+616 ;;00006-0726-82
+617 ;;9002226.02101,"1201,00006-0730-61 ",.01)
+618 ;;00006-0730-61
+619 ;;9002226.02101,"1201,00006-0730-61 ",.02)
+620 ;;00006-0730-61
+621 ;;9002226.02101,"1201,00006-0731-28 ",.01)
+622 ;;00006-0731-28
+623 ;;9002226.02101,"1201,00006-0731-28 ",.02)
+624 ;;00006-0731-28
+625 ;;9002226.02101,"1201,00006-0731-61 ",.01)
+626 ;;00006-0731-61
+627 ;;9002226.02101,"1201,00006-0731-61 ",.02)
+628 ;;00006-0731-61
+629 ;;9002226.02101,"1201,00006-0731-82 ",.01)
+630 ;;00006-0731-82
+631 ;;9002226.02101,"1201,00006-0731-82 ",.02)
+632 ;;00006-0731-82
+633 ;;9002226.02101,"1201,00006-0731-87 ",.01)
+634 ;;00006-0731-87
+635 ;;9002226.02101,"1201,00006-0731-87 ",.02)
+636 ;;00006-0731-87
+637 ;;9002226.02101,"1201,00006-0731-94 ",.01)
+638 ;;00006-0731-94
+639 ;;9002226.02101,"1201,00006-0731-94 ",.02)
+640 ;;00006-0731-94
+641 ;;9002226.02101,"1201,00006-0732-61 ",.01)
+642 ;;00006-0732-61
+643 ;;9002226.02101,"1201,00006-0732-61 ",.02)
+644 ;;00006-0732-61
+645 ;;9002226.02101,"1201,00006-0732-82 ",.01)
+646 ;;00006-0732-82
+647 ;;9002226.02101,"1201,00006-0732-82 ",.02)
+648 ;;00006-0732-82
+649 ;;9002226.02101,"1201,00006-0732-87 ",.01)
+650 ;;00006-0732-87
+651 ;;9002226.02101,"1201,00006-0732-87 ",.02)
+652 ;;00006-0732-87
