BGPUX.m

BGPUX ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON JUL 06, 2004 ;

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

 ;

 ; See referenced routines to see taxonomies being loaded.

 ;

START ;

 D ^BGPUXA ;    BGP CREATININE LOINC CODES

 D ^BGPUXB ;    BGP HGBA1C LOINC CODES

 D ^BGPUXC ;    BGP LIPID PROFILE LOINC CODES

 D ^BGPUXD ;    BGP LDL LOINC CODES

 D ^BGPUXE ;    BGP TRIGLYCERIDE LOINC CODES

 D ^BGPUXF ;    BGP HDL LOINC CODES

 D ^BGPUXG ;    BGP URINE PROTEIN LOINC CODES

 D ^BGPUXH ;    BGP MICROALBUM LOINC CODES

 D ^BGPUXI ;    BGP OPV EVID DISEASE

 D ^BGPUXJ ;    BGP OPV CONTRAINDICATIONS

 D ^BGPUXK ;    BGP DIPHTHERIA EVIDENCE

 D ^BGPUXL ;    BGP PERTUSSIS EVIDENCE

 D ^BGPUXM ;    BGP MMR CONTRAINDICATIONS

 D ^BGPUXN ;    BGP MEASLES EVIDENCE

 D ^BGPUXO ;    BGP RUBELLA EVIDENCE

 D ^BGPUXP ;    BGP HIB EVIDENCE

 D ^BGPUXQ ;    BGP HEP EVIDENCE

 D ^BGPUXR ;    BGP VARICELLA CONTRA

 D ^BGPUXS ;    BGP VARICELLA EVIDENCE

 D ^BGPUXT ;    BGP CPT FLU

 D ^BGPUXU ;    BGP CPT PAP

 D ^BGPUXV ;    BGP PAP LOINC CODES

 D ^BGPUXW ;    BGP MASTECTOMY PROCEDURES

 D ^BGPUXY ;    BGP COLORECTAL CANCER DXS

 D ^BGPUXZ ;    BGP FOBT LOINC CODES

 Q

BGPUX     ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON JUL 06, 2004 ;

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

 +2       ;

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

 +4       ;

START     ;

 +1       ;    BGP CREATININE LOINC CODES

           DO ^BGPUXA

 +2       ;    BGP HGBA1C LOINC CODES

           DO ^BGPUXB

 +3       ;    BGP LIPID PROFILE LOINC CODES

           DO ^BGPUXC

 +4       ;    BGP LDL LOINC CODES

           DO ^BGPUXD

 +5       ;    BGP TRIGLYCERIDE LOINC CODES

           DO ^BGPUXE

 +6       ;    BGP HDL LOINC CODES

           DO ^BGPUXF

 +7       ;    BGP URINE PROTEIN LOINC CODES

           DO ^BGPUXG

 +8       ;    BGP MICROALBUM LOINC CODES

           DO ^BGPUXH

 +9       ;    BGP OPV EVID DISEASE

           DO ^BGPUXI

 +10      ;    BGP OPV CONTRAINDICATIONS

           DO ^BGPUXJ

 +11      ;    BGP DIPHTHERIA EVIDENCE

           DO ^BGPUXK

 +12      ;    BGP PERTUSSIS EVIDENCE

           DO ^BGPUXL

 +13      ;    BGP MMR CONTRAINDICATIONS

           DO ^BGPUXM

 +14      ;    BGP MEASLES EVIDENCE

           DO ^BGPUXN

 +15      ;    BGP RUBELLA EVIDENCE

           DO ^BGPUXO

 +16      ;    BGP HIB EVIDENCE

           DO ^BGPUXP

 +17      ;    BGP HEP EVIDENCE

           DO ^BGPUXQ

 +18      ;    BGP VARICELLA CONTRA

           DO ^BGPUXR

 +19      ;    BGP VARICELLA EVIDENCE

           DO ^BGPUXS

 +20      ;    BGP CPT FLU

           DO ^BGPUXT

 +21      ;    BGP CPT PAP

           DO ^BGPUXU

 +22      ;    BGP PAP LOINC CODES

           DO ^BGPUXV

 +23      ;    BGP MASTECTOMY PROCEDURES

           DO ^BGPUXW

 +24      ;    BGP COLORECTAL CANCER DXS

           DO ^BGPUXY

 +25      ;    BGP FOBT LOINC CODES

           DO ^BGPUXZ

 +26       QUIT