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