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