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
|
ij> AUTOCOMMIT OFF;
ij> -- MODULE DML046
-- SQL Test Suite, V6.0, Interactive SQL, dml046.sql
-- 59-byte ID
-- TEd Version #
-- AUTHORIZATION HU
set schema HU;
0 rows inserted/updated/deleted
ij> --O SELECT USER FROM HU.ECCO;
VALUES USER;
1
--------------------------------------------------------------------------------------------------------------------------------
HU
ij> -- RERUN if USER value does not match preceding AUTHORIZATION comment
-- date_time print
-- TEST:0220 FIPS sizing -- 6 column in ORDER BY!
-- FIPS sizing TEST
-- setup
INSERT INTO T12
VALUES('1','22','4444','666666','88888884','1010101010',
'2020...20','3030...30','4040...40','5050...50',11,12);
1 row inserted/updated/deleted
ij> -- PASS:0220 If 1 row is inserted?
INSERT INTO T12
VALUES('1','22','4444','666666','88888883','1010101010',
'2020...20','3030...30','4040...40','5050...50',22,24);
1 row inserted/updated/deleted
ij> -- PASS:0220 If 1 row is inserted?
INSERT INTO T12
VALUES('1','22','4444','666666','88888882','0101010101',
'2020...20','3030...30','4040...40','5050...50',33,36);
1 row inserted/updated/deleted
ij> -- PASS:0220 If 1 row is inserted?
INSERT INTO T12
VALUES('1','22','4444','666666','88888881','0101010101',
'2020...20','3030...30','4040...40','5050...50',44,48);
1 row inserted/updated/deleted
ij> -- PASS:0220 If 1 row is inserted?
--O SELECT COUNT(*)
SELECT COL5
FROM T12;
COL5
--------
88888884
88888883
88888882
88888881
ij> -- PASS:0220 If count = 4?
SELECT COL5,COL6,COL11,COL3,COL4,COL7,COL8
FROM T12
ORDER BY COL7,COL8,COL3,COL4,COL6,COL5 DESC;
COL5 |COL6 |COL11 |COL3|COL4 |COL7 |COL8
-----------------------------------------------------------------------------------------------
88888882|0101010101|33 |4444|666666|2020...20 |3030...30
88888881|0101010101|44 |4444|666666|2020...20 |3030...30
88888884|1010101010|11 |4444|666666|2020...20 |3030...30
88888883|1010101010|22 |4444|666666|2020...20 |3030...30
ij> -- PASS:0220 If 4 rows are selected and first row?
-- PASS:0220 COL5 = 88888882, COL6 = 0101010101 and COL11 = 33?
-- restore
ROLLBACK WORK;
ij> -- END TEST >>> 0220 <<< END TEST
-- **************************************************************
-- TEST:0221 FIPS sizing -- 120 bytes in ORDER BY!
-- FIPS sizing TEST
-- setup
INSERT INTO T12
VALUES('1','22','4442','666666','88888888','1010101010',
'20202020202020202020','303030303030303030303030303030',
'4040404040404040404040404040404040404040', '5050...50',111,112);
1 row inserted/updated/deleted
ij> -- PASS:0221 If 1 row is inserted?
INSERT INTO T12
VALUES('1','22','4443','666666','88888888','1010101010',
'20202020202020202020','303030303030303030303030303030',
'4040404040404040404040404040404040404040', '5050...50',222,224);
1 row inserted/updated/deleted
ij> -- PASS:0221 If 1 row is inserted?
INSERT INTO T12
VALUES('1','22','4441','666666','88888888','1010101010',
'20202020202020202020','303030303030303030303030303030',
'4040404040404040404040404040404040404040', '5050...50',333,336);
1 row inserted/updated/deleted
ij> -- PASS:0221 If 1 row is inserted?
INSERT INTO T12
VALUES('1','22','4444','666666','88888888','1010101010',
'20202020202020202020','303030303030303030303030303030',
'4040404040404040404040404040404040404040', '5050...50',444,448);
1 row inserted/updated/deleted
ij> -- PASS:0221 If 1 row is inserted?
--O SELECT COUNT(*)
SELECT COL3
FROM T12;
COL3
----
4442
4443
4441
4444
ij> -- PASS:0221 If count = 4?
SELECT COL3,COL11,COL9,COL8,COL7,COL5,COL4
FROM T12
ORDER BY COL9,COL8,COL7,COL5,COL4,COL3;
COL3|COL11 |COL9 |COL8 |COL7 |COL5 |COL4
-----------------------------------------------------------------------------------------------------------------------------
4441|333 |4040404040404040404040404040404040404040|303030303030303030303030303030|20202020202020202020|88888888|666666
4442|111 |4040404040404040404040404040404040404040|303030303030303030303030303030|20202020202020202020|88888888|666666
4443|222 |4040404040404040404040404040404040404040|303030303030303030303030303030|20202020202020202020|88888888|666666
4444|444 |4040404040404040404040404040404040404040|303030303030303030303030303030|20202020202020202020|88888888|666666
ij> -- PASS:0221 If 4 rows are selected ?
-- PASS:0221 If first row COL3 = 4441 and COL11 = 333?
-- restore
ROLLBACK WORK;
ij> -- END TEST >>> 0221 <<< END TEST
-- *************************************************////END-OF-MODULE
;
ij>
|
