blob: 0debb2e66d5bb2a69ae5c621b049f30982f7df6f [file] [log] [blame]
ij> AUTOCOMMIT OFF;
ij> -- MODULE DML008
-- SQL Test Suite, V6.0, Interactive SQL, dml008.sql
-- 59-byte ID
-- TEd Version #
-- AUTHORIZATION HU
set schema HU;
0 rows inserted/updated/deleted
ij> --O SELECT USER FROM HU.ECCO;
VALUES USER;
1
--------------------------------------------------------------------------------------------------------------------------------
HU
ij> -- RERUN if USER value does not match preceding AUTHORIZATION comment
-- date_time print
-- TEST:0016 SELECT ALL syntax!
SELECT ALL EMPNUM
FROM WORKS
WHERE HOURS = 12;
EM&
---
E1
E1
ij> -- PASS:0016 If 2 rows are selected and both EMPNUMs are 'E1'?
-- END TEST >>> 0016 <<< END TEST
-- *************************************************************
-- TEST:0164 SELECT:default is ALL, not DISTINCT!
SELECT EMPNUM
FROM WORKS
WHERE HOURS = 12;
EM&
---
E1
E1
ij> -- PASS:0164 If 2 rows are selected and both EMPNUMs are 'E1'?
-- END TEST >>> 0164 <<< END TEST
-- ************************************************************
-- TEST:0017 SELECT:checks DISTINCT!
SELECT DISTINCT EMPNUM
FROM WORKS
WHERE HOURS = 12;
EM&
---
E1
ij> -- PASS:0017 If 1 row is selected and EMPNUM = 'E1'?
-- END TEST >>> 0017 <<< END TEST
-- ***********************************************************
-- TEST:0018 SQLCODE = 100, SELECT with no data!
SELECT EMPNUM,PNUM
FROM WORKS
WHERE EMPNUM = 'E16';
EM&|PN&
-------
ij> -- PASS:0018 If 0 rows selected, SQLCODE = 100, end of data?
-- END TEST >>> 0018 <<< END TEST
-- ***********************************************************
-- TEST:0019 SQLCODE = 0, SELECT with data!
SELECT EMPNUM,HOURS
FROM WORKS
WHERE EMPNUM = 'E1' AND PNUM = 'P4';
EM&|HOURS
----------
E1 |20
ij> -- PASS:0019 If HOURS = 20 ?
-- END TEST >>> 0019 <<< END TEST
-- **********************************************************
-- TEST:0020 SELECT NULL value !
-- setup
INSERT INTO WORKS
VALUES('E18','P18',NULL);
1 row inserted/updated/deleted
ij> -- PASS:0020 If 1 row is inserted?
SELECT EMPNUM,HOURS
FROM WORKS
WHERE EMPNUM='E18' AND PNUM='P18';
EM&|HOURS
----------
E18|NULL
ij> -- PASS:0020 If EMPNUM = 'E18' and HOURS is NULL?
-- restore
ROLLBACK WORK;
ij> -- END TEST >>> 0020 <<< END TEST
-- **********************************************************
-- NO_TEST:0021 SELECT CHAR(m) column into shorter var, get indic = m!
-- Testing indicators
-- ***********************************************************
-- NO_TEST:0165 Truncate CHAR column SELECTed into shorter var!
-- Testing host identifiers
-- *************************************************////END-OF-MODULE
;
ij>