BGP80TX.m

BGP80TX ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 19, 2008;

 ;;8.0;IHS CLINICAL REPORTING;**1**;MAR 12, 2008

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BGP80TXA ;  BGP BE CPTS

 Q

BGP80TX   ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 19, 2008;

 +1       ;;8.0;IHS CLINICAL REPORTING;**1**;MAR 12, 2008

 +2       ;

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

 +4       ;

START     ;

 +1       ;  BGP BE CPTS

           DO ^BGP80TXA

 +2        QUIT