BDMDEDU ; IHS/CMI/LAB - gpra utility calls ;
Source file <BDMDEDU.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 2 | ($$FMADD,$$FMTE)^XLFDT $$UP^XLFSTR | 
| Patient Care Component Reports | 2 | $$START1^APCLDF $$CLINIC^APCLV | 
| DRG Grouper | 1 | $$CPT^ICPTCOD | 
| Diabetes Registry | 1 | ($$CODEN,$$ICD)^BDMUTL | 
| IHS Patient | 1 | $$DOB^AUPNPAT | 
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| TRAN(P,BDATE,EDATE,T,F) | ;EP - return ien of CPT entry if patient had this CPT IN A TRAN CODE | |
| PLTAX(P,A) | ;EP - is DX on problem list 1 or 0 | |
| WH(P,BDATE,EDATE,T,F) | ;EP | |
| GETMEDS(P,BDMMBD,BDMMED,TAXM,TAXN,TAXC,BDMDNAME,BDMZ) | ;EP | |
| RAD(P,BDATE,EDATE,T,F) | ;EP - return ien of CPT entry if patient had this CPT | |
| TRANI(P,BDATE,EDATE,CPTI) | ;EP | |
| CPTI(P,BDATE,EDATE,CPTI,SCEX,SCLN,SMOD) | ;EP - did patient have this cpt (ien) in date range | |
| PLCODE(P,A) | ;EP | |
| CPTREFT(P,BDATE,EDATE,T) | ;EP - return ien of CPT entry if patient had this CPT | |
| CPT(P,BDATE,EDATE,T,F,SCEX) | ;EP - return ien of CPT entry if patient had this CPT | |
| LASTITEM(P,BD,ED,BDMT,BDMV) | ;PEP - return last item APCLV OF TYPE APCLT DURING BD TO ED IN FORM APCLF | 
| Name | Field # of Occurrence | 
|---|---|
| $$START1^APCLDF | LASTITEM+5 | 
| $$CLINIC^APCLV | CPTI+16 | 
| $$DOB^AUPNPAT | LASTITEM+1 | 
| $$CODEN^BDMUTL | PLCODE+6 | 
| $$ICD^BDMUTL | PLTAX+6, CPT+17, RAD+16, TRAN+15, CPTREFT+10 | 
| $$CPT^ICPTCOD | CPT+26, CPT+27, TRAN+24, TRAN+25 | 
| $$VAL^XBDIQ1 | WH+11, CPTI+17, CPTI+18, CPTI+24, TRANI+16 | 
| $$FMADD^XLFDT | WH+5, CPT+6, RAD+5, TRAN+5, CPTREFT+4 | 
| $$FMTE^XLFDT | WH+22, CPT+25, RAD+24, TRAN+23 | 
| $$UP^XLFSTR | WH+11 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ATXAX - [#9002226] | PLTAX+6, CPT+17, RAD+16, TRAN+15, GETMEDS+32, GETMEDS+34, GETMEDS+35, CPTREFT+10 | 
| ^ATXAX("B" | PLTAX+3, GETMEDS+24, GETMEDS+25, GETMEDS+26 | 
| ^AUPNPREF - [#9000022] | CPTREFT+8, CPTREFT+11 | 
| ^AUPNPREF("AA" | CPTREFT+7, CPTREFT+8 | 
| ^AUPNPROB - [#9000011] | PLCODE+8, PLTAX+6 | 
| ^AUPNPROB("AC" | PLCODE+8, PLTAX+6 | 
| ^AUPNVCPT - [#9000010.18] | CPT+17, CPT+24, CPT+25, CPT+26, CPT+27, CPTI+14 | 
| ^AUPNVCPT("AA" | CPTI+9, CPTI+12, CPTI+13 | 
| ^AUPNVCPT("AD" | CPT+13, CPT+15 | 
| ^AUPNVMED - [#9000010.14] | GETMEDS+11, GETMEDS+12, GETMEDS+16, GETMEDS+28, GETMEDS+30 | 
| ^AUPNVMED("AA" | GETMEDS+9, GETMEDS+10 | 
| ^AUPNVRAD - [#9000010.22] | RAD+14, RAD+23, RAD+24, RAD+25, RAD+26 | 
| ^AUPNVRAD("AD" | RAD+12, RAD+13 | 
| ^AUPNVSIT - [#9000010] | CPT+12, CPT+14, CPT+24, CPT+25, CPT+26, CPT+27, RAD+11, RAD+23, RAD+24, RAD+25 , RAD+26, CPTI+15, TRANI+13, TRAN+11, TRAN+22, TRAN+23, TRAN+24, TRAN+25 | 
| ^AUPNVSIT("AA" | CPT+10, CPT+11, RAD+9, RAD+10, TRAN+9, TRAN+10 | 
| ^AUPNVTC - [#9000010.33] | TRANI+10, TRANI+12, TRAN+15, TRAN+22, TRAN+23, TRAN+24, TRAN+25 | 
| ^AUPNVTC("AC" | TRANI+6, TRANI+9 | 
| ^AUPNVTC("AD" | TRAN+12, TRAN+13 | 
| ^BWPCD - [#9002086.1] | WH+9, WH+10, WH+12, WH+21, WH+22 | 
| ^BWPCD("C" | WH+8 | 
| ^ICPT - [#81] | CPTI+8, TRANI+5, CPTREFT+11 | 
| ^PSDRUG - [#50] | GETMEDS+14, GETMEDS+16, GETMEDS+31, GETMEDS+33, GETMEDS+36 | 
| ^RAMIS(71 - [#71] | RAD+14, RAD+25, RAD+26 | 
| ^TMP($J | GETMEDS+4!, GETMEDS+16*, GETMEDS+19, GETMEDS+20, GETMEDS+22*, GETMEDS+23!, GETMEDS+27, GETMEDS+38, GETMEDS+40! | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | LASTITEM+5~* | 
| A | PLCODE~, PLCODE+2, PLCODE+6, PLTAX~, PLTAX+2, PLTAX+3 | 
| BD | CPT+8~, CPT+9*, CPT+10, RAD+7~, RAD+8*, RAD+9, CPTI+10~, CPTI+11*, CPTI+12, TRAN+7~ , TRAN+8*, TRAN+9, LASTITEM~, LASTITEM+1*, LASTITEM+5 | 
| BDATE | WH~, WH+5*, WH+13, CPT~, CPT+6*, CPT+9, RAD~, RAD+5*, RAD+8, CPTI~ , CPTI+3, CPTI+11, TRANI~, TRANI+3, TRANI+14, TRAN~, TRAN+5*, TRAN+8, CPTREFT~, CPTREFT+4* , CPTREFT+8 | 
| >> BDMBOMB | GETMEDS+24, GETMEDS+25 | 
| BDMC1 | GETMEDS+6~, GETMEDS+7*, GETMEDS+15*, GETMEDS+16, GETMEDS+18*, GETMEDS+21*, GETMEDS+22, GETMEDS+27*, GETMEDS+38*, GETMEDS+41! | 
| BDMD | GETMEDS+6~, GETMEDS+12*, GETMEDS+13, GETMEDS+14, GETMEDS+16, GETMEDS+41! | 
| BDMDNAME | GETMEDS~, GETMEDS+5*, GETMEDS+36, GETMEDS+41! | 
| BDMINBD | GETMEDS+6~, GETMEDS+8*, GETMEDS+9, GETMEDS+41! | 
| BDMINED | GETMEDS+6~, GETMEDS+8*, GETMEDS+9*, GETMEDS+10, GETMEDS+16, GETMEDS+41! | 
| BDMMBD | GETMEDS~, GETMEDS+8, GETMEDS+41! | 
| BDMMED | GETMEDS~, GETMEDS+8, GETMEDS+41! | 
| BDMMIEN | GETMEDS+6~, GETMEDS+10*, GETMEDS+11, GETMEDS+12, GETMEDS+16 | 
| BDMR | LASTITEM+5~ | 
| BDMR(1 | LASTITEM+6, LASTITEM+7 | 
| BDMT | LASTITEM~, LASTITEM+3, LASTITEM+5 | 
| BDMV | LASTITEM~, LASTITEM+4, LASTITEM+5 | 
| BDMZ | GETMEDS~, GETMEDS+4!, GETMEDS+7! | 
| BDMZ( | GETMEDS+38* | 
| C | RAD+7~, RAD+14*, RAD+16, TRANI+7~, TRANI+10*, TRANI+11, GETMEDS+31*, GETMEDS+32, GETMEDS+33*, GETMEDS+34 | 
| CPTI | CPTI~, CPTI+2, CPTI+8, CPTI+12, CPTI+13, TRANI~, TRANI+5, TRANI+11 | 
| D | WH+7~, WH+12*, WH+13, WH+14, WH+15, WH+16, WH+21*, WH+22*, CPT+8~, RAD+7~ , CPTI+10~, TRAN+7~, GETMEDS+6~, GETMEDS+30*, GETMEDS+31, GETMEDS+33, GETMEDS+35, GETMEDS+36, CPTREFT+8*, CPTREFT+11 | 
| DT | LASTITEM+2 | 
| E | LASTITEM+5~* | 
| ED | CPT+8~, CPT+9*, CPT+10*, CPT+11, RAD+7~, RAD+8*, RAD+9*, RAD+10, CPTI+10~, CPTI+11* , CPTI+12*, CPTI+13, CPTI+24, TRAN+7~, TRAN+8*, TRAN+9*, TRAN+10, LASTITEM~, LASTITEM+2*, LASTITEM+5 | 
| EDATE | WH~, WH+4, WH+5, WH+14, CPT~, CPT+5, CPT+6, CPT+9, RAD~, RAD+4 , RAD+5, RAD+8, CPTI~, CPTI+4, CPTI+11, TRANI~, TRANI+4, TRANI+15, TRAN~, TRAN+4 , TRAN+5, TRAN+8, CPTREFT~, CPTREFT+3, CPTREFT+4, CPTREFT+8 | 
| F | WH~, WH+3*, WH+19, WH+20, WH+21, WH+22, CPT~, CPT+3*, CPT+22, CPT+23 , CPT+24, CPT+25, CPT+26, CPT+27, RAD~, RAD+3*, RAD+21, RAD+22, RAD+23, RAD+24 , RAD+25, RAD+26, TRAN~, TRAN+3*, TRAN+20, TRAN+21, TRAN+22, TRAN+23, TRAN+24, TRAN+25 | 
| G | WH+7~, WH+8*, WH+16*, WH+18, WH+19, WH+20, WH+21, WH+22, CPT+8~, CPT+9* , CPT+10, CPT+11, CPT+15, CPT+17*, CPT+21, CPT+22, CPT+23, CPT+24, CPT+25, CPT+26 , CPT+27, RAD+7~, RAD+8*, RAD+9, RAD+10, RAD+13, RAD+16*, RAD+20, RAD+21, RAD+22 , RAD+23, RAD+24, RAD+25, RAD+26, CPTI+10~, CPTI+11*, CPTI+12, CPTI+13, CPTI+24*, CPTI+25 , TRANI+7~, TRANI+8*, TRANI+16*, TRANI+17, TRAN+7~, TRAN+8*, TRAN+9, TRAN+10, TRAN+13, TRAN+15* , TRAN+19, TRAN+20, TRAN+21, TRAN+22, TRAN+23, TRAN+24, TRAN+25, GETMEDS+6~, GETMEDS+29*, GETMEDS+32* , GETMEDS+34*, GETMEDS+35*, GETMEDS+36*, GETMEDS+37*, GETMEDS+38, CPTREFT+5~, CPTREFT+6*, CPTREFT+7, CPTREFT+8*, CPTREFT+11* , CPTREFT+13 | 
| G( | WH+16* | 
| G(0 | WH+15 | 
| I | WH+8*, WH+15*, PLCODE+8~*, PLCODE+9, PLTAX+6~*, PLTAX+7, CPTI+10~, CPTI+13*, CPTI+14, CPTI+17 , CPTI+18, CPTI+24, TRANI+16, CPTREFT+5~, CPTREFT+7*, CPTREFT+8, CPTREFT+10, CPTREFT+11 | 
| J | CPTI+10~, CPTI+20*, CPTI+22* | 
| K | CPTI+10~, CPTI+20*, CPTI+22* | 
| M | CPTI+10~, CPTI+17*, CPTI+20 | 
| M1 | CPTI+10~, CPTI+18*, CPTI+22 | 
| O | WH+7~ | 
| P | WH~, WH+1, WH+8, PLCODE~, PLCODE+1, PLCODE+8, PLTAX~, PLTAX+1, PLTAX+6, CPT~ , CPT+1, CPT+10, CPT+11, RAD~, RAD+1, RAD+9, RAD+10, CPTI~, CPTI+1, CPTI+9 , CPTI+12, CPTI+13, TRANI~, TRANI+1, TRANI+6, TRANI+9, TRAN~, TRAN+1, TRAN+9, TRAN+10 , LASTITEM~, LASTITEM+1, LASTITEM+5, GETMEDS~, GETMEDS+9, GETMEDS+10, CPTREFT~, CPTREFT+1, CPTREFT+7, CPTREFT+8 | 
| Q | CPTI+10~, CPTI+19*, CPTI+20*, CPTI+21, CPTI+22*, CPTI+23 | 
| R | LASTITEM+5! | 
| SCEX | CPT~, CPT+4*, CPT+14, CPTI~, CPTI+5*, CPTI+15 | 
| SCLN | CPTI~, CPTI+6*, CPTI+16 | 
| SMOD | CPTI~, CPTI+7*, CPTI+20, CPTI+22 | 
| T | WH~, WH+2, WH+10, PLCODE+3~, PLCODE+6*, PLCODE+7, PLCODE+8, PLTAX+3~*, PLTAX+4, PLTAX+6 , CPT~, CPT+2, CPT+17, RAD~, RAD+2, RAD+16, TRAN~, TRAN+2, TRAN+15, GETMEDS+6~ , GETMEDS+24*, GETMEDS+35, CPTREFT~, CPTREFT+2, CPTREFT+10 | 
| T1 | GETMEDS+6~, GETMEDS+25*, GETMEDS+34 | 
| >> T2 | GETMEDS+26*, GETMEDS+32 | 
| TAXC | GETMEDS~, GETMEDS+3*, GETMEDS+26, GETMEDS+37 | 
| TAXM | GETMEDS~, GETMEDS+1*, GETMEDS+24, GETMEDS+37 | 
| TAXN | GETMEDS~, GETMEDS+2*, GETMEDS+25, GETMEDS+37 | 
| >> TRANI | TRANI+2 | 
| U | WH+10, WH+12, WH+21, WH+22, PLCODE+8, PLTAX+6, CPT+14, CPT+17, CPT+24, CPT+25 , CPT+26, CPT+27, RAD+14, RAD+16, RAD+23, RAD+24, RAD+25, RAD+26, CPTI+14, CPTI+15 , TRANI+10, TRANI+12, TRANI+13, TRAN+15, TRAN+22, TRAN+23, TRAN+24, TRAN+25, LASTITEM+7, GETMEDS+12 , GETMEDS+16, GETMEDS+27, GETMEDS+30, GETMEDS+31, GETMEDS+33, GETMEDS+36, CPTREFT+7, CPTREFT+8, CPTREFT+10, CPTREFT+11 | 
| V | WH+7~, WH+8*, WH+9, WH+10, WH+11, WH+12, WH+16, CPT+8~, CPT+11*, CPT+12 , CPT+13, CPT+14, CPT+15, CPT+24*, CPT+25*, CPT+26*, CPT+27*, RAD+7~, RAD+10*, RAD+11 , RAD+12, RAD+13, RAD+23*, RAD+24*, RAD+25*, RAD+26*, CPTI+10~, CPTI+14*, CPTI+15, CPTI+16 , TRANI+7~, TRANI+12*, TRANI+13*, TRANI+14, TRANI+15, TRANI+16, TRAN+7~, TRAN+10*, TRAN+11, TRAN+12 , TRAN+13, TRAN+22*, TRAN+23*, TRAN+24*, TRAN+25* | 
| X | WH+7~, PLCODE+8~*, PLTAX+6~*, CPT+8~, CPT+15*, CPT+17, RAD+7~, RAD+13*, RAD+14, RAD+16 , CPTI+10~, TRANI+7~, TRANI+9*, TRANI+10, TRANI+12, TRAN+7~, TRAN+13*, TRAN+15, GETMEDS+6~, GETMEDS+18* , GETMEDS+19*, GETMEDS+20, GETMEDS+22, GETMEDS+27*, GETMEDS+38, CPTREFT+5~, CPTREFT+8* | 
| Y | WH+7~, PLCODE+8~*, PLTAX+6~*, CPT+8~, RAD+7~, CPTI+10~, TRAN+7~, LASTITEM+5~, GETMEDS+6~, GETMEDS+20* , GETMEDS+22, GETMEDS+27*, GETMEDS+28, GETMEDS+30, CPTREFT+5~, CPTREFT+8*, CPTREFT+11 | 
| Z | CPTI+10~, CPTREFT+5~ |