BDWUTIL1 ; IHS/CMI/LAB - Data Warehouse Utilities ;
Source file <BDWUTIL1.m>
Package | Total | Call Graph |
---|---|---|
Data Warehouse Export System | 2 | ($$LABDONE,$$LABRES)^BDWUTIL $$CHARTREG^BDWUTIL1 |
Patient Care Component Reports | 2 | $$START1^APCLDF ($$PRIMPOV,$$SECPOV)^APCLV |
DRG Grouper | 1 | ($$ICDDX,$$ICDOP)^ICDEX |
IHS Patient | 1 | ($$MCD,$$MCR,$$PI)^AUPNPAT |
IHS VA Utilities | 1 | ($$VAL,$$VALI)^XBDIQ1 |
VA Fileman | 1 | $$GET1^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
GLUCOSE(V) | ;EP - return glucose test value on this visit
|
|
X(Z) | ; ;diagnosis done for
|
|
ACE(V) | ;EP - ace inhibitor filled this visit
|
|
CHARTREG(P) | ;EP
|
|
PROC(RETVAL,BDWV) | ;EP
|
|
MED(RETVAL,BDWV) | ;EP
|
|
CHART(V) | ;PEP - returns ASUFAC_HRN ( 12 digits, HRN is left zero filled)
|
|
NLAB(V) | ;
|
|
LDL(V) | ;
|
|
PSA(V) | ;
|
|
CDEATH(PAT) | ;-- get the cause of death and coding system
|
|
GETCHART(P,L) | ;
|
|
O(P) | ;EP
|
|
BI() | ;IHS/CMI/LAB - new subroutine patch 4 1/5/1999
|
|
PCC(P,D) | ;EP - RETURN CLASS^SPEC^TYPE for provider P on date D
|
|
TRI(V) | ;
|
|
MC(RETVAL,BDWV) | ;EP
|
|
C(P) | ;EP
|
|
FECAL(V) | ;
|
|
HDLVALUE(V) | ;
|
|
A | ;EP
|
|
MCR(BDWV) | ;
|
|
D | ;EP
|
|
TRIVALUE(V) | ;
|
|
F | ;EP
|
|
CHSPO(V) | ;EP return vendor type from VCHS
|
|
HDL(V) | ;
|
|
HGBA1C(V) | ;EP - called to return value of HGBA1C if done on this visit
|
|
IMM(RETVAL,BDWV) | ;EP
|
|
PI(BDWV) | ;EP
|
|
HTN(BDWV,F) | ;EP - is htn documented for this patient ever? Y or N retured
|
|
PROV(RETVAL,BDWV) | ;EP
|
|
LDLVALUE(V) | ;
|
|
PAP(V) | ;EP - was pap performed Y/N
|
|
ST(RETVAL,BDWV) | ;EP -
|
|
IFC(RETVAL,BDWV) | ;EP -
|
|
ORF(P) | ;EP patient has ORF?
|
|
MCD(BDWV) | ;EP
|
Name | Field # of Occurrence |
---|---|
$$START1^APCLDF | HTN+8 |
$$PRIMPOV^APCLV | X+4 |
$$SECPOV^APCLV | X+5 |
$$MCD^AUPNPAT | MCD+4 |
$$MCR^AUPNPAT | MCR+4 |
$$PI^AUPNPAT | PI+4 |
$$LABDONE^BDWUTIL | HDL+1, LDL+1, TRI+1, PSA+1, FECAL+1 |
$$LABRES^BDWUTIL | HDLVALUE+1, LDLVALUE+1, TRIVALUE+1 |
$$CHARTREG^BDWUTIL1 | CHART+4 |
$$GET1^DIQ | IFC+8, IFC+9, PROC+11, PROC+12, PROC+13, PROC+15, PROC+16, PROC+17, PROC+37, PROC+38 , PROC+39, PROC+41, PROC+42, PROC+43, CDEATH+2, CDEATH+4 |
$$ICDDX^ICDEX | CDEATH+5 |
$$ICDOP^ICDEX | PROC+6 |
$$VAL^XBDIQ1 | PROC+8, MC+13 |
$$VALI^XBDIQ1 | F+1 |
FileNo | Call Tags |
---|---|
^DIC(81.3 - [#81.3] | GET1^DIQ |
^AUPNPAT - [#9000001] | GET1^DIQ |
^AUPNVPRC - [#9000010.08] | GET1^DIQ |
^AUPNVIF - [#9000010.44] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AGFAC - [#9009061] | ORF+7, GETCHART+3 |
^ATXAX - [#9002226] | ACE+8 |
^ATXAX("B" | ACE+4 |
^ATXLAB - [#9002228] | PAP+5, GLUCOSE+5, HGBA1C+10 |
^ATXLAB("B" | PAP+3, GLUCOSE+3, HGBA1C+6, HGBA1C+7 |
^AUPNPAT - [#9000001] | ORF+6, CHART+11, CHART+14, GETCHART+6, CHARTREG+2, CHARTREG+7 |
^AUPNVCHS - [#9000010.03] | CHSPO+5, CHSPO+7, CHSPO+9 |
^AUPNVCHS("AD" | CHSPO+3 |
^AUPNVHF - [#9000010.23] | MC+9 |
^AUPNVHF("AD" | MC+8 |
^AUPNVIF - [#9000010.44] | IFC+7 |
^AUPNVIF("AD" | IFC+6 |
^AUPNVIMM - [#9000010.11] | IMM+5, IMM+10 |
^AUPNVIMM("AD" | IMM+4 |
^AUPNVLAB - [#9000010.09] | PAP+5, GLUCOSE+5, HGBA1C+10 |
^AUPNVLAB("AD" | NLAB+2, PAP+5, GLUCOSE+5, HGBA1C+5, HGBA1C+10 |
^AUPNVMED - [#9000010.14] | MED+7, MED+8, MED+10, MED+11, MED+12, MED+13, ACE+8 |
^AUPNVMED("AD" | MED+6, ACE+3, ACE+8 |
^AUPNVPOV("AC" | HTN+7 |
^AUPNVPRC - [#9000010.08] | PROC+5, PROC+8, PROC+24, PROC+26, PROC+29, X+2, X+3 |
^AUPNVPRC("AD" | PROC+2 |
^AUPNVPRV - [#9000010.06] | PROV+6, PROV+7, PROV+8, PROV+9, PROV+11, PROV+19 |
^AUPNVPRV("AD" | PROV+3, PROV+5 |
^AUPNVSIT - [#9000010] | CHART+5, CHART+6, CHSPO+2, ST+3, IFC+3, PROV+20, PROC+30, IMM+1, MCD+2, MCD+4 , MCR+2, MCR+4, PI+2, PI+4, HTN+2, MED+4, HGBA1C+4, ACE+2, MC+5 |
^AUPNVSK - [#9000010.12] | ST+7, ST+8, ST+11 |
^AUPNVSK("AD" | ST+6 |
^AUTTHF - [#9999999.64] | MC+11, MC+13 |
^AUTTIMM - [#9999999.14] | IMM+7, IMM+8, IMM+9 |
^AUTTIMM(0 | BI+1 |
^AUTTLOC - [#9999999.06] | GETCHART+4, CHSPO+8 |
^AUTTSITE(1 | CHART+12, CHARTREG+5 |
^AUTTSK - [#9999999.28] | ST+9, ST+10 |
^BDWSITE(1 | MED+2, PAP+2, GLUCOSE+2, MC+3 |
^DD(9000010.06 | PROV+11, PROV+16, C+2, A+1, F+1 |
^DD(9000010.08 | PROC+26 |
^DIC(16 - [#16] | PROV+16, PROC+26 |
^DIC(6 - [#6] | C+2, A+1 |
^DIC(7 - [#7] | D+3 |
^DPT - [#2] | HTN+5, HTN+6 |
^ICDS(0 | PROC+6, PROC+7, CDEATH+5 |
^PSDRUG - [#50] | MED+8, MED+11, MED+12, MED+13, MED+14 |
^USC(8932.1 - [#8932.1] | PCC+14, PCC+15 |
^VA(200 - [#200] | PCC+3, PCC+4, PCC+6, PCC+7, PCC+11, PCC+12, C+2, A+1 |
Name | Line Occurrences |
---|---|
$$BI | IMM+8, IMM+9 |
$$C | PROV+11 |
$$GETCHART | CHART+11, CHART+12, CHART+13, CHART+14, CHARTREG+5, CHARTREG+6, CHARTREG+7 |
$$O | PROV+10, PROC+8 |
$$PCC | PROV+22, PROC+32 |
$$X | PROC+8 |
A | O+3 |
D | O+6 |
F | D+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | CHART+2~, CHART+3*, CHART+5, CHART+8, CHART+11*, CHART+12*, CHART+13*, CHART+14*, CHART+15, CHARTREG+3~ , CHARTREG+4*, CHARTREG+5*, CHARTREG+6*, CHARTREG+7*, CHARTREG+8, C+1~, C+2*, C+3, A+1*, F+1* , D+2, D+3*, X+1~*, X+4*, X+5*, X+6, O+2~, O+4, O+5*, O+7 , O+8*, O+9, MCD+1~, MCD+4*, MCD+5, MCR+1~, MCR+4*, MCR+5, PI+1~, PI+4* , PI+5 |
A | CHSPO+6~, CHSPO+7*, CHSPO+8*, CHSPO+9, O+2~, O+5*, O+8 |
BDWAD | PROV+1~, PROV+10*, PROV+11 |
BDWC | ST+4~, ST+5*, ST+11*, IFC+4~, IFC+5*, IFC+10*, PROV+1~, PROV+7*, PROV+8*, PROV+11 , PROV+23, PROC+1~, PROC+2*, PROC+3*, PROC+8, PROC+9, PROC+20, PROC+21, PROC+23, PROC+33 , PROC+34, IMM+2~, IMM+3*, IMM+4*, IMM+8, IMM+9, IMM+10, MED+5~, MED+6*, MED+9* , MED+14, MC+6~, MC+7*, MC+12*, MC+13 |
BDWCLS | MED+5~, MED+13*, MED+14 |
BDWCS | PROV+1~, PROV+4*, PROV+8* |
BDWD | MED+5~, MED+8*, MED+14 |
BDWE | ST+4~, ST+8*, ST+9, ST+10*, ST+11, IFC+4~, IFC+9*, IFC+10 |
BDWG | HTN+1~ |
BDWG(1 | HTN+9 |
BDWH | MC+6~, MC+9*, MC+10, MC+11, MC+13 |
BDWI | ST+4~, ST+5*, ST+6*, ST+7, ST+8, ST+11, IFC+4~, IFC+5*, IFC+6*, IFC+7 , IFC+8, IFC+9, IMM+2~, IMM+4*, IMM+5, IMM+10, MED+5~, MED+6*, MED+7, MED+8 , MED+10, MED+11, MED+12, MED+13, MC+6~, MC+7*, MC+8*, MC+9 |
BDWIE | IFC+4~, IFC+8*, IFC+10 |
BDWNDC | MED+5~, MED+11*, MED+12*, MED+14 |
BDWP | PROV+1~, PROV+4*, PROV+5*, PROV+6, PROV+7, PROV+8, PROV+9, PROV+11, PROV+19, PROC+1~ , PROC+2*, PROC+5, PROC+8, PROC+11, PROC+12, PROC+15, PROC+16, PROC+24, PROC+26, PROC+29 , PROC+37, PROC+38, PROC+41, PROC+42 |
BDWPIEN | PROV+1~, PROV+9*, PROV+10, PROV+11, PROV+15, PROV+16 |
BDWQ | MED+5~, MED+10*, MED+14 |
BDWS | PROV+1~ |
BDWV | ST~, ST+2, ST+3, ST+6, IFC~, IFC+2, IFC+3, IFC+6, PROV~, PROV+3 , PROV+5, PROC~, PROC+2, IMM~, IMM+1, IMM+4, MCD~, MCD+2, MCD+4, MCR~ , MCR+2, MCR+4, PI~, PI+2, PI+4, HTN~, HTN+2, MED~, MED+3, MED+4 , MED+6, MC~, MC+4, MC+5, MC+8 |
C | CHART+2~, GETCHART+6*, GETCHART+7, GETCHART+8, CHARTREG+3~, CHSPO+3~*, CHSPO+4, CHSPO+5, CHSPO+7, CHSPO+9 , PROC+46, PROC+47, PROC+49 |
CD | CDEATH+1~, CDEATH+4*, CDEATH+5, CDEATH+6 |
CDI | CDEATH+1~, CDEATH+2*, CDEATH+3 |
CS | PROC+4~, PROC+6*, PROC+7*, PROC+9, PROC+34, CDEATH+1~, CDEATH+5*, CDEATH+6 |
D | ORF+2~, ORF+5*, ORF+6*, ORF+7, PROV+1~, PROV+19*, PROV+20*, PROV+21, PROV+22, PCC~ , PCC+2, PCC+8, PCC+9, PROC+29*, PROC+30*, PROC+31, PROC+32 |
>> DFN | CHART+4, MCD+4, MCR+4, PI+4 |
DUZ(2 | CHART+13, CHARTREG+6 |
E | HTN+1~, HTN+8~* |
F | HTN~, HTN+9, HTN+10 |
FLAG | ORF+2~, ORF+3*, ORF+8*, ORF+10 |
G | PROV+1~, PROV+22*, PROV+23, PROC+32*, PROC+33 |
>> I | IMM+5*, IMM+6, IMM+7, IMM+8, IMM+9, X+4*, X+5* |
ICDP | PROC+4~, PROC+5*, PROC+6 |
>> J | X+5* |
L | CHART+2~, CHART+9*, CHART+10, CHART+11, CHART+12*, CHART+13*, CHART+14*, GETCHART~, GETCHART+3, GETCHART+4 , GETCHART+6, CHARTREG+3~, CHARTREG+5*, CHARTREG+6*, CHARTREG+7* |
M | X+2~*, X+4, X+5 |
MOD1 | PROC+10~, PROC+12*, PROC+14, PROC+36~, PROC+38*, PROC+40 |
MOD1C | PROC+10~, PROC+13*, PROC+14, PROC+36~, PROC+39*, PROC+40 |
MOD1I | PROC+10~, PROC+11*, PROC+13, PROC+36~, PROC+37*, PROC+39 |
MOD1STR | PROC+10~, PROC+14*, PROC+19, PROC+20, PROC+21, PROC+22, PROC+36~, PROC+40*, PROC+45, PROC+46 , PROC+47, PROC+48 |
MOD2 | PROC+10~, PROC+16*, PROC+18, PROC+36~, PROC+42*, PROC+44 |
MOD2C | PROC+10~, PROC+17*, PROC+18, PROC+36~, PROC+43*, PROC+44 |
MOD2I | PROC+10~, PROC+15*, PROC+17, PROC+36~, PROC+41*, PROC+43 |
MOD2STR | PROC+10~, PROC+18*, PROC+21, PROC+23, PROC+36~, PROC+44*, PROC+47, PROC+49 |
P | ORF~, ORF+1, ORF+6, CHART+2~, CHART+7*, CHART+8, CHART+11, CHART+12, CHART+13, CHART+14 , GETCHART~, GETCHART+6, CHARTREG~, CHARTREG+1, CHARTREG+2, CHARTREG+5, CHARTREG+6, CHARTREG+7, PCC~, PCC+1 , PCC+3, PCC+4, PCC+6, PCC+7, PCC+11, PCC+12, C~, C+2, A+1, F+1 , O~, O+1, MCD+1~, MCD+2*, MCD+3, MCR+1~, MCR+2*, MCR+3, PI+1~, PI+2* , PI+3, HTN+1~, HTN+2*, HTN+3, HTN+5, HTN+6, HTN+7, HTN+8 |
PAT | CDEATH~, CDEATH+2, CDEATH+4 |
R | GETCHART+1~, GETCHART+2*, GETCHART+8*, GETCHART+9, HTN+1~, HTN+4*, HTN+5, HTN+6, HTN+7, HGBA1C+2~ , HGBA1C+3*, HGBA1C+4, HGBA1C+5, HGBA1C+6, HGBA1C+8, HGBA1C+10*, HGBA1C+11, ACE+6~, ACE+7*, ACE+8* , ACE+9 |
RETVAL | ST~, ST+1!, IFC~, IFC+1!, PROV~, PROV+2!, PROC~, IMM~, IMM+3!, MED~ , MED+1!, MC~, MC+2! |
RETVAL( | ST+11*, IFC+10*, PROV+11*, PROV+23*, PROC+8*, PROC+9*, PROC+20*, PROC+21*, PROC+23*, PROC+33* , PROC+34*, PROC+46*, PROC+47*, PROC+49*, IMM+8*, IMM+9*, IMM+10*, MED+14*, MC+13* |
S | CHART+2~, GETCHART+1~, GETCHART+4*, GETCHART+5, GETCHART+8, CHARTREG+3~ |
T | PAP+3~*, PAP+4, PAP+5, GLUCOSE+3~*, GLUCOSE+4, GLUCOSE+5 |
U | CHART+7, CHART+9, CHART+12, GETCHART+3, GETCHART+4, GETCHART+6, CHARTREG+5, CHSPO+7, CHSPO+8, CHSPO+9 , PROV+16, PCC+8, PCC+9, PCC+12, PCC+15, PROC+5, PROC+6, PROC+26, MED+2, PAP+2 , PAP+5, GLUCOSE+2, GLUCOSE+5, HGBA1C+10, ACE+8, MC+3, CDEATH+5, CDEATH+6 |
V | CHART~, CHART+4, CHART+5, CHART+6, HDL~, HDL+1, HDLVALUE~, HDLVALUE+1, LDL~, LDL+1 , LDLVALUE~, LDLVALUE+1, TRI~, TRI+1, TRIVALUE~, TRIVALUE+1, PSA~, PSA+1, FECAL~, FECAL+1 , NLAB~, NLAB+2, CHSPO~, CHSPO+1, CHSPO+2, CHSPO+3, X+3~*, X+4, X+5, PAP~ , PAP+1, PAP+5, GLUCOSE~, GLUCOSE+1, GLUCOSE+5, HGBA1C~, HGBA1C+4, HGBA1C+5, HGBA1C+10, ACE~ , ACE+2, ACE+3, ACE+8 |
X | NLAB+1~, NLAB+2*, PROV+1~, PCC+5~, PCC+6*, PCC+8, PCC+9, HTN+1~, HTN+8~*, PAP+5~* , GLUCOSE+5~*, HGBA1C+9~, HGBA1C+10*, ACE+6~, ACE+8* |
Y | NLAB+1~, NLAB+2*, NLAB+3, PROV+1~, PROV+15*, PROV+16*, PROV+17, PROV+22, PCC+5~, PCC+7* , PCC+8, PCC+9, PROC+24*, PROC+25, PROC+26*, PROC+27, PROC+32, PAP+5~*, PAP+6, GLUCOSE+5~* , GLUCOSE+6, HGBA1C+7~*, HGBA1C+8, HGBA1C+10, ACE+4~*, ACE+5, ACE+8 |
Z | CHART+2~, CHART+6*, CHART+7, CHART+9, PCC+5~, PCC+6*, PCC+8*, PCC+9*, PCC+11*, PCC+12* , PCC+13, PCC+14, PCC+15*, PCC+16, X~, X+2, X+3, PAP+5~*, GLUCOSE+5~*, HGBA1C+9~ , HGBA1C+10*, ACE+6~, ACE+8* |