- BGP25 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON FEB 19, 2012;
- ;;12.1;IHS CLINICAL REPORTING;;MAY 17, 2012;Build 66
- ;
- ; See referenced routines to see taxonomies being loaded.
- ;
- START ;
- D ^BGP25A ; BGP DENTAL EXAM DXS
- D ^BGP25B ; BGP OSTEOPOROSIS SCRN DXS
- D ^BGP25C ; BGP TOBACCO PAST USE DXS
- D ^BGP25D ; BGP HEMORRHAGE DXS
- D ^BGP25E ; BGP ADV EFF CARD RHYTH
- D ^BGP25F ; BGP HX DRUG ALLERGY NEC
- D ^BGP25G ; BGP ADV EFF SALICYLATES
- D ^BGP25H ; BGP ADV EFF ANTIHYPERTEN AGT
- D ^BGP25I ; BGP CABG DXS
- D ^BGP25J ; BGP PCI DXS
- D ^BGP25K ; BGP SINUS BRADYCARDIA DXS
- D ^BGP25L ; BGP ADV EFF CARDIOVASC NEC
- D ^BGP25M ; BGP EYE EXAM DXS
- D ^BGP25N ; BGP IMPAIRED FASTING GLUCOSE
- D ^BGP25O ; BGP ALCOHOL SCREEN DXS
- D ^BGP25P ; BGP SCREEN FOR ALCOHOLISM DX
- D ^BGP25Q ; BGP PALLIATIVE CARE DXS
- D ^BGP25R ; BGP SUICIDAL IDEATION DXS
- D ^BGP25S ; BGP DEPRESSION SCRN DXS
- D ^BGP25T ; BGP PNEUMO IZ DXS
- D ^BGP25U ; BGP IPV IZ DXS
- D ^BGP25V ; BGP DTP IZ DXS
- D ^BGP25W ; BGP MMR IZ DXS
- D ^BGP25X ; BGP MEASLES IZ DXS
- D ^BGP25Y ; BGP MUMPS IZ DXS
- D ^BGP25Z ; BGP RUBELLA IZ DXS
- Q
- BGP25 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON FEB 19, 2012;
- +1 ;;12.1;IHS CLINICAL REPORTING;;MAY 17, 2012;Build 66
- +2 ;
- +3 ; See referenced routines to see taxonomies being loaded.
- +4 ;
- START ;
- +1 ; BGP DENTAL EXAM DXS
- DO ^BGP25A
- +2 ; BGP OSTEOPOROSIS SCRN DXS
- DO ^BGP25B
- +3 ; BGP TOBACCO PAST USE DXS
- DO ^BGP25C
- +4 ; BGP HEMORRHAGE DXS
- DO ^BGP25D
- +5 ; BGP ADV EFF CARD RHYTH
- DO ^BGP25E
- +6 ; BGP HX DRUG ALLERGY NEC
- DO ^BGP25F
- +7 ; BGP ADV EFF SALICYLATES
- DO ^BGP25G
- +8 ; BGP ADV EFF ANTIHYPERTEN AGT
- DO ^BGP25H
- +9 ; BGP CABG DXS
- DO ^BGP25I
- +10 ; BGP PCI DXS
- DO ^BGP25J
- +11 ; BGP SINUS BRADYCARDIA DXS
- DO ^BGP25K
- +12 ; BGP ADV EFF CARDIOVASC NEC
- DO ^BGP25L
- +13 ; BGP EYE EXAM DXS
- DO ^BGP25M
- +14 ; BGP IMPAIRED FASTING GLUCOSE
- DO ^BGP25N
- +15 ; BGP ALCOHOL SCREEN DXS
- DO ^BGP25O
- +16 ; BGP SCREEN FOR ALCOHOLISM DX
- DO ^BGP25P
- +17 ; BGP PALLIATIVE CARE DXS
- DO ^BGP25Q
- +18 ; BGP SUICIDAL IDEATION DXS
- DO ^BGP25R
- +19 ; BGP DEPRESSION SCRN DXS
- DO ^BGP25S
- +20 ; BGP PNEUMO IZ DXS
- DO ^BGP25T
- +21 ; BGP IPV IZ DXS
- DO ^BGP25U
- +22 ; BGP DTP IZ DXS
- DO ^BGP25V
- +23 ; BGP MMR IZ DXS
- DO ^BGP25W
- +24 ; BGP MEASLES IZ DXS
- DO ^BGP25X
- +25 ; BGP MUMPS IZ DXS
- DO ^BGP25Y
- +26 ; BGP RUBELLA IZ DXS
- DO ^BGP25Z
- +27 QUIT