BDMDAX.m

BDMDAX ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JAN 31, 2013;

 ;;2.0;DIABETES MANAGEMENT SYSTEM;**6**;JUN 14, 2007;Build 6

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BDMDAXA ;   DM AUDIT TOBACCO USE CPTS

 Q

BDMDAX    ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JAN 31, 2013;

 +1       ;;2.0;DIABETES MANAGEMENT SYSTEM;**6**;JUN 14, 2007;Build 6

 +2       ;

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

 +4       ;

START     ;

 +1       ;   DM AUDIT TOBACCO USE CPTS

           DO ^BDMDAXA

 +2        QUIT