BGPMUD03 ; IHS/MSC/SAT - MU measure NQF0081 ;03-Aug-2011 16:14;DU
Source file <BGPMUD03.m>
| Package | Total | Call Graph | 
|---|---|---|
| IHS GPRA Information System | 4 | ($$PLTAX,$$PRV,$$VSTCPT)^BGPMUUT1 ($$LASTDX,$$MEDREF)^BGPMUUT2 $$FIND^BGPMUUT8 $$DATE^BGPMUUTL | 
| IHS Patient | 1 | ($$AGE,$$SEX)^AUPNPAT | 
| Kernel | 1 | $$FMADD^XLFDT | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DEN1(DFN,BGPBDATE,BGPLED) | ; Find the latest CARDIAC EJECTION FRACTION (CEF) measurement | |
| TEST | ;debug target | |
| TOTAL(DFN) | ;See where this patient ends up | |
| NUM(DFN,BGPBDATE,BGPEDATE) | ;Look for ACE/ARB PRESCRIPTION | |
| ENTRY | ;EP ; expects: ; DFN = patient code from VA PATIENT file ; BGPBDATE = begin date of report ; BGPEDATE = end date of report ; BGPPROV = provider code from NEW PERSON file ; BGPMUTF = timeframe variable - "C"=current year; "P"=previous year; "B"=baseline year | |
| EXCLUDE(DFN) | ;check for exclusions | 
| Name | Field # of Occurrence | 
|---|---|
| $$AGE^AUPNPAT | ENTRY+23 | 
| $$SEX^AUPNPAT | ENTRY+20 | 
| $$PLTAX^BGPMUUT1 | ENTRY+64, EXCLUDE+16, EXCLUDE+33 | 
| $$PRV^BGPMUUT1 | ENTRY+35 | 
| $$VSTCPT^BGPMUUT1 | ENTRY+36, ENTRY+43, ENTRY+50 | 
| $$LASTDX^BGPMUUT2 | ENTRY+62, EXCLUDE+13, EXCLUDE+30 | 
| $$MEDREF^BGPMUUT2 | EXCLUDE+37 | 
| $$FIND^BGPMUUT8 | NUM+3 | 
| $$DATE^BGPMUUTL | ENTRY+38, ENTRY+45, ENTRY+52, ENTRY+72, ENTRY+77 | 
| $$FMADD^XLFDT | ENTRY+61 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNVMSR - [#9000010.01] | DEN1+13 | 
| ^AUPNVMSR("AA" | DEN1+8, DEN1+11 | 
| ^AUPNVSIT - [#9000010] | ENTRY+33 | 
| ^AUPNVSIT("AA" | ENTRY+31, ENTRY+32 | 
| ^AUTTMSR("B" | DEN1+6 | 
| ^DPT - [#2] | ENTRY+60 | 
| ^GMR(120.8 - [#120.8] | EXCLUDE+5, EXCLUDE+6, EXCLUDE+7 | 
| ^PS(50.605 - [#50.605] | EXCLUDE+3, EXCLUDE+4 | 
| ^TMP("BGPMU0081" | TOTAL+2, TOTAL+3, TOTAL+4, TOTAL+5, TOTAL+6, TOTAL+11*, TOTAL+12*, TOTAL+15*, TOTAL+16*, TOTAL+19* , TOTAL+20*, TOTAL+22*, TOTAL+23*, TOTAL+24* | 
| Name | Line Occurrences | 
|---|---|
| $$DEN1 | ENTRY+69 | 
| $$EXCLUDE | ENTRY+80 | 
| $$NUM | ENTRY+76 | 
| TOTAL | ENTRY+82 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ACERX | NUM+1~, NUM+3*, NUM+4, NUM+5 | 
| BGP4 | ENTRY+7~, ENTRY+68*, ENTRY+69*, ENTRY+70, ENTRY+72, ENTRY+84! | 
| >> BGPACE | EXCLUDE+3*, EXCLUDE+8 | 
| BGPAGEE | ENTRY+8~, ENTRY+23*, ENTRY+25, ENTRY+85! | 
| >> BGPARB | EXCLUDE+4*, EXCLUDE+9 | 
| BGPBDATE | ENTRY+30, ENTRY+61, ENTRY+76, NUM~, NUM+3, DEN1~, DEN1+10 | 
| BGPBIRTH | ENTRY+8~, ENTRY+60*, ENTRY+61*, ENTRY+62, ENTRY+69, ENTRY+85!, EXCLUDE+13, EXCLUDE+30, EXCLUDE+37 | 
| BGPC | ENTRY+13~, ENTRY+29*, ENTRY+31, ENTRY+32, ENTRY+40*, ENTRY+42, ENTRY+47*, ENTRY+49, ENTRY+54*, ENTRY+56 , ENTRY+72, ENTRY+87! | 
| >> BGPDA | EXCLUDE+6*, EXCLUDE+7 | 
| >> BGPDC | EXCLUDE+7*, EXCLUDE+8, EXCLUDE+9 | 
| BGPDEN | ENTRY+8~, ENTRY+16*, ENTRY+72*, ENTRY+85!, TOTAL+16, TOTAL+20, TOTAL+23 | 
| BGPDT | ENTRY+8~, ENTRY+33*, ENTRY+38, ENTRY+45, ENTRY+52, ENTRY+85! | 
| BGPEDATE | ENTRY+23, ENTRY+30, ENTRY+76, NUM~, NUM+3, EXCLUDE+13, EXCLUDE+30 | 
| BGPEMF | ENTRY+13~, ENTRY+27*, ENTRY+87! | 
| BGPEXC | ENTRY+9~, ENTRY+17*, ENTRY+80*, ENTRY+86!, TOTAL+14 | 
| >> BGPHF | ENTRY+62*, ENTRY+64*, ENTRY+66, ENTRY+72 | 
| BGPIC | ENTRY+15~, ENTRY+27*, ENTRY+38*, ENTRY+40, ENTRY+88! | 
| BGPLED | ENTRY+13~, ENTRY+28*, ENTRY+39*, ENTRY+46*, ENTRY+53*, ENTRY+62, ENTRY+69, ENTRY+87!, EXCLUDE+37, DEN1~ , DEN1+10 | 
| >> BGPMUTF | TOTAL+2, TOTAL+3, TOTAL+4, TOTAL+5, TOTAL+6, TOTAL+11, TOTAL+12, TOTAL+15, TOTAL+16, TOTAL+19 , TOTAL+20, TOTAL+22, TOTAL+23, TOTAL+24 | 
| BGPNC | ENTRY+15~, ENTRY+27*, ENTRY+52*, ENTRY+54, ENTRY+88! | 
| BGPNOT | ENTRY+9~, ENTRY+19*, ENTRY+79*, ENTRY+86!, TOTAL+21, TOTAL+23 | 
| BGPNUM | ENTRY+8~, ENTRY+18*, ENTRY+76*, ENTRY+77*, ENTRY+85!, TOTAL+18, TOTAL+20 | 
| BGPOC | ENTRY+15~, ENTRY+27*, ENTRY+45*, ENTRY+47, ENTRY+88! | 
| >> BGPPA | EXCLUDE+5*, EXCLUDE+6, EXCLUDE+7 | 
| >> BGPPROV | ENTRY+35 | 
| BGPSEX | ENTRY+7~, ENTRY+20*, ENTRY+84!, EXCLUDE+13 | 
| CEF | DEN1+1~, DEN1+2*, DEN1+15*, DEN1+16 | 
| DENCT | TOTAL+1~, TOTAL+4*, TOTAL+10*, TOTAL+11 | 
| DFN | ENTRY+20, ENTRY+23, ENTRY+31, ENTRY+32, ENTRY+36, ENTRY+43, ENTRY+50, ENTRY+60, ENTRY+62, ENTRY+64 , ENTRY+69, ENTRY+76, ENTRY+80, ENTRY+82, TOTAL~, TOTAL+12, TOTAL+16, TOTAL+20, TOTAL+23, NUM~ , NUM+3, EXCLUDE~, EXCLUDE+5, EXCLUDE+13, EXCLUDE+16, EXCLUDE+30, EXCLUDE+33, EXCLUDE+37, DEN1~, DEN1+8 , DEN1+11 | 
| END | ENTRY+8~, ENTRY+30*, ENTRY+31, ENTRY+85! | 
| EXCCT | TOTAL+1~, TOTAL+3*, TOTAL+15* | 
| EXCEPT | ENTRY+7~, ENTRY+84!, EXCLUDE+1*, EXCLUDE+8*, EXCLUDE+9*, EXCLUDE+10, EXCLUDE+14*, EXCLUDE+15, EXCLUDE+17*, EXCLUDE+18 , EXCLUDE+31*, EXCLUDE+32, EXCLUDE+34*, EXCLUDE+35, EXCLUDE+38*, EXCLUDE+39 | 
| FIRST | ENTRY+8~, ENTRY+31*, ENTRY+32, ENTRY+85! | 
| FOUND | NUM+1~, NUM+2*, NUM+4, NUM+5*, NUM+6, DEN1+1~, DEN1+2*, DEN1+8, DEN1+11, DEN1+12* | 
| IEN | ENTRY+8~, ENTRY+85!, DEN1+1~, DEN1+11*, DEN1+13 | 
| INV | DEN1+1~, DEN1+8*, DEN1+9, DEN1+11 | 
| >> MED | EXCLUDE+37*, EXCLUDE+38 | 
| >> MTYP | DEN1+6*, DEN1+7, DEN1+8, DEN1+11 | 
| MTYPE | DEN1+1~ | 
| NOT1CT | TOTAL+1~, TOTAL+6*, TOTAL+22* | 
| NUMCT | TOTAL+1~, TOTAL+5*, TOTAL+19* | 
| PREG | ENTRY+7~, ENTRY+84!, EXCLUDE+12*, EXCLUDE+13*, EXCLUDE+14, EXCLUDE+16*, EXCLUDE+17 | 
| PTCNT | TOTAL+1~, TOTAL+7*, TOTAL+8*, TOTAL+12, TOTAL+16, TOTAL+20, TOTAL+23, TOTAL+24 | 
| RDATE | DEN1+1~, DEN1+9*, DEN1+10, DEN1+15 | 
| RESULT | DEN1+1~, DEN1+13*, DEN1+15 | 
| RET | ENTRY+7~, ENTRY+84!, EXCLUDE+29*, EXCLUDE+30*, EXCLUDE+31, EXCLUDE+33*, EXCLUDE+34 | 
| START | ENTRY+8~, ENTRY+30*, ENTRY+31, ENTRY+85! | 
| TOTALS | TOTAL+1~, TOTAL+2*, TOTAL+7 | 
| U | ENTRY+33, ENTRY+38, ENTRY+39, ENTRY+40, ENTRY+45, ENTRY+46, ENTRY+47, ENTRY+52, ENTRY+53, ENTRY+54 , ENTRY+60, ENTRY+72, ENTRY+77, ENTRY+79, TOTAL+16, TOTAL+20, TOTAL+23, NUM+5, EXCLUDE+7, EXCLUDE+8 , EXCLUDE+9, EXCLUDE+14, EXCLUDE+17, EXCLUDE+31, EXCLUDE+34, DEN1+13, DEN1+15 | 
| VIEN | ENTRY+8~, ENTRY+32*, ENTRY+33, ENTRY+35, ENTRY+36, ENTRY+43, ENTRY+50, ENTRY+85! | 
| >> X | ENTRY+36*, ENTRY+37, ENTRY+39, ENTRY+43*, ENTRY+44, ENTRY+46, ENTRY+50*, ENTRY+51, ENTRY+53 |