Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: BGP8CON

BGP8CON.m

Go to the documentation of this file. 
  1. BGP8CON ; IHS/CMI/LAB - measure AHR.A ;
  1.  ;;18.1;IHS CLINICAL REPORTING;;MAY 25, 2018;Build 66
  1.  ;
  1.  ;
  1. BETA(P,BDATE,EDATE,NMIB,NMIE) ;EP - BETA BLOCKER CONTRAINDICATION
  1.  ;P - patient DFN
  1.  ;BDATE - beginning date to search for contraindication
  1.  ;EDATE - ending date of search for contraindication
  1.  ;NMIB - beginning date to search for NMI Refusal (not medically indicated)
  1.  ;NMIE - ending date to search for NMI Refusal (not medically indicated)
  1.  ;
  1.  ;return value = piece 1 = 1 for yes, contraindication found
  1.  ;                         BLANK for no, contraindication not found
  1.  ;               piece 2 = text of what was found
  1.  ;logic:
  1.  ;2 different asthma diagnoses on 2 different dates between bdate and edate
  1.  ;Hypotension dx between bdate and edate
  1.  ;heart block >1 degree diagnosis between bdate and edate
  1.  ;sinus bradycardia 1 dx between bdate and edate
  1.  ;COPD - 2 diagnoses between bdate and edate on different dates
  1.  ;NMI Refusal documented for beta blocker between NMIB and NMIE
  1.  ;CPT G8011 between NMIB and NMIE
  1.  ;
  1.  S NMIB=$G(NMIB),NMIE=$G(NMIE)
  1.  G BETACONT^BGP8D724
  1.  ;
  1.  ;
  1. ASA(P,BDATE,EDATE,NMIB,NMIE) ;EP - does patient have an aspirin CONTRAINDICATION
  1.  ;P - PATIENT DFN
  1.  ;BDATE - BEGINNING DATE TO LOOK FOR DATA
  1.  ;EDATE - ENDING DATE TO LOOK FOR DATA
  1.  ;NMIB - nmi beginning date
  1.  ;NMIE - ending date to look for nmi
  1.  ;
  1.  ;return value = piece 1 = 1 for yes, contraindication found
  1.  ;                         blank for no, contraindication not found
  1.  ;               piece 2 = text of what was found
  1.  ;
  1.  ;Non-discontinued Prescription for warfarin between bdate and edate.
  1.  ;Diagnosis 459.0 - Hemorrage DX EVER before EDATE
  1.  ;NMI Refusal between NMIB and NMIE
  1.  ;CPT G8008 between NMIB and NMIE
  1.  ;
  1.  G ASA^BGP8CON1
  1.  ;
  1. ACEI(P,BDATE,EDATE,NMIB,NMIE) ;EP does patient have an ACEI contraidication
  1.  ;P - patient DFN
  1.  ;BDATE - beginning date to search for contraindication
  1.  ;EDATE - ending date of search for contraindication
  1.  ;NMIBD - beginning date to search for NMI Refusal (not medically indicated)
  1.  ;NMIED - ending date to search for NMI Refusal (not medically indicated)
  1.  ;
  1.  ;return value = piece 1 = 1 for yes, contraindication found
  1.  ;                         blank for no, contraindication not found
  1.  ;               piece 2 = text of what was found
  1.  ;LOGIC:
  1.  ;diagnosis between BDATE and EDATE in BGP CMS AORTIC STENOSIS DXS
  1.  ;NMI Refusal for drug in BGP HEDIS ACEI MEDS taxonomy between NMIB and NMIE
  1.  ;NMI Refusal for drug in BGP HEDIS ARB MEDS taxonomy between NMIB and NMIE
  1.  G ACEI^BGP8CON1
  1.  ;
  1. STATIN(P,BDATE,EDATE,NMIB,NMIE) ;EP does patient have an STATIN contraidication
  1.  ;P - patient DFN
  1.  ;BDATE - beginning date to search for contraindication
  1.  ;EDATE - ending date of search for contraindication
  1.  ;NMIBD - beginning date to search for NMI Refusal (not medically indicated)
  1.  ;NMIED - ending date to search for NMI Refusal (not medically indicated)
  1.  ;
  1.  ;return value = piece 1 = 1 for yes, contraindication found
  1.  ;                         blank for no, contraindication not found
  1.  ;               piece 2 = text of what was found
  1.  ;LOGIC:
  1.  ;PREGNANCY diagnosis between BDATE and EDATE 
  1.  ;NMI Refusal for drug in BGP HEDIS STATIN MEDS taxonomy between NMIB and NMIE
  1.  ;BREASTFEEDING education between BDATE and EDATE
  1.  ;BREASTFEEDING POV between BDATE and EDATE
  1.  ;alchohol Hepatitis pov between BDATE and EDATE
  1.  ;
  1.  G STATIN^BGP8CON1
  1.  ;