Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ZTMGRSET

Package: Kernel

Routine: ZTMGRSET


Information

ZTMGRSET ;SF/RWF,PUG/TOAD - SET UP THE MGR ACCOUNT FOR THE SYSTEM ;02/13/2008

Source Information

Source file <ZTMGRSET.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 2 $$VERSION^%ZOSV  (BMES,MES)^XPDUTL  
Toolkit 1 ^ZTEDIT  

Caller Graph

Caller Graph Total: 22

Package Total Caller Graph
Kernel 17 %ZTPP  XU8P1017  XU8P1018  XU8P440  XU8P446  XU8P499  XU8P518  XU8P524  
XU8P543  XU8P546  XU8P572  XU8P582  XU8P584  XU8P585  XU8P599  XU8P638  
ZTP1  
VA Fileman 3 DIPR162  DIPR164  DIPR165  
IHS VA %Utilities 1 ZIBENVCK  
Toolkit 1 XTERSUM1  

Entry Points

Name Comments DBIA/ICR reference
DES
MOVE ; rename % routines
  • ICR #6212
    • Status: Active
    • Usage: Private
    DEV
    MES(T,B) ;Write message.
    FM ;Rename the FileMan routines
    R() ; routine directory for GT.M
    MGR
    COPY(FROM,TO) ;
    1 ;;VAX DSM(V6), VAX DSM(V7)
    3 ;;Cache (VMS, NT, Linux), OpenM-NT
    TM ;Taskman
    5 ;;
    4 ;;
    7 ;;GT.M (VMS)
    6 ;;
    8 ;;GT.M (Unix)
    GLOBALS ;Set node zero of file #3.05 & #3.07
    A
    B
    10 ;;NOT SUPPORTED
    ETRAP ;Error Trap
    OSNUM() ;Return the OS number
    OTHER
    2 ;;MSM-PC/PLUS, MSM for NT or UNIX
    OS() ;Select the OS
    DOIT
    ALL
    NAME ;Setup the static names for this system
    RUM ;Build the routines for Capacity Management (CM)
    VOL
    RELOAD ;Reload any patched routines
    PATCH(PCNM) ;Post install Reload any patched routines
    PROD
    ZOSF(X) ;

    External References

    Name Field # of Occurrence
    $$VERSION^%ZOSV 2+6
    BMES^XPDUTL MES+2
    MES^XPDUTL MES+2
    ^ZTEDIT ALL+6

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,"ZTMGRSET Version ",$P($T(+2),";",3)," Patch level ",$P($T(+2),";",5)
    • Line Location: A+0
    Function Call: WRITE
    • Prompt: !,"HELLO! I exist to assist you in correctly initializing the current account."
    • Line Location: A+1
    Function Call: WRITE
    • Prompt: $C(7),!!,"This is namespace or uci ",Y,".",!
    • Line Location: A+4
    Function Call: WRITE
    • Prompt: !,"OS type not selected. Exiting ZTMGRSET."
    • Line Location: A+7
    Function Call: WRITE
    • Prompt: !,"Need a Patch number to load."
    • Line Location: A+8
    Function Call: READ
    • Prompt: "Patch number to load: "
    • Formatting: !!
    • Timeout: 120
    • Variable: PCNM
    • Line Location: A+9
    Function Call: WRITE
    • Prompt: !
    • Condition for execution: B
    • Line Location: MES+3
    Function Call: WRITE
    • Prompt: !,T
    • Line Location: MES+3
    Function Call: WRITE
    • Prompt: !,"I think you are using ",X1
    • Line Location: B+1
    Function Call: WRITE
    • Prompt: !,"Which MUMPS system should I install?",!
    • Line Location: B+3
    Function Call: WRITE
    • Prompt: !,I," = ",$P($T(@I),";",3)
    • Line Location: B+4
    Function Call: WRITE
    • Prompt: !,"System: "
    • Line Location: B+5
    Function Call: WRITE
    • Prompt: ZTOS,"//"
    • Condition for execution: ZTOS
    • Line Location: B+5
    Function Call: READ
    • Timeout: 300
    • Variable: X
    • Line Location: B+6
    Function Call: WRITE
    • Prompt: !,"NOT A VALID CHOICE"
    • Line Location: B+7
    Function Call: WRITE
    • Prompt: !!,"Now to load routines common to all systems."
    • Line Location: ALL+0
    Function Call: WRITE
    • Prompt: !,"Installing ^%Z editor"
    • Line Location: ALL+5
    Function Call: WRITE
    • Prompt: !,"Setting ^%ZIS('C')"
    • Line Location: ALL+7
    Function Call: READ
    • Prompt: "Want to rename the FileMan routines: No//"
    • Formatting: !
    • Timeout: 600
    • Variable: X
    • Line Location: FM+2
    Function Call: WRITE
    • Prompt: !
    • Line Location: ZOSF+1
    Function Call: WRITE
    • Prompt: !
    • Line Location: ZOSF+1
    Function Call: WRITE
    • Prompt: !,"- Use autostart to do ZTMB don't resave as STUSER."
    • Line Location: 2+1
    Function Call: WRITE
    • Prompt: !!,"Now, I will check your % globals."
    • Line Location: GLOBALS+1
    Function Call: WRITE
    • Prompt: ".........."
    • Line Location: GLOBALS+2
    Function Call: READ
    • Timeout: $S($G(DTIME):DTIME,1:9999)
    • Variable: X
    • Line Location: MGR+0
    Function Call: WRITE
    • Prompt: !,"NAME OF MANAGER'S UCI,VOLUME SET: "_^%ZOSF("MGR")_"// "
    • Line Location: MGR+0
    Function Call: READ
    • Timeout: $S($G(DTIME):DTIME,1:9999)
    • Variable: X
    • Line Location: PROD+0
    Function Call: WRITE
    • Prompt: !,"PRODUCTION (SIGN-ON) UCI,VOLUME SET: "_^%ZOSF("PROD")_"// "
    • Line Location: PROD+0
    Function Call: READ
    • Timeout: $S($G(DTIME):DTIME,1:9999)
    • Variable: X
    • Line Location: VOL+0
    Function Call: WRITE
    • Prompt: "MUST BE 3 Upper case."
    • Line Location: VOL+0
    Function Call: WRITE
    • Prompt: !
    • Line Location: VOL+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZE ALL+3*
    ^%ZIS("C" ALL+7!*
    ^%ZOSF("MASTER" A+12!
    ^%ZOSF("MGR" MGR*
    ^%ZOSF("OS" B, B+1, OSNUM+1
    ^%ZOSF("PROD" PROD*
    ^%ZOSF("UCI" A+2
    ^%ZOSF("VOL" VOL*
    ^%ZTSCH( GLOBALS+4*
    ^%ZTSK - [#14.4] GLOBALS+4*, GLOBALS+5, GLOBALS+6*
    ^%ZTSK(0 GLOBALS+4, GLOBALS+5, GLOBALS+6*
    ^%ZUA(3.05 - [#3.05] GLOBALS+7*
    ^%ZUA(3.07 - [#3.07] GLOBALS+8*

    Label References

    Name Line Occurrences
    $$OS A+7
    $$OSNUM B+1
    $$R COPY+3
    @( DOIT+1, ZOSF+1
    A A+2, RELOAD+2, PATCH+4
    ALL DOIT+1
    B B+7
    COPY MOVE+10
    DES 1+2, 2+3, 3+2, 7+3, 8+3
    DEV ALL+1
    ETRAP ALL+1
    FM ALL+1
    GLOBALS DOIT+1
    MES DOIT, DOIT+1, PATCH+2, PATCH+3, MOVE+2
    MGR MGR
    MOVE TM+3, TM+6, TM+9, FM+4, ETRAP+2, OTHER+2, DEV+2, RUM+7, 1+2, 1+4
    , 2+3, 2+5, 2+6, 3+2, 3+4, 7+3, 7+5, 8+3, 8+5
    OTHER ALL+1
    PROD PROD
    RUM 1+4, 2+5, 3+4
    TM ALL+1
    VOL VOL
    ZOSF 1+4, 2+5, 3+4, 7+5, 8+5

    Naked Globals

    Name Field # of Occurrence
    ^("SIGNOFF" A+12!
    ^("UCICHECK" MGR, PROD

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % MOVE+1~, MOVE+2*, MOVE+3, MOVE+4, GLOBALS+3*
    %D ZTMGRSET+4~, RELOAD+1~, PATCH+1~, TM+2*, TM+5*, TM+8*, FM+3*, ETRAP+1*, OTHER+1*, DEV+1*
    , RUM+6*, 1+3*, 2+4*, 2+6*, 3+3*, 7+4*, 8+4*, MOVE+2, MOVE+4, DES*
    %S ZTMGRSET+4~, RELOAD+1~, PATCH+1~, TM+1*, TM+4*, TM+7*, FM+3*, ETRAP+1*, OTHER*, DEV*
    , RUM+1*, RUM+2*, RUM+3*, RUM+4*, RUM+5*, 1+1*, 1+3*, 2+2*, 2+4*, 2+6*
    , 3+1*, 3+3*, 7+2*, 7+4*, 8+2*, 8+4*, MOVE+3
    >> %ZE 7+1*, 8+1*
    B MES~, MES+1*, MES+2, MES+3
    CMD COPY+3~, COPY+7*
    COPY COPY+3~, COPY+6*, COPY+7
    DTIME MGR, PROD, VOL
    FROM COPY~, COPY+4*, COPY+7
    I ZTMGRSET+4~, RELOAD+1~, PATCH+1~, OS+2*, B+4*, OSNUM+1~, OSNUM+2*
    M MOVE+1~, MOVE+2, MOVE+3*, MOVE+6*, MOVE+7*, MOVE+9*, MOVE+11*
    OSMAX ZTMGRSET+4~, RELOAD+1~, PATCH+1~, OS+1~, OS+2*, B+4, B+7
    PATH COPY+3~*, COPY+4, COPY+5
    PCNM A+8, A+9*, A+10, PATCH~, PATCH+2, PATCH+3
    SCR ZTMGRSET+4~, A+10*, RELOAD+1~, PATCH+1~, OS+2*, ZOSF+1, MOVE+8
    T MES~, MES+2, MES+3
    TO COPY~, COPY+5*, COPY+7
    U ZTMGRSET+4~, RELOAD+1~, PATCH+1~, OS+2*, B+1, B+7, ZOSF+1, MOVE+3, MOVE+4
    X ZTMGRSET+4~, A+2, A+3*, A+5*, RELOAD+1~, PATCH+1~, OS+1~, OS+2*, B+6*, B+7
    , B+8, FM+2*, ZOSF~, ZOSF+1, MOVE+1~, MOVE+3*, MOVE+5, MOVE+6, MOVE+10, MGR*
    , PROD*, VOL*
    X1 ZTMGRSET+4~, RELOAD+1~, PATCH+1~, OS+1~, B+1*, OSNUM+1~*, OSNUM+2
    X2 ZTMGRSET+4~, RELOAD+1~, PATCH+1~, OSNUM+1~, OSNUM+2*
    Y ZTMGRSET+4~, A+4, RELOAD+1~, PATCH+1~, OS+1~, B*, OSNUM+1~*, OSNUM+2*, OSNUM+3, MOVE+1~
    , MOVE+4*, MOVE+7, MOVE+10, MOVE+11, MGR, PROD
    Z1 ZTMGRSET+4~, RELOAD+1~, PATCH+1~, GLOBALS+5*, GLOBALS+6
    Z2 ZTMGRSET+4~, RELOAD+1~, PATCH+1~, GLOBALS+5*, GLOBALS+6
    ZRO R+1~, R+2, R+3*, R+4*, R+5*, R+6
    ZTMODE ZTMGRSET+4~, ZTMGRSET+5*, A+3, A+8, A+9, DOIT+1, RELOAD+1~, RELOAD+2*, PATCH+1~, PATCH+4*
    , B+2, ALL+7, FM+1
    ZTOS ZTMGRSET+4~, A+7*, DOIT+1, RELOAD+1~, PATCH+1~, B*, B+1*, B+2, B+5, B+6
    , ALL+2, RUM+2, RUM+3, RUM+4, RUM+5, COPY+1, COPY+6, R+2, R+6

    Marked Items

    Name Field # of Occurrence
    $T( A
    $T(@I OS+2, B+4, OSNUM+2
    $T(@X B+7
    $T(BMES^XPDUTL MES+2
    $T(^@X MOVE+7
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All