BGP8Y.m

BGP8Y ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON FEB 08, 2018;

 ;;18.0;IHS CLINICAL REPORTING;**1**;NOV 21, 2017;Build 62

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BGP8YA ;    BGP PQA NEBULIZED BRONCHO NDC

 D ^BGP8YB ;    BGP PQA NON-INFUSED MS NDC

 D ^BGP8YC ;    BGP PQA INFUSED MS NDC

 D ^BGP8YD ;    BGP CPT FOOT AMP UNKNOWN SIDE

 D ^BGP8YE ;    BGP GROUP A STREP LOINC

 D ^BGP8YF ;    BGP HPV LOINC CODES

 Q

BGP8Y     ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON FEB 08, 2018;

 +1       ;;18.0;IHS CLINICAL REPORTING;**1**;NOV 21, 2017;Build 62

 +2       ;

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

 +4       ;

START     ;

 +1       ;    BGP PQA NEBULIZED BRONCHO NDC

           DO ^BGP8YA

 +2       ;    BGP PQA NON-INFUSED MS NDC

           DO ^BGP8YB

 +3       ;    BGP PQA INFUSED MS NDC

           DO ^BGP8YC

 +4       ;    BGP CPT FOOT AMP UNKNOWN SIDE

           DO ^BGP8YD

 +5       ;    BGP GROUP A STREP LOINC

           DO ^BGP8YE

 +6       ;    BGP HPV LOINC CODES

           DO ^BGP8YF

 +7        QUIT