Routine: XBHEDD10

Package	Total	Call Graph
IHS VA Utilities	1	(INIT,SCROLL)^XBHEDD7

Package	Total	Caller Graph
IHS VA Utilities	1	XBHEDD

Entry Points

Name	Comments	DBIA/ICR reference
GLTOP
HELP	;No data in ^UTILITY("EDD/GL")
PT	;Pointers from this file
PTEX	;
PTLIST	;
GLRANGE	;Starting and Ending Global
GLLOAD	;
GLLIST	;Start listing Globals
HD1	;Pointers from this file
INIT	;
GLEX	;Global Exit
HELP1	;"Starting Global" prompt
GLRANGE1
PAGE	;
GL	;List Globals in ASCII order
PTGET	;
HD	;

External References

Name	Field # of Occurrence
INIT^XBHEDD7	PT+1
SCROLL^XBHEDD7	INIT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!!!?20,"This file has no fields that",!?20,"point to other files." Line Location: PTGET+3
Function Call: WRITE	Prompt: ?48,$S($D(@FILE):$E($P(@FILE,U),1,30),1:"-->No such file") Line Location: PTLIST+3
Function Call: WRITE	Prompt: !?8,"Enter Global range...Include Starting & Ending Global:" Line Location: GLRANGE+1
Function Call: READ	Prompt: "Starting Global: ^" Formatting: !?8 Timeout: DTIME Variable: AA Line Location: GLRANGE1+0
Function Call: WRITE	Prompt: 7," Enter 'R' to build your Global listing." Line Location: GLRANGE1+2
Function Call: READ	Prompt: "Ending Global: ^" Formatting: !?8 Timeout: DTIME Variable: BB Line Location: GLRANGE1+4
Function Call: WRITE	Prompt: *7," Ending Global must 'follow' Starting Global" Line Location: GLRANGE1+4
Function Call: WRITE	Prompt: *7," No globals in this range" Line Location: GLRANGE1+5
Function Call: WRITE	Prompt: !?2,AA,?23,$J($P(^(AA),U),14),?40,$E($P(^(AA),U,2),1,35) Line Location: GLLIST+1
Function Call: WRITE	Prompt: "." Line Location: GLLOAD+2
Function Call: WRITE	Prompt: *7,?35,"You have no data in ^UTILITY(""EDD/GL"")." Line Location: HELP+1
Function Call: WRITE	Prompt: !?35,"You must first build your Global listing." Line Location: HELP+2
Function Call: WRITE	Prompt: !?35,"Enter '?' at the 'Starting Global:' prompt." Line Location: HELP+3
Function Call: WRITE	Prompt: !!?8,"1. Enter Global you want listing to start with.",!?11,"Examples: ^DPT , ^L , or ^%ZIS." Line Location: HELP1+1
Function Call: WRITE	Prompt: !?8,"2. Enter '*' to list all globals." Line Location: HELP1+2
Function Call: WRITE	Prompt: !?8,"3. Enter '*R' to Build/Update your Global listing." Line Location: HELP1+3
Function Call: WRITE	Prompt: !?14,"Your Global listing is kept in ^UTILITY(""EDD/GL""). If this is the" Line Location: HELP1+4
Function Call: WRITE	Prompt: !?14,"first time you've used this utility, or if you have added or" Line Location: HELP1+5
Function Call: WRITE	Prompt: !?14,"deleted any files on your system, enter '*R' here to build/update" Line Location: HELP1+6
Function Call: WRITE	Prompt: !?14,"your listing. It will take approximately 30 seconds to run." Line Location: HELP1+7
Function Call: WRITE	Prompt: @IOF,!!! Line Location: PAGE+1
Function Call: READ	Timeout: DTIME Line Location: PAGE+2
Function Call: WRITE	Prompt: @IOF Line Location: PAGE+3
Function Call: WRITE	Prompt: !?2,"Globals in ASCII order:" Line Location: HD+1
Function Call: WRITE	Prompt: !?10,"GLOBAL",?28,"FILE NUM",?46,"FILE (Truncated to 35)" Line Location: HD+2
Function Call: WRITE	Prompt: !,?2,"----------------------",?27,"----------",?40,"-----------------------------------" Line Location: HD+3
Function Call: WRITE	Prompt: !?3,"Pointers FROM this file..",!?6,"FLD NUM",?26,"FIELD NAME",?52,"FILE (Truncated to 30)",!?6,"--------",?16,"------------------------------",?48,"------------------------------" Line Location: HD1+1
Function Call: WRITE	Prompt: @IOF Line Location: INIT+3

Name	Line Occurrences (* Changed, ! Killed)
^DD(	PTGET+2, PTLIST+1, PTLIST+2
^DIC - [#1]	GLLOAD+2
^UTILITY("EDD/GL"	GL+1, GLTOP, GLRANGE1+2, GLRANGE1+5, GLLIST+1, GLLOAD+1!, GLLOAD+2*
^UTILITY($J	PTGET+2

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AA	GLEX+1!, GLRANGE1, GLRANGE1+1, GLRANGE1+3, GLRANGE1+4, GLRANGE1+5, GLLIST+1, GLLOAD+1, GLLOAD+2*
BB	GLEX+1!, GLRANGE1+4*, GLRANGE1+5, GLLIST+1
CNT	PTEX+1!, PTGET+1, PTGET+3, PTLIST+4, GLEX+1!, GLLOAD+1*
DTIME	GLRANGE1, GLRANGE1+4, PAGE+2
>> FILE	PTLIST+3*
>> FLAGE	GLRANGE1, PAGE+2
>> FLAGP	GLRANGE+1, GLRANGE1+4, GLRANGE1+5, PAGE+1, INIT+1, INIT+2
>> FLAGQ	PTGET+2, PTLIST+4, GLTOP, GLTOP+1, GLRANGE1, GLLIST+1, PAGE+2, INIT+1
HD	PT+1, GLTOP, GLEX+1!, PAGE+1, PAGE+3
IO	PAGE+1, INIT+1, INIT+2
IO(0	PAGE+1, INIT+1, INIT+2
IOF	PAGE+1, PAGE+3, INIT+3
IOSL	INIT+1
NAME	PTEX+1!, PTGET+2*, PTLIST+1, PTLIST+3
NODE0	PTEX+1!, PTLIST+2*, PTLIST+3
NUMBER	PTEX+1!, PTGET+2*, PTLIST+1, PTLIST+2, PTLIST+3
>> SIZE	PTLIST+4, GLLIST+1
TEMP	GLEX+1!, GLRANGE1+5*
U	PTLIST+2, PTLIST+3, GLLIST+1
VAR	GLEX+1!
XXX	GLEX+1!
>> Z1	PAGE+2*
ZDD	PTEX+1!, PTGET+1, PTGET+2, PTLIST+1, PTLIST+2, PTLIST+3
>> ZNUM	PTLIST+3

Customize PDF page

Package: IHS VA Utilities

Routine: XBHEDD10

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Line Occurrences
@(	PT+1, GLTOP, PAGE+1, PAGE+3
GLEX	GLTOP, GLTOP+1
GLLIST	GLTOP+1
GLLOAD	GLRANGE1+1
GLRANGE	GLRANGE1+1, GLRANGE1+4
GLRANGE1	GLRANGE1+2, GLRANGE1+4, GLRANGE1+5
HELP	GL+1
HELP1	GLRANGE1+1
INIT	GLTOP
PAGE	PTLIST+4, GLLIST+1
PTGET	PT+1
PTLIST	PTGET+2