BGPMUD04 ; IHS/MSC/SAT - MU measure NQF0012 ;06-JUN-2011 15:43;DU
Source file <BGPMUD04.m>
| Package | Total | Call Graph | 
|---|---|---|
| IHS GPRA Information System | 4 | ($$PLTAX,$$PRV)^BGPMUUT1 ($$LABREF,$$LASTDX)^BGPMUUT2 $$VSTPOV^BGPMUUT3 $$DATE^BGPMUUTL | 
| IHS Patient | 1 | $$SEX^AUPNPAT | 
| Kernel | 1 | ($$DT,$$FMADD)^XLFDT | 
| Taxonomy | 1 | $$ICD^ATXCHK | 
| VA Fileman | 1 | $$GET1^DIQ | 
| Package | Total | Caller Graph | 
|---|---|---|
| IHS GPRA Information System | 2 | BGPMUD05 BGPMUD08 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DLBCPT(DFN,BDATE,EDATE,TAX) | ;check for event date of CPT to be within date range | |
| EMD(DFN,VIEN,BGPD,BGPDT) | ; | |
| LAB(LABDATA,DFN,LTAX,CTAX,BGPDT,EDATE) | ;Look for LABs | |
| TOTAL(DFN) | ;See where this patient ends up ; BGPNSTR = Numerator String: <Delivery Date text> ";" <Prenatal encounter date text> ";" <Numerator met LOINC and Date text> ; BGPDSTR = Numerator Not Met String: <Delivery Date text> ";" <Prenatal encounter date text> ";" <Numerator not met text> ; BGPESTR = Excluded String: <Delivery Date text> (empty 3rd ; piece indicates Excluded) | |
| TEST | ; debug target | |
| 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 ; Print Routine: PENTRY^BGPMUDP2 ; Delimited Routine: DENTRY^BGPMUDD2 | |
| EXCLUDE(DFN) | ; | 
| Name | Field # of Occurrence | 
|---|---|
| $$ICD^ATXCHK | DLBCPT+15 | 
| $$SEX^AUPNPAT | ENTRY+19 | 
| $$PLTAX^BGPMUUT1 | EXCLUDE+20 | 
| $$PRV^BGPMUUT1 | ENTRY+36 | 
| $$LABREF^BGPMUUT2 | EXCLUDE+17 | 
| $$LASTDX^BGPMUUT2 | ENTRY+27, EXCLUDE+14 | 
| $$VSTPOV^BGPMUUT3 | EMD+2, EXCLUDE+10 | 
| $$DATE^BGPMUUTL | ENTRY+45, ENTRY+56 | 
| $$GET1^DIQ | EXCLUDE+4, EXCLUDE+13 | 
| $$DT^XLFDT | TEST+2 | 
| $$FMADD^XLFDT | ENTRY+31, ENTRY+53, ENTRY+54, EXCLUDE+17, DLBCPT+11 | 
| FileNo | Call Tags | 
|---|---|
| ^DPT - [#2] | GET1^DIQ | 
| ^AUPNVSIT - [#9000010] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ATXAX - [#9002226] | LAB+17, LAB+22 | 
| ^ATXAX("B" | DLBCPT+10, LAB+3, LAB+4 | 
| ^AUPNVCPT - [#9000010.18] | DLBCPT+14, DLBCPT+16, DLBCPT+18 | 
| ^AUPNVCPT("C" | DLBCPT+13 | 
| ^AUPNVLAB - [#9000010.09] | LAB+12, LAB+13, LAB+14, LAB+19 | 
| ^AUPNVLAB("AD" | LAB+9, LAB+11 | 
| ^AUPNVSIT - [#9000010] | ENTRY+34, DLBCPT+18 | 
| ^AUPNVSIT("AA" | ENTRY+32, ENTRY+33, LAB+7, LAB+8 | 
| ^ICPT - [#81] | DLBCPT+14 | 
| ^LAB(60 - [#60] | LAB+20, LAB+21 | 
| ^LAB(95.3 - [#95.3] | LAB+16 | 
| ^TMP("BGPMU0012" | TOTAL+6, TOTAL+7, TOTAL+8, TOTAL+9, TOTAL+10, TOTAL+15*, TOTAL+16*, TOTAL+19*, TOTAL+20*, TOTAL+24* , TOTAL+25*, TOTAL+28*, TOTAL+29*, TOTAL+30* | 
| Name | Line Occurrences | 
|---|---|
| $$DLBCPT | ENTRY+25 | 
| $$EXCLUDE | ENTRY+62 | 
| EMD | ENTRY+38 | 
| ENTRY | TEST+8 | 
| LAB | ENTRY+53 | 
| TOTAL | ENTRY+64 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| BDATE | DLBCPT~, DLBCPT+11*, DLBCPT+17 | 
| BDT | LAB+1~, LAB+6*, LAB+7 | 
| BGPADM | EXCLUDE+1~, EXCLUDE+13*, EXCLUDE+14, EXCLUDE+17 | 
| >> BGPBDATE | ENTRY+25, ENTRY+27, TEST+4* | 
| BGPBIRTH | EXCLUDE+1~, EXCLUDE+4*, EXCLUDE+14 | 
| >> BGPCNT | ENTRY+48*, ENTRY+49, ENTRY+50*, EXCLUDE+3*, EXCLUDE+5, EXCLUDE+6* | 
| BGPD | ENTRY+22*, ENTRY+37*, ENTRY+38, ENTRY+39, EMD~, EMD+3*, EMD+4 | 
| BGPDEN | ENTRY+9~, ENTRY+11*, ENTRY+43*, ENTRY+66!, TOTAL+14, TOTAL+32 | 
| >> BGPDSTR | ENTRY+15*, ENTRY+45*, TOTAL+20, TOTAL+25, TOTAL+29, TOTAL+32 | 
| BGPDT | ENTRY+9~, ENTRY+34*, ENTRY+38, ENTRY+39, ENTRY+51*, ENTRY+53, ENTRY+54, ENTRY+66!, TOTAL+5~, EMD~ , EMD+3, EXCLUDE+7*, LAB~, LAB+6 | 
| >> BGPEDATE | ENTRY+25, ENTRY+27, TEST+5* | 
| BGPEDC | ENTRY+10~, ENTRY+16*, ENTRY+67! | 
| BGPENSTR | ENTRY+10~, ENTRY+16*, ENTRY+67! | 
| BGPEXC | ENTRY+10~, ENTRY+13*, ENTRY+62*, ENTRY+63, ENTRY+67!, TOTAL+17, TOTAL+21 | 
| >> BGPH | ENTRY+49*, ENTRY+51, EXCLUDE+5*, EXCLUDE+7, EXCLUDE+8 | 
| BGPHFI | ENTRY+10~, ENTRY+67! | 
| BGPHIV | EXCLUDE+1~, EXCLUDE+20*, EXCLUDE+21 | 
| BGPHIV1 | ENTRY+10~, ENTRY+67! | 
| BGPHIV2 | ENTRY+10~, ENTRY+67! | 
| BGPI | EMD+1~ | 
| >> BGPICARE("MU.EP.0012.1" | TOTAL+32* | 
| BGPLDATE | ENTRY+10~, ENTRY+16*, ENTRY+67! | 
| >> BGPMUTF | TOTAL+6, TOTAL+7, TOTAL+8, TOTAL+9, TOTAL+10, TOTAL+15, TOTAL+16, TOTAL+19, TOTAL+20, TOTAL+24 , TOTAL+25, TOTAL+28, TOTAL+29, TOTAL+30, TOTAL+32, TEST+7* | 
| >> BGPNSTR | ENTRY+14*, ENTRY+56*, ENTRY+59*, ENTRY+63*, TOTAL+20, TOTAL+25, TOTAL+29, TOTAL+32 | 
| BGPNUM | ENTRY+9~, ENTRY+12*, ENTRY+55*, ENTRY+59, ENTRY+62, ENTRY+66!, TOTAL+22, TOTAL+26, TOTAL+32 | 
| BGPP | ENTRY+9~, ENTRY+16*, ENTRY+25*, ENTRY+27*, ENTRY+28, ENTRY+31, ENTRY+45, ENTRY+66! | 
| BGPPNA | ENTRY+17!, ENTRY+41, ENTRY+67! | 
| BGPPNA( | ENTRY+39*, ENTRY+44, ENTRY+49, EXCLUDE+5, EXCLUDE+8 | 
| >> BGPPROV | ENTRY+36, TEST+6* | 
| BGPR | DLBCPT+1~, DLBCPT+3* | 
| BGPSCRN | ENTRY+10~, ENTRY+16*, ENTRY+49, ENTRY+67! | 
| BGPSEX | ENTRY+9~, ENTRY+19*, ENTRY+20, ENTRY+66! | 
| BGPTMP | EMD+1~ | 
| BGPVCPT | DLBCPT+1~, DLBCPT+3*, DLBCPT+13*, DLBCPT+14, DLBCPT+16, DLBCPT+18 | 
| CPT | LAB+1~, LAB+21*, LAB+22 | 
| >> CPTDATE | DLBCPT+16*, DLBCPT+17, DLBCPT+19 | 
| CPTP | LAB+1~ | 
| CPTT | DLBCPT+2~, DLBCPT+4*, DLBCPT+14*, DLBCPT+15, DLBCPT+19 | 
| CTAX | LAB~, LAB+4 | 
| >> CTIEN | LAB+4*, LAB+18, LAB+22 | 
| DENCT | TOTAL+5~, TOTAL+9*, TOTAL+15*, TOTAL+16 | 
| DFN | ENTRY+19, ENTRY+25, ENTRY+27, ENTRY+32, ENTRY+33, ENTRY+38, ENTRY+53, ENTRY+62, ENTRY+64, TOTAL~ , TOTAL+16, TOTAL+20, TOTAL+25, TOTAL+29, EMD~, EMD+2, EXCLUDE~, EXCLUDE+4, EXCLUDE+10, EXCLUDE+14 , EXCLUDE+17, EXCLUDE+20, DLBCPT~, DLBCPT+7, DLBCPT+13, LAB~, LAB+7, LAB+8, TEST+3* | 
| DT | TEST+2* | 
| EDATE | DLBCPT~, DLBCPT+9, DLBCPT+11, DLBCPT+17, LAB~, LAB+6 | 
| EDT | LAB+1~, LAB+6*, LAB+7*, LAB+8 | 
| END | ENTRY+9~, ENTRY+31*, ENTRY+32, ENTRY+66! | 
| >> EXCCT | TOTAL+10*, TOTAL+18*, TOTAL+19 | 
| FIRST | ENTRY+9~, ENTRY+32*, ENTRY+33, ENTRY+66! | 
| IEN | ENTRY+9~, ENTRY+66! | 
| >> LAB60 | LAB+19*, LAB+20, LAB+21 | 
| LABDATA | ENTRY+52!, ENTRY+53, ENTRY+54, ENTRY+56, LAB~, LAB+2*, LAB+11, LAB+17*, LAB+18, LAB+22* , LAB+23 | 
| LOINC | LAB+1~, LAB+16*, LAB+17 | 
| LOINCP | LAB+1~, LAB+12*, LAB+15, LAB+16 | 
| LTAX | LAB~, LAB+3 | 
| >> LTIEN | LAB+3*, LAB+5, LAB+10, LAB+17 | 
| NOTCT | TOTAL+5~, TOTAL+8*, TOTAL+27*, TOTAL+28 | 
| NUMCT | TOTAL+5~, TOTAL+7*, TOTAL+23*, TOTAL+24 | 
| PT1 | TOTAL+5~, TOTAL+11*, TOTAL+13*, TOTAL+20, TOTAL+25, TOTAL+29, TOTAL+30 | 
| PTCNT | TOTAL+5~, TOTAL+11*, TOTAL+12*, TOTAL+30 | 
| >> REASON | EXCLUDE+2*, EXCLUDE+5, EXCLUDE+11*, EXCLUDE+15*, EXCLUDE+18*, EXCLUDE+21*, EXCLUDE+22 | 
| RESULT | DLBCPT+2~, DLBCPT+5*, DLBCPT+13, DLBCPT+19*, DLBCPT+20 | 
| >> SITE | LAB+20*, LAB+21 | 
| START | ENTRY+9~, ENTRY+31*, ENTRY+32, ENTRY+66! | 
| TAX | DLBCPT~, DLBCPT+8, DLBCPT+10 | 
| TIEN | DLBCPT+2~, DLBCPT+4*, DLBCPT+10*, DLBCPT+15 | 
| TOTALS | TOTAL+5~, TOTAL+6*, TOTAL+11 | 
| U | ENTRY+31, ENTRY+34, ENTRY+45, ENTRY+54, ENTRY+56, TOTAL+11, TOTAL+20, TOTAL+25, TOTAL+29, TOTAL+30 , TOTAL+32, DLBCPT+14, DLBCPT+16, DLBCPT+18, DLBCPT+19, LAB+12, LAB+13, LAB+14, LAB+16, LAB+17 , LAB+19, LAB+21, LAB+22, TEST+1* | 
| VCPT | DLBCPT+2~, DLBCPT+4*, DLBCPT+14* | 
| VDATE | ENTRY+9~, ENTRY+66!, DLBCPT+18*, DLBCPT+19 | 
| VIEN | ENTRY+9~, ENTRY+33*, ENTRY+34, ENTRY+36, ENTRY+38, ENTRY+39, ENTRY+66!, EMD~, EMD+2, EXCLUDE+8* , EXCLUDE+10, EXCLUDE+13, LAB+1~, LAB+8*, LAB+9, LAB+11 | 
| VIEN1 | ENTRY+9~, ENTRY+44*, ENTRY+45 | 
| >> VLABDT | LAB+13*, LAB+17, LAB+22 | 
| VLABP | LAB+1~, LAB+11*, LAB+12, LAB+13, LAB+14, LAB+19 | 
| >> VLABRDT | LAB+14*, LAB+17, LAB+22 | 
| >> VST | DLBCPT+18* | 
| >> X | EMD+2*, EMD+3, EXCLUDE+10*, EXCLUDE+11, EXCLUDE+14*, EXCLUDE+15, EXCLUDE+17*, EXCLUDE+18 |