ATXXB18.m

ATXXB18 ;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)

 ;;21,"0XB34ZX ")

 ;;6761

 ;;21,"0XB34ZZ ")

 ;;6762

 ;;21,"0XB40ZX ")

 ;;6763

 ;;21,"0XB40ZZ ")

 ;;6764

 ;;21,"0XB43ZX ")

 ;;6765

 ;;21,"0XB43ZZ ")

 ;;6766

 ;;21,"0XB44ZX ")

 ;;6767

 ;;21,"0XB44ZZ ")

 ;;6768

 ;;21,"0XB50ZX ")

 ;;6769

 ;;21,"0XB50ZZ ")

 ;;6770

 ;;21,"0XB53ZX ")

 ;;6771

 ;;21,"0XB53ZZ ")

 ;;6772

 ;;21,"0XB54ZX ")

 ;;6773

 ;;21,"0XB54ZZ ")

 ;;6774

 ;;21,"0XB60ZX ")

 ;;6775

 ;;21,"0XB60ZZ ")

 ;;6776

 ;;21,"0XB63ZX ")

 ;;6777

 ;;21,"0XB63ZZ ")

 ;;6778

 ;;21,"0XB64ZX ")

 ;;6779

 ;;21,"0XB64ZZ ")

 ;;6780

 ;;21,"0XB70ZX ")

 ;;6781

 ;;21,"0XB70ZZ ")

 ;;6782

 ;;21,"0XB73ZX ")

 ;;6783

 ;;21,"0XB73ZZ ")

 ;;6784

 ;;21,"0XB74ZX ")

 ;;6785

 ;;21,"0XB74ZZ ")

 ;;6786

 ;;21,"0XB80ZX ")

 ;;6787

 ;;21,"0XB80ZZ ")

 ;;6788

 ;;21,"0XB83ZX ")

 ;;6789

 ;;21,"0XB83ZZ ")

 ;;6790

 ;;21,"0XB84ZX ")

 ;;6791

 ;;21,"0XB84ZZ ")

 ;;6792

 ;;21,"0XB90ZX ")

 ;;6793

 ;;21,"0XB90ZZ ")

 ;;6794

 ;;21,"0XB93ZX ")

 ;;6795

 ;;21,"0XB93ZZ ")

 ;;6796

 ;;21,"0XB94ZX ")

 ;;6797

 ;;21,"0XB94ZZ ")

 ;;6798

 ;;21,"0XBB0ZX ")

 ;;6799

 ;;21,"0XBB0ZZ ")

 ;;6800

 ;;21,"0XBB3ZX ")

 ;;6801

 ;;21,"0XBB3ZZ ")

 ;;6802

 ;;21,"0XBB4ZX ")

 ;;6803

 ;;21,"0XBB4ZZ ")

 ;;6804

 ;;21,"0XBC0ZX ")

 ;;6805

 ;;21,"0XBC0ZZ ")

 ;;6806

 ;;21,"0XBC3ZX ")

 ;;6807

 ;;21,"0XBC3ZZ ")

 ;;6808

 ;;21,"0XBC4ZX ")

 ;;6809

 ;;21,"0XBC4ZZ ")

 ;;6810

 ;;21,"0XBD0ZX ")

 ;;6811

 ;;21,"0XBD0ZZ ")

 ;;6812

 ;;21,"0XBD3ZX ")

 ;;6813

 ;;21,"0XBD3ZZ ")

 ;;6814

 ;;21,"0XBD4ZX ")

 ;;6815

 ;;21,"0XBD4ZZ ")

 ;;6816

 ;;21,"0XBF0ZX ")

 ;;6817

 ;;21,"0XBF0ZZ ")

 ;;6818

 ;;21,"0XBF3ZX ")

 ;;6819

 ;;21,"0XBF3ZZ ")

 ;;6820

 ;;21,"0XBF4ZX ")

 ;;6821

 ;;21,"0XBF4ZZ ")

 ;;6822

 ;;21,"0XBG0ZX ")

 ;;6823

 ;;21,"0XBG0ZZ ")

 ;;6824

 ;;21,"0XBG3ZX ")

 ;;6825

 ;;21,"0XBG3ZZ ")

 ;;6826

 ;;21,"0XBG4ZX ")

 ;;6827

 ;;21,"0XBG4ZZ ")

 ;;6828

 ;;21,"0XBH0ZX ")

 ;;6829

 ;;21,"0XBH0ZZ ")

 ;;6830

 ;;21,"0XBH3ZX ")

 ;;6831

 ;;21,"0XBH3ZZ ")

 ;;6832

 ;;21,"0XBH4ZX ")

 ;;6833

 ;;21,"0XBH4ZZ ")

 ;;6834

 ;;21,"0XBJ0ZX ")

 ;;6835

 ;;21,"0XBJ0ZZ ")

 ;;6836

 ;;21,"0XBJ3ZX ")

 ;;6837

 ;;21,"0XBJ3ZZ ")

 ;;6838

 ;;21,"0XBJ4ZX ")

 ;;6839

 ;;21,"0XBJ4ZZ ")

 ;;6840

 ;;21,"0XBK0ZX ")

 ;;6841

 ;;21,"0XBK0ZZ ")

 ;;6842

 ;;21,"0XBK3ZX ")

 ;;6843

 ;;21,"0XBK3ZZ ")

 ;;6844

 ;;21,"0XBK4ZX ")

 ;;6845

 ;;21,"0XBK4ZZ ")

 ;;6846

 ;;21,"0XH201Z ")

 ;;6847

 ;;21,"0XH203Z ")

 ;;6848

 ;;21,"0XH20YZ ")

 ;;6849

 ;;21,"0XH231Z ")

 ;;6850

 ;;21,"0XH233Z ")

 ;;6851

 ;;21,"0XH23YZ ")

 ;;6852

 ;;21,"0XH241Z ")

 ;;6853

 ;;21,"0XH243Z ")

 ;;6854

 ;;21,"0XH24YZ ")

 ;;6855

 ;;21,"0XH301Z ")

 ;;6856

 ;;21,"0XH303Z ")

 ;;6857

 ;;21,"0XH30YZ ")

 ;;6858

 ;;21,"0XH331Z ")

 ;;6859

 ;;21,"0XH333Z ")

 ;;6860

 ;;21,"0XH33YZ ")

 ;;6861

 ;;21,"0XH341Z ")

 ;;6862

 ;;21,"0XH343Z ")

 ;;6863

 ;;21,"0XH34YZ ")

 ;;6864

 ;;21,"0XH401Z ")

 ;;6865

 ;;21,"0XH403Z ")

 ;;6866

 ;;21,"0XH40YZ ")

 ;;6867

 ;;21,"0XH431Z ")

 ;;6868

 ;;21,"0XH433Z ")

 ;;6869

 ;;21,"0XH43YZ ")

 ;;6870

 ;;21,"0XH441Z ")

 ;;6871

 ;;21,"0XH443Z ")

 ;;6872

 ;;21,"0XH44YZ ")

 ;;6873

 ;;21,"0XH501Z ")

 ;;6874

 ;;21,"0XH503Z ")

 ;;6875

 ;;21,"0XH50YZ ")

 ;;6876

 ;;21,"0XH531Z ")

 ;;6877

 ;;21,"0XH533Z ")

 ;;6878

 ;;21,"0XH53YZ ")

 ;;6879

 ;;21,"0XH541Z ")

 ;;6880

 ;;21,"0XH543Z ")

 ;;6881

 ;;21,"0XH54YZ ")

 ;;6882

 ;;21,"0XH601Z ")

 ;;6883

 ;;21,"0XH603Z ")

 ;;6884

 ;;21,"0XH60YZ ")

 ;;6885

 ;;21,"0XH631Z ")

 ;;6886

 ;;21,"0XH633Z ")

 ;;6887

 ;;21,"0XH63YZ ")

 ;;6888

 ;;21,"0XH641Z ")

 ;;6889

 ;;21,"0XH643Z ")

 ;;6890

 ;;21,"0XH64YZ ")

 ;;6891

 ;;21,"0XH701Z ")

 ;;6892

 ;;21,"0XH703Z ")

 ;;6893

 ;;21,"0XH70YZ ")

 ;;6894

 ;;21,"0XH731Z ")

 ;;6895

 ;;21,"0XH733Z ")

 ;;6896

 ;;21,"0XH73YZ ")

 ;;6897

 ;;21,"0XH741Z ")

 ;;6898

 ;;21,"0XH743Z ")

 ;;6899

 ;;21,"0XH74YZ ")

 ;;6900

 ;;21,"0XH801Z ")

 ;;6901

 ;;21,"0XH803Z ")

 ;;6902

 ;;21,"0XH80YZ ")

 ;;6903

 ;;21,"0XH831Z ")

 ;;6904

 ;;21,"0XH833Z ")

 ;;6905

 ;;21,"0XH83YZ ")

 ;;6906

 ;;21,"0XH841Z ")

 ;;6907

 ;;21,"0XH843Z ")

 ;;6908

 ;;21,"0XH84YZ ")

 ;;6909

 ;;21,"0XH901Z ")

 ;;6910

 ;;21,"0XH903Z ")

 ;;6911

 ;;21,"0XH90YZ ")

 ;;6912

 ;;21,"0XH931Z ")

 ;;6913

 ;;21,"0XH933Z ")

 ;;6914

 ;;21,"0XH93YZ ")

 ;;6915

 ;;21,"0XH941Z ")

 ;;6916

 ;;21,"0XH943Z ")

 ;;6917

 ;;21,"0XH94YZ ")

 ;;6918

 ;;21,"0XHB01Z ")

 ;;6919

 ;;21,"0XHB03Z ")

 ;;6920

 ;;21,"0XHB0YZ ")

 ;;6921

 ;;21,"0XHB31Z ")

 ;;6922

 ;;21,"0XHB33Z ")

 ;;6923

 ;;21,"0XHB3YZ ")

 ;;6924

 ;;21,"0XHB41Z ")

 ;;6925

 ;;21,"0XHB43Z ")

 ;;6926

 ;;21,"0XHB4YZ ")

 ;;6927

 ;;21,"0XHC01Z ")

 ;;6928

 ;;21,"0XHC03Z ")

 ;;6929

 ;;21,"0XHC0YZ ")

 ;;6930

 ;;21,"0XHC31Z ")

 ;;6931

 ;;21,"0XHC33Z ")

 ;;6932

 ;;21,"0XHC3YZ ")

 ;;6933

 ;;21,"0XHC41Z ")

 ;;6934

 ;;21,"0XHC43Z ")

 ;;6935

 ;;21,"0XHC4YZ ")

 ;;6936

 ;;21,"0XHD01Z ")

 ;;6937

 ;;21,"0XHD03Z ")

 ;;6938

 ;;21,"0XHD0YZ ")

 ;;6939

 ;;21,"0XHD31Z ")

 ;;6940

 ;;21,"0XHD33Z ")

 ;;6941

 ;;21,"0XHD3YZ ")

 ;;6942

 ;;21,"0XHD41Z ")

 ;;6943

 ;;21,"0XHD43Z ")

 ;;6944

 ;;21,"0XHD4YZ ")

 ;;6945

 ;;21,"0XHF01Z ")

 ;;6946

 ;;21,"0XHF03Z ")

 ;;6947

 ;;21,"0XHF0YZ ")

 ;;6948

 ;;21,"0XHF31Z ")

 ;;6949

 ;;21,"0XHF33Z ")

 ;;6950

 ;;21,"0XHF3YZ ")

 ;;6951

 ;;21,"0XHF41Z ")

 ;;6952

 ;;21,"0XHF43Z ")

 ;;6953

 ;;21,"0XHF4YZ ")

 ;;6954

 ;;21,"0XHG01Z ")

 ;;6955

 ;;21,"0XHG03Z ")

 ;;6956

 ;;21,"0XHG0YZ ")

 ;;6957

 ;;21,"0XHG31Z ")

 ;;6958

 ;;21,"0XHG33Z ")

 ;;6959

 ;;21,"0XHG3YZ ")

 ;;6960

 ;;21,"0XHG41Z ")

 ;;6961

 ;;21,"0XHG43Z ")

 ;;6962

 ;;21,"0XHG4YZ ")

 ;;6963

 ;;21,"0XHH01Z ")

 ;;6964

 ;;21,"0XHH03Z ")

 ;;6965

 ;;21,"0XHH0YZ ")

 ;;6966

 ;;21,"0XHH31Z ")

 ;;6967

 ;;21,"0XHH33Z ")

 ;;6968

 ;;21,"0XHH3YZ ")

 ;;6969

 ;;21,"0XHH41Z ")

 ;;6970

 ;;21,"0XHH43Z ")

 ;;6971

 ;;21,"0XHH4YZ ")

 ;;6972

 ;;21,"0XHJ01Z ")

 ;;6973

 ;;21,"0XHJ03Z ")

 ;;6974

 ;;21,"0XHJ0YZ ")

 ;;6975

 ;;21,"0XHJ31Z ")

 ;;6976

 ;;21,"0XHJ33Z ")

 ;;6977

 ;;21,"0XHJ3YZ ")

 ;;6978

 ;;21,"0XHJ41Z ")

 ;;6979

 ;;21,"0XHJ43Z ")

 ;;6980

 ;;21,"0XHJ4YZ ")

 ;;6981

 ;;21,"0XHK01Z ")

 ;;6982

 ;;21,"0XHK03Z ")

 ;;6983

 ;;21,"0XHK0YZ ")

 ;;6984

 ;;21,"0XHK31Z ")

 ;;6985

 ;;21,"0XHK33Z ")

 ;;6986

 ;;21,"0XHK3YZ ")

 ;;6987

 ;;21,"0XHK41Z ")

 ;;6988

 ;;21,"0XHK43Z ")

 ;;6989

 ;;21,"0XHK4YZ ")

 ;;6990

 ;;21,"0XJ20ZZ ")

 ;;6991

 ;;21,"0XJ23ZZ ")

 ;;6992

 ;;21,"0XJ24ZZ ")

 ;;6993

 ;;21,"0XJ2XZZ ")

 ;;6994

 ;;21,"0XJ30ZZ ")

 ;;6995

 ;;21,"0XJ33ZZ ")

 ;;6996

 ;;21,"0XJ34ZZ ")

 ;;6997

 ;;21,"0XJ3XZZ ")

 ;;6998

 ;;21,"0XJ40ZZ ")

 ;;6999

 ;;21,"0XJ43ZZ ")

 ;;7000

 ;;21,"0XJ44ZZ ")

 ;;7001

 ;;21,"0XJ4XZZ ")

 ;;7002

 ;;21,"0XJ50ZZ ")

 ;;7003

 ;;21,"0XJ53ZZ ")

 ;;7004

 ;;21,"0XJ54ZZ ")

 ;;7005

 ;;21,"0XJ5XZZ ")

 ;;7006

 ;;21,"0XJ60ZZ ")

 ;;7007

 ;;21,"0XJ63ZZ ")

 ;;7008

 ;;21,"0XJ64ZZ ")

 ;;7009

 ;;21,"0XJ6XZZ ")

 ;;7010

 ;;21,"0XJ70ZZ ")

 ;;7011

 ;;21,"0XJ73ZZ ")

 ;;7012

 ;;21,"0XJ74ZZ ")

 ;;7013

 ;;21,"0XJ7XZZ ")

 ;;7014

 ;;21,"0XJ80ZZ ")

 ;;7015

 ;;21,"0XJ83ZZ ")

 ;;7016

 ;;21,"0XJ84ZZ ")

 ;;7017

 ;;21,"0XJ8XZZ ")

 ;;7018

 ;;21,"0XJ90ZZ ")

 ;;7019

 ;;21,"0XJ93ZZ ")

 ;;7020

 ;;21,"0XJ94ZZ ")

 ;;7021

 ;;21,"0XJ9XZZ ")

 ;;7022

 ;;21,"0XJB0ZZ ")

 ;;7023

 ;;21,"0XJB3ZZ ")

 ;;7024

 ;;21,"0XJB4ZZ ")

 ;;7025

 ;;21,"0XJBXZZ ")

 ;;7026

 ;;21,"0XJC0ZZ ")

 ;;7027

 ;;21,"0XJC3ZZ ")

 ;;7028

 ;;21,"0XJC4ZZ ")

 ;;7029

 ;;21,"0XJCXZZ ")

 ;;7030

 ;;21,"0XJD0ZZ ")

 ;;7031

 ;;21,"0XJD3ZZ ")

 ;;7032

 ;;21,"0XJD4ZZ ")

 ;;7033

 ;;21,"0XJDXZZ ")

 ;;7034

 ;;21,"0XJF0ZZ ")

 ;;7035

 ;;21,"0XJF3ZZ ")

 ;;7036

 ;;21,"0XJF4ZZ ")

 ;;7037

 ;;21,"0XJFXZZ ")

 ;;7038

 ;;21,"0XJG0ZZ ")

 ;;7039

 ;;21,"0XJG3ZZ ")

 ;;7040

 ;;21,"0XJG4ZZ ")

 ;;7041

 ;;21,"0XJGXZZ ")

 ;;7042

 ;;21,"0XJH0ZZ ")

 ;;7043

 ;;21,"0XJH3ZZ ")

 ;;7044

 ;;21,"0XJH4ZZ ")

 ;;7045

 ;;21,"0XJHXZZ ")

 ;;7046

 ;;21,"0XJJ0ZZ ")

 ;;7047

 ;;21,"0XJJXZZ ")

 ;;7048

 ;;21,"0XJK0ZZ ")

 ;;7049

 ;;21,"0XJKXZZ ")

 ;;7050

 ;;21,"0XP600Z ")

 ;;7051

 ;;21,"0XP601Z ")

 ;;7052

 ;;21,"0XP603Z ")

 ;;7053

 ;;21,"0XP607Z ")

 ;;7054

 ;;21,"0XP60JZ ")

 ;;7055

 ;;21,"0XP60KZ ")

 ;;7056

 ;;21,"0XP60YZ ")

 ;;7057

 ;;21,"0XP630Z ")

 ;;7058

 ;;21,"0XP631Z ")

 ;;7059

 ;;21,"0XP633Z ")

 ;;7060

 ;;21,"0XP637Z ")

 ;;7061

 ;;21,"0XP63JZ ")

 ;;7062

 ;;21,"0XP63KZ ")

 ;;7063

 ;;21,"0XP63YZ ")

 ;;7064

 ;;21,"0XP640Z ")

 ;;7065

 ;;21,"0XP641Z ")

 ;;7066

 ;;21,"0XP643Z ")

 ;;7067

 ;;21,"0XP647Z ")

 ;;7068

 ;;21,"0XP64JZ ")

 ;;7069

 ;;21,"0XP64KZ ")

 ;;7070

 ;;21,"0XP64YZ ")

 ;;7071

 ;;21,"0XP6X0Z ")

 ;;7072

 ;;21,"0XP6X1Z ")

 ;;7073

 ;;21,"0XP6X3Z ")

 ;;7074

 ;;21,"0XP6X7Z ")

 ;;7075

 ;;21,"0XP6XJZ ")

 ;;7076

 ;;21,"0XP6XKZ ")

 ;;7077

 ;;21,"0XP6XYZ ")

 ;;7078

 ;;21,"0XP700Z ")

 ;;7079

 ;;21,"0XP701Z ")

 ;;7080

 ;;21,"0XP703Z ")

 ;;7081

 ;;21,"0XP707Z ")

 ;;7082

 ;;21,"0XP70JZ ")

 ;;7083

 ;;21,"0XP70KZ ")

 ;;7084

 ;;21,"0XP70YZ ")

 ;;7085

 ;;21,"0XP730Z ")

 ;;7086

 ;;21,"0XP731Z ")

 ;;7087

 ;;21,"0XP733Z ")

 ;;7088

 ;;21,"0XP737Z ")

 ;;7089

 ;;21,"0XP73JZ ")

 ;;7090

 ;;21,"0XP73KZ ")

 ;;7091

 ;;21,"0XP73YZ ")

 ;;7092

 ;;21,"0XP740Z ")

 ;;7093

 ;;21,"0XP741Z ")

 ;;7094

 ;;21,"0XP743Z ")

 ;;7095

 ;;21,"0XP747Z ")

 ;;7096

 ;;21,"0XP74JZ ")

 ;;7097

 ;;21,"0XP74KZ ")

 ;;7098

 ;;21,"0XP74YZ ")

 ;;7099

 ;;21,"0XP7X0Z ")

 ;;7100

 ;;21,"0XP7X1Z ")

 ;;7101

 ;;21,"0XP7X3Z ")

 ;;7102

 ;;21,"0XP7X7Z ")

 ;;7103

 ;;21,"0XP7XJZ ")

 ;;7104

 ;;21,"0XP7XKZ ")

 ;;7105

 ;;21,"0XP7XYZ ")

 ;;7106

 ;;21,"0XU207Z ")

 ;;7107

 ;;21,"0XU20JZ ")

 ;;7108

 ;;21,"0XU20KZ ")

 ;;7109

 ;;21,"0XU247Z ")

 ;;7110

 ;;21,"0XU24JZ ")

 ;;7111

 ;;21,"0XU24KZ ")

 ;;7112

 ;;21,"0XU307Z ")

 ;;7113

 ;;21,"0XU30JZ ")

 ;;7114

 ;;21,"0XU30KZ ")

 ;;7115

 ;;21,"0XU347Z ")

 ;;7116

 ;;21,"0XU34JZ ")

 ;;7117

 ;;21,"0XU34KZ ")

 ;;7118

 ;;21,"0XU407Z ")

 ;;7119

 ;;21,"0XU40JZ ")

 ;;7120

 ;;21,"0XU40KZ ")

 ;;7121

 ;;21,"0XU447Z ")

 ;;7122

 ;;21,"0XU44JZ ")

 ;;7123

 ;;21,"0XU44KZ ")

 ;;7124

 ;;21,"0XU507Z ")

 ;;7125

 ;;21,"0XU50JZ ")

 ;;7126

 ;;21,"0XU50KZ ")

 ;;7127

 ;;21,"0XU547Z ")

 ;;7128

 ;;21,"0XU54JZ ")

 ;;7129

 ;;21,"0XU54KZ ")

 ;;7130

 ;;21,"0XU607Z ")

 ;;7131

 ;;21,"0XU60JZ ")

 ;;7132

 ;;21,"0XU60KZ ")

 ;;7133

 ;;21,"0XU647Z ")

 ;;7134

 ;;21,"0XU64JZ ")

 ;;7135

 ;;21,"0XU64KZ ")

 ;;7136

 ;;21,"0XU707Z ")

 ;;7137

 ;;21,"0XU70JZ ")

 ;;7138

 ;;21,"0XU70KZ ")

 ;;7139

 ;;21,"0XU747Z ")

 ;;7140

 ;;21,"0XU74JZ ")

 ;;7141

 ;;21,"0XU74KZ ")

 ;;7142

 ;;21,"0XU807Z ")

 ;;7143

 ;;21,"0XU80JZ ")

 ;;7144

 ;;21,"0XU80KZ ")

 ;;7145

 ;;21,"0XU847Z ")

 ;;7146

 ;;21,"0XU84JZ ")

 ;;7147

 ;;21,"0XU84KZ ")

 ;;7148

 ;;21,"0XU907Z ")

 ;;7149

 ;;21,"0XU90JZ ")

 ;;7150

 ;;21,"0XU90KZ ")

 ;;7151

 ;;21,"0XU947Z ")

 ;;7152

 ;;21,"0XU94JZ ")

 ;;7153

 ;;21,"0XU94KZ ")

 ;;7154

 ;;21,"0XUB07Z ")

 ;;7155

 ;;21,"0XUB0JZ ")

 ;;7156

ATXXB18   ;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       ;;21,"0XB34ZX ")

 +2       ;;6761

 +3       ;;21,"0XB34ZZ ")

 +4       ;;6762

 +5       ;;21,"0XB40ZX ")

 +6       ;;6763

 +7       ;;21,"0XB40ZZ ")

 +8       ;;6764

 +9       ;;21,"0XB43ZX ")

 +10      ;;6765

 +11      ;;21,"0XB43ZZ ")

 +12      ;;6766

 +13      ;;21,"0XB44ZX ")

 +14      ;;6767

 +15      ;;21,"0XB44ZZ ")

 +16      ;;6768

 +17      ;;21,"0XB50ZX ")

 +18      ;;6769

 +19      ;;21,"0XB50ZZ ")

 +20      ;;6770

 +21      ;;21,"0XB53ZX ")

 +22      ;;6771

 +23      ;;21,"0XB53ZZ ")

 +24      ;;6772

 +25      ;;21,"0XB54ZX ")

 +26      ;;6773

 +27      ;;21,"0XB54ZZ ")

 +28      ;;6774

 +29      ;;21,"0XB60ZX ")

 +30      ;;6775

 +31      ;;21,"0XB60ZZ ")

 +32      ;;6776

 +33      ;;21,"0XB63ZX ")

 +34      ;;6777

 +35      ;;21,"0XB63ZZ ")

 +36      ;;6778

 +37      ;;21,"0XB64ZX ")

 +38      ;;6779

 +39      ;;21,"0XB64ZZ ")

 +40      ;;6780

 +41      ;;21,"0XB70ZX ")

 +42      ;;6781

 +43      ;;21,"0XB70ZZ ")

 +44      ;;6782

 +45      ;;21,"0XB73ZX ")

 +46      ;;6783

 +47      ;;21,"0XB73ZZ ")

 +48      ;;6784

 +49      ;;21,"0XB74ZX ")

 +50      ;;6785

 +51      ;;21,"0XB74ZZ ")

 +52      ;;6786

 +53      ;;21,"0XB80ZX ")

 +54      ;;6787

 +55      ;;21,"0XB80ZZ ")

 +56      ;;6788

 +57      ;;21,"0XB83ZX ")

 +58      ;;6789

 +59      ;;21,"0XB83ZZ ")

 +60      ;;6790

 +61      ;;21,"0XB84ZX ")

 +62      ;;6791

 +63      ;;21,"0XB84ZZ ")

 +64      ;;6792

 +65      ;;21,"0XB90ZX ")

 +66      ;;6793

 +67      ;;21,"0XB90ZZ ")

 +68      ;;6794

 +69      ;;21,"0XB93ZX ")

 +70      ;;6795

 +71      ;;21,"0XB93ZZ ")

 +72      ;;6796

 +73      ;;21,"0XB94ZX ")

 +74      ;;6797

 +75      ;;21,"0XB94ZZ ")

 +76      ;;6798

 +77      ;;21,"0XBB0ZX ")

 +78      ;;6799

 +79      ;;21,"0XBB0ZZ ")

 +80      ;;6800

 +81      ;;21,"0XBB3ZX ")

 +82      ;;6801

 +83      ;;21,"0XBB3ZZ ")

 +84      ;;6802

 +85      ;;21,"0XBB4ZX ")

 +86      ;;6803

 +87      ;;21,"0XBB4ZZ ")

 +88      ;;6804

 +89      ;;21,"0XBC0ZX ")

 +90      ;;6805

 +91      ;;21,"0XBC0ZZ ")

 +92      ;;6806

 +93      ;;21,"0XBC3ZX ")

 +94      ;;6807

 +95      ;;21,"0XBC3ZZ ")

 +96      ;;6808

 +97      ;;21,"0XBC4ZX ")

 +98      ;;6809

 +99      ;;21,"0XBC4ZZ ")

 +100     ;;6810

 +101     ;;21,"0XBD0ZX ")

 +102     ;;6811

 +103     ;;21,"0XBD0ZZ ")

 +104     ;;6812

 +105     ;;21,"0XBD3ZX ")

 +106     ;;6813

 +107     ;;21,"0XBD3ZZ ")

 +108     ;;6814

 +109     ;;21,"0XBD4ZX ")

 +110     ;;6815

 +111     ;;21,"0XBD4ZZ ")

 +112     ;;6816

 +113     ;;21,"0XBF0ZX ")

 +114     ;;6817

 +115     ;;21,"0XBF0ZZ ")

 +116     ;;6818

 +117     ;;21,"0XBF3ZX ")

 +118     ;;6819

 +119     ;;21,"0XBF3ZZ ")

 +120     ;;6820

 +121     ;;21,"0XBF4ZX ")

 +122     ;;6821

 +123     ;;21,"0XBF4ZZ ")

 +124     ;;6822

 +125     ;;21,"0XBG0ZX ")

 +126     ;;6823

 +127     ;;21,"0XBG0ZZ ")

 +128     ;;6824

 +129     ;;21,"0XBG3ZX ")

 +130     ;;6825

 +131     ;;21,"0XBG3ZZ ")

 +132     ;;6826

 +133     ;;21,"0XBG4ZX ")

 +134     ;;6827

 +135     ;;21,"0XBG4ZZ ")

 +136     ;;6828

 +137     ;;21,"0XBH0ZX ")

 +138     ;;6829

 +139     ;;21,"0XBH0ZZ ")

 +140     ;;6830

 +141     ;;21,"0XBH3ZX ")

 +142     ;;6831

 +143     ;;21,"0XBH3ZZ ")

 +144     ;;6832

 +145     ;;21,"0XBH4ZX ")

 +146     ;;6833

 +147     ;;21,"0XBH4ZZ ")

 +148     ;;6834

 +149     ;;21,"0XBJ0ZX ")

 +150     ;;6835

 +151     ;;21,"0XBJ0ZZ ")

 +152     ;;6836

 +153     ;;21,"0XBJ3ZX ")

 +154     ;;6837

 +155     ;;21,"0XBJ3ZZ ")

 +156     ;;6838

 +157     ;;21,"0XBJ4ZX ")

 +158     ;;6839

 +159     ;;21,"0XBJ4ZZ ")

 +160     ;;6840

 +161     ;;21,"0XBK0ZX ")

 +162     ;;6841

 +163     ;;21,"0XBK0ZZ ")

 +164     ;;6842

 +165     ;;21,"0XBK3ZX ")

 +166     ;;6843

 +167     ;;21,"0XBK3ZZ ")

 +168     ;;6844

 +169     ;;21,"0XBK4ZX ")

 +170     ;;6845

 +171     ;;21,"0XBK4ZZ ")

 +172     ;;6846

 +173     ;;21,"0XH201Z ")

 +174     ;;6847

 +175     ;;21,"0XH203Z ")

 +176     ;;6848

 +177     ;;21,"0XH20YZ ")

 +178     ;;6849

 +179     ;;21,"0XH231Z ")

 +180     ;;6850

 +181     ;;21,"0XH233Z ")

 +182     ;;6851

 +183     ;;21,"0XH23YZ ")

 +184     ;;6852

 +185     ;;21,"0XH241Z ")

 +186     ;;6853

 +187     ;;21,"0XH243Z ")

 +188     ;;6854

 +189     ;;21,"0XH24YZ ")

 +190     ;;6855

 +191     ;;21,"0XH301Z ")

 +192     ;;6856

 +193     ;;21,"0XH303Z ")

 +194     ;;6857

 +195     ;;21,"0XH30YZ ")

 +196     ;;6858

 +197     ;;21,"0XH331Z ")

 +198     ;;6859

 +199     ;;21,"0XH333Z ")

 +200     ;;6860

 +201     ;;21,"0XH33YZ ")

 +202     ;;6861

 +203     ;;21,"0XH341Z ")

 +204     ;;6862

 +205     ;;21,"0XH343Z ")

 +206     ;;6863

 +207     ;;21,"0XH34YZ ")

 +208     ;;6864

 +209     ;;21,"0XH401Z ")

 +210     ;;6865

 +211     ;;21,"0XH403Z ")

 +212     ;;6866

 +213     ;;21,"0XH40YZ ")

 +214     ;;6867

 +215     ;;21,"0XH431Z ")

 +216     ;;6868

 +217     ;;21,"0XH433Z ")

 +218     ;;6869

 +219     ;;21,"0XH43YZ ")

 +220     ;;6870

 +221     ;;21,"0XH441Z ")

 +222     ;;6871

 +223     ;;21,"0XH443Z ")

 +224     ;;6872

 +225     ;;21,"0XH44YZ ")

 +226     ;;6873

 +227     ;;21,"0XH501Z ")

 +228     ;;6874

 +229     ;;21,"0XH503Z ")

 +230     ;;6875

 +231     ;;21,"0XH50YZ ")

 +232     ;;6876

 +233     ;;21,"0XH531Z ")

 +234     ;;6877

 +235     ;;21,"0XH533Z ")

 +236     ;;6878

 +237     ;;21,"0XH53YZ ")

 +238     ;;6879

 +239     ;;21,"0XH541Z ")

 +240     ;;6880

 +241     ;;21,"0XH543Z ")

 +242     ;;6881

 +243     ;;21,"0XH54YZ ")

 +244     ;;6882

 +245     ;;21,"0XH601Z ")

 +246     ;;6883

 +247     ;;21,"0XH603Z ")

 +248     ;;6884

 +249     ;;21,"0XH60YZ ")

 +250     ;;6885

 +251     ;;21,"0XH631Z ")

 +252     ;;6886

 +253     ;;21,"0XH633Z ")

 +254     ;;6887

 +255     ;;21,"0XH63YZ ")

 +256     ;;6888

 +257     ;;21,"0XH641Z ")

 +258     ;;6889

 +259     ;;21,"0XH643Z ")

 +260     ;;6890

 +261     ;;21,"0XH64YZ ")

 +262     ;;6891

 +263     ;;21,"0XH701Z ")

 +264     ;;6892

 +265     ;;21,"0XH703Z ")

 +266     ;;6893

 +267     ;;21,"0XH70YZ ")

 +268     ;;6894

 +269     ;;21,"0XH731Z ")

 +270     ;;6895

 +271     ;;21,"0XH733Z ")

 +272     ;;6896

 +273     ;;21,"0XH73YZ ")

 +274     ;;6897

 +275     ;;21,"0XH741Z ")

 +276     ;;6898

 +277     ;;21,"0XH743Z ")

 +278     ;;6899

 +279     ;;21,"0XH74YZ ")

 +280     ;;6900

 +281     ;;21,"0XH801Z ")

 +282     ;;6901

 +283     ;;21,"0XH803Z ")

 +284     ;;6902

 +285     ;;21,"0XH80YZ ")

 +286     ;;6903

 +287     ;;21,"0XH831Z ")

 +288     ;;6904

 +289     ;;21,"0XH833Z ")

 +290     ;;6905

 +291     ;;21,"0XH83YZ ")

 +292     ;;6906

 +293     ;;21,"0XH841Z ")

 +294     ;;6907

 +295     ;;21,"0XH843Z ")

 +296     ;;6908

 +297     ;;21,"0XH84YZ ")

 +298     ;;6909

 +299     ;;21,"0XH901Z ")

 +300     ;;6910

 +301     ;;21,"0XH903Z ")

 +302     ;;6911

 +303     ;;21,"0XH90YZ ")

 +304     ;;6912

 +305     ;;21,"0XH931Z ")

 +306     ;;6913

 +307     ;;21,"0XH933Z ")

 +308     ;;6914

 +309     ;;21,"0XH93YZ ")

 +310     ;;6915

 +311     ;;21,"0XH941Z ")

 +312     ;;6916

 +313     ;;21,"0XH943Z ")

 +314     ;;6917

 +315     ;;21,"0XH94YZ ")

 +316     ;;6918

 +317     ;;21,"0XHB01Z ")

 +318     ;;6919

 +319     ;;21,"0XHB03Z ")

 +320     ;;6920

 +321     ;;21,"0XHB0YZ ")

 +322     ;;6921

 +323     ;;21,"0XHB31Z ")

 +324     ;;6922

 +325     ;;21,"0XHB33Z ")

 +326     ;;6923

 +327     ;;21,"0XHB3YZ ")

 +328     ;;6924

 +329     ;;21,"0XHB41Z ")

 +330     ;;6925

 +331     ;;21,"0XHB43Z ")

 +332     ;;6926

 +333     ;;21,"0XHB4YZ ")

 +334     ;;6927

 +335     ;;21,"0XHC01Z ")

 +336     ;;6928

 +337     ;;21,"0XHC03Z ")

 +338     ;;6929

 +339     ;;21,"0XHC0YZ ")

 +340     ;;6930

 +341     ;;21,"0XHC31Z ")

 +342     ;;6931

 +343     ;;21,"0XHC33Z ")

 +344     ;;6932

 +345     ;;21,"0XHC3YZ ")

 +346     ;;6933

 +347     ;;21,"0XHC41Z ")

 +348     ;;6934

 +349     ;;21,"0XHC43Z ")

 +350     ;;6935

 +351     ;;21,"0XHC4YZ ")

 +352     ;;6936

 +353     ;;21,"0XHD01Z ")

 +354     ;;6937

 +355     ;;21,"0XHD03Z ")

 +356     ;;6938

 +357     ;;21,"0XHD0YZ ")

 +358     ;;6939

 +359     ;;21,"0XHD31Z ")

 +360     ;;6940

 +361     ;;21,"0XHD33Z ")

 +362     ;;6941

 +363     ;;21,"0XHD3YZ ")

 +364     ;;6942

 +365     ;;21,"0XHD41Z ")

 +366     ;;6943

 +367     ;;21,"0XHD43Z ")

 +368     ;;6944

 +369     ;;21,"0XHD4YZ ")

 +370     ;;6945

 +371     ;;21,"0XHF01Z ")

 +372     ;;6946

 +373     ;;21,"0XHF03Z ")

 +374     ;;6947

 +375     ;;21,"0XHF0YZ ")

 +376     ;;6948

 +377     ;;21,"0XHF31Z ")

 +378     ;;6949

 +379     ;;21,"0XHF33Z ")

 +380     ;;6950

 +381     ;;21,"0XHF3YZ ")

 +382     ;;6951

 +383     ;;21,"0XHF41Z ")

 +384     ;;6952

 +385     ;;21,"0XHF43Z ")

 +386     ;;6953

 +387     ;;21,"0XHF4YZ ")

 +388     ;;6954

 +389     ;;21,"0XHG01Z ")

 +390     ;;6955

 +391     ;;21,"0XHG03Z ")

 +392     ;;6956

 +393     ;;21,"0XHG0YZ ")

 +394     ;;6957

 +395     ;;21,"0XHG31Z ")

 +396     ;;6958

 +397     ;;21,"0XHG33Z ")

 +398     ;;6959

 +399     ;;21,"0XHG3YZ ")

 +400     ;;6960

 +401     ;;21,"0XHG41Z ")

 +402     ;;6961

 +403     ;;21,"0XHG43Z ")

 +404     ;;6962

 +405     ;;21,"0XHG4YZ ")

 +406     ;;6963

 +407     ;;21,"0XHH01Z ")

 +408     ;;6964

 +409     ;;21,"0XHH03Z ")

 +410     ;;6965

 +411     ;;21,"0XHH0YZ ")

 +412     ;;6966

 +413     ;;21,"0XHH31Z ")

 +414     ;;6967

 +415     ;;21,"0XHH33Z ")

 +416     ;;6968

 +417     ;;21,"0XHH3YZ ")

 +418     ;;6969

 +419     ;;21,"0XHH41Z ")

 +420     ;;6970

 +421     ;;21,"0XHH43Z ")

 +422     ;;6971

 +423     ;;21,"0XHH4YZ ")

 +424     ;;6972

 +425     ;;21,"0XHJ01Z ")

 +426     ;;6973

 +427     ;;21,"0XHJ03Z ")

 +428     ;;6974

 +429     ;;21,"0XHJ0YZ ")

 +430     ;;6975

 +431     ;;21,"0XHJ31Z ")

 +432     ;;6976

 +433     ;;21,"0XHJ33Z ")

 +434     ;;6977

 +435     ;;21,"0XHJ3YZ ")

 +436     ;;6978

 +437     ;;21,"0XHJ41Z ")

 +438     ;;6979

 +439     ;;21,"0XHJ43Z ")

 +440     ;;6980

 +441     ;;21,"0XHJ4YZ ")

 +442     ;;6981

 +443     ;;21,"0XHK01Z ")

 +444     ;;6982

 +445     ;;21,"0XHK03Z ")

 +446     ;;6983

 +447     ;;21,"0XHK0YZ ")

 +448     ;;6984

 +449     ;;21,"0XHK31Z ")

 +450     ;;6985

 +451     ;;21,"0XHK33Z ")

 +452     ;;6986

 +453     ;;21,"0XHK3YZ ")

 +454     ;;6987

 +455     ;;21,"0XHK41Z ")

 +456     ;;6988

 +457     ;;21,"0XHK43Z ")

 +458     ;;6989

 +459     ;;21,"0XHK4YZ ")

 +460     ;;6990

 +461     ;;21,"0XJ20ZZ ")

 +462     ;;6991

 +463     ;;21,"0XJ23ZZ ")

 +464     ;;6992

 +465     ;;21,"0XJ24ZZ ")

 +466     ;;6993

 +467     ;;21,"0XJ2XZZ ")

 +468     ;;6994

 +469     ;;21,"0XJ30ZZ ")

 +470     ;;6995

 +471     ;;21,"0XJ33ZZ ")

 +472     ;;6996

 +473     ;;21,"0XJ34ZZ ")

 +474     ;;6997

 +475     ;;21,"0XJ3XZZ ")

 +476     ;;6998

 +477     ;;21,"0XJ40ZZ ")

 +478     ;;6999

 +479     ;;21,"0XJ43ZZ ")

 +480     ;;7000

 +481     ;;21,"0XJ44ZZ ")

 +482     ;;7001

 +483     ;;21,"0XJ4XZZ ")

 +484     ;;7002

 +485     ;;21,"0XJ50ZZ ")

 +486     ;;7003

 +487     ;;21,"0XJ53ZZ ")

 +488     ;;7004

 +489     ;;21,"0XJ54ZZ ")

 +490     ;;7005

 +491     ;;21,"0XJ5XZZ ")

 +492     ;;7006

 +493     ;;21,"0XJ60ZZ ")

 +494     ;;7007

 +495     ;;21,"0XJ63ZZ ")

 +496     ;;7008

 +497     ;;21,"0XJ64ZZ ")

 +498     ;;7009

 +499     ;;21,"0XJ6XZZ ")

 +500     ;;7010

 +501     ;;21,"0XJ70ZZ ")

 +502     ;;7011

 +503     ;;21,"0XJ73ZZ ")

 +504     ;;7012

 +505     ;;21,"0XJ74ZZ ")

 +506     ;;7013

 +507     ;;21,"0XJ7XZZ ")

 +508     ;;7014

 +509     ;;21,"0XJ80ZZ ")

 +510     ;;7015

 +511     ;;21,"0XJ83ZZ ")

 +512     ;;7016

 +513     ;;21,"0XJ84ZZ ")

 +514     ;;7017

 +515     ;;21,"0XJ8XZZ ")

 +516     ;;7018

 +517     ;;21,"0XJ90ZZ ")

 +518     ;;7019

 +519     ;;21,"0XJ93ZZ ")

 +520     ;;7020

 +521     ;;21,"0XJ94ZZ ")

 +522     ;;7021

 +523     ;;21,"0XJ9XZZ ")

 +524     ;;7022

 +525     ;;21,"0XJB0ZZ ")

 +526     ;;7023

 +527     ;;21,"0XJB3ZZ ")

 +528     ;;7024

 +529     ;;21,"0XJB4ZZ ")

 +530     ;;7025