Routine: BDMSMU

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Diabetes Registry	2	$$DATE^BDMS9B1 ($$CODEN,$$ICD)^BDMUTL
VA Fileman	2	^%DT EN^DDIOL
IHS Patient	1	$$DOB^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	($$FMADD,$$FMTE)^XLFDT
Patient Care Component Reports	1	$$START1^APCLDF

Package	Total	Caller Graph
Diabetes Registry	10	BDMDE1T BDMDF1T BDMDG1T BDMDR4 BDMS9B1 BDMS9B3 BDMS9B4 BDMS9B5 BDMS9D1 BDMSMU2

Package

Total

Caller Graph

Diabetes Registry

BDMDE1T BDMDF1T BDMDG1T BDMDR4 BDMS9B1 BDMS9B3 BDMS9B4 BDMS9B5
BDMS9D1 BDMSMU2

Entry Points

Name	Comments	DBIA/ICR reference
LASTLAB(P,BDMI,BDMT,BDML,BDMLT,F)	;EP P is patient, BDMI is ien of lab test, BDMT is IEN of lab taxonomy, BDML is ien of loinc code, BDMLT is ien o f loinc taxonmy
PLCODE(P,A,F)	;EP
LASTHF(P,C,F,BD,ED)	;EP - get last factor in category C for patient P
FFD(%)	;EP
D1(D)	;EP - DATE WITH 4 YR
TYPEREF(N)	;EP
REFUSAL(P,F,I,B,E)	;EP
INP	;EP - called from input transform
DATEAGE(P,Y)	;EP
WRITE	;EP - write out reminder
CPTREFT(P,BDATE,EDATE,T)	;EP - return ien of CPT entry
PLTAX(P,A,S,F)	;EP - is DM on problem list 1 or 0
REF(P,F,I,D,T)	;EP - dm item refused?
LOINC(A,LT,LI)	;
FRSTITEM(P,V,T,F)	;EP - return last item V
LASTITEM(P,V,T,F)	;EP - return last item V
INAC(X)	;EP - active?
DATE(D)	;EP - convert to slashed date
FIRST	;EP

External References

Name	Field # of Occurrence
^%DT	REFUSAL+6, REFUSAL+7
$$START1^APCLDF	LASTITEM+2, FRSTITEM+2
$$DOB^AUPNPAT	DATEAGE+3, LASTHF+6
$$DATE^BDMS9B1	LASTHF+21, LASTHF+22
$$CODEN^BDMUTL	PLCODE+6
$$ICD^BDMUTL	PLTAX+11, CPTREFT+9
EN^DDIOL	INP+3, INP+4
$$VAL^XBDIQ1	REF+10, REF+13, TYPEREF+6, LASTHF+19, LASTHF+21, LASTHF+22
$$FMADD^XLFDT	CPTREFT+4
$$FMTE^XLFDT	REF+10, REF+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ?26,"LAST",?38,"NEXT",! Line Location: WRITE+15
Function Call: WRITE	Prompt: !,$S($P(^BDMSURV(BDMSITI,0),U,4)]"":$P(^BDMSURV(BDMSITI,0),U,4),1:$P(^BDMSURV(BDMSITI,0),U)) Line Location: WRITE+16
Function Call: WRITE	Prompt: ?26,$$DATE(BDMLAST) Line Location: WRITE+17
Function Call: WRITE	Prompt: !,?36,BDMSTEX(BDMSL) Line Location: WRITE+18
Function Call: WRITE	Prompt: ?26,"LAST",?38,"NEXT",! Line Location: FIRST+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	LOINC+5, LOINC+7
^ATXLAB - [#9002228]	LASTLAB+8
^AUPNPREF - [#9000022]	TYPEREF+1, REFUSAL+8, CPTREFT+8, CPTREFT+10
^AUPNPREF("AA"	REF+6, REF+8, REFUSAL+8, CPTREFT+7, CPTREFT+8
^AUPNPROB - [#9000011]	PLTAX+8, PLTAX+9, PLTAX+10, PLTAX+12, PLCODE+8
^AUPNPROB("AC"	PLTAX+8, PLCODE+8
^AUPNVHF - [#9000010.23]	LASTHF+20
^AUPNVHF("AA"	LASTHF+10, LASTHF+11, LASTHF+15
^AUPNVLAB - [#9000010.09]	LASTLAB+6, LASTLAB+8, LASTLAB+10
^AUPNVLAB("AE"	LASTLAB+3, LASTLAB+4, LASTLAB+5
^AUTTHF("AC"	LASTHF+9
^AUTTHF("B"	LASTHF+4
^AUTTREFT - [#9999999.73]	FFD+4, FFD+6
^BDMSURV(	WRITE+4, WRITE+16, INAC+1
^LAB(95.3 - [#95.3]	LOINC+4, LOINC+6

Name	Line Occurrences
$$DATE	WRITE+6, WRITE+17
$$FFD	REF+10, REF+13
$$LOINC	LASTLAB+11
$$TYPEREF	REF+10, REF+13
FIRST	WRITE+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	LOINC+3~, LOINC+4, LOINC+5, LOINC+6, LOINC+7, LASTITEM+2~, TYPEREF+1~, TYPEREF+2, TYPEREF+3, TYPEREF+4 , TYPEREF+5, FRSTITEM+2~*, FFD~, FFD+1, FFD+4
%DT	REFUSAL+6~, REFUSAL+7
A	WRITE+2~, WRITE+7*, LOINC~, LOINC+2, LOINC+4, LOINC+6, PLTAX~, PLTAX+2, PLTAX+6, PLCODE~ , PLCODE+2, PLCODE+6
B	WRITE+2~, WRITE+3, WRITE+7, WRITE+8, REFUSAL~, REFUSAL+4, REFUSAL+6*, REFUSAL+8
BD	LASTHF~, LASTHF+6*, LASTHF+13
BDATE	CPTREFT~, CPTREFT+4*, CPTREFT+8
>> BDMC	LASTLAB+2, LASTLAB+3, LASTLAB+4, LASTLAB+5, LASTLAB+7, LASTLAB+8, LASTLAB+12, LASTLAB+14
BDMI	LASTLAB~, LASTLAB+7
>> BDMICAR	WRITE+10, WRITE+11, WRITE+12
BDML	LASTLAB~, LASTLAB+11
>> BDMLAST	WRITE+5, WRITE+6, WRITE+17
BDMLT	LASTLAB~, LASTLAB+11
>> BDMNEXT	WRITE+9
>> BDMSANY	WRITE+13*
>> BDMSBRK	FIRST+1
>> BDMSCKP	WRITE+14, WRITE+20, FIRST+1
>> BDMSCT	WRITE+15, WRITE+19, WRITE+20, FIRST+3*
>> BDMSGHR	WRITE+1
>> BDMSGHR(1	WRITE+4*
>> BDMSGHR(2	WRITE+5*
>> BDMSGHR(3	WRITE+6*
>> BDMSGHR(4	WRITE+8*
>> BDMSGHR(5	WRITE+9*
>> BDMSGHR(6	WRITE+10*
>> BDMSGHR(7	WRITE+11*
>> BDMSGHR(8	WRITE+12*
>> BDMSITI	WRITE+4, WRITE+16
>> BDMSL	WRITE+18*
>> BDMSNPG	WRITE+13, WRITE+15, WRITE+20, FIRST+1
>> BDMSQIT	WRITE+13, WRITE+14, WRITE+20, FIRST+1
BDMSTEX	WRITE+21!
BDMSTEX(	WRITE+7, WRITE+18
BDMSTEX(1	WRITE+18
BDMT	LASTLAB~, LASTLAB+8
BDMY	LASTITEM+2~!, FRSTITEM+2~!
BDMY(1	LASTITEM+3, FRSTITEM+3
C	LASTHF~, LASTHF+2, LASTHF+4*, LASTHF+5, LASTHF+9
D	D1~, D1+1, D1+2, DATE~, DATE+1, DATE+2, DATEAGE+2~, DATEAGE+3, DATEAGE+4, LASTLAB+3 , LASTLAB+4, LASTLAB+5, LASTLAB+7, LASTLAB+8, LASTLAB+12, REF~, REF+4, REF+10, REF+11, LASTHF+8~ , LASTHF+11, LASTHF+12, LASTHF+13, LASTHF+14, LASTHF+15, LASTHF+17, LASTHF+18, LASTHF+19, LASTHF+20, LASTHF+21 , LASTHF+22, LASTHF+23, REFUSAL+8, CPTREFT+8*, CPTREFT+10
DT	LASTHF+7
E	LASTITEM+2~, FRSTITEM+2~, REFUSAL~, REFUSAL+5, REFUSAL+7*, REFUSAL+8
ED	LASTHF~, LASTHF+7*, LASTHF+14
EDATE	CPTREFT~, CPTREFT+3, CPTREFT+4, CPTREFT+8
F	LASTLAB~, LASTLAB+1, LASTITEM~, LASTITEM+1, LASTITEM+3, PLTAX~, PLTAX+4, PLTAX+5, PLTAX+15, PLTAX+16 , PLCODE~, PLCODE+3, PLCODE+9, PLCODE+10, REF~, REF+2, REF+6, REF+8, REF+10, REF+13 , LASTHF~, LASTHF+3, LASTHF+19, LASTHF+20, LASTHF+21, LASTHF+22, FRSTITEM~, FRSTITEM+1*, FRSTITEM+3, REFUSAL~ , REFUSAL+2, REFUSAL+8
G	REFUSAL+6~, REFUSAL+8, REFUSAL+9, CPTREFT+5~, CPTREFT+6, CPTREFT+7, CPTREFT+8, CPTREFT+10, CPTREFT+12
H	LASTHF+8~, LASTHF+9, LASTHF+10, LASTHF+11, LASTHF+15
I	PLTAX+8~, PLTAX+13, PLTAX+15, PLCODE+8~, PLCODE+9, REF~, REF+3, REF+6, REF+8, REF+10 , REF+13, REFUSAL~, REFUSAL+3, REFUSAL+8, CPTREFT+5~, CPTREFT+7, CPTREFT+8, CPTREFT+9
>> J	LASTLAB+10*, LASTLAB+11
>> L	LASTLAB+4*, LASTLAB+5, LASTLAB+7
LI	LOINC~, LOINC+1, LOINC+2
LT	LOINC~, LOINC+1, LOINC+5, LOINC+7
N	REF+6~, REF+8*, REF+10, REF+13, TYPEREF~, TYPEREF+1, TYPEREF+6
O	LASTHF+8~!
O(	LASTHF+15*, LASTHF+19, LASTHF+20, LASTHF+21, LASTHF+22
O(0	LASTHF+17
P	DATEAGE~, DATEAGE+1, DATEAGE+3, LASTLAB~, LASTLAB+3, LASTLAB+4, LASTLAB+5, LASTITEM~, LASTITEM+2, PLTAX~ , PLTAX+1, PLTAX+8, PLCODE~, PLCODE+1, PLCODE+8, REF~, REF+1, REF+6, REF+8, LASTHF~ , LASTHF+1, LASTHF+6, LASTHF+10, LASTHF+11, LASTHF+15, FRSTITEM~, FRSTITEM+2, REFUSAL~, REFUSAL+1, REFUSAL+8 , CPTREFT~, CPTREFT+1, CPTREFT+7, CPTREFT+8
S	PLTAX~, PLTAX+3*, PLTAX+12
T	LASTITEM~, LASTITEM+2, PLTAX+6~, PLTAX+11, PLCODE+4~, PLCODE+6, PLCODE+7, PLCODE+8, REF~, REF+5* , REF+10, REF+12, FRSTITEM~, FRSTITEM+2, CPTREFT~, CPTREFT+2, CPTREFT+9
U	WRITE+4, WRITE+10, WRITE+11, WRITE+12, WRITE+16, LASTLAB+8, LASTLAB+10, LOINC+4, LOINC+6, PLTAX+9 , PLTAX+10, PLTAX+12, PLCODE+8, TYPEREF+1, LASTHF+20, LASTHF+22, FFD+4, FFD+6, REFUSAL+8, CPTREFT+7 , CPTREFT+8, CPTREFT+10
V	LASTITEM~, LASTITEM+2, FRSTITEM~, FRSTITEM+2
X	INAC~, INAC+1, LASTLAB+5, LASTLAB+6, LASTLAB+8, LASTLAB+10, INP+1!, INP+3!, INP+4!, PLTAX+8~ , PLTAX+9, PLTAX+10, PLTAX+12, PLTAX+14, PLCODE+8~, PLCODE+10, REF+6~, REF+7, REF+8, REF+9 , FFD+2~, FFD+4, REFUSAL+6~, REFUSAL+7, REFUSAL+8, CPTREFT+5~, CPTREFT+8*
Y	DATEAGE~, DATEAGE+3, LASTITEM+2~, PLTAX+8~, PLTAX+10, PLTAX+11, PLCODE+8~, REF+9~, REF+10, REF+11 , REF+12, REF+13, FRSTITEM+2~, FFD+2~, FFD+4, FFD+5, FFD+6, REFUSAL+6~, REFUSAL+7, REFUSAL+8 , CPTREFT+5~, CPTREFT+8*, CPTREFT+10
Z	PLTAX+8~, PLTAX+14, PLTAX+16, CPTREFT+5~

Customize PDF page

Package: Diabetes Registry

Routine: BDMSMU

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: