ij> --
--   Licensed to the Apache Software Foundation (ASF) under one or more
--   contributor license agreements.  See the NOTICE file distributed with
--   this work for additional information regarding copyright ownership.
--   The ASF licenses this file to You under the Apache License, Version 2.0
--   (the "License"); you may not use this file except in compliance with
--   the License.  You may obtain a copy of the License at
--
--      http://www.apache.org/licenses/LICENSE-2.0
--
--   Unless required by applicable law or agreed to in writing, software
--   distributed under the License is distributed on an "AS IS" BASIS,
--   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
--   See the License for the specific language governing permissions and
--   limitations under the License.
--
AUTOCOMMIT OFF;
ij> -- MODULE  DML119  
-- SQL Test Suite, V6.0, Interactive SQL, dml119.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:0647 Feature 20, CAST functions (static)!
   CREATE TABLE USER_INPUT (
   USER_ID INT, USER_TYPED CHAR (10),
   CASH_BALANCE NUMERIC (5, 2));
0 rows inserted/updated/deleted
ij> -- PASS:0647 If table is created?
   COMMIT WORK;
ij> CREATE VIEW STANDARD_INPUT AS
  SELECT CAST (USER_ID AS CHAR (10)) AS USER_NAME,
         CAST (USER_TYPED AS NUMERIC (5, 2)) AS USER_INPUT,
         CAST (CASH_BALANCE AS REAL) AS RECEIVABLE
    FROM USER_INPUT;
0 rows inserted/updated/deleted
ij> -- PASS:0647 If view is created?
   COMMIT WORK;
ij> INSERT INTO USER_INPUT VALUES
  (0, '999.99', 999.99);
1 row inserted/updated/deleted
ij> -- PASS:0647 If 1 row is inserted?
   INSERT INTO USER_INPUT VALUES
  (1, '-999.99', -999.99);
1 row inserted/updated/deleted
ij> -- PASS:0647 If 1 row is inserted?
   INSERT INTO USER_INPUT VALUES
  (2, '  54.', 54);
1 row inserted/updated/deleted
ij> -- PASS:0647 If 1 row is inserted?
   INSERT INTO USER_INPUT VALUES
  (CAST ('3' AS INT), CAST (-7.02 AS CHAR (10)),
  CAST (' -.702E+1' AS NUMERIC (5, 2)));
ERROR 22018: Invalid character string format for type DECIMAL.
ij> -- PASS:0647 If 1 row is inserted?
   SELECT CAST (AVG (CAST (USER_TYPED AS INT)) AS INT)
  FROM USER_INPUT;
1          
-----------
ERROR 22018: Invalid character string format for type INTEGER.
ij> -- PASS:0647 If 1 row selected and value is 11 or 12?
   SELECT AVG (USER_INPUT)
  FROM STANDARD_INPUT;
1          
-----------
18.0000    
ij> -- PASS:0647 If 1 row selected and value is 11.745 +- 0.01?
   UPDATE USER_INPUT
  SET USER_TYPED = CAST (0 AS CHAR (10)),
  CASH_BALANCE = CASH_BALANCE - CAST ('500' AS NUMERIC (5, 2))
  WHERE USER_ID = CAST ('-0' AS INT);
1 row inserted/updated/deleted
ij> -- PASS:0647 If 1 row is updated?
   SELECT SUM (USER_INPUT) * 100, SUM (RECEIVABLE)
  FROM STANDARD_INPUT;
1                    |2            
-----------------------------------
-94599.00            |-446.0       
ij> -- PASS:0647 If 1 row selected and first value is -95301 +- 4?
-- PASS:0647 AND second value is -453.02 +- 0.04?
   DELETE FROM USER_INPUT;
3 rows inserted/updated/deleted
ij> INSERT INTO USER_INPUT VALUES
  (CAST ('3' AS INT), CAST (-7.02 AS CHAR (10)),
  CAST (' -.702E+1' AS NUMERIC (5, 2)));
ERROR 22018: Invalid character string format for type DECIMAL.
ij> -- PASS:0647 If 1 row is inserted?
   INSERT INTO USER_INPUT VALUES
  (CAST ('3' AS SMALLINT), CAST (-7.02 AS CHAR (5)),
  CAST (' -.702E+1' AS DECIMAL (3, 2)));
ERROR 22018: Invalid character string format for type DECIMAL.
ij> -- PASS:0647 If 1 row is inserted?
   SELECT USER_ID
  FROM USER_INPUT
  GROUP BY USER_ID, USER_TYPED, CASH_BALANCE
  HAVING COUNT(*) = 2;
USER_ID    
-----------
ij> -- PASS:0647 If 1 row selected and USER_ID = 3?
   COMMIT WORK;
ij> --O   DROP TABLE USER_INPUT CASCADE;
   drop view standard_input;
0 rows inserted/updated/deleted
ij> DROP TABLE USER_INPUT ;
0 rows inserted/updated/deleted
ij> COMMIT WORK;
ij> -- END TEST >>> 0647 <<< END TEST
-- *************************************************////END-OF-MODULE
;
ij>