BGP72.m

BGP72 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 11, 2016 ;

 ;;17.1;IHS CLINICAL REPORTING;;MAY 10, 2017;Build 29

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BGP72A ;    BGP PQA DIABETES ALL CLASS NDC

 D ^BGP72B ;    BGP PQA STATIN NDC

 D ^BGP72C ;    BGP PQA ANTIRETROVIRAL NDC

 D ^BGP72D ;    BGP PQA SABA NDC

 D ^BGP72E ;    BGP PQA CONTROLLER NDC

 D ^BGP72F ;    BGP PQA NON-WARF ANTICOAG NDC

 D ^BGP72G ;    BGP PQA WARFARIN NDC

 D ^BGP72H ;    BGP PQA ASTHMA INHALE STER NDC

 D ^BGP72I ;    BGP PQA COPD NDC

 D ^BGP72J ;    BGP PQA BENZODIAZ NDC

 D ^BGP72K ;    BGP PQA ARB NEPRILYSIN NDC

 Q

BGP72     ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 11, 2016 ;

 +1       ;;17.1;IHS CLINICAL REPORTING;;MAY 10, 2017;Build 29

 +2       ;

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

 +4       ;

START     ;

 +1       ;    BGP PQA DIABETES ALL CLASS NDC

           DO ^BGP72A

 +2       ;    BGP PQA STATIN NDC

           DO ^BGP72B

 +3       ;    BGP PQA ANTIRETROVIRAL NDC

           DO ^BGP72C

 +4       ;    BGP PQA SABA NDC

           DO ^BGP72D

 +5       ;    BGP PQA CONTROLLER NDC

           DO ^BGP72E

 +6       ;    BGP PQA NON-WARF ANTICOAG NDC

           DO ^BGP72F

 +7       ;    BGP PQA WARFARIN NDC

           DO ^BGP72G

 +8       ;    BGP PQA ASTHMA INHALE STER NDC

           DO ^BGP72H

 +9       ;    BGP PQA COPD NDC

           DO ^BGP72I

 +10      ;    BGP PQA BENZODIAZ NDC

           DO ^BGP72J

 +11      ;    BGP PQA ARB NEPRILYSIN NDC

           DO ^BGP72K

 +12       QUIT