APCS.m

APCS ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JUN 16, 2010;

 ;;2.0;IHS PCC SUITE;**5**;MAY 14, 2009

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^APCSA ;     SURVEILLANCE RAPID FLU CPT

 D ^APCSB ;     SURVEILLANCE RAPID FLU LOINC

 Q

APCS      ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JUN 16, 2010;

 +1       ;;2.0;IHS PCC SUITE;**5**;MAY 14, 2009

 +2       ;

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

 +4       ;

START     ;

 +1       ;     SURVEILLANCE RAPID FLU CPT

           DO ^APCSA

 +2       ;     SURVEILLANCE RAPID FLU LOINC

           DO ^APCSB

 +3        QUIT