BGP00.m

BGP00 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 23, 2010;

 ;;10.0;IHS CLINICAL REPORTING;;JUN 18, 2010

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BGP00A ;    BGP ABNORMAL GAIT OR MOBILITY

 D ^BGP00B ;    BGP ABORTION PROCEDURES

 D ^BGP00C ;    BGP ACUTE MENTAL HEALTH

 D ^BGP00D ;    BGP ALCOHOL DXS

 D ^BGP00E ;    BGP ALCOHOL POSITIVE SCRN CPTS

 D ^BGP00F ;    BGP ALCOHOL PROCEDURES

 D ^BGP00G ;    BGP ALCOHOL SCREEN ICDS

 D ^BGP00H ;    BGP ALCOHOL SCREENING CPTS

 D ^BGP00I ;    BGP ALT CPT

 D ^BGP00J ;    BGP ALT LOINC

 D ^BGP00K ;    BGP AMI DXS (HEDIS)

 D ^BGP00L ;    BGP AMI DXS PAMT

 D ^BGP00M ;    BGP AMI IND 30

 D ^BGP00N ;    BGP ANTIDEPRESSANT VA CLASS

 D ^BGP00O ;    BGP ASA ALLERGY 995.0-995.3

 D ^BGP00P ;    BGP AST CPT

 D ^BGP00Q ;    BGP AST LOINC

 D ^BGP00R ;    BGP ASTHMA DXS

 D ^BGP00S ;    BGP ASTHMA INHALED STEROID NDC

 D ^BGP00T ;    BGP BE CPTS

 D ^BGP00U ;    BGP BH PC ALCOHOL DXS

 D ^BGP00V ;    BGP BILAT MASTECT PROCEDURES

 D ^BGP00W ;    BGP BILATERAL MASTECTOMY CPTS

 D ^BGP00X ;    BGP BLOOD CULTURE LOINC

 D ^BGP00Y ;    BGP BMD CPTS

 Q

BGP00     ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 23, 2010;

 +1       ;;10.0;IHS CLINICAL REPORTING;;JUN 18, 2010

 +2       ;

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

 +4       ;

START     ;

 +1       ;    BGP ABNORMAL GAIT OR MOBILITY

           DO ^BGP00A

 +2       ;    BGP ABORTION PROCEDURES

           DO ^BGP00B

 +3       ;    BGP ACUTE MENTAL HEALTH

           DO ^BGP00C

 +4       ;    BGP ALCOHOL DXS

           DO ^BGP00D

 +5       ;    BGP ALCOHOL POSITIVE SCRN CPTS

           DO ^BGP00E

 +6       ;    BGP ALCOHOL PROCEDURES

           DO ^BGP00F

 +7       ;    BGP ALCOHOL SCREEN ICDS

           DO ^BGP00G

 +8       ;    BGP ALCOHOL SCREENING CPTS

           DO ^BGP00H

 +9       ;    BGP ALT CPT

           DO ^BGP00I

 +10      ;    BGP ALT LOINC

           DO ^BGP00J

 +11      ;    BGP AMI DXS (HEDIS)

           DO ^BGP00K

 +12      ;    BGP AMI DXS PAMT

           DO ^BGP00L

 +13      ;    BGP AMI IND 30

           DO ^BGP00M

 +14      ;    BGP ANTIDEPRESSANT VA CLASS

           DO ^BGP00N

 +15      ;    BGP ASA ALLERGY 995.0-995.3

           DO ^BGP00O

 +16      ;    BGP AST CPT

           DO ^BGP00P

 +17      ;    BGP AST LOINC

           DO ^BGP00Q

 +18      ;    BGP ASTHMA DXS

           DO ^BGP00R

 +19      ;    BGP ASTHMA INHALED STEROID NDC

           DO ^BGP00S

 +20      ;    BGP BE CPTS

           DO ^BGP00T

 +21      ;    BGP BH PC ALCOHOL DXS

           DO ^BGP00U

 +22      ;    BGP BILAT MASTECT PROCEDURES

           DO ^BGP00V

 +23      ;    BGP BILATERAL MASTECTOMY CPTS

           DO ^BGP00W

 +24      ;    BGP BLOOD CULTURE LOINC

           DO ^BGP00X

 +25      ;    BGP BMD CPTS

           DO ^BGP00Y

 +26       QUIT