ATXD5P21 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 12, 2013;
;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
;
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)
;;9002226.02101,"169,Y36.890A ",.03)
;;30
;;9002226.02101,"169,Y36.890D ",.01)
;;Y36.890D
;;9002226.02101,"169,Y36.890D ",.02)
;;Y36.890D
;;9002226.02101,"169,Y36.890D ",.03)
;;30
;;9002226.02101,"169,Y36.890S ",.01)
;;Y36.890S
;;9002226.02101,"169,Y36.890S ",.02)
;;Y36.890S
;;9002226.02101,"169,Y36.890S ",.03)
;;30
;;9002226.02101,"169,Y36.891A ",.01)
;;Y36.891A
;;9002226.02101,"169,Y36.891A ",.02)
;;Y36.891A
;;9002226.02101,"169,Y36.891A ",.03)
;;30
;;9002226.02101,"169,Y36.891D ",.01)
;;Y36.891D
;;9002226.02101,"169,Y36.891D ",.02)
;;Y36.891D
;;9002226.02101,"169,Y36.891D ",.03)
;;30
;;9002226.02101,"169,Y36.891S ",.01)
;;Y36.891S
;;9002226.02101,"169,Y36.891S ",.02)
;;Y36.891S
;;9002226.02101,"169,Y36.891S ",.03)
;;30
;;9002226.02101,"169,Y36.90XA ",.01)
;;Y36.90XA
;;9002226.02101,"169,Y36.90XA ",.02)
;;Y36.90XA
;;9002226.02101,"169,Y36.90XA ",.03)
;;30
;;9002226.02101,"169,Y36.90XD ",.01)
;;Y36.90XD
;;9002226.02101,"169,Y36.90XD ",.02)
;;Y36.90XD
;;9002226.02101,"169,Y36.90XD ",.03)
;;30
;;9002226.02101,"169,Y36.90XS ",.01)
;;Y36.90XS
;;9002226.02101,"169,Y36.90XS ",.02)
;;Y36.90XS
;;9002226.02101,"169,Y36.90XS ",.03)
;;30
;;9002226.02101,"169,Y36.91XA ",.01)
;;Y36.91XA
;;9002226.02101,"169,Y36.91XA ",.02)
;;Y36.91XA
;;9002226.02101,"169,Y36.91XA ",.03)
;;30
;;9002226.02101,"169,Y36.91XD ",.01)
;;Y36.91XD
;;9002226.02101,"169,Y36.91XD ",.02)
;;Y36.91XD
;;9002226.02101,"169,Y36.91XD ",.03)
;;30
;;9002226.02101,"169,Y36.91XS ",.01)
;;Y36.91XS
;;9002226.02101,"169,Y36.91XS ",.02)
;;Y36.91XS
;;9002226.02101,"169,Y36.91XS ",.03)
;;30
;;9002226.02101,"169,Y36.92XA ",.01)
;;Y36.92XA
;;9002226.02101,"169,Y36.92XA ",.02)
;;Y36.92XA
;;9002226.02101,"169,Y36.92XA ",.03)
;;30
;;9002226.02101,"169,Y36.92XD ",.01)
;;Y36.92XD
;;9002226.02101,"169,Y36.92XD ",.02)
;;Y36.92XD
;;9002226.02101,"169,Y36.92XD ",.03)
;;30
;;9002226.02101,"169,Y36.92XS ",.01)
;;Y36.92XS
;;9002226.02101,"169,Y36.92XS ",.02)
;;Y36.92XS
;;9002226.02101,"169,Y36.92XS ",.03)
;;30
;;9002226.02101,"169,Y37.000A ",.01)
;;Y37.000A
;;9002226.02101,"169,Y37.000A ",.02)
;;Y37.000A
;;9002226.02101,"169,Y37.000A ",.03)
;;30
;;9002226.02101,"169,Y37.000D ",.01)
;;Y37.000D
;;9002226.02101,"169,Y37.000D ",.02)
;;Y37.000D
;;9002226.02101,"169,Y37.000D ",.03)
;;30
;;9002226.02101,"169,Y37.000S ",.01)
;;Y37.000S
;;9002226.02101,"169,Y37.000S ",.02)
;;Y37.000S
;;9002226.02101,"169,Y37.000S ",.03)
;;30
;;9002226.02101,"169,Y37.001A ",.01)
;;Y37.001A
;;9002226.02101,"169,Y37.001A ",.02)
;;Y37.001A
;;9002226.02101,"169,Y37.001A ",.03)
;;30
;;9002226.02101,"169,Y37.001D ",.01)
;;Y37.001D
;;9002226.02101,"169,Y37.001D ",.02)
;;Y37.001D
;;9002226.02101,"169,Y37.001D ",.03)
;;30
;;9002226.02101,"169,Y37.001S ",.01)
;;Y37.001S
;;9002226.02101,"169,Y37.001S ",.02)
;;Y37.001S
;;9002226.02101,"169,Y37.001S ",.03)
;;30
;;9002226.02101,"169,Y37.010A ",.01)
;;Y37.010A
;;9002226.02101,"169,Y37.010A ",.02)
;;Y37.010A
;;9002226.02101,"169,Y37.010A ",.03)
;;30
;;9002226.02101,"169,Y37.010D ",.01)
;;Y37.010D
;;9002226.02101,"169,Y37.010D ",.02)
;;Y37.010D
;;9002226.02101,"169,Y37.010D ",.03)
;;30
;;9002226.02101,"169,Y37.010S ",.01)
;;Y37.010S
;;9002226.02101,"169,Y37.010S ",.02)
;;Y37.010S
;;9002226.02101,"169,Y37.010S ",.03)
;;30
;;9002226.02101,"169,Y37.011A ",.01)
;;Y37.011A
;;9002226.02101,"169,Y37.011A ",.02)
;;Y37.011A
;;9002226.02101,"169,Y37.011A ",.03)
;;30
;;9002226.02101,"169,Y37.011D ",.01)
;;Y37.011D
;;9002226.02101,"169,Y37.011D ",.02)
;;Y37.011D
;;9002226.02101,"169,Y37.011D ",.03)
;;30
;;9002226.02101,"169,Y37.011S ",.01)
;;Y37.011S
;;9002226.02101,"169,Y37.011S ",.02)
;;Y37.011S
;;9002226.02101,"169,Y37.011S ",.03)
;;30
;;9002226.02101,"169,Y37.020A ",.01)
;;Y37.020A
;;9002226.02101,"169,Y37.020A ",.02)
;;Y37.020A
;;9002226.02101,"169,Y37.020A ",.03)
;;30
;;9002226.02101,"169,Y37.020D ",.01)
;;Y37.020D
;;9002226.02101,"169,Y37.020D ",.02)
;;Y37.020D
;;9002226.02101,"169,Y37.020D ",.03)
;;30
;;9002226.02101,"169,Y37.020S ",.01)
;;Y37.020S
;;9002226.02101,"169,Y37.020S ",.02)
;;Y37.020S
;;9002226.02101,"169,Y37.020S ",.03)
;;30
;;9002226.02101,"169,Y37.021A ",.01)
;;Y37.021A
;;9002226.02101,"169,Y37.021A ",.02)
;;Y37.021A
;;9002226.02101,"169,Y37.021A ",.03)
;;30
;;9002226.02101,"169,Y37.021D ",.01)
;;Y37.021D
;;9002226.02101,"169,Y37.021D ",.02)
;;Y37.021D
;;9002226.02101,"169,Y37.021D ",.03)
;;30
;;9002226.02101,"169,Y37.021S ",.01)
;;Y37.021S
;;9002226.02101,"169,Y37.021S ",.02)
;;Y37.021S
;;9002226.02101,"169,Y37.021S ",.03)
;;30
;;9002226.02101,"169,Y37.030A ",.01)
;;Y37.030A
;;9002226.02101,"169,Y37.030A ",.02)
;;Y37.030A
;;9002226.02101,"169,Y37.030A ",.03)
;;30
;;9002226.02101,"169,Y37.030D ",.01)
;;Y37.030D
;;9002226.02101,"169,Y37.030D ",.02)
;;Y37.030D
;;9002226.02101,"169,Y37.030D ",.03)
;;30
;;9002226.02101,"169,Y37.030S ",.01)
;;Y37.030S
;;9002226.02101,"169,Y37.030S ",.02)
;;Y37.030S
;;9002226.02101,"169,Y37.030S ",.03)
;;30
;;9002226.02101,"169,Y37.031A ",.01)
;;Y37.031A
;;9002226.02101,"169,Y37.031A ",.02)
;;Y37.031A
;;9002226.02101,"169,Y37.031A ",.03)
;;30
;;9002226.02101,"169,Y37.031D ",.01)
;;Y37.031D
;;9002226.02101,"169,Y37.031D ",.02)
;;Y37.031D
;;9002226.02101,"169,Y37.031D ",.03)
;;30
;;9002226.02101,"169,Y37.031S ",.01)
;;Y37.031S
;;9002226.02101,"169,Y37.031S ",.02)
;;Y37.031S
;;9002226.02101,"169,Y37.031S ",.03)
;;30
;;9002226.02101,"169,Y37.040A ",.01)
;;Y37.040A
;;9002226.02101,"169,Y37.040A ",.02)
;;Y37.040A
;;9002226.02101,"169,Y37.040A ",.03)
;;30
;;9002226.02101,"169,Y37.040D ",.01)
;;Y37.040D
;;9002226.02101,"169,Y37.040D ",.02)
;;Y37.040D
;;9002226.02101,"169,Y37.040D ",.03)
;;30
;;9002226.02101,"169,Y37.040S ",.01)
;;Y37.040S
;;9002226.02101,"169,Y37.040S ",.02)
;;Y37.040S
;;9002226.02101,"169,Y37.040S ",.03)
;;30
;;9002226.02101,"169,Y37.041A ",.01)
;;Y37.041A
;;9002226.02101,"169,Y37.041A ",.02)
;;Y37.041A
;;9002226.02101,"169,Y37.041A ",.03)
;;30
;;9002226.02101,"169,Y37.041D ",.01)
;;Y37.041D
;;9002226.02101,"169,Y37.041D ",.02)
;;Y37.041D
;;9002226.02101,"169,Y37.041D ",.03)
;;30
;;9002226.02101,"169,Y37.041S ",.01)
;;Y37.041S
;;9002226.02101,"169,Y37.041S ",.02)
;;Y37.041S
;;9002226.02101,"169,Y37.041S ",.03)
;;30
;;9002226.02101,"169,Y37.050A ",.01)
;;Y37.050A
;;9002226.02101,"169,Y37.050A ",.02)
;;Y37.050A
;;9002226.02101,"169,Y37.050A ",.03)
;;30
;;9002226.02101,"169,Y37.050D ",.01)
;;Y37.050D
;;9002226.02101,"169,Y37.050D ",.02)
;;Y37.050D
;;9002226.02101,"169,Y37.050D ",.03)
;;30
;;9002226.02101,"169,Y37.050S ",.01)
;;Y37.050S
;;9002226.02101,"169,Y37.050S ",.02)
;;Y37.050S
;;9002226.02101,"169,Y37.050S ",.03)
;;30
;;9002226.02101,"169,Y37.051A ",.01)
;;Y37.051A
;;9002226.02101,"169,Y37.051A ",.02)
;;Y37.051A
;;9002226.02101,"169,Y37.051A ",.03)
;;30
;;9002226.02101,"169,Y37.051D ",.01)
;;Y37.051D
;;9002226.02101,"169,Y37.051D ",.02)
;;Y37.051D
;;9002226.02101,"169,Y37.051D ",.03)
;;30
;;9002226.02101,"169,Y37.051S ",.01)
;;Y37.051S
;;9002226.02101,"169,Y37.051S ",.02)
;;Y37.051S
;;9002226.02101,"169,Y37.051S ",.03)
;;30
;;9002226.02101,"169,Y37.090A ",.01)
;;Y37.090A
;;9002226.02101,"169,Y37.090A ",.02)
;;Y37.090A
;;9002226.02101,"169,Y37.090A ",.03)
;;30
;;9002226.02101,"169,Y37.090D ",.01)
;;Y37.090D
;;9002226.02101,"169,Y37.090D ",.02)
;;Y37.090D
;;9002226.02101,"169,Y37.090D ",.03)
;;30
;;9002226.02101,"169,Y37.090S ",.01)
;;Y37.090S
;;9002226.02101,"169,Y37.090S ",.02)
;;Y37.090S
;;9002226.02101,"169,Y37.090S ",.03)
;;30
;;9002226.02101,"169,Y37.091A ",.01)
;;Y37.091A
;;9002226.02101,"169,Y37.091A ",.02)
;;Y37.091A
;;9002226.02101,"169,Y37.091A ",.03)
;;30
;;9002226.02101,"169,Y37.091D ",.01)
;;Y37.091D
;;9002226.02101,"169,Y37.091D ",.02)
;;Y37.091D
;;9002226.02101,"169,Y37.091D ",.03)
;;30
;;9002226.02101,"169,Y37.091S ",.01)
;;Y37.091S
;;9002226.02101,"169,Y37.091S ",.02)
;;Y37.091S
;;9002226.02101,"169,Y37.091S ",.03)
;;30
;;9002226.02101,"169,Y37.100A ",.01)
;;Y37.100A
;;9002226.02101,"169,Y37.100A ",.02)
;;Y37.100A
;;9002226.02101,"169,Y37.100A ",.03)
;;30
;;9002226.02101,"169,Y37.100D ",.01)
;;Y37.100D
;;9002226.02101,"169,Y37.100D ",.02)
;;Y37.100D
;;9002226.02101,"169,Y37.100D ",.03)
;;30
;;9002226.02101,"169,Y37.100S ",.01)
;;Y37.100S
;;9002226.02101,"169,Y37.100S ",.02)
;;Y37.100S
;;9002226.02101,"169,Y37.100S ",.03)
;;30
;;9002226.02101,"169,Y37.101A ",.01)
;;Y37.101A
;;9002226.02101,"169,Y37.101A ",.02)
;;Y37.101A
;;9002226.02101,"169,Y37.101A ",.03)
;;30
;;9002226.02101,"169,Y37.101D ",.01)
;;Y37.101D
;;9002226.02101,"169,Y37.101D ",.02)
;;Y37.101D
;;9002226.02101,"169,Y37.101D ",.03)
;;30
;;9002226.02101,"169,Y37.101S ",.01)
;;Y37.101S
;;9002226.02101,"169,Y37.101S ",.02)
;;Y37.101S
;;9002226.02101,"169,Y37.101S ",.03)
;;30
;;9002226.02101,"169,Y37.110A ",.01)
;;Y37.110A
;;9002226.02101,"169,Y37.110A ",.02)
;;Y37.110A
;;9002226.02101,"169,Y37.110A ",.03)
;;30
;;9002226.02101,"169,Y37.110D ",.01)
;;Y37.110D
;;9002226.02101,"169,Y37.110D ",.02)
;;Y37.110D
;;9002226.02101,"169,Y37.110D ",.03)
;;30
;;9002226.02101,"169,Y37.110S ",.01)
;;Y37.110S
;;9002226.02101,"169,Y37.110S ",.02)
;;Y37.110S
;;9002226.02101,"169,Y37.110S ",.03)
;;30
;;9002226.02101,"169,Y37.111A ",.01)
;;Y37.111A
;;9002226.02101,"169,Y37.111A ",.02)
;;Y37.111A
;;9002226.02101,"169,Y37.111A ",.03)
;;30
;;9002226.02101,"169,Y37.111D ",.01)
;;Y37.111D
;;9002226.02101,"169,Y37.111D ",.02)
;;Y37.111D
;;9002226.02101,"169,Y37.111D ",.03)
;;30
;;9002226.02101,"169,Y37.111S ",.01)
;;Y37.111S
;;9002226.02101,"169,Y37.111S ",.02)
;;Y37.111S
;;9002226.02101,"169,Y37.111S ",.03)
;;30
;;9002226.02101,"169,Y37.120A ",.01)
;;Y37.120A
;;9002226.02101,"169,Y37.120A ",.02)
;;Y37.120A
;;9002226.02101,"169,Y37.120A ",.03)
;;30
;;9002226.02101,"169,Y37.120D ",.01)
;;Y37.120D
;;9002226.02101,"169,Y37.120D ",.02)
;;Y37.120D
;;9002226.02101,"169,Y37.120D ",.03)
;;30
;;9002226.02101,"169,Y37.120S ",.01)
;;Y37.120S
;;9002226.02101,"169,Y37.120S ",.02)
;;Y37.120S
;;9002226.02101,"169,Y37.120S ",.03)
;;30
;;9002226.02101,"169,Y37.121A ",.01)
;;Y37.121A
;;9002226.02101,"169,Y37.121A ",.02)
;;Y37.121A
;;9002226.02101,"169,Y37.121A ",.03)
;;30
;;9002226.02101,"169,Y37.121D ",.01)
;;Y37.121D
;;9002226.02101,"169,Y37.121D ",.02)
;;Y37.121D
;;9002226.02101,"169,Y37.121D ",.03)
;;30
;;9002226.02101,"169,Y37.121S ",.01)
;;Y37.121S
;;9002226.02101,"169,Y37.121S ",.02)
;;Y37.121S
;;9002226.02101,"169,Y37.121S ",.03)
;;30
;;9002226.02101,"169,Y37.130A ",.01)
;;Y37.130A
;;9002226.02101,"169,Y37.130A ",.02)
;;Y37.130A
;;9002226.02101,"169,Y37.130A ",.03)
;;30
;;9002226.02101,"169,Y37.130D ",.01)
;;Y37.130D
;;9002226.02101,"169,Y37.130D ",.02)
;;Y37.130D
;;9002226.02101,"169,Y37.130D ",.03)
;;30
;;9002226.02101,"169,Y37.130S ",.01)
;;Y37.130S
;;9002226.02101,"169,Y37.130S ",.02)
;;Y37.130S
;;9002226.02101,"169,Y37.130S ",.03)
;;30
;;9002226.02101,"169,Y37.131A ",.01)
;;Y37.131A
;;9002226.02101,"169,Y37.131A ",.02)
;;Y37.131A
;;9002226.02101,"169,Y37.131A ",.03)
;;30
;;9002226.02101,"169,Y37.131D ",.01)
;;Y37.131D
;;9002226.02101,"169,Y37.131D ",.02)
;;Y37.131D
;;9002226.02101,"169,Y37.131D ",.03)
;;30
;;9002226.02101,"169,Y37.131S ",.01)
;;Y37.131S
;;9002226.02101,"169,Y37.131S ",.02)
;;Y37.131S
;;9002226.02101,"169,Y37.131S ",.03)
;;30
;;9002226.02101,"169,Y37.140A ",.01)
;;Y37.140A
;;9002226.02101,"169,Y37.140A ",.02)
;;Y37.140A
;;9002226.02101,"169,Y37.140A ",.03)
;;30
;;9002226.02101,"169,Y37.140D ",.01)
;;Y37.140D
;;9002226.02101,"169,Y37.140D ",.02)
;;Y37.140D
;;9002226.02101,"169,Y37.140D ",.03)
;;30
;;9002226.02101,"169,Y37.140S ",.01)
;;Y37.140S
;;9002226.02101,"169,Y37.140S ",.02)
;;Y37.140S
;;9002226.02101,"169,Y37.140S ",.03)
;;30
;;9002226.02101,"169,Y37.141A ",.01)
;;Y37.141A
;;9002226.02101,"169,Y37.141A ",.02)
;;Y37.141A
;;9002226.02101,"169,Y37.141A ",.03)
;;30
;;9002226.02101,"169,Y37.141D ",.01)
;;Y37.141D
;;9002226.02101,"169,Y37.141D ",.02)
;;Y37.141D
;;9002226.02101,"169,Y37.141D ",.03)
;;30
;;9002226.02101,"169,Y37.141S ",.01)
;;Y37.141S
;;9002226.02101,"169,Y37.141S ",.02)
;;Y37.141S
;;9002226.02101,"169,Y37.141S ",.03)
;;30
;;9002226.02101,"169,Y37.190A ",.01)
;;Y37.190A
;;9002226.02101,"169,Y37.190A ",.02)
;;Y37.190A
;;9002226.02101,"169,Y37.190A ",.03)
;;30
;;9002226.02101,"169,Y37.190D ",.01)
;;Y37.190D
;;9002226.02101,"169,Y37.190D ",.02)
;;Y37.190D
;;9002226.02101,"169,Y37.190D ",.03)
;;30
;;9002226.02101,"169,Y37.190S ",.01)
;;Y37.190S
;;9002226.02101,"169,Y37.190S ",.02)
;;Y37.190S
;;9002226.02101,"169,Y37.190S ",.03)
;;30
;;9002226.02101,"169,Y37.191A ",.01)
;;Y37.191A
ATXD5P21 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 12, 2013;
+1 ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
+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,"169,Y36.890A ",.03)
+2 ;;30
+3 ;;9002226.02101,"169,Y36.890D ",.01)
+4 ;;Y36.890D
+5 ;;9002226.02101,"169,Y36.890D ",.02)
+6 ;;Y36.890D
+7 ;;9002226.02101,"169,Y36.890D ",.03)
+8 ;;30
+9 ;;9002226.02101,"169,Y36.890S ",.01)
+10 ;;Y36.890S
+11 ;;9002226.02101,"169,Y36.890S ",.02)
+12 ;;Y36.890S
+13 ;;9002226.02101,"169,Y36.890S ",.03)
+14 ;;30
+15 ;;9002226.02101,"169,Y36.891A ",.01)
+16 ;;Y36.891A
+17 ;;9002226.02101,"169,Y36.891A ",.02)
+18 ;;Y36.891A
+19 ;;9002226.02101,"169,Y36.891A ",.03)
+20 ;;30
+21 ;;9002226.02101,"169,Y36.891D ",.01)
+22 ;;Y36.891D
+23 ;;9002226.02101,"169,Y36.891D ",.02)
+24 ;;Y36.891D
+25 ;;9002226.02101,"169,Y36.891D ",.03)
+26 ;;30
+27 ;;9002226.02101,"169,Y36.891S ",.01)
+28 ;;Y36.891S
+29 ;;9002226.02101,"169,Y36.891S ",.02)
+30 ;;Y36.891S
+31 ;;9002226.02101,"169,Y36.891S ",.03)
+32 ;;30
+33 ;;9002226.02101,"169,Y36.90XA ",.01)
+34 ;;Y36.90XA
+35 ;;9002226.02101,"169,Y36.90XA ",.02)
+36 ;;Y36.90XA
+37 ;;9002226.02101,"169,Y36.90XA ",.03)
+38 ;;30
+39 ;;9002226.02101,"169,Y36.90XD ",.01)
+40 ;;Y36.90XD
+41 ;;9002226.02101,"169,Y36.90XD ",.02)
+42 ;;Y36.90XD
+43 ;;9002226.02101,"169,Y36.90XD ",.03)
+44 ;;30
+45 ;;9002226.02101,"169,Y36.90XS ",.01)
+46 ;;Y36.90XS
+47 ;;9002226.02101,"169,Y36.90XS ",.02)
+48 ;;Y36.90XS
+49 ;;9002226.02101,"169,Y36.90XS ",.03)
+50 ;;30
+51 ;;9002226.02101,"169,Y36.91XA ",.01)
+52 ;;Y36.91XA
+53 ;;9002226.02101,"169,Y36.91XA ",.02)
+54 ;;Y36.91XA
+55 ;;9002226.02101,"169,Y36.91XA ",.03)
+56 ;;30
+57 ;;9002226.02101,"169,Y36.91XD ",.01)
+58 ;;Y36.91XD
+59 ;;9002226.02101,"169,Y36.91XD ",.02)
+60 ;;Y36.91XD
+61 ;;9002226.02101,"169,Y36.91XD ",.03)
+62 ;;30
+63 ;;9002226.02101,"169,Y36.91XS ",.01)
+64 ;;Y36.91XS
+65 ;;9002226.02101,"169,Y36.91XS ",.02)
+66 ;;Y36.91XS
+67 ;;9002226.02101,"169,Y36.91XS ",.03)
+68 ;;30
+69 ;;9002226.02101,"169,Y36.92XA ",.01)
+70 ;;Y36.92XA
+71 ;;9002226.02101,"169,Y36.92XA ",.02)
+72 ;;Y36.92XA
+73 ;;9002226.02101,"169,Y36.92XA ",.03)
+74 ;;30
+75 ;;9002226.02101,"169,Y36.92XD ",.01)
+76 ;;Y36.92XD
+77 ;;9002226.02101,"169,Y36.92XD ",.02)
+78 ;;Y36.92XD
+79 ;;9002226.02101,"169,Y36.92XD ",.03)
+80 ;;30
+81 ;;9002226.02101,"169,Y36.92XS ",.01)
+82 ;;Y36.92XS
+83 ;;9002226.02101,"169,Y36.92XS ",.02)
+84 ;;Y36.92XS
+85 ;;9002226.02101,"169,Y36.92XS ",.03)
+86 ;;30
+87 ;;9002226.02101,"169,Y37.000A ",.01)
+88 ;;Y37.000A
+89 ;;9002226.02101,"169,Y37.000A ",.02)
+90 ;;Y37.000A
+91 ;;9002226.02101,"169,Y37.000A ",.03)
+92 ;;30
+93 ;;9002226.02101,"169,Y37.000D ",.01)
+94 ;;Y37.000D
+95 ;;9002226.02101,"169,Y37.000D ",.02)
+96 ;;Y37.000D
+97 ;;9002226.02101,"169,Y37.000D ",.03)
+98 ;;30
+99 ;;9002226.02101,"169,Y37.000S ",.01)
+100 ;;Y37.000S
+101 ;;9002226.02101,"169,Y37.000S ",.02)
+102 ;;Y37.000S
+103 ;;9002226.02101,"169,Y37.000S ",.03)
+104 ;;30
+105 ;;9002226.02101,"169,Y37.001A ",.01)
+106 ;;Y37.001A
+107 ;;9002226.02101,"169,Y37.001A ",.02)
+108 ;;Y37.001A
+109 ;;9002226.02101,"169,Y37.001A ",.03)
+110 ;;30
+111 ;;9002226.02101,"169,Y37.001D ",.01)
+112 ;;Y37.001D
+113 ;;9002226.02101,"169,Y37.001D ",.02)
+114 ;;Y37.001D
+115 ;;9002226.02101,"169,Y37.001D ",.03)
+116 ;;30
+117 ;;9002226.02101,"169,Y37.001S ",.01)
+118 ;;Y37.001S
+119 ;;9002226.02101,"169,Y37.001S ",.02)
+120 ;;Y37.001S
+121 ;;9002226.02101,"169,Y37.001S ",.03)
+122 ;;30
+123 ;;9002226.02101,"169,Y37.010A ",.01)
+124 ;;Y37.010A
+125 ;;9002226.02101,"169,Y37.010A ",.02)
+126 ;;Y37.010A
+127 ;;9002226.02101,"169,Y37.010A ",.03)
+128 ;;30
+129 ;;9002226.02101,"169,Y37.010D ",.01)
+130 ;;Y37.010D
+131 ;;9002226.02101,"169,Y37.010D ",.02)
+132 ;;Y37.010D
+133 ;;9002226.02101,"169,Y37.010D ",.03)
+134 ;;30
+135 ;;9002226.02101,"169,Y37.010S ",.01)
+136 ;;Y37.010S
+137 ;;9002226.02101,"169,Y37.010S ",.02)
+138 ;;Y37.010S
+139 ;;9002226.02101,"169,Y37.010S ",.03)
+140 ;;30
+141 ;;9002226.02101,"169,Y37.011A ",.01)
+142 ;;Y37.011A
+143 ;;9002226.02101,"169,Y37.011A ",.02)
+144 ;;Y37.011A
+145 ;;9002226.02101,"169,Y37.011A ",.03)
+146 ;;30
+147 ;;9002226.02101,"169,Y37.011D ",.01)
+148 ;;Y37.011D
+149 ;;9002226.02101,"169,Y37.011D ",.02)
+150 ;;Y37.011D
+151 ;;9002226.02101,"169,Y37.011D ",.03)
+152 ;;30
+153 ;;9002226.02101,"169,Y37.011S ",.01)
+154 ;;Y37.011S
+155 ;;9002226.02101,"169,Y37.011S ",.02)
+156 ;;Y37.011S
+157 ;;9002226.02101,"169,Y37.011S ",.03)
+158 ;;30
+159 ;;9002226.02101,"169,Y37.020A ",.01)
+160 ;;Y37.020A
+161 ;;9002226.02101,"169,Y37.020A ",.02)
+162 ;;Y37.020A
+163 ;;9002226.02101,"169,Y37.020A ",.03)
+164 ;;30
+165 ;;9002226.02101,"169,Y37.020D ",.01)
+166 ;;Y37.020D
+167 ;;9002226.02101,"169,Y37.020D ",.02)
+168 ;;Y37.020D
+169 ;;9002226.02101,"169,Y37.020D ",.03)
+170 ;;30
+171 ;;9002226.02101,"169,Y37.020S ",.01)
+172 ;;Y37.020S
+173 ;;9002226.02101,"169,Y37.020S ",.02)
+174 ;;Y37.020S
+175 ;;9002226.02101,"169,Y37.020S ",.03)
+176 ;;30
+177 ;;9002226.02101,"169,Y37.021A ",.01)
+178 ;;Y37.021A
+179 ;;9002226.02101,"169,Y37.021A ",.02)
+180 ;;Y37.021A
+181 ;;9002226.02101,"169,Y37.021A ",.03)
+182 ;;30
+183 ;;9002226.02101,"169,Y37.021D ",.01)
+184 ;;Y37.021D
+185 ;;9002226.02101,"169,Y37.021D ",.02)
+186 ;;Y37.021D
+187 ;;9002226.02101,"169,Y37.021D ",.03)
+188 ;;30
+189 ;;9002226.02101,"169,Y37.021S ",.01)
+190 ;;Y37.021S
+191 ;;9002226.02101,"169,Y37.021S ",.02)
+192 ;;Y37.021S
+193 ;;9002226.02101,"169,Y37.021S ",.03)
+194 ;;30
+195 ;;9002226.02101,"169,Y37.030A ",.01)
+196 ;;Y37.030A
+197 ;;9002226.02101,"169,Y37.030A ",.02)
+198 ;;Y37.030A
+199 ;;9002226.02101,"169,Y37.030A ",.03)
+200 ;;30
+201 ;;9002226.02101,"169,Y37.030D ",.01)
+202 ;;Y37.030D
+203 ;;9002226.02101,"169,Y37.030D ",.02)
+204 ;;Y37.030D
+205 ;;9002226.02101,"169,Y37.030D ",.03)
+206 ;;30
+207 ;;9002226.02101,"169,Y37.030S ",.01)
+208 ;;Y37.030S
+209 ;;9002226.02101,"169,Y37.030S ",.02)
+210 ;;Y37.030S
+211 ;;9002226.02101,"169,Y37.030S ",.03)
+212 ;;30
+213 ;;9002226.02101,"169,Y37.031A ",.01)
+214 ;;Y37.031A
+215 ;;9002226.02101,"169,Y37.031A ",.02)
+216 ;;Y37.031A
+217 ;;9002226.02101,"169,Y37.031A ",.03)
+218 ;;30
+219 ;;9002226.02101,"169,Y37.031D ",.01)
+220 ;;Y37.031D
+221 ;;9002226.02101,"169,Y37.031D ",.02)
+222 ;;Y37.031D
+223 ;;9002226.02101,"169,Y37.031D ",.03)
+224 ;;30
+225 ;;9002226.02101,"169,Y37.031S ",.01)
+226 ;;Y37.031S
+227 ;;9002226.02101,"169,Y37.031S ",.02)
+228 ;;Y37.031S
+229 ;;9002226.02101,"169,Y37.031S ",.03)
+230 ;;30
+231 ;;9002226.02101,"169,Y37.040A ",.01)
+232 ;;Y37.040A
+233 ;;9002226.02101,"169,Y37.040A ",.02)
+234 ;;Y37.040A
+235 ;;9002226.02101,"169,Y37.040A ",.03)
+236 ;;30
+237 ;;9002226.02101,"169,Y37.040D ",.01)
+238 ;;Y37.040D
+239 ;;9002226.02101,"169,Y37.040D ",.02)
+240 ;;Y37.040D
+241 ;;9002226.02101,"169,Y37.040D ",.03)
+242 ;;30
+243 ;;9002226.02101,"169,Y37.040S ",.01)
+244 ;;Y37.040S
+245 ;;9002226.02101,"169,Y37.040S ",.02)
+246 ;;Y37.040S
+247 ;;9002226.02101,"169,Y37.040S ",.03)
+248 ;;30
+249 ;;9002226.02101,"169,Y37.041A ",.01)
+250 ;;Y37.041A
+251 ;;9002226.02101,"169,Y37.041A ",.02)
+252 ;;Y37.041A
+253 ;;9002226.02101,"169,Y37.041A ",.03)
+254 ;;30
+255 ;;9002226.02101,"169,Y37.041D ",.01)
+256 ;;Y37.041D
+257 ;;9002226.02101,"169,Y37.041D ",.02)
+258 ;;Y37.041D
+259 ;;9002226.02101,"169,Y37.041D ",.03)
+260 ;;30
+261 ;;9002226.02101,"169,Y37.041S ",.01)
+262 ;;Y37.041S
+263 ;;9002226.02101,"169,Y37.041S ",.02)
+264 ;;Y37.041S
+265 ;;9002226.02101,"169,Y37.041S ",.03)
+266 ;;30
+267 ;;9002226.02101,"169,Y37.050A ",.01)
+268 ;;Y37.050A
+269 ;;9002226.02101,"169,Y37.050A ",.02)
+270 ;;Y37.050A
+271 ;;9002226.02101,"169,Y37.050A ",.03)
+272 ;;30
+273 ;;9002226.02101,"169,Y37.050D ",.01)
+274 ;;Y37.050D
+275 ;;9002226.02101,"169,Y37.050D ",.02)
+276 ;;Y37.050D
+277 ;;9002226.02101,"169,Y37.050D ",.03)
+278 ;;30
+279 ;;9002226.02101,"169,Y37.050S ",.01)
+280 ;;Y37.050S
+281 ;;9002226.02101,"169,Y37.050S ",.02)
+282 ;;Y37.050S
+283 ;;9002226.02101,"169,Y37.050S ",.03)
+284 ;;30
+285 ;;9002226.02101,"169,Y37.051A ",.01)
+286 ;;Y37.051A
+287 ;;9002226.02101,"169,Y37.051A ",.02)
+288 ;;Y37.051A
+289 ;;9002226.02101,"169,Y37.051A ",.03)
+290 ;;30
+291 ;;9002226.02101,"169,Y37.051D ",.01)
+292 ;;Y37.051D
+293 ;;9002226.02101,"169,Y37.051D ",.02)
+294 ;;Y37.051D
+295 ;;9002226.02101,"169,Y37.051D ",.03)
+296 ;;30
+297 ;;9002226.02101,"169,Y37.051S ",.01)
+298 ;;Y37.051S
+299 ;;9002226.02101,"169,Y37.051S ",.02)
+300 ;;Y37.051S
+301 ;;9002226.02101,"169,Y37.051S ",.03)
+302 ;;30
+303 ;;9002226.02101,"169,Y37.090A ",.01)
+304 ;;Y37.090A
+305 ;;9002226.02101,"169,Y37.090A ",.02)
+306 ;;Y37.090A
+307 ;;9002226.02101,"169,Y37.090A ",.03)
+308 ;;30
+309 ;;9002226.02101,"169,Y37.090D ",.01)
+310 ;;Y37.090D
+311 ;;9002226.02101,"169,Y37.090D ",.02)
+312 ;;Y37.090D
+313 ;;9002226.02101,"169,Y37.090D ",.03)
+314 ;;30
+315 ;;9002226.02101,"169,Y37.090S ",.01)
+316 ;;Y37.090S
+317 ;;9002226.02101,"169,Y37.090S ",.02)
+318 ;;Y37.090S
+319 ;;9002226.02101,"169,Y37.090S ",.03)
+320 ;;30
+321 ;;9002226.02101,"169,Y37.091A ",.01)
+322 ;;Y37.091A
+323 ;;9002226.02101,"169,Y37.091A ",.02)
+324 ;;Y37.091A
+325 ;;9002226.02101,"169,Y37.091A ",.03)
+326 ;;30
+327 ;;9002226.02101,"169,Y37.091D ",.01)
+328 ;;Y37.091D
+329 ;;9002226.02101,"169,Y37.091D ",.02)
+330 ;;Y37.091D
+331 ;;9002226.02101,"169,Y37.091D ",.03)
+332 ;;30
+333 ;;9002226.02101,"169,Y37.091S ",.01)
+334 ;;Y37.091S
+335 ;;9002226.02101,"169,Y37.091S ",.02)
+336 ;;Y37.091S
+337 ;;9002226.02101,"169,Y37.091S ",.03)
+338 ;;30
+339 ;;9002226.02101,"169,Y37.100A ",.01)
+340 ;;Y37.100A
+341 ;;9002226.02101,"169,Y37.100A ",.02)
+342 ;;Y37.100A
+343 ;;9002226.02101,"169,Y37.100A ",.03)
+344 ;;30
+345 ;;9002226.02101,"169,Y37.100D ",.01)
+346 ;;Y37.100D
+347 ;;9002226.02101,"169,Y37.100D ",.02)
+348 ;;Y37.100D
+349 ;;9002226.02101,"169,Y37.100D ",.03)
+350 ;;30
+351 ;;9002226.02101,"169,Y37.100S ",.01)
+352 ;;Y37.100S
+353 ;;9002226.02101,"169,Y37.100S ",.02)
+354 ;;Y37.100S
+355 ;;9002226.02101,"169,Y37.100S ",.03)
+356 ;;30
+357 ;;9002226.02101,"169,Y37.101A ",.01)
+358 ;;Y37.101A
+359 ;;9002226.02101,"169,Y37.101A ",.02)
+360 ;;Y37.101A
+361 ;;9002226.02101,"169,Y37.101A ",.03)
+362 ;;30
+363 ;;9002226.02101,"169,Y37.101D ",.01)
+364 ;;Y37.101D
+365 ;;9002226.02101,"169,Y37.101D ",.02)
+366 ;;Y37.101D
+367 ;;9002226.02101,"169,Y37.101D ",.03)
+368 ;;30
+369 ;;9002226.02101,"169,Y37.101S ",.01)
+370 ;;Y37.101S
+371 ;;9002226.02101,"169,Y37.101S ",.02)
+372 ;;Y37.101S
+373 ;;9002226.02101,"169,Y37.101S ",.03)
+374 ;;30
+375 ;;9002226.02101,"169,Y37.110A ",.01)
+376 ;;Y37.110A
+377 ;;9002226.02101,"169,Y37.110A ",.02)
+378 ;;Y37.110A
+379 ;;9002226.02101,"169,Y37.110A ",.03)
+380 ;;30
+381 ;;9002226.02101,"169,Y37.110D ",.01)
+382 ;;Y37.110D
+383 ;;9002226.02101,"169,Y37.110D ",.02)
+384 ;;Y37.110D
+385 ;;9002226.02101,"169,Y37.110D ",.03)
+386 ;;30
+387 ;;9002226.02101,"169,Y37.110S ",.01)
+388 ;;Y37.110S
+389 ;;9002226.02101,"169,Y37.110S ",.02)
+390 ;;Y37.110S
+391 ;;9002226.02101,"169,Y37.110S ",.03)
+392 ;;30
+393 ;;9002226.02101,"169,Y37.111A ",.01)
+394 ;;Y37.111A
+395 ;;9002226.02101,"169,Y37.111A ",.02)
+396 ;;Y37.111A
+397 ;;9002226.02101,"169,Y37.111A ",.03)
+398 ;;30
+399 ;;9002226.02101,"169,Y37.111D ",.01)
+400 ;;Y37.111D
+401 ;;9002226.02101,"169,Y37.111D ",.02)
+402 ;;Y37.111D
+403 ;;9002226.02101,"169,Y37.111D ",.03)
+404 ;;30
+405 ;;9002226.02101,"169,Y37.111S ",.01)
+406 ;;Y37.111S
+407 ;;9002226.02101,"169,Y37.111S ",.02)
+408 ;;Y37.111S
+409 ;;9002226.02101,"169,Y37.111S ",.03)
+410 ;;30
+411 ;;9002226.02101,"169,Y37.120A ",.01)
+412 ;;Y37.120A
+413 ;;9002226.02101,"169,Y37.120A ",.02)
+414 ;;Y37.120A
+415 ;;9002226.02101,"169,Y37.120A ",.03)
+416 ;;30
+417 ;;9002226.02101,"169,Y37.120D ",.01)
+418 ;;Y37.120D
+419 ;;9002226.02101,"169,Y37.120D ",.02)
+420 ;;Y37.120D
+421 ;;9002226.02101,"169,Y37.120D ",.03)
+422 ;;30
+423 ;;9002226.02101,"169,Y37.120S ",.01)
+424 ;;Y37.120S
+425 ;;9002226.02101,"169,Y37.120S ",.02)
+426 ;;Y37.120S
+427 ;;9002226.02101,"169,Y37.120S ",.03)
+428 ;;30
+429 ;;9002226.02101,"169,Y37.121A ",.01)
+430 ;;Y37.121A
+431 ;;9002226.02101,"169,Y37.121A ",.02)
+432 ;;Y37.121A
+433 ;;9002226.02101,"169,Y37.121A ",.03)
+434 ;;30
+435 ;;9002226.02101,"169,Y37.121D ",.01)
+436 ;;Y37.121D
+437 ;;9002226.02101,"169,Y37.121D ",.02)
+438 ;;Y37.121D
+439 ;;9002226.02101,"169,Y37.121D ",.03)
+440 ;;30
+441 ;;9002226.02101,"169,Y37.121S ",.01)
+442 ;;Y37.121S
+443 ;;9002226.02101,"169,Y37.121S ",.02)
+444 ;;Y37.121S
+445 ;;9002226.02101,"169,Y37.121S ",.03)
+446 ;;30
+447 ;;9002226.02101,"169,Y37.130A ",.01)
+448 ;;Y37.130A
+449 ;;9002226.02101,"169,Y37.130A ",.02)
+450 ;;Y37.130A
+451 ;;9002226.02101,"169,Y37.130A ",.03)
+452 ;;30
+453 ;;9002226.02101,"169,Y37.130D ",.01)
+454 ;;Y37.130D
+455 ;;9002226.02101,"169,Y37.130D ",.02)
+456 ;;Y37.130D
+457 ;;9002226.02101,"169,Y37.130D ",.03)
+458 ;;30
+459 ;;9002226.02101,"169,Y37.130S ",.01)
+460 ;;Y37.130S
+461 ;;9002226.02101,"169,Y37.130S ",.02)
+462 ;;Y37.130S
+463 ;;9002226.02101,"169,Y37.130S ",.03)
+464 ;;30
+465 ;;9002226.02101,"169,Y37.131A ",.01)
+466 ;;Y37.131A
+467 ;;9002226.02101,"169,Y37.131A ",.02)
+468 ;;Y37.131A
+469 ;;9002226.02101,"169,Y37.131A ",.03)
+470 ;;30
+471 ;;9002226.02101,"169,Y37.131D ",.01)
+472 ;;Y37.131D
+473 ;;9002226.02101,"169,Y37.131D ",.02)
+474 ;;Y37.131D
+475 ;;9002226.02101,"169,Y37.131D ",.03)
+476 ;;30
+477 ;;9002226.02101,"169,Y37.131S ",.01)
+478 ;;Y37.131S
+479 ;;9002226.02101,"169,Y37.131S ",.02)
+480 ;;Y37.131S
+481 ;;9002226.02101,"169,Y37.131S ",.03)
+482 ;;30
+483 ;;9002226.02101,"169,Y37.140A ",.01)
+484 ;;Y37.140A
+485 ;;9002226.02101,"169,Y37.140A ",.02)
+486 ;;Y37.140A
+487 ;;9002226.02101,"169,Y37.140A ",.03)
+488 ;;30
+489 ;;9002226.02101,"169,Y37.140D ",.01)
+490 ;;Y37.140D
+491 ;;9002226.02101,"169,Y37.140D ",.02)
+492 ;;Y37.140D
+493 ;;9002226.02101,"169,Y37.140D ",.03)
+494 ;;30
+495 ;;9002226.02101,"169,Y37.140S ",.01)
+496 ;;Y37.140S
+497 ;;9002226.02101,"169,Y37.140S ",.02)
+498 ;;Y37.140S
+499 ;;9002226.02101,"169,Y37.140S ",.03)
+500 ;;30
+501 ;;9002226.02101,"169,Y37.141A ",.01)
+502 ;;Y37.141A
+503 ;;9002226.02101,"169,Y37.141A ",.02)
+504 ;;Y37.141A
+505 ;;9002226.02101,"169,Y37.141A ",.03)
+506 ;;30
+507 ;;9002226.02101,"169,Y37.141D ",.01)
+508 ;;Y37.141D
+509 ;;9002226.02101,"169,Y37.141D ",.02)
+510 ;;Y37.141D
+511 ;;9002226.02101,"169,Y37.141D ",.03)
+512 ;;30
+513 ;;9002226.02101,"169,Y37.141S ",.01)
+514 ;;Y37.141S
+515 ;;9002226.02101,"169,Y37.141S ",.02)
+516 ;;Y37.141S
+517 ;;9002226.02101,"169,Y37.141S ",.03)
+518 ;;30
+519 ;;9002226.02101,"169,Y37.190A ",.01)
+520 ;;Y37.190A
+521 ;;9002226.02101,"169,Y37.190A ",.02)
+522 ;;Y37.190A
+523 ;;9002226.02101,"169,Y37.190A ",.03)
+524 ;;30
+525 ;;9002226.02101,"169,Y37.190D ",.01)
+526 ;;Y37.190D
+527 ;;9002226.02101,"169,Y37.190D ",.02)
+528 ;;Y37.190D
+529 ;;9002226.02101,"169,Y37.190D ",.03)
+530 ;;30
+531 ;;9002226.02101,"169,Y37.190S ",.01)
+532 ;;Y37.190S
+533 ;;9002226.02101,"169,Y37.190S ",.02)
+534 ;;Y37.190S
+535 ;;9002226.02101,"169,Y37.190S ",.03)
+536 ;;30
+537 ;;9002226.02101,"169,Y37.191A ",.01)
+538 ;;Y37.191A