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

ATXXB57.m

Go to the documentation of this file.
ATXXB57 ;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,"1804,06924ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069400Z ",.01)
 ;;069400Z 
 ;;9002226.02101,"1804,069400Z ",.02)
 ;;069400Z 
 ;;9002226.02101,"1804,069400Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06940ZZ ",.01)
 ;;06940ZZ 
 ;;9002226.02101,"1804,06940ZZ ",.02)
 ;;06940ZZ 
 ;;9002226.02101,"1804,06940ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069430Z ",.01)
 ;;069430Z 
 ;;9002226.02101,"1804,069430Z ",.02)
 ;;069430Z 
 ;;9002226.02101,"1804,069430Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06943ZZ ",.01)
 ;;06943ZZ 
 ;;9002226.02101,"1804,06943ZZ ",.02)
 ;;06943ZZ 
 ;;9002226.02101,"1804,06943ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069440Z ",.01)
 ;;069440Z 
 ;;9002226.02101,"1804,069440Z ",.02)
 ;;069440Z 
 ;;9002226.02101,"1804,069440Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06944ZZ ",.01)
 ;;06944ZZ 
 ;;9002226.02101,"1804,06944ZZ ",.02)
 ;;06944ZZ 
 ;;9002226.02101,"1804,06944ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069500Z ",.01)
 ;;069500Z 
 ;;9002226.02101,"1804,069500Z ",.02)
 ;;069500Z 
 ;;9002226.02101,"1804,069500Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06950ZZ ",.01)
 ;;06950ZZ 
 ;;9002226.02101,"1804,06950ZZ ",.02)
 ;;06950ZZ 
 ;;9002226.02101,"1804,06950ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069530Z ",.01)
 ;;069530Z 
 ;;9002226.02101,"1804,069530Z ",.02)
 ;;069530Z 
 ;;9002226.02101,"1804,069530Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06953ZZ ",.01)
 ;;06953ZZ 
 ;;9002226.02101,"1804,06953ZZ ",.02)
 ;;06953ZZ 
 ;;9002226.02101,"1804,06953ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069540Z ",.01)
 ;;069540Z 
 ;;9002226.02101,"1804,069540Z ",.02)
 ;;069540Z 
 ;;9002226.02101,"1804,069540Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06954ZZ ",.01)
 ;;06954ZZ 
 ;;9002226.02101,"1804,06954ZZ ",.02)
 ;;06954ZZ 
 ;;9002226.02101,"1804,06954ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069600Z ",.01)
 ;;069600Z 
 ;;9002226.02101,"1804,069600Z ",.02)
 ;;069600Z 
 ;;9002226.02101,"1804,069600Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06960ZZ ",.01)
 ;;06960ZZ 
 ;;9002226.02101,"1804,06960ZZ ",.02)
 ;;06960ZZ 
 ;;9002226.02101,"1804,06960ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069630Z ",.01)
 ;;069630Z 
 ;;9002226.02101,"1804,069630Z ",.02)
 ;;069630Z 
 ;;9002226.02101,"1804,069630Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06963ZZ ",.01)
 ;;06963ZZ 
 ;;9002226.02101,"1804,06963ZZ ",.02)
 ;;06963ZZ 
 ;;9002226.02101,"1804,06963ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069640Z ",.01)
 ;;069640Z 
 ;;9002226.02101,"1804,069640Z ",.02)
 ;;069640Z 
 ;;9002226.02101,"1804,069640Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06964ZZ ",.01)
 ;;06964ZZ 
 ;;9002226.02101,"1804,06964ZZ ",.02)
 ;;06964ZZ 
 ;;9002226.02101,"1804,06964ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069700Z ",.01)
 ;;069700Z 
 ;;9002226.02101,"1804,069700Z ",.02)
 ;;069700Z 
 ;;9002226.02101,"1804,069700Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06970ZZ ",.01)
 ;;06970ZZ 
 ;;9002226.02101,"1804,06970ZZ ",.02)
 ;;06970ZZ 
 ;;9002226.02101,"1804,06970ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069730Z ",.01)
 ;;069730Z 
 ;;9002226.02101,"1804,069730Z ",.02)
 ;;069730Z 
 ;;9002226.02101,"1804,069730Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06973ZZ ",.01)
 ;;06973ZZ 
 ;;9002226.02101,"1804,06973ZZ ",.02)
 ;;06973ZZ 
 ;;9002226.02101,"1804,06973ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069740Z ",.01)
 ;;069740Z 
 ;;9002226.02101,"1804,069740Z ",.02)
 ;;069740Z 
 ;;9002226.02101,"1804,069740Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06974ZZ ",.01)
 ;;06974ZZ 
 ;;9002226.02101,"1804,06974ZZ ",.02)
 ;;06974ZZ 
 ;;9002226.02101,"1804,06974ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069800Z ",.01)
 ;;069800Z 
 ;;9002226.02101,"1804,069800Z ",.02)
 ;;069800Z 
 ;;9002226.02101,"1804,069800Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06980ZZ ",.01)
 ;;06980ZZ 
 ;;9002226.02101,"1804,06980ZZ ",.02)
 ;;06980ZZ 
 ;;9002226.02101,"1804,06980ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069830Z ",.01)
 ;;069830Z 
 ;;9002226.02101,"1804,069830Z ",.02)
 ;;069830Z 
 ;;9002226.02101,"1804,069830Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06983ZZ ",.01)
 ;;06983ZZ 
 ;;9002226.02101,"1804,06983ZZ ",.02)
 ;;06983ZZ 
 ;;9002226.02101,"1804,06983ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069840Z ",.01)
 ;;069840Z 
 ;;9002226.02101,"1804,069840Z ",.02)
 ;;069840Z 
 ;;9002226.02101,"1804,069840Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06984ZZ ",.01)
 ;;06984ZZ 
 ;;9002226.02101,"1804,06984ZZ ",.02)
 ;;06984ZZ 
 ;;9002226.02101,"1804,06984ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069900Z ",.01)
 ;;069900Z 
 ;;9002226.02101,"1804,069900Z ",.02)
 ;;069900Z 
 ;;9002226.02101,"1804,069900Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06990ZZ ",.01)
 ;;06990ZZ 
 ;;9002226.02101,"1804,06990ZZ ",.02)
 ;;06990ZZ 
 ;;9002226.02101,"1804,06990ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069930Z ",.01)
 ;;069930Z 
 ;;9002226.02101,"1804,069930Z ",.02)
 ;;069930Z 
 ;;9002226.02101,"1804,069930Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06993ZZ ",.01)
 ;;06993ZZ 
 ;;9002226.02101,"1804,06993ZZ ",.02)
 ;;06993ZZ 
 ;;9002226.02101,"1804,06993ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069940Z ",.01)
 ;;069940Z 
 ;;9002226.02101,"1804,069940Z ",.02)
 ;;069940Z 
 ;;9002226.02101,"1804,069940Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06994ZZ ",.01)
 ;;06994ZZ 
 ;;9002226.02101,"1804,06994ZZ ",.02)
 ;;06994ZZ 
 ;;9002226.02101,"1804,06994ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069B00Z ",.01)
 ;;069B00Z 
 ;;9002226.02101,"1804,069B00Z ",.02)
 ;;069B00Z 
 ;;9002226.02101,"1804,069B00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069B0ZZ ",.01)
 ;;069B0ZZ 
 ;;9002226.02101,"1804,069B0ZZ ",.02)
 ;;069B0ZZ 
 ;;9002226.02101,"1804,069B0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069B30Z ",.01)
 ;;069B30Z 
 ;;9002226.02101,"1804,069B30Z ",.02)
 ;;069B30Z 
 ;;9002226.02101,"1804,069B30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069B3ZZ ",.01)
 ;;069B3ZZ 
 ;;9002226.02101,"1804,069B3ZZ ",.02)
 ;;069B3ZZ 
 ;;9002226.02101,"1804,069B3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069B40Z ",.01)
 ;;069B40Z 
 ;;9002226.02101,"1804,069B40Z ",.02)
 ;;069B40Z 
 ;;9002226.02101,"1804,069B40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069B4ZZ ",.01)
 ;;069B4ZZ 
 ;;9002226.02101,"1804,069B4ZZ ",.02)
 ;;069B4ZZ 
 ;;9002226.02101,"1804,069B4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069C00Z ",.01)
 ;;069C00Z 
 ;;9002226.02101,"1804,069C00Z ",.02)
 ;;069C00Z 
 ;;9002226.02101,"1804,069C00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069C0ZZ ",.01)
 ;;069C0ZZ 
 ;;9002226.02101,"1804,069C0ZZ ",.02)
 ;;069C0ZZ 
 ;;9002226.02101,"1804,069C0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069C30Z ",.01)
 ;;069C30Z 
 ;;9002226.02101,"1804,069C30Z ",.02)
 ;;069C30Z 
 ;;9002226.02101,"1804,069C30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069C3ZZ ",.01)
 ;;069C3ZZ 
 ;;9002226.02101,"1804,069C3ZZ ",.02)
 ;;069C3ZZ 
 ;;9002226.02101,"1804,069C3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069C40Z ",.01)
 ;;069C40Z 
 ;;9002226.02101,"1804,069C40Z ",.02)
 ;;069C40Z 
 ;;9002226.02101,"1804,069C40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069C4ZZ ",.01)
 ;;069C4ZZ 
 ;;9002226.02101,"1804,069C4ZZ ",.02)
 ;;069C4ZZ 
 ;;9002226.02101,"1804,069C4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069D00Z ",.01)
 ;;069D00Z 
 ;;9002226.02101,"1804,069D00Z ",.02)
 ;;069D00Z 
 ;;9002226.02101,"1804,069D00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069D0ZZ ",.01)
 ;;069D0ZZ 
 ;;9002226.02101,"1804,069D0ZZ ",.02)
 ;;069D0ZZ 
 ;;9002226.02101,"1804,069D0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069D30Z ",.01)
 ;;069D30Z 
 ;;9002226.02101,"1804,069D30Z ",.02)
 ;;069D30Z 
 ;;9002226.02101,"1804,069D30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069D3ZZ ",.01)
 ;;069D3ZZ 
 ;;9002226.02101,"1804,069D3ZZ ",.02)
 ;;069D3ZZ 
 ;;9002226.02101,"1804,069D3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069D40Z ",.01)
 ;;069D40Z 
 ;;9002226.02101,"1804,069D40Z ",.02)
 ;;069D40Z 
 ;;9002226.02101,"1804,069D40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069D4ZZ ",.01)
 ;;069D4ZZ 
 ;;9002226.02101,"1804,069D4ZZ ",.02)
 ;;069D4ZZ 
 ;;9002226.02101,"1804,069D4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069F00Z ",.01)
 ;;069F00Z 
 ;;9002226.02101,"1804,069F00Z ",.02)
 ;;069F00Z 
 ;;9002226.02101,"1804,069F00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069F0ZZ ",.01)
 ;;069F0ZZ 
 ;;9002226.02101,"1804,069F0ZZ ",.02)
 ;;069F0ZZ 
 ;;9002226.02101,"1804,069F0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069F30Z ",.01)
 ;;069F30Z 
 ;;9002226.02101,"1804,069F30Z ",.02)
 ;;069F30Z 
 ;;9002226.02101,"1804,069F30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069F3ZZ ",.01)
 ;;069F3ZZ 
 ;;9002226.02101,"1804,069F3ZZ ",.02)
 ;;069F3ZZ 
 ;;9002226.02101,"1804,069F3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069F40Z ",.01)
 ;;069F40Z 
 ;;9002226.02101,"1804,069F40Z ",.02)
 ;;069F40Z 
 ;;9002226.02101,"1804,069F40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069F4ZZ ",.01)
 ;;069F4ZZ 
 ;;9002226.02101,"1804,069F4ZZ ",.02)
 ;;069F4ZZ 
 ;;9002226.02101,"1804,069F4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069G00Z ",.01)
 ;;069G00Z 
 ;;9002226.02101,"1804,069G00Z ",.02)
 ;;069G00Z 
 ;;9002226.02101,"1804,069G00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069G0ZZ ",.01)
 ;;069G0ZZ 
 ;;9002226.02101,"1804,069G0ZZ ",.02)
 ;;069G0ZZ 
 ;;9002226.02101,"1804,069G0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069G30Z ",.01)
 ;;069G30Z 
 ;;9002226.02101,"1804,069G30Z ",.02)
 ;;069G30Z 
 ;;9002226.02101,"1804,069G30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069G3ZZ ",.01)
 ;;069G3ZZ 
 ;;9002226.02101,"1804,069G3ZZ ",.02)
 ;;069G3ZZ 
 ;;9002226.02101,"1804,069G3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069G40Z ",.01)
 ;;069G40Z 
 ;;9002226.02101,"1804,069G40Z ",.02)
 ;;069G40Z 
 ;;9002226.02101,"1804,069G40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069G4ZZ ",.01)
 ;;069G4ZZ 
 ;;9002226.02101,"1804,069G4ZZ ",.02)
 ;;069G4ZZ 
 ;;9002226.02101,"1804,069G4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069H00Z ",.01)
 ;;069H00Z 
 ;;9002226.02101,"1804,069H00Z ",.02)
 ;;069H00Z 
 ;;9002226.02101,"1804,069H00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069H0ZZ ",.01)
 ;;069H0ZZ 
 ;;9002226.02101,"1804,069H0ZZ ",.02)
 ;;069H0ZZ 
 ;;9002226.02101,"1804,069H0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069H30Z ",.01)
 ;;069H30Z 
 ;;9002226.02101,"1804,069H30Z ",.02)
 ;;069H30Z 
 ;;9002226.02101,"1804,069H30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069H3ZZ ",.01)
 ;;069H3ZZ 
 ;;9002226.02101,"1804,069H3ZZ ",.02)
 ;;069H3ZZ 
 ;;9002226.02101,"1804,069H3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069H40Z ",.01)
 ;;069H40Z 
 ;;9002226.02101,"1804,069H40Z ",.02)
 ;;069H40Z 
 ;;9002226.02101,"1804,069H40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069H4ZZ ",.01)
 ;;069H4ZZ 
 ;;9002226.02101,"1804,069H4ZZ ",.02)
 ;;069H4ZZ 
 ;;9002226.02101,"1804,069H4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069J00Z ",.01)
 ;;069J00Z 
 ;;9002226.02101,"1804,069J00Z ",.02)
 ;;069J00Z 
 ;;9002226.02101,"1804,069J00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069J0ZZ ",.01)
 ;;069J0ZZ 
 ;;9002226.02101,"1804,069J0ZZ ",.02)
 ;;069J0ZZ 
 ;;9002226.02101,"1804,069J0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069J30Z ",.01)
 ;;069J30Z 
 ;;9002226.02101,"1804,069J30Z ",.02)
 ;;069J30Z 
 ;;9002226.02101,"1804,069J30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069J3ZZ ",.01)
 ;;069J3ZZ 
 ;;9002226.02101,"1804,069J3ZZ ",.02)
 ;;069J3ZZ 
 ;;9002226.02101,"1804,069J3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069J40Z ",.01)
 ;;069J40Z 
 ;;9002226.02101,"1804,069J40Z ",.02)
 ;;069J40Z 
 ;;9002226.02101,"1804,069J40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069J4ZZ ",.01)
 ;;069J4ZZ 
 ;;9002226.02101,"1804,069J4ZZ ",.02)
 ;;069J4ZZ 
 ;;9002226.02101,"1804,069J4ZZ ",.03)
 ;;31