Chapter 6
Validation Contents of MVTS V. 9.10 Part-94
July 15, 1996
Copyright: MUMPS Systems Laboratory
Validation Test Suite Version 9.10 Part-94
The last test ID number for Part-94 is IV-923
6.1 Contents of Routines in the Order of Execution for VV4 Series
Routine No. Routine Name Title
================================================================================
0-------- VV4 ------- Main Driver Part-94
V1 ------- Restarter of tests from the stopping points
1-------- V4SORT1 ----- Sort After operator -1-
2-------- V4SORT2 -----Sort After operator -2-
3-------- V4SORT3 -----Sort After operator -3-
4-------- V4SORT4 ----- Sort After operator -4-
5-------- V4SORT5 ----- Sort After operator -5-
6------- V4SORT6 ----- Sort After operator -6-
7------- V4SORT7 -----Sort After operator -7-
8------- V4SORT8 ---- Sort After operator -8-
9 ------ V4SORT9 ---- Sort After operator -9-
10------ V4SORT10 ----Sort After operator -10-
11------ V4FN21 --- $FNUMBER function -1-
12------- V4FN22 ---- $FNUMBER function -2-
13------ V4FN23 --- $FNUMBER function -3-
14------ V4FN24 ----- $FNUMBER function -4-
15------ V4FN25 --- $FNUMBER function -5-
16------ V4FN31 --- $FNUMBER function -6-
17------- V4FN32 ---- $FNUMBER function -7-
18------ V4FN33 ---- $FNUMBER function -8-
19------ V4REV1 --- $REVERSE function -1-
20------ V4REV2 --- $REVERSE function -2-
21------ V4REV3 --- $REVERSE function -3-
22------ V4REV4 --- $REVERSE function -4-
23--- --- V4GET21 --- $GET function -1-
24--- --- V4GET22 --- $GET function -2-
25--- --- V4GET23 --- $GET function -3-
26------ V4GET24 --- $GET function -4-
27------ V4GET25 --- $GET function -5-
28------ V4GET26 --- $GET function -6-
29------ V4GET27 --- $GET function -7-
30------ V4GET28 --- $GET function -8-
31--- --- V4GET29 --- $GET function -9-
32------ V4NAME11 --- $NAME function -1-
33------ V4NAME12 --- $NAME function -2-
34------ V4NAME13 --- $NAME function -3-
35------ V4NAME14 --- $NAME function -4-
36------ V4NAME15 --- $NAME function -5-
37------ V4NAME16 --- $NAME function -6-
38 --- --- V4NAME17 --- $NAME function -7-
39------ V4NAME18 --- $NAME function -8-
40------ V4NAME21 --- $NAME function -9-
41------ V4NAME22 --- $NAME function -10-
42------ V4NAME23 --- $NAME function -11-
43------ V4NAME24 --- $NAME function -12-
44------ V4NAME25 --- $NAME function -13-
45------ V4NAME26 --- $NAME function -14-
46------ V4QLEN1 --- -- $QLENGTH function -1-
47------ V4QLEN2 --- $QLENGTH function -2-
48------ V4QLEN3 --- $QLENGTH function -3-
49------ V4QLEN4 --- $QLENGTH function -4-
50------ V4QLEN5 --- $QLENGTH function -5-
51------ V4QLEN6 --- $QLENGTH function -6-
52------ V4QLEN7 --- $QLENGTH function -7-
53------ V4QLEN8 --- -- $QLENGTH function -8-
54------ V4QSUB1 --- $QSUBSCRIPT function -1-
55------ V4QSUB2 --- $QSUBSCRIPT function -2-
56------ V4QSUB3 --- $QSUBSCRIPT function - 3-
57------ V4QSUB4 --- $QSUBSCRIPT function -4-
58------ V4QSUB5 --- $QSUBSCRIPT function -5-
59------ V4QSUB6 --- $QSUBSCRIPT function -6-
60------ V4QSUB7 --- $QSUBSCRIPT function -7-
61------ V4QSUB8 --- $QSUBSCRIPT function -8-
62------ V4QSUB9 --- $QSUBSCRIPT function -9-
63------ V4QSUB10 --- $QSUBSCRIPT function -10-
64------ V4QSUB11 --- $QSUBSCRIPT function -11-
65------ V4QSUB12 --- $QSUBSCRIPT function -12-
66------ V4QSUB13 --- $QSUBSCRIPT function -13-
67------ V4QSUB14 --- $QSUBSCRIPT function -14-
68------ V4QSUB15 --- $QSUBSCRIPT function -15-
69------ V4SVQ1 --- Special variable $QUIT -1-
70------ V4SVQ2 --- Special variable $QUIT -2-
71------ V4SVQ3 --- Special variable $QUIT -3-
72------ V4SVQ4 --- Special variable $QUIT -4-
73------ V4SVQ5 --- Special variable $QUIT -5-
74------ V4SVQ6 --- Special variable $QUIT -6-
75------ V4MERGE1 --- MERGE Command -1-
76------ V4MERGE2 --- MERGE Command -2-
77------ V4MERGE3 --- MERGE Command -3-
78------ V4MERGE4 --- MERGE Command -4-
79------
80------ V4MERGE6 --- MERGE Command -6-
81------ V4MERGE7 --- MERGE Command -7-
82------ V4MERGE8 --- MERGE Command -8-
83------ V4MERGE9 --- MERGE Command -9-
84--- --- V4MERGEA --- MERGE Command -A-
85------ V4MERGEB --- MERGE Command -B-
86------ V4MERGEC --- MERGE Command -C-
87------ V4MERGED --- MERGE Command -D-
88--- --- V4MERGEE --- MERGE Command -E-
89------ V4MERGEF --- MERGE Command -F-
90------ V4MERGEG --- MERGE Command -G-
91------ V4MERGEH --- MERGE Command -H-
92------ V4MERGEI --- MERGE Command -I-
93------ V4READ1 --- READ Command -1-
94------ V4READ2 --- READ Command -2-
95--- --- V4READ3 --- READ Command -3-
96 ------ V4READ4 --- READ Command -4-
97------ V4KEY --- Special variable $KEY
98------ V4SYSTEM --- Special variable $SYSTEM
99------ V4POW1 --- power operator (A**P) -1-
100------ V4POW2 --- power operator (A**P) -2-
101------ V4POW3 --- power operator (A**P) -3-
102------ V4POW4 --- power operator (A**P) -4-
103---
--- V4POW5 --- power operator (A**P) -5-104------ V4POW6
- -- power operator (A**P) -6-105------ V4POW7 --- power operator (A**P) -7-
106------ V4POW8 --- power operator (A**P) -8-
107------ V4RAND --- $RANDOM function
108------ V4ORD21 --- $ORDER(glvn,expr) -1-
109------ V4ORD22
--- $ORDER(glvn,expr) -2-110------ V4ORD23 --- $ORDER(glvn,expr) -3-
111------ V4ORD24 --- $ORDER(glvn,expr) -4-
112------ V4ORD25 --- $ORDER(glvn,expr) -5-
113------ V4ORD26 --- $ORDER(glvn,expr) -6-
114------ V4ORD27 --- $ORDER(glvn,expr) -7-
115------ V4ORD28 --- $ORDER(glvn,expr) -8-
116------ V4ORD29 --- $ORDER(glvn,expr) -9-
117------ V4ORD2A --- $ORDER(glvn,expr) -10-
118------ V4QUERY --- Tests of $QUERY function (1994 change)
119------ V4PRIN --- $PRINCIPAL special variable name
120------ V4QUIT --- QUIT @expratom
121------ V4MAX1 --- Maximum range -1-
122------ V4MAX2 --- Maximum range -2-
123------ V4SSUB1 --- String subscript -1-
124------ V4SSUB2 --- String subscript -2-
125------ V4JOB --- JOB command with parameter
126------ V4PAT1 --- pattern match operator -1-
127------ V4PAT2 --- pattern match operator -2-
128------ V4PAT3 --- pattern match operator -3-
129------ V4PAT4 --- pattern match operator -4-
130------ V4PAT5 --- pattern match operator -5-
131------ V4PAT6 --- pattern match operator -6-
132------ V4PAT7 --- pattern match operator -7-
133------ V4PAT8 --- pattern match operator -8-
134------ V4PAT9 --- pattern match operator -9-
135------ V4NST1 --- Nesting ( FOR, XECUTE, DO ) -1-
136------ V4NST2 --- Nesting ( FOR, XECUTE, DO ) -2-
137------ V4NST3 --- Nesting ( FOR, XECUTE, DO ) -3-
138------ V4NST4 --- Nesting ( FOR, XECUTE, DO ) -4-
139------ V4NST5 --- Nesting ( FOR, XECUTE, DO ) -5-
140------ V4NST6 --- Nesting ( FOR, XECUTE, DO ) -6-
141--- --- V4MDC ---
Tests of MDC Interpretations================================================================================
6.2 Session titles
Routine Number --- Routine Name
Section titles, with or without ID# and propositions
Test Serial No., Test ID#(.child tests .grandchild tests), and proposition
================================================================================
Tests of Sort After operator A]]B
1---V4SORT1: Sort After operator -1-
A is a number
B is a number
40001 IV-1 "-999999999"]]"-1E20"
40002 IV-2 "-10"]]"-10.001"
40003 IV-3 "-1.2"]]"1.2"
40004 IV-4 "-1.11"]]"-.0002"
40005 IV-5 "-1.1"]]+"20E-20"
40006 IV-6 "-.5"]]0.5
40007 IV-7 "0"]]0000000
2---V4SORT2: Sort After operator -2-
40008 IV-8 ".5"]]-5
40009 IV-9 "1.1"]]954.8598
40010 IV-10 "20"]]-129E-4
40011 IV-11 "999999999"]]9999E+20
B is a string
40012 IV-12 "-999999999"]]"-999999.99990000"
40013 IV-13 "-10"]]"-E2"
40014 IV-14 "-1.2"]]"++++023.34E*2"
40015 IV-15 "-1.11"]]"=123"
40016 IV-16 "-1.1"]]"92920920-2929"
3---V4SORT3: Sort After operator -3-
40017 IV-17 "-.5"]]"-0.5"
40018 IV-18 "0"]]"00"
40019 IV-19 ".5"]]"00000.500"
40020 IV-20 "1.1"]]"01.1"
40021 IV-21 "20"]]"20 "
A is a string
B is a number
40022 IV-22 "#"]]1
40023 IV-23 "%"]]0
40024 IV-24 "+4"]]-9999999
40025 IV-25 "-"]]-00000000000000565
4---V4SORT4: Sort After operator -4-
40026 IV-26 "--1"]]898
40027 IV-27 "-."]]10000
40028 IV-28 "-.0"]]+"0.-"
40029 IV-29 "-0"]]-000.0000765
40030 IV-30 "-4."]]84398E-10
40031 IV-31 "-4.0"]]-999999999999999
40032 IV-32 "."]]0.000001E-10
40033 IV-33 ".0"]]-0.000001E-10
40034 IV-34 ".00"]]999999999999999
5---V4SORT5: Sort After operator -5-
40035 IV-35 "0.0"]]-84456565.5545
40036 IV-36 "0.1"]]4384329328E8
40037 IV-37 "00"]]0000000000000000000000000000
40038 IV-38 "01"]]01
40039 IV-39 "1."]]1000.0000000000000E-3
40040 IV-40 "1.0"]]9e-6
40041 IV-41 "1.1.2"]]-100789.899E+9
40042 IV-42 "123e1"]]0E-0
40043 IV-43 "A"]]000000000.9999999999E+9
6---V4SORT6: Sort After operator -6-
40044 IV-44 "AA"]]-0.002
40045 IV-45 "AB"]].00333
40046 IV-46 "a"]]+568
40047 IV-47 "aa"]]9
40048 IV-48 "ab"]]+"ab"
B is a string
40049 IV-49 "#"]]"#1"
40050 IV-50 "%"]]"% "
40051 IV-51 "+4"]]" -9999999"
40052 IV-52 "-"]]"+"
40053 IV-53 "--1"]]"8-98"
7---V4SORT7: Sort After operator -7-
40054 IV-54 "-."]]"10e000"
40055 IV-55 "-.0"]]"0.-"
40056 IV-56 "-0"]]"-000.0000765"
40057 IV-57 "-4."]]"84398E-10"
40058 IV-58 "-4.0"]]" "
40059 IV-59 "."]]"-"
40060 IV-60 ".0"]]".10"
40061 IV-61 ".00"]]"-00"
40062 IV-62 "0.0"]]"0/0"
8---V4SORT8: Sort After operator -8-
40063 IV-63 "0.1"]]"0-0"
40064 IV-64 "00"]]"01"
40065 IV-65 "01"]]"00"
40066 IV-66 "1."]]"1-"
40067 IV-67 "1.0"]]"1.."
40068 IV-68 "1.1.2"]]"1.1.1"
40069 IV-69 "123E1"]]"123E+1"
40070 IV-70 "A"]]"@"
40071 IV-71 "AA"]]"AB"
9---V4SORT9: Sort After operator -9-
40072 IV-72 "AB"]]"AA"
40073 IV-73 "a"]]"_"
40074 IV-74 "aa"]]"["
40075 IV-75 "ab"]]"]]"
10---V4SORT10: Sort After operator -10-
40076 IV-76 A is a lvn
40077 IV-77 B is a lvn
40078 IV-78 A is a gvn
40079 IV-79 B is a gvn
40080 IV-80 A is a function
40081 IV-81 B is a function
40082 IV-82 A contains unary operator
40083 IV-83 B contains unary operator
40084 IV-84 A contains indirections
40085 IV-85 B contains indirections
40086 IV-86 A is an expr
40087 IV-87 B is an expr
Tests of $FNUMBER function
11---V4FN21: $FNUMBER function -1-
$FNUMBER(numexpr,fncodexpr)
fncodexpr is an empty string
40088 IV-88 $FNUMBER(09878979.78E-2,"")
(This test IV-88 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
40089 IV-89 $FN(0000.00000951200000,"")
(This test IV-89 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
40090 IV-90 $FN(-0000.00000951200000,"")
(This test IV-90 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
40091 IV-91 $FN(603.450000000E+4,"")
(This test IV-91 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
40092 IV-92 $FN(-00020000.00000,"")
(This test IV-92 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
12---V4FN22: $FNUMBER function -2-
fncodt="t"
40093 IV-93 $FN(-00,"t")
40094 IV-94 $FN(1,"t")
40095 IV-95 $FN(-1,"t")
40096 IV-96 $FN(0020.00000,"t")
40097 IV-97 $FN(31267,"t")
40098 IV-98 $FN(000000000000000000000000262999219,"t")
40099 IV-99 $FN(-000000000000000000000000262999219,"t")
40100 IV-100 $fn(123456789,"t")
40101 IV-101 $FN(31267,"t,")
40102 IV-102 $FN(-31267,"t,")
13---V4FN23: $FNUMBER function -3-
40103 IV-103 $FN(1E25,"t,")
40104 IV-104 $FN(-1E25,"t,")
40105 IV-105 $FN(-981000000000,",t")
40106 IV-106 $FN(31267,"t+")
40107 IV-107 $FN(981000000000,"t+")
40108 IV-108 $FN(-000000000000000000000000262999219,"+t")
40109 IV-109 $FN(-00020.00000,"t-")
40110 IV-110 $FN(981000000000,"t-")
40111 IV-111 $FN(00670.00789200,"-t")
40112 IV-112 $FN(1E25,"t,+")
40113 IV-113 $FN(-1E25,"t,+")
14---V4FN24: $FNUMBER function -4-
40114 IV-114 $FN(31267,"t,-")
40115 IV-115 $FN(00670.00789200,"-,t")
40116 IV-116 $FN(-00020.00000,"t+-")
40117 IV-117 $FN(00670.00789200,"-t+")
40118 IV-118 $FN(31267,"t,+-")
40119 IV-119 $FN(1E25,"t,+-")
40120 IV-120 $FN(-1E25,"t,+-")
40121 IV-121 $FN(00.235E8,"+-+t+tT,,,,,,,,")
fncodp="p"
40122 IV-122 $FN(0000,"p")
40123 IV-123 $FN(1,"p")
40124 IV-124 $FN(-1,"p")
15---V4FN25: $FNUMBER function -5-
40125 IV-125 $FN(00670.00789200,"p")
40126 IV-126 $FN(-00670.00789200,"p")
40127 IV-127 $FN(31267,"p,")
40128 IV-128 $FN(-31267,"p,")
40129 IV-129 $FN(1E25,"p,")
40130 IV-130 $FN(-1E25,"p,")
40131 IV-131 $FN(-00670.00789200,",p")
40132 IV-132 $FN(981000000000,"pp")
40133 IV-133 $FN(-262999219E+4,"pp,")
16---V4FN31: $FNUMBER function -6-
$FNUMBER(numexpr,fncodexpr,intexpr)
fncodexpr is an empty string
40134 IV-134 $FNUMBER(-00020000.00000,"",0)
(This test IV-134 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
40135 IV-135 $FN(09878979.78E-2,"",1)
(This test IV-135 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
40136 IV-136 $FN(-"0000.951200000","",1)
(This test IV-136 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
40137 IV-137 $FN("603.450000000E+4","",3)
(This test IV-137 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
40138 IV-138 $fn(9.999979,"",4)
(This test IV-138 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
40139 IV-139 $fn(0000.00000951200000,"",8)
(This test IV-139 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
40140 IV-140 $FN(-0000.00000951200000,"",8)
(This test IV-140 was withdrawn in 31/3/1995 on X11.1-1994, MSL)
17---V4FN32: $FNUMBER function -7-
fncodp="p"
40141 IV-141 $FN(1234.56789,"p",1)
40142 IV-142 $fn(-0.123456789,"p",3)
40143 IV-143 $FN(1E25,"p,",4)
40144 IV-144 $FN(-1E25,"p,",4)
40145 IV-145 $FN(-262999219E+4,"pp,",1)
fncodt="t"
40146 IV-146 $fn(0.123456789,"t",4)
40147 IV-147 $FN(-000000000000000000000000262999219,",p",0)
40148 IV-148 $FN(-07566.5892490,"-,t",4)
40149 IV-149 $FN(-07566.5892400,"+,t",10)
18---V4FN33: $FNUMBER function -8-
40150 IV-150 $FN(-.0004683,"-t",4)
40151 IV-151 $Fn(-0,"t",-0.9)
40152 IV-152 $fn(.7494646,"+,t",1)
40153 IV-153 $fn(++1245E20,"t,",4)
Tests of $REVERSE function
19---V4REV1: $REVERSE function -1-
40154 IV-154 expr is a string
40155 IV-155 expr is a character
40156 IV-156 expr is an empty string
40157 IV-157 expr is an integer number
40158 IV-158 expr is a number
40159 IV-159 expr is a negative number
20---V4REV2: $REVERSE function -2-
40160 IV-160 expr is a lvn
40161 IV-161 expr is a gvn
40162 IV-162 expr is a svn
40163 IV-163 expr is a naked reference
40164 IV-164 expr is composed of control characters
40165 IV-165 expr is a string with maximum length
40166 IV-166 expr contains a unary operator
40167 IV-167 expr contains a binary operator
40168 IV-168 expr contains operators
21---V4REV3: $REVERSE function -3-
expr contains functions
40169 IV-169 expr contains a $ORDER function
40170 IV-170 expr contains a $GET function
40171 IV-171 expr contains extrinsic special variable
40172 IV-172 expr contains extrinsic function
40173 IV-173 expr contains nested functions
expr has indirections
40174 IV-174 ^VV(@A)
22---V4REV4: $REVERSE function -4-
40175 IV-175 @VV
40176 IV-176 @^VV@(12,456)
40177 IV-177 @@^VV(0)@(12,456)
40178 IV-178 nesting
Tests of $GET function
23---V4GET21: $GET function -1-
glvn=lvn
40179 IV-179 $D(lvn)=0
40180 IV-180 $D(lvn)=1
40181 IV-181 $D(lvn)=10
40182 IV-182 $D(lvn)=11
lvn has indirections
40183 IV-183 VV(@A)
40184 IV-184 @VV
24---V4GET22: $GET function -2-
40185 IV-185 @VV@(12,456)
40186 IV-186 @@VV(0)@(12,456)
40187 IV-187 nesting
40188 IV-188 lvn contains extrinsic special variable
40189 IV-189 lvn contains extrinsic function
40190 IV-190 lvn contains nesting functions
25---V4GET23: $GET function -3-
40191 IV-191 expr is an empty string
40192 IV-192 expr is an integer number
40193 IV-193 expr is a number
40194 IV-194 expr is a string
40195 IV-195 expr is a string with maximum length
40196 IV-196 expr is a naked reference
40197 IV-197 expr is a lvn
40198 IV-198 expr is a gvn
40199 IV-199 expr is a svn
26---V4GET24: $GET function -4-
expr contains a function
40200 IV-200 expr contains $DATA function
40201 IV-201 expr contains $SELECT function
40202 IV-202 expr contains $GET function
40203 IV-203 expr contains extrinsic special variable
40204 IV-204 expr contains extrinsic function
40205 IV-205 expr contains nested functions
expr has indirections
40206 IV-206 ^VV(@A)
40207 IV-207 @VV
40208 IV-208 @^VV@(12,456)
40209 IV-209 @@^VV(0)@(12,456)
40210 IV-210 nesting
27---V4GET25: $GET function -5-
glvn=gvn
40211 IV-211 $D(gvn)=0
40212 IV-212 $D(gvn)=1
40213 IV-213 $D(gvn)=10
40214 IV-214 $D(gvn)=11
28---V4GET26: $GET function -6-
gvn has indirections
40215 IV-215 ^VV(@A)
40216 IV-216 @^VV
40217 IV-217 @^VV@(12,456)
40218 IV-218 @@^VV(0)@(12,456)
40219 IV-219 nesting
40220 IV-220 gvn contains extrinsic special variable
40221 IV-221 gvn contains extrinsic function
40222 IV-222 gvn contains nesting functions
29---V4GET27: $GET function -7-
40223 IV-223 expr is an empty string
40224 IV-224 expr is an integer number
40225 IV-225 expr is a number
40226 IV-226 expr is a string
40227 IV-227 expr is a string with maximum length
40228 IV-228 expr is a naked reference
40229 IV-229 expr is a lvn
40230 IV-230 expr is a gvn
40231 IV-231 expr is a svn
30---V4GET28: $GET function -8-
expr contains a function
40232 IV-232 expr contains $DATA function
40233 IV-233 expr contains $SELECT function
40234 IV-234 expr contains $GET function
40235 IV-235 expr contains extrinsic special variable
40236 IV-236 expr contains extrinsic function
40237 IV-237 expr contains nested functions
31---V4GET29: $GET function -9-
expr has indirections
40238 IV-238 ^VV(@A)
40239 IV-239 @VV
40240 IV-240 @^VV@(12,456)
40241 IV-241 @@^VV(0)@(12,456)
40242 IV-242 nesting
Tests of $NAME function
32---V4NAME11: $NAME function -1-
$NAME(glvn)
glvn=lvn
40243 IV-243 unsubscripted
1 subscript
40244 IV-244 subscript is an integer number
40245 IV-245 subscript is a number
40246 IV-246 subscript is a string
40247 IV-247 subscript contains a " character
40248 IV-248 subscript contains " characters
33---V4NAME12: $NAME function -2-
2 subscripts
40249 IV-249 subscript is an integer number
40250 IV-250 subscript is a number
40251 IV-251 subscript are numbers
40252 IV-252 subscript is a string
40253 IV-253 subscript are strings
40254 IV-254 subscript contains a " character
40255 IV-255 subscript contains " characters
40256 IV-256 5 subscripts
34---V4NAME13: $NAME function -3-
40257 IV-257 lvn contains operators
40258 IV-258 lvn contains naked refernce
40259 IV-259 lvn has indirections
lvn contains functions
40260 IV-260 lvn contains $GET function
40261 IV-261 lvn contains $ORDER function
40262 IV-262 lvn contains $QUERY function
40263 IV-263 lvn contains $SELECT function
35---V4NAME14: $NAME function -4-
40264 IV-264 lvn contains $NAME function
40265 IV-265 lvn contains extrinsic special variable
40266 IV-266 lvn contains extrinsic function
40267 IV-267 length of one subscript of a local variable is max
40268 IV-268 total length of a local variable is max
40269 IV-269 minimum to maximum number of one subscript of local variable
36---V4NAME15: $NAME function -5-
glvn=gvn
40270 IV-270 unsubscripted
1 subscript
40271 IV-271 subscript is an integer number
40272 IV-272 subscript is a number
40273 IV-273 subscript is a string
40274 IV-274 subscript contains a " character
40275 IV-275 subscript contains " characters
37---V4NAME16: $NAME function -6-
2 subscripts
40276 IV-276 subscript is an integer number
40277 IV-277 subscript is a number
40278 IV-278 subscript are numbers
40279 IV-279 subscript is a string
40280 IV-280 subscript are strings
40281 IV-281 subscript contains a " character
40282 IV-282 subscript contains " characters
40283 IV-283 5 subscripts
38---V4NAME17: $NAME function -7-
40284 IV-284 subscript is naked reference
40285 IV-285 gvn contains operators
40286 IV-286 gvn contains naked refernce
40287 IV-287 gvn has indirections
gvn contains functions
40288 IV-288 gvn contains $GET function
40289 IV-289 gvn contains $ORDER function
40290 IV-290 gvn contains $QUERY function
40291 IV-291 gvn contains $SELECT function
40292 IV-292 gvn contains $NAME function
39---V4NAME18: $NAME function -8-
40293 IV-293 gvn contains extrinsic special variable
40294 IV-294 gvn contains extrinsic function
40295 IV-295 length of one subscript of a gobal variable is max
40296 IV-296 total length of a global variable is max
40297 IV-297 minimum to maximum number of one subscript of global variable
40---V4NAME21: $NAME function -9-
$NAME(glvn,intexpr)
lvn
intexpr=0
40298 IV-298 unsubscripted
40299 IV-299 1 subscript
40300 IV-300 2 subscripts
40301 IV-301 5 subscripts
40302 IV-302 subscript is naked reference
41---V4NAME22: $NAME function -10-
$QL(lvn)>intexpr
40303 IV-303 1 subscript
40304 IV-304 2 subscripts
40305 IV-305 5 subscripts
40306 IV-306 subscript is naked reference
$QL(lvn)'>intexpr
40307 IV-307 1 subscript
40308 IV-308 2 subscripts
40309 IV-309 5 subscripts
40310 IV-310 subscript is naked reference
42---V4NAME23: $NAME function -11-
gvn
intexpr=0
40311 IV-311 unsubscripted
40312 IV-312 1 subscript
40313 IV-313 2 subscripts
40314 IV-314 5 subscripts
40315 IV-315 subscript is naked reference
$QL(gvn)>intexpr
40316 IV-316 1 subscript
40317 IV-317 2 subscripts
40318 IV-318 5 subscripts
43---V4NAME24: $NAME function -12-
40319 IV-319 subscript is naked reference
$QL(gvn)'>intexpr
40320 IV-320 1 subscript
40321 IV-321 2 subscripts
40322 IV-322 5 subscripts
40323 IV-323 subscript is naked reference
44---V4NAME25: $NAME function -13-
40324 IV-324 glvn contains operators
40325 IV-325 glvn contains naked refernce
40326 IV-326 glvn has indirections
glvn contains functions
40327 IV-327 glvn contains $GET function
40328 IV-328 glvn contains $ORDER function
40329 IV-329 glvn contains $QUERY function
40330 IV-330 glvn contains $SELECT function
40331 IV-331 glvn contains $NAME function
40332 IV-332 glvn contains extrinsic special variable
40333 IV-333 glvn contains extrinsic function
45---V4NAME26: $NAME function -14-
40334 IV-334 minimum to maximum number of one subscript of local variable
40335 IV-335 minimum to maximum number of one subscript of global variable
40336 IV-336 length of one subscript of a local variable is max
40337 IV-337 length of one subscript of a global variable is max
40338 IV-338 total length of a local variable is max
40339 IV-339 total length of a global variable is max
Tests of $QLENGTH function
46---V4QLEN1: $QLENGTH function -1-
$QLENGTH(namevalue)
lvn
40340 IV-340 unsubscripted
1 subscript
40341 IV-341 subscript is an integer number
40342 IV-342 subscript is a number
40343 IV-343 subscript is a string
40344 IV-344 $DATA(lvn)=0
40345 IV-345 $DATA(lvn)=1
40346 IV-346 $DATA(lvn)=10
40347 IV-347 $DATA(lvn)=11
47---V4QLEN2: $QLENGTH function -2-
2 subscripts
40348 IV-348 subscript is an integer number
40349 IV-349 subscript is a number
40350 IV-350 subscript are numbers
40351 IV-351 subscript is a string
40352 IV-352 subscript are strings
40353 IV-353 5 subscripts
48---V4QLEN3: $QLENGTH function -3-
40354 IV-354 namevalue contains an operator
40355 IV-355 namevalue contains operators
40356 IV-356 namevalue contains a function
namevalue contains functions
40357 IV-357 namevalue contains $GET function
40358 IV-358 namevalue contains $ORDER function
40359 IV-359 namevalue contains $QUERY function
40360 IV-360 namevalue contains $SELECT function
40361 IV-361 namevalue contains $QLENGTH function
40362 IV-362 namevalue contains extrinsic special variable
40363 IV-363 namevalue contains extrinsic functions
49---V4QLEN4: $QLENGTH function -4-
40364 IV-364 namevalue has indirection
40365 IV-365 namevalue contains a naked refernce
40366 IV-366 namevalue contains naked refernces
40367 IV-367 length of one subscript of a local variable is max
40368 IV-368 total length of a local variable is max
40369 IV-369 minimum to maximum number of one subscript of local variable
50---V4QLEN5: $QLENGTH function -5-
gvn
40370 IV-370 unsubscripted
1 subscript
40371 IV-371 subscript is an integer number
40372 IV-372 subscript is a number
40373 IV-373 subscript is a string
40374 IV-374 $DATA(gvn)=0
40375 IV-375 $DATA(gvn)=1
40376 IV-376 $DATA(gvn)=10
40377 IV-377 $DATA(gvn)=11
51---V4QLEN6: $QLENGTH function -6-
2 subscripts
40378 IV-378 subscript is an integer number
40379 IV-379 subscript is a number
40380 IV-380 subscript are numbers
40381 IV-381 subscript is a string
40382 IV-382 subscript are strings
40383 IV-383 5 subscripts
40384 IV-384 namevalue contains an operator
40385 IV-385 namevalue contains operators
52---V4QLEN7: $QLENGTH function -7-
namevalue contains a function
40386 IV-386 namevalue contains $GET function
40387 IV-387 namevalue contains $ORDER function
40388 IV-388 namevalue contains $QUERY function
40389 IV-389 namevalue contains $SELECT function
40390 IV-390 namevalue contains $QLENGTH function
40391 IV-391 namevalue contains extrinsic special variable
40392 IV-392 namevalue contains extrinsic functions
53---V4QLEN8: $QLENGTH function -8-
40393 IV-393 namevalue has indirection
40394 IV-394 namevalue contains a naked refernce
40395 IV-395 namevalue contains naked refernces
40396 IV-396 length of one subscript of a global variable is max
40397 IV-397 total length of a global variable is max
40398 IV-398 minimum to maximum number of one subscript of global variable
Tests of $QSUBSCRIPT function
54---V4QSUB1: $QSUBSCRIPT function -1-
$QSUBSCRIPT(namevalue,intexpr)
lvn
intexpr=0
40399 IV-399 unsubscripted
1 subscript
40400 IV-400 subscript is an integer number
40401 IV-401 subscript is a number
40402 IV-402 subscript is a string
40403 IV-403 subscript contains a " character
40404 IV-404 subscript contains " characters
55---V4QSUB2: $QSUBSCRIPT function -2-
2 subscripts
40405 IV-405 subscript is an integer number
40406 IV-406 subscript is a number
40407 IV-407 subscript are numbers
40408 IV-408 subscript is a string
40409 IV-409 subscript are strings
40410 IV-410 subscript contains a " character
40411 IV-411 subscript contains " characters
40412 IV-412 5 subscripts
56---V4QSUB3: $QSUBSCRIPT function -3-
$QL(namevalue)'<intexpr>0
1 subscript
40413 IV-413 subscript is an integer number
40414 IV-414 subscript is a number
40415 IV-415 subscript is a string
40416 IV-416 subscript contains a " character
40417 IV-417 subscript contains " characters
2 subscripts
40418 IV-418 subscript is an integer number
57---V4QSUB4: $QSUBSCRIPT function -4-
40419 IV-419 subscript is a number
40420 IV-420 subscript are numbers
40421 IV-421 subscript is a string
40422 IV-422 subscript are strings
40423 IV-423 subscript contains a " character
40424 IV-424 subscript contains " characters
40425 IV-425 5 subscripts
58---V4QSUB5: $QSUBSCRIPT function -5-
$QL(namevalue)<intexpr
40426 IV-426 unsubscripted
1 subscript
40427 IV-427 subscript is an integer number
40428 IV-428 subscript is a number
40429 IV-429 subscript is a string
40430 IV-430 subscript contains a " character
40431 IV-431 subscript contains " characters
59---V4QSUB6: $QSUBSCRIPT function -6-
2 subscripts
40432 IV-432 subscript is an integer number
40433 IV-433 subscript is a number
40434 IV-434 subscript are numbers
40435 IV-435 subscript is a string
40436 IV-436 subscript are strings
40437 IV-437 subscript contains a " character
40438 IV-438 subscript contains " characters
40439 IV-439 5 subscripts
60---V4QSUB7: $QSUBSCRIPT function -7-
40440 IV-440 namevalue contains lvn
40441 IV-441 namevalue contains gvn
40442 IV-442 namevalue contains operators
40443 IV-443 namevalue contains naked refernce
40444 IV-444 namevalue has indirections
namevalue contains functions
40445 IV-445 namevalue contains $GET function
40446 IV-446 namevalue contains $ORDER function
40447 IV-447 namevalue contains $QUERY function
40448 IV-448 namevalue contains $SELECT function
61---V4QSUB8: $QSUBSCRIPT function -8-
40449 IV-449 namevalue contains $NAME function
40450 IV-450 namevalue contains $QLENGTH function
40451 IV-451 namevalue contains $QSUBSCRIPT function
40452 IV-452 namevalue contains extrinsic special variable
40453 IV-453 namevalue contains extrinsic function
40454 IV-454 length of one subscript of a local variable is max
40455 IV-455 total length of a local variable is max
40456 IV-456 minimum to maximum number of one subscript of local variable
62---V4QSUB9: $QSUBSCRIPT function -9-
gvn
intexpr=0
40457 IV-457 unsubscripted
1 subscript
40458 IV-458 subscript is an integer number
40459 IV-459 subscript is a number
40460 IV-460 subscript is a string
40461 IV-461 subscript contains a " character
40462 IV-462 subscript contains " characters
63---V4QSUB10: $QSUBSCRIPT function -10-
2 subscripts
40463 IV-463 subscript is an integer number
40464 IV-464 subscript is a number
40465 IV-465 subscript are numbers
40466 IV-466 subscript is a string
40467 IV-467 subscript are strings
40468 IV-468 subscript contains a " character
40469 IV-469 subscript contains " characters
40470 IV-470 5 subscripts
64---V4QSUB11: $QSUBSCRIPT function -11-
$QL(namevalue)'<intexpr>0
1 subscript
40471 IV-471 subscript is an integer number
40472 IV-472 subscript is a number
40473 IV-473 subscript is a string
40474 IV-474 subscript contains a " character
40475 IV-475 subscript contains " characters
2 subscripts
40476 IV-476 subscript is an integer number
40477 IV-477 subscript is a number
40478 IV-478 subscript are numbers
40479 IV-479 subscript is a string
40480 IV-480 subscript are strings
40481 IV-481 subscript contains a " character
40482 IV-482 subscript contains " characters
40483 IV-483 5 subscripts
65---V4QSUB12: $QSUBSCRIPT function -12-
$QL(namevalue)<intexpr
40484 IV-484 unsubscripted
1 subscript
40485 IV-485 subscript is an integer number
40486 IV-486 subscript is a number
40487 IV-487 subscript is a string
40488 IV-488 subscript contains a " character
40489 IV-489 subscript contains " characters
66---V4QSUB13: $QSUBSCRIPT function -13-
2 subscripts
40490 IV-490 subscript is an integer number
40491 IV-491 subscript is a number
40492 IV-492 subscript are numbers
40493 IV-493 subscript is a string
40494 IV-494 subscript are strings
40495 IV-495 subscript contains a " character
40496 IV-496 subscript contains " characters
40497 IV-497 5 subscripts
67---V4QSUB14: $QSUBSCRIPT function -14-
40498 IV-498 namevalue contains lvn
40499 IV-499 namevalue contains gvn
40500 IV-500 namevalue contains operators
40501 IV-501 namevalue contains naked refernce
40502 IV-502 namevalue has indirections
namevalue contains functions
40503 IV-503 namevalue contains $GET function
40504 IV-504 namevalue contains $ORDER function
40505 IV-505 namevalue contains $QUERY function
40506 IV-506 namevalue contains $SELECT function
68---V4QSUB15: $QSUBSCRIPT function -15-
40507 IV-507 namevalue contains $NAME function
40508 IV-508 namevalue contains $QLENGTH function
40509 IV-509 namevalue contains $QSUBSCRIPT function
40510 IV-510 namevalue contains extrinsic special variable
40511 IV-511 namevalue contains extrinsic function
40512 IV-512 length of one subscript of a global variable is max
40513 IV-513 total length of a global variable is max
40514 IV-514 minimum to maximum number of one subscript of global variable
Tests of Special variable $QUIT
69---V4SVQ1: Special variable $QUIT -1-
$QUIT=1
40515 IV-515 extrinsic special variable
40516 IV-516 extrinsic function
$QUIT=0
40517 IV-517 DO
40518 IV-518 argumentless DO
40519 IV-519 DO with parameters
70---V4SVQ2: Special variable $QUIT -2-
40520 IV-520 FOR scope
40521 IV-521 GOTO
40522 IV-522 return by eor
71---V4SVQ3: Special variable $QUIT -3-
nesting
$QUIT=0
DO
40523 IV-523 extrinsic special variable
40524 IV-524 extrinsic function
argumentless DO
40525 IV-525 extrinsic special variable
40526 IV-526 extrinsic function
72---V4SVQ4: Special variable $QUIT -4-
DO with parameters
40527 IV-527 extrinsic special variable
40528 IV-528 extrinsic function
FOR scope
40529 IV-529 extrinsic special variable
40530 IV-530 extrinsic function
GOTO
40531 IV-531 extrinsic special variable
40532 IV-532 extrinsic function
73---V4SVQ5: Special variable $QUIT -5-
$QUIT=1
extrinsic special variable
40533 IV-533 DO
40534 IV-534 argumentless DO
40535 IV-535 DO with parameters
40536 IV-536 FOR scope
40537 IV-537 GOTO
40538 IV-538 return by eor
74---V4SVQ6: Special variable $QUIT -6-
extrinsic function
40539 IV-539 DO
40540 IV-540 argumentless DO
40541 IV-541 DO with parameters
40542 IV-542 FOR scope
40543 IV-543 GOTO
40544 IV-544 return by eor
Tests of MERGE command
75---V4MERGE1: MERGE Command -1-
MERGE lvn1=lvn2
40545 IV-545 $d(lvn1)=0 and $d(lvn2)=0
40546 IV-546 $d(lvn1)=0 and $d(lvn2)=1
40547 IV-547 $d(lvn1)=0 and $d(lvn2)=10
40548 IV-548 $d(lvn1)=0 and $d(lvn2)=11
76---V4MERGE2: MERGE Command -2-
40549 IV-549 $d(lvn1)=1 and $d(lvn2)=0
40550 IV-550 $d(lvn1)=1 and $d(lvn2)=1
40551 IV-551 $d(lvn1)=1 and $d(lvn2)=10
40552 IV-552 $d(lvn1)=1 and $d(lvn2)=11
77---V4MERGE3: MERGE Command -3-
40553 IV-553 $d(lvn1)=10 and $d(lvn2)=0
40554 IV-554 $d(lvn1)=10 and $d(lvn2)=1
40555 IV-555 $d(lvn1)=10 and $d(lvn2)=10
40556 IV-556 $d(lvn1)=10 and $d(lvn2)=11
78---V4MERGE4: MERGE Command -4-
40557 IV-557 $d(lvn1)=11 and $d(lvn2)=0
40558 IV-558 $d(lvn1)=11 and $d(lvn2)=1
40559 IV-559 $d(lvn1)=11 and $d(lvn2)=10
40560 IV-560 $d(lvn1)=11 and $d(lvn2)=11
79---V4MERG^V4MERGE,V4READ^VV4: MERGE Command -5-
MERGE lvn=gvn
40561 IV-561 $d(lvn)=0 and $d(gvn)=0
40562 IV-562 $d(lvn)=0 and $d(gvn)=1
40563 IV-563 $d(lvn)=0 and $d(gvn)=10
40564 IV-564 $d(lvn)=0 and $d(gvn)=11
80---V4MERGE6: MERGE Command -6-
40565 IV-565 $d(lvn)=1 and $d(gvn)=0
40566 IV-566 $d(lvn)=1 and $d(gvn)=1
40567 IV-567 $d(lvn)=1 and $d(gvn)=10
40568 IV-568 $d(lvn)=1 and $d(gvn)=11
81---V4MERGE7: MERGE Command -7-
40569 IV-569 $d(lvn)=10 and $d(gvn)=0
40570 IV-570 $d(lvn)=10 and $d(gvn)=1
40571 IV-571 $d(lvn)=10 and $d(gvn)=10
40572 IV-572 $d(lvn)=10 and $d(gvn)=11
82---V4MERGE8: MERGE Command -8-
40573 IV-573 $d(lvn)=11 and $d(gvn)=0
40574 IV-574 $d(lvn)=11 and $d(gvn)=1
40575 IV-575 $d(lvn)=11 and $d(gvn)=10
40576 IV-576 $d(lvn)=11 and $d(gvn)=11
83---V4MERGE9: MERGE Command -9-
MERGE gvn=lvn
40577 IV-577 $d(gvn)=0 and $d(lvn)=0
40578 IV-578 $d(gvn)=0 and $d(lvn)=1
40579 IV-579 $d(gvn)=0 and $d(lvn)=10
40580 IV-580 $d(gvn)=0 and $d(lvn)=11
84---V4MERGEA: MERGE Command -A-
40581 IV-581 $d(gvn)=1 and $d(lvn)=0
40582 IV-582 $d(gvn)=1 and $d(lvn)=1
40583 IV-583 $d(gvn)=1 and $d(lvn)=10
40584 IV-584 $d(gvn)=1 and $d(lvn)=11
85---V4MERGEB: MERGE Command -B-
40585 IV-585 $d(gvn)=10 and $d(lvn)=0
40586 IV-586 $d(gvn)=10 and $d(lvn)=1
40587 IV-587 $d(gvn)=10 and $d(lvn)=10
40588 IV-588 $d(gvn)=10 and $d(lvn)=11
86---V4MERGEC: MERGE Command -C-
40589 IV-589 $d(gvn)=11 and $d(lvn)=0
40590 IV-590 $d(gvn)=11 and $d(lvn)=1
40591 IV-591 $d(gvn)=11 and $d(lvn)=10
40592 IV-592 $d(gvn)=11 and $d(lvn)=11
87---V4MERGED: MERGE Command -D-
MERGE gvn1=gvn2
40593 IV-593 $d(gvn1)=0 and $d(gvn2)=0
40594 IV-594 $d(gvn1)=0 and $d(gvn2)=1
40595 IV-595 $d(gvn1)=0 and $d(gvn2)=10
40596 IV-596 $d(gvn1)=0 and $d(gvn2)=11
88---V4MERGEE: MERGE Command -E-
40597 IV-597 $d(gvn1)=1 and $d(gvn2)=0
40598 IV-598 $d(gvn1)=1 and $d(gvn2)=1
40599 IV-599 $d(gvn1)=1 and $d(gvn2)=10
40600 IV-600 $d(gvn1)=1 and $d(gvn2)=11
89---V4MERGEF: MERGE Command -F-
40601 IV-601 $d(gvn1)=10 and $d(gvn2)=0
40602 IV-602 $d(gvn1)=10 and $d(gvn2)=1
40603 IV-603 $d(gvn1)=10 and $d(gvn2)=10
40604 IV-604 $d(gvn1)=10 and $d(gvn2)=11
90---V4MERGEG: MERGE Command -G-
40605 IV-605 $d(gvn1)=11 and $d(gvn2)=0
40606 IV-606 $d(gvn1)=11 and $d(gvn2)=1
40607 IV-607 $d(gvn1)=11 and $d(gvn2)=10
40608 IV-608 $d(gvn1)=11 and $d(gvn2)=11
91---V4MERGEH: MERGE Command -H-
40609 IV-609 max length name
40610 IV-610 max length data
92---V4MERGEI: MERGE Command -I-
40611 IV-611 glvn contains naked reference
40612 IV-612 glvn contains an indirection
Tests of READ command
93---V4READ1: READ Command -1-
READ gvn
40613 IV-613 READ gvn
40614 IV-614 $D(gvn)=0
40615 IV-615 $D(gvn)=1
94---V4READ2: READ Command -2-
40616 IV-616 $D(gvn)=10
40617 IV-617 $D(gvn)=11
40618 IV-618 READ gvn readcount
40619 IV-619 READ gvn readcount timeout
95---V4READ3: READ Command -3-
40620 IV-620 READ gvn timeout
40621 IV-621 readargument contains an indirection
40622 IV-622 readargument contains indirections
96 ---V4READ4: READ Command -4-
READ *gvn
40623 IV-623 READ *gvn
40624 IV-624 READ *gvn timeout
40625 IV-625 readargument contains an indirection
40626 IV-626 readargument contains indirections
Tests of Special Variable $KEY
97---V4KEY: Special variable $KEY
40627 IV-627 terminated by CR
40628 IV-628 terminated by timeout
40629 IV-629 no RE40630mmand
Tests of Special Variable $SYSTEM
98---V4SYSTEM: Special variable $SYSTEM
40630 IV-630 $SYSTEM value format
40631 IV-631 $SY value format
40632 IV-632 $SYSTEM under another JOB
Tests of P ower O p erator **
99---V4POW1: power operator (A**P) -1-
A=1
40633 IV-633 1**0
40634 IV-634 1**1
40635 IV-635 1**5
100---V4POW2: power operator (A**P) -2-
A=2
40636 IV-636 2**0
40637 IV-637 2**1
40638 IV-638 2**2
40639 IV-639 2**4
40640 IV-640 2**8
40641 IV-641 2**24
A=5
40642 IV-642 5**1
40643 IV-643 5**2
40644 IV-644 5**10
101---V4POW3: power operator (A**P) -3-
A=10
40645 IV-645 10**0
40646 IV-646 10**1
40647 IV-647 10**7
A is an integer
40648 IV-648 674**2
40649 IV-649 148**3
A is a number
40650 IV-650 68.9135**2
40651 IV-651 5.0738**3
40652 IV-652 1.2563**5
40653 IV-653 1.05**20
102---V4POW4: power operator (A**P) -4-
P=1/2
40654 IV-654 2**0.5
40655 IV-655 3**0.5
40656 IV-656 5**0.5
40657 IV-657 10**0.5
P=1/3
40658 IV-658 2**(1/3)
40659 IV-659 3**(1/3)
P=1/4
40660 IV-660 2**0.25
P=1.05
40661 IV-661 5**1.05
103---V4POW5: power operator (A**P) -5-
P=-1
40662 IV-662 1**-1
40663 IV-663 2**-1
40664 IV-664 10000**-1
40665 IV-665 pi**-1
40666 IV-666 e**-1
P=2
40667 IV-667 pi**2
40668 IV-668 e**2
104---V4POW6: power operator (A**P) -6-
P=-2
40669 IV-669 3**-2
40670 IV-670 1235**-2
P=-3
40671 IV-671 3**-3
40672 IV-672 0.5**-4
105---V4POW7: power operator (A**P) -7-
P is a number
40673 IV-673 2**1.5
40674 IV-674 3**2.25
40675 IV-675 4**-2.5
106---V4POW8: power operator (A**P) -8-
40676 IV-676 A is a lvn
40677 IV-677 A is a gvn
40678 IV-678 P is a lvn
40679 IV-679 P is a gvn
Additional tests for $RANDOM function
107---V4RAND: $RANDOM function
40680 IV-680 intexpr is 15 digits ( maximum range )
Renewed tests for $ORDER function
108---V4ORD21: $ORDER(glvn,expr) -1-
$ORDER(glvn,expr)
expr=1
glvn=lvn
40681 IV-681 subscript is one character (95 graphics including space)
40682 IV-682 sequence from an empty string
40683 IV-683 numeric interpretation of a subscript
40684 IV-684 sequence from an empty string when glvn is lvn
40685 IV-685 what is the set A (local)?
40686 IV-686 the last returned value
109---V4ORD22: $ORDER(glvn,expr) -2-
glvn=gvn
40687 IV-687 subscript is one character (95 graphics including space)
40688 IV-688 sequence from an empty string
40689 IV-689 numeric interpretation of a subscript
40690 IV-690 sequence from an empty string when glvn is gvn
40691 IV-691 what is the set A (global)?
40692 IV-692 the last returned value
110---V4ORD23: $ORDER(glvn,expr) -3-
expr=-1
glvn=lvn
40693 IV-693 subscript is one character (95 graphics including space)
40694 IV-694 sequence from an empty string
40695 IV-695 numeric interpretation of a subscript
40696 IV-696 sequence from an empty string when glvn is lvn
40697 IV-697 what is the set A (local)?
40698 IV-698 the last returned value
111---V4ORD24: $ORDER(glvn,expr) -4-
glvn=gvn
40699 IV-699 subscript is one character (95 graphics including space)
40700 IV-700 sequence from an empty string
40701 IV-701 numeric interpretation of a subscript
40702 IV-702 sequence from an empty string when glvn is gvn
40703 IV-703 what is the set A (global)?
40704 IV-704 the last returned value
112---V4ORD25: $ORDER(glvn,expr) -5-
40705 IV-705 expr is an integer number
40706 IV-706 expr is a number
40707 IV-707 expr is a string
40708 IV-708 expr is a naked reference
40709 IV-709 expr is a lvn
40710 IV-710 expr is a gvn
40711 IV-711 expr is a svn
113---V4ORD26: $ORDER(glvn,expr) -6-
expr contains a function
40712 IV-712 expr contains $GET function
40713 IV-713 expr contains $ORDER function
40714 IV-714 expr contains $SELECT function
40715 IV-715 expr contains extrinsic special variable
40716 IV-716 expr contains extrinsic function
expr contains a operator
40717 IV-717 expr contains a + operator
40718 IV-718 expr contains a ? operator
114---V4ORD27: $ORDER(glvn,expr) -7-
expr has indirections
40719 IV-719 ^V(@A)
40720 IV-720 @VV
40721 IV-721 @^V@(12,456)
40722 IV-722 @@^V(0)@(12,456)
115---V4ORD28: $ORDER(glvn,expr) -8-
40723 IV-723 glvn contains an integer number
40724 IV-724 glvn contains a number
40725 IV-725 glvn contains a string
40726 IV-726 glvn contains a naked reference
40727 IV-727 glvn is a lvn
40728 IV-728 glvn is a gvn
40729 IV-729 glvn contains a svn
116---V4ORD29: $ORDER(glvn,expr) -9-
glvn contains a function
40730 IV-730 glvn contains $GET function
40731 IV-731 glvn contains $ORDER function
40732 IV-732 glvn contains $SELECT function
40733 IV-733 glvn contains extrinsic special variable
40734 IV-734 glvn contains extrinsic function
117---V4ORD2A: $ORDER(glvn,expr) -10-
glvn contains a operator
40735 IV-735 glvn contains a + operator
40736 IV-736 glvn contains a ? operator
glvn has indirections
40737 IV-737 ^V(@A)
40738 IV-738 @VV
40739 IV-739 @^V@(12,456)
40740 IV-740 @@^V(0)@(12,456)
Tests of $QUERY function (1994 change)
118---V4QUERY
lvn
40741 IV-741 The last subscript is an empty string gvn
40742 IV-742 The last subscript is an empty string
Tests of $PRINCIPAL special variable name
119---V4PRIN: $PRINCIPAL special variable name
40743 IV-743 $PRINCIPAL value format
40744 IV-744 $P value format
40745 IV-745 change current device
40746 IV-746 the value of $PRINCIPAL is equal to the initial value of $IO
Additional test ofQUIT@expratom
120---V4QUIT: QUIT @expratom
40747 IV-747 return to an exvar
40748 IV-748 return to an exfunc
40749 IV-749 expratom has a lvn
40750 IV-750 expratom has a gvn
40751 IV-751 expratom contains a naked reference
40752 IV-752 nesting indirection
Tests of Maximum ranges
121---V4MAX1: Maximum range -1-
40753 IV-753 Numeric range ( 10**-25 to 10**25 )
Significant digit up to 15 digits
40754 IV-754 Local data
40755 IV-755 Global data
122---V4MAX2: Maximum range -2-
40756 IV-756 15 digits subscript of local variable
40757 IV-757 15 digits subscript of global variable
40758 IV-758 50 levels subscript of local variable
40759 IV-759 50 levels subscript of global variable
123---V4SSUB1: String subscript -1-
40760 IV-760 Lengthof one subscriptofalocalvariableis 237
40761 IV-761 Total length of a local variable is 255
40762 IV-762 Lengthofonesubscript ofa globalvariableis234
40763 IV-763 Total length of a global variable is 255
124---V4SSUB2: String subscript -2-
40764 IV-764 Nakedreferencewhen thetotallengthofglobalvariable
is 255 characters
40765 IV-765 Minimum(.999999999999999E25) to
maximum(.999999999999999E25) number of one
subscript of local variable
40766 IV-766 Minimum (-.999999999999999E25) to
maximum (.999999999999999E25) number of one
subscript of global variable
40767 IV-767 Total numberof localvariablesubscriptsis 79
40768 IV-768 Totalnumberofglobalvariablesubscriptsis 78
Additional tests for JOB command
125---V4JOB: JOB command with parameter
40769 IV-769 JOB ^routinename with parameter
40770 IV-770 J label^routinename with parameter
40771 IV-771 JOB label with parameter
Extended Tests for Pattern Match Operator
126---V4PAT1: pattern match operator -1-
expr ? I (patatom)
40772 IV-772 expr ? I (N patatom)
40773 IV-773 expr ? I (.N patatom)
40774 IV-774 expr ? I (N. patatom)
40775 IV-775 expr ? I (N.M patatom)
expr ? .I (patatom)
40776 IV-776 expr ? .I (N patatom)
40777 IV-777 expr ? .I (.N patatom)
40778 IV-778 expr ? .I (N. patatom)
40779 IV-779 expr ? .I (N.M patatom)
127---V4PAT2: pattern match operator -2-
expr ? I. (patatom)
40780 IV-780 expr ? I. (N patatom)
40781 IV-781 expr ? I. (.N patatom)
40782 IV-782 expr ? I. (N. patatom)
40783 IV-783 expr ? I. (N.M patatom)
expr ? I.J (patatom)
40784 IV-784 expr ? I.J (N patatom)
40785 IV-785 expr ? I.J (.N patatom)
40786 IV-786 expr ? I.J (N. patatom)
40787 IV-787 expr ? I.J (N.M patatom)
128---V4PAT3: pattern match operator -3-
expr ? I (patatom,patatom)
40788 IV-788 expr ? I (N patatom, N patatom)
40789 IV-789 expr ? I (.N patatom, N patatom)
40790 IV-790 expr ? I (.N patatom, .N patatom)
40791 IV-791 expr ? I (.N patatom, N. patatom)
40792 IV-792 expr ? I (.N patatom, N.M patatom)
40793 IV-793 expr ? I (N. patatom, N patatom)
40794 IV-794 expr ? I (N. patatom, .N patatom)
40795 IV-795 expr ? I (N. patatom, N. patatom)
40796 IV-796 expr ? I (N. patatom, N.M patatom)
40797 IV-797 expr ? I (N.M patatom, N patatom)
40798 IV-798 expr ? I (N.M patatom, .N patatom)
40799 IV-799 expr ? I (N.M patatom, N. patatom)
40800 IV-800 expr ? I (N.M patatom, N.M patatom)
129---V4PAT4: pattern match operator -4-
expr ? .I (patatom,patatom)
40801 IV-801 expr ? .I (N patatom, N patatom)
40802 IV-802 expr ? .I (.N patatom, N patatom)
40803 IV-803 expr ? .I (.N patatom, .N patatom)
40804 IV-804 expr ? .I (.N patatom, N. patatom)
40805 IV-805 expr ? .I (.N patatom, N.M patatom)
40806 IV-806 expr ? .I (N. patatom, N patatom)
40807 IV-807 expr ? .I (N. patatom, .N patatom)
40808 IV-808 expr ? .I (N. patatom, N. patatom)
40809 IV-809 expr ? .I (N. patatom, N.M patatom)
40810 IV-810 expr ? .I (N.M patatom, N patatom)
40811 IV-811 expr ? .I (N.M patatom, .N patatom)
40812 IV-812 expr ? .I (N.M patatom, N. patatom)
40813 IV-813 expr ? .I (N.M patatom, N.M patatom)
130---V4PAT5: pattern match operator -5-
expr ? I. (patatom,patatom)
40814 IV-814 expr ? I. (N patatom, N patatom)
40815 IV-815 expr ? I. (.N patatom, N patatom)
40816 IV-816 expr ? I. (.N patatom, .N patatom)
40817 IV-817 expr ? I. (.N patatom, N. patatom)
40818 IV-818 expr ? I. (.N patatom, N.M patatom)
40819 IV-819 expr ? I. (N. patatom, N patatom)
40820 IV-820 expr ? I. (N. patatom, .N patatom)
40821 IV-821 expr ? I. (N. patatom, N. patatom)
40822 IV-822 expr ? I. (N. patatom, N.M patatom)
40823 IV-823 expr ? I. (N.M patatom, N patatom)
40824 IV-824 expr ? I. (N.M patatom, .N patatom)
40825 IV-825 expr ? I. (N.M patatom, N. patatom)
40826 IV-826 expr ? I. (N.M patatom, N.M patatom)
131---V4PAT6: pattern match operator -6-
expr ? I.J (patatom,patatom)
40827 IV-827 expr ? I.J (N patatom, N patatom)
40828 IV-828 expr ? I.J (.N patatom, N patatom)
40829 IV-829 expr ? I.J (.N patatom, .N patatom)
40830 IV-830 expr ? I.J (.N patatom, N. patatom)
40831 IV-831 expr ? I.J (.N patatom, N.M patatom)
40832 IV-832 expr ? I.J (N. patatom, N patatom)
40833 IV-833 expr ? I.J (N. patatom, .N patatom)
40834 IV-834 expr ? I.J (N. patatom, N. patatom)
40835 IV-835 expr ? I.J (N. patatom, N.M patatom)
40836 IV-836 expr ? I.J (N.M patatom, N patatom)
40837 IV-837 expr ? I.J (N.M patatom, .N patatom)
40838 IV-838 expr ? I.J (N.M patatom, N. patatom)
40839 IV-839 expr ? I.J (N.M patatom, N.M patatom)
132---V4PAT7: pattern match operator -7-
40840 IV-840 expr ?repcount (patatom,patatom,patatom)
40841 IV-841 expr ?repcount
(patatom,patatom,patatom,patatom,patatom)
40842 IV-842 expr? repcount
(patatom,patatom,patatom,patatom,patatom,patatom)
40843 IV-843 expr? repcount (...) repcount patcode
40844 IV-844 expr ? repcount (...) repcount strlit
40845 IV-845 expr?repcount (...)repcountpatcoderepcount (...)
40846 IV-846 expr? repcount(...) repcountstrlitrepcount(...)
40847 IV-847 expr? repcount(...)repcount (...)repcount patcode
40848 IV-848 expr? repcount(...)repcount(...) repcount strlit
40849 IV-849 expr? repcount (...) repcount (...)repcount (...)
133---V4PAT8: pattern match operator -8-
40850 IV-850 expr ? repcount patcode repcount (...)
40851 IV-851 expr ? repcount strlit repcount (...)
40852 IV-852 expr ? repcount patcode repcount (...)repcount patcode
40853 IV-853 expr ?repcountpatcode repcount (...)repcountstrlit
40854 IV-854 expr?repcount strlit repcount(...) repcountpatcode
40855 IV-855 expr? repcount strlit repcount (...) repcountstrlit
134---V4PAT9: pattern match operator -9-
40856 IV-856 expr '?
40857 IV-857 multi alternation
40858 IV-858 nested patatom
Tests of Nesting
135---V4NST1: Nesting ( FOR, XECUTE, DO ) -1-
As this routine itself is counted as one level of nesting,
additional 126 levels of nesting are required.
Admitted nesting levels are indicated by the number in each test.
IV-859 13 levels of DO, and 114 levels of FOR
40859 IV-859 Termination by GOTO
136---V4NST2: Nesting ( FOR, XECUTE, DO ) -2-
40860 IV-860 Termination by QUIT
137---V4NST3: Nesting ( FOR, XECUTE, DO ) -3-
40861 IV-861 1 level of DO, and 126 levels of XECUTE
138---V4NST4: Nesting ( FOR, XECUTE, DO ) -4-
40862 IV-862 Local DO
139---V4NST5: Nesting ( FOR, XECUTE, DO ) -5-
40863 IV-863 External DO
140---V4NST6: Nesting ( FOR, XECUTE, DO ) -6-
40864 IV-864 127 levels of combined DO, FOR, XECUTE
Tests of MDC Interpretations
141---V4MDC
40865 IV-865 Semantics for QUIT after NEW in the Subroutine
40866 IV-866 Control Flow in Nested Argumentless DO Commands
anda QUIT Command
6.2 Contents of Routines in the Order of Execution for VV4TP Series
Routine No Routine Name Title
================================================================================
142---V4TP11:
1 Transaction tests -1-
40867 IV-40867 $TLEVEL and $TRESTART
TSTART without argument
40868 IV-868 TSTART ... TCOMMIT
40869 IV-869 TSTART ... TROLLBACK
40870 IV-870 TSTART ... HALT
143---V4TP12:
1 Transaction tests -2-
TSTART with transparameters
40871 IV-871 TSTART :SERIAL ... TCOMMIT
40872 IV-872 TSTART lname:S ... TCOMMIT
40873 IV-873 TSTART (lname,lname,lname):SERIAL ... TCOMMIT
40874 IV-874 TSTART *:(S) ... TCOMMIT
40875 IV-875 TSTART ():SERIAL ... TCOMMIT
144---V4TP13:
1 Transaction tests -3-
TSTART without transparameters
without a restart before TCOMMIT
40876 IV-876 TSTART lname ... TCOMMIT
40877 IV-877 TSTART (lname,lname,lname,lname) ... TCOMMIT
40878 IV-878 TSTART * ... TCOMMIT
40879 IV-879 TSTART () ... TCOMMIT
145---V4TP14:
1 Transaction tests -4-
TSTART without transparameters
without a restart before TROLLBACK
40880 IV-880 TSTART lname ... TROLLBACK
40881 IV-881 TSTART (lname,lname) ... TROLLBACK
40882 IV-882 TSTART * ... TROLLBACK
40883 IV-883 TSTART () ... TROLLBACK
146---V4TP15:
1 Transaction tests -5-
TSTART without transparameters
with a restart before TCOMMIT
40884 IV-884 TSTART lname ... TRESTART ... TCOMMIT
40885 IV-885 TSTART (lname,lname) ... TRESTART ... TCOMMIT
40886 IV-886 TSTART * ... TRESTART ... TCOMMIT
40887 IV-887 TSTART () ... TRESTART ... TCOMMIT
147---V4TP16:
1 Transaction tests -6-
TSTART without transparameters
with a restart before TROLLBACK
40888 IV-888 TSTART lname ... TRESTART ... TROLLBACK
40889 IV-889 TSTART (lname,lname,lname) ... TRESTART ... TROLLBACK
40890 IV-890 TSTART * ... TRESTART ... TROLLBACK
40891 IV-891 TSTART () ... TRESTART ... TROLLBACK
148---V4TP17:
1 Transaction tests -7-
TSTART without transparameters
2 level nestting
40892 IV-892 TSTART .. TSTART .. TCOMMIT .. TCOMMIT
40893 IV-893 TSTART .. TSTART .. TROLLBACK
40894 IV-894 TSTART .. TSTART .. TRESTART .. TCOMMIT .. TCOMMIT
40895 IV-895 TSTART .. TSTART .. TRESTART .. TROLLBACK
149---V4TP21:
2 Transactions tests -1-
TSTART without argument
40896 IV-896 1. TSTART ... TCOMMIT
2. TSTART ... TCOMMIT
40897 IV-897 1. TSTART ... TCOMMIT
2. TSTART ... TROLLBACK
40898 IV-898 1. TSTART ... TCOMMIT
2. TSTART ... HALT
40899 IV-899 1. TSTART ... TCOMMIT
2. non TP
40900 IV-900 1. TSTART ... TROLLBACK
2. non TP
40901 IV-901 1. non TP
2. TSTART ... TCOMMIT
40902 IV-902 1. non TP
2. TSTART ... TROLLBACK
150---V4TP22:
2 Transactions tests -2-
TSTART with transparameters
without a restart before TCOMMIT or TROLLBACK
40903 IV-903 1. TSTART :SERIAL ... TCOMMIT
2. TSTART :S ... TCOMMIT
40904 IV-904 1. TSTART :SERIAL ... TROLLBACK
2. TSTART lname:S ... TCOMMIT
40905 IV-905 1. TSTART (lname,lname,lname):SERIAL ... TROLLBACK
2. TSTART *:SERIAL ... TROLLBACK
40906 IV-906 1. TSTART ():(SERIAL) ... HALT
2. TSTART lname:SERIAL ... TCOMMIT
40907 IV-907 1. TSTART ():SERIAL ... TCOMMIT
2. non TP
40908 IV-908 1. TSTART lname:SERIAL ... TROLLBACK
2. non TP
151---V4TP23:
2 Transactions tests -3-
TSTART with transparameters
with a restart before TCOMMIT or TROLLBACK
40909 IV-909 1. TSTART lname:SERIAL ... TRESTART ... TCOMMIT
2. TSTART lname ... TCOMMIT
40910 IV-910 1. TSTART (lname,lname):SERIAL ... TRESTART ... TCOMMIT
2. TSTART * ... TROLLBACK
40911 IV-911 1. TSTART *:SERIAL ... TRESTART ... TCOMMIT
2. TSTART () ... TROLLBACK
40912 IV-912 1. TSTART ():SERIAL ... TRESTART ... TCOMMIT
2. TSTART (lname,lname) ... TRESTART ... TCOMMIT
40913 IV-913 1. TSTART *:SERIAL ... TRESTART ... TCOMMIT
2. TSTART lname:SERIAL ... TRESTART ... TCOMMIT
40914 IV-914 1. TSTART ():SERIAL ... TRESTART ... TCOMMIT
2. TSTART lname:SERIAL ... TRESTART ... TROLLBACK
152---V4TP24:
2 Transactions tests -4-
TSTART with transparameters
with a restart before TCOMMIT or TROLLBACK
40915 IV-915 1. TSTART lname:SERIAL ... TRESTART ... TROLLBACK
2. TSTART lname:SERIAL ... TCOMMIT
40916 IV-916 1. TSTART (lname,lname,lname):SERIAL ... TRESTART ... TROLLBACK
2. TSTART (lname,lname) ... TROLLBACK
40917 IV-917 1. TSTART *:SERIAL ... TRESTART ... HALT
2. TSTART ():SERIAL ... TCOMMIT
40918 IV-918 1. TSTART ():SERIAL ... TRESTART ... TCOMMIT
2. TSTART lname ... TRESTART ... TROLLBACK
40919 IV-919 1. TSTART lname:SERIAL ... TRESTART ... TCOMMIT
2. TSTART lname ... TRESTART ... TCOMMIT
153---V4TP31:
3 Transactions tests -1-
40920 IV-920 1. TSTART :SERIAL ... TCOMMIT
2. TSTART *:S ... TROLLBACK
3. TSTART lname:S ... TCOMMIT
40921 IV-921 1. TSTART :S ... TCOMMIT
2. TSTART :SERIAL ... TCOMMIT
3. TSTART () ... TROLLBACK
154---V4TP32:
3 Transactions tests -2-
40922 IV-922 1. TSTART ():SERIAL ... TCOMMIT
2. TSTART *:S ... TRESTART ... TCOMMIT
3. TSTART lname:(S) ... TROLLBACK
40923 IV-923 1. TSTART (lname,lname):S ... TRESTART ... TROLLBACK
2. TSTART (lname,lname):S ... TROLLBACK
3. TSTART lname:S ... TRESTART ... TCOMMIT
End of Chapter 6. Validation Contents of Part-94