BDMD610 ; IHS/CMI/LAB -IHS -GETS DATA FOR DIABETES QA REPORT ;
Source file <BDMD610.m>
| Package | Total | Call Graph |
|---|---|---|
| Diabetes Registry | 12 | WRITEF^BDMD61 $$CESS^BDMD611 ($$ACAR,$$DEPDX,$$DEPSCR,$$EKG,$$INSULIN,$$MET,$$REFMED,$$SULF,$$TBTX,$$TROG)^BDMD612 ($$BPS,$$CMSFDX,$$FLU,$$FRSTDMDX,$$HTNDX,$$LASTDMDX,$$LASTHT,$$LASTWT,$$PLDMDOO,$$PLDMDXS,$$PNEU)^BDMD613 CUML^BDMD615 ($$ACE,$$ASPIRIN,$$LIPID,$$TOBACCO)^BDMD616 ($$DENTAL,$$DFE,$$DIETEDUC,$$EXEDUC,$$EYE,$$OTHEDUC)^BDMD617 ($$BMI,$$CHOL,$$CREAT,$$HDL,$$HGBA1C,$$LASTNP,$$LDL,$$MICRO,$$PPD,$$PROTEIN,$$TRIG,$$URIN)^BDMD618 $$TD^BDMD61B $$ACTDMPT^BDMD61G $$RSTAT^BDMDM6 $$DEMO^BDMUTL |
| IHS Patient | 1 | ($$COMMRES,$$DOB,$$HRN,$$TRIBE)^AUPNPAT |
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
| Kernel | 1 | ($$FMADD,$$FMTE)^XLFDT |
| Package | Total | Caller Graph |
|---|---|---|
| Diabetes Registry | 3 | BDMD61 BDMD612 BDMD61E |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; - ENTRY POINT - from ^BDMASK
|
|
| S(P,I,V) | ;
|
|
| COMM(P) | ;EP
|
|
| PPD | ;
|
|
| EPIREC | ;create epi info record in ^BDMDATA("BDMEPI",$J,n)
|
|
| DEMO | ;pat demographics
|
|
| ACTONREG(P,R) | ;
|
|
| GATHER | ;gather data for 1 patient
|
|
| IMM | ;
|
|
| REC(DFN,BDMRTYP,BDMRBD,BDMRED,BDMED,BDMDMRG,BDMBDAT) | ;EP - called to send back a visit record as
|
|
| LABS | ;
|
|
| HEADER | ; Set node with report header info
|
|
| VITAL | ;
|
|
| THERAPY | ;
|
|
| EXAMS | ;
|
|
| DXDT | ;dates of and dm dxs
|
|
| EAUDIT | ;EP
|
|
| TYPEDM | ;return type of DM in BDMTYDM
|
|
| PROC | ;
|
|
| DATE(D) | ;EP
|
|
| TRIBE(P) | ;EP
|
| Name | Field # of Occurrence |
|---|---|
| $$COMMRES^AUPNPAT | COMM+3 |
| $$DOB^AUPNPAT | DEMO+2 |
| $$HRN^AUPNPAT | DEMO+1 |
| $$TRIBE^AUPNPAT | TRIBE+3 |
| WRITEF^BDMD61 | EN+8, EAUDIT+22 |
| $$CESS^BDMD611 | DXDT+9 |
| $$ACAR^BDMD612 | THERAPY+5 |
| $$DEPDX^BDMD612 | LABS+13 |
| $$DEPSCR^BDMD612 | LABS+15 |
| $$EKG^BDMD612 | PPD+4 |
| $$INSULIN^BDMD612 | THERAPY+2 |
| $$MET^BDMD612 | THERAPY+4 |
| $$REFMED^BDMD612 | THERAPY+7 |
| $$SULF^BDMD612 | THERAPY+3 |
| $$TBTX^BDMD612 | PPD+3 |
| $$TROG^BDMD612 | THERAPY+6 |
| $$BPS^BDMD613 | VITAL+6 |
| $$CMSFDX^BDMD613 | DXDT+1, DXDT+2 |
| $$FLU^BDMD613 | IMM+3 |
| $$FRSTDMDX^BDMD613 | DXDT+5 |
| $$HTNDX^BDMD613 | VITAL+4 |
| $$LASTDMDX^BDMD613 | DXDT+6 |
| $$LASTHT^BDMD613 | VITAL+1 |
| $$LASTWT^BDMD613 | VITAL+2 |
| $$PLDMDOO^BDMD613 | DXDT+3 |
| $$PLDMDXS^BDMD613 | DXDT+4 |
| $$PNEU^BDMD613 | IMM+4 |
| CUML^BDMD615 | EN+9, EAUDIT+23 |
| $$ACE^BDMD616 | THERAPY+10 |
| $$ASPIRIN^BDMD616 | IMM+1 |
| $$LIPID^BDMD616 | IMM+2 |
| $$TOBACCO^BDMD616 | DXDT+7 |
| $$DENTAL^BDMD617 | EXAMS+3 |
| $$DFE^BDMD617 | EXAMS+1 |
| $$DIETEDUC^BDMD617 | EXAMS+4 |
| $$EXEDUC^BDMD617 | EXAMS+5 |
| $$EYE^BDMD617 | EXAMS+2 |
| $$OTHEDUC^BDMD617 | EXAMS+6 |
| $$BMI^BDMD618 | LABS+12 |
| $$CHOL^BDMD618 | LABS+4 |
| $$CREAT^BDMD618 | LABS+3 |
| $$HDL^BDMD618 | LABS+6 |
| $$HGBA1C^BDMD618 | LABS+1 |
| $$LASTNP^BDMD618 | PPD+2 |
| $$LDL^BDMD618 | LABS+5 |
| $$MICRO^BDMD618 | LABS+10 |
| $$PPD^BDMD618 | PPD+1 |
| $$PROTEIN^BDMD618 | LABS+9 |
| $$TRIG^BDMD618 | LABS+7 |
| $$URIN^BDMD618 | LABS+8 |
| $$TD^BDMD61B | IMM+5 |
| $$ACTDMPT^BDMD61G | EAUDIT+11, EAUDIT+17 |
| $$RSTAT^BDMDM6 | HEADER+11 |
| $$DEMO^BDMUTL | EN+5, EAUDIT+10 |
| $$VAL^XBDIQ1 | HEADER+14, DEMO+3 |
| $$FMADD^XLFDT | EN+2, THERAPY+1, EAUDIT+2, EAUDIT+4, EAUDIT+5 |
| $$FMTE^XLFDT | HEADER+4, THERAPY+1 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ACM(41 - [#9002241] | EAUDIT+7, EAUDIT+8, EAUDIT+9, ACTONREG+1, ACTONREG+2, ACTONREG+3 |
| ^AUPNPAT - [#9000001] | TRIBE+2, COMM+2, EAUDIT+16 |
| ^AUTTLOC - [#9999999.06] | HEADER+7, HEADER+8, HEADER+9 |
| ^BDMDATA("BDMEPI" | EN+1!, EPIREC+1*, EPIREC+2*, EPIREC+3*, EAUDIT+1! |
| ^BDMRECD - [#9003202.1] | PROC+2, PROC+3, PROC+4 |
| ^BDMRECD("B" | REC+3 |
| ^DIC(4 - [#4] | HEADER+6 |
| ^VA(200 - [#200] | HEADER+13 |
| ^XTMP("BDMDM61" | EN+2*, EN+4, S+1*, HEADER+2*, HEADER+4*, HEADER+6*, HEADER+7*, HEADER+8*, HEADER+9*, HEADER+11* , HEADER+13*, HEADER+14*, DEMO+1*, DEMO+2*, DEMO+3*, DEMO+4*, DEMO+5*, DXDT+1*, DXDT+2*, DXDT+3* , THERAPY+8, LABS+14, TYPEDM+2, TYPEDM+3, TYPEDM+4, TYPEDM+5, TYPEDM+6, TYPEDM+7, TYPEDM+12, EAUDIT+2* |
| Name | Line Occurrences |
|---|---|
| $$ACTONREG | EAUDIT+19 |
| $$COMM | DEMO+5 |
| $$REC | EPIREC+1, EPIREC+2, EPIREC+3 |
| $$TRIBE | DEMO+4 |
| EPIREC | EN+6, EAUDIT+13, EAUDIT+20 |
| GATHER | EN+7, EAUDIT+14, EAUDIT+21 |
| S | DXDT+4, DXDT+5, DXDT+6, DXDT+7, DXDT+8, DXDT+9, VITAL+1, VITAL+2, VITAL+4, VITAL+6 , EXAMS+1, EXAMS+2, EXAMS+3, EXAMS+4, EXAMS+5, EXAMS+6, THERAPY+2, THERAPY+3, THERAPY+4, THERAPY+5 , THERAPY+6, THERAPY+7, THERAPY+9, THERAPY+10, IMM+1, IMM+2, IMM+3, IMM+4, IMM+5, PPD+1 , PPD+2, PPD+3, PPD+4, LABS+1, LABS+3, LABS+4, LABS+5, LABS+6, LABS+7, LABS+8 , LABS+9, LABS+10, LABS+12, LABS+13, LABS+15 |
| TYPEDM | DXDT+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BDM3YE | EAUDIT+5*, EAUDIT+11, EAUDIT+17 |
| >> BDM6MBD | THERAPY+1*, THERAPY+2, THERAPY+3, THERAPY+4, THERAPY+5, THERAPY+6, THERAPY+10 |
| >> BDMACTI | EAUDIT+6, EAUDIT+16, EAUDIT+19 |
| >> BDMADAT | EPIREC+1, EPIREC+2, EPIREC+3, THERAPY+1, LABS+1, LABS+3, LABS+4, LABS+5, LABS+6, LABS+7 , LABS+8, LABS+9, LABS+10, LABS+13, LABS+15, EAUDIT+4, EAUDIT+5, EAUDIT+11, EAUDIT+17 |
| BDMBDAT | REC~, EPIREC+1, EPIREC+2, EPIREC+3, LABS+1, LABS+3, LABS+4, LABS+5, LABS+6, LABS+7 , LABS+8, LABS+9, LABS+10, LABS+13, LABS+15 |
| >> BDMBEGD | EAUDIT+4*, EAUDIT+11, EAUDIT+17 |
| >> BDMBEN | EAUDIT+11, EAUDIT+17 |
| >> BDMBTH | EN+4, S+1, HEADER+2, HEADER+4, HEADER+6, HEADER+7, HEADER+8, HEADER+9, HEADER+11, HEADER+13 , HEADER+14, DEMO+1, DEMO+2, DEMO+3, DEMO+4, DEMO+5, DXDT+1, DXDT+2, DXDT+3, THERAPY+8 , LABS+14, TYPEDM+2, TYPEDM+3, TYPEDM+4, TYPEDM+5, TYPEDM+6, TYPEDM+7, TYPEDM+12 |
| >> BDMDEMO | EN+5, EAUDIT+10 |
| >> BDMDEP | LABS+14*, LABS+15 |
| BDMDMRG | REC~, EPIREC+1, EPIREC+2, EPIREC+3, HEADER+11, DXDT+1, DXDT+2, EAUDIT+7, EAUDIT+19 |
| >> BDMEAUT | EAUDIT+7*, EAUDIT+8, EAUDIT+9 |
| BDMED | REC~ |
| >> BDMEPIN | EN+3*, EPIREC+1*, EPIREC+2*, EPIREC+3*, EAUDIT+3* |
| >> BDMEPIR | EPIREC+1*, EPIREC+2*, EPIREC+3* |
| >> BDMEPIX | PROC+1*, PROC+2* |
| >> BDMER | GATHER+1* |
| >> BDMFISC | HEADER+2 |
| >> BDMJOB | EN+4, S+1, HEADER+2, HEADER+4, HEADER+6, HEADER+7, HEADER+8, HEADER+9, HEADER+11, HEADER+13 , HEADER+14, DEMO+1, DEMO+2, DEMO+3, DEMO+4, DEMO+5, DXDT+1, DXDT+2, DXDT+3, THERAPY+8 , LABS+14, TYPEDM+2, TYPEDM+3, TYPEDM+4, TYPEDM+5, TYPEDM+6, TYPEDM+7, TYPEDM+12 |
| >> BDMPD | EN+4*, EN+5, EPIREC+1, EPIREC+2, EPIREC+3, HEADER+2, HEADER+4, HEADER+6, HEADER+7, HEADER+8 , HEADER+9, HEADER+11, HEADER+13, HEADER+14, DEMO+1, DEMO+2, DEMO+3, DEMO+4, DEMO+5, DXDT+1 , DXDT+2, DXDT+3, DXDT+4, DXDT+5, DXDT+6, DXDT+7, DXDT+8, DXDT+9, VITAL+1, VITAL+2 , VITAL+4, VITAL+6, EXAMS+1, EXAMS+2, EXAMS+3, EXAMS+4, EXAMS+5, EXAMS+6, THERAPY+2, THERAPY+3 , THERAPY+4, THERAPY+5, THERAPY+6, THERAPY+7, THERAPY+8, THERAPY+9, THERAPY+10, IMM+1, IMM+2, IMM+3 , IMM+4, IMM+5, PPD+1, PPD+2, PPD+3, PPD+4, LABS+1, LABS+3, LABS+4, LABS+5 , LABS+6, LABS+7, LABS+8, LABS+9, LABS+10, LABS+12, LABS+13, LABS+14, LABS+15, TYPEDM+2 , TYPEDM+3, TYPEDM+4, TYPEDM+5, TYPEDM+6, TYPEDM+7, TYPEDM+12, EAUDIT+9*, EAUDIT+10, EAUDIT+11, EAUDIT+16* , EAUDIT+17, EAUDIT+19 |
| >> BDMPREP | EN+6, EN+8, EN+9, EAUDIT+13, EAUDIT+20, EAUDIT+22, EAUDIT+23 |
| BDMRBD | REC~, EPIREC+1, EPIREC+2, EPIREC+3, HEADER+2, DXDT+9, VITAL+6, EXAMS+1, EXAMS+2, EXAMS+3 , EXAMS+4, EXAMS+5, EXAMS+6, THERAPY+7, IMM+1, IMM+2, IMM+3, LABS+12 |
| BDMREC | REC+1~, REC+2*, REC+4, PROC+2, PROC+4*, PROC+5 |
| BDMRED | REC~, EPIREC+1, EPIREC+2, EPIREC+3, HEADER+2, DXDT+6, DXDT+7, DXDT+9, VITAL+1, VITAL+2 , VITAL+4, VITAL+6, EXAMS+1, EXAMS+2, EXAMS+3, EXAMS+4, EXAMS+5, EXAMS+6, THERAPY+2, THERAPY+3 , THERAPY+4, THERAPY+5, THERAPY+6, THERAPY+7, THERAPY+10, IMM+1, IMM+2, IMM+3, IMM+4, IMM+5 , PPD+1, PPD+2, PPD+4, LABS+12 |
| BDMRTYP | REC~, REC+3 |
| BDMRTYP("IEN" | REC+3*, REC+4, PROC+2, PROC+3, PROC+4 |
| >> BDMTAXI | EAUDIT+11, EAUDIT+17 |
| >> BDMTHER | EPIREC+2* |
| >> BDMTTT | PROC+2*, PROC+3, PROC+4 |
| >> BDMTYDM | DXDT+8*, TYPEDM+2*, TYPEDM+3*, TYPEDM+4*, TYPEDM+5*, TYPEDM+6*, TYPEDM+8*, TYPEDM+9, TYPEDM+10*, TYPEDM+11 , TYPEDM+13*, TYPEDM+14* |
| >> BDMTYPE | EN+5 |
| BDMX | REC+1~, EAUDIT+11*, EAUDIT+12, EAUDIT+17*, EAUDIT+18 |
| >> C | TYPEDM+8*, TYPEDM+10* |
| D | DATE~, DATE+1, DATE+2 |
| DFN | REC~ |
| DT | EN+2, HEADER+4, EAUDIT+2 |
| DUZ | HEADER+13 |
| DUZ(2 | HEADER+6, HEADER+7, HEADER+8, HEADER+9, DEMO+1 |
| I | S~, S+1, TYPEDM+8*, TYPEDM+10* |
| P | S~, S+1, TRIBE~, TRIBE+1, TRIBE+2, TRIBE+3, COMM~, COMM+1, COMM+2, COMM+3 , ACTONREG~, ACTONREG+1, ACTONREG+2 |
| R | ACTONREG~, ACTONREG+1, ACTONREG+2 |
| U | PROC+4, HEADER+6, HEADER+7, HEADER+8, HEADER+9, HEADER+13, THERAPY+7, EAUDIT+8, EAUDIT+9, ACTONREG+3 |
| V | S~, S+1 |
| X | PROC+3*, PROC+4, THERAPY+8*, TYPEDM+1~, TYPEDM+7*, TYPEDM+8, TYPEDM+10, TYPEDM+12*, TYPEDM+13, TYPEDM+14 , ACTONREG+2*, ACTONREG+3 |
| >> Y | THERAPY+7*, THERAPY+8*, THERAPY+9 |