Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: DINZMGR1

Package: VA FileMan

Routine: DINZMGR1


Information

DINZMGR1 ;SFISC/MKO-TO SET UP THE MGR ACCOUNT FOR THE SYSTEM ;3:02 PM 1 Oct 1998

Source Information

Source file <DINZMGR1.m>

Entry Points

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

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
  • Variable: X
  • Timeout: 300
  • 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
Info |  Source |  Entry Points |  Interaction Calls