1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
|
ij> AUTOCOMMIT OFF;
ij> -- MODULE XTS729
-- SQL Test Suite, V6.0, Interactive SQL, xts729.sql
-- 59-byte ID
-- TEd Version #
-- AUTHORIZATION CTS1
set schema CTS1;
0 rows inserted/updated/deleted
ij> --O SELECT USER FROM HU.ECCO;
VALUES USER;
1
--------------------------------------------------------------------------------------------------------------------------------
CTS1
ij> -- RERUN if USER value does not match preceding AUTHORIZATION comment
-- date_time print
ROLLBACK WORK;
ij> -- TEST:7029 Column name with 19, 72 and 128 characters!
-- NOTE: If long lines are not supported by the ISQL interfac, an
-- implementation defined line continuation format may be used
-- Begin 19 character column names
CREATE TABLE TESTA6439
(COLUMNOFCHARACTERSA CHARACTER(10),
columnofcharactersb CHARACTER(10),
cOlUmNoFNUMERICss_0 NUMERIC(5),
cOlUmNoFNUMERICss_1 NUMERIC(5));
0 rows inserted/updated/deleted
ij> -- PASS:7029 If table created successfully?
COMMIT WORK;
ij> --O INSERT INTO CTS1.TESTA6439
INSERT INTO TESTA6439
VALUES('ABCD','DCBA',1,9999);
1 row inserted/updated/deleted
ij> -- PASS:7029 If 1 row inserted successfully?
COMMIT WORK;
ij> SELECT COLUMNOFCHARACTERSA, columnofcharactersb,
cOlUmNoFNUMERICss_0, cOlUmNoFNUMERICss_1
--O FROM CTS1.TESTA6439;
FROM TESTA6439;
COLUMNOFC&|COLUMNOFC&|COLUM&|COLUM&
-----------------------------------
ABCD |DCBA |1 |9999
ij> -- PASS:7029 If COLUMNOFCHARACTERSA = ABCD?
-- PASS:7029 If columnofcharactersb = DCBA?
-- PASS:7029 If cOlUmNoFNUMERICss_0 = 1?
-- PASS:7029 If cOlUmNoFNUMERICss_1 = 9999?
COMMIT WORK;
ij> --O DROP TABLE TESTA6439 CASCADE;
DROP TABLE TESTA6439 ;
0 rows inserted/updated/deleted
ij> -- PASS:7029 If table dropped successfully?
COMMIT WORK;
ij> -- End 19 character column names
-- Begin 30 character column names
CREATE TABLE TESTB6439
(COLUMNOFCHARACTERDATATYPE123a CHARACTER(3),
columnofcharacterdatatype123b CHARACTER(3),
cOlUmNoFNUMERIC123456789012_0 NUMERIC(5),
CoLuMnOfNUMERIC123456789012_1 NUMERIC(5));
0 rows inserted/updated/deleted
ij> -- PASS:7029 If table created successfully?
COMMIT WORK;
ij> --O INSERT INTO CTS1.TESTB6439
INSERT INTO TESTB6439
VALUES('AB','BB',1,2);
1 row inserted/updated/deleted
ij> -- PASS:7029 If 1 row inserted successfully?
--O INSERT INTO CTS1.TESTB6439
INSERT INTO TESTB6439
VALUES('CC','DD',3,4);
1 row inserted/updated/deleted
ij> -- PASS:7029 If 1 row inserted successfully?
--O INSERT INTO CTS1.TESTB6439
INSERT INTO TESTB6439
VALUES('EE','FF',5,6);
1 row inserted/updated/deleted
ij> -- PASS:7029 If 1 row inserted successfully?
--O INSERT INTO CTS1.TESTB6439
INSERT INTO TESTB6439
VALUES('GG','HH',7,8);
1 row inserted/updated/deleted
ij> -- PASS:7029 If 1 row inserted successfully?
--O INSERT INTO CTS1.TESTB6439
INSERT INTO TESTB6439
VALUES('II','KK',9,0);
1 row inserted/updated/deleted
ij> -- PASS:7029 If 1 row inserted successfully?
--O SELECT * FROM CTS1.TESTB6439
SELECT * FROM TESTB6439
ORDER BY cOlUmNoFNUMERIC123456789012_0;
COL&|COL&|COLUM&|COLUM&
-----------------------
AB |BB |1 |2
CC |DD |3 |4
EE |FF |5 |6
GG |HH |7 |8
II |KK |9 |0
ij> -- PASS:7029 If 5 rows selected in the following order?
-- === === === ===
-- PASS:7029 If AB BB 1 2?
-- PASS:7029 If CC DD 3 4?
-- PASS:7029 If EE FF 5 6?
-- PASS:7029 If GG HH 7 8?
-- PASS:7029 If II KK 9 0?
--O SELECT COLUMN_NAME, ORDINAL_POSITION
--O FROM INFORMATION_SCHEMA.COLUMNS
--O WHERE TABLE_SCHEMA = 'CTS1' AND TABLE_NAME = 'TESTB6439'
--O ORDER BY ORDINAL_POSITION;
-- PASS:7029 If 4 rows are selected in the following order?
--
-- PASS:7029 If r1,c1 = COLUMNOFCHARACTERDATATYPE12345678901234567890
-- 1234567890123456789012345678901234567890
-- 1234567890123456789012345678901234567890123?
-- PASS:7029 If row1,col2 = 1?
-- PASS:7029 If r2,c1 = COLUMNOFCHARACTERDATATYPE12345678901234567890
-- 1234567890123456789012345678901234567890
-- 123456789012345678901234567890123456789012B?
-- PASS:7029 If row2,col2 = 2?
-- PASS:7029 If r3,c1 = COLUMNOFNUMERIC123456789012345678901234567890
-- 1234567890123456789012345678901234567890
-- 12345678901234567890123456789012345678901_0?
-- PASS:7029 If row3,col2 = 3?
-- PASS:7029 If r4,c1 = COLUMNOFNUMERIC123456789012345678901234567890
-- 1234567890123456789012345678901234567890
-- 12345678901234567890123456789012345678901_1?
-- PASS:7029 If row4,col2 = 4?
COMMIT WORK;
ij> --O ALTER TABLE CTS1.TESTB6439
ALTER TABLE TESTB6439
ADD COLUMN
columnofcharacterdatatype123C CHAR(3);
0 rows inserted/updated/deleted
ij> -- PASS:7029 If table altered successfully?
COMMIT WORK;
ij> --O INSERT INTO CTS1.TESTB6439
INSERT INTO TESTB6439
VALUES('TTT','TTT',100,100,'ADD');
1 row inserted/updated/deleted
ij> -- PASS:7029 If 1 row inserted successfully?
--O SELECT * FROM CTS1.TESTB6439
SELECT * FROM TESTB6439
WHERE columnofcharacterdatatype123C = 'ADD';
COL&|COL&|COLUM&|COLUM&|COL&
----------------------------
TTT |TTT |100 |100 |ADD
ij> -- PASS:7029 If 5 values = TTT TTT 100 100 ADD?
ROLLBACK WORK;
ij> --O DROP TABLE TESTB6439 CASCADE;
DROP TABLE TESTB6439 ;
0 rows inserted/updated/deleted
ij> -- PASS:7029 If table dropped successfully?
COMMIT WORK;
ij> -- End 128 character column names
-- Begin 72 character column names
CREATE TABLE TESTC6439 (COLUMNOFCHARACTERSA CHAR(3),
columnofcharacterdatatype123a
CHAR(3));
0 rows inserted/updated/deleted
ij> -- PASS:7029 If table created successfully?
COMMIT WORK;
ij> --O INSERT INTO CTS1.TESTC6439
INSERT INTO TESTC6439
VALUES('aba','bbb');
1 row inserted/updated/deleted
ij> -- PASS:7029 If 1 row inserted successfully?
--O INSERT INTO CTS1.TESTC6439
INSERT INTO TESTC6439
VALUES ('ccc','ddd');
1 row inserted/updated/deleted
ij> -- PASS:7029 If 1 row inserted successfully?
--O INSERT INTO CTS1.TESTC6439
INSERT INTO TESTC6439
VALUES('eee','fff');
1 row inserted/updated/deleted
ij> -- PASS:7029 If 1 row inserted successfully?
--O SELECT * FROM CTS1.TESTC6439
SELECT * FROM TESTC6439
ORDER BY COLUMNOFCHARACTERSA;
COL&|COL&
---------
aba |bbb
ccc |ddd
eee |fff
ij> -- PASS:7029 If 3 rows selected in the following order?
-- === ===
-- PASS:7029 If aba bbb?
-- PASS:7029 If ccc ddd?
-- PASS:7029 If eee fff?
COMMIT WORK;
ij> --O DROP TABLE TESTC6439 CASCADE;
DROP TABLE TESTC6439 ;
0 rows inserted/updated/deleted
ij> -- PASS:7029 If table dropped successfully?
COMMIT WORK;
ij> -- End 72 character column names
-- END TEST >>> 7029 <<< END TEST
-- *********************************************
-- *************************************************////END-OF-MODULE
;
ij>
|
