©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
BGP0EO1 ; IHS/CMI/LAB - calc measures 29 Apr 2009 7:38 PM 14 Nov 2006 5:02 PM 12 Nov 2008 11:03 AM 07 Apr 2009 7:00 AM ;
Source file <BGP0EO1.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS GPRA Information System | 6 | ($$LDL,$$LOINC,$$MEANBP)^BGP0D2 $$LOINC^BGP0D21 $$CPT^BGP0DU $$ANTICOAG^BGP0EO11 $$DATE^BGP0UTL ($$CPTREFT,$$REFUSAL)^BGP0UTL1 |
| Kernel | 2 | ($$FMADD,$$FMDIFF,$$FMTE)^XLFDT ($$STRIP,$$UP)^XLFSTR |
| Patient Care Component Reports | 2 | $$START1^APCLDF ($$CLINIC,$$DSCHDATE)^APCLV |
| DRG Grouper | 1 | $$CPT^ICPTCOD |
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
| Taxonomy | 1 | $$ICD^ATXCHK |
| Package | Total | Caller Graph |
|---|---|---|
| IHS GPRA Information System | 1 | BGP0DHE1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PNEUOX(P,BDATE,EDATE,BGPR) | ;EP
|
|
| EOST | ;
|
|
| EOOX | ;
|
|
| BPS | ;
|
|
| BPCPT(P,BDATE,EDATE) | ;EP
|
|
| EODMB1 | ;EP
|
|
| OXSAT(V) | ;was there ox sat at the visit
|
|
| TIAFIB(P,BDATE,EDATE,BGPR) | ;EP
|
|
| STV(X) | ;EP - strip all characters besides numbers and a "."
|
|
| EODML1 | ;EP
|
|
| EODMG1 | ;EP
|
|
| HGBA1C(P,BDATE,EDATE) | ;EP
|
| Name | Field # of Occurrence |
|---|---|
| $$START1^APCLDF | BPCPT+2, TIAFIB+4, PNEUOX+4 |
| $$CLINIC^APCLV | BPCPT+7 |
| $$DSCHDATE^APCLV | TIAFIB+27 |
| $$ICD^ATXCHK | BPCPT+13, BPCPT+17, TIAFIB+16, OXSAT+13, OXSAT+27 |
| $$LDL^BGP0D2 | EODML1+5 |
| $$LOINC^BGP0D2 | HGBA1C+15 |
| $$MEANBP^BGP0D2 | EODMB1+5 |
| $$LOINC^BGP0D21 | OXSAT+39 |
| $$CPT^BGP0DU | HGBA1C+3 |
| $$ANTICOAG^BGP0EO11 | TIAFIB+27 |
| $$DATE^BGP0UTL | EODML1+13, HGBA1C+33, HGBA1C+36, HGBA1C+37, HGBA1C+38, HGBA1C+40, HGBA1C+42, HGBA1C+43, HGBA1C+44, TIAFIB+26 , PNEUOX+18, OXSAT+6, OXSAT+18, OXSAT+28, OXSAT+36, OXSAT+40, OXSAT+45, OXSAT+50, OXSAT+53, OXSAT+54 |
| $$CPTREFT^BGP0UTL1 | OXSAT+52 |
| $$REFUSAL^BGP0UTL1 | OXSAT+44, OXSAT+49 |
| $$CPT^ICPTCOD | BPCPT+14, BPCPT+18, OXSAT+18, OXSAT+28 |
| $$VAL^XBDIQ1 | HGBA1C+12, HGBA1C+16, TIAFIB+16, TIAFIB+17, OXSAT+6, OXSAT+14, OXSAT+15, OXSAT+36, OXSAT+40 |
| $$FMADD^XLFDT | TIAFIB+27 |
| $$FMDIFF^XLFDT | PNEUOX+25 |
| $$FMTE^XLFDT | TIAFIB+4, PNEUOX+4 |
| $$STRIP^XLFSTR | HGBA1C+39, STV+4 |
| $$UP^XLFSTR | HGBA1C+33 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ATXAX("B" | HGBA1C+3, HGBA1C+6, BPCPT+13, BPCPT+17, TIAFIB+7, OXSAT+9, OXSAT+22, OXSAT+32, OXSAT+52 |
| ^ATXLAB - [#9002228] | HGBA1C+12, OXSAT+36, OXSAT+48 |
| ^ATXLAB("B" | HGBA1C+7, OXSAT+33, OXSAT+47 |
| ^AUPNVCPT - [#9000010.18] | BPCPT+10, OXSAT+11, OXSAT+12 |
| ^AUPNVCPT("AD" | BPCPT+8, BPCPT+9, OXSAT+10 |
| ^AUPNVLAB - [#9000010.09] | HGBA1C+11, HGBA1C+12, HGBA1C+14, HGBA1C+16, OXSAT+35, OXSAT+36, OXSAT+38 |
| ^AUPNVLAB("AD" | OXSAT+34 |
| ^AUPNVLAB("AE" | HGBA1C+8, HGBA1C+9, HGBA1C+10 |
| ^AUPNVMSR("AD" | OXSAT+6 |
| ^AUPNVPOV - [#9000010.07] | TIAFIB+14 |
| ^AUPNVPOV("AD" | TIAFIB+13 |
| ^AUPNVSIT - [#9000010] | BPCPT+6, BPCPT+12, TIAFIB+10, TIAFIB+11, TIAFIB+12, TIAFIB+22, PNEUOX+9, PNEUOX+10, PNEUOX+11, PNEUOX+14 , OXSAT+4 |
| ^AUPNVTC - [#9000010.33] | OXSAT+24, OXSAT+25 |
| ^AUPNVTC("AD" | OXSAT+23 |
| ^AUTTMSR("B" | OXSAT+44 |
| ^ICPT - [#81] | OXSAT+16, OXSAT+17 |
| Name | Line Occurrences |
|---|---|
| $$BPCPT | EODMB1+6 |
| $$HGBA1C | EODMG1+5 |
| $$OXSAT | PNEUOX+19 |
| $$STV | HGBA1C+41 |
| BPS | EODMB1+6, EODMB1+8 |
| PNEUOX | EOOX+7 |
| TIAFIB | EOST+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | HGBA1C+1~ |
| A | STV+2~, STV+4*, TIAFIB+1~, TIAFIB+8*, TIAFIB+9, TIAFIB+10, TIAFIB+11, TIAFIB+12, TIAFIB+16, TIAFIB+19 , TIAFIB+22*, PNEUOX+1~, PNEUOX+7*, PNEUOX+8, PNEUOX+9, PNEUOX+10, PNEUOX+11, PNEUOX+14* |
| B | HGBA1C+8*, STV+2~, STV+4*, TIAFIB+1~, TIAFIB+13*, TIAFIB+18*, TIAFIB+19, PNEUOX+1~ |
| BDATE | HGBA1C~, HGBA1C+3, HGBA1C+8, BPCPT~, BPCPT+2, TIAFIB~, TIAFIB+4, PNEUOX~, PNEUOX+4 |
| >> BGPACTUP | EOOX+2, EOST+3 |
| >> BGPAGEB | EOOX+3, EOST+4 |
| >> BGPBDATE | EODMG1+5, EODMB1+5, EODMB1+6, EODML1+5, EOOX+7, EOST+7 |
| BGPBP | EODMB1+1~, EODMB1+5*, EODMB1+6*, EODMB1+7, EODMB1+8, EODMB1+9 |
| BGPC | HGBA1C+1~, HGBA1C+2*, HGBA1C+4*, HGBA1C+12*, HGBA1C+16*, HGBA1C+21!, HGBA1C+24, TIAFIB+24*, TIAFIB+26*, TIAFIB+28 , TIAFIB+30, PNEUOX+1~, PNEUOX+16*, PNEUOX+18*, PNEUOX+20, PNEUOX+26 |
| BGPC( | HGBA1C+22*, HGBA1C+28 |
| BGPD | EOOX+1~, EOOX+14*, EOOX+16*, EOOX+19, EOST+1~, EOST+14*, EOST+16*, EOST+19, TIAFIB+1~, TIAFIB+24* , TIAFIB+25, TIAFIB+26, TIAFIB+27, PNEUOX+1~, PNEUOX+16*, PNEUOX+17, PNEUOX+18, PNEUOX+23, PNEUOX+24, PNEUOX+25 , OXSAT+2~, OXSAT+4*, OXSAT+6, OXSAT+18, OXSAT+28, OXSAT+36, OXSAT+40, OXSAT+44, OXSAT+45, OXSAT+49 , OXSAT+50, OXSAT+52, OXSAT+53, OXSAT+54 |
| >> BGPD1 | EODMG1+3*, EODMB1+3*, EODML1+3*, EOOX+4*, EOOX+9*, EOOX+10, EOST+5*, EOST+9*, EOST+10 |
| >> BGPDMD2 | EODMG1+2, EODMB1+2, EODML1+2 |
| >> BGPEDATE | EODMG1+5, EODMB1+5, EODMB1+6, EODML1+5, EOOX+7, EOST+7 |
| BGPG | HGBA1C+1~, BPCPT+1~, BPCPT+2!, TIAFIB+1~, TIAFIB+2!, TIAFIB+20, PNEUOX+1~, PNEUOX+2!, PNEUOX+12, OXSAT+2~ , OXSAT+3*, OXSAT+6*, OXSAT+7, OXSAT+10, OXSAT+18*, OXSAT+20, OXSAT+23, OXSAT+28*, OXSAT+30, OXSAT+34 , OXSAT+36*, OXSAT+40*, OXSAT+41, OXSAT+48, OXSAT+50*, OXSAT+51 |
| BGPG( | BPCPT+4, BPCPT+5, TIAFIB+8, TIAFIB+9, TIAFIB+10!, TIAFIB+11!, TIAFIB+12!, TIAFIB+16*, TIAFIB+19!, TIAFIB+22 , PNEUOX+7, PNEUOX+8, PNEUOX+9!, PNEUOX+10!, PNEUOX+11!, PNEUOX+14 |
| BGPG(1 | TIAFIB+5, PNEUOX+5 |
| BGPLDL | EODML1+1~, EODML1+5*, EODML1+8*, EODML1+9, EODML1+10, EODML1+13 |
| BGPLHGB | EODMG1+1~, EODMG1+5*, EODMG1+6, EODMG1+7 |
| BGPLT | HGBA1C+1~, HGBA1C+7*, HGBA1C+12, OXSAT+2~, OXSAT+33*, OXSAT+36 |
| BGPN | EOOX+1~, EOOX+14*, EOOX+17*, EOOX+19, EOST+1~, EOST+14*, EOST+17*, EOST+19 |
| >> BGPN1 | EODMG1+4*, EODMG1+6*, EODMB1+4*, EODMB1+7*, EODMB1+11*, EODML1+4*, EODML1+11*, EOOX+5*, EOOX+11*, EOST+6* , EOST+11* |
| >> BGPN2 | EOOX+12*, EOST+12* |
| BGPN3 | EODML1+1~, EOOX+13*, EOST+13* |
| BGPN4 | EODML1+1~, EODML1+7*, EODML1+8*, EODML1+10*, EODML1+11 |
| BGPN5 | EODML1+1~ |
| BGPOXV | EOOX+1~, EOOX+6!, EOOX+7, EOST+1~, EOST+2!, EOST+7 |
| BGPOXV( | EOOX+15, EOOX+16, EOOX+17, EOST+15, EOST+16, EOST+17 |
| BGPOXV("DENOM" | EOOX+9, EOST+9 |
| BGPOXV(0 | EOOX+11, EOOX+12, EOOX+13, EOST+11, EOST+12, EOST+13 |
| BGPR | TIAFIB~, TIAFIB+2!, TIAFIB+3*, PNEUOX~, PNEUOX+2!, PNEUOX+3* |
| BGPR( | TIAFIB+26*, TIAFIB+28*, PNEUOX+18*, PNEUOX+20* |
| BGPR("DENOM" | TIAFIB+5*, TIAFIB+20*, TIAFIB+30*, PNEUOX+5*, PNEUOX+12*, PNEUOX+26* |
| BGPR(0 | TIAFIB+3*, TIAFIB+29*, PNEUOX+3*, PNEUOX+21* |
| >> BGPSTOP | EODMG1+2*, EODMB1+2*, EODML1+2*, EOOX+2*, EOOX+3*, EOOX+10*, EOST+3*, EOST+4*, EOST+10* |
| BGPT | HGBA1C+1~, HGBA1C+19 |
| BGPT( | HGBA1C+4*, HGBA1C+12*, HGBA1C+16*, HGBA1C+21, HGBA1C+22, HGBA1C+26, HGBA1C+27, HGBA1C+28!, HGBA1C+30, HGBA1C+31 , HGBA1C+32, HGBA1C+33, HGBA1C+36, HGBA1C+37, HGBA1C+38, HGBA1C+40, HGBA1C+42, HGBA1C+43, HGBA1C+44 |
| BGPV | EODMB1+1~, EODMB1+4*, EODMB1+7*, EODMB1+11*, EODMB1+12*, BPS+1, EODML1+1~, EODML1+4*, EODML1+13*, EODML1+14 , TIAFIB+1~, TIAFIB+25*, TIAFIB+26, TIAFIB+27, PNEUOX+1~, PNEUOX+17*, PNEUOX+18, PNEUOX+19, PNEUOX+23, PNEUOX+24 |
| >> BGPVALUE | EODMG1+4*, EODMG1+7*, EODMB1+4*, BPS+1*, EODML1+4*, EODML1+14*, EOOX+5*, EOOX+19*, EOST+6*, EOST+19* |
| BGPX | TIAFIB+1~, TIAFIB+2!, PNEUOX+1~ |
| BGPX( | TIAFIB+22*, TIAFIB+24, TIAFIB+25, TIAFIB+26, PNEUOX+14*, PNEUOX+16, PNEUOX+17, PNEUOX+18, PNEUOX+23!, PNEUOX+24 , PNEUOX+25! |
| C | EOOX+15*, EOOX+16, EOOX+17, EOST+15*, EOST+16, EOST+17, HGBA1C+1~, HGBA1C+21*, HGBA1C+22, HGBA1C+27* , HGBA1C+28, HGBA1C+31*, HGBA1C+32, HGBA1C+33, HGBA1C+36, HGBA1C+37, HGBA1C+38, HGBA1C+40, HGBA1C+42, HGBA1C+43 , HGBA1C+44, BPCPT+1~, BPCPT+10*, BPCPT+11, BPCPT+13, BPCPT+14, BPCPT+17, BPCPT+18, TIAFIB+1~, TIAFIB+14* , TIAFIB+15, TIAFIB+16, PNEUOX+1~, OXSAT+2~, OXSAT+12*, OXSAT+13, OXSAT+16, OXSAT+17, OXSAT+18, OXSAT+25* , OXSAT+26, OXSAT+27, OXSAT+28 |
| D | HGBA1C+1~, HGBA1C+8*, HGBA1C+9, HGBA1C+10, HGBA1C+12, HGBA1C+16, HGBA1C+21*, HGBA1C+22, HGBA1C+26*, HGBA1C+27 , HGBA1C+28, HGBA1C+29*, HGBA1C+30*, HGBA1C+31, HGBA1C+32, HGBA1C+33, HGBA1C+36, HGBA1C+37, HGBA1C+38, HGBA1C+40 , HGBA1C+42, HGBA1C+43, HGBA1C+44, BPCPT+1~, BPCPT+12*, BPCPT+15, BPCPT+16, BPCPT+19, BPCPT+20, BPCPT+23* , BPCPT+24, BPCPT+25, BPCPT+26, BPCPT+27, BPCPT+28, BPCPT+29, BPCPT+30, BPCPT+31, BPCPT+32, TIAFIB+22* , PNEUOX+1~, PNEUOX+14*, PNEUOX+24*, PNEUOX+25, OXSAT+2~ |
| >> DFN | EODMG1+5, EODMB1+5, EODMB1+6, EODML1+5, EOOX+7, EOST+7 |
| DS | EODMB1+1~, EODMB1+10*, EODMB1+11, EODMB1+12, EODML1+1~ |
| E | HGBA1C+1~, HGBA1C+8*, BPCPT+1~, BPCPT+2*, BPCPT+9*, BPCPT+10, TIAFIB+1~, TIAFIB+4*, TIAFIB+13*, TIAFIB+17* , TIAFIB+18, PNEUOX+1~, PNEUOX+4*, OXSAT+2~ |
| EDATE | HGBA1C~, HGBA1C+3, HGBA1C+8, BPCPT~, BPCPT+2, TIAFIB~, TIAFIB+4, PNEUOX~, PNEUOX+4 |
| F | PNEUOX+1~ |
| G | HGBA1C+1~, HGBA1C+3*, HGBA1C+4, HGBA1C+21*, HGBA1C+29*, HGBA1C+34, HGBA1C+35*, HGBA1C+36*, HGBA1C+37*, HGBA1C+38* , BPCPT+1~, BPCPT+4*, TIAFIB+1~, TIAFIB+13*, TIAFIB+16*, TIAFIB+18, TIAFIB+27*, TIAFIB+28, TIAFIB+29, PNEUOX+1~ , PNEUOX+19*, PNEUOX+20, PNEUOX+21, OXSAT+44*, OXSAT+45, OXSAT+49*, OXSAT+50, OXSAT+52*, OXSAT+53 |
| J | HGBA1C+1~, HGBA1C+14*, HGBA1C+15, OXSAT+2~, OXSAT+38*, OXSAT+39 |
| L | HGBA1C+1~, HGBA1C+9*, HGBA1C+10, STV+2~, STV+3*, STV+4, OXSAT+2~, OXSAT+48*, OXSAT+49 |
| M | OXSAT+2~, OXSAT+14*, OXSAT+16, OXSAT+17 |
| M1 | OXSAT+2~, OXSAT+15*, OXSAT+17 |
| N | OXSAT+2~ |
| P | HGBA1C~, HGBA1C+3, HGBA1C+8, HGBA1C+9, HGBA1C+10, BPCPT~, BPCPT+2, TIAFIB~, TIAFIB+4, TIAFIB+27 , PNEUOX~, PNEUOX+4, OXSAT+44, OXSAT+49, OXSAT+52 |
| S | EODMB1+1~, EODMB1+9*, EODMB1+10*, EODMB1+11, EODMB1+12, EODML1+1~, BPCPT+1~, BPCPT+21, BPCPT+22*, BPCPT+24 , BPCPT+25, BPCPT+26, BPCPT+27, BPCPT+28, BPCPT+29, BPCPT+30, BPCPT+31, BPCPT+32 |
| S( | BPCPT+15*, BPCPT+16*, BPCPT+22 |
| S(0 | BPCPT+22 |
| T | HGBA1C+1~, HGBA1C+6*, HGBA1C+13, HGBA1C+15, BPCPT+1~, BPCPT+21, TIAFIB+1~, TIAFIB+7*, TIAFIB+16, OXSAT+2~ , OXSAT+9*, OXSAT+13, OXSAT+22*, OXSAT+27, OXSAT+32*, OXSAT+37, OXSAT+39, OXSAT+47*, OXSAT+48 |
| T( | BPCPT+19*, BPCPT+20*, BPCPT+23 |
| T(0 | BPCPT+23 |
| U | EODMG1+6, EODMG1+7, EODMB1+7, EODML1+8, EODML1+9, EODML1+10, EODML1+13, EOOX+11, EOOX+12, EOOX+13 , EOOX+16, EOOX+17, EOST+11, EOST+12, EOST+13, EOST+16, EOST+17, HGBA1C+4, HGBA1C+12, HGBA1C+14 , HGBA1C+16, HGBA1C+19, HGBA1C+22, HGBA1C+32, HGBA1C+33, HGBA1C+36, HGBA1C+37, HGBA1C+38, HGBA1C+40, HGBA1C+42 , HGBA1C+43, HGBA1C+44, BPCPT+5, BPCPT+10, BPCPT+12, BPCPT+14, BPCPT+18, BPCPT+24, BPCPT+25, BPCPT+26 , BPCPT+27, BPCPT+28, BPCPT+29, BPCPT+30, BPCPT+31, BPCPT+32, TIAFIB+9, TIAFIB+11, TIAFIB+12, TIAFIB+14 , TIAFIB+16, TIAFIB+22, TIAFIB+26, TIAFIB+28, TIAFIB+29, PNEUOX+8, PNEUOX+10, PNEUOX+11, PNEUOX+14, PNEUOX+18 , PNEUOX+20, PNEUOX+21, OXSAT+4, OXSAT+12, OXSAT+16, OXSAT+17, OXSAT+18, OXSAT+25, OXSAT+28, OXSAT+36 , OXSAT+38 |
| V | BPCPT+5*, BPCPT+6, BPCPT+7, BPCPT+8, BPCPT+9, BPCPT+12, TIAFIB+1~, TIAFIB+9*, TIAFIB+10, TIAFIB+11 , TIAFIB+12, TIAFIB+13, TIAFIB+22*, PNEUOX+8*, PNEUOX+9, PNEUOX+10, PNEUOX+11, PNEUOX+14*, PNEUOX+23*, PNEUOX+24* , PNEUOX+25*, OXSAT~, OXSAT+4, OXSAT+6, OXSAT+10, OXSAT+23, OXSAT+34 |
| X | HGBA1C+1~, HGBA1C+10*, HGBA1C+11, HGBA1C+12, HGBA1C+14, HGBA1C+16, HGBA1C+32*, HGBA1C+33, HGBA1C+34, HGBA1C+39* , HGBA1C+40, HGBA1C+41*, HGBA1C+42, HGBA1C+43, HGBA1C+44, STV~, STV+1, STV+3, STV+4*, STV+5 , BPCPT+1~, BPCPT+2*, BPCPT+4*, BPCPT+5, TIAFIB+1~, TIAFIB+4*, TIAFIB+13*, TIAFIB+14, TIAFIB+16, TIAFIB+17 , PNEUOX+4*, OXSAT+2~, OXSAT+6*, OXSAT+10*, OXSAT+11, OXSAT+12, OXSAT+14, OXSAT+15, OXSAT+23*, OXSAT+24 , OXSAT+25, OXSAT+34*, OXSAT+35, OXSAT+36, OXSAT+38, OXSAT+40 |
| Y | BPCPT+1~, BPCPT+2*, BPCPT+14*, BPCPT+15, BPCPT+16, BPCPT+18*, BPCPT+19, BPCPT+20, OXSAT+2~ |