BUD7TX.m

BUD7TX ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON DEC 16, 2007 ;

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

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BUD7TXA ;   BUD CPT HIV TESTS

 D ^BUD7TXB ;   BUD CPT PAP 03

 D ^BUD7TXC ;   BUD CPT PAP 04

 D ^BUD7TXD ;   BUD CPT PAP 05

 D ^BUD7TXE ;   BUD CPT PAP 07

 D ^BUD7TXF ;   BUD IMM CPTS

 D ^BUD7TXG ;   BUD L26 CPTS

 D ^BUD7TXH ;   BUD TABLE 6 LINE 16

 D ^BUD7TXI ;   BUD TABLE 6 LINE 17

 D ^BUD7TXJ ;   BUD TABLE 6 LINE 19

 D ^BUD7TXK ;   BUD TABLE 6 LINE 20

 Q

BUD7TX    ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON DEC 16, 2007 ;

 +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 CPT HIV TESTS

           DO ^BUD7TXA

 +2       ;   BUD CPT PAP 03

           DO ^BUD7TXB

 +3       ;   BUD CPT PAP 04

           DO ^BUD7TXC

 +4       ;   BUD CPT PAP 05

           DO ^BUD7TXD

 +5       ;   BUD CPT PAP 07

           DO ^BUD7TXE

 +6       ;   BUD IMM CPTS

           DO ^BUD7TXF

 +7       ;   BUD L26 CPTS

           DO ^BUD7TXG

 +8       ;   BUD TABLE 6 LINE 16

           DO ^BUD7TXH

 +9       ;   BUD TABLE 6 LINE 17

           DO ^BUD7TXI

 +10      ;   BUD TABLE 6 LINE 19

           DO ^BUD7TXJ

 +11      ;   BUD TABLE 6 LINE 20

           DO ^BUD7TXK

 +12       QUIT