blob: 232a97175c3bb2c0ac5c34abf342bf151e1d45ec [file]
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>