BUDTX.m

BUDTX ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON NOV 02, 2004 ;

 ;;10.0;IHS/RPMS UNIFORM DATA SYSTEM;;FEB 04, 2016;Build 50

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BUDTXA ;    BUD L26 CPTS

 D ^BUDTXB ;    BGP PAP LOINC CODES

 D ^BUDTXC ;    BUD IMM CPTS

 D ^BUDTXD ;    BUD CPT HIV TESTS

 D ^BUDTXE ;    BGP HIV TEST LOINC CODES

 D ^BUDTXF ;    BUD TABLE 6 LINE 16

 D ^BUDTXG ;    BUD TABLE 6 LINE 17

 D ^BUDTXH ;    BUD TABLE 6 LINE 19

 D ^BUDTXI ;    BUD TABLE 6 LINE 20

 D ^BUDTXJ ;    BUD CPT PAP 03

 Q

BUDTX     ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON NOV 02, 2004 ;

 +1       ;;10.0;IHS/RPMS UNIFORM DATA SYSTEM;;FEB 04, 2016;Build 50

 +2       ;

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

 +4       ;

START     ;

 +1       ;    BUD L26 CPTS

           DO ^BUDTXA

 +2       ;    BGP PAP LOINC CODES

           DO ^BUDTXB

 +3       ;    BUD IMM CPTS

           DO ^BUDTXC

 +4       ;    BUD CPT HIV TESTS

           DO ^BUDTXD

 +5       ;    BGP HIV TEST LOINC CODES

           DO ^BUDTXE

 +6       ;    BUD TABLE 6 LINE 16

           DO ^BUDTXF

 +7       ;    BUD TABLE 6 LINE 17

           DO ^BUDTXG

 +8       ;    BUD TABLE 6 LINE 19

           DO ^BUDTXH

 +9       ;    BUD TABLE 6 LINE 20

           DO ^BUDTXI

 +10      ;    BUD CPT PAP 03

           DO ^BUDTXJ

 +11       QUIT