Routine: BGP53L2

BGP53L2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON FEB 24, 2015;

 ;;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

TMP ;;TAXONOMY (WITH BULLETIN)

 ;;9002226.02101,"558,00247-1898-90 ",.02)

 ;;00247-1898-90

 ;;9002226.02101,"558,00247-1988-30 ",.01)

 ;;00247-1988-30

 ;;9002226.02101,"558,00247-1988-30 ",.02)

 ;;00247-1988-30

 ;;9002226.02101,"558,00310-0401-60 ",.01)

 ;;00310-0401-60

 ;;9002226.02101,"558,00310-0401-60 ",.02)

 ;;00310-0401-60

 ;;9002226.02101,"558,00310-0402-60 ",.01)

 ;;00310-0402-60

 ;;9002226.02101,"558,00310-0402-60 ",.02)

 ;;00310-0402-60

 ;;9002226.02101,"558,00310-0411-60 ",.01)

 ;;00310-0411-60

 ;;9002226.02101,"558,00310-0411-60 ",.02)

 ;;00310-0411-60

 ;;9002226.02101,"558,00310-0412-60 ",.01)

 ;;00310-0412-60

 ;;9002226.02101,"558,00310-0412-60 ",.02)

 ;;00310-0412-60

 ;;9002226.02101,"558,00378-5201-93 ",.01)

 ;;00378-5201-93

 ;;9002226.02101,"558,00378-5201-93 ",.02)

 ;;00378-5201-93

 ;;9002226.02101,"558,00378-5204-93 ",.01)

 ;;00378-5204-93

 ;;9002226.02101,"558,00378-5204-93 ",.02)

 ;;00378-5204-93

 ;;9002226.02101,"558,00378-5205-93 ",.01)

 ;;00378-5205-93

 ;;9002226.02101,"558,00378-5205-93 ",.02)

 ;;00378-5205-93

 ;;9002226.02101,"558,00378-6040-93 ",.01)

 ;;00378-6040-93

 ;;9002226.02101,"558,00378-6040-93 ",.02)

 ;;00378-6040-93

 ;;9002226.02101,"558,00603-4653-02 ",.01)

 ;;00603-4653-02

 ;;9002226.02101,"558,00603-4653-02 ",.02)

 ;;00603-4653-02

 ;;9002226.02101,"558,00603-4653-16 ",.01)

 ;;00603-4653-16

 ;;9002226.02101,"558,00603-4653-16 ",.02)

 ;;00603-4653-16

 ;;9002226.02101,"558,00603-4653-28 ",.01)

 ;;00603-4653-28

 ;;9002226.02101,"558,00603-4653-28 ",.02)

 ;;00603-4653-28

 ;;9002226.02101,"558,00603-4653-32 ",.01)

 ;;00603-4653-32

 ;;9002226.02101,"558,00603-4653-32 ",.02)

 ;;00603-4653-32

 ;;9002226.02101,"558,00603-4654-02 ",.01)

 ;;00603-4654-02

 ;;9002226.02101,"558,00603-4654-02 ",.02)

 ;;00603-4654-02

 ;;9002226.02101,"558,00603-4654-16 ",.01)

 ;;00603-4654-16

 ;;9002226.02101,"558,00603-4654-16 ",.02)

 ;;00603-4654-16

 ;;9002226.02101,"558,00603-4654-28 ",.01)

 ;;00603-4654-28

 ;;9002226.02101,"558,00603-4654-28 ",.02)

 ;;00603-4654-28

 ;;9002226.02101,"558,00603-4654-32 ",.01)

 ;;00603-4654-32

 ;;9002226.02101,"558,00603-4654-32 ",.02)

 ;;00603-4654-32

 ;;9002226.02101,"558,00603-4655-02 ",.01)

 ;;00603-4655-02

 ;;9002226.02101,"558,00603-4655-02 ",.02)

 ;;00603-4655-02

 ;;9002226.02101,"558,00603-4655-16 ",.01)

 ;;00603-4655-16

 ;;9002226.02101,"558,00603-4655-16 ",.02)

 ;;00603-4655-16

 ;;9002226.02101,"558,00603-4655-28 ",.01)

 ;;00603-4655-28

 ;;9002226.02101,"558,00603-4655-28 ",.02)

 ;;00603-4655-28

 ;;9002226.02101,"558,00603-4655-32 ",.01)

 ;;00603-4655-32

 ;;9002226.02101,"558,00603-4655-32 ",.02)

 ;;00603-4655-32

 ;;9002226.02101,"558,00603-4655-34 ",.01)

 ;;00603-4655-34

 ;;9002226.02101,"558,00603-4655-34 ",.02)

 ;;00603-4655-34

 ;;9002226.02101,"558,00781-5554-31 ",.01)

 ;;00781-5554-31

 ;;9002226.02101,"558,00781-5554-31 ",.02)

 ;;00781-5554-31

 ;;9002226.02101,"558,00781-5554-92 ",.01)

 ;;00781-5554-92

 ;;9002226.02101,"558,00781-5554-92 ",.02)

 ;;00781-5554-92

 ;;9002226.02101,"558,00781-5555-31 ",.01)

 ;;00781-5555-31

 ;;9002226.02101,"558,00781-5555-31 ",.02)

 ;;00781-5555-31

 ;;9002226.02101,"558,00781-5555-92 ",.01)

 ;;00781-5555-92

 ;;9002226.02101,"558,00781-5555-92 ",.02)

 ;;00781-5555-92

 ;;9002226.02101,"558,00781-5560-31 ",.01)

 ;;00781-5560-31

 ;;9002226.02101,"558,00781-5560-31 ",.02)

 ;;00781-5560-31

 ;;9002226.02101,"558,00781-5560-92 ",.01)

 ;;00781-5560-92

 ;;9002226.02101,"558,00781-5560-92 ",.02)

 ;;00781-5560-92

 ;;9002226.02101,"558,00904-6310-61 ",.01)

 ;;00904-6310-61

 ;;9002226.02101,"558,00904-6310-61 ",.02)

 ;;00904-6310-61

 ;;9002226.02101,"558,10122-0901-12 ",.01)

 ;;10122-0901-12

 ;;9002226.02101,"558,10122-0901-12 ",.02)

 ;;10122-0901-12

 ;;9002226.02101,"558,10122-0902-12 ",.01)

 ;;10122-0902-12

 ;;9002226.02101,"558,10122-0902-12 ",.02)

 ;;10122-0902-12

 ;;9002226.02101,"558,12280-0042-90 ",.01)

 ;;12280-0042-90

 ;;9002226.02101,"558,12280-0042-90 ",.02)

 ;;12280-0042-90

 ;;9002226.02101,"558,13411-0151-01 ",.01)

 ;;13411-0151-01

 ;;9002226.02101,"558,13411-0151-01 ",.02)

 ;;13411-0151-01

 ;;9002226.02101,"558,13411-0151-03 ",.01)

 ;;13411-0151-03

 ;;9002226.02101,"558,13411-0151-03 ",.02)

 ;;13411-0151-03

 ;;9002226.02101,"558,13411-0151-06 ",.01)

 ;;13411-0151-06

 ;;9002226.02101,"558,13411-0151-06 ",.02)

 ;;13411-0151-06

 ;;9002226.02101,"558,13411-0151-09 ",.01)

 ;;13411-0151-09

 ;;9002226.02101,"558,13411-0151-09 ",.02)

 ;;13411-0151-09

 ;;9002226.02101,"558,13411-0151-15 ",.01)

 ;;13411-0151-15

 ;;9002226.02101,"558,13411-0151-15 ",.02)

 ;;13411-0151-15

 ;;9002226.02101,"558,13411-0160-01 ",.01)

 ;;13411-0160-01

 ;;9002226.02101,"558,13411-0160-01 ",.02)

 ;;13411-0160-01

 ;;9002226.02101,"558,13411-0160-03 ",.01)

 ;;13411-0160-03

 ;;9002226.02101,"558,13411-0160-03 ",.02)

 ;;13411-0160-03

 ;;9002226.02101,"558,13411-0160-06 ",.01)

 ;;13411-0160-06

 ;;9002226.02101,"558,13411-0160-06 ",.02)

 ;;13411-0160-06

 ;;9002226.02101,"558,13411-0160-09 ",.01)

 ;;13411-0160-09

 ;;9002226.02101,"558,13411-0160-09 ",.02)

 ;;13411-0160-09

 ;;9002226.02101,"558,13411-0160-15 ",.01)

 ;;13411-0160-15

 ;;9002226.02101,"558,13411-0160-15 ",.02)

 ;;13411-0160-15

 ;;9002226.02101,"558,13668-0079-05 ",.01)

 ;;13668-0079-05

 ;;9002226.02101,"558,13668-0079-05 ",.02)

 ;;13668-0079-05

 ;;9002226.02101,"558,13668-0079-30 ",.01)

 ;;13668-0079-30

 ;;9002226.02101,"558,13668-0079-30 ",.02)

 ;;13668-0079-30

 ;;9002226.02101,"558,13668-0079-90 ",.01)

 ;;13668-0079-90

 ;;9002226.02101,"558,13668-0079-90 ",.02)

 ;;13668-0079-90

 ;;9002226.02101,"558,13668-0080-05 ",.01)

 ;;13668-0080-05

 ;;9002226.02101,"558,13668-0080-05 ",.02)

 ;;13668-0080-05

 ;;9002226.02101,"558,13668-0080-30 ",.01)

 ;;13668-0080-30

 ;;9002226.02101,"558,13668-0080-30 ",.02)

 ;;13668-0080-30

 ;;9002226.02101,"558,13668-0080-90 ",.01)

 ;;13668-0080-90

 ;;9002226.02101,"558,13668-0080-90 ",.02)

 ;;13668-0080-90

 ;;9002226.02101,"558,13668-0081-30 ",.01)

 ;;13668-0081-30

 ;;9002226.02101,"558,13668-0081-30 ",.02)

 ;;13668-0081-30

 ;;9002226.02101,"558,13668-0081-90 ",.01)

 ;;13668-0081-90

 ;;9002226.02101,"558,13668-0081-90 ",.02)

 ;;13668-0081-90

 ;;9002226.02101,"558,16729-0119-10 ",.01)

 ;;16729-0119-10

 ;;9002226.02101,"558,16729-0119-10 ",.02)

 ;;16729-0119-10

 ;;9002226.02101,"558,16729-0119-15 ",.01)

 ;;16729-0119-15

 ;;9002226.02101,"558,16729-0119-15 ",.02)

 ;;16729-0119-15

 ;;9002226.02101,"558,42291-0621-10 ",.01)

 ;;42291-0621-10

 ;;9002226.02101,"558,42291-0621-10 ",.02)

 ;;42291-0621-10

 ;;9002226.02101,"558,42291-0621-30 ",.01)

 ;;42291-0621-30

 ;;9002226.02101,"558,42291-0621-30 ",.02)

 ;;42291-0621-30

 ;;9002226.02101,"558,42291-0621-90 ",.01)

 ;;42291-0621-90

 ;;9002226.02101,"558,42291-0621-90 ",.02)

 ;;42291-0621-90

 ;;9002226.02101,"558,42291-0622-30 ",.01)

 ;;42291-0622-30

 ;;9002226.02101,"558,42291-0622-30 ",.02)

 ;;42291-0622-30

 ;;9002226.02101,"558,42291-0622-90 ",.01)

 ;;42291-0622-90

 ;;9002226.02101,"558,42291-0622-90 ",.02)

 ;;42291-0622-90

 ;;9002226.02101,"558,42291-0623-30 ",.01)

 ;;42291-0623-30

 ;;9002226.02101,"558,42291-0623-30 ",.02)

 ;;42291-0623-30

 ;;9002226.02101,"558,42291-0623-90 ",.01)

 ;;42291-0623-90

 ;;9002226.02101,"558,42291-0623-90 ",.02)

 ;;42291-0623-90

 ;;9002226.02101,"558,43063-0380-15 ",.01)

 ;;43063-0380-15

 ;;9002226.02101,"558,43063-0380-15 ",.02)

 ;;43063-0380-15

 ;;9002226.02101,"558,43063-0380-30 ",.01)

 ;;43063-0380-30

 ;;9002226.02101,"558,43063-0380-30 ",.02)

 ;;43063-0380-30

 ;;9002226.02101,"558,43063-0381-21 ",.01)

 ;;43063-0381-21

 ;;9002226.02101,"558,43063-0381-21 ",.02)

 ;;43063-0381-21

 ;;9002226.02101,"558,43063-0381-30 ",.01)

 ;;43063-0381-30

 ;;9002226.02101,"558,43063-0381-30 ",.02)

 ;;43063-0381-30

 ;;9002226.02101,"558,49884-0303-02 ",.01)

 ;;49884-0303-02

 ;;9002226.02101,"558,49884-0303-02 ",.02)

 ;;49884-0303-02

 ;;9002226.02101,"558,49884-0304-02 ",.01)

 ;;49884-0304-02

 ;;9002226.02101,"558,49884-0304-02 ",.02)

 ;;49884-0304-02

 ;;9002226.02101,"558,49999-0533-30 ",.01)

 ;;49999-0533-30

 ;;9002226.02101,"558,49999-0533-30 ",.02)

 ;;49999-0533-30

 ;;9002226.02101,"558,49999-0533-90 ",.01)

 ;;49999-0533-90

 ;;9002226.02101,"558,49999-0533-90 ",.02)

 ;;49999-0533-90

 ;;9002226.02101,"558,49999-0884-30 ",.01)

 ;;49999-0884-30

 ;;9002226.02101,"558,49999-0884-30 ",.02)

 ;;49999-0884-30

 ;;9002226.02101,"558,49999-0884-90 ",.01)

 ;;49999-0884-90

 ;;9002226.02101,"558,49999-0884-90 ",.02)

 ;;49999-0884-90

 ;;9002226.02101,"558,49999-0952-30 ",.01)

 ;;49999-0952-30

 ;;9002226.02101,"558,49999-0952-30 ",.02)

 ;;49999-0952-30

 ;;9002226.02101,"558,51079-0223-01 ",.01)

 ;;51079-0223-01

 ;;9002226.02101,"558,51079-0223-01 ",.02)

 ;;51079-0223-01

 ;;9002226.02101,"558,51079-0223-20 ",.01)

 ;;51079-0223-20

 ;;9002226.02101,"558,51079-0223-20 ",.02)

 ;;51079-0223-20

 ;;9002226.02101,"558,54569-4604-01 ",.01)

 ;;54569-4604-01

 ;;9002226.02101,"558,54569-4604-01 ",.02)

 ;;54569-4604-01

 ;;9002226.02101,"558,54569-4605-00 ",.01)

 ;;54569-4605-00

 ;;9002226.02101,"558,54569-4605-00 ",.02)

 ;;54569-4605-00

 ;;9002226.02101,"558,54569-4736-00 ",.01)

 ;;54569-4736-00

 ;;9002226.02101,"558,54569-4736-00 ",.02)

 ;;54569-4736-00

 ;;9002226.02101,"558,54569-5167-00 ",.01)

 ;;54569-5167-00

 ;;9002226.02101,"558,54569-5167-00 ",.02)

 ;;54569-5167-00

 ;;9002226.02101,"558,54569-6321-00 ",.01)

 ;;54569-6321-00

 ;;9002226.02101,"558,54569-6321-00 ",.02)

 ;;54569-6321-00

 ;;9002226.02101,"558,54569-6348-00 ",.01)

 ;;54569-6348-00

 ;;9002226.02101,"558,54569-6348-00 ",.02)

 ;;54569-6348-00

 ;;9002226.02101,"558,54868-3283-00 ",.01)

 ;;54868-3283-00

 ;;9002226.02101,"558,54868-3283-00 ",.02)

 ;;54868-3283-00

 ;;9002226.02101,"558,54868-3283-01 ",.01)

 ;;54868-3283-01

 ;;9002226.02101,"558,54868-3283-01 ",.02)

 ;;54868-3283-01

 ;;9002226.02101,"558,54868-3283-02 ",.01)

 ;;54868-3283-02

 ;;9002226.02101,"558,54868-3283-02 ",.02)

 ;;54868-3283-02

 ;;9002226.02101,"558,54868-4172-00 ",.01)

 ;;54868-4172-00

 ;;9002226.02101,"558,54868-4172-00 ",.02)

 ;;54868-4172-00

 ;;9002226.02101,"558,54868-4172-01 ",.01)

 ;;54868-4172-01

 ;;9002226.02101,"558,54868-4172-01 ",.02)

 ;;54868-4172-01

 ;;9002226.02101,"558,54868-4172-02 ",.01)

 ;;54868-4172-02

 ;;9002226.02101,"558,54868-4172-02 ",.02)

 ;;54868-4172-02

 ;;9002226.02101,"558,54868-4630-00 ",.01)

 ;;54868-4630-00

 ;;9002226.02101,"558,54868-4630-00 ",.02)

 ;;54868-4630-00

 ;;9002226.02101,"558,54868-4847-00 ",.01)

 ;;54868-4847-00

 ;;9002226.02101,"558,54868-4847-00 ",.02)

 ;;54868-4847-00

 ;;9002226.02101,"558,55111-0593-30 ",.01)

 ;;55111-0593-30

 ;;9002226.02101,"558,55111-0593-30 ",.02)

 ;;55111-0593-30

 ;;9002226.02101,"558,55111-0593-90 ",.01)

 ;;55111-0593-90

 ;;9002226.02101,"558,55111-0593-90 ",.02)

 ;;55111-0593-90

 ;;9002226.02101,"558,55111-0594-30 ",.01)

 ;;55111-0594-30

 ;;9002226.02101,"558,55111-0594-30 ",.02)

 ;;55111-0594-30

 ;;9002226.02101,"558,55111-0594-90 ",.01)

 ;;55111-0594-90

 ;;9002226.02101,"558,55111-0594-90 ",.02)

 ;;55111-0594-90

 ;;9002226.02101,"558,55111-0625-60 ",.01)

 ;;55111-0625-60

 ;;9002226.02101,"558,55111-0625-60 ",.02)

 ;;55111-0625-60

 ;;9002226.02101,"558,55111-0626-60 ",.01)

 ;;55111-0626-60

 ;;9002226.02101,"558,55111-0626-60 ",.02)

 ;;55111-0626-60

 ;;9002226.02101,"558,55111-0725-10 ",.01)

 ;;55111-0725-10

 ;;9002226.02101,"558,55111-0725-10 ",.02)

 ;;55111-0725-10

 ;;9002226.02101,"558,55111-0725-30 ",.01)

 ;;55111-0725-30

 ;;9002226.02101,"558,55111-0725-30 ",.02)

 ;;55111-0725-30

 ;;9002226.02101,"558,55111-0725-90 ",.01)

 ;;55111-0725-90

 ;;9002226.02101,"558,55111-0725-90 ",.02)

 ;;55111-0725-90

 ;;9002226.02101,"558,55111-0725-94 ",.01)

 ;;55111-0725-94

 ;;9002226.02101,"558,55111-0725-94 ",.02)

 ;;55111-0725-94

 ;;9002226.02101,"558,55111-0763-03 ",.01)

 ;;55111-0763-03

 ;;9002226.02101,"558,55111-0763-03 ",.02)

 ;;55111-0763-03

 ;;9002226.02101,"558,55289-0961-15 ",.01)

 ;;55289-0961-15

 ;;9002226.02101,"558,55289-0961-15 ",.02)

 ;;55289-0961-15

 ;;9002226.02101,"558,55289-0961-30 ",.01)

 ;;55289-0961-30

 ;;9002226.02101,"558,55289-0961-30 ",.02)

 ;;55289-0961-30

 ;;9002226.02101,"558,55289-0989-21 ",.01)

 ;;55289-0989-21

 ;;9002226.02101,"558,55289-0989-21 ",.02)

 ;;55289-0989-21

 ;;9002226.02101,"558,55289-0989-30 ",.01)

 ;;55289-0989-30

 ;;9002226.02101,"558,55289-0989-30 ",.02)

 ;;55289-0989-30

 ;;9002226.02101,"558,55289-0990-21 ",.01)

 ;;55289-0990-21

 ;;9002226.02101,"558,55289-0990-21 ",.02)

 ;;55289-0990-21

 ;;9002226.02101,"558,55289-0990-30 ",.01)

 ;;55289-0990-30

 ;;9002226.02101,"558,55289-0990-30 ",.02)

 ;;55289-0990-30

 ;;9002226.02101,"558,55887-0120-90 ",.01)

 ;;55887-0120-90

 ;;9002226.02101,"558,55887-0120-90 ",.02)

 ;;55887-0120-90

 ;;9002226.02101,"558,58864-0658-30 ",.01)

 ;;58864-0658-30

 ;;9002226.02101,"558,58864-0658-30 ",.02)

 ;;58864-0658-30

 ;;9002226.02101,"558,58864-0694-30 ",.01)

 ;;58864-0694-30

 ;;9002226.02101,"558,58864-0694-30 ",.02)

 ;;58864-0694-30

 ;;9002226.02101,"558,59762-0030-01 ",.01)

 ;;59762-0030-01

 ;;9002226.02101,"558,59762-0030-01 ",.02)

 ;;59762-0030-01

 ;;9002226.02101,"558,59762-0030-02 ",.01)

 ;;59762-0030-02

 ;;9002226.02101,"558,59762-0030-02 ",.02)

 ;;59762-0030-02

 ;;9002226.02101,"558,59762-0045-01 ",.01)

 ;;59762-0045-01

 ;;9002226.02101,"558,59762-0045-01 ",.02)

 ;;59762-0045-01

 ;;9002226.02101,"558,59762-0045-02 ",.01)

 ;;59762-0045-02

 ;;9002226.02101,"558,59762-0045-02 ",.02)

 ;;59762-0045-02

 ;;9002226.02101,"558,59762-0046-01 ",.01)

 ;;59762-0046-01

BGP53L2   ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON FEB 24, 2015;

 +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       ;;9002226.02101,"558,00247-1898-90 ",.02)

 +2       ;;00247-1898-90

 +3       ;;9002226.02101,"558,00247-1988-30 ",.01)

 +4       ;;00247-1988-30

 +5       ;;9002226.02101,"558,00247-1988-30 ",.02)

 +6       ;;00247-1988-30

 +7       ;;9002226.02101,"558,00310-0401-60 ",.01)

 +8       ;;00310-0401-60

 +9       ;;9002226.02101,"558,00310-0401-60 ",.02)

 +10      ;;00310-0401-60

 +11      ;;9002226.02101,"558,00310-0402-60 ",.01)

 +12      ;;00310-0402-60

 +13      ;;9002226.02101,"558,00310-0402-60 ",.02)

 +14      ;;00310-0402-60

 +15      ;;9002226.02101,"558,00310-0411-60 ",.01)

 +16      ;;00310-0411-60

 +17      ;;9002226.02101,"558,00310-0411-60 ",.02)

 +18      ;;00310-0411-60

 +19      ;;9002226.02101,"558,00310-0412-60 ",.01)

 +20      ;;00310-0412-60

 +21      ;;9002226.02101,"558,00310-0412-60 ",.02)

 +22      ;;00310-0412-60

 +23      ;;9002226.02101,"558,00378-5201-93 ",.01)

 +24      ;;00378-5201-93

 +25      ;;9002226.02101,"558,00378-5201-93 ",.02)

 +26      ;;00378-5201-93

 +27      ;;9002226.02101,"558,00378-5204-93 ",.01)

 +28      ;;00378-5204-93

 +29      ;;9002226.02101,"558,00378-5204-93 ",.02)

 +30      ;;00378-5204-93

 +31      ;;9002226.02101,"558,00378-5205-93 ",.01)

 +32      ;;00378-5205-93

 +33      ;;9002226.02101,"558,00378-5205-93 ",.02)

 +34      ;;00378-5205-93

 +35      ;;9002226.02101,"558,00378-6040-93 ",.01)

 +36      ;;00378-6040-93

 +37      ;;9002226.02101,"558,00378-6040-93 ",.02)

 +38      ;;00378-6040-93

 +39      ;;9002226.02101,"558,00603-4653-02 ",.01)

 +40      ;;00603-4653-02

 +41      ;;9002226.02101,"558,00603-4653-02 ",.02)

 +42      ;;00603-4653-02

 +43      ;;9002226.02101,"558,00603-4653-16 ",.01)

 +44      ;;00603-4653-16

 +45      ;;9002226.02101,"558,00603-4653-16 ",.02)

 +46      ;;00603-4653-16

 +47      ;;9002226.02101,"558,00603-4653-28 ",.01)

 +48      ;;00603-4653-28

 +49      ;;9002226.02101,"558,00603-4653-28 ",.02)

 +50      ;;00603-4653-28

 +51      ;;9002226.02101,"558,00603-4653-32 ",.01)

 +52      ;;00603-4653-32

 +53      ;;9002226.02101,"558,00603-4653-32 ",.02)

 +54      ;;00603-4653-32

 +55      ;;9002226.02101,"558,00603-4654-02 ",.01)

 +56      ;;00603-4654-02

 +57      ;;9002226.02101,"558,00603-4654-02 ",.02)

 +58      ;;00603-4654-02

 +59      ;;9002226.02101,"558,00603-4654-16 ",.01)

 +60      ;;00603-4654-16

 +61      ;;9002226.02101,"558,00603-4654-16 ",.02)

 +62      ;;00603-4654-16

 +63      ;;9002226.02101,"558,00603-4654-28 ",.01)

 +64      ;;00603-4654-28

 +65      ;;9002226.02101,"558,00603-4654-28 ",.02)

 +66      ;;00603-4654-28

 +67      ;;9002226.02101,"558,00603-4654-32 ",.01)

 +68      ;;00603-4654-32

 +69      ;;9002226.02101,"558,00603-4654-32 ",.02)

 +70      ;;00603-4654-32

 +71      ;;9002226.02101,"558,00603-4655-02 ",.01)

 +72      ;;00603-4655-02

 +73      ;;9002226.02101,"558,00603-4655-02 ",.02)

 +74      ;;00603-4655-02

 +75      ;;9002226.02101,"558,00603-4655-16 ",.01)

 +76      ;;00603-4655-16

 +77      ;;9002226.02101,"558,00603-4655-16 ",.02)

 +78      ;;00603-4655-16

 +79      ;;9002226.02101,"558,00603-4655-28 ",.01)

 +80      ;;00603-4655-28

 +81      ;;9002226.02101,"558,00603-4655-28 ",.02)

 +82      ;;00603-4655-28

 +83      ;;9002226.02101,"558,00603-4655-32 ",.01)

 +84      ;;00603-4655-32

 +85      ;;9002226.02101,"558,00603-4655-32 ",.02)

 +86      ;;00603-4655-32

 +87      ;;9002226.02101,"558,00603-4655-34 ",.01)

 +88      ;;00603-4655-34

 +89      ;;9002226.02101,"558,00603-4655-34 ",.02)

 +90      ;;00603-4655-34

 +91      ;;9002226.02101,"558,00781-5554-31 ",.01)

 +92      ;;00781-5554-31

 +93      ;;9002226.02101,"558,00781-5554-31 ",.02)

 +94      ;;00781-5554-31

 +95      ;;9002226.02101,"558,00781-5554-92 ",.01)

 +96      ;;00781-5554-92

 +97      ;;9002226.02101,"558,00781-5554-92 ",.02)

 +98      ;;00781-5554-92

 +99      ;;9002226.02101,"558,00781-5555-31 ",.01)

 +100     ;;00781-5555-31

 +101     ;;9002226.02101,"558,00781-5555-31 ",.02)

 +102     ;;00781-5555-31

 +103     ;;9002226.02101,"558,00781-5555-92 ",.01)

 +104     ;;00781-5555-92

 +105     ;;9002226.02101,"558,00781-5555-92 ",.02)

 +106     ;;00781-5555-92

 +107     ;;9002226.02101,"558,00781-5560-31 ",.01)

 +108     ;;00781-5560-31

 +109     ;;9002226.02101,"558,00781-5560-31 ",.02)

 +110     ;;00781-5560-31

 +111     ;;9002226.02101,"558,00781-5560-92 ",.01)

 +112     ;;00781-5560-92

 +113     ;;9002226.02101,"558,00781-5560-92 ",.02)

 +114     ;;00781-5560-92

 +115     ;;9002226.02101,"558,00904-6310-61 ",.01)

 +116     ;;00904-6310-61

 +117     ;;9002226.02101,"558,00904-6310-61 ",.02)

 +118     ;;00904-6310-61

 +119     ;;9002226.02101,"558,10122-0901-12 ",.01)

 +120     ;;10122-0901-12

 +121     ;;9002226.02101,"558,10122-0901-12 ",.02)

 +122     ;;10122-0901-12

 +123     ;;9002226.02101,"558,10122-0902-12 ",.01)

 +124     ;;10122-0902-12

 +125     ;;9002226.02101,"558,10122-0902-12 ",.02)

 +126     ;;10122-0902-12

 +127     ;;9002226.02101,"558,12280-0042-90 ",.01)

 +128     ;;12280-0042-90

 +129     ;;9002226.02101,"558,12280-0042-90 ",.02)

 +130     ;;12280-0042-90

 +131     ;;9002226.02101,"558,13411-0151-01 ",.01)

 +132     ;;13411-0151-01

 +133     ;;9002226.02101,"558,13411-0151-01 ",.02)

 +134     ;;13411-0151-01

 +135     ;;9002226.02101,"558,13411-0151-03 ",.01)

 +136     ;;13411-0151-03

 +137     ;;9002226.02101,"558,13411-0151-03 ",.02)

 +138     ;;13411-0151-03

 +139     ;;9002226.02101,"558,13411-0151-06 ",.01)

 +140     ;;13411-0151-06

 +141     ;;9002226.02101,"558,13411-0151-06 ",.02)

 +142     ;;13411-0151-06

 +143     ;;9002226.02101,"558,13411-0151-09 ",.01)

 +144     ;;13411-0151-09

 +145     ;;9002226.02101,"558,13411-0151-09 ",.02)

 +146     ;;13411-0151-09

 +147     ;;9002226.02101,"558,13411-0151-15 ",.01)

 +148     ;;13411-0151-15

 +149     ;;9002226.02101,"558,13411-0151-15 ",.02)

 +150     ;;13411-0151-15

 +151     ;;9002226.02101,"558,13411-0160-01 ",.01)

 +152     ;;13411-0160-01

 +153     ;;9002226.02101,"558,13411-0160-01 ",.02)

 +154     ;;13411-0160-01

 +155     ;;9002226.02101,"558,13411-0160-03 ",.01)

 +156     ;;13411-0160-03

 +157     ;;9002226.02101,"558,13411-0160-03 ",.02)

 +158     ;;13411-0160-03

 +159     ;;9002226.02101,"558,13411-0160-06 ",.01)

 +160     ;;13411-0160-06

 +161     ;;9002226.02101,"558,13411-0160-06 ",.02)

 +162     ;;13411-0160-06

 +163     ;;9002226.02101,"558,13411-0160-09 ",.01)

 +164     ;;13411-0160-09

 +165     ;;9002226.02101,"558,13411-0160-09 ",.02)

 +166     ;;13411-0160-09

 +167     ;;9002226.02101,"558,13411-0160-15 ",.01)

 +168     ;;13411-0160-15

 +169     ;;9002226.02101,"558,13411-0160-15 ",.02)

 +170     ;;13411-0160-15

 +171     ;;9002226.02101,"558,13668-0079-05 ",.01)

 +172     ;;13668-0079-05

 +173     ;;9002226.02101,"558,13668-0079-05 ",.02)

 +174     ;;13668-0079-05

 +175     ;;9002226.02101,"558,13668-0079-30 ",.01)

 +176     ;;13668-0079-30

 +177     ;;9002226.02101,"558,13668-0079-30 ",.02)

 +178     ;;13668-0079-30

 +179     ;;9002226.02101,"558,13668-0079-90 ",.01)

 +180     ;;13668-0079-90

 +181     ;;9002226.02101,"558,13668-0079-90 ",.02)

 +182     ;;13668-0079-90

 +183     ;;9002226.02101,"558,13668-0080-05 ",.01)

 +184     ;;13668-0080-05

 +185     ;;9002226.02101,"558,13668-0080-05 ",.02)

 +186     ;;13668-0080-05

 +187     ;;9002226.02101,"558,13668-0080-30 ",.01)

 +188     ;;13668-0080-30

 +189     ;;9002226.02101,"558,13668-0080-30 ",.02)

 +190     ;;13668-0080-30

 +191     ;;9002226.02101,"558,13668-0080-90 ",.01)

 +192     ;;13668-0080-90

 +193     ;;9002226.02101,"558,13668-0080-90 ",.02)

 +194     ;;13668-0080-90

 +195     ;;9002226.02101,"558,13668-0081-30 ",.01)

 +196     ;;13668-0081-30

 +197     ;;9002226.02101,"558,13668-0081-30 ",.02)

 +198     ;;13668-0081-30

 +199     ;;9002226.02101,"558,13668-0081-90 ",.01)

 +200     ;;13668-0081-90

 +201     ;;9002226.02101,"558,13668-0081-90 ",.02)

 +202     ;;13668-0081-90

 +203     ;;9002226.02101,"558,16729-0119-10 ",.01)

 +204     ;;16729-0119-10

 +205     ;;9002226.02101,"558,16729-0119-10 ",.02)

 +206     ;;16729-0119-10

 +207     ;;9002226.02101,"558,16729-0119-15 ",.01)

 +208     ;;16729-0119-15

 +209     ;;9002226.02101,"558,16729-0119-15 ",.02)

 +210     ;;16729-0119-15

 +211     ;;9002226.02101,"558,42291-0621-10 ",.01)

 +212     ;;42291-0621-10

 +213     ;;9002226.02101,"558,42291-0621-10 ",.02)

 +214     ;;42291-0621-10

 +215     ;;9002226.02101,"558,42291-0621-30 ",.01)

 +216     ;;42291-0621-30

 +217     ;;9002226.02101,"558,42291-0621-30 ",.02)

 +218     ;;42291-0621-30

 +219     ;;9002226.02101,"558,42291-0621-90 ",.01)

 +220     ;;42291-0621-90

 +221     ;;9002226.02101,"558,42291-0621-90 ",.02)

 +222     ;;42291-0621-90

 +223     ;;9002226.02101,"558,42291-0622-30 ",.01)

 +224     ;;42291-0622-30

 +225     ;;9002226.02101,"558,42291-0622-30 ",.02)

 +226     ;;42291-0622-30

 +227     ;;9002226.02101,"558,42291-0622-90 ",.01)

 +228     ;;42291-0622-90

 +229     ;;9002226.02101,"558,42291-0622-90 ",.02)

 +230     ;;42291-0622-90

 +231     ;;9002226.02101,"558,42291-0623-30 ",.01)

 +232     ;;42291-0623-30

 +233     ;;9002226.02101,"558,42291-0623-30 ",.02)

 +234     ;;42291-0623-30

 +235     ;;9002226.02101,"558,42291-0623-90 ",.01)

 +236     ;;42291-0623-90

 +237     ;;9002226.02101,"558,42291-0623-90 ",.02)

 +238     ;;42291-0623-90

 +239     ;;9002226.02101,"558,43063-0380-15 ",.01)

 +240     ;;43063-0380-15

 +241     ;;9002226.02101,"558,43063-0380-15 ",.02)

 +242     ;;43063-0380-15

 +243     ;;9002226.02101,"558,43063-0380-30 ",.01)

 +244     ;;43063-0380-30

 +245     ;;9002226.02101,"558,43063-0380-30 ",.02)

 +246     ;;43063-0380-30

 +247     ;;9002226.02101,"558,43063-0381-21 ",.01)

 +248     ;;43063-0381-21

 +249     ;;9002226.02101,"558,43063-0381-21 ",.02)

 +250     ;;43063-0381-21

 +251     ;;9002226.02101,"558,43063-0381-30 ",.01)

 +252     ;;43063-0381-30

 +253     ;;9002226.02101,"558,43063-0381-30 ",.02)

 +254     ;;43063-0381-30

 +255     ;;9002226.02101,"558,49884-0303-02 ",.01)

 +256     ;;49884-0303-02

 +257     ;;9002226.02101,"558,49884-0303-02 ",.02)

 +258     ;;49884-0303-02

 +259     ;;9002226.02101,"558,49884-0304-02 ",.01)

 +260     ;;49884-0304-02

 +261     ;;9002226.02101,"558,49884-0304-02 ",.02)

 +262     ;;49884-0304-02

 +263     ;;9002226.02101,"558,49999-0533-30 ",.01)

 +264     ;;49999-0533-30

 +265     ;;9002226.02101,"558,49999-0533-30 ",.02)

 +266     ;;49999-0533-30

 +267     ;;9002226.02101,"558,49999-0533-90 ",.01)

 +268     ;;49999-0533-90

 +269     ;;9002226.02101,"558,49999-0533-90 ",.02)

 +270     ;;49999-0533-90

 +271     ;;9002226.02101,"558,49999-0884-30 ",.01)

 +272     ;;49999-0884-30

 +273     ;;9002226.02101,"558,49999-0884-30 ",.02)

 +274     ;;49999-0884-30

 +275     ;;9002226.02101,"558,49999-0884-90 ",.01)

 +276     ;;49999-0884-90

 +277     ;;9002226.02101,"558,49999-0884-90 ",.02)

 +278     ;;49999-0884-90

 +279     ;;9002226.02101,"558,49999-0952-30 ",.01)

 +280     ;;49999-0952-30

 +281     ;;9002226.02101,"558,49999-0952-30 ",.02)

 +282     ;;49999-0952-30

 +283     ;;9002226.02101,"558,51079-0223-01 ",.01)

 +284     ;;51079-0223-01

 +285     ;;9002226.02101,"558,51079-0223-01 ",.02)

 +286     ;;51079-0223-01

 +287     ;;9002226.02101,"558,51079-0223-20 ",.01)

 +288     ;;51079-0223-20

 +289     ;;9002226.02101,"558,51079-0223-20 ",.02)

 +290     ;;51079-0223-20

 +291     ;;9002226.02101,"558,54569-4604-01 ",.01)

 +292     ;;54569-4604-01

 +293     ;;9002226.02101,"558,54569-4604-01 ",.02)

 +294     ;;54569-4604-01

 +295     ;;9002226.02101,"558,54569-4605-00 ",.01)

 +296     ;;54569-4605-00

 +297     ;;9002226.02101,"558,54569-4605-00 ",.02)

 +298     ;;54569-4605-00

 +299     ;;9002226.02101,"558,54569-4736-00 ",.01)

 +300     ;;54569-4736-00

 +301     ;;9002226.02101,"558,54569-4736-00 ",.02)

 +302     ;;54569-4736-00

 +303     ;;9002226.02101,"558,54569-5167-00 ",.01)

 +304     ;;54569-5167-00

 +305     ;;9002226.02101,"558,54569-5167-00 ",.02)

 +306     ;;54569-5167-00

 +307     ;;9002226.02101,"558,54569-6321-00 ",.01)

 +308     ;;54569-6321-00

 +309     ;;9002226.02101,"558,54569-6321-00 ",.02)

 +310     ;;54569-6321-00

 +311     ;;9002226.02101,"558,54569-6348-00 ",.01)

 +312     ;;54569-6348-00

 +313     ;;9002226.02101,"558,54569-6348-00 ",.02)

 +314     ;;54569-6348-00

 +315     ;;9002226.02101,"558,54868-3283-00 ",.01)

 +316     ;;54868-3283-00

 +317     ;;9002226.02101,"558,54868-3283-00 ",.02)

 +318     ;;54868-3283-00

 +319     ;;9002226.02101,"558,54868-3283-01 ",.01)

 +320     ;;54868-3283-01

 +321     ;;9002226.02101,"558,54868-3283-01 ",.02)

 +322     ;;54868-3283-01

 +323     ;;9002226.02101,"558,54868-3283-02 ",.01)

 +324     ;;54868-3283-02

 +325     ;;9002226.02101,"558,54868-3283-02 ",.02)

 +326     ;;54868-3283-02

 +327     ;;9002226.02101,"558,54868-4172-00 ",.01)

 +328     ;;54868-4172-00

 +329     ;;9002226.02101,"558,54868-4172-00 ",.02)

 +330     ;;54868-4172-00

 +331     ;;9002226.02101,"558,54868-4172-01 ",.01)

 +332     ;;54868-4172-01

 +333     ;;9002226.02101,"558,54868-4172-01 ",.02)

 +334     ;;54868-4172-01

 +335     ;;9002226.02101,"558,54868-4172-02 ",.01)

 +336     ;;54868-4172-02

 +337     ;;9002226.02101,"558,54868-4172-02 ",.02)

 +338     ;;54868-4172-02

 +339     ;;9002226.02101,"558,54868-4630-00 ",.01)

 +340     ;;54868-4630-00

 +341     ;;9002226.02101,"558,54868-4630-00 ",.02)

 +342     ;;54868-4630-00

 +343     ;;9002226.02101,"558,54868-4847-00 ",.01)

 +344     ;;54868-4847-00

 +345     ;;9002226.02101,"558,54868-4847-00 ",.02)

 +346     ;;54868-4847-00

 +347     ;;9002226.02101,"558,55111-0593-30 ",.01)

 +348     ;;55111-0593-30

 +349     ;;9002226.02101,"558,55111-0593-30 ",.02)

 +350     ;;55111-0593-30

 +351     ;;9002226.02101,"558,55111-0593-90 ",.01)

 +352     ;;55111-0593-90

 +353     ;;9002226.02101,"558,55111-0593-90 ",.02)

 +354     ;;55111-0593-90

 +355     ;;9002226.02101,"558,55111-0594-30 ",.01)

 +356     ;;55111-0594-30

 +357     ;;9002226.02101,"558,55111-0594-30 ",.02)

 +358     ;;55111-0594-30

 +359     ;;9002226.02101,"558,55111-0594-90 ",.01)

 +360     ;;55111-0594-90

 +361     ;;9002226.02101,"558,55111-0594-90 ",.02)

 +362     ;;55111-0594-90

 +363     ;;9002226.02101,"558,55111-0625-60 ",.01)

 +364     ;;55111-0625-60

 +365     ;;9002226.02101,"558,55111-0625-60 ",.02)

 +366     ;;55111-0625-60

 +367     ;;9002226.02101,"558,55111-0626-60 ",.01)

 +368     ;;55111-0626-60

 +369     ;;9002226.02101,"558,55111-0626-60 ",.02)

 +370     ;;55111-0626-60

 +371     ;;9002226.02101,"558,55111-0725-10 ",.01)

 +372     ;;55111-0725-10

 +373     ;;9002226.02101,"558,55111-0725-10 ",.02)

 +374     ;;55111-0725-10

 +375     ;;9002226.02101,"558,55111-0725-30 ",.01)

 +376     ;;55111-0725-30

 +377     ;;9002226.02101,"558,55111-0725-30 ",.02)

 +378     ;;55111-0725-30

 +379     ;;9002226.02101,"558,55111-0725-90 ",.01)

 +380     ;;55111-0725-90

 +381     ;;9002226.02101,"558,55111-0725-90 ",.02)

 +382     ;;55111-0725-90

 +383     ;;9002226.02101,"558,55111-0725-94 ",.01)

 +384     ;;55111-0725-94

 +385     ;;9002226.02101,"558,55111-0725-94 ",.02)

 +386     ;;55111-0725-94

 +387     ;;9002226.02101,"558,55111-0763-03 ",.01)

 +388     ;;55111-0763-03

 +389     ;;9002226.02101,"558,55111-0763-03 ",.02)

 +390     ;;55111-0763-03

 +391     ;;9002226.02101,"558,55289-0961-15 ",.01)

 +392     ;;55289-0961-15

 +393     ;;9002226.02101,"558,55289-0961-15 ",.02)

 +394     ;;55289-0961-15

 +395     ;;9002226.02101,"558,55289-0961-30 ",.01)

 +396     ;;55289-0961-30

 +397     ;;9002226.02101,"558,55289-0961-30 ",.02)

 +398     ;;55289-0961-30

 +399     ;;9002226.02101,"558,55289-0989-21 ",.01)

 +400     ;;55289-0989-21

 +401     ;;9002226.02101,"558,55289-0989-21 ",.02)

 +402     ;;55289-0989-21

 +403     ;;9002226.02101,"558,55289-0989-30 ",.01)

 +404     ;;55289-0989-30

 +405     ;;9002226.02101,"558,55289-0989-30 ",.02)

 +406     ;;55289-0989-30

 +407     ;;9002226.02101,"558,55289-0990-21 ",.01)

 +408     ;;55289-0990-21

 +409     ;;9002226.02101,"558,55289-0990-21 ",.02)

 +410     ;;55289-0990-21

 +411     ;;9002226.02101,"558,55289-0990-30 ",.01)

 +412     ;;55289-0990-30

 +413     ;;9002226.02101,"558,55289-0990-30 ",.02)

 +414     ;;55289-0990-30

 +415     ;;9002226.02101,"558,55887-0120-90 ",.01)

 +416     ;;55887-0120-90

 +417     ;;9002226.02101,"558,55887-0120-90 ",.02)

 +418     ;;55887-0120-90

 +419     ;;9002226.02101,"558,58864-0658-30 ",.01)

 +420     ;;58864-0658-30

 +421     ;;9002226.02101,"558,58864-0658-30 ",.02)

 +422     ;;58864-0658-30

 +423     ;;9002226.02101,"558,58864-0694-30 ",.01)

 +424     ;;58864-0694-30

 +425     ;;9002226.02101,"558,58864-0694-30 ",.02)

 +426     ;;58864-0694-30

 +427     ;;9002226.02101,"558,59762-0030-01 ",.01)

 +428     ;;59762-0030-01

 +429     ;;9002226.02101,"558,59762-0030-01 ",.02)

 +430     ;;59762-0030-01

 +431     ;;9002226.02101,"558,59762-0030-02 ",.01)

 +432     ;;59762-0030-02

 +433     ;;9002226.02101,"558,59762-0030-02 ",.02)

 +434     ;;59762-0030-02

 +435     ;;9002226.02101,"558,59762-0045-01 ",.01)

 +436     ;;59762-0045-01

 +437     ;;9002226.02101,"558,59762-0045-01 ",.02)

 +438     ;;59762-0045-01

 +439     ;;9002226.02101,"558,59762-0045-02 ",.01)

 +440     ;;59762-0045-02

 +441     ;;9002226.02101,"558,59762-0045-02 ",.02)

 +442     ;;59762-0045-02

 +443     ;;9002226.02101,"558,59762-0046-01 ",.01)

 +444     ;;59762-0046-01

BGP53L2.m