Routine: XBLZRO

Package

Total

Call Graph

$$DIR^XBDIR ^XBDSET

^%DT

Package	Total	Caller Graph
IHS VA Utilities	1	XBFRESET

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
EN	;PEP - List 0th node of pre-selected list of FileMan files. ; IOF,IOSL must be set and U IO if appropriate.
HEADER	; PRINT HEADER
LIST	;
START	;
DEVICE	; GET DEVICE (QUEUEING ALLOWED)
PAGE	; PAGE BREAK

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"^XBLZRO - This routine lists the 0th nodes of FileMan files." Line Location: START+3
Function Call: WRITE	Prompt: F,?15,X,?35,N,! Line Location: LIST+6
Function Call: WRITE	Prompt: Y,"@",TME,?30,TITLE Line Location: HEADER+9
Function Call: WRITE	Prompt: ?65,UCI,!,"FILE",?15,"GLOBAL",?35,"0TH NODE",!! Line Location: HEADER+12
Function Call: WRITE	Prompt: ! Line Location: DEVICE+1
Function Call: WRITE	Prompt: !!,$S($D(ZTSK):"Request queued!",1:"Request cancelled!") Line Location: DEVICE+8
Routine Call	%ZIS Line Location: DEVICE+3

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("UCI"	HEADER+10
^DD("DD"	HEADER+8
^DIC - [#1]	EN+8
^UTILITY("XBDSET"	START+5, EN+8

Name	Field # of Occurrence
^("GL"	EN+8
^(0	LIST+3

Name	Field # of Occurrence
>> %DT	HEADER+6*
>> %ZIS	DEVICE+2*
DIRUT	PAGE+2!
DT	HEADER+6*, HEADER+7
DUOUT	PAGE+2!
F	EN+4~, EN+7, EN+8, LIST+6, PAGE+1~
G	EN+4~, EN+8*, LIST+1, PAGE+1~
HR	HEADER+1~, HEADER+3*, HEADER+5
IO	PAGE+2, DEVICE+13
IO("Q"	DEVICE+5, DEVICE+10!
IO(0	PAGE+2
IOF	EN+2, HEADER+2
ION	DEVICE+6
IOSL	EN+2, LIST+4
IOST	PAGE+2
MIN	HEADER+1~, HEADER+3, HEADER+4, HEADER+5
N	EN+4~, LIST+2, LIST+3, LIST+6, PAGE+1~
POP	DEVICE+4!
QFLG	START+1~, START+2, START+7!, EN+4~, EN+5, EN+8, LIST+5, PAGE+2, PAGE+3, DEVICE+4 , DEVICE+5*
TITLE	HEADER+1~, HEADER+3*, HEADER+9
TM	HEADER+1~, HEADER+3*
TME	HEADER+1~, HEADER+5*, HEADER+9
UCI	HEADER+1~, HEADER+11*, HEADER+12
X	EN+4~, LIST+1, LIST+3, LIST+6, PAGE+1~, HEADER+6
>> Y	PAGE+2, HEADER+6, HEADER+7, HEADER+9, HEADER+11
>> ZTDESC	DEVICE+6*
ZTIO	DEVICE+6*, DEVICE+11!
>> ZTRTN	DEVICE+6*
>> ZTSAVE("^UTILITY(""XBDSET"",$J,"	DEVICE+6*
ZTSK	DEVICE+8, DEVICE+10!

Information