Routine: DINZMGR1

Package	Total	Caller Graph
VA Fileman	1	DINZMGR

Entry Points

Name	Comments	DBIA/ICR reference
OS1
INTRO	;Print introductory text
1	;;M/11;*
3	;;CACHE/OpenM
2	;;M/SQL-PDP;*
5	;;DSM for OpenVMS
4	;;DSM-4;*
7	;;DTM-PC
6	;;MSM
8	;;GT.M(VAX);*
OS	;Prompt for operating system

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!,"HELLO!" Line Location: INTRO+1
Function Call: WRITE	Prompt: !!,"I exist to assist you in correctly initializing the manager account",!,"or to update the current account." Line Location: INTRO+2
Function Call: WRITE	Prompt: !!,"I'm going to do the following:" Line Location: INTRO+3
Function Call: WRITE	Prompt: !!?3,"1. File the routines DIDT, DIDTC, and DIRCR as %DT, %DTC, and",!?7,"%RCR, respectively." Line Location: INTRO+4
Function Call: WRITE	Prompt: !!?3,"2. File the routines DIIS and DIISS as %ZIS and %ZISS, respectively." Line Location: INTRO+5
Function Call: WRITE	Prompt: !!?3,"3. Set nodes in the %ZOSF global. This global contains" Line Location: INTRO+6
Function Call: WRITE	Prompt: !?7,"MUMPS operating system-specific code required by FileMan's" Line Location: INTRO+7
Function Call: WRITE	Prompt: !?7,"screen-oriented utilities." Line Location: INTRO+8
Function Call: WRITE	Prompt: !!,?3,"4. Save a %ZOSV routine (and possibly a %ZOSV1 routine) specific",!?7,"to your MUMPS operating system." Line Location: INTRO+9
Function Call: WRITE	Prompt: !!,"Note that on some MUMPS systems, executing some of the ^%ZOSF nodes" Line Location: INTRO+10
Function Call: WRITE	Prompt: !,"causes ^XUTL global nodes to be set in the production account." Line Location: INTRO+11
Function Call: WRITE	Prompt: !!,"I think you are using "_X1 Line Location: OS+7
Function Call: WRITE	Prompt: !!,"Which MUMPS system are you using?",! Line Location: OS1+0
Function Call: WRITE	Prompt: ! Line Location: OS1+2
Function Call: WRITE	Prompt: ?5,I_" = "_$P(J,";") Line Location: OS1+4
Function Call: WRITE	Prompt: !!?9,"* No longer supported." Line Location: OS1+5
Function Call: READ	Timeout: 300 Variable: X Line Location: OS1+6
Function Call: WRITE	Prompt: !!,"MUMPS System: " Line Location: OS1+6
Function Call: WRITE	Prompt: Y,"// " Condition for execution: Y Line Location: OS1+6
Function Call: WRITE	Prompt: !!?5,"If the MUMPS system you are using is not listed, you cannot use" Line Location: OS1+10
Function Call: WRITE	Prompt: !?5,"this utility. You must manually file DIDT, DIDTC, and DIRCR as" Line Location: OS1+11
Function Call: WRITE	Prompt: !?5,"%DT, %DTC, and %RCR, respectively." Line Location: OS1+12
Function Call: WRITE	Prompt: !!?5,"In addition, if you wish to use FileMan's screen-oriented utilities," Line Location: OS1+13
Function Call: WRITE	Prompt: !?5,"you must file %ZIS and %ZISS routines (you can use DIIS and DIISS" Line Location: OS1+14
Function Call: WRITE	Prompt: !?5,"as starting points), and you must set the %ZOSF nodes manually." Line Location: OS1+15
Function Call: WRITE	Prompt: !?5,"Please refer the VA FileMan Programmer Manual for more information." Line Location: OS1+16
Function Call: WRITE	Prompt: !!?5,$C(7)_"Invalid response. Enter a number between 1 and 9." Line Location: OS1+20
Function Call: WRITE	Prompt: !!?5,$C(7)_$P(J,";")_" is no longer supported." Line Location: OS1+22

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DIOS	OS1+24*
>> DIQUIT	OS1+7*
I	OS+1~, OS1+1*, OS1+4
J	OS+1~, OS1+1, OS1+3, OS1+4, OS1+18, OS1+21, OS1+22
U	OS+4, OS1+7
>> X	OS1+6*, OS1+7, OS1+9, OS1+24
>> X1	OS+4, OS+6, OS+7
>> Y	OS+2, OS+4, OS+6, OS+8, OS1+6

Name	Field # of Occurrence
$T(@I	OS1+1
$T(@X	OS1+18, OS1+19

Customize PDF page

Package: VA Fileman

Routine: DINZMGR1

Information

Source Information

Caller Graph

Caller Graph Total: 1

Entry Points

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items