Routine: BGP71X7

BGP71X7 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 11, 2016 ;

 ;;17.1;IHS CLINICAL REPORTING;;MAY 10, 2017;Build 29

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

TMP ;;TAXONOMY (WITH BULLETIN)

 ;;9002226.02101,"1222,33261-0892-00 ",.02)

 ;;33261-0892-00

 ;;9002226.02101,"1222,33261-0892-30 ",.01)

 ;;33261-0892-30

 ;;9002226.02101,"1222,33261-0892-30 ",.02)

 ;;33261-0892-30

 ;;9002226.02101,"1222,33261-0892-60 ",.01)

 ;;33261-0892-60

 ;;9002226.02101,"1222,33261-0892-60 ",.02)

 ;;33261-0892-60

 ;;9002226.02101,"1222,33261-0892-90 ",.01)

 ;;33261-0892-90

 ;;9002226.02101,"1222,33261-0892-90 ",.02)

 ;;33261-0892-90

 ;;9002226.02101,"1222,33261-0961-30 ",.01)

 ;;33261-0961-30

 ;;9002226.02101,"1222,33261-0961-30 ",.02)

 ;;33261-0961-30

 ;;9002226.02101,"1222,33261-0961-60 ",.01)

 ;;33261-0961-60

 ;;9002226.02101,"1222,33261-0961-60 ",.02)

 ;;33261-0961-60

 ;;9002226.02101,"1222,33261-0961-90 ",.01)

 ;;33261-0961-90

 ;;9002226.02101,"1222,33261-0961-90 ",.02)

 ;;33261-0961-90

 ;;9002226.02101,"1222,33358-0157-30 ",.01)

 ;;33358-0157-30

 ;;9002226.02101,"1222,33358-0157-30 ",.02)

 ;;33358-0157-30

 ;;9002226.02101,"1222,33358-0157-60 ",.01)

 ;;33358-0157-60

 ;;9002226.02101,"1222,33358-0157-60 ",.02)

 ;;33358-0157-60

 ;;9002226.02101,"1222,33358-0158-00 ",.01)

 ;;33358-0158-00

 ;;9002226.02101,"1222,33358-0158-00 ",.02)

 ;;33358-0158-00

 ;;9002226.02101,"1222,33358-0158-30 ",.01)

 ;;33358-0158-30

 ;;9002226.02101,"1222,33358-0158-30 ",.02)

 ;;33358-0158-30

 ;;9002226.02101,"1222,33358-0158-60 ",.01)

 ;;33358-0158-60

 ;;9002226.02101,"1222,33358-0158-60 ",.02)

 ;;33358-0158-60

 ;;9002226.02101,"1222,33358-0160-30 ",.01)

 ;;33358-0160-30

 ;;9002226.02101,"1222,33358-0160-30 ",.02)

 ;;33358-0160-30

 ;;9002226.02101,"1222,33358-0160-60 ",.01)

 ;;33358-0160-60

 ;;9002226.02101,"1222,33358-0160-60 ",.02)

 ;;33358-0160-60

 ;;9002226.02101,"1222,33358-0161-01 ",.01)

 ;;33358-0161-01

 ;;9002226.02101,"1222,33358-0161-01 ",.02)

 ;;33358-0161-01

 ;;9002226.02101,"1222,33358-0161-30 ",.01)

 ;;33358-0161-30

 ;;9002226.02101,"1222,33358-0161-30 ",.02)

 ;;33358-0161-30

 ;;9002226.02101,"1222,33358-0161-60 ",.01)

 ;;33358-0161-60

 ;;9002226.02101,"1222,33358-0161-60 ",.02)

 ;;33358-0161-60

 ;;9002226.02101,"1222,33358-0161-90 ",.01)

 ;;33358-0161-90

 ;;9002226.02101,"1222,33358-0161-90 ",.02)

 ;;33358-0161-90

 ;;9002226.02101,"1222,35356-0099-60 ",.01)

 ;;35356-0099-60

 ;;9002226.02101,"1222,35356-0099-60 ",.02)

 ;;35356-0099-60

 ;;9002226.02101,"1222,35356-0121-90 ",.01)

 ;;35356-0121-90

 ;;9002226.02101,"1222,35356-0121-90 ",.02)

 ;;35356-0121-90

 ;;9002226.02101,"1222,35356-0360-30 ",.01)

 ;;35356-0360-30

 ;;9002226.02101,"1222,35356-0360-30 ",.02)

 ;;35356-0360-30

 ;;9002226.02101,"1222,35356-0360-60 ",.01)

 ;;35356-0360-60

 ;;9002226.02101,"1222,35356-0360-60 ",.02)

 ;;35356-0360-60

 ;;9002226.02101,"1222,35356-0360-90 ",.01)

 ;;35356-0360-90

 ;;9002226.02101,"1222,35356-0360-90 ",.02)

 ;;35356-0360-90

 ;;9002226.02101,"1222,35356-0875-30 ",.01)

 ;;35356-0875-30

 ;;9002226.02101,"1222,35356-0875-30 ",.02)

 ;;35356-0875-30

 ;;9002226.02101,"1222,35356-0875-60 ",.01)

 ;;35356-0875-60

 ;;9002226.02101,"1222,35356-0875-60 ",.02)

 ;;35356-0875-60

 ;;9002226.02101,"1222,35356-0896-30 ",.01)

 ;;35356-0896-30

 ;;9002226.02101,"1222,35356-0896-30 ",.02)

 ;;35356-0896-30

 ;;9002226.02101,"1222,35356-0897-30 ",.01)

 ;;35356-0897-30

 ;;9002226.02101,"1222,35356-0897-30 ",.02)

 ;;35356-0897-30

 ;;9002226.02101,"1222,35356-0897-60 ",.01)

 ;;35356-0897-60

 ;;9002226.02101,"1222,35356-0897-60 ",.02)

 ;;35356-0897-60

 ;;9002226.02101,"1222,35356-0897-90 ",.01)

 ;;35356-0897-90

 ;;9002226.02101,"1222,35356-0897-90 ",.02)

 ;;35356-0897-90

 ;;9002226.02101,"1222,35356-0899-30 ",.01)

 ;;35356-0899-30

 ;;9002226.02101,"1222,35356-0899-30 ",.02)

 ;;35356-0899-30

 ;;9002226.02101,"1222,35356-0899-60 ",.01)

 ;;35356-0899-60

 ;;9002226.02101,"1222,35356-0899-60 ",.02)

 ;;35356-0899-60

 ;;9002226.02101,"1222,35356-0899-90 ",.01)

 ;;35356-0899-90

 ;;9002226.02101,"1222,35356-0899-90 ",.02)

 ;;35356-0899-90

 ;;9002226.02101,"1222,35356-0931-30 ",.01)

 ;;35356-0931-30

 ;;9002226.02101,"1222,35356-0931-30 ",.02)

 ;;35356-0931-30

 ;;9002226.02101,"1222,35356-0931-60 ",.01)

 ;;35356-0931-60

 ;;9002226.02101,"1222,35356-0931-60 ",.02)

 ;;35356-0931-60

 ;;9002226.02101,"1222,35356-0931-90 ",.01)

 ;;35356-0931-90

 ;;9002226.02101,"1222,35356-0931-90 ",.02)

 ;;35356-0931-90

 ;;9002226.02101,"1222,35356-0932-30 ",.01)

 ;;35356-0932-30

 ;;9002226.02101,"1222,35356-0932-30 ",.02)

 ;;35356-0932-30

 ;;9002226.02101,"1222,35356-0932-60 ",.01)

 ;;35356-0932-60

 ;;9002226.02101,"1222,35356-0932-60 ",.02)

 ;;35356-0932-60

 ;;9002226.02101,"1222,35356-0932-90 ",.01)

 ;;35356-0932-90

 ;;9002226.02101,"1222,35356-0932-90 ",.02)

 ;;35356-0932-90

 ;;9002226.02101,"1222,35356-0970-30 ",.01)

 ;;35356-0970-30

 ;;9002226.02101,"1222,35356-0970-30 ",.02)

 ;;35356-0970-30

 ;;9002226.02101,"1222,35356-0970-60 ",.01)

 ;;35356-0970-60

 ;;9002226.02101,"1222,35356-0970-60 ",.02)

 ;;35356-0970-60

 ;;9002226.02101,"1222,35356-0970-90 ",.01)

 ;;35356-0970-90

 ;;9002226.02101,"1222,35356-0970-90 ",.02)

 ;;35356-0970-90

 ;;9002226.02101,"1222,35356-0995-30 ",.01)

 ;;35356-0995-30

 ;;9002226.02101,"1222,35356-0995-30 ",.02)

 ;;35356-0995-30

 ;;9002226.02101,"1222,35356-0995-60 ",.01)

 ;;35356-0995-60

 ;;9002226.02101,"1222,35356-0995-60 ",.02)

 ;;35356-0995-60

 ;;9002226.02101,"1222,35356-0995-90 ",.01)

 ;;35356-0995-90

 ;;9002226.02101,"1222,35356-0995-90 ",.02)

 ;;35356-0995-90

 ;;9002226.02101,"1222,42254-0071-30 ",.01)

 ;;42254-0071-30

 ;;9002226.02101,"1222,42254-0071-30 ",.02)

 ;;42254-0071-30

 ;;9002226.02101,"1222,42254-0090-60 ",.01)

 ;;42254-0090-60

 ;;9002226.02101,"1222,42254-0090-60 ",.02)

 ;;42254-0090-60

 ;;9002226.02101,"1222,42254-0281-30 ",.01)

 ;;42254-0281-30

 ;;9002226.02101,"1222,42254-0281-30 ",.02)

 ;;42254-0281-30

 ;;9002226.02101,"1222,42254-0281-90 ",.01)

 ;;42254-0281-90

 ;;9002226.02101,"1222,42254-0281-90 ",.02)

 ;;42254-0281-90

 ;;9002226.02101,"1222,42291-0305-01 ",.01)

 ;;42291-0305-01

 ;;9002226.02101,"1222,42291-0305-01 ",.02)

 ;;42291-0305-01

 ;;9002226.02101,"1222,42291-0306-01 ",.01)

 ;;42291-0306-01

 ;;9002226.02101,"1222,42291-0306-01 ",.02)

 ;;42291-0306-01

 ;;9002226.02101,"1222,42291-0316-50 ",.01)

 ;;42291-0316-50

 ;;9002226.02101,"1222,42291-0316-50 ",.02)

 ;;42291-0316-50

 ;;9002226.02101,"1222,42291-0317-10 ",.01)

 ;;42291-0317-10

 ;;9002226.02101,"1222,42291-0317-10 ",.02)

 ;;42291-0317-10

 ;;9002226.02101,"1222,42549-0498-30 ",.01)

 ;;42549-0498-30

 ;;9002226.02101,"1222,42549-0498-30 ",.02)

 ;;42549-0498-30

 ;;9002226.02101,"1222,42549-0499-30 ",.01)

 ;;42549-0499-30

 ;;9002226.02101,"1222,42549-0499-30 ",.02)

 ;;42549-0499-30

 ;;9002226.02101,"1222,42571-0100-01 ",.01)

 ;;42571-0100-01

 ;;9002226.02101,"1222,42571-0100-01 ",.02)

 ;;42571-0100-01

 ;;9002226.02101,"1222,42571-0100-05 ",.01)

 ;;42571-0100-05

 ;;9002226.02101,"1222,42571-0100-05 ",.02)

 ;;42571-0100-05

 ;;9002226.02101,"1222,42571-0101-01 ",.01)

 ;;42571-0101-01

 ;;9002226.02101,"1222,42571-0101-01 ",.02)

 ;;42571-0101-01

 ;;9002226.02101,"1222,42571-0101-05 ",.01)

 ;;42571-0101-05

 ;;9002226.02101,"1222,42571-0101-05 ",.02)

 ;;42571-0101-05

 ;;9002226.02101,"1222,42571-0103-01 ",.01)

 ;;42571-0103-01

 ;;9002226.02101,"1222,42571-0103-01 ",.02)

 ;;42571-0103-01

 ;;9002226.02101,"1222,42571-0103-05 ",.01)

 ;;42571-0103-05

 ;;9002226.02101,"1222,42571-0103-05 ",.02)

 ;;42571-0103-05

 ;;9002226.02101,"1222,43063-0034-30 ",.01)

 ;;43063-0034-30

 ;;9002226.02101,"1222,43063-0034-30 ",.02)

 ;;43063-0034-30

 ;;9002226.02101,"1222,43063-0034-90 ",.01)

 ;;43063-0034-90

 ;;9002226.02101,"1222,43063-0034-90 ",.02)

 ;;43063-0034-90

 ;;9002226.02101,"1222,43063-0119-90 ",.01)

 ;;43063-0119-90

 ;;9002226.02101,"1222,43063-0119-90 ",.02)

 ;;43063-0119-90

 ;;9002226.02101,"1222,43063-0120-90 ",.01)

 ;;43063-0120-90

 ;;9002226.02101,"1222,43063-0120-90 ",.02)

 ;;43063-0120-90

 ;;9002226.02101,"1222,43063-0121-30 ",.01)

 ;;43063-0121-30

 ;;9002226.02101,"1222,43063-0121-30 ",.02)

 ;;43063-0121-30

 ;;9002226.02101,"1222,43063-0121-90 ",.01)

 ;;43063-0121-90

 ;;9002226.02101,"1222,43063-0121-90 ",.02)

 ;;43063-0121-90

 ;;9002226.02101,"1222,43063-0122-30 ",.01)

 ;;43063-0122-30

 ;;9002226.02101,"1222,43063-0122-30 ",.02)

 ;;43063-0122-30

 ;;9002226.02101,"1222,43063-0122-90 ",.01)

 ;;43063-0122-90

 ;;9002226.02101,"1222,43063-0122-90 ",.02)

 ;;43063-0122-90

 ;;9002226.02101,"1222,43063-0397-86 ",.01)

 ;;43063-0397-86

 ;;9002226.02101,"1222,43063-0397-86 ",.02)

 ;;43063-0397-86

 ;;9002226.02101,"1222,43063-0433-14 ",.01)

 ;;43063-0433-14

 ;;9002226.02101,"1222,43063-0433-14 ",.02)

 ;;43063-0433-14

 ;;9002226.02101,"1222,43063-0433-30 ",.01)

 ;;43063-0433-30

 ;;9002226.02101,"1222,43063-0433-30 ",.02)

 ;;43063-0433-30

 ;;9002226.02101,"1222,43063-0433-86 ",.01)

 ;;43063-0433-86

 ;;9002226.02101,"1222,43063-0433-86 ",.02)

 ;;43063-0433-86

 ;;9002226.02101,"1222,43063-0433-90 ",.01)

 ;;43063-0433-90

 ;;9002226.02101,"1222,43063-0433-90 ",.02)

 ;;43063-0433-90

 ;;9002226.02101,"1222,43063-0433-93 ",.01)

 ;;43063-0433-93

 ;;9002226.02101,"1222,43063-0433-93 ",.02)

 ;;43063-0433-93

 ;;9002226.02101,"1222,43063-0587-90 ",.01)

 ;;43063-0587-90

 ;;9002226.02101,"1222,43063-0587-90 ",.02)

 ;;43063-0587-90

 ;;9002226.02101,"1222,43353-0369-53 ",.01)

 ;;43353-0369-53

 ;;9002226.02101,"1222,43353-0369-53 ",.02)

 ;;43353-0369-53

 ;;9002226.02101,"1222,43353-0369-60 ",.01)

 ;;43353-0369-60

 ;;9002226.02101,"1222,43353-0369-60 ",.02)

 ;;43353-0369-60

 ;;9002226.02101,"1222,43353-0369-70 ",.01)

 ;;43353-0369-70

 ;;9002226.02101,"1222,43353-0369-70 ",.02)

 ;;43353-0369-70

 ;;9002226.02101,"1222,43353-0369-80 ",.01)

 ;;43353-0369-80

 ;;9002226.02101,"1222,43353-0369-80 ",.02)

 ;;43353-0369-80

 ;;9002226.02101,"1222,43353-0369-92 ",.01)

 ;;43353-0369-92

 ;;9002226.02101,"1222,43353-0369-92 ",.02)

 ;;43353-0369-92

 ;;9002226.02101,"1222,43353-0369-94 ",.01)

 ;;43353-0369-94

 ;;9002226.02101,"1222,43353-0369-94 ",.02)

 ;;43353-0369-94

 ;;9002226.02101,"1222,43353-0379-60 ",.01)

 ;;43353-0379-60

 ;;9002226.02101,"1222,43353-0379-60 ",.02)

 ;;43353-0379-60

 ;;9002226.02101,"1222,43353-0379-73 ",.01)

 ;;43353-0379-73

 ;;9002226.02101,"1222,43353-0379-73 ",.02)

 ;;43353-0379-73

 ;;9002226.02101,"1222,43353-0379-80 ",.01)

 ;;43353-0379-80

 ;;9002226.02101,"1222,43353-0379-80 ",.02)

 ;;43353-0379-80

 ;;9002226.02101,"1222,43353-0379-92 ",.01)

 ;;43353-0379-92

 ;;9002226.02101,"1222,43353-0379-92 ",.02)

 ;;43353-0379-92

 ;;9002226.02101,"1222,43353-0379-98 ",.01)

 ;;43353-0379-98

 ;;9002226.02101,"1222,43353-0379-98 ",.02)

 ;;43353-0379-98

 ;;9002226.02101,"1222,43353-0582-80 ",.01)

 ;;43353-0582-80

 ;;9002226.02101,"1222,43353-0582-80 ",.02)

 ;;43353-0582-80

 ;;9002226.02101,"1222,43353-0656-53 ",.01)

 ;;43353-0656-53

 ;;9002226.02101,"1222,43353-0656-53 ",.02)

 ;;43353-0656-53

 ;;9002226.02101,"1222,43353-0656-60 ",.01)

 ;;43353-0656-60

 ;;9002226.02101,"1222,43353-0656-60 ",.02)

 ;;43353-0656-60

 ;;9002226.02101,"1222,43353-0656-70 ",.01)

 ;;43353-0656-70

 ;;9002226.02101,"1222,43353-0656-70 ",.02)

 ;;43353-0656-70

 ;;9002226.02101,"1222,43353-0656-80 ",.01)

 ;;43353-0656-80

 ;;9002226.02101,"1222,43353-0656-80 ",.02)

 ;;43353-0656-80

 ;;9002226.02101,"1222,43353-0656-90 ",.01)

 ;;43353-0656-90

 ;;9002226.02101,"1222,43353-0656-90 ",.02)

 ;;43353-0656-90

 ;;9002226.02101,"1222,43353-0656-92 ",.01)

 ;;43353-0656-92

 ;;9002226.02101,"1222,43353-0656-92 ",.02)

 ;;43353-0656-92

 ;;9002226.02101,"1222,43353-0656-94 ",.01)

 ;;43353-0656-94

 ;;9002226.02101,"1222,43353-0656-94 ",.02)

 ;;43353-0656-94

 ;;9002226.02101,"1222,43353-0659-60 ",.01)

 ;;43353-0659-60

 ;;9002226.02101,"1222,43353-0659-60 ",.02)

 ;;43353-0659-60

BGP71X7   ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 11, 2016 ;

 +1       ;;17.1;IHS CLINICAL REPORTING;;MAY 10, 2017;Build 29

 +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       ;;9002226.02101,"1222,33261-0892-00 ",.02)

 +2       ;;33261-0892-00

 +3       ;;9002226.02101,"1222,33261-0892-30 ",.01)

 +4       ;;33261-0892-30

 +5       ;;9002226.02101,"1222,33261-0892-30 ",.02)

 +6       ;;33261-0892-30

 +7       ;;9002226.02101,"1222,33261-0892-60 ",.01)

 +8       ;;33261-0892-60

 +9       ;;9002226.02101,"1222,33261-0892-60 ",.02)

 +10      ;;33261-0892-60

 +11      ;;9002226.02101,"1222,33261-0892-90 ",.01)

 +12      ;;33261-0892-90

 +13      ;;9002226.02101,"1222,33261-0892-90 ",.02)

 +14      ;;33261-0892-90

 +15      ;;9002226.02101,"1222,33261-0961-30 ",.01)

 +16      ;;33261-0961-30

 +17      ;;9002226.02101,"1222,33261-0961-30 ",.02)

 +18      ;;33261-0961-30

 +19      ;;9002226.02101,"1222,33261-0961-60 ",.01)

 +20      ;;33261-0961-60

 +21      ;;9002226.02101,"1222,33261-0961-60 ",.02)

 +22      ;;33261-0961-60

 +23      ;;9002226.02101,"1222,33261-0961-90 ",.01)

 +24      ;;33261-0961-90

 +25      ;;9002226.02101,"1222,33261-0961-90 ",.02)

 +26      ;;33261-0961-90

 +27      ;;9002226.02101,"1222,33358-0157-30 ",.01)

 +28      ;;33358-0157-30

 +29      ;;9002226.02101,"1222,33358-0157-30 ",.02)

 +30      ;;33358-0157-30

 +31      ;;9002226.02101,"1222,33358-0157-60 ",.01)

 +32      ;;33358-0157-60

 +33      ;;9002226.02101,"1222,33358-0157-60 ",.02)

 +34      ;;33358-0157-60

 +35      ;;9002226.02101,"1222,33358-0158-00 ",.01)

 +36      ;;33358-0158-00

 +37      ;;9002226.02101,"1222,33358-0158-00 ",.02)

 +38      ;;33358-0158-00

 +39      ;;9002226.02101,"1222,33358-0158-30 ",.01)

 +40      ;;33358-0158-30

 +41      ;;9002226.02101,"1222,33358-0158-30 ",.02)

 +42      ;;33358-0158-30

 +43      ;;9002226.02101,"1222,33358-0158-60 ",.01)

 +44      ;;33358-0158-60

 +45      ;;9002226.02101,"1222,33358-0158-60 ",.02)

 +46      ;;33358-0158-60

 +47      ;;9002226.02101,"1222,33358-0160-30 ",.01)

 +48      ;;33358-0160-30

 +49      ;;9002226.02101,"1222,33358-0160-30 ",.02)

 +50      ;;33358-0160-30

 +51      ;;9002226.02101,"1222,33358-0160-60 ",.01)

 +52      ;;33358-0160-60

 +53      ;;9002226.02101,"1222,33358-0160-60 ",.02)

 +54      ;;33358-0160-60

 +55      ;;9002226.02101,"1222,33358-0161-01 ",.01)

 +56      ;;33358-0161-01

 +57      ;;9002226.02101,"1222,33358-0161-01 ",.02)

 +58      ;;33358-0161-01

 +59      ;;9002226.02101,"1222,33358-0161-30 ",.01)

 +60      ;;33358-0161-30

 +61      ;;9002226.02101,"1222,33358-0161-30 ",.02)

 +62      ;;33358-0161-30

 +63      ;;9002226.02101,"1222,33358-0161-60 ",.01)

 +64      ;;33358-0161-60

 +65      ;;9002226.02101,"1222,33358-0161-60 ",.02)

 +66      ;;33358-0161-60

 +67      ;;9002226.02101,"1222,33358-0161-90 ",.01)

 +68      ;;33358-0161-90

 +69      ;;9002226.02101,"1222,33358-0161-90 ",.02)

 +70      ;;33358-0161-90

 +71      ;;9002226.02101,"1222,35356-0099-60 ",.01)

 +72      ;;35356-0099-60

 +73      ;;9002226.02101,"1222,35356-0099-60 ",.02)

 +74      ;;35356-0099-60

 +75      ;;9002226.02101,"1222,35356-0121-90 ",.01)

 +76      ;;35356-0121-90

 +77      ;;9002226.02101,"1222,35356-0121-90 ",.02)

 +78      ;;35356-0121-90

 +79      ;;9002226.02101,"1222,35356-0360-30 ",.01)

 +80      ;;35356-0360-30

 +81      ;;9002226.02101,"1222,35356-0360-30 ",.02)

 +82      ;;35356-0360-30

 +83      ;;9002226.02101,"1222,35356-0360-60 ",.01)

 +84      ;;35356-0360-60

 +85      ;;9002226.02101,"1222,35356-0360-60 ",.02)

 +86      ;;35356-0360-60

 +87      ;;9002226.02101,"1222,35356-0360-90 ",.01)

 +88      ;;35356-0360-90

 +89      ;;9002226.02101,"1222,35356-0360-90 ",.02)

 +90      ;;35356-0360-90

 +91      ;;9002226.02101,"1222,35356-0875-30 ",.01)

 +92      ;;35356-0875-30

 +93      ;;9002226.02101,"1222,35356-0875-30 ",.02)

 +94      ;;35356-0875-30

 +95      ;;9002226.02101,"1222,35356-0875-60 ",.01)

 +96      ;;35356-0875-60

 +97      ;;9002226.02101,"1222,35356-0875-60 ",.02)

 +98      ;;35356-0875-60

 +99      ;;9002226.02101,"1222,35356-0896-30 ",.01)

 +100     ;;35356-0896-30

 +101     ;;9002226.02101,"1222,35356-0896-30 ",.02)

 +102     ;;35356-0896-30

 +103     ;;9002226.02101,"1222,35356-0897-30 ",.01)

 +104     ;;35356-0897-30

 +105     ;;9002226.02101,"1222,35356-0897-30 ",.02)

 +106     ;;35356-0897-30

 +107     ;;9002226.02101,"1222,35356-0897-60 ",.01)

 +108     ;;35356-0897-60

 +109     ;;9002226.02101,"1222,35356-0897-60 ",.02)

 +110     ;;35356-0897-60

 +111     ;;9002226.02101,"1222,35356-0897-90 ",.01)

 +112     ;;35356-0897-90

 +113     ;;9002226.02101,"1222,35356-0897-90 ",.02)

 +114     ;;35356-0897-90

 +115     ;;9002226.02101,"1222,35356-0899-30 ",.01)

 +116     ;;35356-0899-30

 +117     ;;9002226.02101,"1222,35356-0899-30 ",.02)

 +118     ;;35356-0899-30

 +119     ;;9002226.02101,"1222,35356-0899-60 ",.01)

 +120     ;;35356-0899-60

 +121     ;;9002226.02101,"1222,35356-0899-60 ",.02)

 +122     ;;35356-0899-60

 +123     ;;9002226.02101,"1222,35356-0899-90 ",.01)

 +124     ;;35356-0899-90

 +125     ;;9002226.02101,"1222,35356-0899-90 ",.02)

 +126     ;;35356-0899-90

 +127     ;;9002226.02101,"1222,35356-0931-30 ",.01)

 +128     ;;35356-0931-30

 +129     ;;9002226.02101,"1222,35356-0931-30 ",.02)

 +130     ;;35356-0931-30

 +131     ;;9002226.02101,"1222,35356-0931-60 ",.01)

 +132     ;;35356-0931-60

 +133     ;;9002226.02101,"1222,35356-0931-60 ",.02)

 +134     ;;35356-0931-60

 +135     ;;9002226.02101,"1222,35356-0931-90 ",.01)

 +136     ;;35356-0931-90

 +137     ;;9002226.02101,"1222,35356-0931-90 ",.02)

 +138     ;;35356-0931-90

 +139     ;;9002226.02101,"1222,35356-0932-30 ",.01)

 +140     ;;35356-0932-30

 +141     ;;9002226.02101,"1222,35356-0932-30 ",.02)

 +142     ;;35356-0932-30

 +143     ;;9002226.02101,"1222,35356-0932-60 ",.01)

 +144     ;;35356-0932-60

 +145     ;;9002226.02101,"1222,35356-0932-60 ",.02)

 +146     ;;35356-0932-60

 +147     ;;9002226.02101,"1222,35356-0932-90 ",.01)

 +148     ;;35356-0932-90

 +149     ;;9002226.02101,"1222,35356-0932-90 ",.02)

 +150     ;;35356-0932-90

 +151     ;;9002226.02101,"1222,35356-0970-30 ",.01)

 +152     ;;35356-0970-30

 +153     ;;9002226.02101,"1222,35356-0970-30 ",.02)

 +154     ;;35356-0970-30

 +155     ;;9002226.02101,"1222,35356-0970-60 ",.01)

 +156     ;;35356-0970-60

 +157     ;;9002226.02101,"1222,35356-0970-60 ",.02)

 +158     ;;35356-0970-60

 +159     ;;9002226.02101,"1222,35356-0970-90 ",.01)

 +160     ;;35356-0970-90

 +161     ;;9002226.02101,"1222,35356-0970-90 ",.02)

 +162     ;;35356-0970-90

 +163     ;;9002226.02101,"1222,35356-0995-30 ",.01)

 +164     ;;35356-0995-30

 +165     ;;9002226.02101,"1222,35356-0995-30 ",.02)

 +166     ;;35356-0995-30

 +167     ;;9002226.02101,"1222,35356-0995-60 ",.01)

 +168     ;;35356-0995-60

 +169     ;;9002226.02101,"1222,35356-0995-60 ",.02)

 +170     ;;35356-0995-60

 +171     ;;9002226.02101,"1222,35356-0995-90 ",.01)

 +172     ;;35356-0995-90

 +173     ;;9002226.02101,"1222,35356-0995-90 ",.02)

 +174     ;;35356-0995-90

 +175     ;;9002226.02101,"1222,42254-0071-30 ",.01)

 +176     ;;42254-0071-30

 +177     ;;9002226.02101,"1222,42254-0071-30 ",.02)

 +178     ;;42254-0071-30

 +179     ;;9002226.02101,"1222,42254-0090-60 ",.01)

 +180     ;;42254-0090-60

 +181     ;;9002226.02101,"1222,42254-0090-60 ",.02)

 +182     ;;42254-0090-60

 +183     ;;9002226.02101,"1222,42254-0281-30 ",.01)

 +184     ;;42254-0281-30

 +185     ;;9002226.02101,"1222,42254-0281-30 ",.02)

 +186     ;;42254-0281-30

 +187     ;;9002226.02101,"1222,42254-0281-90 ",.01)

 +188     ;;42254-0281-90

 +189     ;;9002226.02101,"1222,42254-0281-90 ",.02)

 +190     ;;42254-0281-90

 +191     ;;9002226.02101,"1222,42291-0305-01 ",.01)

 +192     ;;42291-0305-01

 +193     ;;9002226.02101,"1222,42291-0305-01 ",.02)

 +194     ;;42291-0305-01

 +195     ;;9002226.02101,"1222,42291-0306-01 ",.01)

 +196     ;;42291-0306-01

 +197     ;;9002226.02101,"1222,42291-0306-01 ",.02)

 +198     ;;42291-0306-01

 +199     ;;9002226.02101,"1222,42291-0316-50 ",.01)

 +200     ;;42291-0316-50

 +201     ;;9002226.02101,"1222,42291-0316-50 ",.02)

 +202     ;;42291-0316-50

 +203     ;;9002226.02101,"1222,42291-0317-10 ",.01)

 +204     ;;42291-0317-10

 +205     ;;9002226.02101,"1222,42291-0317-10 ",.02)

 +206     ;;42291-0317-10

 +207     ;;9002226.02101,"1222,42549-0498-30 ",.01)

 +208     ;;42549-0498-30

 +209     ;;9002226.02101,"1222,42549-0498-30 ",.02)

 +210     ;;42549-0498-30

 +211     ;;9002226.02101,"1222,42549-0499-30 ",.01)

 +212     ;;42549-0499-30

 +213     ;;9002226.02101,"1222,42549-0499-30 ",.02)

 +214     ;;42549-0499-30

 +215     ;;9002226.02101,"1222,42571-0100-01 ",.01)

 +216     ;;42571-0100-01

 +217     ;;9002226.02101,"1222,42571-0100-01 ",.02)

 +218     ;;42571-0100-01

 +219     ;;9002226.02101,"1222,42571-0100-05 ",.01)

 +220     ;;42571-0100-05

 +221     ;;9002226.02101,"1222,42571-0100-05 ",.02)

 +222     ;;42571-0100-05

 +223     ;;9002226.02101,"1222,42571-0101-01 ",.01)

 +224     ;;42571-0101-01

 +225     ;;9002226.02101,"1222,42571-0101-01 ",.02)

 +226     ;;42571-0101-01

 +227     ;;9002226.02101,"1222,42571-0101-05 ",.01)

 +228     ;;42571-0101-05

 +229     ;;9002226.02101,"1222,42571-0101-05 ",.02)

 +230     ;;42571-0101-05

 +231     ;;9002226.02101,"1222,42571-0103-01 ",.01)

 +232     ;;42571-0103-01

 +233     ;;9002226.02101,"1222,42571-0103-01 ",.02)

 +234     ;;42571-0103-01

 +235     ;;9002226.02101,"1222,42571-0103-05 ",.01)

 +236     ;;42571-0103-05

 +237     ;;9002226.02101,"1222,42571-0103-05 ",.02)

 +238     ;;42571-0103-05

 +239     ;;9002226.02101,"1222,43063-0034-30 ",.01)

 +240     ;;43063-0034-30

 +241     ;;9002226.02101,"1222,43063-0034-30 ",.02)

 +242     ;;43063-0034-30

 +243     ;;9002226.02101,"1222,43063-0034-90 ",.01)

 +244     ;;43063-0034-90

 +245     ;;9002226.02101,"1222,43063-0034-90 ",.02)

 +246     ;;43063-0034-90

 +247     ;;9002226.02101,"1222,43063-0119-90 ",.01)

 +248     ;;43063-0119-90

 +249     ;;9002226.02101,"1222,43063-0119-90 ",.02)

 +250     ;;43063-0119-90

 +251     ;;9002226.02101,"1222,43063-0120-90 ",.01)

 +252     ;;43063-0120-90

 +253     ;;9002226.02101,"1222,43063-0120-90 ",.02)

 +254     ;;43063-0120-90

 +255     ;;9002226.02101,"1222,43063-0121-30 ",.01)

 +256     ;;43063-0121-30

 +257     ;;9002226.02101,"1222,43063-0121-30 ",.02)

 +258     ;;43063-0121-30

 +259     ;;9002226.02101,"1222,43063-0121-90 ",.01)

 +260     ;;43063-0121-90

 +261     ;;9002226.02101,"1222,43063-0121-90 ",.02)

 +262     ;;43063-0121-90

 +263     ;;9002226.02101,"1222,43063-0122-30 ",.01)

 +264     ;;43063-0122-30

 +265     ;;9002226.02101,"1222,43063-0122-30 ",.02)

 +266     ;;43063-0122-30

 +267     ;;9002226.02101,"1222,43063-0122-90 ",.01)

 +268     ;;43063-0122-90

 +269     ;;9002226.02101,"1222,43063-0122-90 ",.02)

 +270     ;;43063-0122-90

 +271     ;;9002226.02101,"1222,43063-0397-86 ",.01)

 +272     ;;43063-0397-86

 +273     ;;9002226.02101,"1222,43063-0397-86 ",.02)

 +274     ;;43063-0397-86

 +275     ;;9002226.02101,"1222,43063-0433-14 ",.01)

 +276     ;;43063-0433-14

 +277     ;;9002226.02101,"1222,43063-0433-14 ",.02)

 +278     ;;43063-0433-14

 +279     ;;9002226.02101,"1222,43063-0433-30 ",.01)

 +280     ;;43063-0433-30

 +281     ;;9002226.02101,"1222,43063-0433-30 ",.02)

 +282     ;;43063-0433-30

 +283     ;;9002226.02101,"1222,43063-0433-86 ",.01)

 +284     ;;43063-0433-86

 +285     ;;9002226.02101,"1222,43063-0433-86 ",.02)

 +286     ;;43063-0433-86

 +287     ;;9002226.02101,"1222,43063-0433-90 ",.01)

 +288     ;;43063-0433-90

 +289     ;;9002226.02101,"1222,43063-0433-90 ",.02)

 +290     ;;43063-0433-90

 +291     ;;9002226.02101,"1222,43063-0433-93 ",.01)

 +292     ;;43063-0433-93

 +293     ;;9002226.02101,"1222,43063-0433-93 ",.02)

 +294     ;;43063-0433-93

 +295     ;;9002226.02101,"1222,43063-0587-90 ",.01)

 +296     ;;43063-0587-90

 +297     ;;9002226.02101,"1222,43063-0587-90 ",.02)

 +298     ;;43063-0587-90

 +299     ;;9002226.02101,"1222,43353-0369-53 ",.01)

 +300     ;;43353-0369-53

 +301     ;;9002226.02101,"1222,43353-0369-53 ",.02)

 +302     ;;43353-0369-53

 +303     ;;9002226.02101,"1222,43353-0369-60 ",.01)

 +304     ;;43353-0369-60

 +305     ;;9002226.02101,"1222,43353-0369-60 ",.02)

 +306     ;;43353-0369-60

 +307     ;;9002226.02101,"1222,43353-0369-70 ",.01)

 +308     ;;43353-0369-70

 +309     ;;9002226.02101,"1222,43353-0369-70 ",.02)

 +310     ;;43353-0369-70

 +311     ;;9002226.02101,"1222,43353-0369-80 ",.01)

 +312     ;;43353-0369-80

 +313     ;;9002226.02101,"1222,43353-0369-80 ",.02)

 +314     ;;43353-0369-80

 +315     ;;9002226.02101,"1222,43353-0369-92 ",.01)

 +316     ;;43353-0369-92

 +317     ;;9002226.02101,"1222,43353-0369-92 ",.02)

 +318     ;;43353-0369-92

 +319     ;;9002226.02101,"1222,43353-0369-94 ",.01)

 +320     ;;43353-0369-94

 +321     ;;9002226.02101,"1222,43353-0369-94 ",.02)

 +322     ;;43353-0369-94

 +323     ;;9002226.02101,"1222,43353-0379-60 ",.01)

 +324     ;;43353-0379-60

 +325     ;;9002226.02101,"1222,43353-0379-60 ",.02)

 +326     ;;43353-0379-60

 +327     ;;9002226.02101,"1222,43353-0379-73 ",.01)

 +328     ;;43353-0379-73

 +329     ;;9002226.02101,"1222,43353-0379-73 ",.02)

 +330     ;;43353-0379-73

 +331     ;;9002226.02101,"1222,43353-0379-80 ",.01)

 +332     ;;43353-0379-80

 +333     ;;9002226.02101,"1222,43353-0379-80 ",.02)

 +334     ;;43353-0379-80

 +335     ;;9002226.02101,"1222,43353-0379-92 ",.01)

 +336     ;;43353-0379-92

 +337     ;;9002226.02101,"1222,43353-0379-92 ",.02)

 +338     ;;43353-0379-92

 +339     ;;9002226.02101,"1222,43353-0379-98 ",.01)

 +340     ;;43353-0379-98

 +341     ;;9002226.02101,"1222,43353-0379-98 ",.02)

 +342     ;;43353-0379-98

 +343     ;;9002226.02101,"1222,43353-0582-80 ",.01)

 +344     ;;43353-0582-80

 +345     ;;9002226.02101,"1222,43353-0582-80 ",.02)

 +346     ;;43353-0582-80

 +347     ;;9002226.02101,"1222,43353-0656-53 ",.01)

 +348     ;;43353-0656-53

 +349     ;;9002226.02101,"1222,43353-0656-53 ",.02)

 +350     ;;43353-0656-53

 +351     ;;9002226.02101,"1222,43353-0656-60 ",.01)

 +352     ;;43353-0656-60

 +353     ;;9002226.02101,"1222,43353-0656-60 ",.02)

 +354     ;;43353-0656-60

 +355     ;;9002226.02101,"1222,43353-0656-70 ",.01)

 +356     ;;43353-0656-70

 +357     ;;9002226.02101,"1222,43353-0656-70 ",.02)

 +358     ;;43353-0656-70

 +359     ;;9002226.02101,"1222,43353-0656-80 ",.01)

 +360     ;;43353-0656-80

 +361     ;;9002226.02101,"1222,43353-0656-80 ",.02)

 +362     ;;43353-0656-80

 +363     ;;9002226.02101,"1222,43353-0656-90 ",.01)

 +364     ;;43353-0656-90

 +365     ;;9002226.02101,"1222,43353-0656-90 ",.02)

 +366     ;;43353-0656-90

 +367     ;;9002226.02101,"1222,43353-0656-92 ",.01)

 +368     ;;43353-0656-92

 +369     ;;9002226.02101,"1222,43353-0656-92 ",.02)

 +370     ;;43353-0656-92

 +371     ;;9002226.02101,"1222,43353-0656-94 ",.01)

 +372     ;;43353-0656-94

 +373     ;;9002226.02101,"1222,43353-0656-94 ",.02)

 +374     ;;43353-0656-94

 +375     ;;9002226.02101,"1222,43353-0659-60 ",.01)

 +376     ;;43353-0659-60

 +377     ;;9002226.02101,"1222,43353-0659-60 ",.02)

 +378     ;;43353-0659-60

BGP71X7.m