Routine: BDMPL

Package	Total	Call Graph
Registration	3	EN^VALM TERM^VALM0 ($$FTIME,CLEAR,FULL)^VALM1
IHS VA Utilities	2	DIQ^XBLM EN^XBVK
Kernel	1	DISP^XQORM1
Patient Care Component	1	GATHER^APCDPL
VA Fileman	1	^DIR

Package

Total

Call Graph

Registration

EN^VALM TERM^VALM0 ($$FTIME,CLEAR,FULL)^VALM1

IHS VA Utilities

DIQ^XBLM EN^XBVK

Kernel

DISP^XQORM1

Patient Care Component

GATHER^APCDPL

VA Fileman

^DIR

Package	Total	Caller Graph
Diabetes Registry	1	BDMVRL

Package

Total

Caller Graph

Diabetes Registry

BDMVRL

Entry Points

Name	Comments	DBIA/ICR reference
EN	;EP main entry point for BDM PL PROBLEM LIST
GETNUM(P)	;EP - get problem number given ien of problem entry
HDR	;EP -- header code
EOJ	;cleanup
DD	;EP - called from protocol to display (DIQ) a problem in detail
EXPND	; -- expand code
GETPROB	;get record
EN1	;EP
INIT	; -- init variables and list array
PAUSE	;EP
EXIT	; -- exit code
TEXT	;
XIT	;
HELP	; -- help code

Name	Field # of Occurrence
GATHER^APCDPL	INIT+3
^DIR	GETPROB+3, PAUSE+1
EN^VALM	EN+2
TERM^VALM0	XIT+4
$$FTIME^VALM1	HDR+2
CLEAR^VALM1	EOJ+1, EN+3
FULL^VALM1	GETPROB+8
DIQ^XBLM	DD+4
EN^XBVK	EOJ+3
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: !,"No problems to select." Line Location: GETPROB+2
Function Call: WRITE	Prompt: !!,"No Problem Selected" Line Location: GETPROB+4
Function Call: WRITE	Prompt: !,"Not a valid PCC PROBLEM." Line Location: GETPROB+7
Routine Call	VALM Line Location: EN+2
Routine Call	DIR Line Location: GETPROB+3 PAUSE+1

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	HDR+2
^AUPNPROB - [#9000011]	GETPROB+7, GETNUM+4, GETNUM+5, GETNUM+6
^AUTTLOC - [#9999999.06]	GETNUM+6
^DPT - [#2]	HDR+2
^TMP($J	EOJ+2!, INIT+1!, INIT+6*, EXIT+1!, GETPROB+6

Name	Line Occurrences
EXIT	GETPROB+4
GETPROB	DD+2
PAUSE	GETPROB+4, DD+3
XIT	DD+3, DD+5

Name	Field # of Occurrence
^(0	GETNUM+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCDLINE	INIT+4
APCDLOOK	XIT+9!
APCDOVRR	EOJ+5!, INIT+8*, EXIT+2!, XIT+1!
APCDPIEN	XIT+3!
APCDPLPT	EOJ+5!, INIT+2*, EXIT+2!
>> APCDRCNT	INIT+5
>> AUPNDOB	HDR+2
BDMAF	EOJ+5!, EXIT+2!, XIT+9!
BDMC	EXIT+2!
BDMDATE	EOJ+5!, EXIT+2!
BDMF	XIT+9!
BDML	EXIT+2!
BDMLINE	EXIT+2!
BDMLOC	EOJ+5!, EXIT+2!
BDMLOOK	EOJ+5!, EXIT+2!
BDMLR	EXIT+2!
BDMP	GETPROB+5*, GETPROB+6, GETPROB+7!, XIT+9!
BDMP0	EXIT+2!, XIT+9!
BDMPAT	EOJ+5!
BDMPDFN	EOJ+5!, EXIT+2!
BDMPIEN	EOJ+5!, EXIT+2!, GETPROB+1, GETPROB+6, GETPROB+7*, DD+1~, DD+3, DD+4, XIT+9!
BDMPL	EXIT+2!
BDMPPTR	XIT+9!
BDMPRB	EOJ+5!, EXIT+2!, XIT+9!
BDMPRMT	XIT+9!
BDMRCNT	INIT+5*, EXIT+2!, GETPROB+2, GETPROB+3
BDMTEMP	XIT+9!
BDMX	EXIT+2!
DA	GETPROB+3!
DFN	EOJ+5!, HDR+2, INIT+2
DIR	GETPROB+3!, PAUSE+1!
DIR("A"	GETPROB+3, PAUSE+1
DIR(0	GETPROB+3, PAUSE+1
>> DIRUT	GETPROB+4, PAUSE+1*
DLAYGO	XIT+2!
>> DUOUT	PAUSE+1
DUZ(2	HDR+2
F	GETNUM+1~, GETNUM+5*, GETNUM+6
>> IOINORM	HDR+2
>> IORVON	HDR+2
N	GETNUM+1~, GETNUM+2, GETNUM+3, GETNUM+4, GETNUM+6, GETNUM+7
P	GETNUM~, GETNUM+3, GETNUM+4, GETNUM+5, GETNUM+6
U	HDR+2, GETNUM+5, GETNUM+6
VALM	EOJ+4!
VALMAR	EOJ+4!
VALMBCK	EOJ+4!, XIT+5*
VALMBG	EOJ+4!
VALMCAP	EOJ+4!
>> VALMCC	EN+1*
VALMCNT	EOJ+4!, INIT+4*
VALMDN	EOJ+4!
VALMEVL	EOJ+4!
VALMHDR	EXIT+4!
VALMHDR(1	HDR+1*
VALMHDR(2	HDR+2*
VALMHDR(3	HDR+3*
VALMIOXY	EOJ+4!
VALMKEY	EOJ+4!
VALMLFT	EOJ+4!
VALMLST	EOJ+4!
VALMMCON	EOJ+4!
VALMMENU	EOJ+4!
VALMOFF	EOJ+4!
VALMSGR	EOJ+4!
VALMUP	EOJ+4!
VALMWD	EOJ+1, EOJ+4!
VALMY	EOJ+4!
X	HELP+1, EXIT+3!, GETPROB+6
XQORNEST	EOJ+4!
XQORS	EOJ+4!
XQORSPEW	EOJ+4!
Y	EXIT+3!, GETPROB+5, GETPROB+6*

Customize PDF page

Package: Diabetes Registry

Routine: BDMPL

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: