Routine: BDMD1TS

Package	Total	Call Graph
Registration	3	EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1
IHS VA Utilities	2	$$VAL^XBDIQ1 EN^XBVK
Diabetes Registry	1	EP^BDMD1TL
Kernel	1	DISP^XQORM1
VA Fileman	1	^DIR

Package	Total	Caller Graph
Diabetes Registry	1	BDMGUA

Entry Points

Name	Comments	DBIA/ICR reference
DISP	;EP - add an item to the selected list - called from a protocol
EN	;EP -- main entry point for
HDR	; -- header code
EOJ	;EP
EXPND	; -- expand code
BACK	;go back to listman
DISPX	;
INIT	;EP -- init variables and list array
PAUSE	;EP
EXIT	; -- exit code
ADDX	;
ADD	;EP - add an item to the selected list - called from a protocol
EP	;EP - CALLED FROM OPTION
HELP	; -- help code

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PAUSE+2
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: ! Line Location: ADD+2
Function Call: WRITE	Prompt: !,"No taxonomy selected." Line Location: ADD+5
Function Call: WRITE	Prompt: !,"No taxonomy selected." Line Location: ADD+6
Function Call: WRITE	Prompt: !!,"The ",$P(^ATXLAB(BDMTAXI,0),U)," taxonomy is READ ONLY.",!,"You can not update it." Line Location: ADD+10
Function Call: WRITE	Prompt: !!,"The ",$P(^ATXAX(BDMTAXI,0),U)," taxonomy is READ ONLY.",!,"You can not update it." Line Location: ADD+11
Function Call: WRITE	Prompt: ! Line Location: DISP+1
Function Call: WRITE	Prompt: !,"No taxonomy selected." Line Location: DISP+4
Function Call: WRITE	Prompt: !,"No taxonomy selected." Line Location: DISP+5
Function Call: WRITE	Prompt: !!!,$S(BDMTAXT="L":$P(^ATXLAB(BDMTAXI,0),U),1:$P(^ATXAX(BDMTAXI,0),U)) Line Location: DISP+8
Function Call: WRITE	Prompt: !!,"Items currently defined to this taxonomy:" Line Location: DISP+9
Function Call: WRITE	Prompt: !?5,Y Line Location: DISP+11
Function Call: WRITE	Prompt: !! Line Location: DISP+17
Routine Call	VALM Line Location: EN+1
Routine Call	DIR Line Location: PAUSE+2 ADD+4 DISP+3 DISP+18

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	ADD+9, ADD+11, DISP+8, DISP+12, DISP+13, DISP+14, DISP+15, DISP+16
^ATXAX("B"	INIT+9
^ATXLAB - [#9002228]	ADD+8, ADD+10, DISP+8, DISP+10
^ATXLAB("B"	INIT+10
^BDMTAXS - [#9003202.3]	INIT+3, INIT+4, INIT+5, INIT+6, INIT+9, INIT+10, INIT+12
^BDMTAXS("B"	INIT+2
^DIC - [#1]	INIT+5
^LAB(60 - [#60]	DISP+11

Name	Field # of Occurrence
>> BDMGUI	EOJ+1
>> BDMHIGH	INIT+1, INIT+15, ADD+3, DISP+2
BDMTAX	INIT+1!
BDMTAX(	INIT+8*
BDMTAX("IDX"	INIT+12*, ADD+7, DISP+7
>> BDMTAXI	ADD+7, ADD+8, ADD+9, ADD+10, ADD+11, ADD+13, DISP+7, DISP+8, DISP+10, DISP+12 , DISP+13, DISP+14, DISP+15, DISP+16
>> BDMTAXN	ADD+8, ADD+9
>> BDMTAXT	ADD+7, ADD+8, ADD+9, ADD+10, ADD+11, DISP+7, DISP+8, DISP+10, DISP+12, DISP+14
>> BDMX	INIT+3*, INIT+4, INIT+8, INIT+9, INIT+10
>> BDMY	INIT+4*, INIT+5, INIT+6, INIT+9, INIT+10, INIT+12
>> BDMYR	INIT+2*, INIT+3, INIT+4, INIT+5, INIT+6, INIT+9, INIT+10, INIT+12
>> C	INIT+1, INIT+13, INIT+15
DIR	PAUSE+2!, BACK+5!, ADD+4!, DISP+3!, DISP+18!
DIR("A"	PAUSE+2, ADD+3, DISP+2, DISP+18
DIR(0	PAUSE+2, ADD+3, DISP+2, DISP+18
>> DIRUT	PAUSE+2, ADD+4, ADD+6, DISP+3*, DISP+5
>> DUOUT	PAUSE+2, ADD+4, DISP+3
>> H	DISP+15*, DISP+16
I	INIT+9, INIT+10, INIT+12, BACK+6!
IO	PAUSE+1
IO(0	PAUSE+1
IOF	EN+4, ADD+12, DISP+6
IOST	PAUSE+1
>> J	INIT+3, INIT+7, INIT+8, INIT+12
U	INIT+5, INIT+6, INIT+9, INIT+10, INIT+12, ADD+7, ADD+8, ADD+9, ADD+10, ADD+11 , DISP+7, DISP+8, DISP+11, DISP+12, DISP+13, DISP+14, DISP+16
>> VALMBCK	BACK+2*
>> VALMCNT	INIT+15*
>> VALMHDR(1	HDR+1*
>> VALMHDR(2	HDR+2*
X	HELP+1, BACK+6!, DISP+10, DISP+11, DISP+12, DISP+13, DISP+14, DISP+15
Y	INIT+5, INIT+8, BACK+6!, ADD+5, ADD+7, DISP+4, DISP+7, DISP+11
Z	BACK+6!