blob: b4e1edc758f61c9f3c3cc8f745360a55742ac2c8 [file]
ij> AUTOCOMMIT OFF;
ij> -- MODULE DML155
-- SQL Test Suite, V6.0, Interactive SQL, dml155.sql
-- 59-byte ID
-- TEd Version #
-- AUTHORIZATION FLATER
set schema FLATER;
0 rows inserted/updated/deleted
ij> --O SELECT USER FROM HU.ECCO;
VALUES USER;
1
--------------------------------------------------------------------------------------------------------------------------------
FLATER
ij> -- RERUN if USER value does not match preceding AUTHORIZATION comment
ROLLBACK WORK;
ij> -- date_time print
-- TEST:0850 Comparing fixed vs. variable length caracter strings!
CREATE TABLE T850 (
--O T850KEY INT NOT NULL UNIQUE,
T850KEY INT NOT NULL constraint t850_unique UNIQUE,
T850C CHAR (11),
T850VC VARCHAR (10),
T850LVC VARCHAR (20));
0 rows inserted/updated/deleted
ij> -- PASS:0850 If table created successfully?
COMMIT WORK;
ij> INSERT INTO T850 VALUES (
10, '1234567890', '1234567890', '1234567890 ');
1 row inserted/updated/deleted
ij> -- PASS:0850 If 1 row inserted successfully?
INSERT INTO T850 VALUES (
5, '12345 ', '12345', '12345');
1 row inserted/updated/deleted
ij> -- PASS:0850 If 1 row inserted successfully?
INSERT INTO T850 VALUES (
0, ' ', '', ' ');
1 row inserted/updated/deleted
ij> -- PASS:0850 If 1 row inserted successfully?
--O SELECT COUNT(*)
SELECT *
FROM T850 WHERE T850C = T850VC;
T850KEY |T850C |T850VC |T850LVC
-------------------------------------------------------
10 |1234567890 |1234567890|1234567890
5 |12345 |12345 |12345
0 | | |
ij> -- PASS:0850 If COUNT = 3?
SELECT T850KEY
FROM T850 WHERE T850VC = '1234567890 ';
T850KEY
-----------
10
ij> -- PASS:0850 If T850KEY = 10?
SELECT T850KEY
FROM T850 WHERE T850VC = '12345 ';
T850KEY
-----------
5
ij> -- PASS:0850 If T850KEY = 5?
SELECT T850KEY
--N FROM T850 WHERE T850VC = '1234567890 '; error in NIST test
FROM T850 WHERE T850VC = ' ';
T850KEY
-----------
0
ij> --N this corresponds to the esql/c test
-- PASS:0850 If T850KEY = 0?
--O SELECT COUNT(*)
SELECT *
FROM T850 WHERE T850C = '1234567890';
T850KEY |T850C |T850VC |T850LVC
-------------------------------------------------------
10 |1234567890 |1234567890|1234567890
ij> -- INFORMATIONAL
--O SELECT COUNT(*)
SELECT *
FROM T850 WHERE T850C = '12345';
T850KEY |T850C |T850VC |T850LVC
-------------------------------------------------------
5 |12345 |12345 |12345
ij> -- INFORMATIONAL
--O SELECT COUNT(*)
SELECT *
FROM T850 WHERE T850VC = T850LVC;
T850KEY |T850C |T850VC |T850LVC
-------------------------------------------------------
10 |1234567890 |1234567890|1234567890
5 |12345 |12345 |12345
0 | | |
ij> -- PASS:0850 If COUNT = 3?
--O SELECT COUNT(*)
SELECT *
FROM T850 WHERE T850VC = '12345 ';
T850KEY |T850C |T850VC |T850LVC
-------------------------------------------------------
5 |12345 |12345 |12345
ij> -- PASS:0850 If COUNT = 1?
--O SELECT COUNT(*)
SELECT *
FROM T850 WHERE T850VC = '12345 ';
T850KEY |T850C |T850VC |T850LVC
-------------------------------------------------------
5 |12345 |12345 |12345
ij> -- PASS:0850 If COUNT = 1?
--O SELECT COUNT(*)
SELECT *
FROM T850 WHERE T850LVC = '12345 ';
T850KEY |T850C |T850VC |T850LVC
-------------------------------------------------------
5 |12345 |12345 |12345
ij> -- PASS:0850 If COUNT = 1?
--O SELECT COUNT(*)
SELECT *
FROM T850 WHERE T850LVC = '12345 ';
T850KEY |T850C |T850VC |T850LVC
-------------------------------------------------------
5 |12345 |12345 |12345
ij> -- PASS:0850 If COUNT = 1?
--O SELECT COUNT(*)
SELECT *
FROM T850 WHERE T850C = '12345 ';
T850KEY |T850C |T850VC |T850LVC
-------------------------------------------------------
5 |12345 |12345 |12345
ij> -- PASS:0850 If COUNT = 1?
--O SELECT COUNT(*)
SELECT *
FROM T850 WHERE T850C = '12345 ';
T850KEY |T850C |T850VC |T850LVC
-------------------------------------------------------
5 |12345 |12345 |12345
ij> -- PASS:0850 If COUNT = 1?
ROLLBACK WORK;
ij> --O DROP TABLE T850 CASCADE;
DROP TABLE T850 ;
0 rows inserted/updated/deleted
ij> COMMIT WORK;
ij> -- END TEST >>> 0850 <<< END TEST
-- *********************************************
-- *************************************************////END-OF-MODULE
;
ij>