Routine: DDBRZIS

Information

DDBRZIS ;SFISC/DCL-BROWSER DEVICE UTILITIES ;4:50 AM 9 Apr 2006

Source file <DDBRZIS.m>

Package	Total	Call Graph
VA Fileman	2	BROWSE^DDBR ^DIR
Kernel	1	$$REWIND^%ZIS

Package	Total	Caller Graph
Kernel	1	ZISFVXD

Name	Comments	DBIA/ICR reference
DEVICE(MSG)	;TEST IF BROWSER IS BEING INVOKED VIA DEVICE HANDLER
MSG(TXT)	;PASS TEXT FOR BROWSER TITLE WHEN BROWSER INVOKED VIA DEVICE HANDLER
STR(X)	; Remove windows
CLOSE	;	ICR #2609 Status: Active Usage: Supported
POST	;	ICR #2609 Status: Active Usage: Supported
OPEN	;	ICR #2609 Status: Active Usage: Supported

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"...one moment..." Line Location: OPEN+13
Function Call: WRITE	Prompt: !,EOF,! Line Location: CLOSE+7
Function Call: WRITE	Prompt: $C(7),!!?5,"<< UNABLE TO REWIND FILE>>",! Line Location: CLOSE+9
Function Call: READ	Timeout: 2 Variable: X Line Location: CLOSE+12
Function Call: WRITE	Prompt: $C(7) Line Location: POST+1
Routine Call	%ZIS Line Location: CLOSE+8
Routine Call	DIR Line Location: OPEN+9

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("OS"	CLOSE+5
^TMP("DDB"	CLOSE+4!, CLOSE+15*

Name	Field # of Occurrence
C	CLOSE+3~, CLOSE+11, CLOSE+15
CHAR	CLOSE+3~, CLOSE+6*, CLOSE+13
DDBDMSG	OPEN+2, OPEN+4, OPEN+10, OPEN+11, OPEN+15, OPEN+16, OPEN+17, CLOSE+1, POST+1!, POST+2 , POST+5!, DEVICE+2, MSG+2*
DDBROS	CLOSE+3~, CLOSE+5*
DDBRZIS	OPEN+2, CLOSE+2, CLOSE+9*, POST+1!, POST+2, POST+5!, DEVICE+2
DDBRZIS("REWIND"	CLOSE+8*, CLOSE+9
>> DHD	OPEN+16
DIR	OPEN+5~
DIR("?"	OPEN+8*
DIR("A"	OPEN+6*
DIR("B"	OPEN+7*
DIR(0	OPEN+6*
DIROUT	OPEN+10!
DIRUT	OPEN+10!
DTOUT	OPEN+10!
DUOUT	OPEN+10!
EOF	CLOSE+3~, CLOSE+5*, CLOSE+7
I	CLOSE+6, STR+1~, STR+3
IO	OPEN+14, CLOSE+7, CLOSE+8, CLOSE+10
IO(0	OPEN+3, CLOSE+9
>> IOPAR	CLOSE+8
>> IOT	CLOSE+8
MSG	DEVICE~, DEVICE+2
TXT	MSG~, MSG+2
X	OPEN+5~, CLOSE+3~, CLOSE+12, CLOSE+13, CLOSE+14*, CLOSE+15, STR~, STR+2, STR+3, STR+4
Y	OPEN+5~, OPEN+11, STR+1~, STR+3*, STR+4