ij> AUTOCOMMIT OFF;
ij> -- MODULE  DML099  

-- SQL Test Suite, V6.0, Interactive SQL, dml099.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

-- NO_TEST:0581 Implicit numeric casting (feature 9) dynamic!

-- Testing dynamic SQL

-- *********************************************

-- TEST:0582 Implicit numeric casting (feature 9) static!

   CREATE TABLE ICAST2 (C1 INT, C2 DOUBLE PRECISION, C3 NUMERIC(5,3));
0 rows inserted/updated/deleted
ij> -- PASS:0582 If table is created?

   COMMIT WORK;
ij> INSERT INTO ICAST2 VALUES (.31416E+1, 3, .3142293E+1);
1 row inserted/updated/deleted
ij> -- PASS:0582 If 1 row is inserted?

   SELECT C1, C2, C3 FROM ICAST2;
C1         |C2                    |C3     
------------------------------------------
3          |3.0                   |3.142  
ij> -- PASS:0582 If 1 row is selected with C1 = 3 and C3 = 3.142?

   UPDATE ICAST2 SET C1 = 5.2413E+0, C2 = 5, C3 = 5.2413E+0;
1 row inserted/updated/deleted
ij> -- PASS:0582 If 1 row is updated?

   SELECT C1, C2, C3 FROM ICAST2;
C1         |C2                    |C3     
------------------------------------------
5          |5.0                   |5.241  
ij> -- PASS:0582 If 1 row is selected with C1 = 5 and C3 = 5.241?

   UPDATE ICAST2 SET C1 = 6.28E+0, C2 = 2.1E+0, C3 = .07E+2;
1 row inserted/updated/deleted
ij> -- PASS:0582 If 1 row is updated?

   UPDATE ICAST2 SET C1 = C2, C3 = C3 + C2;
1 row inserted/updated/deleted
ij> -- PASS:0582 If 1 row is updated?

   SELECT C1, C2, C3 FROM ICAST2;
C1         |C2                    |C3     
------------------------------------------
2          |2.1                   |9.100  
ij> -- PASS:0582 If 1 row is selected with C1 = 2 and C3 = 9.100?

   ROLLBACK WORK;
ij> --O   DROP TABLE ICAST2 CASCADE;
   DROP TABLE ICAST2 ;
0 rows inserted/updated/deleted
ij> COMMIT WORK;
ij> -- END TEST >>> 0582 <<< END TEST
-- *********************************************

-- NO_TEST:0583 FIPS sizing, Dynamic SQL character strings!

-- Testing dynamic SQL

-- *************************************************////END-OF-MODULE
;
ij>