BGP61M6 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 18, 2015 ;
;;16.1;IHS CLINICAL REPORTING;;MAR 22, 2016;Build 170
;
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,"68180-0480-03 ")
;;1820
;;21,"68180-0481-01 ")
;;1821
;;21,"68180-0481-02 ")
;;1822
;;21,"68180-0481-03 ")
;;1823
;;21,"68180-0482-06 ")
;;1824
;;21,"68180-0482-09 ")
;;1825
;;21,"68180-0485-02 ")
;;1826
;;21,"68180-0485-09 ")
;;1827
;;21,"68180-0486-02 ")
;;1828
;;21,"68180-0486-09 ")
;;1829
;;21,"68180-0487-02 ")
;;1830
;;21,"68180-0487-09 ")
;;1831
;;21,"68180-0488-02 ")
;;1832
;;21,"68180-0488-09 ")
;;1833
;;21,"68258-6000-03 ")
;;1834
;;21,"68258-6000-09 ")
;;1835
;;21,"68258-6001-03 ")
;;1836
;;21,"68258-6001-09 ")
;;1837
;;21,"68258-6002-03 ")
;;1838
;;21,"68258-6002-09 ")
;;1839
;;21,"68258-6009-03 ")
;;1840
;;21,"68258-6009-09 ")
;;1841
;;21,"68258-6013-03 ")
;;1842
;;21,"68258-6013-09 ")
;;1843
;;21,"68258-6016-03 ")
;;1844
;;21,"68258-6017-03 ")
;;1845
;;21,"68258-6041-03 ")
;;1846
;;21,"68258-6042-03 ")
;;1847
;;21,"68258-6043-03 ")
;;1848
;;21,"68258-6043-09 ")
;;1849
;;21,"68258-6044-03 ")
;;1850
;;21,"68258-6044-09 ")
;;1851
;;21,"68258-6049-03 ")
;;1852
;;21,"68258-6050-03 ")
;;1853
;;21,"68258-6970-03 ")
;;1854
;;21,"68258-6983-03 ")
;;1855
;;21,"68258-6984-03 ")
;;1856
;;21,"68258-6985-09 ")
;;1857
;;21,"68258-6992-09 ")
;;1858
;;21,"68258-6993-09 ")
;;1859
;;21,"68382-0065-05 ")
;;1860
;;21,"68382-0065-06 ")
;;1861
;;21,"68382-0065-10 ")
;;1862
;;21,"68382-0065-14 ")
;;1863
;;21,"68382-0065-16 ")
;;1864
;;21,"68382-0066-05 ")
;;1865
;;21,"68382-0066-06 ")
;;1866
;;21,"68382-0066-10 ")
;;1867
;;21,"68382-0066-14 ")
;;1868
;;21,"68382-0066-16 ")
;;1869
;;21,"68382-0066-24 ")
;;1870
;;21,"68382-0067-05 ")
;;1871
;;21,"68382-0067-06 ")
;;1872
;;21,"68382-0067-10 ")
;;1873
;;21,"68382-0067-14 ")
;;1874
;;21,"68382-0067-16 ")
;;1875
;;21,"68382-0067-24 ")
;;1876
;;21,"68382-0068-05 ")
;;1877
;;21,"68382-0068-06 ")
;;1878
;;21,"68382-0068-10 ")
;;1879
;;21,"68382-0068-14 ")
;;1880
;;21,"68382-0068-16 ")
;;1881
;;21,"68382-0068-40 ")
;;1882
;;21,"68382-0069-05 ")
;;1883
;;21,"68382-0069-06 ")
;;1884
;;21,"68382-0069-10 ")
;;1885
;;21,"68382-0069-14 ")
;;1886
;;21,"68382-0069-16 ")
;;1887
;;21,"68382-0070-05 ")
;;1888
;;21,"68382-0070-16 ")
;;1889
;;21,"68382-0071-05 ")
;;1890
;;21,"68382-0071-16 ")
;;1891
;;21,"68382-0072-05 ")
;;1892
;;21,"68382-0072-16 ")
;;1893
;;21,"68382-0073-05 ")
;;1894
;;21,"68382-0073-16 ")
;;1895
;;21,"68462-0195-05 ")
;;1896
;;21,"68462-0195-90 ")
;;1897
;;21,"68462-0196-05 ")
;;1898
;;21,"68462-0196-90 ")
;;1899
;;21,"68462-0197-05 ")
;;1900
;;21,"68462-0197-90 ")
;;1901
;;21,"68462-0198-05 ")
;;1902
;;21,"68462-0198-90 ")
;;1903
;;21,"68645-0261-54 ")
;;1904
;;21,"68645-0262-54 ")
;;1905
;;21,"68645-0263-54 ")
;;1906
;;21,"68645-0402-70 ")
;;1907
;;21,"68645-0403-70 ")
;;1908
;;21,"68645-0417-54 ")
;;1909
;;21,"68645-0418-54 ")
;;1910
;;21,"68645-0458-70 ")
;;1911
;;21,"68645-0459-70 ")
;;1912
;;21,"68645-0460-54 ")
;;1913
;;21,"68645-0461-54 ")
;;1914
;;21,"68645-0470-54 ")
;;1915
;;21,"68645-0471-54 ")
;;1916
;;21,"68645-0472-54 ")
;;1917
;;21,"68645-0480-70 ")
;;1918
;;21,"68645-0481-70 ")
;;1919
;;21,"68645-0482-54 ")
;;1920
;;21,"68645-0483-54 ")
;;1921
;;21,"68645-0495-54 ")
;;1922
;;21,"68788-0074-03 ")
;;1923
;;21,"68788-9182-03 ")
;;1924
;;21,"68788-9556-03 ")
;;1925
;;21,"68788-9668-03 ")
;;1926
;;21,"68788-9683-03 ")
;;1927
;;21,"68788-9835-03 ")
;;1928
;;21,"68788-9836-03 ")
;;1929
;;21,"68788-9868-03 ")
;;1930
;;21,"68788-9869-03 ")
;;1931
;;9002226,1224,.01)
;;BGP PQA STATIN NDC
;;9002226,1224,.02)
;;@
;;9002226,1224,.04)
;;n
;;9002226,1224,.06)
;;@
;;9002226,1224,.08)
;;@
;;9002226,1224,.09)
;;3150818
;;9002226,1224,.11)
;;@
;;9002226,1224,.12)
;;@
;;9002226,1224,.13)
;;1
;;9002226,1224,.14)
;;@
;;9002226,1224,.15)
;;50.67
;;9002226,1224,.16)
;;@
;;9002226,1224,.17)
;;@
;;9002226,1224,3101)
;;@
;;9002226.02101,"1224,00002-4770-90 ",.01)
;;00002-4770-90
;;9002226.02101,"1224,00002-4770-90 ",.02)
;;00002-4770-90
;;9002226.02101,"1224,00002-4771-90 ",.01)
;;00002-4771-90
;;9002226.02101,"1224,00002-4771-90 ",.02)
;;00002-4771-90
;;9002226.02101,"1224,00002-4772-90 ",.01)
;;00002-4772-90
;;9002226.02101,"1224,00002-4772-90 ",.02)
;;00002-4772-90
;;9002226.02101,"1224,00003-5178-05 ",.01)
;;00003-5178-05
;;9002226.02101,"1224,00003-5178-05 ",.02)
;;00003-5178-05
;;9002226.02101,"1224,00003-5194-10 ",.01)
;;00003-5194-10
;;9002226.02101,"1224,00003-5194-10 ",.02)
;;00003-5194-10
;;9002226.02101,"1224,00003-5195-10 ",.01)
;;00003-5195-10
;;9002226.02101,"1224,00003-5195-10 ",.02)
;;00003-5195-10
;;9002226.02101,"1224,00006-0533-31 ",.01)
;;00006-0533-31
;;9002226.02101,"1224,00006-0533-31 ",.02)
;;00006-0533-31
;;9002226.02101,"1224,00006-0533-54 ",.01)
;;00006-0533-54
;;9002226.02101,"1224,00006-0533-54 ",.02)
;;00006-0533-54
;;9002226.02101,"1224,00006-0535-31 ",.01)
;;00006-0535-31
;;9002226.02101,"1224,00006-0535-31 ",.02)
;;00006-0535-31
;;9002226.02101,"1224,00006-0535-54 ",.01)
;;00006-0535-54
;;9002226.02101,"1224,00006-0535-54 ",.02)
;;00006-0535-54
;;9002226.02101,"1224,00006-0537-31 ",.01)
;;00006-0537-31
;;9002226.02101,"1224,00006-0537-31 ",.02)
;;00006-0537-31
;;9002226.02101,"1224,00006-0537-54 ",.01)
;;00006-0537-54
;;9002226.02101,"1224,00006-0537-54 ",.02)
;;00006-0537-54
;;9002226.02101,"1224,00006-0543-31 ",.01)
;;00006-0543-31
;;9002226.02101,"1224,00006-0543-31 ",.02)
;;00006-0543-31
;;9002226.02101,"1224,00006-0543-54 ",.01)
;;00006-0543-54
;;9002226.02101,"1224,00006-0543-54 ",.02)
;;00006-0543-54
;;9002226.02101,"1224,00006-0726-31 ",.01)
;;00006-0726-31
;;9002226.02101,"1224,00006-0726-31 ",.02)
;;00006-0726-31
;;9002226.02101,"1224,00006-0731-61 ",.01)
;;00006-0731-61
;;9002226.02101,"1224,00006-0731-61 ",.02)
;;00006-0731-61
;;9002226.02101,"1224,00006-0732-61 ",.01)
;;00006-0732-61
;;9002226.02101,"1224,00006-0732-61 ",.02)
;;00006-0732-61
;;9002226.02101,"1224,00006-0735-31 ",.01)
;;00006-0735-31
;;9002226.02101,"1224,00006-0735-31 ",.02)
;;00006-0735-31
;;9002226.02101,"1224,00006-0735-54 ",.01)
;;00006-0735-54
;;9002226.02101,"1224,00006-0735-54 ",.02)
;;00006-0735-54
;;9002226.02101,"1224,00006-0740-31 ",.01)
;;00006-0740-31
;;9002226.02101,"1224,00006-0740-31 ",.02)
;;00006-0740-31
;;9002226.02101,"1224,00006-0740-54 ",.01)
;;00006-0740-54
;;9002226.02101,"1224,00006-0740-54 ",.02)
;;00006-0740-54
;;9002226.02101,"1224,00006-0749-31 ",.01)
;;00006-0749-31
;;9002226.02101,"1224,00006-0749-31 ",.02)
;;00006-0749-31
;;9002226.02101,"1224,00006-0749-54 ",.01)
;;00006-0749-54
;;9002226.02101,"1224,00006-0749-54 ",.02)
;;00006-0749-54
;;9002226.02101,"1224,00006-0753-31 ",.01)
;;00006-0753-31
;;9002226.02101,"1224,00006-0753-31 ",.02)
;;00006-0753-31
;;9002226.02101,"1224,00006-0753-54 ",.01)
;;00006-0753-54
;;9002226.02101,"1224,00006-0753-54 ",.02)
;;00006-0753-54
;;9002226.02101,"1224,00006-0753-82 ",.01)
;;00006-0753-82
;;9002226.02101,"1224,00006-0753-82 ",.02)
;;00006-0753-82
;;9002226.02101,"1224,00006-0757-31 ",.01)
;;00006-0757-31
;;9002226.02101,"1224,00006-0757-31 ",.02)
;;00006-0757-31
;;9002226.02101,"1224,00006-0757-54 ",.01)
;;00006-0757-54
;;9002226.02101,"1224,00006-0757-54 ",.02)
;;00006-0757-54
;;9002226.02101,"1224,00006-0757-82 ",.01)
;;00006-0757-82
;;9002226.02101,"1224,00006-0757-82 ",.02)
;;00006-0757-82
;;9002226.02101,"1224,00006-0773-31 ",.01)
;;00006-0773-31
;;9002226.02101,"1224,00006-0773-31 ",.02)
;;00006-0773-31
;;9002226.02101,"1224,00006-0773-54 ",.01)
;;00006-0773-54
;;9002226.02101,"1224,00006-0773-54 ",.02)
;;00006-0773-54
;;9002226.02101,"1224,00006-0773-82 ",.01)
;;00006-0773-82
;;9002226.02101,"1224,00006-0773-82 ",.02)
;;00006-0773-82
;;9002226.02101,"1224,00069-2150-30 ",.01)
;;00069-2150-30
;;9002226.02101,"1224,00069-2150-30 ",.02)
;;00069-2150-30
;;9002226.02101,"1224,00069-2160-30 ",.01)
;;00069-2160-30
;;9002226.02101,"1224,00069-2160-30 ",.02)
;;00069-2160-30
;;9002226.02101,"1224,00069-2170-30 ",.01)
;;00069-2170-30
;;9002226.02101,"1224,00069-2170-30 ",.02)
;;00069-2170-30
;;9002226.02101,"1224,00069-2180-30 ",.01)
;;00069-2180-30
;;9002226.02101,"1224,00069-2180-30 ",.02)
;;00069-2180-30
;;9002226.02101,"1224,00069-2190-30 ",.01)
;;00069-2190-30
;;9002226.02101,"1224,00069-2190-30 ",.02)
;;00069-2190-30
;;9002226.02101,"1224,00069-2250-30 ",.01)
;;00069-2250-30
;;9002226.02101,"1224,00069-2250-30 ",.02)
;;00069-2250-30
;;9002226.02101,"1224,00069-2260-30 ",.01)
;;00069-2260-30
;;9002226.02101,"1224,00069-2260-30 ",.02)
;;00069-2260-30
;;9002226.02101,"1224,00069-2270-30 ",.01)
;;00069-2270-30
;;9002226.02101,"1224,00069-2270-30 ",.02)
;;00069-2270-30
;;9002226.02101,"1224,00069-2960-30 ",.01)
;;00069-2960-30
;;9002226.02101,"1224,00069-2960-30 ",.02)
;;00069-2960-30
;;9002226.02101,"1224,00069-2970-30 ",.01)
;;00069-2970-30
;;9002226.02101,"1224,00069-2970-30 ",.02)
;;00069-2970-30
;;9002226.02101,"1224,00069-2980-30 ",.01)
;;00069-2980-30
;;9002226.02101,"1224,00069-2980-30 ",.02)
;;00069-2980-30
;;9002226.02101,"1224,00071-0155-23 ",.01)
;;00071-0155-23
;;9002226.02101,"1224,00071-0155-23 ",.02)
;;00071-0155-23
;;9002226.02101,"1224,00071-0155-34 ",.01)
;;00071-0155-34
;;9002226.02101,"1224,00071-0155-34 ",.02)
;;00071-0155-34
;;9002226.02101,"1224,00071-0155-40 ",.01)
;;00071-0155-40
;;9002226.02101,"1224,00071-0155-40 ",.02)
;;00071-0155-40
;;9002226.02101,"1224,00071-0156-23 ",.01)
;;00071-0156-23
;;9002226.02101,"1224,00071-0156-23 ",.02)
;;00071-0156-23
;;9002226.02101,"1224,00071-0156-40 ",.01)
;;00071-0156-40
;;9002226.02101,"1224,00071-0156-40 ",.02)
;;00071-0156-40
;;9002226.02101,"1224,00071-0156-94 ",.01)
;;00071-0156-94
;;9002226.02101,"1224,00071-0156-94 ",.02)
;;00071-0156-94
;;9002226.02101,"1224,00071-0157-23 ",.01)
;;00071-0157-23
;;9002226.02101,"1224,00071-0157-23 ",.02)
;;00071-0157-23
;;9002226.02101,"1224,00071-0157-40 ",.01)
;;00071-0157-40
;;9002226.02101,"1224,00071-0157-40 ",.02)
;;00071-0157-40
;;9002226.02101,"1224,00071-0157-73 ",.01)
;;00071-0157-73
;;9002226.02101,"1224,00071-0157-73 ",.02)
;;00071-0157-73
;;9002226.02101,"1224,00071-0157-88 ",.01)
;;00071-0157-88
;;9002226.02101,"1224,00071-0157-88 ",.02)
;;00071-0157-88
;;9002226.02101,"1224,00071-0158-23 ",.01)
;;00071-0158-23
;;9002226.02101,"1224,00071-0158-23 ",.02)
;;00071-0158-23
;;9002226.02101,"1224,00071-0158-73 ",.01)
;;00071-0158-73
;;9002226.02101,"1224,00071-0158-73 ",.02)
;;00071-0158-73
;;9002226.02101,"1224,00071-0158-88 ",.01)
;;00071-0158-88
;;9002226.02101,"1224,00071-0158-88 ",.02)
;;00071-0158-88
;;9002226.02101,"1224,00071-0158-92 ",.01)
;;00071-0158-92
;;9002226.02101,"1224,00071-0158-92 ",.02)
;;00071-0158-92
;;9002226.02101,"1224,00074-3005-90 ",.01)
;;00074-3005-90
;;9002226.02101,"1224,00074-3005-90 ",.02)
;;00074-3005-90
;;9002226.02101,"1224,00074-3007-90 ",.01)
;;00074-3007-90
;;9002226.02101,"1224,00074-3007-90 ",.02)
;;00074-3007-90
;;9002226.02101,"1224,00074-3010-90 ",.01)
;;00074-3010-90
;;9002226.02101,"1224,00074-3010-90 ",.02)
;;00074-3010-90
;;9002226.02101,"1224,00074-3072-90 ",.01)
;;00074-3072-90
;;9002226.02101,"1224,00074-3072-90 ",.02)
;;00074-3072-90
;;9002226.02101,"1224,00074-3312-90 ",.01)
;;00074-3312-90
;;9002226.02101,"1224,00074-3312-90 ",.02)
;;00074-3312-90
;;9002226.02101,"1224,00074-3315-90 ",.01)
;;00074-3315-90
;;9002226.02101,"1224,00074-3315-90 ",.02)
;;00074-3315-90
;;9002226.02101,"1224,00074-3455-90 ",.01)
;;00074-3455-90
;;9002226.02101,"1224,00074-3455-90 ",.02)
;;00074-3455-90
;;9002226.02101,"1224,00074-3457-90 ",.01)
;;00074-3457-90
;;9002226.02101,"1224,00074-3457-90 ",.02)
;;00074-3457-90
;;9002226.02101,"1224,00074-3459-90 ",.01)
;;00074-3459-90
;;9002226.02101,"1224,00074-3459-90 ",.02)
;;00074-3459-90
;;9002226.02101,"1224,00078-0176-05 ",.01)
;;00078-0176-05
BGP61M6 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 18, 2015 ;
+1 ;;16.1;IHS CLINICAL REPORTING;;MAR 22, 2016;Build 170
+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,"68180-0480-03 ")
+2 ;;1820
+3 ;;21,"68180-0481-01 ")
+4 ;;1821
+5 ;;21,"68180-0481-02 ")
+6 ;;1822
+7 ;;21,"68180-0481-03 ")
+8 ;;1823
+9 ;;21,"68180-0482-06 ")
+10 ;;1824
+11 ;;21,"68180-0482-09 ")
+12 ;;1825
+13 ;;21,"68180-0485-02 ")
+14 ;;1826
+15 ;;21,"68180-0485-09 ")
+16 ;;1827
+17 ;;21,"68180-0486-02 ")
+18 ;;1828
+19 ;;21,"68180-0486-09 ")
+20 ;;1829
+21 ;;21,"68180-0487-02 ")
+22 ;;1830
+23 ;;21,"68180-0487-09 ")
+24 ;;1831
+25 ;;21,"68180-0488-02 ")
+26 ;;1832
+27 ;;21,"68180-0488-09 ")
+28 ;;1833
+29 ;;21,"68258-6000-03 ")
+30 ;;1834
+31 ;;21,"68258-6000-09 ")
+32 ;;1835
+33 ;;21,"68258-6001-03 ")
+34 ;;1836
+35 ;;21,"68258-6001-09 ")
+36 ;;1837
+37 ;;21,"68258-6002-03 ")
+38 ;;1838
+39 ;;21,"68258-6002-09 ")
+40 ;;1839
+41 ;;21,"68258-6009-03 ")
+42 ;;1840
+43 ;;21,"68258-6009-09 ")
+44 ;;1841
+45 ;;21,"68258-6013-03 ")
+46 ;;1842
+47 ;;21,"68258-6013-09 ")
+48 ;;1843
+49 ;;21,"68258-6016-03 ")
+50 ;;1844
+51 ;;21,"68258-6017-03 ")
+52 ;;1845
+53 ;;21,"68258-6041-03 ")
+54 ;;1846
+55 ;;21,"68258-6042-03 ")
+56 ;;1847
+57 ;;21,"68258-6043-03 ")
+58 ;;1848
+59 ;;21,"68258-6043-09 ")
+60 ;;1849
+61 ;;21,"68258-6044-03 ")
+62 ;;1850
+63 ;;21,"68258-6044-09 ")
+64 ;;1851
+65 ;;21,"68258-6049-03 ")
+66 ;;1852
+67 ;;21,"68258-6050-03 ")
+68 ;;1853
+69 ;;21,"68258-6970-03 ")
+70 ;;1854
+71 ;;21,"68258-6983-03 ")
+72 ;;1855
+73 ;;21,"68258-6984-03 ")
+74 ;;1856
+75 ;;21,"68258-6985-09 ")
+76 ;;1857
+77 ;;21,"68258-6992-09 ")
+78 ;;1858
+79 ;;21,"68258-6993-09 ")
+80 ;;1859
+81 ;;21,"68382-0065-05 ")
+82 ;;1860
+83 ;;21,"68382-0065-06 ")
+84 ;;1861
+85 ;;21,"68382-0065-10 ")
+86 ;;1862
+87 ;;21,"68382-0065-14 ")
+88 ;;1863
+89 ;;21,"68382-0065-16 ")
+90 ;;1864
+91 ;;21,"68382-0066-05 ")
+92 ;;1865
+93 ;;21,"68382-0066-06 ")
+94 ;;1866
+95 ;;21,"68382-0066-10 ")
+96 ;;1867
+97 ;;21,"68382-0066-14 ")
+98 ;;1868
+99 ;;21,"68382-0066-16 ")
+100 ;;1869
+101 ;;21,"68382-0066-24 ")
+102 ;;1870
+103 ;;21,"68382-0067-05 ")
+104 ;;1871
+105 ;;21,"68382-0067-06 ")
+106 ;;1872
+107 ;;21,"68382-0067-10 ")
+108 ;;1873
+109 ;;21,"68382-0067-14 ")
+110 ;;1874
+111 ;;21,"68382-0067-16 ")
+112 ;;1875
+113 ;;21,"68382-0067-24 ")
+114 ;;1876
+115 ;;21,"68382-0068-05 ")
+116 ;;1877
+117 ;;21,"68382-0068-06 ")
+118 ;;1878
+119 ;;21,"68382-0068-10 ")
+120 ;;1879
+121 ;;21,"68382-0068-14 ")
+122 ;;1880
+123 ;;21,"68382-0068-16 ")
+124 ;;1881
+125 ;;21,"68382-0068-40 ")
+126 ;;1882
+127 ;;21,"68382-0069-05 ")
+128 ;;1883
+129 ;;21,"68382-0069-06 ")
+130 ;;1884
+131 ;;21,"68382-0069-10 ")
+132 ;;1885
+133 ;;21,"68382-0069-14 ")
+134 ;;1886
+135 ;;21,"68382-0069-16 ")
+136 ;;1887
+137 ;;21,"68382-0070-05 ")
+138 ;;1888
+139 ;;21,"68382-0070-16 ")
+140 ;;1889
+141 ;;21,"68382-0071-05 ")
+142 ;;1890
+143 ;;21,"68382-0071-16 ")
+144 ;;1891
+145 ;;21,"68382-0072-05 ")
+146 ;;1892
+147 ;;21,"68382-0072-16 ")
+148 ;;1893
+149 ;;21,"68382-0073-05 ")
+150 ;;1894
+151 ;;21,"68382-0073-16 ")
+152 ;;1895
+153 ;;21,"68462-0195-05 ")
+154 ;;1896
+155 ;;21,"68462-0195-90 ")
+156 ;;1897
+157 ;;21,"68462-0196-05 ")
+158 ;;1898
+159 ;;21,"68462-0196-90 ")
+160 ;;1899
+161 ;;21,"68462-0197-05 ")
+162 ;;1900
+163 ;;21,"68462-0197-90 ")
+164 ;;1901
+165 ;;21,"68462-0198-05 ")
+166 ;;1902
+167 ;;21,"68462-0198-90 ")
+168 ;;1903
+169 ;;21,"68645-0261-54 ")
+170 ;;1904
+171 ;;21,"68645-0262-54 ")
+172 ;;1905
+173 ;;21,"68645-0263-54 ")
+174 ;;1906
+175 ;;21,"68645-0402-70 ")
+176 ;;1907
+177 ;;21,"68645-0403-70 ")
+178 ;;1908
+179 ;;21,"68645-0417-54 ")
+180 ;;1909
+181 ;;21,"68645-0418-54 ")
+182 ;;1910
+183 ;;21,"68645-0458-70 ")
+184 ;;1911
+185 ;;21,"68645-0459-70 ")
+186 ;;1912
+187 ;;21,"68645-0460-54 ")
+188 ;;1913
+189 ;;21,"68645-0461-54 ")
+190 ;;1914
+191 ;;21,"68645-0470-54 ")
+192 ;;1915
+193 ;;21,"68645-0471-54 ")
+194 ;;1916
+195 ;;21,"68645-0472-54 ")
+196 ;;1917
+197 ;;21,"68645-0480-70 ")
+198 ;;1918
+199 ;;21,"68645-0481-70 ")
+200 ;;1919
+201 ;;21,"68645-0482-54 ")
+202 ;;1920
+203 ;;21,"68645-0483-54 ")
+204 ;;1921
+205 ;;21,"68645-0495-54 ")
+206 ;;1922
+207 ;;21,"68788-0074-03 ")
+208 ;;1923
+209 ;;21,"68788-9182-03 ")
+210 ;;1924
+211 ;;21,"68788-9556-03 ")
+212 ;;1925
+213 ;;21,"68788-9668-03 ")
+214 ;;1926
+215 ;;21,"68788-9683-03 ")
+216 ;;1927
+217 ;;21,"68788-9835-03 ")
+218 ;;1928
+219 ;;21,"68788-9836-03 ")
+220 ;;1929
+221 ;;21,"68788-9868-03 ")
+222 ;;1930
+223 ;;21,"68788-9869-03 ")
+224 ;;1931
+225 ;;9002226,1224,.01)
+226 ;;BGP PQA STATIN NDC
+227 ;;9002226,1224,.02)
+228 ;;@
+229 ;;9002226,1224,.04)
+230 ;;n
+231 ;;9002226,1224,.06)
+232 ;;@
+233 ;;9002226,1224,.08)
+234 ;;@
+235 ;;9002226,1224,.09)
+236 ;;3150818
+237 ;;9002226,1224,.11)
+238 ;;@
+239 ;;9002226,1224,.12)
+240 ;;@
+241 ;;9002226,1224,.13)
+242 ;;1
+243 ;;9002226,1224,.14)
+244 ;;@
+245 ;;9002226,1224,.15)
+246 ;;50.67
+247 ;;9002226,1224,.16)
+248 ;;@
+249 ;;9002226,1224,.17)
+250 ;;@
+251 ;;9002226,1224,3101)
+252 ;;@
+253 ;;9002226.02101,"1224,00002-4770-90 ",.01)
+254 ;;00002-4770-90
+255 ;;9002226.02101,"1224,00002-4770-90 ",.02)
+256 ;;00002-4770-90
+257 ;;9002226.02101,"1224,00002-4771-90 ",.01)
+258 ;;00002-4771-90
+259 ;;9002226.02101,"1224,00002-4771-90 ",.02)
+260 ;;00002-4771-90
+261 ;;9002226.02101,"1224,00002-4772-90 ",.01)
+262 ;;00002-4772-90
+263 ;;9002226.02101,"1224,00002-4772-90 ",.02)
+264 ;;00002-4772-90
+265 ;;9002226.02101,"1224,00003-5178-05 ",.01)
+266 ;;00003-5178-05
+267 ;;9002226.02101,"1224,00003-5178-05 ",.02)
+268 ;;00003-5178-05
+269 ;;9002226.02101,"1224,00003-5194-10 ",.01)
+270 ;;00003-5194-10
+271 ;;9002226.02101,"1224,00003-5194-10 ",.02)
+272 ;;00003-5194-10
+273 ;;9002226.02101,"1224,00003-5195-10 ",.01)
+274 ;;00003-5195-10
+275 ;;9002226.02101,"1224,00003-5195-10 ",.02)
+276 ;;00003-5195-10
+277 ;;9002226.02101,"1224,00006-0533-31 ",.01)
+278 ;;00006-0533-31
+279 ;;9002226.02101,"1224,00006-0533-31 ",.02)
+280 ;;00006-0533-31
+281 ;;9002226.02101,"1224,00006-0533-54 ",.01)
+282 ;;00006-0533-54
+283 ;;9002226.02101,"1224,00006-0533-54 ",.02)
+284 ;;00006-0533-54
+285 ;;9002226.02101,"1224,00006-0535-31 ",.01)
+286 ;;00006-0535-31
+287 ;;9002226.02101,"1224,00006-0535-31 ",.02)
+288 ;;00006-0535-31
+289 ;;9002226.02101,"1224,00006-0535-54 ",.01)
+290 ;;00006-0535-54
+291 ;;9002226.02101,"1224,00006-0535-54 ",.02)
+292 ;;00006-0535-54
+293 ;;9002226.02101,"1224,00006-0537-31 ",.01)
+294 ;;00006-0537-31
+295 ;;9002226.02101,"1224,00006-0537-31 ",.02)
+296 ;;00006-0537-31
+297 ;;9002226.02101,"1224,00006-0537-54 ",.01)
+298 ;;00006-0537-54
+299 ;;9002226.02101,"1224,00006-0537-54 ",.02)
+300 ;;00006-0537-54
+301 ;;9002226.02101,"1224,00006-0543-31 ",.01)
+302 ;;00006-0543-31
+303 ;;9002226.02101,"1224,00006-0543-31 ",.02)
+304 ;;00006-0543-31
+305 ;;9002226.02101,"1224,00006-0543-54 ",.01)
+306 ;;00006-0543-54
+307 ;;9002226.02101,"1224,00006-0543-54 ",.02)
+308 ;;00006-0543-54
+309 ;;9002226.02101,"1224,00006-0726-31 ",.01)
+310 ;;00006-0726-31
+311 ;;9002226.02101,"1224,00006-0726-31 ",.02)
+312 ;;00006-0726-31
+313 ;;9002226.02101,"1224,00006-0731-61 ",.01)
+314 ;;00006-0731-61
+315 ;;9002226.02101,"1224,00006-0731-61 ",.02)
+316 ;;00006-0731-61
+317 ;;9002226.02101,"1224,00006-0732-61 ",.01)
+318 ;;00006-0732-61
+319 ;;9002226.02101,"1224,00006-0732-61 ",.02)
+320 ;;00006-0732-61
+321 ;;9002226.02101,"1224,00006-0735-31 ",.01)
+322 ;;00006-0735-31
+323 ;;9002226.02101,"1224,00006-0735-31 ",.02)
+324 ;;00006-0735-31
+325 ;;9002226.02101,"1224,00006-0735-54 ",.01)
+326 ;;00006-0735-54
+327 ;;9002226.02101,"1224,00006-0735-54 ",.02)
+328 ;;00006-0735-54
+329 ;;9002226.02101,"1224,00006-0740-31 ",.01)
+330 ;;00006-0740-31
+331 ;;9002226.02101,"1224,00006-0740-31 ",.02)
+332 ;;00006-0740-31
+333 ;;9002226.02101,"1224,00006-0740-54 ",.01)
+334 ;;00006-0740-54
+335 ;;9002226.02101,"1224,00006-0740-54 ",.02)
+336 ;;00006-0740-54
+337 ;;9002226.02101,"1224,00006-0749-31 ",.01)
+338 ;;00006-0749-31
+339 ;;9002226.02101,"1224,00006-0749-31 ",.02)
+340 ;;00006-0749-31
+341 ;;9002226.02101,"1224,00006-0749-54 ",.01)
+342 ;;00006-0749-54
+343 ;;9002226.02101,"1224,00006-0749-54 ",.02)
+344 ;;00006-0749-54
+345 ;;9002226.02101,"1224,00006-0753-31 ",.01)
+346 ;;00006-0753-31
+347 ;;9002226.02101,"1224,00006-0753-31 ",.02)
+348 ;;00006-0753-31
+349 ;;9002226.02101,"1224,00006-0753-54 ",.01)
+350 ;;00006-0753-54
+351 ;;9002226.02101,"1224,00006-0753-54 ",.02)
+352 ;;00006-0753-54
+353 ;;9002226.02101,"1224,00006-0753-82 ",.01)
+354 ;;00006-0753-82
+355 ;;9002226.02101,"1224,00006-0753-82 ",.02)
+356 ;;00006-0753-82
+357 ;;9002226.02101,"1224,00006-0757-31 ",.01)
+358 ;;00006-0757-31
+359 ;;9002226.02101,"1224,00006-0757-31 ",.02)
+360 ;;00006-0757-31
+361 ;;9002226.02101,"1224,00006-0757-54 ",.01)
+362 ;;00006-0757-54
+363 ;;9002226.02101,"1224,00006-0757-54 ",.02)
+364 ;;00006-0757-54
+365 ;;9002226.02101,"1224,00006-0757-82 ",.01)
+366 ;;00006-0757-82
+367 ;;9002226.02101,"1224,00006-0757-82 ",.02)
+368 ;;00006-0757-82
+369 ;;9002226.02101,"1224,00006-0773-31 ",.01)
+370 ;;00006-0773-31
+371 ;;9002226.02101,"1224,00006-0773-31 ",.02)
+372 ;;00006-0773-31
+373 ;;9002226.02101,"1224,00006-0773-54 ",.01)
+374 ;;00006-0773-54
+375 ;;9002226.02101,"1224,00006-0773-54 ",.02)
+376 ;;00006-0773-54
+377 ;;9002226.02101,"1224,00006-0773-82 ",.01)
+378 ;;00006-0773-82
+379 ;;9002226.02101,"1224,00006-0773-82 ",.02)
+380 ;;00006-0773-82
+381 ;;9002226.02101,"1224,00069-2150-30 ",.01)
+382 ;;00069-2150-30
+383 ;;9002226.02101,"1224,00069-2150-30 ",.02)
+384 ;;00069-2150-30
+385 ;;9002226.02101,"1224,00069-2160-30 ",.01)
+386 ;;00069-2160-30
+387 ;;9002226.02101,"1224,00069-2160-30 ",.02)
+388 ;;00069-2160-30
+389 ;;9002226.02101,"1224,00069-2170-30 ",.01)
+390 ;;00069-2170-30
+391 ;;9002226.02101,"1224,00069-2170-30 ",.02)
+392 ;;00069-2170-30
+393 ;;9002226.02101,"1224,00069-2180-30 ",.01)
+394 ;;00069-2180-30
+395 ;;9002226.02101,"1224,00069-2180-30 ",.02)
+396 ;;00069-2180-30
+397 ;;9002226.02101,"1224,00069-2190-30 ",.01)
+398 ;;00069-2190-30
+399 ;;9002226.02101,"1224,00069-2190-30 ",.02)
+400 ;;00069-2190-30
+401 ;;9002226.02101,"1224,00069-2250-30 ",.01)
+402 ;;00069-2250-30
+403 ;;9002226.02101,"1224,00069-2250-30 ",.02)
+404 ;;00069-2250-30
+405 ;;9002226.02101,"1224,00069-2260-30 ",.01)
+406 ;;00069-2260-30
+407 ;;9002226.02101,"1224,00069-2260-30 ",.02)
+408 ;;00069-2260-30
+409 ;;9002226.02101,"1224,00069-2270-30 ",.01)
+410 ;;00069-2270-30
+411 ;;9002226.02101,"1224,00069-2270-30 ",.02)
+412 ;;00069-2270-30
+413 ;;9002226.02101,"1224,00069-2960-30 ",.01)
+414 ;;00069-2960-30
+415 ;;9002226.02101,"1224,00069-2960-30 ",.02)
+416 ;;00069-2960-30
+417 ;;9002226.02101,"1224,00069-2970-30 ",.01)
+418 ;;00069-2970-30
+419 ;;9002226.02101,"1224,00069-2970-30 ",.02)
+420 ;;00069-2970-30
+421 ;;9002226.02101,"1224,00069-2980-30 ",.01)
+422 ;;00069-2980-30
+423 ;;9002226.02101,"1224,00069-2980-30 ",.02)
+424 ;;00069-2980-30
+425 ;;9002226.02101,"1224,00071-0155-23 ",.01)
+426 ;;00071-0155-23
+427 ;;9002226.02101,"1224,00071-0155-23 ",.02)
+428 ;;00071-0155-23
+429 ;;9002226.02101,"1224,00071-0155-34 ",.01)
+430 ;;00071-0155-34
+431 ;;9002226.02101,"1224,00071-0155-34 ",.02)
+432 ;;00071-0155-34
+433 ;;9002226.02101,"1224,00071-0155-40 ",.01)
+434 ;;00071-0155-40
+435 ;;9002226.02101,"1224,00071-0155-40 ",.02)
+436 ;;00071-0155-40
+437 ;;9002226.02101,"1224,00071-0156-23 ",.01)
+438 ;;00071-0156-23
+439 ;;9002226.02101,"1224,00071-0156-23 ",.02)
+440 ;;00071-0156-23
+441 ;;9002226.02101,"1224,00071-0156-40 ",.01)
+442 ;;00071-0156-40
+443 ;;9002226.02101,"1224,00071-0156-40 ",.02)
+444 ;;00071-0156-40
+445 ;;9002226.02101,"1224,00071-0156-94 ",.01)
+446 ;;00071-0156-94
+447 ;;9002226.02101,"1224,00071-0156-94 ",.02)
+448 ;;00071-0156-94
+449 ;;9002226.02101,"1224,00071-0157-23 ",.01)
+450 ;;00071-0157-23
+451 ;;9002226.02101,"1224,00071-0157-23 ",.02)
+452 ;;00071-0157-23
+453 ;;9002226.02101,"1224,00071-0157-40 ",.01)
+454 ;;00071-0157-40
+455 ;;9002226.02101,"1224,00071-0157-40 ",.02)
+456 ;;00071-0157-40
+457 ;;9002226.02101,"1224,00071-0157-73 ",.01)
+458 ;;00071-0157-73
+459 ;;9002226.02101,"1224,00071-0157-73 ",.02)
+460 ;;00071-0157-73
+461 ;;9002226.02101,"1224,00071-0157-88 ",.01)
+462 ;;00071-0157-88
+463 ;;9002226.02101,"1224,00071-0157-88 ",.02)
+464 ;;00071-0157-88
+465 ;;9002226.02101,"1224,00071-0158-23 ",.01)
+466 ;;00071-0158-23
+467 ;;9002226.02101,"1224,00071-0158-23 ",.02)
+468 ;;00071-0158-23
+469 ;;9002226.02101,"1224,00071-0158-73 ",.01)
+470 ;;00071-0158-73
+471 ;;9002226.02101,"1224,00071-0158-73 ",.02)
+472 ;;00071-0158-73
+473 ;;9002226.02101,"1224,00071-0158-88 ",.01)
+474 ;;00071-0158-88
+475 ;;9002226.02101,"1224,00071-0158-88 ",.02)
+476 ;;00071-0158-88
+477 ;;9002226.02101,"1224,00071-0158-92 ",.01)
+478 ;;00071-0158-92
+479 ;;9002226.02101,"1224,00071-0158-92 ",.02)
+480 ;;00071-0158-92
+481 ;;9002226.02101,"1224,00074-3005-90 ",.01)
+482 ;;00074-3005-90
+483 ;;9002226.02101,"1224,00074-3005-90 ",.02)
+484 ;;00074-3005-90
+485 ;;9002226.02101,"1224,00074-3007-90 ",.01)
+486 ;;00074-3007-90
+487 ;;9002226.02101,"1224,00074-3007-90 ",.02)
+488 ;;00074-3007-90
+489 ;;9002226.02101,"1224,00074-3010-90 ",.01)
+490 ;;00074-3010-90
+491 ;;9002226.02101,"1224,00074-3010-90 ",.02)
+492 ;;00074-3010-90
+493 ;;9002226.02101,"1224,00074-3072-90 ",.01)
+494 ;;00074-3072-90
+495 ;;9002226.02101,"1224,00074-3072-90 ",.02)
+496 ;;00074-3072-90
+497 ;;9002226.02101,"1224,00074-3312-90 ",.01)
+498 ;;00074-3312-90
+499 ;;9002226.02101,"1224,00074-3312-90 ",.02)
+500 ;;00074-3312-90
+501 ;;9002226.02101,"1224,00074-3315-90 ",.01)
+502 ;;00074-3315-90
+503 ;;9002226.02101,"1224,00074-3315-90 ",.02)
+504 ;;00074-3315-90
+505 ;;9002226.02101,"1224,00074-3455-90 ",.01)
+506 ;;00074-3455-90
+507 ;;9002226.02101,"1224,00074-3455-90 ",.02)
+508 ;;00074-3455-90
+509 ;;9002226.02101,"1224,00074-3457-90 ",.01)
+510 ;;00074-3457-90
+511 ;;9002226.02101,"1224,00074-3457-90 ",.02)
+512 ;;00074-3457-90
+513 ;;9002226.02101,"1224,00074-3459-90 ",.01)
+514 ;;00074-3459-90
+515 ;;9002226.02101,"1224,00074-3459-90 ",.02)
+516 ;;00074-3459-90
+517 ;;9002226.02101,"1224,00078-0176-05 ",.01)
+518 ;;00078-0176-05
