BGP2T.m

BGP2T ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 27, 2012;

 ;;12.1;IHS CLINICAL REPORTING;;MAY 17, 2012;Build 66

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BGP2TA ;    BGP HEDIS ACEI NDC

 D ^BGP2TB ;    BGP HEDIS OSTEOPOROSIS NDC

 D ^BGP2TC ;    BGP PQA BETA BLOCKER NDC

 D ^BGP2TD ;    BGP PQA RASA NDC

 D ^BGP2TE ;    BGP PQA CCB NDC

 D ^BGP2TF ;    BGP PQA BIGUANIDE NDC

 D ^BGP2TG ;    BGP PQA SULFONYLUREA NDC

 D ^BGP2TH ;    BGP PQA THIAZOLIDINEDIONE NDC

 D ^BGP2TI ;    BGP PQA STATIN NDC

 D ^BGP2TJ ;    BGP PQA ANTIRETROVIRAL NDC

 D ^BGP2TK ;    BGP PQA SABA NDC

 D ^BGP2TL ;    BGP HEDIS ARB NDC

 D ^BGP2TM ;    BGP OTHER REL EDUC CPTS

 D ^BGP2TN ;    BGP MAMMOGRAM DXS

 D ^BGP2TO ;    BGP PRE DM MET SYN DX

 D ^BGP2TP ;    BGP HEDIS BETA BLOCKER NDC

 Q

BGP2T     ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 27, 2012;

 +1       ;;12.1;IHS CLINICAL REPORTING;;MAY 17, 2012;Build 66

 +2       ;

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

 +4       ;

START     ;

 +1       ;    BGP HEDIS ACEI NDC

           DO ^BGP2TA

 +2       ;    BGP HEDIS OSTEOPOROSIS NDC

           DO ^BGP2TB

 +3       ;    BGP PQA BETA BLOCKER NDC

           DO ^BGP2TC

 +4       ;    BGP PQA RASA NDC

           DO ^BGP2TD

 +5       ;    BGP PQA CCB NDC

           DO ^BGP2TE

 +6       ;    BGP PQA BIGUANIDE NDC

           DO ^BGP2TF

 +7       ;    BGP PQA SULFONYLUREA NDC

           DO ^BGP2TG

 +8       ;    BGP PQA THIAZOLIDINEDIONE NDC

           DO ^BGP2TH

 +9       ;    BGP PQA STATIN NDC

           DO ^BGP2TI

 +10      ;    BGP PQA ANTIRETROVIRAL NDC

           DO ^BGP2TJ

 +11      ;    BGP PQA SABA NDC

           DO ^BGP2TK

 +12      ;    BGP HEDIS ARB NDC

           DO ^BGP2TL

 +13      ;    BGP OTHER REL EDUC CPTS

           DO ^BGP2TM

 +14      ;    BGP MAMMOGRAM DXS

           DO ^BGP2TN

 +15      ;    BGP PRE DM MET SYN DX

           DO ^BGP2TO

 +16      ;    BGP HEDIS BETA BLOCKER NDC

           DO ^BGP2TP

 +17       QUIT