Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: ATXO5P2

ATXO5P2.m

Go to the documentation of this file.
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