BUD0Z.m

BUD0Z ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON JAN 12, 2011 ;

 ;;10.0;IHS/RPMS UNIFORM DATA SYSTEM;;FEB 04, 2016;Build 50

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BUD0ZA ;    BUD DIABETES MEDS NDC

 D ^BUD0ZB ;    BUD CPT HEPATITIS B TESTS

 D ^BUD0ZC ;    BUD CPT HEPATITIS C TESTS

 D ^BUD0ZD ;    BUD CPT HIV TESTS

 D ^BUD0ZE ;    BUD HYSTERECTOMY CPTS

 D ^BUD0ZF ;    BUD HYSTERECTOMY PROCEDURES

 D ^BUD0ZG ;    BUD CPT PAP TABLE 6B 10

 D ^BUD0ZH ;    BUD IPV EVID DISEASE

 D ^BUD0ZI ;    BUD HIB EVIDENCE

 D ^BUD0ZJ ;    BUD HYPERTENSION DXS

 D ^BUD0ZK ;    BUD GEST/STEROID DM DX

 D ^BUD0ZL ;    BUD HGBA1C CPTS

 D ^BUD0ZM ;    BUD DIABETES DXS FOR TABLE 7

 D ^BUD0ZN ;    BUD DIASTOLIC BP CPTS

 D ^BUD0ZO ;    BUD SYSTOLIC BP CPTS

 D ^BUD0ZP ;    BUD CPT PAP 10

 D ^BUD0ZR ;    BUD MMR CONTRAINDICATIONS

 D ^BUD0ZS ;    BGP DIPHTHERIA EVIDENCE

 D ^BUD0ZT ;    BUD 10 CPT IMM LINE 24

 Q

BUD0Z     ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON JAN 12, 2011 ;

 +1       ;;10.0;IHS/RPMS UNIFORM DATA SYSTEM;;FEB 04, 2016;Build 50

 +2       ;

 +3       ; See referenced routines to see taxonomies being loaded.

 +4       ;

START     ;

 +1       ;    BUD DIABETES MEDS NDC

           DO ^BUD0ZA

 +2       ;    BUD CPT HEPATITIS B TESTS

           DO ^BUD0ZB

 +3       ;    BUD CPT HEPATITIS C TESTS

           DO ^BUD0ZC

 +4       ;    BUD CPT HIV TESTS

           DO ^BUD0ZD

 +5       ;    BUD HYSTERECTOMY CPTS

           DO ^BUD0ZE

 +6       ;    BUD HYSTERECTOMY PROCEDURES

           DO ^BUD0ZF

 +7       ;    BUD CPT PAP TABLE 6B 10

           DO ^BUD0ZG

 +8       ;    BUD IPV EVID DISEASE

           DO ^BUD0ZH

 +9       ;    BUD HIB EVIDENCE

           DO ^BUD0ZI

 +10      ;    BUD HYPERTENSION DXS

           DO ^BUD0ZJ

 +11      ;    BUD GEST/STEROID DM DX

           DO ^BUD0ZK

 +12      ;    BUD HGBA1C CPTS

           DO ^BUD0ZL

 +13      ;    BUD DIABETES DXS FOR TABLE 7

           DO ^BUD0ZM

 +14      ;    BUD DIASTOLIC BP CPTS

           DO ^BUD0ZN

 +15      ;    BUD SYSTOLIC BP CPTS

           DO ^BUD0ZO

 +16      ;    BUD CPT PAP 10

           DO ^BUD0ZP

 +17      ;    BUD MMR CONTRAINDICATIONS

           DO ^BUD0ZR

 +18      ;    BGP DIPHTHERIA EVIDENCE

           DO ^BUD0ZS

 +19      ;    BUD 10 CPT IMM LINE 24

           DO ^BUD0ZT

 +20       QUIT