BGP8IX.m

BGP8IX ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON NOV 14, 2007 ;

 ;;8.0;IHS CLINICAL REPORTING;;MAR 12, 2008

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BGP8IXA ;   BGP RA METHOTREXATE NDC

 D ^BGP8IXB ;   BGP RA MYCOPHENOLATE NDC

 D ^BGP8IXC ;   BGP RA PENICILLAMINE NDC

 D ^BGP8IXD ;   BGP RA SULFASALAZINE NDC

 D ^BGP8IXE ;   BGP RHEUMATOID ARTHRITIS DXS

 D ^BGP8IXF ;   BGP RUBELLA EVIDENCE

 D ^BGP8IXG ;   BGP SIG CPTS

 D ^BGP8IXH ;   BGP ST ELEVATION DX

 D ^BGP8IXI ;   BGP SUBSTANCE ABUSE

 D ^BGP8IXJ ;   BGP THROMBOLYTIC AGENT CLASS

 D ^BGP8IXK ;   BGP TOTAL CHOLECTOMY CPTS

 D ^BGP8IXL ;   BGP TOTAL CHOLECTOMY PROCS

 D ^BGP8IXM ;   BGP TOTAL CHOLESTEROL LOINC

 D ^BGP8IXN ;   BGP TRIGLYCERIDE LOINC CODES

 D ^BGP8IXO ;   BGP UNI MASTECTOMY PROCEDURES

 D ^BGP8IXP ;   BGP URI DXS

 D ^BGP8IXQ ;   BGP URINE PROTEIN LOINC CODES

 D ^BGP8IXR ;   BGP VARICELLA CONTRA

 D ^BGP8IXS ;   BGP VARICELLA EVIDENCE

 D ^BGP8IXT ;   BGP VIRAL LOAD LOINC CODES

 D ^BGP8IXU ;   DM AUDIT FASTING GLUC LOINC

 D ^BGP8IXV ;   BGP CMS SMOKING CESSATION NDC

 D ^BGP8IXW ;   BGP CMS ALLERGY DX FOR POV

 D ^BGP8IXX ;   BGP ABORTION PROCEDURES

 D ^BGP8IXY ;   BGP CMS ALLERGY POV DXS

 D ^BGP8IXZ ;   BGP CMS ALLERGY POV DXS

 Q

BGP8IX    ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON NOV 14, 2007 ;

 +1       ;;8.0;IHS CLINICAL REPORTING;;MAR 12, 2008

 +2       ;

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

 +4       ;

START     ;

 +1       ;   BGP RA METHOTREXATE NDC

           DO ^BGP8IXA

 +2       ;   BGP RA MYCOPHENOLATE NDC

           DO ^BGP8IXB

 +3       ;   BGP RA PENICILLAMINE NDC

           DO ^BGP8IXC

 +4       ;   BGP RA SULFASALAZINE NDC

           DO ^BGP8IXD

 +5       ;   BGP RHEUMATOID ARTHRITIS DXS

           DO ^BGP8IXE

 +6       ;   BGP RUBELLA EVIDENCE

           DO ^BGP8IXF

 +7       ;   BGP SIG CPTS

           DO ^BGP8IXG

 +8       ;   BGP ST ELEVATION DX

           DO ^BGP8IXH

 +9       ;   BGP SUBSTANCE ABUSE

           DO ^BGP8IXI

 +10      ;   BGP THROMBOLYTIC AGENT CLASS

           DO ^BGP8IXJ

 +11      ;   BGP TOTAL CHOLECTOMY CPTS

           DO ^BGP8IXK

 +12      ;   BGP TOTAL CHOLECTOMY PROCS

           DO ^BGP8IXL

 +13      ;   BGP TOTAL CHOLESTEROL LOINC

           DO ^BGP8IXM

 +14      ;   BGP TRIGLYCERIDE LOINC CODES

           DO ^BGP8IXN

 +15      ;   BGP UNI MASTECTOMY PROCEDURES

           DO ^BGP8IXO

 +16      ;   BGP URI DXS

           DO ^BGP8IXP

 +17      ;   BGP URINE PROTEIN LOINC CODES

           DO ^BGP8IXQ

 +18      ;   BGP VARICELLA CONTRA

           DO ^BGP8IXR

 +19      ;   BGP VARICELLA EVIDENCE

           DO ^BGP8IXS

 +20      ;   BGP VIRAL LOAD LOINC CODES

           DO ^BGP8IXT

 +21      ;   DM AUDIT FASTING GLUC LOINC

           DO ^BGP8IXU

 +22      ;   BGP CMS SMOKING CESSATION NDC

           DO ^BGP8IXV

 +23      ;   BGP CMS ALLERGY DX FOR POV

           DO ^BGP8IXW

 +24      ;   BGP ABORTION PROCEDURES

           DO ^BGP8IXX

 +25      ;   BGP CMS ALLERGY POV DXS

           DO ^BGP8IXY

 +26      ;   BGP CMS ALLERGY POV DXS

           DO ^BGP8IXZ

 +27       QUIT