blob: 198d60e5af2eab0794e9036a8eab06dac5ccedbb [file] [log] [blame]
AUTOCOMMIT OFF;
-- MODULE DML043
-- SQL Test Suite, V6.0, Interactive SQL, dml043.sql
-- 59-byte ID
-- TEd Version #
-- AUTHORIZATION HU
set schema HU;
--O SELECT USER FROM HU.ECCO;
VALUES USER;
-- RERUN if USER value does not match preceding AUTHORIZATION comment
-- date_time print
-- TEST:0214 FIPS sizing -- 2000-byte row!
-- FIPS sizing TEST
-- setup
INSERT INTO T2000(STR110,STR200,STR216)
VALUES
('STR11111111111111111111111111111111111111111111111',
'STR22222222222222222222222222222222222222222222222',
'STR66666666666666666666666666666666666666666666666');
-- PASS:0214 If 1 row is inserted?
UPDATE T2000
SET STR140 =
'STR44444444444444444444444444444444444444444444444';
-- PASS:0214 If 1 row is updated?
UPDATE T2000
SET STR180 =
'STR88888888888888888888888888888888888888888888888';
-- PASS:0214 If 1 row is updated?
SELECT STR110,STR180,STR216
FROM T2000;
-- PASS:0214 If STR180 = ?
-- PASS:0214 'STR88888888888888888888888888888888888888888888888'?
-- PASS:0214 If STR216 = ?
-- PASS:0214 'STR66666666666666666666666666666666666666666666666'?
-- restore
ROLLBACK WORK;
-- END TEST >>> 0214 <<< END TEST
-- *************************************************////END-OF-MODULE