BGP6BX.m

BGP6BX ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 21, 2005 ;

 ;;7.0;IHS CLINICAL REPORTING;;JAN 24, 2007

 ;;;BGP6;;AUG 21, 2005

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BGP6BXA ;   BGP CMS BETA BLOCKER CLASS

 D ^BGP6BXB ;   BGP CMS BETA BLOCKER NDC

 D ^BGP6BXC ;   BGP CMS BRADYCARDIA DXS

 D ^BGP6BXD ;   BGP CMS CIRCULATORY SHOCK DXS

 D ^BGP6BXE ;   BGP CMS EJECTION FRACTION CPTS

 D ^BGP6BXF ;   BGP CMS EJECTION FRACTION PROC

 D ^BGP6BXG ;   BGP CMS HEART FAILURE DXS

 D ^BGP6BXH ;   BGP CMS LVSD DXS

 D ^BGP6BXJ ;   BGP CMS SEPTI/RESP FAIL DXS

 D ^BGP6BXL ;   BGP COLORECTAL CANCER DXS

 D ^BGP6BXM ;   BGP COPD DXS

 D ^BGP6BXN ;   BGP COPD DXS BB CONT

 D ^BGP6BXO ;   BGP CPT FLU

 D ^BGP6BXQ ;   BGP CPT MAMMOGRAM

 D ^BGP6BXR ;   BGP CPT MAMMOGRAM HEDIS

 D ^BGP6BXS ;   BGP CPT PAP

 D ^BGP6BXT ;   BGP CREATININE CPTS

 D ^BGP6BXU ;   BGP CREATININE LOINC CODES

 D ^BGP6BXV ;   BGP DEPRESSIVE DISORDERS

 D ^BGP6BXW ;   BGP DIPHTHERIA EVIDENCE

 D ^BGP6BXX ;   BGP DV DXS

 D ^BGP6BXY ;   BGP EMPHYSEMA DXS

 Q

BGP6BX    ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 21, 2005 ;

 +1       ;;7.0;IHS CLINICAL REPORTING;;JAN 24, 2007

 +2       ;;;BGP6;;AUG 21, 2005

 +3       ;

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

 +5       ;

START     ;

 +1       ;   BGP CMS BETA BLOCKER CLASS

           DO ^BGP6BXA

 +2       ;   BGP CMS BETA BLOCKER NDC

           DO ^BGP6BXB

 +3       ;   BGP CMS BRADYCARDIA DXS

           DO ^BGP6BXC

 +4       ;   BGP CMS CIRCULATORY SHOCK DXS

           DO ^BGP6BXD

 +5       ;   BGP CMS EJECTION FRACTION CPTS

           DO ^BGP6BXE

 +6       ;   BGP CMS EJECTION FRACTION PROC

           DO ^BGP6BXF

 +7       ;   BGP CMS HEART FAILURE DXS

           DO ^BGP6BXG

 +8       ;   BGP CMS LVSD DXS

           DO ^BGP6BXH

 +9       ;   BGP CMS SEPTI/RESP FAIL DXS

           DO ^BGP6BXJ

 +10      ;   BGP COLORECTAL CANCER DXS

           DO ^BGP6BXL

 +11      ;   BGP COPD DXS

           DO ^BGP6BXM

 +12      ;   BGP COPD DXS BB CONT

           DO ^BGP6BXN

 +13      ;   BGP CPT FLU

           DO ^BGP6BXO

 +14      ;   BGP CPT MAMMOGRAM

           DO ^BGP6BXQ

 +15      ;   BGP CPT MAMMOGRAM HEDIS

           DO ^BGP6BXR

 +16      ;   BGP CPT PAP

           DO ^BGP6BXS

 +17      ;   BGP CREATININE CPTS

           DO ^BGP6BXT

 +18      ;   BGP CREATININE LOINC CODES

           DO ^BGP6BXU

 +19      ;   BGP DEPRESSIVE DISORDERS

           DO ^BGP6BXV

 +20      ;   BGP DIPHTHERIA EVIDENCE

           DO ^BGP6BXW

 +21      ;   BGP DV DXS

           DO ^BGP6BXX

 +22      ;   BGP EMPHYSEMA DXS

           DO ^BGP6BXY

 +23       QUIT