BDMDG1D ; IHS/CMI/LAB - BDM Continuation of BDMDG1C 1/11/2014 1:54:57 PM ;
Source file <BDMDG1D.m>
Package | Total | Call Graph |
---|---|---|
Diabetes Registry | 6 | ($$LASTCPTT,$$LASTDXT,$$LASTPRCT)^BDMAPIU $$PRESD^BDMDG18 ACRATIOM^BDMDG1C $$CPTI^BDMDGDU $$DATE^BDMS9B1 ($$ICD,$$SNOMED)^BDMUTL |
Kernel | 2 | $$FMTE^XLFDT $$UP^XLFSTR |
DRG Grouper | 1 | ($$CODEN,$$CPT)^ICPTCOD |
IHS GPRA Information System | 1 | $$ICD^BGP8UTL2 |
IHS Patient | 1 | $$DOB^AUPNPAT |
IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
Patient Care Component Reports | 1 | $$START1^APCLDF |
VA Fileman | 1 | ^%DT |
Name | Comments | DBIA/ICR reference |
---|---|---|
SET3 | ;
|
|
LEAMP(P,EDATE,F) | ;EP - dx of AMP ever?
|
|
DMRETDX(P,EDATE) | ;EP - is DM RETINOPATHY on problem list
|
|
LOINC(A,B) | ;EP - is loinc code A in taxonomy B
|
|
HGBA1C | ;EP
|
|
GATHER | ;
|
|
HEPSCR(P,EDATE) | ;
|
|
G75 | ;EP
|
|
MICRO | ;EP
|
|
SETV | ;
|
|
BS | ;EP
|
|
SNO(%) | ;
|
|
FGLUCOSE | ;EP
|
|
HEPCDX(P,EDATE) | ;EP - dx of HEP C ever?
|
|
SETN | ;
|
|
ASPIRIN | ;EP
|
Name | Field # of Occurrence |
---|---|
^%DT | ASPIRIN+30 |
$$START1^APCLDF | BS+3, ASPIRIN+3, ASPIRIN+5, ASPIRIN+7, DMRETDX+17 |
$$DOB^AUPNPAT | HEPCDX+2, HEPSCR+3, HEPSCR+23, DMRETDX+17, LEAMP+6, LEAMP+8, LEAMP+23, LEAMP+25, LEAMP+42, LEAMP+44 |
$$LASTCPTT^BDMAPIU | LEAMP+42, LEAMP+44 |
$$LASTDXT^BDMAPIU | HEPCDX+2, LEAMP+6, LEAMP+8 |
$$LASTPRCT^BDMAPIU | LEAMP+23, LEAMP+25 |
$$PRESD^BDMDG18 | ASPIRIN+31, ASPIRIN+33, ASPIRIN+35 |
ACRATIOM^BDMDG1C | MICRO+15 |
$$CPTI^BDMDGDU | HEPSCR+23 |
$$DATE^BDMS9B1 | ASPIRIN+4, ASPIRIN+6, ASPIRIN+8, HEPCDX+3, HEPCDX+11, HEPSCR+16, HEPSCR+20, HEPSCR+24, DMRETDX+18, DMRETDX+29 , LEAMP+7, LEAMP+9, LEAMP+21, LEAMP+24, LEAMP+26, LEAMP+35, LEAMP+36, LEAMP+37, LEAMP+38, LEAMP+43 , LEAMP+45 |
$$ICD^BDMUTL | DMRETDX+11 |
$$SNOMED^BDMUTL | HEPCDX+12, DMRETDX+13, DMRETDX+23, LEAMP+14, LEAMP+15, LEAMP+37, LEAMP+38 |
$$ICD^BGP8UTL2 | HEPCDX+11, LEAMP+35, LEAMP+36 |
$$CODEN^ICPTCOD | HEPSCR+23 |
$$CPT^ICPTCOD | HEPSCR+24 |
$$VAL^XBDIQ1 | SETV+3, HEPCDX+11, HEPSCR+16, HEPSCR+20, LEAMP+35, LEAMP+36, LEAMP+37, LEAMP+38 |
$$FMTE^XLFDT | MICRO+19, BS+6, FGLUCOSE+11, G75+11 |
$$UP^XLFSTR | HGBA1C+11, HGBA1C+12, SETN+1, SET3+6 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ATXAX - [#9002226] | LOINC+3, LOINC+5, ASPIRIN+21, ASPIRIN+22, DMRETDX+11, DMRETDX+17 |
^ATXAX("B" | MICRO+3, HGBA1C+4, FGLUCOSE+5, G75+5, ASPIRIN+11, ASPIRIN+12, ASPIRIN+31, ASPIRIN+33, ASPIRIN+35, HEPCDX+5 , HEPSCR+9, DMRETDX+4, LEAMP+6, LEAMP+8, LEAMP+23, LEAMP+25, LEAMP+28, LEAMP+29, LEAMP+42, LEAMP+44 |
^ATXLAB - [#9002228] | MICRO+9, HGBA1C+13, GATHER+5, GATHER+17, HEPSCR+15 |
^ATXLAB("B" | MICRO+4, HGBA1C+5, FGLUCOSE+6, G75+6, HEPSCR+10 |
^AUPNPROB - [#9000011] | HEPCDX+7, HEPCDX+8, HEPCDX+9, HEPCDX+11, HEPCDX+12, DMRETDX+6, DMRETDX+7, DMRETDX+8, DMRETDX+9, DMRETDX+10 , DMRETDX+12, DMRETDX+13, LEAMP+31, LEAMP+32, LEAMP+33, LEAMP+35, LEAMP+36, LEAMP+37, LEAMP+38 |
^AUPNPROB("AC" | HEPCDX+6, DMRETDX+5, LEAMP+30 |
^AUPNVLAB - [#9000010.09] | MICRO+8, MICRO+9, MICRO+11, MICRO+17, HGBA1C+9, HGBA1C+10, HGBA1C+11, HGBA1C+12, HGBA1C+13, HGBA1C+15 , BS+6, FGLUCOSE+10, FGLUCOSE+11, G75+10, G75+11, GATHER+4, GATHER+5, GATHER+7, GATHER+16, GATHER+17 , GATHER+19, SETV+2, SETV+3, SETN+1, SET3+6, SET3+7, HEPSCR+14, HEPSCR+15, HEPSCR+18 |
^AUPNVLAB("AE" | MICRO+5, MICRO+6, MICRO+7, HGBA1C+6, HGBA1C+7, HGBA1C+8, GATHER+1, GATHER+2, GATHER+3, GATHER+14 , GATHER+15, HEPSCR+11, HEPSCR+12, HEPSCR+13 |
^AUPNVMED - [#9000010.14] | ASPIRIN+14 |
^AUPNVPOV("ASNC" | DMRETDX+21, DMRETDX+25, LEAMP+12, LEAMP+17 |
^AUPNVSIT - [#9000010] | SETV+2 |
^BDMSNME - [#9003202.6] | SNO+4, SNO+6 |
^BDMSNME("B" | SNO+2 |
^DPT - [#2] | DMRETDX+2 |
^LAB(95.3 - [#95.3] | LOINC+2, LOINC+4 |
^PS(50.7 - [#50.7] | ASPIRIN+26 |
^PS(55 - [#55] | ASPIRIN+13, ASPIRIN+14, ASPIRIN+15, ASPIRIN+16, ASPIRIN+17, ASPIRIN+18, ASPIRIN+19, ASPIRIN+24 |
^PSDRUG - [#50] | ASPIRIN+23 |
Name | Line Occurrences |
---|---|
$$HEPCDX | HEPSCR+1 |
$$LOINC | MICRO+12, HGBA1C+16, GATHER+8, GATHER+20, HEPSCR+19 |
GATHER | FGLUCOSE+7, G75+7 |
SET3 | HGBA1C+19, BS+5 |
SETN | MICRO+16, FGLUCOSE+9, G75+9 |
SETV | MICRO+9, MICRO+13, HGBA1C+13, HGBA1C+17, GATHER+5, GATHER+9, GATHER+17, GATHER+21 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | MICRO+1~, MICRO+17~*, MICRO+18, MICRO+19, HGBA1C+1~, BS+1~, BS+3*, BS+6*, FGLUCOSE+2~, G75+2~ , LOINC+1~, LOINC+2*, LOINC+3, LOINC+4*, LOINC+5, ASPIRIN+1~, ASPIRIN+13*, ASPIRIN+23*, ASPIRIN+28*, ASPIRIN+29 , HEPSCR+6~, HEPSCR+23*, HEPSCR+24, DMRETDX+3~, SNO~, SNO+4, SNO+6 |
>> %1 | MICRO+15*, MICRO+18*, MICRO+19 |
%DT | ASPIRIN+30!* |
A | LOINC~, LOINC+2, LOINC+4, SETN+1~*, SET3+1~, SET3+2!, ASPIRIN+1~, ASPIRIN+2*, ASPIRIN+4*, ASPIRIN+9 |
A( | SET3+3*, SET3+4, SET3+5, SET3+7 |
B | MICRO+1~, MICRO+5*, HGBA1C+1~, HGBA1C+6*, FGLUCOSE+2~, G75+2~, GATHER+1*, LOINC~, LOINC+3, LOINC+5 , ASPIRIN+1~, ASPIRIN+2*, SNO+1~, SNO+2*, SNO+3, SNO+4, SNO+6 |
>> BDATE | MICRO+5, HGBA1C+6, BS+3, GATHER+1, ASPIRIN+3, ASPIRIN+5, ASPIRIN+7 |
BDM | MICRO+1~, MICRO+2!, HGBA1C+1~, HGBA1C+2!, BS+1~, BS+2!, FGLUCOSE+2~, FGLUCOSE+3!, G75+2~, G75+3! , GATHER+1, GATHER+13!, ASPIRIN+1~, ASPIRIN+5!, ASPIRIN+7!, ASPIRIN+31*, ASPIRIN+32, ASPIRIN+33*, ASPIRIN+34, ASPIRIN+35* , ASPIRIN+36, DMRETDX+3~, DMRETDX+16! |
BDM( | MICRO+17, MICRO+19, HGBA1C+26, HGBA1C+27, HGBA1C+28, HGBA1C+29, HGBA1C+30, BS+6, FGLUCOSE+10, FGLUCOSE+11 , G75+10, G75+11, SETV+3*, SETN+1, SET3+3, SET3+6, SET3+7! |
BDM(1 | MICRO+15, BS+4, FGLUCOSE+8, G75+8, GATHER+11, GATHER+12, ASPIRIN+4, ASPIRIN+6, ASPIRIN+8, DMRETDX+18 |
BDMC | MICRO+1~, MICRO+2*, HGBA1C+1~, HGBA1C+3*, FGLUCOSE+2~, FGLUCOSE+4*, G75+2~, G75+4*, GATHER+13*, SETV+1* , SETV+3 |
BDMLT | MICRO+1~, MICRO+4*, MICRO+9, HGBA1C+1~, HGBA1C+5*, HGBA1C+13, FGLUCOSE+2~, FGLUCOSE+6*, G75+2~, G75+6* , GATHER+5, GATHER+17 |
BDMOT | MICRO+1~, MICRO+3*, MICRO+10, MICRO+12, HGBA1C+1~, HGBA1C+4*, HGBA1C+14, HGBA1C+16, FGLUCOSE+2~, FGLUCOSE+5* , G75+2~, G75+5*, GATHER+6, GATHER+8, GATHER+18, GATHER+20 |
BDMR | HGBA1C+25! |
BDMR("NR" | HGBA1C+30*, HGBA1C+36, HGBA1C+37, HGBA1C+38 |
BDMR("R" | HGBA1C+29*, HGBA1C+32, HGBA1C+33, HGBA1C+34 |
BDMV | MICRO+1~, HGBA1C+1~, FGLUCOSE+2~, G75+2~, SETV+2*, SETV+3 |
BGPC | HEPSCR+6~, HEPSCR+8*, HEPSCR+11, HEPSCR+12, HEPSCR+13, HEPSCR+16*, HEPSCR+20*, HEPSCR+22 |
BGPLT | HEPSCR+6~, HEPSCR+10*, HEPSCR+15 |
C | HGBA1C+24*, BS+1~, BS+6*, SNO+1~, SNO+4*, SNO+5, SNO+6*, SNO+7 |
D | MICRO+1~, MICRO+5*, MICRO+6, MICRO+7, HGBA1C+1~, HGBA1C+6*, HGBA1C+7, HGBA1C+8, HGBA1C+27*, HGBA1C+29 , HGBA1C+30, HGBA1C+32*, HGBA1C+33, HGBA1C+34, HGBA1C+36*, HGBA1C+37, HGBA1C+38, FGLUCOSE+2~, G75+2~, GATHER+1* , GATHER+2, GATHER+3, GATHER+12*, GATHER+14, GATHER+15, SET3+4~*, SET3+5, SET3+7, ASPIRIN+2*, ASPIRIN+4* , ASPIRIN+6*, ASPIRIN+8*, ASPIRIN+9, ASPIRIN+10, ASPIRIN+19*, ASPIRIN+20, ASPIRIN+21, ASPIRIN+22, ASPIRIN+23, HEPSCR+2~ , HEPSCR+3*, HEPSCR+6~, HEPSCR+11*, HEPSCR+12, HEPSCR+13, HEPSCR+16, HEPSCR+20, DMRETDX+3~, DMRETDX+25*, DMRETDX+26 , LEAMP+4~, LEAMP+17*, LEAMP+18 |
E | MICRO+1~, MICRO+5*, HGBA1C+1~, HGBA1C+6*, BS+1~, BS+3*, FGLUCOSE+2~, G75+2~, GATHER+1*, ASPIRIN+1~ , ASPIRIN+3*, ASPIRIN+5*, ASPIRIN+7*, HEPSCR+11*, HEPSCR+23*, HEPSCR+24, DMRETDX+3~, DMRETDX+17* |
>> ED | ASPIRIN+30*, ASPIRIN+31, ASPIRIN+33, ASPIRIN+35 |
EDATE | MICRO+5, HGBA1C+6, BS+3, GATHER+1, ASPIRIN+3, ASPIRIN+5, ASPIRIN+7, ASPIRIN+17, ASPIRIN+18, ASPIRIN+30 , HEPCDX~, HEPCDX+2, HEPCDX+7, HEPSCR~, HEPSCR+1, HEPSCR+11, HEPSCR+23, DMRETDX~, DMRETDX+7, DMRETDX+17 , DMRETDX+27, LEAMP~, LEAMP+6, LEAMP+8, LEAMP+19, LEAMP+23, LEAMP+25, LEAMP+31, LEAMP+42, LEAMP+44 |
F | FGLUCOSE+1*, FGLUCOSE+10, G75+1*, G75+10, LEAMP~, LEAMP+1*, LEAMP+7, LEAMP+9, LEAMP+21, LEAMP+24 , LEAMP+26, LEAMP+35, LEAMP+36, LEAMP+37, LEAMP+38, LEAMP+43, LEAMP+45, LEAMP+46 |
G | HGBA1C+1~, SETN+1~*, SETN+2, SET3+1~, SET3+5*, SET3+6*, SET3+7, ASPIRIN+1~, ASPIRIN+2*, ASPIRIN+20* , ASPIRIN+21*, ASPIRIN+22*, ASPIRIN+23, HEPCDX+1~, HEPCDX+6*, HEPCDX+11*, HEPCDX+12*, HEPCDX+14, HEPSCR+6~, DMRETDX+3~ , DMRETDX+5*, DMRETDX+11*, DMRETDX+13*, DMRETDX+15, DMRETDX+20*, DMRETDX+21, DMRETDX+25, DMRETDX+28*, DMRETDX+29, LEAMP+4~ , LEAMP+11*, LEAMP+12, LEAMP+17, LEAMP+20*, LEAMP+21, LEAMP+30*, LEAMP+35*, LEAMP+36*, LEAMP+37*, LEAMP+38* , LEAMP+40 |
I | DMRETDX+3~, DMRETDX+20*, DMRETDX+22*, DMRETDX+23*, DMRETDX+24, LEAMP+4~, LEAMP+11*, LEAMP+13*, LEAMP+14*, LEAMP+15* , LEAMP+16 |
J | MICRO+1~, MICRO+11*, MICRO+12, HGBA1C+1~, HGBA1C+15*, HGBA1C+16, FGLUCOSE+2~, G75+2~, GATHER+7*, GATHER+8 , GATHER+19*, GATHER+20, HEPSCR+6~, HEPSCR+18*, HEPSCR+19 |
L | MICRO+1~, MICRO+6*, MICRO+7, HGBA1C+1~, HGBA1C+7*, HGBA1C+8, FGLUCOSE+2~, G75+2~, GATHER+2*, GATHER+3 , GATHER+14*, GATHER+15, ASPIRIN+15*, HEPSCR+6~, HEPSCR+12*, HEPSCR+13 |
N | MICRO+17, MICRO+19, HGBA1C+24*, HGBA1C+26*, HGBA1C+27, HGBA1C+28, HGBA1C+29, HGBA1C+30, HGBA1C+33*, HGBA1C+34 , HGBA1C+37*, HGBA1C+38, FGLUCOSE+10, FGLUCOSE+11, G75+10, G75+11, SETN+1*, SETN+2*, SET3+1~, SET3+5* , SET3+6, SET3+7*, ASPIRIN+1~, ASPIRIN+2*, ASPIRIN+6*, ASPIRIN+8*, ASPIRIN+10 |
N1 | SET3+1~ |
N2 | SET3+1~ |
N3 | SET3+1~ |
O | ASPIRIN+1~, ASPIRIN+24*, ASPIRIN+25, ASPIRIN+26*, ASPIRIN+27, ASPIRIN+28 |
P | MICRO+5, MICRO+6, MICRO+7, HGBA1C+6, HGBA1C+7, HGBA1C+8, BS+3, GATHER+1, GATHER+2, GATHER+3 , GATHER+14, GATHER+15, ASPIRIN+3, ASPIRIN+5, ASPIRIN+7, ASPIRIN+13, ASPIRIN+14, ASPIRIN+15, ASPIRIN+16, ASPIRIN+17 , ASPIRIN+18, ASPIRIN+19, ASPIRIN+24, ASPIRIN+31, ASPIRIN+33, ASPIRIN+35, HEPCDX~, HEPCDX+2, HEPCDX+6, HEPSCR~ , HEPSCR+1, HEPSCR+3, HEPSCR+11, HEPSCR+12, HEPSCR+13, HEPSCR+23, DMRETDX~, DMRETDX+1, DMRETDX+2, DMRETDX+5 , DMRETDX+17, DMRETDX+21, DMRETDX+25, LEAMP~, LEAMP+6, LEAMP+8, LEAMP+12, LEAMP+17, LEAMP+23, LEAMP+25 , LEAMP+30, LEAMP+42, LEAMP+44 |
R | MICRO+1~, HGBA1C+1~, HGBA1C+24*, HGBA1C+28*, HGBA1C+29, HGBA1C+30, HGBA1C+31*, HGBA1C+32, HGBA1C+33, HGBA1C+34* , HGBA1C+35, HGBA1C+36, HGBA1C+37, HGBA1C+38*, HGBA1C+39, BS+1~, BS+6*, BS+7, FGLUCOSE+2~, G75+2~ , SETN+1*, HEPSCR+6~ |
S | DMRETDX+3~, DMRETDX+21*, DMRETDX+23, DMRETDX+25, DMRETDX+29, LEAMP+4~, LEAMP+12*, LEAMP+14, LEAMP+15, LEAMP+17 , LEAMP+21 |
T | SET3+1~, ASPIRIN+1~, ASPIRIN+11*, ASPIRIN+21, HEPCDX+1~, HEPCDX+5*, HEPCDX+11, HEPSCR+6~, HEPSCR+9*, HEPSCR+17 , HEPSCR+19, DMRETDX+3~, DMRETDX+4*, DMRETDX+11, DMRETDX+17, LEAMP+4~, LEAMP+28*, LEAMP+35 |
T1 | ASPIRIN+1~, ASPIRIN+12*, ASPIRIN+22, LEAMP+4~, LEAMP+29*, LEAMP+36 |
U | MICRO+9, MICRO+11, MICRO+17, MICRO+19, HGBA1C+10, HGBA1C+11, HGBA1C+12, HGBA1C+13, HGBA1C+15, HGBA1C+27 , HGBA1C+28, BS+6, FGLUCOSE+10, FGLUCOSE+11, G75+10, G75+11, GATHER+5, GATHER+7, GATHER+12, GATHER+17 , GATHER+19, LOINC+2, LOINC+4, SETV+2, SETV+3, SETN+1, SET3+3, SET3+6, SET3+7, ASPIRIN+4 , ASPIRIN+6, ASPIRIN+8, ASPIRIN+14, ASPIRIN+15, ASPIRIN+16, ASPIRIN+17, ASPIRIN+18, ASPIRIN+19, ASPIRIN+23, ASPIRIN+24 , ASPIRIN+26, HEPCDX+3, HEPCDX+7, HEPCDX+8, HEPCDX+9, HEPCDX+11, HEPCDX+12, HEPSCR+15, HEPSCR+18, HEPSCR+24 , DMRETDX+7, DMRETDX+8, DMRETDX+9, DMRETDX+10, DMRETDX+11, DMRETDX+12, DMRETDX+13, DMRETDX+17, DMRETDX+18, LEAMP+7 , LEAMP+9, LEAMP+24, LEAMP+26, LEAMP+31, LEAMP+32, LEAMP+33, LEAMP+35, LEAMP+36, LEAMP+37, LEAMP+38 , LEAMP+43, LEAMP+45 |
V | MICRO+1~, HGBA1C+1~, BS+1~, FGLUCOSE+2~, G75+2~, SETV+2*, SETV+3 |
X | MICRO+1~, MICRO+7*, MICRO+8, MICRO+9, MICRO+11, HGBA1C+1~, HGBA1C+8*, HGBA1C+9, HGBA1C+10, HGBA1C+11 , HGBA1C+12, HGBA1C+13, HGBA1C+15, BS+1~, FGLUCOSE+2~, G75+2~, GATHER+3*, GATHER+4, GATHER+5, GATHER+7 , GATHER+15*, GATHER+16, GATHER+17, GATHER+19, SETV+2, SETV+3, SET3+1~, SET3+3*, ASPIRIN+1~, ASPIRIN+3* , ASPIRIN+5*, ASPIRIN+7*, ASPIRIN+13*, ASPIRIN+14, ASPIRIN+15, ASPIRIN+16, ASPIRIN+17, ASPIRIN+18, ASPIRIN+19, ASPIRIN+24 , ASPIRIN+30*, HEPCDX+1~, HEPCDX+2*, HEPCDX+3, HEPCDX+6*, HEPCDX+7, HEPCDX+8, HEPCDX+9, HEPCDX+11, HEPCDX+12 , HEPSCR+6~, HEPSCR+13*, HEPSCR+14, HEPSCR+15, HEPSCR+16, HEPSCR+18, HEPSCR+20, DMRETDX+3~, DMRETDX+5*, DMRETDX+6 , DMRETDX+7, DMRETDX+8, DMRETDX+9, DMRETDX+10, DMRETDX+11, DMRETDX+12, DMRETDX+13, DMRETDX+17*, LEAMP+4~, LEAMP+5* , LEAMP+6*, LEAMP+7, LEAMP+8*, LEAMP+9, LEAMP+22*, LEAMP+23*, LEAMP+24, LEAMP+25*, LEAMP+26, LEAMP+30* , LEAMP+31, LEAMP+32, LEAMP+33, LEAMP+35, LEAMP+36, LEAMP+37, LEAMP+38, LEAMP+41*, LEAMP+42*, LEAMP+43 , LEAMP+44*, LEAMP+45 |
Y | ASPIRIN+30, HEPCDX+8*, HEPCDX+11, HEPSCR+6~, DMRETDX+3~, DMRETDX+8*, DMRETDX+11, DMRETDX+18*, DMRETDX+26*, DMRETDX+27 , DMRETDX+29, LEAMP+4~, LEAMP+18*, LEAMP+19, LEAMP+21, LEAMP+32*, LEAMP+35, LEAMP+36 |