· 6 years ago · Nov 06, 2019, 07:16 PM
1$ mumps/direct
2%GTM-I-BREAK, Break instruction encountered
3 At M source location +1^GTM$DMOD
4GTM>K ^%ZOSF
5
6GTM>D ^ZTMGRSET
7
8
9ZTMGRSET Version 8.0 Patch level **34,36,69,94,121,127,136,191,275,355,446**
10HELLO! I exist to assist you in correctly initializing the current account.
11Which MUMPS system should I install?
12
131 = VAX DSM(V6), VAX DSM(V7)
142 = MSM-PC/PLUS, MSM for NT or UNIX
153 = Cache (VMS, NT, Linux), OpenM-NT
164 = Datatree, DTM-PC, DT-MAX
175 =
186 =
197 = GT.M (VMS)
208 = GT.M (Unix)
21System: 7
22
23I will now rename a group of routines specific to your operating system.
24Routine: ZOSVGTM Loaded, Saved as %ZOSV
25
26Routine: ZIS4GTM Loaded, Saved as %ZIS4
27Routine: ZISFGTM Loaded, Saved as %ZISF
28Routine: ZISHGTM Loaded, Saved as %ZISH
29Routine: XUCIGTM Loaded, Saved as %XUCI
30Routine: ZOSV2GTM Loaded, Saved as %ZOSV2
31 O NIO:(:SOCK:"AT"::512:512:10):30 Q:'$T S POP=0 U NIO
32 ^-----
33 At column 9, line 25, source module DKA0:[VISTA.R]ZISTCPS.M;
34%GTM-E-DEVPARUNK, Deviceparameter unknown
35 J CHILDONT^%ZISTCPS(NIO,RTN):(:16::):10 S %ZA=$ZA
36 ^-----
37 At column 32, line 30, source module DKA0:[VISTA.R]ZISTCPS.M;
38%GTM-E-JOBPARUNK, Job parameter unknown
39 S $ETRAP="D ^%ZTER L HALT",IO=$ZU(53)
40 ^-----
41 At column 34, line 35, source module DKA0:[VISTA.R]ZISTCPS.M;
42%GTM-E-INVFCN, Invalid function name
43 U IO:(::"-M") ;Work like DSM
44 ^-----
45 At column 8, line 36, source module DKA0:[VISTA.R]ZISTCPS.M;
46%GTM-E-DEVPARUNK, Deviceparameter unknown
47Routine: ZISTCPS Loaded, Saved as %ZISTCPS
48Routine: ZTMDCL Loaded, Saved as ZTMDCL
49
50NAME OF MANAGER'S UCI,VOLUME SET: VAH,ROU//
51The value of PRODUCTION will be used in the GETENV api.
52PRODUCTION (SIGN-ON) UCI,VOLUME SET: VAH,ROU//
53The VOLUME name must match the one in PRODUCTION.
54NAME OF VOLUME SET: ROU//
55^%ZOSF setup
56
57
58Now to load routines common to all systems.
59Routine: ZTLOAD Loaded, Saved as %ZTLOAD
60Routine: ZTLOAD1 Loaded, Saved as %ZTLOAD1
61Routine: ZTLOAD2 Loaded, Saved as %ZTLOAD2
62Routine: ZTLOAD3 Loaded, Saved as %ZTLOAD3
63Routine: ZTLOAD4 Loaded, Saved as %ZTLOAD4
64Routine: ZTLOAD5 Loaded, Saved as %ZTLOAD5
65Routine: ZTLOAD6 Loaded, Saved as %ZTLOAD6
66Routine: ZTLOAD7 Loaded, Saved as %ZTLOAD7
67Routine: ZTM Loaded, Saved as %ZTM
68Routine: ZTM0 Loaded, Saved as %ZTM0
69Routine: ZTM1 Loaded, Saved as %ZTM1
70Routine: ZTM2 Loaded, Saved as %ZTM2
71Routine: ZTM3 Loaded, Saved as %ZTM3
72Routine: ZTM4 Loaded, Saved as %ZTM4
73Routine: ZTM5 Loaded, Saved as %ZTM5
74Routine: ZTM6 Loaded, Saved as %ZTM6
75Routine: ZTMS Loaded, Saved as %ZTMS
76Routine: ZTMS0 Loaded, Saved as %ZTMS0
77Routine: ZTMS1 Loaded, Saved as %ZTMS1
78Routine: ZTMS2 Loaded, Saved as %ZTMS2
79Routine: ZTMS3 Loaded, Saved as %ZTMS3
80Routine: ZTMS4 Loaded, Saved as %ZTMS4
81Routine: ZTMS5 Loaded, Saved as %ZTMS5
82Routine: ZTMS7 Loaded, Saved as %ZTMS7
83Routine: ZTMSH Loaded, Saved as %ZTMSH
84 . D SAVE("$ZU(56,2)",$ZU(56,2))
85 ^-----
86 At column 24, line 32, source module DKA0:[VISTA.R]ZTER.M;
87%GTM-E-INVFCN, Invalid function name
88Routine: ZTER Loaded, Saved as %ZTER
89 S @%ZTERRT@("ZH")=$TR($ZH,",","^")
90 ^-----
91 At column 25, line 5, source module DKA0:[VISTA.R]ZTER1.M;
92%GTM-E-INVSVN, Invalid special variable name
93 S %ZTER111="%" F D S %ZTER111=$ZSORT(@%ZTER111) Q:%ZTER111="" ;Code
94from DEC
95 ^-----
96 At column 35, line 6, source module DKA0:[VISTA.R]ZTER1.M;
97%GTM-E-INVFCN, Invalid function name
98Routine: ZTER1 Loaded, Saved as %ZTER1
99Routine: ZIS Loaded, Saved as %ZIS
100Routine: ZIS1 Loaded, Saved as %ZIS1
101Routine: ZIS2 Loaded, Saved as %ZIS2
102Routine: ZIS3 Loaded, Saved as %ZIS3
103Routine: ZIS5 Loaded, Saved as %ZIS5
104Routine: ZIS6 Loaded, Saved as %ZIS6
105Routine: ZIS7 Loaded, Saved as %ZIS7
106Routine: ZISC Loaded, Saved as %ZISC
107Routine: ZISP Loaded, Saved as %ZISP
108Routine: ZISS Loaded, Saved as %ZISS
109Routine: ZISS1 Loaded, Saved as %ZISS1
110Routine: ZISS2 Loaded, Saved as %ZISS2
111 O NIO:(TCPCHAN,ADDRESS=IP):TO G:'$T NOOPN
112 ^-----
113 At column 9, line 18, source module DKA0:[VISTA.R]ZISTCP.M;
114%GTM-E-DEVPARUNK, Deviceparameter unknown
115 U NIO::"TCP" W /SOCKET(IP,SOCK) I $KEY="" C NIO G NOOPN
116 ^-----
117 At column 8, line 23, source module DKA0:[VISTA.R]ZISTCP.M;
118%GTM-E-DEVPARUNK, Deviceparameter unknown
119 I $$VERSION^%ZOSV'<5 S %A=$ZUTIL(68,55,1)
120 ^-----
121 At column 29, line 27, source module DKA0:[VISTA.R]ZISTCP.M;
122%GTM-E-INVFCN, Invalid function name
123 O NIO:(IP:SOCK:"-M"::512:512):TO G:'$T NOOPN ;Make work like DSM
124 ^-----
125 At column 9, line 29, source module DKA0:[VISTA.R]ZISTCP.M;
126%GTM-E-DEVPARUNK, Deviceparameter unknown
127 I %ZISOS["DSM",%ZISV'<7 S NIO="SYS$NET" O NIO:(TCPDEV):5 D:$T VAR(NIO)
128 ^-----
129 At column 49, line 63, source module DKA0:[VISTA.R]ZISTCP.M;
130%GTM-E-DEVPARUNK, Deviceparameter unknown
131 U NIO::"TCP" W /SOCKET("",SOCK)
132 ^-----
133 At column 8, line 102, source module DKA0:[VISTA.R]ZISTCP.M;
134%GTM-E-DEVPARUNK, Deviceparameter unknown
135 O NIO:(:SOCK:"AT"::512:512:3):30 Q:'$T S POP=0
136 ^-----
137 At column 9, line 110, source module DKA0:[VISTA.R]ZISTCP.M;
138%GTM-E-DEVPARUNK, Deviceparameter unknown
139 U NIO:(::"-M") ;Work like DSM
140 ^-----
141 At column 9, line 116, source module DKA0:[VISTA.R]ZISTCP.M;
142%GTM-E-DEVPARUNK, Deviceparameter unknown
143 S NIO=SOCK O NIO:(TCPCHAN):30 Q:'$T S POP=0
144 ^-----
145 At column 20, line 121, source module DKA0:[VISTA.R]ZISTCP.M;
146%GTM-E-DEVPARUNK, Deviceparameter unknown
147Routine: ZISTCP Loaded, Saved as %ZISTCP
148Routine: ZISUTL Loaded, Saved as %ZISUTL
149Routine: ZTPP Loaded, Saved as %ZTPP
150Routine: ZTP1 Loaded, Saved as %ZTP1
151Routine: ZTPTCH Loaded, Saved as %ZTPTCH
152Routine: ZTRDEL Loaded, Saved as %ZTRDEL
153Routine: ZTMOVE Loaded, Saved as %ZTMOVE
154Want to rename the FileMan routines: No//y
155Routine: DIDT Loaded, Saved as %DT
156Routine: DIDTC Loaded, Saved as %DTC
157Routine: DIRCR Loaded, Saved as %RCR
158Setting ^%ZIS('C')
159
160Now, I will check your % globals...........
161
162ALL DONE
163GTM>D ^DINIT
164
165
166VA FileMan V.22.0
167
168
169Initialize VA FileMan now? NO//