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

ATXFBE15.m

Go to the documentation of this file.
  1. ATXFBE15 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JAN 23, 2018;
  1. ;;5.1;TAXONOMY;**25**;FEB 04, 1997;Build 47
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;9002226.02101,"2209,0GB60ZZ ",.01)
  1. ;;0GB60ZZ
  1. ;;9002226.02101,"2209,0GB60ZZ ",.02)
  1. ;;0GB60ZZ
  1. ;;9002226.02101,"2209,0GB60ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB63ZX ",.01)
  1. ;;0GB63ZX
  1. ;;9002226.02101,"2209,0GB63ZX ",.02)
  1. ;;0GB63ZX
  1. ;;9002226.02101,"2209,0GB63ZX ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB63ZZ ",.01)
  1. ;;0GB63ZZ
  1. ;;9002226.02101,"2209,0GB63ZZ ",.02)
  1. ;;0GB63ZZ
  1. ;;9002226.02101,"2209,0GB63ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB64ZX ",.01)
  1. ;;0GB64ZX
  1. ;;9002226.02101,"2209,0GB64ZX ",.02)
  1. ;;0GB64ZX
  1. ;;9002226.02101,"2209,0GB64ZX ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB64ZZ ",.01)
  1. ;;0GB64ZZ
  1. ;;9002226.02101,"2209,0GB64ZZ ",.02)
  1. ;;0GB64ZZ
  1. ;;9002226.02101,"2209,0GB64ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB70ZX ",.01)
  1. ;;0GB70ZX
  1. ;;9002226.02101,"2209,0GB70ZX ",.02)
  1. ;;0GB70ZX
  1. ;;9002226.02101,"2209,0GB70ZX ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB70ZZ ",.01)
  1. ;;0GB70ZZ
  1. ;;9002226.02101,"2209,0GB70ZZ ",.02)
  1. ;;0GB70ZZ
  1. ;;9002226.02101,"2209,0GB70ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB73ZX ",.01)
  1. ;;0GB73ZX
  1. ;;9002226.02101,"2209,0GB73ZX ",.02)
  1. ;;0GB73ZX
  1. ;;9002226.02101,"2209,0GB73ZX ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB73ZZ ",.01)
  1. ;;0GB73ZZ
  1. ;;9002226.02101,"2209,0GB73ZZ ",.02)
  1. ;;0GB73ZZ
  1. ;;9002226.02101,"2209,0GB73ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB74ZX ",.01)
  1. ;;0GB74ZX
  1. ;;9002226.02101,"2209,0GB74ZX ",.02)
  1. ;;0GB74ZX
  1. ;;9002226.02101,"2209,0GB74ZX ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB74ZZ ",.01)
  1. ;;0GB74ZZ
  1. ;;9002226.02101,"2209,0GB74ZZ ",.02)
  1. ;;0GB74ZZ
  1. ;;9002226.02101,"2209,0GB74ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB80ZX ",.01)
  1. ;;0GB80ZX
  1. ;;9002226.02101,"2209,0GB80ZX ",.02)
  1. ;;0GB80ZX
  1. ;;9002226.02101,"2209,0GB80ZX ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB80ZZ ",.01)
  1. ;;0GB80ZZ
  1. ;;9002226.02101,"2209,0GB80ZZ ",.02)
  1. ;;0GB80ZZ
  1. ;;9002226.02101,"2209,0GB80ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB83ZX ",.01)
  1. ;;0GB83ZX
  1. ;;9002226.02101,"2209,0GB83ZX ",.02)
  1. ;;0GB83ZX
  1. ;;9002226.02101,"2209,0GB83ZX ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB83ZZ ",.01)
  1. ;;0GB83ZZ
  1. ;;9002226.02101,"2209,0GB83ZZ ",.02)
  1. ;;0GB83ZZ
  1. ;;9002226.02101,"2209,0GB83ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB84ZX ",.01)
  1. ;;0GB84ZX
  1. ;;9002226.02101,"2209,0GB84ZX ",.02)
  1. ;;0GB84ZX
  1. ;;9002226.02101,"2209,0GB84ZX ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GB84ZZ ",.01)
  1. ;;0GB84ZZ
  1. ;;9002226.02101,"2209,0GB84ZZ ",.02)
  1. ;;0GB84ZZ
  1. ;;9002226.02101,"2209,0GB84ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GC60ZZ ",.01)
  1. ;;0GC60ZZ
  1. ;;9002226.02101,"2209,0GC60ZZ ",.02)
  1. ;;0GC60ZZ
  1. ;;9002226.02101,"2209,0GC60ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GC63ZZ ",.01)
  1. ;;0GC63ZZ
  1. ;;9002226.02101,"2209,0GC63ZZ ",.02)
  1. ;;0GC63ZZ
  1. ;;9002226.02101,"2209,0GC63ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GC64ZZ ",.01)
  1. ;;0GC64ZZ
  1. ;;9002226.02101,"2209,0GC64ZZ ",.02)
  1. ;;0GC64ZZ
  1. ;;9002226.02101,"2209,0GC64ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GC70ZZ ",.01)
  1. ;;0GC70ZZ
  1. ;;9002226.02101,"2209,0GC70ZZ ",.02)
  1. ;;0GC70ZZ
  1. ;;9002226.02101,"2209,0GC70ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GC73ZZ ",.01)
  1. ;;0GC73ZZ
  1. ;;9002226.02101,"2209,0GC73ZZ ",.02)
  1. ;;0GC73ZZ
  1. ;;9002226.02101,"2209,0GC73ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GC74ZZ ",.01)
  1. ;;0GC74ZZ
  1. ;;9002226.02101,"2209,0GC74ZZ ",.02)
  1. ;;0GC74ZZ
  1. ;;9002226.02101,"2209,0GC74ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GC80ZZ ",.01)
  1. ;;0GC80ZZ
  1. ;;9002226.02101,"2209,0GC80ZZ ",.02)
  1. ;;0GC80ZZ
  1. ;;9002226.02101,"2209,0GC80ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GC83ZZ ",.01)
  1. ;;0GC83ZZ
  1. ;;9002226.02101,"2209,0GC83ZZ ",.02)
  1. ;;0GC83ZZ
  1. ;;9002226.02101,"2209,0GC83ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GC84ZZ ",.01)
  1. ;;0GC84ZZ
  1. ;;9002226.02101,"2209,0GC84ZZ ",.02)
  1. ;;0GC84ZZ
  1. ;;9002226.02101,"2209,0GC84ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GN60ZZ ",.01)
  1. ;;0GN60ZZ
  1. ;;9002226.02101,"2209,0GN60ZZ ",.02)
  1. ;;0GN60ZZ
  1. ;;9002226.02101,"2209,0GN60ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GN63ZZ ",.01)
  1. ;;0GN63ZZ
  1. ;;9002226.02101,"2209,0GN63ZZ ",.02)
  1. ;;0GN63ZZ
  1. ;;9002226.02101,"2209,0GN63ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GN64ZZ ",.01)
  1. ;;0GN64ZZ
  1. ;;9002226.02101,"2209,0GN64ZZ ",.02)
  1. ;;0GN64ZZ
  1. ;;9002226.02101,"2209,0GN64ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GN70ZZ ",.01)
  1. ;;0GN70ZZ
  1. ;;9002226.02101,"2209,0GN70ZZ ",.02)
  1. ;;0GN70ZZ
  1. ;;9002226.02101,"2209,0GN70ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GN73ZZ ",.01)
  1. ;;0GN73ZZ
  1. ;;9002226.02101,"2209,0GN73ZZ ",.02)
  1. ;;0GN73ZZ
  1. ;;9002226.02101,"2209,0GN73ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GN74ZZ ",.01)
  1. ;;0GN74ZZ
  1. ;;9002226.02101,"2209,0GN74ZZ ",.02)
  1. ;;0GN74ZZ
  1. ;;9002226.02101,"2209,0GN74ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GN80ZZ ",.01)
  1. ;;0GN80ZZ
  1. ;;9002226.02101,"2209,0GN80ZZ ",.02)
  1. ;;0GN80ZZ
  1. ;;9002226.02101,"2209,0GN80ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GN83ZZ ",.01)
  1. ;;0GN83ZZ
  1. ;;9002226.02101,"2209,0GN83ZZ ",.02)
  1. ;;0GN83ZZ
  1. ;;9002226.02101,"2209,0GN83ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GN84ZZ ",.01)
  1. ;;0GN84ZZ
  1. ;;9002226.02101,"2209,0GN84ZZ ",.02)
  1. ;;0GN84ZZ
  1. ;;9002226.02101,"2209,0GN84ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GQ60ZZ ",.01)
  1. ;;0GQ60ZZ
  1. ;;9002226.02101,"2209,0GQ60ZZ ",.02)
  1. ;;0GQ60ZZ
  1. ;;9002226.02101,"2209,0GQ60ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GQ63ZZ ",.01)
  1. ;;0GQ63ZZ
  1. ;;9002226.02101,"2209,0GQ63ZZ ",.02)
  1. ;;0GQ63ZZ
  1. ;;9002226.02101,"2209,0GQ63ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GQ64ZZ ",.01)
  1. ;;0GQ64ZZ
  1. ;;9002226.02101,"2209,0GQ64ZZ ",.02)
  1. ;;0GQ64ZZ
  1. ;;9002226.02101,"2209,0GQ64ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GQ70ZZ ",.01)
  1. ;;0GQ70ZZ
  1. ;;9002226.02101,"2209,0GQ70ZZ ",.02)
  1. ;;0GQ70ZZ
  1. ;;9002226.02101,"2209,0GQ70ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GQ73ZZ ",.01)
  1. ;;0GQ73ZZ
  1. ;;9002226.02101,"2209,0GQ73ZZ ",.02)
  1. ;;0GQ73ZZ
  1. ;;9002226.02101,"2209,0GQ73ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GQ74ZZ ",.01)
  1. ;;0GQ74ZZ
  1. ;;9002226.02101,"2209,0GQ74ZZ ",.02)
  1. ;;0GQ74ZZ
  1. ;;9002226.02101,"2209,0GQ74ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GQ80ZZ ",.01)
  1. ;;0GQ80ZZ
  1. ;;9002226.02101,"2209,0GQ80ZZ ",.02)
  1. ;;0GQ80ZZ
  1. ;;9002226.02101,"2209,0GQ80ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GQ83ZZ ",.01)
  1. ;;0GQ83ZZ
  1. ;;9002226.02101,"2209,0GQ83ZZ ",.02)
  1. ;;0GQ83ZZ
  1. ;;9002226.02101,"2209,0GQ83ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GQ84ZZ ",.01)
  1. ;;0GQ84ZZ
  1. ;;9002226.02101,"2209,0GQ84ZZ ",.02)
  1. ;;0GQ84ZZ
  1. ;;9002226.02101,"2209,0GQ84ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GT60ZZ ",.01)
  1. ;;0GT60ZZ
  1. ;;9002226.02101,"2209,0GT60ZZ ",.02)
  1. ;;0GT60ZZ
  1. ;;9002226.02101,"2209,0GT60ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GT64ZZ ",.01)
  1. ;;0GT64ZZ
  1. ;;9002226.02101,"2209,0GT64ZZ ",.02)
  1. ;;0GT64ZZ
  1. ;;9002226.02101,"2209,0GT64ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GT70ZZ ",.01)
  1. ;;0GT70ZZ
  1. ;;9002226.02101,"2209,0GT70ZZ ",.02)
  1. ;;0GT70ZZ
  1. ;;9002226.02101,"2209,0GT70ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GT74ZZ ",.01)
  1. ;;0GT74ZZ
  1. ;;9002226.02101,"2209,0GT74ZZ ",.02)
  1. ;;0GT74ZZ
  1. ;;9002226.02101,"2209,0GT74ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GT80ZZ ",.01)
  1. ;;0GT80ZZ
  1. ;;9002226.02101,"2209,0GT80ZZ ",.02)
  1. ;;0GT80ZZ
  1. ;;9002226.02101,"2209,0GT80ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,0GT84ZZ ",.01)
  1. ;;0GT84ZZ
  1. ;;9002226.02101,"2209,0GT84ZZ ",.02)
  1. ;;0GT84ZZ
  1. ;;9002226.02101,"2209,0GT84ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,38.02 ",.01)
  1. ;;38.02
  1. ;;9002226.02101,"2209,38.02 ",.02)
  1. ;;38.02
  1. ;;9002226.02101,"2209,38.02 ",.03)
  1. ;;2
  1. ;;9002226.02101,"2209,38.12 ",.01)
  1. ;;38.12
  1. ;;9002226.02101,"2209,38.12 ",.02)
  1. ;;38.12
  1. ;;9002226.02101,"2209,38.12 ",.03)
  1. ;;2
  1. ;;9002226.02101,"2209,38.22 ",.01)
  1. ;;38.22
  1. ;;9002226.02101,"2209,38.22 ",.02)
  1. ;;38.22
  1. ;;9002226.02101,"2209,38.22 ",.03)
  1. ;;2
  1. ;;9002226.02101,"2209,38.30 ",.01)
  1. ;;38.30
  1. ;;9002226.02101,"2209,38.30 ",.02)
  1. ;;38.32
  1. ;;9002226.02101,"2209,38.30 ",.03)
  1. ;;2
  1. ;;9002226.02101,"2209,38.42 ",.01)
  1. ;;38.42
  1. ;;9002226.02101,"2209,38.42 ",.02)
  1. ;;38.42
  1. ;;9002226.02101,"2209,38.42 ",.03)
  1. ;;2
  1. ;;9002226.02101,"2209,39.22 ",.01)
  1. ;;39.22
  1. ;;9002226.02101,"2209,39.22 ",.02)
  1. ;;39.22
  1. ;;9002226.02101,"2209,39.22 ",.03)
  1. ;;2
  1. ;;9002226.02101,"2209,39.28 ",.01)
  1. ;;39.28
  1. ;;9002226.02101,"2209,39.28 ",.02)
  1. ;;39.28
  1. ;;9002226.02101,"2209,39.28 ",.03)
  1. ;;2
  1. ;;9002226.02101,"2209,88.41 ",.01)
  1. ;;88.41
  1. ;;9002226.02101,"2209,88.41 ",.02)
  1. ;;88.41
  1. ;;9002226.02101,"2209,88.41 ",.03)
  1. ;;2
  1. ;;9002226.02101,"2209,B3060ZZ ",.01)
  1. ;;B3060ZZ
  1. ;;9002226.02101,"2209,B3060ZZ ",.02)
  1. ;;B306YZZ
  1. ;;9002226.02101,"2209,B3060ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,B3070ZZ ",.01)
  1. ;;B3070ZZ
  1. ;;9002226.02101,"2209,B3070ZZ ",.02)
  1. ;;B307YZZ
  1. ;;9002226.02101,"2209,B3070ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,B3080ZZ ",.01)
  1. ;;B3080ZZ
  1. ;;9002226.02101,"2209,B3080ZZ ",.02)
  1. ;;B308YZZ
  1. ;;9002226.02101,"2209,B3080ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,B3160ZZ ",.01)
  1. ;;B3160ZZ
  1. ;;9002226.02101,"2209,B3160ZZ ",.02)
  1. ;;B3160ZZ
  1. ;;9002226.02101,"2209,B3160ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,B3161ZZ ",.01)
  1. ;;B3161ZZ
  1. ;;9002226.02101,"2209,B3161ZZ ",.02)
  1. ;;B3161ZZ
  1. ;;9002226.02101,"2209,B3161ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,B316YZZ ",.01)
  1. ;;B316YZZ
  1. ;;9002226.02101,"2209,B316YZZ ",.02)
  1. ;;B316YZZ
  1. ;;9002226.02101,"2209,B316YZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,B3170ZZ ",.01)
  1. ;;B3170ZZ
  1. ;;9002226.02101,"2209,B3170ZZ ",.02)
  1. ;;B3170ZZ
  1. ;;9002226.02101,"2209,B3170ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,B3171ZZ ",.01)
  1. ;;B3171ZZ
  1. ;;9002226.02101,"2209,B3171ZZ ",.02)
  1. ;;B3171ZZ
  1. ;;9002226.02101,"2209,B3171ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,B317YZZ ",.01)
  1. ;;B317YZZ
  1. ;;9002226.02101,"2209,B317YZZ ",.02)
  1. ;;B317YZZ
  1. ;;9002226.02101,"2209,B317YZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,B3180ZZ ",.01)
  1. ;;B3180ZZ
  1. ;;9002226.02101,"2209,B3180ZZ ",.02)
  1. ;;B3180ZZ
  1. ;;9002226.02101,"2209,B3180ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,B3181ZZ ",.01)
  1. ;;B3181ZZ
  1. ;;9002226.02101,"2209,B3181ZZ ",.02)
  1. ;;B3181ZZ
  1. ;;9002226.02101,"2209,B3181ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"2209,B318YZZ ",.01)
  1. ;;B318YZZ
  1. ;;9002226.02101,"2209,B318YZZ ",.02)
  1. ;;B318YZZ
  1. ;;9002226.02101,"2209,B318YZZ ",.03)
  1. ;;31