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