BDMD997 ; IHS/CMI/LAB - 1999 DIABETES AUDIT ;
Source file <BDMD997.m>
| Package | Total | Call Graph | 
|---|---|---|
| Patient Care Component Reports | 2 | $$START1^APCLDF ($$CLINIC,$$PRIMPOV,$$PRIMPROV)^APCLV | 
| DRG Grouper | 1 | $$ICDDX^ICDCODE | 
| IHS Patient | 1 | $$DOB^AUPNPAT | 
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 | 
| Kernel | 1 | $$FMTE^XLFDT | 
| Taxonomy | 1 | $$ICD^ATXCHK | 
| VA Fileman | 1 | ^%DT | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DIETEDUC(P,BDATE,EDATE) | ||
| EXEDUC(P,BDATE,EDATE) | ;EP | |
| LASTDMDX(P,D) | ;EP - last pcc dm dx | |
| REFR(V) | ; | |
| DNKA(V) | ;is this a DNKA visit? | |
| CMSFDX(P,R,T) | ;EP - return date/dx of dm in register | |
| BPS(P,BDATE,EDATE,F) | ;EP ; | |
| LASTWT(P,EDATE,F) | ;PEP - return last wt | |
| PLDMDXS(P) | ;EP - get all DM dxs from problem list | |
| OTHEDUC(P,BDATE,EDATE) | ;EP | |
| DFE(P,BDATE,EDATE) | ;EP | |
| LASTHT(P,EDATE,F) | ;PEP - return last ht and date | |
| CESS(P,B,D) | ;EP - find any cessation hf in 12 months before E | |
| PLDMDOO(P,F) | ;EP | |
| REFUSAL(P,F,I,B,E) | ;EP | |
| EYE(P,BDATE,EDATE) | ;EP | |
| FRSTDMDX(P,F) | ;EP return date of first dm dx | |
| DENTAL(P,BDATE,EDATE) | ;EP | |
| HTNDX(P,EDATE) | ;EP - is HTN on problem list | 
| Name | Field # of Occurrence | 
|---|---|
| ^%DT | DIETEDUC+4, DIETEDUC+5, REFUSAL+6, REFUSAL+7 | 
| $$START1^APCLDF | DIETEDUC+20, EXEDUC+2, OTHEDUC+2, DFE+1, DFE+5, EYE+1, EYE+3, DENTAL+4, DENTAL+8, BPS+5 , HTNDX+5, HTNDX+8, LASTHT+5, LASTWT+5, FRSTDMDX+5, LASTDMDX+4, LASTDMDX+6, CESS+4, CESS+6 | 
| $$CLINIC^APCLV | DFE+8, EYE+6, DENTAL+9, BPS+7 | 
| $$PRIMPOV^APCLV | DNKA+2, DNKA+4, REFR+2 | 
| $$PRIMPROV^APCLV | DIETEDUC+15, DIETEDUC+16, DFE+6, EYE+4, DENTAL+11 | 
| $$ICD^ATXCHK | PLDMDOO+7, PLDMDXS+7 | 
| $$DOB^AUPNPAT | HTNDX+8, LASTHT+5, LASTWT+5, LASTDMDX+4, LASTDMDX+6 | 
| $$ICDDX^ICDCODE | PLDMDXS+7 | 
| $$VAL^XBDIQ1 | CMSFDX+6 | 
| $$FMTE^XLFDT | DFE+2, EYE+2, DENTAL+6, DENTAL+9, DENTAL+11, DENTAL+12, BPS+9, HTNDX+8, LASTHT+5, LASTHT+9 , LASTWT+8, LASTWT+10, CMSFDX+5, PLDMDOO+11, FRSTDMDX+6, CESS+5, CESS+7 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ACM(44 - [#9002244] | CMSFDX+4, CMSFDX+5 | 
| ^ATXAX - [#9002226] | DIETEDUC+30, EXEDUC+7, OTHEDUC+7 | 
| ^ATXAX("B" | DIETEDUC+28, EXEDUC+5, OTHEDUC+5, PLDMDOO+3, PLDMDXS+2 | 
| ^AUPNPREF - [#9000022] | REFUSAL+8 | 
| ^AUPNPREF("AA" | REFUSAL+8 | 
| ^AUPNPROB - [#9000011] | PLDMDOO+6, PLDMDOO+8, PLDMDXS+5 | 
| ^AUPNPROB("AC" | PLDMDOO+5, PLDMDXS+4 | 
| ^AUPNVPOV - [#9000010.07] | LASTWT+10 | 
| ^AUPNVPOV("AD" | DIETEDUC+12, LASTWT+8, LASTWT+9 | 
| ^AUPNVPRV("AD" | DIETEDUC+13 | 
| ^AUPNVSIT - [#9000010] | DIETEDUC+9, DIETEDUC+10, DIETEDUC+11 | 
| ^AUPNVSIT("AA" | DIETEDUC+7, DIETEDUC+8 | 
| ^AUPNVSIT("AC" | LASTHT+3 | 
| ^AUTTEXAM("B" | DFE+10, EYE+8, DENTAL+13 | 
| ^DPT - [#2] | HTNDX+2 | 
| ^ICD9("BA" | LASTWT+4 | 
| Name | Line Occurrences | 
|---|---|
| $$DNKA | DIETEDUC+14, DFE+6, DFE+8, EYE+4, EYE+6, DENTAL+9, DENTAL+11 | 
| $$REFR | EYE+4, EYE+6 | 
| $$REFUSAL | DIETEDUC+30, EXEDUC+7, OTHEDUC+7, DFE+10, EYE+8, DENTAL+13 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | EXEDUC+1~, OTHEDUC+1~, DFE+1~*, DFE+5*, EYE+1~*, EYE+3*, DENTAL+2~, DENTAL+4*, DENTAL+5*, DENTAL+6 , DENTAL+8*, HTNDX+3~, HTNDX+5*, LASTHT+4~, LASTHT+5*, LASTWT+3~ | 
| %DT | DIETEDUC+3~, DIETEDUC+4*, DIETEDUC+5*, REFUSAL+6~*, REFUSAL+7* | 
| B | REFUSAL~, REFUSAL+4, REFUSAL+6*, REFUSAL+8, CESS~, CESS+4, CESS+6 | 
| BD | DIETEDUC+3~, DIETEDUC+4*, DIETEDUC+7 | 
| BDATE | DIETEDUC~, DIETEDUC+4, DIETEDUC+20, DIETEDUC+30, EXEDUC~, EXEDUC+2, EXEDUC+7, OTHEDUC~, OTHEDUC+2, OTHEDUC+7 , DFE~, DFE+1, DFE+5, DFE+10, EYE~, EYE+1, EYE+3, EYE+8, DENTAL~, DENTAL+4 , DENTAL+8, DENTAL+13, BPS~, BPS+5 | 
| BDM | DIETEDUC+3~, DIETEDUC+19!, EXEDUC+1~, OTHEDUC+1~, DFE+1~!, DFE+4!, EYE+1~!, DENTAL+2~, DENTAL+3!, DENTAL+7! , BPS+2~, BPS+4!, HTNDX+3~, HTNDX+4!, HTNDX+7!, LASTWT+3~, LASTWT+5!, FRSTDMDX+3~, LASTDMDX+2~, LASTDMDX+6! , CESS+2~, CESS+3! | 
| BDM( | DIETEDUC+21, DFE+6, DFE+8, EYE+4, EYE+6, DENTAL+9, DENTAL+11, BPS+6, BPS+7, BPS+9 , LASTWT+6, LASTWT+7, LASTWT+8, LASTWT+10 | 
| BDM(1 | EXEDUC+3, OTHEDUC+3, DFE+2, EYE+2, DENTAL+5, HTNDX+6, FRSTDMDX+5, LASTDMDX+5, LASTDMDX+7, CESS+5 , CESS+7 | 
| BDM(3 | HTNDX+8 | 
| BDMARRY | LASTHT+4~, LASTWT+3~ | 
| BDMARRY(1 | LASTHT+5, LASTHT+9 | 
| >> BDMBP | BPS+6*, BPS+9, BPS+10 | 
| BDMD | LASTWT+3~, LASTWT+9*, LASTWT+10 | 
| BDMDED | DIETEDUC+21~, DIETEDUC+22, DIETEDUC+23 | 
| BDMDED( | DIETEDUC+21*, DIETEDUC+24 | 
| BDML | BPS+2~, BPS+6*, BPS+7, BPS+9 | 
| BDMLL | BPS+2~, BPS+3*, BPS+6, BPS+8*, BPS+9, BPS+10 | 
| BDMN | LASTWT+3~, LASTWT+6*, LASTWT+7, LASTWT+8, LASTWT+10 | 
| BDMV | BPS+2~, BPS+3*, BPS+9*, BPS+10*, BPS+11 | 
| BDMV221 | LASTWT+4~*, LASTWT+10 | 
| BDMVRD | DIETEDUC+3~, DIETEDUC+22, DIETEDUC+23, DIETEDUC+26 | 
| BDMVRD( | DIETEDUC+15*, DIETEDUC+16*, DIETEDUC+24 | 
| BDMW | LASTWT+3~, LASTWT+5*, LASTWT+6, LASTWT+8*, LASTWT+9, LASTWT+10*, LASTWT+12 | 
| BDMX | LASTWT+3~, LASTWT+5* | 
| BDMZ | LASTWT+3~, LASTWT+7*, LASTWT+8, LASTWT+9 | 
| D | DIETEDUC+3~, DIETEDUC+6*, DIETEDUC+7*, DIETEDUC+8, DNKA+2~*, DNKA+3, DNKA+5, DNKA+6, DNKA+7, REFR+2~* , REFR+3, REFUSAL+8*, CMSFDX+4~*, CMSFDX+5*, CMSFDX+7, PLDMDOO+5~*, PLDMDOO+11*, PLDMDXS+4~*, PLDMDXS+7*, PLDMDXS+9 , LASTDMDX~, LASTDMDX+4, LASTDMDX+6, CESS~, CESS+4 | 
| D( | PLDMDOO+8* | 
| D(0 | PLDMDOO+11 | 
| D1 | CMSFDX+4~, CMSFDX+5*, CMSFDX+7 | 
| E | DIETEDUC+20*, EXEDUC+1~, EXEDUC+2*, OTHEDUC+1~, OTHEDUC+2*, DFE+1~*, DFE+5*, REFUSAL~, REFUSAL+5, REFUSAL+7* , REFUSAL+8, EYE+1~*, EYE+3*, DENTAL+2~, DENTAL+4*, DENTAL+8*, BPS+2~, BPS+5*, HTNDX+3~, HTNDX+5* , HTNDX+8*, LASTHT+4~, LASTHT+5*, LASTWT+3~, LASTWT+5*, FRSTDMDX+3~, FRSTDMDX+5*, LASTDMDX+2~, LASTDMDX+4*, LASTDMDX+6* , CESS+2~, CESS+4*, CESS+6* | 
| ED | DIETEDUC+3~, DIETEDUC+5*, DIETEDUC+6 | 
| EDATE | DIETEDUC~, DIETEDUC+5, DIETEDUC+20, DIETEDUC+30, EXEDUC~, EXEDUC+2, EXEDUC+7, OTHEDUC~, OTHEDUC+2, OTHEDUC+7 , DFE~, DFE+1, DFE+5, DFE+10, EYE~, EYE+1, EYE+3, EYE+8, DENTAL~, DENTAL+4 , DENTAL+8, DENTAL+13, BPS~, BPS+5, HTNDX~, HTNDX+8, LASTHT~, LASTHT+5, LASTWT~, LASTWT+5 | 
| F | REFUSAL~, REFUSAL+2, REFUSAL+8, BPS~, BPS+1*, BPS+9, BPS+10, LASTHT~, LASTHT+2*, LASTHT+8 , LASTWT~, LASTWT+2*, LASTWT+12, PLDMDOO~, PLDMDOO+2*, PLDMDOO+11, FRSTDMDX~, FRSTDMDX+2*, FRSTDMDX+6 | 
| G | DIETEDUC+3~, DIETEDUC+24~*, DIETEDUC+25, DIETEDUC+27*, DIETEDUC+30*, DIETEDUC+31, EXEDUC+1~, EXEDUC+4*, EXEDUC+7*, EXEDUC+8 , OTHEDUC+4*, OTHEDUC+7*, OTHEDUC+8, DFE+10~*, DFE+11, REFUSAL+6~, REFUSAL+8*, REFUSAL+9, EYE+8~*, EYE+9 , DENTAL+13~*, DENTAL+14, CMSFDX+4~* | 
| H | LASTHT+4~, LASTHT+5*, LASTHT+6, LASTHT+7*, LASTHT+8, LASTHT+9 | 
| I | REFUSAL~, REFUSAL+3, REFUSAL+8, PLDMDOO+5~, PLDMDOO+6*, PLDMDOO+7, PLDMDXS+4~, PLDMDXS+5*, PLDMDXS+7 | 
| N | DNKA+2~, DNKA+4*, DNKA+5, DNKA+6, DNKA+7, REFR+2~ | 
| P | DIETEDUC~, DIETEDUC+7, DIETEDUC+8, DIETEDUC+20, DIETEDUC+30, EXEDUC~, EXEDUC+2, EXEDUC+7, OTHEDUC~, OTHEDUC+2 , OTHEDUC+7, DFE~, DFE+1, DFE+5, DFE+10, REFUSAL~, REFUSAL+1, REFUSAL+8, EYE~, EYE+1 , EYE+3, EYE+8, DENTAL~, DENTAL+1, DENTAL+4, DENTAL+8, DENTAL+13, BPS~, BPS+5, HTNDX~ , HTNDX+1, HTNDX+2, HTNDX+5, HTNDX+8, LASTHT~, LASTHT+1, LASTHT+3, LASTHT+5, LASTWT~, LASTWT+1 , LASTWT+5, 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, CESS~, CESS+1, CESS+4 , CESS+6 | 
| R | DFE+6~*, EYE+4~*, EYE+6*, CMSFDX~, CMSFDX+2, CMSFDX+4 | 
| T | DIETEDUC+28~*, DIETEDUC+29, DIETEDUC+30, EXEDUC+5~*, EXEDUC+6, EXEDUC+7, OTHEDUC+5~*, OTHEDUC+6, OTHEDUC+7, CMSFDX~ , CMSFDX+3, CMSFDX+7, PLDMDOO+3~*, PLDMDOO+4, PLDMDOO+7, PLDMDXS+2~*, PLDMDXS+3, PLDMDXS+7 | 
| U | DIETEDUC+10, DIETEDUC+11, DIETEDUC+21, DIETEDUC+30, EXEDUC+7, OTHEDUC+7, DFE+2, DFE+6, DFE+8, REFUSAL+8 , EYE+2, EYE+4, EYE+6, DENTAL+5, DENTAL+9, DENTAL+11, BPS+6, BPS+7, BPS+9, LASTHT+5 , LASTHT+9, LASTWT+7, LASTWT+8, LASTWT+10, CMSFDX+4, CMSFDX+5, PLDMDOO+6, PLDMDOO+8, PLDMDXS+5, PLDMDXS+7 , FRSTDMDX+5, CESS+5, CESS+7 | 
| V | DIETEDUC+3~, DIETEDUC+8*, DIETEDUC+9, DIETEDUC+10, DIETEDUC+11, DIETEDUC+12, DIETEDUC+13, DIETEDUC+14, DIETEDUC+15, DIETEDUC+16 , DNKA~, DNKA+1, DNKA+2, DNKA+4, REFR~, REFR+1, REFR+2 | 
| X | DIETEDUC+3~, DIETEDUC+4*, DIETEDUC+5*, DIETEDUC+20*, DIETEDUC+21*, DIETEDUC+24*, DIETEDUC+30*, EXEDUC+1~, EXEDUC+2*, EXEDUC+7* , OTHEDUC+1~, OTHEDUC+2*, OTHEDUC+7*, DFE+6~*, DFE+8*, REFUSAL+6~*, REFUSAL+7*, REFUSAL+8*, EYE+4~*, EYE+6* , DENTAL+9~*, DENTAL+11~*, BPS+2~, BPS+5*, HTNDX+8*, LASTHT+5~, LASTWT+3~, 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* , CESS+2~, CESS+4*, CESS+6* | 
| Y | DIETEDUC+3~, DIETEDUC+4, DIETEDUC+5, DFE+6~*, DFE+7, DFE+8*, DFE+9, REFUSAL+6~, REFUSAL+7, REFUSAL+8* , EYE+4~*, EYE+5, EYE+6*, EYE+7, DENTAL+9~*, DENTAL+10, DENTAL+11~*, DENTAL+12, CMSFDX+4~*, CMSFDX+6* , CMSFDX+7, FRSTDMDX+3~, FRSTDMDX+4*, FRSTDMDX+5*, FRSTDMDX+6, LASTDMDX+2~, LASTDMDX+3*, LASTDMDX+4, LASTDMDX+6 |