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