Routine: ATXXB228

ATXXB228 ;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

TMP ;;TAXONOMY (WITH BULLETIN)

 ;;9002226.02101,"1804,DD020ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD021ZZ ",.01)

 ;;DD021ZZ

 ;;9002226.02101,"1804,DD021ZZ ",.02)

 ;;DD021ZZ

 ;;9002226.02101,"1804,DD021ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD022ZZ ",.01)

 ;;DD022ZZ

 ;;9002226.02101,"1804,DD022ZZ ",.02)

 ;;DD022ZZ

 ;;9002226.02101,"1804,DD022ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD023Z0 ",.01)

 ;;DD023Z0

 ;;9002226.02101,"1804,DD023Z0 ",.02)

 ;;DD023Z0

 ;;9002226.02101,"1804,DD023Z0 ",.03)

 ;;31

 ;;9002226.02101,"1804,DD023ZZ ",.01)

 ;;DD023ZZ

 ;;9002226.02101,"1804,DD023ZZ ",.02)

 ;;DD023ZZ

 ;;9002226.02101,"1804,DD023ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD024ZZ ",.01)

 ;;DD024ZZ

 ;;9002226.02101,"1804,DD024ZZ ",.02)

 ;;DD024ZZ

 ;;9002226.02101,"1804,DD024ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD025ZZ ",.01)

 ;;DD025ZZ

 ;;9002226.02101,"1804,DD025ZZ ",.02)

 ;;DD025ZZ

 ;;9002226.02101,"1804,DD025ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD026ZZ ",.01)

 ;;DD026ZZ

 ;;9002226.02101,"1804,DD026ZZ ",.02)

 ;;DD026ZZ

 ;;9002226.02101,"1804,DD026ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD030ZZ ",.01)

 ;;DD030ZZ

 ;;9002226.02101,"1804,DD030ZZ ",.02)

 ;;DD030ZZ

 ;;9002226.02101,"1804,DD030ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD031ZZ ",.01)

 ;;DD031ZZ

 ;;9002226.02101,"1804,DD031ZZ ",.02)

 ;;DD031ZZ

 ;;9002226.02101,"1804,DD031ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD032ZZ ",.01)

 ;;DD032ZZ

 ;;9002226.02101,"1804,DD032ZZ ",.02)

 ;;DD032ZZ

 ;;9002226.02101,"1804,DD032ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD033Z0 ",.01)

 ;;DD033Z0

 ;;9002226.02101,"1804,DD033Z0 ",.02)

 ;;DD033Z0

 ;;9002226.02101,"1804,DD033Z0 ",.03)

 ;;31

 ;;9002226.02101,"1804,DD033ZZ ",.01)

 ;;DD033ZZ

 ;;9002226.02101,"1804,DD033ZZ ",.02)

 ;;DD033ZZ

 ;;9002226.02101,"1804,DD033ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD034ZZ ",.01)

 ;;DD034ZZ

 ;;9002226.02101,"1804,DD034ZZ ",.02)

 ;;DD034ZZ

 ;;9002226.02101,"1804,DD034ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD035ZZ ",.01)

 ;;DD035ZZ

 ;;9002226.02101,"1804,DD035ZZ ",.02)

 ;;DD035ZZ

 ;;9002226.02101,"1804,DD035ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD036ZZ ",.01)

 ;;DD036ZZ

 ;;9002226.02101,"1804,DD036ZZ ",.02)

 ;;DD036ZZ

 ;;9002226.02101,"1804,DD036ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD040ZZ ",.01)

 ;;DD040ZZ

 ;;9002226.02101,"1804,DD040ZZ ",.02)

 ;;DD040ZZ

 ;;9002226.02101,"1804,DD040ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD041ZZ ",.01)

 ;;DD041ZZ

 ;;9002226.02101,"1804,DD041ZZ ",.02)

 ;;DD041ZZ

 ;;9002226.02101,"1804,DD041ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD042ZZ ",.01)

 ;;DD042ZZ

 ;;9002226.02101,"1804,DD042ZZ ",.02)

 ;;DD042ZZ

 ;;9002226.02101,"1804,DD042ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD043Z0 ",.01)

 ;;DD043Z0

 ;;9002226.02101,"1804,DD043Z0 ",.02)

 ;;DD043Z0

 ;;9002226.02101,"1804,DD043Z0 ",.03)

 ;;31

 ;;9002226.02101,"1804,DD043ZZ ",.01)

 ;;DD043ZZ

 ;;9002226.02101,"1804,DD043ZZ ",.02)

 ;;DD043ZZ

 ;;9002226.02101,"1804,DD043ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD044ZZ ",.01)

 ;;DD044ZZ

 ;;9002226.02101,"1804,DD044ZZ ",.02)

 ;;DD044ZZ

 ;;9002226.02101,"1804,DD044ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD045ZZ ",.01)

 ;;DD045ZZ

 ;;9002226.02101,"1804,DD045ZZ ",.02)

 ;;DD045ZZ

 ;;9002226.02101,"1804,DD045ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD046ZZ ",.01)

 ;;DD046ZZ

 ;;9002226.02101,"1804,DD046ZZ ",.02)

 ;;DD046ZZ

 ;;9002226.02101,"1804,DD046ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD050ZZ ",.01)

 ;;DD050ZZ

 ;;9002226.02101,"1804,DD050ZZ ",.02)

 ;;DD050ZZ

 ;;9002226.02101,"1804,DD050ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD051ZZ ",.01)

 ;;DD051ZZ

 ;;9002226.02101,"1804,DD051ZZ ",.02)

 ;;DD051ZZ

 ;;9002226.02101,"1804,DD051ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD052ZZ ",.01)

 ;;DD052ZZ

 ;;9002226.02101,"1804,DD052ZZ ",.02)

 ;;DD052ZZ

 ;;9002226.02101,"1804,DD052ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD053Z0 ",.01)

 ;;DD053Z0

 ;;9002226.02101,"1804,DD053Z0 ",.02)

 ;;DD053Z0

 ;;9002226.02101,"1804,DD053Z0 ",.03)

 ;;31

 ;;9002226.02101,"1804,DD053ZZ ",.01)

 ;;DD053ZZ

 ;;9002226.02101,"1804,DD053ZZ ",.02)

 ;;DD053ZZ

 ;;9002226.02101,"1804,DD053ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD054ZZ ",.01)

 ;;DD054ZZ

 ;;9002226.02101,"1804,DD054ZZ ",.02)

 ;;DD054ZZ

 ;;9002226.02101,"1804,DD054ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD055ZZ ",.01)

 ;;DD055ZZ

 ;;9002226.02101,"1804,DD055ZZ ",.02)

 ;;DD055ZZ

 ;;9002226.02101,"1804,DD055ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD056ZZ ",.01)

 ;;DD056ZZ

 ;;9002226.02101,"1804,DD056ZZ ",.02)

 ;;DD056ZZ

 ;;9002226.02101,"1804,DD056ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD070ZZ ",.01)

 ;;DD070ZZ

 ;;9002226.02101,"1804,DD070ZZ ",.02)

 ;;DD070ZZ

 ;;9002226.02101,"1804,DD070ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD071ZZ ",.01)

 ;;DD071ZZ

 ;;9002226.02101,"1804,DD071ZZ ",.02)

 ;;DD071ZZ

 ;;9002226.02101,"1804,DD071ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD072ZZ ",.01)

 ;;DD072ZZ

 ;;9002226.02101,"1804,DD072ZZ ",.02)

 ;;DD072ZZ

 ;;9002226.02101,"1804,DD072ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD073Z0 ",.01)

 ;;DD073Z0

 ;;9002226.02101,"1804,DD073Z0 ",.02)

 ;;DD073Z0

 ;;9002226.02101,"1804,DD073Z0 ",.03)

 ;;31

 ;;9002226.02101,"1804,DD073ZZ ",.01)

 ;;DD073ZZ

 ;;9002226.02101,"1804,DD073ZZ ",.02)

 ;;DD073ZZ

 ;;9002226.02101,"1804,DD073ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD074ZZ ",.01)

 ;;DD074ZZ

 ;;9002226.02101,"1804,DD074ZZ ",.02)

 ;;DD074ZZ

 ;;9002226.02101,"1804,DD074ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD075ZZ ",.01)

 ;;DD075ZZ

 ;;9002226.02101,"1804,DD075ZZ ",.02)

 ;;DD075ZZ

 ;;9002226.02101,"1804,DD075ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD076ZZ ",.01)

 ;;DD076ZZ

 ;;9002226.02101,"1804,DD076ZZ ",.02)

 ;;DD076ZZ

 ;;9002226.02101,"1804,DD076ZZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1097Z ",.01)

 ;;DD1097Z

 ;;9002226.02101,"1804,DD1097Z ",.02)

 ;;DD1097Z

 ;;9002226.02101,"1804,DD1097Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1098Z ",.01)

 ;;DD1098Z

 ;;9002226.02101,"1804,DD1098Z ",.02)

 ;;DD1098Z

 ;;9002226.02101,"1804,DD1098Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1099Z ",.01)

 ;;DD1099Z

 ;;9002226.02101,"1804,DD1099Z ",.02)

 ;;DD1099Z

 ;;9002226.02101,"1804,DD1099Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD109BZ ",.01)

 ;;DD109BZ

 ;;9002226.02101,"1804,DD109BZ ",.02)

 ;;DD109BZ

 ;;9002226.02101,"1804,DD109BZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD109CZ ",.01)

 ;;DD109CZ

 ;;9002226.02101,"1804,DD109CZ ",.02)

 ;;DD109CZ

 ;;9002226.02101,"1804,DD109CZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD109YZ ",.01)

 ;;DD109YZ

 ;;9002226.02101,"1804,DD109YZ ",.02)

 ;;DD109YZ

 ;;9002226.02101,"1804,DD109YZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD10B7Z ",.01)

 ;;DD10B7Z

 ;;9002226.02101,"1804,DD10B7Z ",.02)

 ;;DD10B7Z

 ;;9002226.02101,"1804,DD10B7Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD10B8Z ",.01)

 ;;DD10B8Z

 ;;9002226.02101,"1804,DD10B8Z ",.02)

 ;;DD10B8Z

 ;;9002226.02101,"1804,DD10B8Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD10B9Z ",.01)

 ;;DD10B9Z

 ;;9002226.02101,"1804,DD10B9Z ",.02)

 ;;DD10B9Z

 ;;9002226.02101,"1804,DD10B9Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD10BBZ ",.01)

 ;;DD10BBZ

 ;;9002226.02101,"1804,DD10BBZ ",.02)

 ;;DD10BBZ

 ;;9002226.02101,"1804,DD10BBZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD10BCZ ",.01)

 ;;DD10BCZ

 ;;9002226.02101,"1804,DD10BCZ ",.02)

 ;;DD10BCZ

 ;;9002226.02101,"1804,DD10BCZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD10BYZ ",.01)

 ;;DD10BYZ

 ;;9002226.02101,"1804,DD10BYZ ",.02)

 ;;DD10BYZ

 ;;9002226.02101,"1804,DD10BYZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1197Z ",.01)

 ;;DD1197Z

 ;;9002226.02101,"1804,DD1197Z ",.02)

 ;;DD1197Z

 ;;9002226.02101,"1804,DD1197Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1198Z ",.01)

 ;;DD1198Z

 ;;9002226.02101,"1804,DD1198Z ",.02)

 ;;DD1198Z

 ;;9002226.02101,"1804,DD1198Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1199Z ",.01)

 ;;DD1199Z

 ;;9002226.02101,"1804,DD1199Z ",.02)

 ;;DD1199Z

 ;;9002226.02101,"1804,DD1199Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD119BZ ",.01)

 ;;DD119BZ

 ;;9002226.02101,"1804,DD119BZ ",.02)

 ;;DD119BZ

 ;;9002226.02101,"1804,DD119BZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD119CZ ",.01)

 ;;DD119CZ

 ;;9002226.02101,"1804,DD119CZ ",.02)

 ;;DD119CZ

 ;;9002226.02101,"1804,DD119CZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD119YZ ",.01)

 ;;DD119YZ

 ;;9002226.02101,"1804,DD119YZ ",.02)

 ;;DD119YZ

 ;;9002226.02101,"1804,DD119YZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD11B7Z ",.01)

 ;;DD11B7Z

 ;;9002226.02101,"1804,DD11B7Z ",.02)

 ;;DD11B7Z

 ;;9002226.02101,"1804,DD11B7Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD11B8Z ",.01)

 ;;DD11B8Z

 ;;9002226.02101,"1804,DD11B8Z ",.02)

 ;;DD11B8Z

 ;;9002226.02101,"1804,DD11B8Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD11B9Z ",.01)

 ;;DD11B9Z

 ;;9002226.02101,"1804,DD11B9Z ",.02)

 ;;DD11B9Z

 ;;9002226.02101,"1804,DD11B9Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD11BBZ ",.01)

 ;;DD11BBZ

 ;;9002226.02101,"1804,DD11BBZ ",.02)

 ;;DD11BBZ

 ;;9002226.02101,"1804,DD11BBZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD11BCZ ",.01)

 ;;DD11BCZ

 ;;9002226.02101,"1804,DD11BCZ ",.02)

 ;;DD11BCZ

 ;;9002226.02101,"1804,DD11BCZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD11BYZ ",.01)

 ;;DD11BYZ

 ;;9002226.02101,"1804,DD11BYZ ",.02)

 ;;DD11BYZ

 ;;9002226.02101,"1804,DD11BYZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1297Z ",.01)

 ;;DD1297Z

 ;;9002226.02101,"1804,DD1297Z ",.02)

 ;;DD1297Z

 ;;9002226.02101,"1804,DD1297Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1298Z ",.01)

 ;;DD1298Z

 ;;9002226.02101,"1804,DD1298Z ",.02)

 ;;DD1298Z

 ;;9002226.02101,"1804,DD1298Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1299Z ",.01)

 ;;DD1299Z

 ;;9002226.02101,"1804,DD1299Z ",.02)

 ;;DD1299Z

 ;;9002226.02101,"1804,DD1299Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD129BZ ",.01)

 ;;DD129BZ

 ;;9002226.02101,"1804,DD129BZ ",.02)

 ;;DD129BZ

 ;;9002226.02101,"1804,DD129BZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD129CZ ",.01)

 ;;DD129CZ

 ;;9002226.02101,"1804,DD129CZ ",.02)

 ;;DD129CZ

 ;;9002226.02101,"1804,DD129CZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD129YZ ",.01)

 ;;DD129YZ

 ;;9002226.02101,"1804,DD129YZ ",.02)

 ;;DD129YZ

 ;;9002226.02101,"1804,DD129YZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD12B7Z ",.01)

 ;;DD12B7Z

 ;;9002226.02101,"1804,DD12B7Z ",.02)

 ;;DD12B7Z

 ;;9002226.02101,"1804,DD12B7Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD12B8Z ",.01)

 ;;DD12B8Z

 ;;9002226.02101,"1804,DD12B8Z ",.02)

 ;;DD12B8Z

 ;;9002226.02101,"1804,DD12B8Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD12B9Z ",.01)

 ;;DD12B9Z

 ;;9002226.02101,"1804,DD12B9Z ",.02)

 ;;DD12B9Z

 ;;9002226.02101,"1804,DD12B9Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD12BBZ ",.01)

 ;;DD12BBZ

 ;;9002226.02101,"1804,DD12BBZ ",.02)

 ;;DD12BBZ

 ;;9002226.02101,"1804,DD12BBZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD12BCZ ",.01)

 ;;DD12BCZ

 ;;9002226.02101,"1804,DD12BCZ ",.02)

 ;;DD12BCZ

 ;;9002226.02101,"1804,DD12BCZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD12BYZ ",.01)

 ;;DD12BYZ

 ;;9002226.02101,"1804,DD12BYZ ",.02)

 ;;DD12BYZ

 ;;9002226.02101,"1804,DD12BYZ ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1397Z ",.01)

 ;;DD1397Z

 ;;9002226.02101,"1804,DD1397Z ",.02)

 ;;DD1397Z

 ;;9002226.02101,"1804,DD1397Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1398Z ",.01)

 ;;DD1398Z

 ;;9002226.02101,"1804,DD1398Z ",.02)

 ;;DD1398Z

 ;;9002226.02101,"1804,DD1398Z ",.03)

 ;;31

 ;;9002226.02101,"1804,DD1399Z ",.01)

 ;;DD1399Z

 ;;9002226.02101,"1804,DD1399Z ",.02)

 ;;DD1399Z

 ;;9002226.02101,"1804,DD1399Z ",.03)

 ;;31

ATXXB228  ;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       ;;9002226.02101,"1804,DD020ZZ ",.03)

 +2       ;;31

 +3       ;;9002226.02101,"1804,DD021ZZ ",.01)

 +4       ;;DD021ZZ

 +5       ;;9002226.02101,"1804,DD021ZZ ",.02)

 +6       ;;DD021ZZ

 +7       ;;9002226.02101,"1804,DD021ZZ ",.03)

 +8       ;;31

 +9       ;;9002226.02101,"1804,DD022ZZ ",.01)

 +10      ;;DD022ZZ

 +11      ;;9002226.02101,"1804,DD022ZZ ",.02)

 +12      ;;DD022ZZ

 +13      ;;9002226.02101,"1804,DD022ZZ ",.03)

 +14      ;;31

 +15      ;;9002226.02101,"1804,DD023Z0 ",.01)

 +16      ;;DD023Z0

 +17      ;;9002226.02101,"1804,DD023Z0 ",.02)

 +18      ;;DD023Z0

 +19      ;;9002226.02101,"1804,DD023Z0 ",.03)

 +20      ;;31

 +21      ;;9002226.02101,"1804,DD023ZZ ",.01)

 +22      ;;DD023ZZ

 +23      ;;9002226.02101,"1804,DD023ZZ ",.02)

 +24      ;;DD023ZZ

 +25      ;;9002226.02101,"1804,DD023ZZ ",.03)

 +26      ;;31

 +27      ;;9002226.02101,"1804,DD024ZZ ",.01)

 +28      ;;DD024ZZ

 +29      ;;9002226.02101,"1804,DD024ZZ ",.02)

 +30      ;;DD024ZZ

 +31      ;;9002226.02101,"1804,DD024ZZ ",.03)

 +32      ;;31

 +33      ;;9002226.02101,"1804,DD025ZZ ",.01)

 +34      ;;DD025ZZ

 +35      ;;9002226.02101,"1804,DD025ZZ ",.02)

 +36      ;;DD025ZZ

 +37      ;;9002226.02101,"1804,DD025ZZ ",.03)

 +38      ;;31

 +39      ;;9002226.02101,"1804,DD026ZZ ",.01)

 +40      ;;DD026ZZ

 +41      ;;9002226.02101,"1804,DD026ZZ ",.02)

 +42      ;;DD026ZZ

 +43      ;;9002226.02101,"1804,DD026ZZ ",.03)

 +44      ;;31

 +45      ;;9002226.02101,"1804,DD030ZZ ",.01)

 +46      ;;DD030ZZ

 +47      ;;9002226.02101,"1804,DD030ZZ ",.02)

 +48      ;;DD030ZZ

 +49      ;;9002226.02101,"1804,DD030ZZ ",.03)

 +50      ;;31

 +51      ;;9002226.02101,"1804,DD031ZZ ",.01)

 +52      ;;DD031ZZ

 +53      ;;9002226.02101,"1804,DD031ZZ ",.02)

 +54      ;;DD031ZZ

 +55      ;;9002226.02101,"1804,DD031ZZ ",.03)

 +56      ;;31

 +57      ;;9002226.02101,"1804,DD032ZZ ",.01)

 +58      ;;DD032ZZ

 +59      ;;9002226.02101,"1804,DD032ZZ ",.02)

 +60      ;;DD032ZZ

 +61      ;;9002226.02101,"1804,DD032ZZ ",.03)

 +62      ;;31

 +63      ;;9002226.02101,"1804,DD033Z0 ",.01)

 +64      ;;DD033Z0

 +65      ;;9002226.02101,"1804,DD033Z0 ",.02)

 +66      ;;DD033Z0

 +67      ;;9002226.02101,"1804,DD033Z0 ",.03)

 +68      ;;31

 +69      ;;9002226.02101,"1804,DD033ZZ ",.01)

 +70      ;;DD033ZZ

 +71      ;;9002226.02101,"1804,DD033ZZ ",.02)

 +72      ;;DD033ZZ

 +73      ;;9002226.02101,"1804,DD033ZZ ",.03)

 +74      ;;31

 +75      ;;9002226.02101,"1804,DD034ZZ ",.01)

 +76      ;;DD034ZZ

 +77      ;;9002226.02101,"1804,DD034ZZ ",.02)

 +78      ;;DD034ZZ

 +79      ;;9002226.02101,"1804,DD034ZZ ",.03)

 +80      ;;31

 +81      ;;9002226.02101,"1804,DD035ZZ ",.01)

 +82      ;;DD035ZZ

 +83      ;;9002226.02101,"1804,DD035ZZ ",.02)

 +84      ;;DD035ZZ

 +85      ;;9002226.02101,"1804,DD035ZZ ",.03)

 +86      ;;31

 +87      ;;9002226.02101,"1804,DD036ZZ ",.01)

 +88      ;;DD036ZZ

 +89      ;;9002226.02101,"1804,DD036ZZ ",.02)

 +90      ;;DD036ZZ

 +91      ;;9002226.02101,"1804,DD036ZZ ",.03)

 +92      ;;31

 +93      ;;9002226.02101,"1804,DD040ZZ ",.01)

 +94      ;;DD040ZZ

 +95      ;;9002226.02101,"1804,DD040ZZ ",.02)

 +96      ;;DD040ZZ

 +97      ;;9002226.02101,"1804,DD040ZZ ",.03)

 +98      ;;31

 +99      ;;9002226.02101,"1804,DD041ZZ ",.01)

 +100     ;;DD041ZZ

 +101     ;;9002226.02101,"1804,DD041ZZ ",.02)

 +102     ;;DD041ZZ

 +103     ;;9002226.02101,"1804,DD041ZZ ",.03)

 +104     ;;31

 +105     ;;9002226.02101,"1804,DD042ZZ ",.01)

 +106     ;;DD042ZZ

 +107     ;;9002226.02101,"1804,DD042ZZ ",.02)

 +108     ;;DD042ZZ

 +109     ;;9002226.02101,"1804,DD042ZZ ",.03)

 +110     ;;31

 +111     ;;9002226.02101,"1804,DD043Z0 ",.01)

 +112     ;;DD043Z0

 +113     ;;9002226.02101,"1804,DD043Z0 ",.02)

 +114     ;;DD043Z0

 +115     ;;9002226.02101,"1804,DD043Z0 ",.03)

 +116     ;;31

 +117     ;;9002226.02101,"1804,DD043ZZ ",.01)

 +118     ;;DD043ZZ

 +119     ;;9002226.02101,"1804,DD043ZZ ",.02)

 +120     ;;DD043ZZ

 +121     ;;9002226.02101,"1804,DD043ZZ ",.03)

 +122     ;;31

 +123     ;;9002226.02101,"1804,DD044ZZ ",.01)

 +124     ;;DD044ZZ

 +125     ;;9002226.02101,"1804,DD044ZZ ",.02)

 +126     ;;DD044ZZ

 +127     ;;9002226.02101,"1804,DD044ZZ ",.03)

 +128     ;;31

 +129     ;;9002226.02101,"1804,DD045ZZ ",.01)

 +130     ;;DD045ZZ

 +131     ;;9002226.02101,"1804,DD045ZZ ",.02)

 +132     ;;DD045ZZ

 +133     ;;9002226.02101,"1804,DD045ZZ ",.03)

 +134     ;;31

 +135     ;;9002226.02101,"1804,DD046ZZ ",.01)

 +136     ;;DD046ZZ

 +137     ;;9002226.02101,"1804,DD046ZZ ",.02)

 +138     ;;DD046ZZ

 +139     ;;9002226.02101,"1804,DD046ZZ ",.03)

 +140     ;;31

 +141     ;;9002226.02101,"1804,DD050ZZ ",.01)

 +142     ;;DD050ZZ

 +143     ;;9002226.02101,"1804,DD050ZZ ",.02)

 +144     ;;DD050ZZ

 +145     ;;9002226.02101,"1804,DD050ZZ ",.03)

 +146     ;;31

 +147     ;;9002226.02101,"1804,DD051ZZ ",.01)

 +148     ;;DD051ZZ

 +149     ;;9002226.02101,"1804,DD051ZZ ",.02)

 +150     ;;DD051ZZ

 +151     ;;9002226.02101,"1804,DD051ZZ ",.03)

 +152     ;;31

 +153     ;;9002226.02101,"1804,DD052ZZ ",.01)

 +154     ;;DD052ZZ

 +155     ;;9002226.02101,"1804,DD052ZZ ",.02)

 +156     ;;DD052ZZ

 +157     ;;9002226.02101,"1804,DD052ZZ ",.03)

 +158     ;;31

 +159     ;;9002226.02101,"1804,DD053Z0 ",.01)

 +160     ;;DD053Z0

 +161     ;;9002226.02101,"1804,DD053Z0 ",.02)

 +162     ;;DD053Z0

 +163     ;;9002226.02101,"1804,DD053Z0 ",.03)

 +164     ;;31

 +165     ;;9002226.02101,"1804,DD053ZZ ",.01)

 +166     ;;DD053ZZ

 +167     ;;9002226.02101,"1804,DD053ZZ ",.02)

 +168     ;;DD053ZZ

 +169     ;;9002226.02101,"1804,DD053ZZ ",.03)

 +170     ;;31

 +171     ;;9002226.02101,"1804,DD054ZZ ",.01)

 +172     ;;DD054ZZ

 +173     ;;9002226.02101,"1804,DD054ZZ ",.02)

 +174     ;;DD054ZZ

 +175     ;;9002226.02101,"1804,DD054ZZ ",.03)

 +176     ;;31

 +177     ;;9002226.02101,"1804,DD055ZZ ",.01)

 +178     ;;DD055ZZ

 +179     ;;9002226.02101,"1804,DD055ZZ ",.02)

 +180     ;;DD055ZZ

 +181     ;;9002226.02101,"1804,DD055ZZ ",.03)

 +182     ;;31

 +183     ;;9002226.02101,"1804,DD056ZZ ",.01)

 +184     ;;DD056ZZ

 +185     ;;9002226.02101,"1804,DD056ZZ ",.02)

 +186     ;;DD056ZZ

 +187     ;;9002226.02101,"1804,DD056ZZ ",.03)

 +188     ;;31

 +189     ;;9002226.02101,"1804,DD070ZZ ",.01)

 +190     ;;DD070ZZ

 +191     ;;9002226.02101,"1804,DD070ZZ ",.02)

 +192     ;;DD070ZZ

 +193     ;;9002226.02101,"1804,DD070ZZ ",.03)

 +194     ;;31

 +195     ;;9002226.02101,"1804,DD071ZZ ",.01)

 +196     ;;DD071ZZ

 +197     ;;9002226.02101,"1804,DD071ZZ ",.02)

 +198     ;;DD071ZZ

 +199     ;;9002226.02101,"1804,DD071ZZ ",.03)

 +200     ;;31

 +201     ;;9002226.02101,"1804,DD072ZZ ",.01)

 +202     ;;DD072ZZ

 +203     ;;9002226.02101,"1804,DD072ZZ ",.02)

 +204     ;;DD072ZZ

 +205     ;;9002226.02101,"1804,DD072ZZ ",.03)

 +206     ;;31

 +207     ;;9002226.02101,"1804,DD073Z0 ",.01)

 +208     ;;DD073Z0

 +209     ;;9002226.02101,"1804,DD073Z0 ",.02)

 +210     ;;DD073Z0

 +211     ;;9002226.02101,"1804,DD073Z0 ",.03)

 +212     ;;31

 +213     ;;9002226.02101,"1804,DD073ZZ ",.01)

 +214     ;;DD073ZZ

 +215     ;;9002226.02101,"1804,DD073ZZ ",.02)

 +216     ;;DD073ZZ

 +217     ;;9002226.02101,"1804,DD073ZZ ",.03)

 +218     ;;31

 +219     ;;9002226.02101,"1804,DD074ZZ ",.01)

 +220     ;;DD074ZZ

 +221     ;;9002226.02101,"1804,DD074ZZ ",.02)

 +222     ;;DD074ZZ

 +223     ;;9002226.02101,"1804,DD074ZZ ",.03)

 +224     ;;31

 +225     ;;9002226.02101,"1804,DD075ZZ ",.01)

 +226     ;;DD075ZZ

 +227     ;;9002226.02101,"1804,DD075ZZ ",.02)

 +228     ;;DD075ZZ

 +229     ;;9002226.02101,"1804,DD075ZZ ",.03)

 +230     ;;31

 +231     ;;9002226.02101,"1804,DD076ZZ ",.01)

 +232     ;;DD076ZZ

 +233     ;;9002226.02101,"1804,DD076ZZ ",.02)

 +234     ;;DD076ZZ

 +235     ;;9002226.02101,"1804,DD076ZZ ",.03)

 +236     ;;31

 +237     ;;9002226.02101,"1804,DD1097Z ",.01)

 +238     ;;DD1097Z

 +239     ;;9002226.02101,"1804,DD1097Z ",.02)

 +240     ;;DD1097Z

 +241     ;;9002226.02101,"1804,DD1097Z ",.03)

 +242     ;;31

 +243     ;;9002226.02101,"1804,DD1098Z ",.01)

 +244     ;;DD1098Z

 +245     ;;9002226.02101,"1804,DD1098Z ",.02)

 +246     ;;DD1098Z

 +247     ;;9002226.02101,"1804,DD1098Z ",.03)

 +248     ;;31

 +249     ;;9002226.02101,"1804,DD1099Z ",.01)

 +250     ;;DD1099Z

 +251     ;;9002226.02101,"1804,DD1099Z ",.02)

 +252     ;;DD1099Z

 +253     ;;9002226.02101,"1804,DD1099Z ",.03)

 +254     ;;31

 +255     ;;9002226.02101,"1804,DD109BZ ",.01)

 +256     ;;DD109BZ

 +257     ;;9002226.02101,"1804,DD109BZ ",.02)

 +258     ;;DD109BZ

 +259     ;;9002226.02101,"1804,DD109BZ ",.03)

 +260     ;;31

 +261     ;;9002226.02101,"1804,DD109CZ ",.01)

 +262     ;;DD109CZ

 +263     ;;9002226.02101,"1804,DD109CZ ",.02)

 +264     ;;DD109CZ

 +265     ;;9002226.02101,"1804,DD109CZ ",.03)

 +266     ;;31

 +267     ;;9002226.02101,"1804,DD109YZ ",.01)

 +268     ;;DD109YZ

 +269     ;;9002226.02101,"1804,DD109YZ ",.02)

 +270     ;;DD109YZ

 +271     ;;9002226.02101,"1804,DD109YZ ",.03)

 +272     ;;31

 +273     ;;9002226.02101,"1804,DD10B7Z ",.01)

 +274     ;;DD10B7Z

 +275     ;;9002226.02101,"1804,DD10B7Z ",.02)

 +276     ;;DD10B7Z

 +277     ;;9002226.02101,"1804,DD10B7Z ",.03)

 +278     ;;31

 +279     ;;9002226.02101,"1804,DD10B8Z ",.01)

 +280     ;;DD10B8Z

 +281     ;;9002226.02101,"1804,DD10B8Z ",.02)

 +282     ;;DD10B8Z

 +283     ;;9002226.02101,"1804,DD10B8Z ",.03)

 +284     ;;31

 +285     ;;9002226.02101,"1804,DD10B9Z ",.01)

 +286     ;;DD10B9Z

 +287     ;;9002226.02101,"1804,DD10B9Z ",.02)

 +288     ;;DD10B9Z

 +289     ;;9002226.02101,"1804,DD10B9Z ",.03)

 +290     ;;31

 +291     ;;9002226.02101,"1804,DD10BBZ ",.01)

 +292     ;;DD10BBZ

 +293     ;;9002226.02101,"1804,DD10BBZ ",.02)

 +294     ;;DD10BBZ

 +295     ;;9002226.02101,"1804,DD10BBZ ",.03)

 +296     ;;31

 +297     ;;9002226.02101,"1804,DD10BCZ ",.01)

 +298     ;;DD10BCZ

 +299     ;;9002226.02101,"1804,DD10BCZ ",.02)

 +300     ;;DD10BCZ

 +301     ;;9002226.02101,"1804,DD10BCZ ",.03)

 +302     ;;31

 +303     ;;9002226.02101,"1804,DD10BYZ ",.01)

 +304     ;;DD10BYZ

 +305     ;;9002226.02101,"1804,DD10BYZ ",.02)

 +306     ;;DD10BYZ

 +307     ;;9002226.02101,"1804,DD10BYZ ",.03)

 +308     ;;31

 +309     ;;9002226.02101,"1804,DD1197Z ",.01)

 +310     ;;DD1197Z

 +311     ;;9002226.02101,"1804,DD1197Z ",.02)

 +312     ;;DD1197Z

 +313     ;;9002226.02101,"1804,DD1197Z ",.03)

 +314     ;;31

 +315     ;;9002226.02101,"1804,DD1198Z ",.01)

 +316     ;;DD1198Z

 +317     ;;9002226.02101,"1804,DD1198Z ",.02)

 +318     ;;DD1198Z

 +319     ;;9002226.02101,"1804,DD1198Z ",.03)

 +320     ;;31

 +321     ;;9002226.02101,"1804,DD1199Z ",.01)

 +322     ;;DD1199Z

 +323     ;;9002226.02101,"1804,DD1199Z ",.02)

 +324     ;;DD1199Z

 +325     ;;9002226.02101,"1804,DD1199Z ",.03)

 +326     ;;31

 +327     ;;9002226.02101,"1804,DD119BZ ",.01)

 +328     ;;DD119BZ

 +329     ;;9002226.02101,"1804,DD119BZ ",.02)

 +330     ;;DD119BZ

 +331     ;;9002226.02101,"1804,DD119BZ ",.03)

 +332     ;;31

 +333     ;;9002226.02101,"1804,DD119CZ ",.01)

 +334     ;;DD119CZ

 +335     ;;9002226.02101,"1804,DD119CZ ",.02)

 +336     ;;DD119CZ

 +337     ;;9002226.02101,"1804,DD119CZ ",.03)

 +338     ;;31

 +339     ;;9002226.02101,"1804,DD119YZ ",.01)

 +340     ;;DD119YZ

 +341     ;;9002226.02101,"1804,DD119YZ ",.02)

 +342     ;;DD119YZ

 +343     ;;9002226.02101,"1804,DD119YZ ",.03)

 +344     ;;31

 +345     ;;9002226.02101,"1804,DD11B7Z ",.01)

 +346     ;;DD11B7Z

 +347     ;;9002226.02101,"1804,DD11B7Z ",.02)

 +348     ;;DD11B7Z

 +349     ;;9002226.02101,"1804,DD11B7Z ",.03)

 +350     ;;31

 +351     ;;9002226.02101,"1804,DD11B8Z ",.01)

 +352     ;;DD11B8Z

 +353     ;;9002226.02101,"1804,DD11B8Z ",.02)

 +354     ;;DD11B8Z

 +355     ;;9002226.02101,"1804,DD11B8Z ",.03)

 +356     ;;31

 +357     ;;9002226.02101,"1804,DD11B9Z ",.01)

 +358     ;;DD11B9Z

 +359     ;;9002226.02101,"1804,DD11B9Z ",.02)

 +360     ;;DD11B9Z

 +361     ;;9002226.02101,"1804,DD11B9Z ",.03)

 +362     ;;31

 +363     ;;9002226.02101,"1804,DD11BBZ ",.01)

 +364     ;;DD11BBZ

 +365     ;;9002226.02101,"1804,DD11BBZ ",.02)

 +366     ;;DD11BBZ

 +367     ;;9002226.02101,"1804,DD11BBZ ",.03)

 +368     ;;31

 +369     ;;9002226.02101,"1804,DD11BCZ ",.01)

 +370     ;;DD11BCZ

 +371     ;;9002226.02101,"1804,DD11BCZ ",.02)

 +372     ;;DD11BCZ

 +373     ;;9002226.02101,"1804,DD11BCZ ",.03)

 +374     ;;31

 +375     ;;9002226.02101,"1804,DD11BYZ ",.01)

 +376     ;;DD11BYZ

 +377     ;;9002226.02101,"1804,DD11BYZ ",.02)

 +378     ;;DD11BYZ

 +379     ;;9002226.02101,"1804,DD11BYZ ",.03)

 +380     ;;31

 +381     ;;9002226.02101,"1804,DD1297Z ",.01)

 +382     ;;DD1297Z

 +383     ;;9002226.02101,"1804,DD1297Z ",.02)

 +384     ;;DD1297Z

 +385     ;;9002226.02101,"1804,DD1297Z ",.03)

 +386     ;;31

 +387     ;;9002226.02101,"1804,DD1298Z ",.01)

 +388     ;;DD1298Z

 +389     ;;9002226.02101,"1804,DD1298Z ",.02)

 +390     ;;DD1298Z

 +391     ;;9002226.02101,"1804,DD1298Z ",.03)

 +392     ;;31

 +393     ;;9002226.02101,"1804,DD1299Z ",.01)

 +394     ;;DD1299Z

 +395     ;;9002226.02101,"1804,DD1299Z ",.02)

 +396     ;;DD1299Z

 +397     ;;9002226.02101,"1804,DD1299Z ",.03)

 +398     ;;31

 +399     ;;9002226.02101,"1804,DD129BZ ",.01)

 +400     ;;DD129BZ

 +401     ;;9002226.02101,"1804,DD129BZ ",.02)

 +402     ;;DD129BZ

 +403     ;;9002226.02101,"1804,DD129BZ ",.03)

 +404     ;;31

 +405     ;;9002226.02101,"1804,DD129CZ ",.01)

 +406     ;;DD129CZ

 +407     ;;9002226.02101,"1804,DD129CZ ",.02)

 +408     ;;DD129CZ

 +409     ;;9002226.02101,"1804,DD129CZ ",.03)

 +410     ;;31

 +411     ;;9002226.02101,"1804,DD129YZ ",.01)

 +412     ;;DD129YZ

 +413     ;;9002226.02101,"1804,DD129YZ ",.02)

 +414     ;;DD129YZ

 +415     ;;9002226.02101,"1804,DD129YZ ",.03)

 +416     ;;31

 +417     ;;9002226.02101,"1804,DD12B7Z ",.01)

 +418     ;;DD12B7Z

 +419     ;;9002226.02101,"1804,DD12B7Z ",.02)

 +420     ;;DD12B7Z

 +421     ;;9002226.02101,"1804,DD12B7Z ",.03)

 +422     ;;31

 +423     ;;9002226.02101,"1804,DD12B8Z ",.01)

 +424     ;;DD12B8Z

 +425     ;;9002226.02101,"1804,DD12B8Z ",.02)

 +426     ;;DD12B8Z

 +427     ;;9002226.02101,"1804,DD12B8Z ",.03)

 +428     ;;31

 +429     ;;9002226.02101,"1804,DD12B9Z ",.01)

 +430     ;;DD12B9Z

 +431     ;;9002226.02101,"1804,DD12B9Z ",.02)

 +432     ;;DD12B9Z

 +433     ;;9002226.02101,"1804,DD12B9Z ",.03)

 +434     ;;31

 +435     ;;9002226.02101,"1804,DD12BBZ ",.01)

 +436     ;;DD12BBZ

 +437     ;;9002226.02101,"1804,DD12BBZ ",.02)

 +438     ;;DD12BBZ

 +439     ;;9002226.02101,"1804,DD12BBZ ",.03)

 +440     ;;31

 +441     ;;9002226.02101,"1804,DD12BCZ ",.01)

 +442     ;;DD12BCZ

 +443     ;;9002226.02101,"1804,DD12BCZ ",.02)

 +444     ;;DD12BCZ

 +445     ;;9002226.02101,"1804,DD12BCZ ",.03)

 +446     ;;31

 +447     ;;9002226.02101,"1804,DD12BYZ ",.01)

 +448     ;;DD12BYZ

 +449     ;;9002226.02101,"1804,DD12BYZ ",.02)

 +450     ;;DD12BYZ

 +451     ;;9002226.02101,"1804,DD12BYZ ",.03)

 +452     ;;31

 +453     ;;9002226.02101,"1804,DD1397Z ",.01)

 +454     ;;DD1397Z

 +455     ;;9002226.02101,"1804,DD1397Z ",.02)

 +456     ;;DD1397Z

 +457     ;;9002226.02101,"1804,DD1397Z ",.03)

 +458     ;;31

 +459     ;;9002226.02101,"1804,DD1398Z ",.01)

 +460     ;;DD1398Z

 +461     ;;9002226.02101,"1804,DD1398Z ",.02)

 +462     ;;DD1398Z

 +463     ;;9002226.02101,"1804,DD1398Z ",.03)

 +464     ;;31

 +465     ;;9002226.02101,"1804,DD1399Z ",.01)

 +466     ;;DD1399Z

 +467     ;;9002226.02101,"1804,DD1399Z ",.02)

 +468     ;;DD1399Z

 +469     ;;9002226.02101,"1804,DD1399Z ",.03)

 +470     ;;31

ATXXB228.m