©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BGPMUH10 ;IHS/MSC/MGH - MI measure NQF0371-VTE-1 ;02-Mar-2011 16:06;MGH
Source file <BGPMUH10.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS GPRA Information System | 8 | $$ACTUPAP^BGPMUEHD $$HOSPICE^BGPMUH06 ($$LOS,$$TRIAL)^BGPMUH08 $$PLTAX^BGPMUUT1 ($$MEDREF,$$REFTAX)^BGPMUUT2 ($$PALCPT,$$PALICD0,$$VSTPOV,$$VSTPOVA,$$VSTPOVB)^BGPMUUT3 $$NDC^BGPMUUT4 $$DATE^BGPMUUTL |
| IHS Patient | 1 | $$AGE^AUPNPAT |
| Kernel | 1 | ($$FMADD,$$FMDIFF)^XLFDT |
| VA Fileman | 1 | $$GET1^DIQ |
| Package | Total | Caller Graph |
|---|---|---|
| IHS GPRA Information System | 1 | BGPMUH11 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ICUADM(DFN,IEN,ADMIT,DISC) | ;Check for ward location
; ICU admission check for day of or day after |
|
| NUMER(DFN,ADMIT,VST) | ;Check to see if pt is in the numerator
|
|
| ICULOS | ;NOW CHECK LOS
|
|
| EXCLUDE(DFN,BGPIEN,BGPVST,BGPDIS) | ;See if there are exclusions
|
|
| TS(DFN,BGPVST,BGPIEN) | ;Check the treating specialty
|
|
| TOTAL(BGPIEN) | ;add up the totals
|
|
| ENTRY | ;PEP Vte measure 1 NQF0371- VTE started in 24hrs of arrival
; Print routine - VTE1^BGPMUHP6 ; Delimited output - VTE1^BGPMUHD5 |
| Name | Field # of Occurrence |
|---|---|
| $$AGE^AUPNPAT | ENTRY+23 |
| $$ACTUPAP^BGPMUEHD | ENTRY+13 |
| $$HOSPICE^BGPMUH06 | EXCLUDE+31 |
| $$LOS^BGPMUH08 | EXCLUDE+5 |
| $$TRIAL^BGPMUH08 | EXCLUDE+34 |
| $$PLTAX^BGPMUUT1 | EXCLUDE+23, NUMER+20, NUMER+24 |
| $$MEDREF^BGPMUUT2 | EXCLUDE+15, NUMER+27 |
| $$REFTAX^BGPMUUT2 | EXCLUDE+18, EXCLUDE+20, NUMER+30, NUMER+32 |
| $$PALCPT^BGPMUUT3 | NUMER+6, NUMER+12, NUMER+15 |
| $$PALICD0^BGPMUUT3 | NUMER+9 |
| $$VSTPOV^BGPMUUT3 | TS+3 |
| $$VSTPOVA^BGPMUUT3 | EXCLUDE+37, EXCLUDE+39, EXCLUDE+42 |
| $$VSTPOVB^BGPMUUT3 | EXCLUDE+22, NUMER+18, NUMER+22 |
| $$NDC^BGPMUUT4 | NUMER+45 |
| $$DATE^BGPMUUTL | TOTAL+9 |
| $$GET1^DIQ | TS+9, ICUADM+4, ICUADM+10, ICULOS+3, ICULOS+10 |
| $$FMADD^XLFDT | ENTRY+25, EXCLUDE+14, NUMER+5, ICUADM+12 |
| $$FMDIFF^XLFDT | ICULOS+21 |
| FileNo | Call Tags |
|---|---|
| ^DGPM - [#405] | GET1^DIQ |
| ^DIC(45.7 - [#45.7] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPM - [#405] | ENTRY+10, ENTRY+11, ENTRY+15, ENTRY+17, ENTRY+20, ENTRY+21, TOTAL+9, ICUADM+8, ICUADM+12, ICULOS+8 , ICULOS+12 |
| ^DGPM("ATS" | TS+5, TS+6 |
| ^DGPM("B" | ENTRY+8, ENTRY+9 |
| ^DGPM("C" | ICUADM+7, ICULOS+7 |
| ^DIC(45.7 - [#45.7] | TS+7 |
| ^PSB(53.79 - [#53.79] | NUMER+37, NUMER+38, NUMER+39, NUMER+41, NUMER+42 |
| ^TMP("BGPMU0371" | TOTAL+2, TOTAL+3, TOTAL+4, TOTAL+5, TOTAL+6, TOTAL+10*, TOTAL+12*, TOTAL+13*, TOTAL+16*, TOTAL+17* , TOTAL+19*, TOTAL+20*, TOTAL+21* |
| Name | Line Occurrences |
|---|---|
| $$EXCLUDE | ENTRY+26 |
| $$ICUADM | EXCLUDE+11 |
| $$NUMER | ENTRY+28 |
| $$TS | EXCLUDE+28 |
| ICULOS | ICUADM+5 |
| TOTAL | ENTRY+30 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADMIT | NUMER~, NUMER+5, NUMER+6, NUMER+9, NUMER+12, NUMER+15, NUMER+27, NUMER+30, NUMER+32, NUMER+35 , ICUADM~, ICUADM+5, ICUADM+12, ICUADM+13, ICULOS+5 |
| ARRAY | ICULOS+1~ |
| ARRAY( | ICULOS+5*, ICULOS+13*, ICULOS+16, ICULOS+17, ICULOS+19, ICULOS+20 |
| >> BGPACTUP | ENTRY+13*, ENTRY+14 |
| BGPADMIT | ENTRY+4~, ENTRY+20*, ENTRY+23, ENTRY+25, ENTRY+28, EXCLUDE+11, EXCLUDE+20, EXCLUDE+31 |
| BGPAGEE | ENTRY+3~, ENTRY+23*, EXCLUDE+3 |
| BGPALL | EXCLUDE+1~ |
| >> BGPBDATE | ENTRY+6, ENTRY+13 |
| >> BGPBEN | ENTRY+13 |
| BGPCLIN | EXCLUDE+1~, EXCLUDE+34*, EXCLUDE+35 |
| BGPDD | ENTRY+4~, ENTRY+21*, NUMER+7, NUMER+10, NUMER+13, NUMER+16, NUMER+19, NUMER+21, NUMER+23, NUMER+25 , NUMER+28, NUMER+31, NUMER+33, NUMER+46 |
| BGPDIS | ENTRY+3~, ENTRY+17*, ENTRY+18, ENTRY+21, ENTRY+26, EXCLUDE~, EXCLUDE+5, EXCLUDE+11 |
| BGPECI | EXCLUDE+1~ |
| >> BGPEDATE | ENTRY+7, ENTRY+13 |
| BGPER | ENTRY+4~ |
| BGPHOS | EXCLUDE+1~, EXCLUDE+31*, EXCLUDE+32 |
| BGPHPROB | ENTRY+3~ |
| BGPHSDX | ENTRY+3~, EXCLUDE+1~, EXCLUDE+39*, EXCLUDE+40 |
| >> BGPICARE("MU.VTE.0371.1" | TOTAL+22* |
| BGPIEN | ENTRY+3~, ENTRY+9*, ENTRY+10, ENTRY+11, ENTRY+15, ENTRY+17, ENTRY+20, ENTRY+26, ENTRY+30, TOTAL~ , TOTAL+9, EXCLUDE~, EXCLUDE+5, EXCLUDE+11, EXCLUDE+28, TS~, TS+2 |
| >> BGPIISO | ENTRY+14 |
| BGPIPROB | ENTRY+3~ |
| BGPISDX | ENTRY+3~, EXCLUDE+1~, EXCLUDE+37*, EXCLUDE+38 |
| BGPLOS | EXCLUDE+1~, EXCLUDE+5*, EXCLUDE+6, EXCLUDE+7 |
| >> BGPMUTF | TOTAL+2, TOTAL+3, TOTAL+4, TOTAL+5, TOTAL+6, TOTAL+10, TOTAL+12, TOTAL+13, TOTAL+16, TOTAL+17 , TOTAL+19, TOTAL+20, TOTAL+21, TOTAL+22 |
| BGPREF | EXCLUDE+1~ |
| BGPTS | EXCLUDE+1~, EXCLUDE+28*, EXCLUDE+29 |
| BGPVST | ENTRY+3~, ENTRY+15*, ENTRY+16, ENTRY+26, ENTRY+28, EXCLUDE~, EXCLUDE+22, EXCLUDE+28, EXCLUDE+31, EXCLUDE+34 , EXCLUDE+37, EXCLUDE+39, EXCLUDE+42, NUMER+18, NUMER+22, TS~, TS+3 |
| BGPVTE | EXCLUDE+1~, EXCLUDE+42*, EXCLUDE+43 |
| >> BGPXPXPX | ENTRY+14 |
| BGWARD | EXCLUDE+1~, EXCLUDE+11*, EXCLUDE+13, EXCLUDE+24 |
| CNT | ICULOS+1~, ICULOS+2*, ICULOS+4*, ICULOS+5, ICULOS+11*, ICULOS+13, ICULOS+18 |
| CPT | EXCLUDE+18*, EXCLUDE+24, NUMER+1~, NUMER+30*, NUMER+31 |
| DATE | TOTAL+1~, TOTAL+9*, TOTAL+13, TOTAL+17, TOTAL+19, TOTAL+22 |
| DENCT | TOTAL+1~, TOTAL+3*, TOTAL+10* |
| DFN | ENTRY+3~, ENTRY+11*, ENTRY+12, ENTRY+13, ENTRY+23, ENTRY+26, ENTRY+28, TOTAL+13, TOTAL+17, TOTAL+19 , TOTAL+22, EXCLUDE~, EXCLUDE+11, EXCLUDE+15, EXCLUDE+18, EXCLUDE+20, EXCLUDE+22, EXCLUDE+23, EXCLUDE+28, EXCLUDE+31 , EXCLUDE+34, EXCLUDE+37, EXCLUDE+39, EXCLUDE+42, NUMER~, NUMER+6, NUMER+9, NUMER+12, NUMER+15, NUMER+18 , NUMER+20, NUMER+22, NUMER+24, NUMER+27, NUMER+30, NUMER+32, NUMER+37, NUMER+38, TS~, TS+3 , TS+5, TS+6, ICUADM~, ICUADM+7, ICULOS+7 |
| DISC | ICUADM~, ICULOS+18 |
| DISPENSE | NUMER+1~, NUMER+41*, NUMER+42 |
| DRUG | NUMER+1~, NUMER+42*, NUMER+43*, NUMER+45 |
| END | ENTRY+3~, ENTRY+7*, ENTRY+8 |
| ENDDT | NUMER+1~ |
| EXC | ENTRY+3~, ENTRY+26*, ENTRY+28, TOTAL+11, TOTAL+13, TOTAL+14, TOTAL+22 |
| EXCCT | TOTAL+1~, TOTAL+5*, TOTAL+12* |
| FIRST | EXCLUDE+14*, EXCLUDE+15, EXCLUDE+18, EXCLUDE+20, NUMER+2~, NUMER+5*, NUMER+27, NUMER+30, NUMER+32, NUMER+36* , NUMER+37, ICUADM+2~, ICUADM+12*, ICUADM+13, ICULOS+1~ |
| GIVEN | NUMER+2~, NUMER+12*, NUMER+13 |
| I | ICULOS+15~, ICULOS+16*, ICULOS+17, ICULOS+18, ICULOS+19, ICULOS+20 |
| ICD0 | EXCLUDE+20*, EXCLUDE+24, NUMER+2~, NUMER+32*, NUMER+33 |
| >> ICUADMIT | EXCLUDE+13*, EXCLUDE+14, EXCLUDE+15, EXCLUDE+18 |
| ICULOS | ICULOS+1~, ICULOS+2*, ICULOS+22*, ICULOS+23 |
| IEN | TS+1~, TS+2*, TS+5, TS+6, ICUADM~, ICUADM+4, ICUADM+7, ICULOS+3, ICULOS+7 |
| INV | TS+1~, TS+2*, TS+5*, TS+6 |
| J | ICULOS+15~, ICULOS+19* |
| MECH | EXCLUDE+22*, EXCLUDE+23*, EXCLUDE+24, NUMER+2~, NUMER+22*, NUMER+23 |
| MECHP | NUMER+2~, NUMER+24*, NUMER+25 |
| MED | EXCLUDE+15*, EXCLUDE+24, NUMER+1~, NUMER+27*, NUMER+28 |
| MEDDTE | NUMER+1~, NUMER+35*, NUMER+37*, NUMER+38 |
| MEDIEN | NUMER+1~, NUMER+38*, NUMER+39, NUMER+41, NUMER+42 |
| NOTCT | TOTAL+1~, TOTAL+6*, TOTAL+20* |
| NOTGIV | NUMER+2~, NUMER+15*, NUMER+16 |
| NUM | ENTRY+3~, ENTRY+6*, ENTRY+28*, TOTAL+15, TOTAL+17, TOTAL+18, TOTAL+19, TOTAL+22 |
| NUMCT | TOTAL+1~, TOTAL+4*, TOTAL+16* |
| OBDX | TS+1~, TS+3*, TS+4 |
| PHARM | NUMER+2~, NUMER+18*, NUMER+19, NUMER+21 |
| PHARMP | NUMER+2~, NUMER+20*, NUMER+21 |
| PROP | NUMER+2~, NUMER+9*, NUMER+10 |
| PTCNT | TOTAL+1~, TOTAL+7*, TOTAL+8*, TOTAL+13, TOTAL+17, TOTAL+19, TOTAL+21 |
| REASON | EXCLUDE+1~, EXCLUDE+2*, EXCLUDE+3*, EXCLUDE+6*, EXCLUDE+7*, EXCLUDE+24*, EXCLUDE+29*, EXCLUDE+32*, EXCLUDE+35*, EXCLUDE+38* , EXCLUDE+40*, EXCLUDE+43*, EXCLUDE+44 |
| SECOND | ENTRY+3~, ENTRY+25* |
| START | ENTRY+3~, ENTRY+6*, ENTRY+8*, ENTRY+9 |
| STATUS | NUMER+1~, NUMER+39*, NUMER+40 |
| TAX | NUMER+1~, NUMER+44*, NUMER+45 |
| TDATE | ICUADM+2~, ICUADM+12*, ICUADM+13, ICULOS+1~, ICULOS+12*, ICULOS+13 |
| TEDS | NUMER+2~, NUMER+6*, NUMER+7 |
| TIME | ICUADM+2~, ICULOS+1~, ICULOS+21*, ICULOS+22 |
| TN | TS+1~, TS+9*, TS+10 |
| TOTALS | TOTAL+1~, TOTAL+2*, TOTAL+7 |
| TRF | ICUADM+2~, ICUADM+7*, ICUADM+8, ICUADM+10, ICUADM+12, ICULOS+1~, ICULOS+7*, ICULOS+8, ICULOS+10, ICULOS+12 |
| TS | TS+1~, TS+2*, TS+4*, TS+5, TS+6, TS+10*, TS+11 |
| TSDATA | TS+1~, TS+7*, TS+8 |
| TSFLD | TS+1~ |
| TSIEN | TS+1~, TS+6*, TS+7, TS+9 |
| TYPE | TS+1~, ICUADM+2~, ICUADM+8*, ICUADM+9, ICULOS+1~, ICULOS+8*, ICULOS+9 |
| U | ENTRY+10, ENTRY+11, ENTRY+15, ENTRY+17, ENTRY+20, ENTRY+21, TOTAL+9, TOTAL+13, TOTAL+17, TOTAL+19 , TOTAL+22, EXCLUDE+13, NUMER+7, NUMER+10, NUMER+13, NUMER+16, NUMER+19, NUMER+21, NUMER+23, NUMER+25 , NUMER+28, NUMER+31, NUMER+33, NUMER+39, NUMER+43, NUMER+46, ICUADM+8, ICUADM+12, ICULOS+5, ICULOS+8 , ICULOS+12, ICULOS+13, ICULOS+17, ICULOS+19, ICULOS+20 |
| VST | NUMER~, NUMER+6, NUMER+9, NUMER+12, NUMER+15 |
| VTE | NUMER+1~, NUMER+3*, NUMER+7*, NUMER+10*, NUMER+13*, NUMER+16*, NUMER+19*, NUMER+21*, NUMER+23*, NUMER+25* , NUMER+28*, NUMER+31*, NUMER+33*, NUMER+37, NUMER+38, NUMER+41, NUMER+45*, NUMER+46*, NUMER+47 |
| WARD | ICUADM+2~, ICUADM+4*, ICUADM+5, ICUADM+7, ICUADM+10*, ICUADM+11, ICULOS+1~, ICULOS+3*, ICULOS+5, ICULOS+10* , ICULOS+13 |
| WARDM | ICUADM+2~, ICUADM+3*, ICUADM+5*, ICUADM+13*, ICUADM+14, ICULOS+23 |
| X1 | ICULOS+15~, ICULOS+18*, ICULOS+19*, ICULOS+21 |
| X2 | ICULOS+15~, ICULOS+20*, ICULOS+21 |