BGP8DX.m

BGP8DX ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON SEP 28, 2007 ;

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

 ;;;BGP6;;SEP 28, 2007

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BGP8DXA ;   BGP CMS RADIATION THER DXS

 D ^BGP8DXB ;   BGP CMS RENAL ART STEN DXS

 D ^BGP8DXC ;   BGP CMS RENAL DISEASE DXS

 D ^BGP8DXD ;   BGP CMS SEPTI/RESP FAIL DXS

 D ^BGP8DXE ;   BGP CMS VAG HYSTERECTOMY PROCS

 D ^BGP8DXF ;   BGP CMS VASCULAR SURGERY PROCS

 D ^BGP8DXG ;   BGP CMS WOUND CARE DXS

 D ^BGP8DXH ;   BGP COLO CPTS

 D ^BGP8DXI ;   BGP COLORECTAL CANCER CPTS

 D ^BGP8DXJ ;   BGP COLORECTAL CANCER DXS

 D ^BGP8DXK ;   BGP COPD DXS

 D ^BGP8DXL ;   BGP COPD DXS BB CONT

 D ^BGP8DXM ;   BGP CPT ABORTION

 D ^BGP8DXN ;   BGP CPT FLU

 D ^BGP8DXO ;   BGP CPT HIV TESTS

 D ^BGP8DXP ;   BGP CPT MAMMOGRAM

 D ^BGP8DXQ ;   BGP CPT MAMMOGRAM HEDIS

 D ^BGP8DXR ;   BGP CPT MISCARRIAGE

 D ^BGP8DXS ;   BGP CPT PAP

 D ^BGP8DXT ;   BGP CREATINE KINASE LOINC

 D ^BGP8DXU ;   BGP CREATININE CPTS

 D ^BGP8DXV ;   BGP CREATININE LOINC CODES

 D ^BGP8DXW ;   BGP CRS LVAD/HEART TRANS PROC

 D ^BGP8DXX ;   BGP DEPRESSIVE DISORDERS

 D ^BGP8DXY ;   BGP DIPHTHERIA EVIDENCE

 D ^BGP8DXZ ;   BGP DM EYE EXAM CPTS

 Q

BGP8DX    ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON SEP 28, 2007 ;

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

 +2       ;;;BGP6;;SEP 28, 2007

 +3       ;

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

 +5       ;

START     ;

 +1       ;   BGP CMS RADIATION THER DXS

           DO ^BGP8DXA

 +2       ;   BGP CMS RENAL ART STEN DXS

           DO ^BGP8DXB

 +3       ;   BGP CMS RENAL DISEASE DXS

           DO ^BGP8DXC

 +4       ;   BGP CMS SEPTI/RESP FAIL DXS

           DO ^BGP8DXD

 +5       ;   BGP CMS VAG HYSTERECTOMY PROCS

           DO ^BGP8DXE

 +6       ;   BGP CMS VASCULAR SURGERY PROCS

           DO ^BGP8DXF

 +7       ;   BGP CMS WOUND CARE DXS

           DO ^BGP8DXG

 +8       ;   BGP COLO CPTS

           DO ^BGP8DXH

 +9       ;   BGP COLORECTAL CANCER CPTS

           DO ^BGP8DXI

 +10      ;   BGP COLORECTAL CANCER DXS

           DO ^BGP8DXJ

 +11      ;   BGP COPD DXS

           DO ^BGP8DXK

 +12      ;   BGP COPD DXS BB CONT

           DO ^BGP8DXL

 +13      ;   BGP CPT ABORTION

           DO ^BGP8DXM

 +14      ;   BGP CPT FLU

           DO ^BGP8DXN

 +15      ;   BGP CPT HIV TESTS

           DO ^BGP8DXO

 +16      ;   BGP CPT MAMMOGRAM

           DO ^BGP8DXP

 +17      ;   BGP CPT MAMMOGRAM HEDIS

           DO ^BGP8DXQ

 +18      ;   BGP CPT MISCARRIAGE

           DO ^BGP8DXR

 +19      ;   BGP CPT PAP

           DO ^BGP8DXS

 +20      ;   BGP CREATINE KINASE LOINC

           DO ^BGP8DXT

 +21      ;   BGP CREATININE CPTS

           DO ^BGP8DXU

 +22      ;   BGP CREATININE LOINC CODES

           DO ^BGP8DXV

 +23      ;   BGP CRS LVAD/HEART TRANS PROC

           DO ^BGP8DXW

 +24      ;   BGP DEPRESSIVE DISORDERS

           DO ^BGP8DXX

 +25      ;   BGP DIPHTHERIA EVIDENCE

           DO ^BGP8DXY

 +26      ;   BGP DM EYE EXAM CPTS

           DO ^BGP8DXZ

 +27       QUIT