Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: ATXXB182

ATXXB182.m

Go to the documentation of this file.
  1. ATXXB182 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
  1. ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;9002226.02101,"1804,B33JYZZ ",.02)
  1. ;;B33JYZZ
  1. ;;9002226.02101,"1804,B33JYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33JZZZ ",.01)
  1. ;;B33JZZZ
  1. ;;9002226.02101,"1804,B33JZZZ ",.02)
  1. ;;B33JZZZ
  1. ;;9002226.02101,"1804,B33JZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33KY0Z ",.01)
  1. ;;B33KY0Z
  1. ;;9002226.02101,"1804,B33KY0Z ",.02)
  1. ;;B33KY0Z
  1. ;;9002226.02101,"1804,B33KY0Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33KYZZ ",.01)
  1. ;;B33KYZZ
  1. ;;9002226.02101,"1804,B33KYZZ ",.02)
  1. ;;B33KYZZ
  1. ;;9002226.02101,"1804,B33KYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33KZZZ ",.01)
  1. ;;B33KZZZ
  1. ;;9002226.02101,"1804,B33KZZZ ",.02)
  1. ;;B33KZZZ
  1. ;;9002226.02101,"1804,B33KZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33MY0Z ",.01)
  1. ;;B33MY0Z
  1. ;;9002226.02101,"1804,B33MY0Z ",.02)
  1. ;;B33MY0Z
  1. ;;9002226.02101,"1804,B33MY0Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33MYZZ ",.01)
  1. ;;B33MYZZ
  1. ;;9002226.02101,"1804,B33MYZZ ",.02)
  1. ;;B33MYZZ
  1. ;;9002226.02101,"1804,B33MYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33MZZZ ",.01)
  1. ;;B33MZZZ
  1. ;;9002226.02101,"1804,B33MZZZ ",.02)
  1. ;;B33MZZZ
  1. ;;9002226.02101,"1804,B33MZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33QY0Z ",.01)
  1. ;;B33QY0Z
  1. ;;9002226.02101,"1804,B33QY0Z ",.02)
  1. ;;B33QY0Z
  1. ;;9002226.02101,"1804,B33QY0Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33QYZZ ",.01)
  1. ;;B33QYZZ
  1. ;;9002226.02101,"1804,B33QYZZ ",.02)
  1. ;;B33QYZZ
  1. ;;9002226.02101,"1804,B33QYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33QZZZ ",.01)
  1. ;;B33QZZZ
  1. ;;9002226.02101,"1804,B33QZZZ ",.02)
  1. ;;B33QZZZ
  1. ;;9002226.02101,"1804,B33QZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33RY0Z ",.01)
  1. ;;B33RY0Z
  1. ;;9002226.02101,"1804,B33RY0Z ",.02)
  1. ;;B33RY0Z
  1. ;;9002226.02101,"1804,B33RY0Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33RYZZ ",.01)
  1. ;;B33RYZZ
  1. ;;9002226.02101,"1804,B33RYZZ ",.02)
  1. ;;B33RYZZ
  1. ;;9002226.02101,"1804,B33RYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B33RZZZ ",.01)
  1. ;;B33RZZZ
  1. ;;9002226.02101,"1804,B33RZZZ ",.02)
  1. ;;B33RZZZ
  1. ;;9002226.02101,"1804,B33RZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B340ZZZ ",.01)
  1. ;;B340ZZZ
  1. ;;9002226.02101,"1804,B340ZZZ ",.02)
  1. ;;B340ZZZ
  1. ;;9002226.02101,"1804,B340ZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B341ZZZ ",.01)
  1. ;;B341ZZZ
  1. ;;9002226.02101,"1804,B341ZZZ ",.02)
  1. ;;B341ZZZ
  1. ;;9002226.02101,"1804,B341ZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B342ZZZ ",.01)
  1. ;;B342ZZZ
  1. ;;9002226.02101,"1804,B342ZZZ ",.02)
  1. ;;B342ZZZ
  1. ;;9002226.02101,"1804,B342ZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B343ZZZ ",.01)
  1. ;;B343ZZZ
  1. ;;9002226.02101,"1804,B343ZZZ ",.02)
  1. ;;B343ZZZ
  1. ;;9002226.02101,"1804,B343ZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B344ZZZ ",.01)
  1. ;;B344ZZZ
  1. ;;9002226.02101,"1804,B344ZZZ ",.02)
  1. ;;B344ZZZ
  1. ;;9002226.02101,"1804,B344ZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B345ZZZ ",.01)
  1. ;;B345ZZZ
  1. ;;9002226.02101,"1804,B345ZZZ ",.02)
  1. ;;B345ZZZ
  1. ;;9002226.02101,"1804,B345ZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B346ZZZ ",.01)
  1. ;;B346ZZZ
  1. ;;9002226.02101,"1804,B346ZZZ ",.02)
  1. ;;B346ZZZ
  1. ;;9002226.02101,"1804,B346ZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B347ZZZ ",.01)
  1. ;;B347ZZZ
  1. ;;9002226.02101,"1804,B347ZZZ ",.02)
  1. ;;B347ZZZ
  1. ;;9002226.02101,"1804,B347ZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B348ZZZ ",.01)
  1. ;;B348ZZZ
  1. ;;9002226.02101,"1804,B348ZZZ ",.02)
  1. ;;B348ZZZ
  1. ;;9002226.02101,"1804,B348ZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B34HZZZ ",.01)
  1. ;;B34HZZZ
  1. ;;9002226.02101,"1804,B34HZZZ ",.02)
  1. ;;B34HZZZ
  1. ;;9002226.02101,"1804,B34HZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B34JZZZ ",.01)
  1. ;;B34JZZZ
  1. ;;9002226.02101,"1804,B34JZZZ ",.02)
  1. ;;B34JZZZ
  1. ;;9002226.02101,"1804,B34JZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B34KZZZ ",.01)
  1. ;;B34KZZZ
  1. ;;9002226.02101,"1804,B34KZZZ ",.02)
  1. ;;B34KZZZ
  1. ;;9002226.02101,"1804,B34KZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B34RZZZ ",.01)
  1. ;;B34RZZZ
  1. ;;9002226.02101,"1804,B34RZZZ ",.02)
  1. ;;B34RZZZ
  1. ;;9002226.02101,"1804,B34RZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B34SZZZ ",.01)
  1. ;;B34SZZZ
  1. ;;9002226.02101,"1804,B34SZZZ ",.02)
  1. ;;B34SZZZ
  1. ;;9002226.02101,"1804,B34SZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B34TZZZ ",.01)
  1. ;;B34TZZZ
  1. ;;9002226.02101,"1804,B34TZZZ ",.02)
  1. ;;B34TZZZ
  1. ;;9002226.02101,"1804,B34TZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B34VZZZ ",.01)
  1. ;;B34VZZZ
  1. ;;9002226.02101,"1804,B34VZZZ ",.02)
  1. ;;B34VZZZ
  1. ;;9002226.02101,"1804,B34VZZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4000ZZ ",.01)
  1. ;;B4000ZZ
  1. ;;9002226.02101,"1804,B4000ZZ ",.02)
  1. ;;B4000ZZ
  1. ;;9002226.02101,"1804,B4000ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4001ZZ ",.01)
  1. ;;B4001ZZ
  1. ;;9002226.02101,"1804,B4001ZZ ",.02)
  1. ;;B4001ZZ
  1. ;;9002226.02101,"1804,B4001ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B400YZZ ",.01)
  1. ;;B400YZZ
  1. ;;9002226.02101,"1804,B400YZZ ",.02)
  1. ;;B400YZZ
  1. ;;9002226.02101,"1804,B400YZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4020ZZ ",.01)
  1. ;;B4020ZZ
  1. ;;9002226.02101,"1804,B4020ZZ ",.02)
  1. ;;B4020ZZ
  1. ;;9002226.02101,"1804,B4020ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4021ZZ ",.01)
  1. ;;B4021ZZ
  1. ;;9002226.02101,"1804,B4021ZZ ",.02)
  1. ;;B4021ZZ
  1. ;;9002226.02101,"1804,B4021ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B402YZZ ",.01)
  1. ;;B402YZZ
  1. ;;9002226.02101,"1804,B402YZZ ",.02)
  1. ;;B402YZZ
  1. ;;9002226.02101,"1804,B402YZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4030ZZ ",.01)
  1. ;;B4030ZZ
  1. ;;9002226.02101,"1804,B4030ZZ ",.02)
  1. ;;B4030ZZ
  1. ;;9002226.02101,"1804,B4030ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4031ZZ ",.01)
  1. ;;B4031ZZ
  1. ;;9002226.02101,"1804,B4031ZZ ",.02)
  1. ;;B4031ZZ
  1. ;;9002226.02101,"1804,B4031ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B403YZZ ",.01)
  1. ;;B403YZZ
  1. ;;9002226.02101,"1804,B403YZZ ",.02)
  1. ;;B403YZZ
  1. ;;9002226.02101,"1804,B403YZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4040ZZ ",.01)
  1. ;;B4040ZZ
  1. ;;9002226.02101,"1804,B4040ZZ ",.02)
  1. ;;B4040ZZ
  1. ;;9002226.02101,"1804,B4040ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4041ZZ ",.01)
  1. ;;B4041ZZ
  1. ;;9002226.02101,"1804,B4041ZZ ",.02)
  1. ;;B4041ZZ
  1. ;;9002226.02101,"1804,B4041ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B404YZZ ",.01)
  1. ;;B404YZZ
  1. ;;9002226.02101,"1804,B404YZZ ",.02)
  1. ;;B404YZZ
  1. ;;9002226.02101,"1804,B404YZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4050ZZ ",.01)
  1. ;;B4050ZZ
  1. ;;9002226.02101,"1804,B4050ZZ ",.02)
  1. ;;B4050ZZ
  1. ;;9002226.02101,"1804,B4050ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4051ZZ ",.01)
  1. ;;B4051ZZ
  1. ;;9002226.02101,"1804,B4051ZZ ",.02)
  1. ;;B4051ZZ
  1. ;;9002226.02101,"1804,B4051ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B405YZZ ",.01)
  1. ;;B405YZZ
  1. ;;9002226.02101,"1804,B405YZZ ",.02)
  1. ;;B405YZZ
  1. ;;9002226.02101,"1804,B405YZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4060ZZ ",.01)
  1. ;;B4060ZZ
  1. ;;9002226.02101,"1804,B4060ZZ ",.02)
  1. ;;B4060ZZ
  1. ;;9002226.02101,"1804,B4060ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4061ZZ ",.01)
  1. ;;B4061ZZ
  1. ;;9002226.02101,"1804,B4061ZZ ",.02)
  1. ;;B4061ZZ
  1. ;;9002226.02101,"1804,B4061ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B406YZZ ",.01)
  1. ;;B406YZZ
  1. ;;9002226.02101,"1804,B406YZZ ",.02)
  1. ;;B406YZZ
  1. ;;9002226.02101,"1804,B406YZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4070ZZ ",.01)
  1. ;;B4070ZZ
  1. ;;9002226.02101,"1804,B4070ZZ ",.02)
  1. ;;B4070ZZ
  1. ;;9002226.02101,"1804,B4070ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4071ZZ ",.01)
  1. ;;B4071ZZ
  1. ;;9002226.02101,"1804,B4071ZZ ",.02)
  1. ;;B4071ZZ
  1. ;;9002226.02101,"1804,B4071ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B407YZZ ",.01)
  1. ;;B407YZZ
  1. ;;9002226.02101,"1804,B407YZZ ",.02)
  1. ;;B407YZZ
  1. ;;9002226.02101,"1804,B407YZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4080ZZ ",.01)
  1. ;;B4080ZZ
  1. ;;9002226.02101,"1804,B4080ZZ ",.02)
  1. ;;B4080ZZ
  1. ;;9002226.02101,"1804,B4080ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4081ZZ ",.01)
  1. ;;B4081ZZ
  1. ;;9002226.02101,"1804,B4081ZZ ",.02)
  1. ;;B4081ZZ
  1. ;;9002226.02101,"1804,B4081ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B408YZZ ",.01)
  1. ;;B408YZZ
  1. ;;9002226.02101,"1804,B408YZZ ",.02)
  1. ;;B408YZZ
  1. ;;9002226.02101,"1804,B408YZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4090ZZ ",.01)
  1. ;;B4090ZZ
  1. ;;9002226.02101,"1804,B4090ZZ ",.02)
  1. ;;B4090ZZ
  1. ;;9002226.02101,"1804,B4090ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4091ZZ ",.01)
  1. ;;B4091ZZ
  1. ;;9002226.02101,"1804,B4091ZZ ",.02)
  1. ;;B4091ZZ
  1. ;;9002226.02101,"1804,B4091ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B409YZZ ",.01)
  1. ;;B409YZZ
  1. ;;9002226.02101,"1804,B409YZZ ",.02)
  1. ;;B409YZZ
  1. ;;9002226.02101,"1804,B409YZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40B0ZZ ",.01)
  1. ;;B40B0ZZ
  1. ;;9002226.02101,"1804,B40B0ZZ ",.02)
  1. ;;B40B0ZZ
  1. ;;9002226.02101,"1804,B40B0ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40B1ZZ ",.01)
  1. ;;B40B1ZZ
  1. ;;9002226.02101,"1804,B40B1ZZ ",.02)
  1. ;;B40B1ZZ
  1. ;;9002226.02101,"1804,B40B1ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40BYZZ ",.01)
  1. ;;B40BYZZ
  1. ;;9002226.02101,"1804,B40BYZZ ",.02)
  1. ;;B40BYZZ
  1. ;;9002226.02101,"1804,B40BYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40C0ZZ ",.01)
  1. ;;B40C0ZZ
  1. ;;9002226.02101,"1804,B40C0ZZ ",.02)
  1. ;;B40C0ZZ
  1. ;;9002226.02101,"1804,B40C0ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40C1ZZ ",.01)
  1. ;;B40C1ZZ
  1. ;;9002226.02101,"1804,B40C1ZZ ",.02)
  1. ;;B40C1ZZ
  1. ;;9002226.02101,"1804,B40C1ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40CYZZ ",.01)
  1. ;;B40CYZZ
  1. ;;9002226.02101,"1804,B40CYZZ ",.02)
  1. ;;B40CYZZ
  1. ;;9002226.02101,"1804,B40CYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40D0ZZ ",.01)
  1. ;;B40D0ZZ
  1. ;;9002226.02101,"1804,B40D0ZZ ",.02)
  1. ;;B40D0ZZ
  1. ;;9002226.02101,"1804,B40D0ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40D1ZZ ",.01)
  1. ;;B40D1ZZ
  1. ;;9002226.02101,"1804,B40D1ZZ ",.02)
  1. ;;B40D1ZZ
  1. ;;9002226.02101,"1804,B40D1ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40DYZZ ",.01)
  1. ;;B40DYZZ
  1. ;;9002226.02101,"1804,B40DYZZ ",.02)
  1. ;;B40DYZZ
  1. ;;9002226.02101,"1804,B40DYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40F0ZZ ",.01)
  1. ;;B40F0ZZ
  1. ;;9002226.02101,"1804,B40F0ZZ ",.02)
  1. ;;B40F0ZZ
  1. ;;9002226.02101,"1804,B40F0ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40F1ZZ ",.01)
  1. ;;B40F1ZZ
  1. ;;9002226.02101,"1804,B40F1ZZ ",.02)
  1. ;;B40F1ZZ
  1. ;;9002226.02101,"1804,B40F1ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40FYZZ ",.01)
  1. ;;B40FYZZ
  1. ;;9002226.02101,"1804,B40FYZZ ",.02)
  1. ;;B40FYZZ
  1. ;;9002226.02101,"1804,B40FYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40G0ZZ ",.01)
  1. ;;B40G0ZZ
  1. ;;9002226.02101,"1804,B40G0ZZ ",.02)
  1. ;;B40G0ZZ
  1. ;;9002226.02101,"1804,B40G0ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40G1ZZ ",.01)
  1. ;;B40G1ZZ
  1. ;;9002226.02101,"1804,B40G1ZZ ",.02)
  1. ;;B40G1ZZ
  1. ;;9002226.02101,"1804,B40G1ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40GYZZ ",.01)
  1. ;;B40GYZZ
  1. ;;9002226.02101,"1804,B40GYZZ ",.02)
  1. ;;B40GYZZ
  1. ;;9002226.02101,"1804,B40GYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40J0ZZ ",.01)
  1. ;;B40J0ZZ
  1. ;;9002226.02101,"1804,B40J0ZZ ",.02)
  1. ;;B40J0ZZ
  1. ;;9002226.02101,"1804,B40J0ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40J1ZZ ",.01)
  1. ;;B40J1ZZ
  1. ;;9002226.02101,"1804,B40J1ZZ ",.02)
  1. ;;B40J1ZZ
  1. ;;9002226.02101,"1804,B40J1ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40JYZZ ",.01)
  1. ;;B40JYZZ
  1. ;;9002226.02101,"1804,B40JYZZ ",.02)
  1. ;;B40JYZZ
  1. ;;9002226.02101,"1804,B40JYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40M0ZZ ",.01)
  1. ;;B40M0ZZ
  1. ;;9002226.02101,"1804,B40M0ZZ ",.02)
  1. ;;B40M0ZZ
  1. ;;9002226.02101,"1804,B40M0ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40M1ZZ ",.01)
  1. ;;B40M1ZZ
  1. ;;9002226.02101,"1804,B40M1ZZ ",.02)
  1. ;;B40M1ZZ
  1. ;;9002226.02101,"1804,B40M1ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B40MYZZ ",.01)
  1. ;;B40MYZZ
  1. ;;9002226.02101,"1804,B40MYZZ ",.02)
  1. ;;B40MYZZ
  1. ;;9002226.02101,"1804,B40MYZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,B4100ZZ ",.01)
  1. ;;B4100ZZ
  1. ;;9002226.02101,"1804,B4100ZZ ",.02)
  1. ;;B4100ZZ