BATTX.m

BATTX ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON NOV 04, 2002 ;

 ;;1.0;IHS ASTHMA REGISTER;;FEB 19, 2003

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BATTXA ;    BAT ASTHMA DIAGNOSES

 Q

BATTX     ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON NOV 04, 2002 ;

 +1       ;;1.0;IHS ASTHMA REGISTER;;FEB 19, 2003

 +2       ;

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

 +4       ;

START     ;

 +1       ;    BAT ASTHMA DIAGNOSES

           DO ^BATTXA

 +2        QUIT