ij> AUTOCOMMIT OFF;
ij> -- MODULE   XTS753

-- SQL Test Suite, V6.0, Interactive SQL, xts753.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
--O   ROLLBACK WORK;

-- date_time print

-- TEST:7053 ALTER TABLE ADD COLUMN WITH <data type>!

   CREATE TABLE TAB753
         (COL1 DECIMAL(4),
          COL2 CHAR(10),
          COL3 CHAR(10));
0 rows inserted/updated/deleted
ij> -- PASS:7053 If table created successfully?

   COMMIT WORK;
ij> ALTER TABLE TAB753 ADD COLUMN COL4 NUMERIC(7);
0 rows inserted/updated/deleted
ij> -- PASS:7053 If table altered successfully?

   COMMIT WORK;
ij> --O   SELECT COUNT(*) FROM INFORMATION_SCHEMA.COLUMNS
--O         WHERE TABLE_SCHEMA = 'CTS1' AND TABLE_NAME = 'TAB753'
--O         AND COLUMN_NAME = 'COL4';
-- PASS:7053 If COUNT = 1?

--O   COMMIT WORK;

   ALTER TABLE TAB753 ADD COLUMN COL5 CHAR(7);
0 rows inserted/updated/deleted
ij> -- PASS:7053 If table altered successfully?

   COMMIT WORK;
ij> --O   SELECT COUNT(*) FROM INFORMATION_SCHEMA.COLUMNS
--O         WHERE TABLE_SCHEMA = 'CTS1' AND TABLE_NAME = 'TAB753'
--O         AND COLUMN_NAME = 'COL5';
-- PASS:7053 If COUNT = 1?

   INSERT INTO TAB753 VALUES(1000,'PHONE','NICKOS',12000,'blue');
1 row inserted/updated/deleted
ij> -- PASS:7053 If 1 row inserted?

   INSERT INTO TAB753 VALUES(1001,'HULME','CHEADLE',12001,'velvet');
1 row inserted/updated/deleted
ij> -- PASS:7053 If 1 row inserted?

   COMMIT WORK;
ij> SELECT COL1,COL2,COL3,COL4,COL5
         FROM TAB753
         ORDER BY COL1;
COL1 |COL2      |COL3      |COL4    |COL5   
--------------------------------------------
1000 |PHONE     |NICKOS    |12000   |blue   
1001 |HULME     |CHEADLE   |12001   |velvet 
ij> -- PASS:7053 If 2 rows are selected in the following order?
--               col1   col2    col3    col4     col5
--               ====   ====    ====    ====     ====
-- PASS:7053 If  1000   PHONE   NICKOS  12000    blue?
-- PASS:7053 If  1001   HULME   CHEADLE 12001    velvet?

   ROLLBACK WORK;
ij> --O   DROP TABLE TAB753 CASCADE;
   DROP TABLE TAB753 ;
0 rows inserted/updated/deleted
ij> -- PASS:7053 If table dropped successfully?

   COMMIT WORK;
ij> -- END TEST >>> 7053 <<< END TEST
-- *********************************************
-- *************************************************////END-OF-MODULE
;
ij>