BDMP513 ; IHS/CMI/LAB - 2003 DIABETES AUDIT ;
Source file <BDMP513.m>
| Package | Total | Call Graph |
|---|---|---|
| Patient Care Component Reports | 2 | $$START1^APCLDF $$CLINIC^APCLV |
| DRG Grouper | 1 | $$ICDDX^ICDCODE |
| IHS Patient | 1 | $$DOB^AUPNPAT |
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
| Kernel | 1 | ($$FMADD,$$FMTE)^XLFDT |
| Taxonomy | 1 | $$ICD^ATXCHK |
| Package | Total | Caller Graph |
|---|---|---|
| Diabetes Registry | 4 | BDMP510 BDMP514 BDMP515 BDMP516 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PLDMDOO(P,F) | ;EP
|
|
| LASTWC(P,EDATE,F) | ;PEP - return last ht and date
|
|
| CMSFDX(P,R,T) | ;EP - return date/dx of dm in register
|
|
| IFG(P,BDMRET) | ;EP
|
|
| BPS(P,BDATE,EDATE,F) | ;EP ;
|
|
| LASTWT(P,EDATE,F) | ;PEP - return last wt
|
|
| PLDMDXS(P) | ;EP - get all DM dxs from problem list
|
|
| MS(P,BDMRET) | ;EP
|
|
| LASTHT(P,EDATE,F) | ;PEP - return last ht and date
|
|
| IGT(P,BDMRET) | ;EP
|
|
| ABNG(P,BDMRET) | ;EP
|
|
| LASTDMDX(P,D) | ;EP - last pcc dm dx
|
|
| FRSTDMDX(P,F) | ;EP return date of first dm dx
|
|
| HTNDX(P,EDATE) | ;EP - is HTN on problem list
|
| Name | Field # of Occurrence |
|---|---|
| $$START1^APCLDF | BPS+5, HTNDX+5, HTNDX+8, LASTHT+5, LASTWC+6, LASTWT+6, FRSTDMDX+5, LASTDMDX+4, LASTDMDX+6, IFG+17 , IFG+19, IGT+17, IGT+19, MS+17, MS+19, ABNG+15, ABNG+17 |
| $$CLINIC^APCLV | BPS+7 |
| $$ICD^ATXCHK | PLDMDOO+7, PLDMDXS+7 |
| $$DOB^AUPNPAT | HTNDX+8, LASTHT+5, LASTDMDX+4, LASTDMDX+6, IFG+17, IFG+19, IGT+17, IGT+19, MS+17, MS+19 , ABNG+15, ABNG+17 |
| $$ICDDX^ICDCODE | PLDMDXS+7, IFG+11, IGT+11, MS+11, ABNG+9 |
| $$VAL^XBDIQ1 | CMSFDX+6, IFG+13, IGT+13, MS+13, ABNG+11 |
| $$FMADD^XLFDT | LASTWC+4, LASTWT+3 |
| $$FMTE^XLFDT | BPS+9, HTNDX+8, LASTHT+5, LASTHT+9, LASTWC+7, LASTWT+9, LASTWT+11, CMSFDX+5, PLDMDOO+11, FRSTDMDX+6 , IFG+18, IFG+20, IGT+18, IGT+20, MS+18, MS+20, ABNG+16, ABNG+18 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ACM(44 - [#9002244] | CMSFDX+4, CMSFDX+5 |
| ^ATXAX("B" | PLDMDOO+3, PLDMDXS+2 |
| ^AUPNPROB - [#9000011] | PLDMDOO+6, PLDMDOO+8, PLDMDXS+5, IFG+9, IGT+9, MS+9 |
| ^AUPNPROB("AC" | PLDMDOO+5, PLDMDXS+4, IFG+8, IGT+8, MS+8, ABNG+7 |
| ^AUPNVPOV - [#9000010.07] | LASTWT+11 |
| ^AUPNVPOV("AD" | LASTWT+9, LASTWT+10 |
| ^AUPNVSIT("AC" | LASTHT+3, LASTWC+3 |
| ^DPT - [#2] | HTNDX+2 |
| ^ICD9("BA" | LASTWT+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | HTNDX+3~, HTNDX+5*, LASTHT+4~, LASTHT+5*, LASTWC+5~, LASTWC+6*, LASTWT+4~ |
| BDATE | BPS~, BPS+5, LASTWC+4*, LASTWC+6, LASTWT+3*, LASTWT+6 |
| BDM | BPS+2~, BPS+4!, HTNDX+3~, HTNDX+4!, HTNDX+7!, LASTWT+4~, LASTWT+6!, FRSTDMDX+3~, LASTDMDX+2~, LASTDMDX+6! , IFG+2~, IFG+4!, IFG+19!, IGT+2~, IGT+4!, IGT+19!, MS+2~, MS+4!, MS+19!, ABNG+17! |
| BDM( | BPS+6, BPS+7, BPS+9, LASTWT+7, LASTWT+8, LASTWT+9, LASTWT+11 |
| BDM(1 | HTNDX+6, FRSTDMDX+5, LASTDMDX+5, LASTDMDX+7, IFG+18, IFG+20, IGT+18, IGT+20, MS+18, MS+20 , ABNG+16, ABNG+18 |
| BDM(3 | HTNDX+8 |
| BDMARRY | LASTHT+4~, LASTWC+5~, LASTWT+4~ |
| BDMARRY(1 | LASTHT+5, LASTHT+9, LASTWC+6, LASTWC+7 |
| >> BDMBP | BPS+6*, BPS+9, BPS+10 |
| BDMC | LASTWT+4~, LASTWT+7*, LASTWT+9*, LASTWT+11*, IFG+2~, IFG+3*, IFG+13*, IFG+18*, IFG+20*, IGT+2~ , IGT+3*, IGT+13*, IGT+18*, IGT+20*, MS+2~, MS+3*, MS+13*, MS+18*, MS+20*, ABNG+2~ , ABNG+3*, ABNG+11*, ABNG+16*, ABNG+18* |
| BDMD | LASTWT+4~, LASTWT+10*, LASTWT+11 |
| BDML | BPS+2~, BPS+6*, BPS+7, BPS+9 |
| BDMLL | BPS+2~, BPS+3*, BPS+6, BPS+8*, BPS+9, BPS+10 |
| BDMN | LASTWT+4~, LASTWT+7*, LASTWT+8, LASTWT+9, LASTWT+11 |
| BDMRET | IFG~, IFG+1!, IGT~, IGT+1!, MS~, MS+1!, ABNG~, ABNG+1! |
| BDMRET( | IFG+13*, IFG+18*, IFG+20*, IGT+13*, IGT+18*, IGT+20*, MS+13*, MS+18*, MS+20*, ABNG+11* , ABNG+16*, ABNG+18* |
| BDMV | BPS+2~, BPS+3*, BPS+9*, BPS+10*, BPS+11 |
| BDMV221 | LASTWT+5~*, LASTWT+11 |
| BDMW | LASTWT+4~, LASTWT+6*, LASTWT+9*, LASTWT+10, LASTWT+11*, LASTWT+13 |
| BDMX | LASTWT+4~, LASTWT+6* |
| BDMZ | LASTWT+4~, LASTWT+8*, LASTWT+9, LASTWT+10 |
| D | CMSFDX+4~*, CMSFDX+5*, CMSFDX+7, PLDMDOO+5~*, PLDMDOO+11*, PLDMDXS+4~*, PLDMDXS+7*, PLDMDXS+9, LASTDMDX~, LASTDMDX+4 , LASTDMDX+6 |
| D( | PLDMDOO+8* |
| D(0 | PLDMDOO+11 |
| D1 | CMSFDX+4~, CMSFDX+5*, CMSFDX+7 |
| DT | IFG+17, IFG+19, IGT+17, IGT+19, MS+17, MS+19, ABNG+15, ABNG+17 |
| E | BPS+2~, BPS+5*, HTNDX+3~, HTNDX+5*, HTNDX+8*, LASTHT+4~, LASTHT+5*, LASTWC+5~, LASTWC+6*, LASTWT+4~ , LASTWT+6*, FRSTDMDX+3~, FRSTDMDX+5*, LASTDMDX+2~, LASTDMDX+4*, LASTDMDX+6*, IFG+17*, IFG+19*, IGT+17*, IGT+19* , MS+17*, MS+19*, ABNG+15*, ABNG+17* |
| EDATE | BPS~, BPS+5, HTNDX~, HTNDX+8, LASTHT~, LASTHT+5, LASTWC~, LASTWC+4, LASTWC+6, LASTWT~ , LASTWT+3, LASTWT+6 |
| F | BPS~, BPS+1*, BPS+9, BPS+10, LASTHT~, LASTHT+2*, LASTHT+8, LASTWC~, LASTWC+2*, LASTWT~ , LASTWT+2*, LASTWT+13, PLDMDOO~, PLDMDOO+2*, PLDMDOO+11, FRSTDMDX~, FRSTDMDX+2*, FRSTDMDX+6 |
| G | CMSFDX+4~* |
| H | LASTHT+4~, LASTHT+5*, LASTHT+6, LASTHT+7*, LASTHT+8, LASTHT+9, LASTWC+5~, LASTWC+6*, LASTWC+7, LASTWT+4~ |
| I | PLDMDOO+5~, PLDMDOO+6*, PLDMDOO+7, PLDMDXS+4~, PLDMDXS+5*, PLDMDXS+7, IFG+9*, IFG+11*, IFG+12, IFG+13 , IGT+9*, IGT+11*, IGT+12, IGT+13, MS+9*, MS+11*, MS+12, MS+13, ABNG+9*, ABNG+10 , ABNG+11 |
| P | BPS~, BPS+5, HTNDX~, HTNDX+1, HTNDX+2, HTNDX+5, HTNDX+8, LASTHT~, LASTHT+1, LASTHT+3 , LASTHT+5, LASTWC~, LASTWC+1, LASTWC+3, LASTWC+6, LASTWT~, LASTWT+1, LASTWT+6, CMSFDX~, CMSFDX+1 , CMSFDX+4, PLDMDOO~, PLDMDOO+1, PLDMDOO+5, PLDMDXS~, PLDMDXS+1, PLDMDXS+4, FRSTDMDX~, FRSTDMDX+1, FRSTDMDX+5 , LASTDMDX~, LASTDMDX+1, LASTDMDX+4, LASTDMDX+6, IFG~, IFG+8, IFG+17, IFG+19, IGT~, IGT+8 , IGT+17, IGT+19, MS~, MS+8, MS+17, MS+19, ABNG~, ABNG+7, ABNG+15, ABNG+17 |
| R | CMSFDX~, CMSFDX+2, CMSFDX+4 |
| T | CMSFDX~, CMSFDX+3, CMSFDX+7, PLDMDOO+3~*, PLDMDOO+4, PLDMDOO+7, PLDMDXS+2~*, PLDMDXS+3, PLDMDXS+7 |
| U | BPS+6, BPS+7, BPS+9, LASTHT+5, LASTHT+9, LASTWC+6, LASTWC+7, LASTWT+8, LASTWT+9, LASTWT+11 , CMSFDX+4, CMSFDX+5, PLDMDOO+6, PLDMDOO+8, PLDMDXS+5, PLDMDXS+7, FRSTDMDX+5, IFG+9, IFG+11, IFG+18 , IFG+20, IGT+9, IGT+11, IGT+18, IGT+20, MS+9, MS+11, MS+18, MS+20, ABNG+9 , ABNG+16, ABNG+18 |
| W | LASTHT+4~, LASTWC+5~, LASTWT+4~ |
| X | BPS+2~, BPS+5*, HTNDX+8*, LASTHT+5~, LASTWC+6~, LASTWT+4~, CMSFDX+4~*, CMSFDX+5, CMSFDX+6, PLDMDOO+5~* , PLDMDOO+6, PLDMDOO+8, PLDMDXS+4~*, PLDMDXS+5, FRSTDMDX+3~, FRSTDMDX+5*, LASTDMDX+2~, LASTDMDX+4*, LASTDMDX+6*, IFG+8* , IFG+9, IFG+13, IFG+17*, IFG+19*, IGT+8*, IGT+9, IGT+13, IGT+17*, IGT+19*, MS+8* , MS+9, MS+13, MS+17*, MS+19*, ABNG+7*, ABNG+11, ABNG+15*, ABNG+17* |
| Y | CMSFDX+4~*, CMSFDX+6*, CMSFDX+7, FRSTDMDX+3~, FRSTDMDX+4*, FRSTDMDX+5*, FRSTDMDX+6, LASTDMDX+2~, LASTDMDX+3*, LASTDMDX+4 , LASTDMDX+6, IFG+16*, IFG+17, IFG+19, IGT+16*, IGT+17, IGT+19, MS+16*, MS+17, MS+19 , ABNG+14*, ABNG+15, ABNG+17 |