BGP50M6 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 06, 2014;
;;15.1;IHS CLINICAL REPORTING;;MAY 06, 2015;Build 143
;
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,"68382-0066-16 ")
;;1281
;;21,"68382-0066-24 ")
;;1282
;;21,"68382-0067-05 ")
;;1307
;;21,"68382-0067-06 ")
;;1308
;;21,"68382-0067-10 ")
;;1309
;;21,"68382-0067-14 ")
;;1310
;;21,"68382-0067-16 ")
;;1311
;;21,"68382-0067-24 ")
;;1305
;;21,"68382-0068-05 ")
;;1630
;;21,"68382-0068-06 ")
;;1631
;;21,"68382-0068-10 ")
;;1632
;;21,"68382-0068-14 ")
;;1633
;;21,"68382-0068-16 ")
;;1634
;;21,"68382-0068-40 ")
;;1635
;;21,"68382-0069-05 ")
;;1788
;;21,"68382-0069-06 ")
;;1789
;;21,"68382-0069-10 ")
;;1790
;;21,"68382-0069-14 ")
;;1791
;;21,"68382-0069-16 ")
;;1792
;;21,"68382-0070-05 ")
;;804
;;21,"68382-0070-16 ")
;;805
;;21,"68382-0071-05 ")
;;876
;;21,"68382-0071-16 ")
;;877
;;21,"68382-0072-05 ")
;;964
;;21,"68382-0072-16 ")
;;965
;;21,"68382-0073-05 ")
;;1047
;;21,"68382-0073-16 ")
;;1048
;;21,"68462-0195-05 ")
;;802
;;21,"68462-0195-90 ")
;;803
;;21,"68462-0196-05 ")
;;878
;;21,"68462-0196-90 ")
;;879
;;21,"68462-0197-05 ")
;;962
;;21,"68462-0197-90 ")
;;963
;;21,"68462-0198-05 ")
;;1049
;;21,"68462-0198-90 ")
;;1050
;;21,"68645-0261-54 ")
;;1306
;;21,"68645-0262-54 ")
;;1629
;;21,"68645-0263-54 ")
;;1793
;;21,"68645-0402-70 ")
;;23
;;21,"68645-0403-70 ")
;;113
;;21,"68645-0417-54 ")
;;203
;;21,"68645-0418-54 ")
;;302
;;21,"68645-0458-70 ")
;;24
;;21,"68645-0459-70 ")
;;112
;;21,"68645-0460-54 ")
;;204
;;21,"68645-0461-54 ")
;;303
;;21,"68645-0470-54 ")
;;1312
;;21,"68645-0471-54 ")
;;1628
;;21,"68645-0472-54 ")
;;1794
;;21,"68645-0480-70 ")
;;25
;;21,"68645-0481-70 ")
;;110
;;21,"68645-0482-54 ")
;;111
;;21,"68645-0483-54 ")
;;205
;;9002226,1201,.01)
;;BGP PQA STATIN NDC
;;9002226,1201,.02)
;;@
;;9002226,1201,.04)
;;n
;;9002226,1201,.06)
;;@
;;9002226,1201,.08)
;;@
;;9002226,1201,.09)
;;3140806
;;9002226,1201,.11)
;;@
;;9002226,1201,.12)
;;@
;;9002226,1201,.13)
;;1
;;9002226,1201,.14)
;;@
;;9002226,1201,.15)
;;50.67
;;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-5178-05 ",.01)
;;00003-5178-05
;;9002226.02101,"1201,00003-5178-05 ",.02)
;;00003-5178-05
;;9002226.02101,"1201,00003-5194-10 ",.01)
;;00003-5194-10
;;9002226.02101,"1201,00003-5194-10 ",.02)
;;00003-5194-10
;;9002226.02101,"1201,00003-5195-10 ",.01)
;;00003-5195-10
;;9002226.02101,"1201,00003-5195-10 ",.02)
;;00003-5195-10
;;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-82 ",.01)
;;00006-0543-82
;;9002226.02101,"1201,00006-0543-82 ",.02)
;;00006-0543-82
;;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-0731-61 ",.01)
;;00006-0731-61
;;9002226.02101,"1201,00006-0731-61 ",.02)
;;00006-0731-61
;;9002226.02101,"1201,00006-0732-61 ",.01)
;;00006-0732-61
;;9002226.02101,"1201,00006-0732-61 ",.02)
;;00006-0732-61
;;9002226.02101,"1201,00006-0735-31 ",.01)
;;00006-0735-31
;;9002226.02101,"1201,00006-0735-31 ",.02)
;;00006-0735-31
;;9002226.02101,"1201,00006-0735-54 ",.01)
;;00006-0735-54
;;9002226.02101,"1201,00006-0735-54 ",.02)
;;00006-0735-54
;;9002226.02101,"1201,00006-0735-82 ",.01)
;;00006-0735-82
;;9002226.02101,"1201,00006-0735-82 ",.02)
;;00006-0735-82
;;9002226.02101,"1201,00006-0740-31 ",.01)
;;00006-0740-31
;;9002226.02101,"1201,00006-0740-31 ",.02)
;;00006-0740-31
;;9002226.02101,"1201,00006-0740-54 ",.01)
;;00006-0740-54
;;9002226.02101,"1201,00006-0740-54 ",.02)
;;00006-0740-54
;;9002226.02101,"1201,00006-0740-82 ",.01)
;;00006-0740-82
;;9002226.02101,"1201,00006-0740-82 ",.02)
;;00006-0740-82
;;9002226.02101,"1201,00006-0749-31 ",.01)
;;00006-0749-31
;;9002226.02101,"1201,00006-0749-31 ",.02)
;;00006-0749-31
;;9002226.02101,"1201,00006-0749-54 ",.01)
;;00006-0749-54
;;9002226.02101,"1201,00006-0749-54 ",.02)
;;00006-0749-54
;;9002226.02101,"1201,00006-0749-82 ",.01)
;;00006-0749-82
;;9002226.02101,"1201,00006-0749-82 ",.02)
;;00006-0749-82
;;9002226.02101,"1201,00006-0753-31 ",.01)
;;00006-0753-31
;;9002226.02101,"1201,00006-0753-31 ",.02)
;;00006-0753-31
;;9002226.02101,"1201,00006-0753-54 ",.01)
;;00006-0753-54
;;9002226.02101,"1201,00006-0753-54 ",.02)
;;00006-0753-54
;;9002226.02101,"1201,00006-0753-82 ",.01)
;;00006-0753-82
;;9002226.02101,"1201,00006-0753-82 ",.02)
;;00006-0753-82
;;9002226.02101,"1201,00006-0757-31 ",.01)
;;00006-0757-31
;;9002226.02101,"1201,00006-0757-31 ",.02)
;;00006-0757-31
;;9002226.02101,"1201,00006-0757-54 ",.01)
;;00006-0757-54
;;9002226.02101,"1201,00006-0757-54 ",.02)
;;00006-0757-54
;;9002226.02101,"1201,00006-0757-82 ",.01)
;;00006-0757-82
;;9002226.02101,"1201,00006-0757-82 ",.02)
;;00006-0757-82
;;9002226.02101,"1201,00006-0773-31 ",.01)
;;00006-0773-31
;;9002226.02101,"1201,00006-0773-31 ",.02)
;;00006-0773-31
;;9002226.02101,"1201,00006-0773-54 ",.01)
;;00006-0773-54
;;9002226.02101,"1201,00006-0773-54 ",.02)
;;00006-0773-54
;;9002226.02101,"1201,00006-0773-82 ",.01)
;;00006-0773-82
;;9002226.02101,"1201,00006-0773-82 ",.02)
;;00006-0773-82
;;9002226.02101,"1201,00069-2150-30 ",.01)
;;00069-2150-30
;;9002226.02101,"1201,00069-2150-30 ",.02)
;;00069-2150-30
;;9002226.02101,"1201,00069-2160-30 ",.01)
;;00069-2160-30
;;9002226.02101,"1201,00069-2160-30 ",.02)
;;00069-2160-30
;;9002226.02101,"1201,00069-2170-30 ",.01)
;;00069-2170-30
;;9002226.02101,"1201,00069-2170-30 ",.02)
;;00069-2170-30
;;9002226.02101,"1201,00069-2180-30 ",.01)
;;00069-2180-30
;;9002226.02101,"1201,00069-2180-30 ",.02)
;;00069-2180-30
;;9002226.02101,"1201,00069-2190-30 ",.01)
;;00069-2190-30
;;9002226.02101,"1201,00069-2190-30 ",.02)
;;00069-2190-30
;;9002226.02101,"1201,00069-2250-30 ",.01)
;;00069-2250-30
;;9002226.02101,"1201,00069-2250-30 ",.02)
;;00069-2250-30
;;9002226.02101,"1201,00069-2260-30 ",.01)
;;00069-2260-30
;;9002226.02101,"1201,00069-2260-30 ",.02)
;;00069-2260-30
;;9002226.02101,"1201,00069-2270-30 ",.01)
;;00069-2270-30
;;9002226.02101,"1201,00069-2270-30 ",.02)
;;00069-2270-30
;;9002226.02101,"1201,00069-2960-30 ",.01)
;;00069-2960-30
;;9002226.02101,"1201,00069-2960-30 ",.02)
;;00069-2960-30
;;9002226.02101,"1201,00069-2970-30 ",.01)
;;00069-2970-30
;;9002226.02101,"1201,00069-2970-30 ",.02)
;;00069-2970-30
;;9002226.02101,"1201,00069-2980-30 ",.01)
;;00069-2980-30
;;9002226.02101,"1201,00069-2980-30 ",.02)
;;00069-2980-30
;;9002226.02101,"1201,00071-0155-23 ",.01)
;;00071-0155-23
;;9002226.02101,"1201,00071-0155-23 ",.02)
;;00071-0155-23
;;9002226.02101,"1201,00071-0155-34 ",.01)
;;00071-0155-34
;;9002226.02101,"1201,00071-0155-34 ",.02)
;;00071-0155-34
;;9002226.02101,"1201,00071-0155-40 ",.01)
;;00071-0155-40
;;9002226.02101,"1201,00071-0155-40 ",.02)
;;00071-0155-40
;;9002226.02101,"1201,00071-0156-23 ",.01)
;;00071-0156-23
;;9002226.02101,"1201,00071-0156-23 ",.02)
;;00071-0156-23
;;9002226.02101,"1201,00071-0156-40 ",.01)
;;00071-0156-40
;;9002226.02101,"1201,00071-0156-40 ",.02)
;;00071-0156-40
;;9002226.02101,"1201,00071-0156-94 ",.01)
;;00071-0156-94
;;9002226.02101,"1201,00071-0156-94 ",.02)
;;00071-0156-94
;;9002226.02101,"1201,00071-0157-23 ",.01)
;;00071-0157-23
;;9002226.02101,"1201,00071-0157-23 ",.02)
;;00071-0157-23
;;9002226.02101,"1201,00071-0157-40 ",.01)
;;00071-0157-40
;;9002226.02101,"1201,00071-0157-40 ",.02)
;;00071-0157-40
;;9002226.02101,"1201,00071-0157-73 ",.01)
;;00071-0157-73
;;9002226.02101,"1201,00071-0157-73 ",.02)
;;00071-0157-73
;;9002226.02101,"1201,00071-0157-88 ",.01)
;;00071-0157-88
;;9002226.02101,"1201,00071-0157-88 ",.02)
;;00071-0157-88
;;9002226.02101,"1201,00071-0158-23 ",.01)
;;00071-0158-23
;;9002226.02101,"1201,00071-0158-23 ",.02)
;;00071-0158-23
;;9002226.02101,"1201,00071-0158-73 ",.01)
;;00071-0158-73
;;9002226.02101,"1201,00071-0158-73 ",.02)
;;00071-0158-73
;;9002226.02101,"1201,00071-0158-88 ",.01)
;;00071-0158-88
;;9002226.02101,"1201,00071-0158-88 ",.02)
;;00071-0158-88
;;9002226.02101,"1201,00071-0158-92 ",.01)
;;00071-0158-92
;;9002226.02101,"1201,00071-0158-92 ",.02)
;;00071-0158-92
;;9002226.02101,"1201,00074-3005-90 ",.01)
;;00074-3005-90
;;9002226.02101,"1201,00074-3005-90 ",.02)
;;00074-3005-90
;;9002226.02101,"1201,00074-3007-90 ",.01)
;;00074-3007-90
;;9002226.02101,"1201,00074-3007-90 ",.02)
;;00074-3007-90
;;9002226.02101,"1201,00074-3010-90 ",.01)
;;00074-3010-90
;;9002226.02101,"1201,00074-3010-90 ",.02)
;;00074-3010-90
;;9002226.02101,"1201,00074-3072-90 ",.01)
;;00074-3072-90
;;9002226.02101,"1201,00074-3072-90 ",.02)
;;00074-3072-90
;;9002226.02101,"1201,00074-3312-90 ",.01)
;;00074-3312-90
;;9002226.02101,"1201,00074-3312-90 ",.02)
;;00074-3312-90
;;9002226.02101,"1201,00074-3315-90 ",.01)
;;00074-3315-90
;;9002226.02101,"1201,00074-3315-90 ",.02)
;;00074-3315-90
;;9002226.02101,"1201,00074-3316-90 ",.01)
;;00074-3316-90
;;9002226.02101,"1201,00074-3316-90 ",.02)
;;00074-3316-90
;;9002226.02101,"1201,00074-3455-90 ",.01)
;;00074-3455-90
;;9002226.02101,"1201,00074-3455-90 ",.02)
;;00074-3455-90
;;9002226.02101,"1201,00074-3457-90 ",.01)
;;00074-3457-90
;;9002226.02101,"1201,00074-3457-90 ",.02)
;;00074-3457-90
;;9002226.02101,"1201,00074-3459-90 ",.01)
;;00074-3459-90
;;9002226.02101,"1201,00074-3459-90 ",.02)
;;00074-3459-90
;;9002226.02101,"1201,00078-0176-05 ",.01)
;;00078-0176-05
;;9002226.02101,"1201,00078-0176-05 ",.02)
;;00078-0176-05
;;9002226.02101,"1201,00078-0176-15 ",.01)
;;00078-0176-15
;;9002226.02101,"1201,00078-0176-15 ",.02)
;;00078-0176-15
;;9002226.02101,"1201,00078-0234-05 ",.01)
;;00078-0234-05
;;9002226.02101,"1201,00078-0234-05 ",.02)
;;00078-0234-05
;;9002226.02101,"1201,00078-0234-15 ",.01)
;;00078-0234-15
;;9002226.02101,"1201,00078-0234-15 ",.02)
;;00078-0234-15
;;9002226.02101,"1201,00078-0354-05 ",.01)
;;00078-0354-05
;;9002226.02101,"1201,00078-0354-05 ",.02)
;;00078-0354-05
;;9002226.02101,"1201,00078-0354-15 ",.01)
;;00078-0354-15
;;9002226.02101,"1201,00078-0354-15 ",.02)
;;00078-0354-15
;;9002226.02101,"1201,00093-0576-06 ",.01)
;;00093-0576-06
;;9002226.02101,"1201,00093-0576-06 ",.02)
;;00093-0576-06
;;9002226.02101,"1201,00093-0576-10 ",.01)
;;00093-0576-10
;;9002226.02101,"1201,00093-0576-10 ",.02)
;;00093-0576-10
;;9002226.02101,"1201,00093-0576-19 ",.01)
;;00093-0576-19
;;9002226.02101,"1201,00093-0576-19 ",.02)
;;00093-0576-19
;;9002226.02101,"1201,00093-0576-93 ",.01)
;;00093-0576-93
;;9002226.02101,"1201,00093-0576-93 ",.02)
;;00093-0576-93
;;9002226.02101,"1201,00093-0771-10 ",.01)
;;00093-0771-10
;;9002226.02101,"1201,00093-0771-10 ",.02)
;;00093-0771-10
;;9002226.02101,"1201,00093-0771-98 ",.01)
;;00093-0771-98
;;9002226.02101,"1201,00093-0771-98 ",.02)
;;00093-0771-98
;;9002226.02101,"1201,00093-0926-06 ",.01)
;;00093-0926-06
;;9002226.02101,"1201,00093-0926-06 ",.02)
;;00093-0926-06
;;9002226.02101,"1201,00093-0926-10 ",.01)
;;00093-0926-10
;;9002226.02101,"1201,00093-0926-10 ",.02)
;;00093-0926-10
;;9002226.02101,"1201,00093-0926-19 ",.01)
;;00093-0926-19
;;9002226.02101,"1201,00093-0926-19 ",.02)
;;00093-0926-19
;;9002226.02101,"1201,00093-0926-93 ",.01)
;;00093-0926-93
;;9002226.02101,"1201,00093-0926-93 ",.02)
;;00093-0926-93
;;9002226.02101,"1201,00093-0928-06 ",.01)
;;00093-0928-06
;;9002226.02101,"1201,00093-0928-06 ",.02)
;;00093-0928-06
BGP50M6 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 06, 2014;
+1 ;;15.1;IHS CLINICAL REPORTING;;MAY 06, 2015;Build 143
+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,"68382-0066-16 ")
+2 ;;1281
+3 ;;21,"68382-0066-24 ")
+4 ;;1282
+5 ;;21,"68382-0067-05 ")
+6 ;;1307
+7 ;;21,"68382-0067-06 ")
+8 ;;1308
+9 ;;21,"68382-0067-10 ")
+10 ;;1309
+11 ;;21,"68382-0067-14 ")
+12 ;;1310
+13 ;;21,"68382-0067-16 ")
+14 ;;1311
+15 ;;21,"68382-0067-24 ")
+16 ;;1305
+17 ;;21,"68382-0068-05 ")
+18 ;;1630
+19 ;;21,"68382-0068-06 ")
+20 ;;1631
+21 ;;21,"68382-0068-10 ")
+22 ;;1632
+23 ;;21,"68382-0068-14 ")
+24 ;;1633
+25 ;;21,"68382-0068-16 ")
+26 ;;1634
+27 ;;21,"68382-0068-40 ")
+28 ;;1635
+29 ;;21,"68382-0069-05 ")
+30 ;;1788
+31 ;;21,"68382-0069-06 ")
+32 ;;1789
+33 ;;21,"68382-0069-10 ")
+34 ;;1790
+35 ;;21,"68382-0069-14 ")
+36 ;;1791
+37 ;;21,"68382-0069-16 ")
+38 ;;1792
+39 ;;21,"68382-0070-05 ")
+40 ;;804
+41 ;;21,"68382-0070-16 ")
+42 ;;805
+43 ;;21,"68382-0071-05 ")
+44 ;;876
+45 ;;21,"68382-0071-16 ")
+46 ;;877
+47 ;;21,"68382-0072-05 ")
+48 ;;964
+49 ;;21,"68382-0072-16 ")
+50 ;;965
+51 ;;21,"68382-0073-05 ")
+52 ;;1047
+53 ;;21,"68382-0073-16 ")
+54 ;;1048
+55 ;;21,"68462-0195-05 ")
+56 ;;802
+57 ;;21,"68462-0195-90 ")
+58 ;;803
+59 ;;21,"68462-0196-05 ")
+60 ;;878
+61 ;;21,"68462-0196-90 ")
+62 ;;879
+63 ;;21,"68462-0197-05 ")
+64 ;;962
+65 ;;21,"68462-0197-90 ")
+66 ;;963
+67 ;;21,"68462-0198-05 ")
+68 ;;1049
+69 ;;21,"68462-0198-90 ")
+70 ;;1050
+71 ;;21,"68645-0261-54 ")
+72 ;;1306
+73 ;;21,"68645-0262-54 ")
+74 ;;1629
+75 ;;21,"68645-0263-54 ")
+76 ;;1793
+77 ;;21,"68645-0402-70 ")
+78 ;;23
+79 ;;21,"68645-0403-70 ")
+80 ;;113
+81 ;;21,"68645-0417-54 ")
+82 ;;203
+83 ;;21,"68645-0418-54 ")
+84 ;;302
+85 ;;21,"68645-0458-70 ")
+86 ;;24
+87 ;;21,"68645-0459-70 ")
+88 ;;112
+89 ;;21,"68645-0460-54 ")
+90 ;;204
+91 ;;21,"68645-0461-54 ")
+92 ;;303
+93 ;;21,"68645-0470-54 ")
+94 ;;1312
+95 ;;21,"68645-0471-54 ")
+96 ;;1628
+97 ;;21,"68645-0472-54 ")
+98 ;;1794
+99 ;;21,"68645-0480-70 ")
+100 ;;25
+101 ;;21,"68645-0481-70 ")
+102 ;;110
+103 ;;21,"68645-0482-54 ")
+104 ;;111
+105 ;;21,"68645-0483-54 ")
+106 ;;205
+107 ;;9002226,1201,.01)
+108 ;;BGP PQA STATIN NDC
+109 ;;9002226,1201,.02)
+110 ;;@
+111 ;;9002226,1201,.04)
+112 ;;n
+113 ;;9002226,1201,.06)
+114 ;;@
+115 ;;9002226,1201,.08)
+116 ;;@
+117 ;;9002226,1201,.09)
+118 ;;3140806
+119 ;;9002226,1201,.11)
+120 ;;@
+121 ;;9002226,1201,.12)
+122 ;;@
+123 ;;9002226,1201,.13)
+124 ;;1
+125 ;;9002226,1201,.14)
+126 ;;@
+127 ;;9002226,1201,.15)
+128 ;;50.67
+129 ;;9002226,1201,.16)
+130 ;;@
+131 ;;9002226,1201,.17)
+132 ;;@
+133 ;;9002226,1201,3101)
+134 ;;@
+135 ;;9002226.02101,"1201,00002-4770-90 ",.01)
+136 ;;00002-4770-90
+137 ;;9002226.02101,"1201,00002-4770-90 ",.02)
+138 ;;00002-4770-90
+139 ;;9002226.02101,"1201,00002-4771-90 ",.01)
+140 ;;00002-4771-90
+141 ;;9002226.02101,"1201,00002-4771-90 ",.02)
+142 ;;00002-4771-90
+143 ;;9002226.02101,"1201,00002-4772-90 ",.01)
+144 ;;00002-4772-90
+145 ;;9002226.02101,"1201,00002-4772-90 ",.02)
+146 ;;00002-4772-90
+147 ;;9002226.02101,"1201,00003-5154-05 ",.01)
+148 ;;00003-5154-05
+149 ;;9002226.02101,"1201,00003-5154-05 ",.02)
+150 ;;00003-5154-05
+151 ;;9002226.02101,"1201,00003-5178-05 ",.01)
+152 ;;00003-5178-05
+153 ;;9002226.02101,"1201,00003-5178-05 ",.02)
+154 ;;00003-5178-05
+155 ;;9002226.02101,"1201,00003-5194-10 ",.01)
+156 ;;00003-5194-10
+157 ;;9002226.02101,"1201,00003-5194-10 ",.02)
+158 ;;00003-5194-10
+159 ;;9002226.02101,"1201,00003-5195-10 ",.01)
+160 ;;00003-5195-10
+161 ;;9002226.02101,"1201,00003-5195-10 ",.02)
+162 ;;00003-5195-10
+163 ;;9002226.02101,"1201,00006-0533-31 ",.01)
+164 ;;00006-0533-31
+165 ;;9002226.02101,"1201,00006-0533-31 ",.02)
+166 ;;00006-0533-31
+167 ;;9002226.02101,"1201,00006-0533-54 ",.01)
+168 ;;00006-0533-54
+169 ;;9002226.02101,"1201,00006-0533-54 ",.02)
+170 ;;00006-0533-54
+171 ;;9002226.02101,"1201,00006-0535-31 ",.01)
+172 ;;00006-0535-31
+173 ;;9002226.02101,"1201,00006-0535-31 ",.02)
+174 ;;00006-0535-31
+175 ;;9002226.02101,"1201,00006-0535-54 ",.01)
+176 ;;00006-0535-54
+177 ;;9002226.02101,"1201,00006-0535-54 ",.02)
+178 ;;00006-0535-54
+179 ;;9002226.02101,"1201,00006-0537-31 ",.01)
+180 ;;00006-0537-31
+181 ;;9002226.02101,"1201,00006-0537-31 ",.02)
+182 ;;00006-0537-31
+183 ;;9002226.02101,"1201,00006-0537-54 ",.01)
+184 ;;00006-0537-54
+185 ;;9002226.02101,"1201,00006-0537-54 ",.02)
+186 ;;00006-0537-54
+187 ;;9002226.02101,"1201,00006-0543-28 ",.01)
+188 ;;00006-0543-28
+189 ;;9002226.02101,"1201,00006-0543-28 ",.02)
+190 ;;00006-0543-28
+191 ;;9002226.02101,"1201,00006-0543-31 ",.01)
+192 ;;00006-0543-31
+193 ;;9002226.02101,"1201,00006-0543-31 ",.02)
+194 ;;00006-0543-31
+195 ;;9002226.02101,"1201,00006-0543-54 ",.01)
+196 ;;00006-0543-54
+197 ;;9002226.02101,"1201,00006-0543-54 ",.02)
+198 ;;00006-0543-54
+199 ;;9002226.02101,"1201,00006-0543-82 ",.01)
+200 ;;00006-0543-82
+201 ;;9002226.02101,"1201,00006-0543-82 ",.02)
+202 ;;00006-0543-82
+203 ;;9002226.02101,"1201,00006-0726-31 ",.01)
+204 ;;00006-0726-31
+205 ;;9002226.02101,"1201,00006-0726-31 ",.02)
+206 ;;00006-0726-31
+207 ;;9002226.02101,"1201,00006-0726-54 ",.01)
+208 ;;00006-0726-54
+209 ;;9002226.02101,"1201,00006-0726-54 ",.02)
+210 ;;00006-0726-54
+211 ;;9002226.02101,"1201,00006-0731-61 ",.01)
+212 ;;00006-0731-61
+213 ;;9002226.02101,"1201,00006-0731-61 ",.02)
+214 ;;00006-0731-61
+215 ;;9002226.02101,"1201,00006-0732-61 ",.01)
+216 ;;00006-0732-61
+217 ;;9002226.02101,"1201,00006-0732-61 ",.02)
+218 ;;00006-0732-61
+219 ;;9002226.02101,"1201,00006-0735-31 ",.01)
+220 ;;00006-0735-31
+221 ;;9002226.02101,"1201,00006-0735-31 ",.02)
+222 ;;00006-0735-31
+223 ;;9002226.02101,"1201,00006-0735-54 ",.01)
+224 ;;00006-0735-54
+225 ;;9002226.02101,"1201,00006-0735-54 ",.02)
+226 ;;00006-0735-54
+227 ;;9002226.02101,"1201,00006-0735-82 ",.01)
+228 ;;00006-0735-82
+229 ;;9002226.02101,"1201,00006-0735-82 ",.02)
+230 ;;00006-0735-82
+231 ;;9002226.02101,"1201,00006-0740-31 ",.01)
+232 ;;00006-0740-31
+233 ;;9002226.02101,"1201,00006-0740-31 ",.02)
+234 ;;00006-0740-31
+235 ;;9002226.02101,"1201,00006-0740-54 ",.01)
+236 ;;00006-0740-54
+237 ;;9002226.02101,"1201,00006-0740-54 ",.02)
+238 ;;00006-0740-54
+239 ;;9002226.02101,"1201,00006-0740-82 ",.01)
+240 ;;00006-0740-82
+241 ;;9002226.02101,"1201,00006-0740-82 ",.02)
+242 ;;00006-0740-82
+243 ;;9002226.02101,"1201,00006-0749-31 ",.01)
+244 ;;00006-0749-31
+245 ;;9002226.02101,"1201,00006-0749-31 ",.02)
+246 ;;00006-0749-31
+247 ;;9002226.02101,"1201,00006-0749-54 ",.01)
+248 ;;00006-0749-54
+249 ;;9002226.02101,"1201,00006-0749-54 ",.02)
+250 ;;00006-0749-54
+251 ;;9002226.02101,"1201,00006-0749-82 ",.01)
+252 ;;00006-0749-82
+253 ;;9002226.02101,"1201,00006-0749-82 ",.02)
+254 ;;00006-0749-82
+255 ;;9002226.02101,"1201,00006-0753-31 ",.01)
+256 ;;00006-0753-31
+257 ;;9002226.02101,"1201,00006-0753-31 ",.02)
+258 ;;00006-0753-31
+259 ;;9002226.02101,"1201,00006-0753-54 ",.01)
+260 ;;00006-0753-54
+261 ;;9002226.02101,"1201,00006-0753-54 ",.02)
+262 ;;00006-0753-54
+263 ;;9002226.02101,"1201,00006-0753-82 ",.01)
+264 ;;00006-0753-82
+265 ;;9002226.02101,"1201,00006-0753-82 ",.02)
+266 ;;00006-0753-82
+267 ;;9002226.02101,"1201,00006-0757-31 ",.01)
+268 ;;00006-0757-31
+269 ;;9002226.02101,"1201,00006-0757-31 ",.02)
+270 ;;00006-0757-31
+271 ;;9002226.02101,"1201,00006-0757-54 ",.01)
+272 ;;00006-0757-54
+273 ;;9002226.02101,"1201,00006-0757-54 ",.02)
+274 ;;00006-0757-54
+275 ;;9002226.02101,"1201,00006-0757-82 ",.01)
+276 ;;00006-0757-82
+277 ;;9002226.02101,"1201,00006-0757-82 ",.02)
+278 ;;00006-0757-82
+279 ;;9002226.02101,"1201,00006-0773-31 ",.01)
+280 ;;00006-0773-31
+281 ;;9002226.02101,"1201,00006-0773-31 ",.02)
+282 ;;00006-0773-31
+283 ;;9002226.02101,"1201,00006-0773-54 ",.01)
+284 ;;00006-0773-54
+285 ;;9002226.02101,"1201,00006-0773-54 ",.02)
+286 ;;00006-0773-54
+287 ;;9002226.02101,"1201,00006-0773-82 ",.01)
+288 ;;00006-0773-82
+289 ;;9002226.02101,"1201,00006-0773-82 ",.02)
+290 ;;00006-0773-82
+291 ;;9002226.02101,"1201,00069-2150-30 ",.01)
+292 ;;00069-2150-30
+293 ;;9002226.02101,"1201,00069-2150-30 ",.02)
+294 ;;00069-2150-30
+295 ;;9002226.02101,"1201,00069-2160-30 ",.01)
+296 ;;00069-2160-30
+297 ;;9002226.02101,"1201,00069-2160-30 ",.02)
+298 ;;00069-2160-30
+299 ;;9002226.02101,"1201,00069-2170-30 ",.01)
+300 ;;00069-2170-30
+301 ;;9002226.02101,"1201,00069-2170-30 ",.02)
+302 ;;00069-2170-30
+303 ;;9002226.02101,"1201,00069-2180-30 ",.01)
+304 ;;00069-2180-30
+305 ;;9002226.02101,"1201,00069-2180-30 ",.02)
+306 ;;00069-2180-30
+307 ;;9002226.02101,"1201,00069-2190-30 ",.01)
+308 ;;00069-2190-30
+309 ;;9002226.02101,"1201,00069-2190-30 ",.02)
+310 ;;00069-2190-30
+311 ;;9002226.02101,"1201,00069-2250-30 ",.01)
+312 ;;00069-2250-30
+313 ;;9002226.02101,"1201,00069-2250-30 ",.02)
+314 ;;00069-2250-30
+315 ;;9002226.02101,"1201,00069-2260-30 ",.01)
+316 ;;00069-2260-30
+317 ;;9002226.02101,"1201,00069-2260-30 ",.02)
+318 ;;00069-2260-30
+319 ;;9002226.02101,"1201,00069-2270-30 ",.01)
+320 ;;00069-2270-30
+321 ;;9002226.02101,"1201,00069-2270-30 ",.02)
+322 ;;00069-2270-30
+323 ;;9002226.02101,"1201,00069-2960-30 ",.01)
+324 ;;00069-2960-30
+325 ;;9002226.02101,"1201,00069-2960-30 ",.02)
+326 ;;00069-2960-30
+327 ;;9002226.02101,"1201,00069-2970-30 ",.01)
+328 ;;00069-2970-30
+329 ;;9002226.02101,"1201,00069-2970-30 ",.02)
+330 ;;00069-2970-30
+331 ;;9002226.02101,"1201,00069-2980-30 ",.01)
+332 ;;00069-2980-30
+333 ;;9002226.02101,"1201,00069-2980-30 ",.02)
+334 ;;00069-2980-30
+335 ;;9002226.02101,"1201,00071-0155-23 ",.01)
+336 ;;00071-0155-23
+337 ;;9002226.02101,"1201,00071-0155-23 ",.02)
+338 ;;00071-0155-23
+339 ;;9002226.02101,"1201,00071-0155-34 ",.01)
+340 ;;00071-0155-34
+341 ;;9002226.02101,"1201,00071-0155-34 ",.02)
+342 ;;00071-0155-34
+343 ;;9002226.02101,"1201,00071-0155-40 ",.01)
+344 ;;00071-0155-40
+345 ;;9002226.02101,"1201,00071-0155-40 ",.02)
+346 ;;00071-0155-40
+347 ;;9002226.02101,"1201,00071-0156-23 ",.01)
+348 ;;00071-0156-23
+349 ;;9002226.02101,"1201,00071-0156-23 ",.02)
+350 ;;00071-0156-23
+351 ;;9002226.02101,"1201,00071-0156-40 ",.01)
+352 ;;00071-0156-40
+353 ;;9002226.02101,"1201,00071-0156-40 ",.02)
+354 ;;00071-0156-40
+355 ;;9002226.02101,"1201,00071-0156-94 ",.01)
+356 ;;00071-0156-94
+357 ;;9002226.02101,"1201,00071-0156-94 ",.02)
+358 ;;00071-0156-94
+359 ;;9002226.02101,"1201,00071-0157-23 ",.01)
+360 ;;00071-0157-23
+361 ;;9002226.02101,"1201,00071-0157-23 ",.02)
+362 ;;00071-0157-23
+363 ;;9002226.02101,"1201,00071-0157-40 ",.01)
+364 ;;00071-0157-40
+365 ;;9002226.02101,"1201,00071-0157-40 ",.02)
+366 ;;00071-0157-40
+367 ;;9002226.02101,"1201,00071-0157-73 ",.01)
+368 ;;00071-0157-73
+369 ;;9002226.02101,"1201,00071-0157-73 ",.02)
+370 ;;00071-0157-73
+371 ;;9002226.02101,"1201,00071-0157-88 ",.01)
+372 ;;00071-0157-88
+373 ;;9002226.02101,"1201,00071-0157-88 ",.02)
+374 ;;00071-0157-88
+375 ;;9002226.02101,"1201,00071-0158-23 ",.01)
+376 ;;00071-0158-23
+377 ;;9002226.02101,"1201,00071-0158-23 ",.02)
+378 ;;00071-0158-23
+379 ;;9002226.02101,"1201,00071-0158-73 ",.01)
+380 ;;00071-0158-73
+381 ;;9002226.02101,"1201,00071-0158-73 ",.02)
+382 ;;00071-0158-73
+383 ;;9002226.02101,"1201,00071-0158-88 ",.01)
+384 ;;00071-0158-88
+385 ;;9002226.02101,"1201,00071-0158-88 ",.02)
+386 ;;00071-0158-88
+387 ;;9002226.02101,"1201,00071-0158-92 ",.01)
+388 ;;00071-0158-92
+389 ;;9002226.02101,"1201,00071-0158-92 ",.02)
+390 ;;00071-0158-92
+391 ;;9002226.02101,"1201,00074-3005-90 ",.01)
+392 ;;00074-3005-90
+393 ;;9002226.02101,"1201,00074-3005-90 ",.02)
+394 ;;00074-3005-90
+395 ;;9002226.02101,"1201,00074-3007-90 ",.01)
+396 ;;00074-3007-90
+397 ;;9002226.02101,"1201,00074-3007-90 ",.02)
+398 ;;00074-3007-90
+399 ;;9002226.02101,"1201,00074-3010-90 ",.01)
+400 ;;00074-3010-90
+401 ;;9002226.02101,"1201,00074-3010-90 ",.02)
+402 ;;00074-3010-90
+403 ;;9002226.02101,"1201,00074-3072-90 ",.01)
+404 ;;00074-3072-90
+405 ;;9002226.02101,"1201,00074-3072-90 ",.02)
+406 ;;00074-3072-90
+407 ;;9002226.02101,"1201,00074-3312-90 ",.01)
+408 ;;00074-3312-90
+409 ;;9002226.02101,"1201,00074-3312-90 ",.02)
+410 ;;00074-3312-90
+411 ;;9002226.02101,"1201,00074-3315-90 ",.01)
+412 ;;00074-3315-90
+413 ;;9002226.02101,"1201,00074-3315-90 ",.02)
+414 ;;00074-3315-90
+415 ;;9002226.02101,"1201,00074-3316-90 ",.01)
+416 ;;00074-3316-90
+417 ;;9002226.02101,"1201,00074-3316-90 ",.02)
+418 ;;00074-3316-90
+419 ;;9002226.02101,"1201,00074-3455-90 ",.01)
+420 ;;00074-3455-90
+421 ;;9002226.02101,"1201,00074-3455-90 ",.02)
+422 ;;00074-3455-90
+423 ;;9002226.02101,"1201,00074-3457-90 ",.01)
+424 ;;00074-3457-90
+425 ;;9002226.02101,"1201,00074-3457-90 ",.02)
+426 ;;00074-3457-90
+427 ;;9002226.02101,"1201,00074-3459-90 ",.01)
+428 ;;00074-3459-90
+429 ;;9002226.02101,"1201,00074-3459-90 ",.02)
+430 ;;00074-3459-90
+431 ;;9002226.02101,"1201,00078-0176-05 ",.01)
+432 ;;00078-0176-05
+433 ;;9002226.02101,"1201,00078-0176-05 ",.02)
+434 ;;00078-0176-05
+435 ;;9002226.02101,"1201,00078-0176-15 ",.01)
+436 ;;00078-0176-15
+437 ;;9002226.02101,"1201,00078-0176-15 ",.02)
+438 ;;00078-0176-15
+439 ;;9002226.02101,"1201,00078-0234-05 ",.01)
+440 ;;00078-0234-05
+441 ;;9002226.02101,"1201,00078-0234-05 ",.02)
+442 ;;00078-0234-05
+443 ;;9002226.02101,"1201,00078-0234-15 ",.01)
+444 ;;00078-0234-15
+445 ;;9002226.02101,"1201,00078-0234-15 ",.02)
+446 ;;00078-0234-15
+447 ;;9002226.02101,"1201,00078-0354-05 ",.01)
+448 ;;00078-0354-05
+449 ;;9002226.02101,"1201,00078-0354-05 ",.02)
+450 ;;00078-0354-05
+451 ;;9002226.02101,"1201,00078-0354-15 ",.01)
+452 ;;00078-0354-15
+453 ;;9002226.02101,"1201,00078-0354-15 ",.02)
+454 ;;00078-0354-15
+455 ;;9002226.02101,"1201,00093-0576-06 ",.01)
+456 ;;00093-0576-06
+457 ;;9002226.02101,"1201,00093-0576-06 ",.02)
+458 ;;00093-0576-06
+459 ;;9002226.02101,"1201,00093-0576-10 ",.01)
+460 ;;00093-0576-10
+461 ;;9002226.02101,"1201,00093-0576-10 ",.02)
+462 ;;00093-0576-10
+463 ;;9002226.02101,"1201,00093-0576-19 ",.01)
+464 ;;00093-0576-19
+465 ;;9002226.02101,"1201,00093-0576-19 ",.02)
+466 ;;00093-0576-19
+467 ;;9002226.02101,"1201,00093-0576-93 ",.01)
+468 ;;00093-0576-93
+469 ;;9002226.02101,"1201,00093-0576-93 ",.02)
+470 ;;00093-0576-93
+471 ;;9002226.02101,"1201,00093-0771-10 ",.01)
+472 ;;00093-0771-10
+473 ;;9002226.02101,"1201,00093-0771-10 ",.02)
+474 ;;00093-0771-10
+475 ;;9002226.02101,"1201,00093-0771-98 ",.01)
+476 ;;00093-0771-98
+477 ;;9002226.02101,"1201,00093-0771-98 ",.02)
+478 ;;00093-0771-98
+479 ;;9002226.02101,"1201,00093-0926-06 ",.01)
+480 ;;00093-0926-06
+481 ;;9002226.02101,"1201,00093-0926-06 ",.02)
+482 ;;00093-0926-06
+483 ;;9002226.02101,"1201,00093-0926-10 ",.01)
+484 ;;00093-0926-10
+485 ;;9002226.02101,"1201,00093-0926-10 ",.02)
+486 ;;00093-0926-10
+487 ;;9002226.02101,"1201,00093-0926-19 ",.01)
+488 ;;00093-0926-19
+489 ;;9002226.02101,"1201,00093-0926-19 ",.02)
+490 ;;00093-0926-19
+491 ;;9002226.02101,"1201,00093-0926-93 ",.01)
+492 ;;00093-0926-93
+493 ;;9002226.02101,"1201,00093-0926-93 ",.02)
+494 ;;00093-0926-93
+495 ;;9002226.02101,"1201,00093-0928-06 ",.01)
+496 ;;00093-0928-06
+497 ;;9002226.02101,"1201,00093-0928-06 ",.02)
+498 ;;00093-0928-06
