Routine: AZGSAVED

Package	Total	Call Graph
Kernel	1	(,CURRENT)^%ZIS
Local Area Programs	1	^AZGSAV1D
Uncategorized	1	^%ET

Package

Total

Call Graph

Kernel

(,CURRENT)^%ZIS

Local Area Programs

^AZGSAV1D

Uncategorized

^%ET

Package	Total	Caller Graph
Utilities	1	AUGSAVE

Package

Total

Caller Graph

Utilities

AUGSAVE

Name	Field # of Occurrence
^%ET	ERROR+1
^%ZIS	NOSELT, PROCESS
CURRENT^%ZIS	NOSELT
^AZGSAV1D	S9+1

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Line Location: ASK+0
Function Call: WRITE	Prompt: !!,"This option saves the ' ",AUNAR," ",AUGL,"' transaction file to either a Cartridge",!,"or 9-Track Tape. The default is to a 9-Track Tape." Line Location: HELP+0
Function Call: WRITE	Prompt: !,"Enter either a ""C"" for Cartridge Tape or a ""T"" for 9-Track Tape." Line Location: HELP+1
Function Call: WRITE	Prompt: !,AUFLG(1) Line Location: PROCESS+0
Function Call: WRITE	Prompt: @%MT("REW") Line Location: PROCESS+1
Function Call: WRITE	Prompt: !!,"Mount The ",MESSAGE," Tape 'WRITE ENABLED' And " Line Location: PROCESS+1
Function Call: READ	Timeout: DTIME Line Location: RETRY+0
Function Call: WRITE	Prompt: !!,"WAITING FOR TAPE" Line Location: RETRY+2
Function Call: WRITE	Prompt: "." Line Location: RETRY+3
Function Call: WRITE	Prompt: !!,AUFLG(1)," After 6 Minutes" Line Location: RETRY+4
Function Call: WRITE	Prompt: !,"Please Standby - Copying Data to ",MESSAGE Line Location: S9+1
Function Call: WRITE	Prompt: *7,!!," The Tape Is WRITE PROTECTED. Please Remove The Tape," Line Location: WRITPROT+0
Function Call: WRITE	Prompt: !," And Re-position The Write Protect/Enable Switch.",!," " Line Location: WRITPROT+1
Function Call: WRITE	Prompt: @%MT("WTM") Line Location: EXIT+1
Function Call: WRITE	Prompt: @%MT("REW") Line Location: EXIT+1
Function Call: WRITE	Prompt: @%MT("REW") Line Location: EXIT+1
Function Call: WRITE	Prompt: @%MT("REW") Line Location: EXIT+1
Function Call: WRITE	Prompt: !!,AUFLG(1),*7 Line Location: EXIT+2
Function Call: WRITE	Prompt: !!,"Remove the tape... Press RETURN when Ready:" Line Location: GOODREW+0
Function Call: WRITE	Prompt: !!,*7,AUFLG(1) Line Location: ERROR+0
Routine Call	%ZIS Line Location: NOSELT
Routine Call	%ZIS Line Location: NOSELT PROCESS

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("MAGTAPE"	PROCESS+1, EXIT+1
^%ZOSF("MTBOT"	EXIT+1
^%ZOSF("MTONLINE"	RETRY+2, RETRY+3
^%ZOSF("MTWPROT"	S9
^%ZOSF("RM"	NOSELT

Name	Line Occurrences
ASK	ASK+2, HELP+2
CART	NOSELT+1
CLOSE	RETRY, EXIT+2
END	ASK+1, PROCESS, RETRY+4
EXIT	S9+1
GOODREW	EXIT+1
HELP	ASK+2
NOSELT	AZGSAVED+2
PROCESS	CART
RETRY	WRITPROT+2
S9	RETRY+3
TAPE	NOSELT+1
WRITPROT	S9

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %MT("REW"	PROCESS+1, EXIT+1
>> %MT("WTM"	EXIT+1
>> AUFLG	ASK+1, PROCESS, RETRY, RETRY+4, S9+1, EXIT+2, ERROR
>> AUFLG(1	ASK+1, PROCESS, RETRY, RETRY+4, EXIT+2, ERROR
>> AUGL	HELP
>> AUIO	NOSELT+1, CART, TAPE, PROCESS
>> AUMED	AZGSAVED+2, ASK*, ASK+1, ASK+2, NOSELT+1
>> AUNAR	HELP
>> AUPAR	PROCESS*
DTIME	ASK, RETRY, GOODREW
>> I	RETRY+3*
IO	NOSELT+1*, PROCESS, PROCESS+1, RETRY+2, RETRY+3, S9, EXIT+1, CLOSE, ERROR
IO(0	PROCESS, PROCESS+1, RETRY+2, RETRY+3, RETRY+4, S9+1, WRITPROT, EXIT+1, EXIT+2, GOODREW , CLOSE, ERROR
IOP	NOSELT!, PROCESS!
>> IOPAR	PROCESS
>> L	EXIT+1*
>> MESSAGE	CART, TAPE, PROCESS, PROCESS+1, S9+1
>> X	NOSELT, RETRY, GOODREW*
>> Y	RETRY+2, RETRY+3, S9, EXIT+1
>> ZA	ERROR*

Customize PDF page

Package: Local Area Programs

Routine: AZGSAVED

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: