mariadb/mysql-test/suite/compat/oracle/t/sp-row.test

2418 lines
39 KiB
Text

SET sql_mode=ORACLE;
--echo #
--echo # MDEV-10914 ROW data type for stored routine variables
--echo #
--echo #
--echo # ROW of ROWs is not supported yet
--echo #
DELIMITER $$;
--error ER_PARSE_ERROR
CREATE PROCEDURE p1()
AS
a ROW(a ROW(a INT));
BEGIN
END;
$$
DELIMITER ;$$
--echo #
--echo # Returning the entire ROW parameter from a function
--echo #
# TODO: this should probably return an error at compile time
DELIMITER $$;
CREATE FUNCTION f1(a ROW(a INT, b INT)) RETURN INT
AS
BEGIN
RETURN a;
END;
$$
DELIMITER ;$$
--error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
SELECT f1(ROW(10,20));
DROP FUNCTION f1;
--echo #
--echo # ROW as an SP parameter
--echo #
DELIMITER $$;
CREATE FUNCTION f1(a ROW(a INT,b INT)) RETURN INT
AS
BEGIN
RETURN a.b;
END;
$$
CREATE PROCEDURE p1()
AS
a ROW(a INT,b INT):=(11,21);
BEGIN
SELECT f1(a);
END;
$$
DELIMITER ;$$
SELECT f1(ROW(10,20));
--error ER_OPERAND_COLUMNS
SELECT f1(10);
--error ER_OPERAND_COLUMNS
SELECT f1(ROW(10,20,30));
CALL p1();
DROP PROCEDURE p1;
DROP FUNCTION f1;
DELIMITER $$;
CREATE PROCEDURE p1(a ROW(a INT,b INT))
AS
BEGIN
SELECT a.a, a.b;
END;
$$
DELIMITER ;$$
CALL p1(ROW(10,20));
--error ER_OPERAND_COLUMNS
CALL p1(10);
--error ER_OPERAND_COLUMNS
CALL p1(ROW(10,20,30));
DROP PROCEDURE p1;
--echo #
--echo # ROW as an SP OUT parameter
--echo #
DELIMITER $$;
CREATE PROCEDURE p1(a OUT ROW(a INT,b INT))
AS
BEGIN
a.a:=10;
a.b:=20;
END;
$$
CREATE PROCEDURE p2
AS
a ROW(a INT,b INT):=(11,21);
BEGIN
CALL p1(a);
SELECT a.a,a.b;
END;
$$
DELIMITER ;$$
CALL p2();
DROP PROCEDURE p2;
DROP PROCEDURE p1;
--echo #
--echo # ROW as an SP return value is not supported yet
--echo #
DELIMITER $$;
--error ER_PARSE_ERROR
CREATE FUNCTION p1() RETURN ROW(a INT)
AS
BEGIN
RETURN NULL;
END;
$$
DELIMITER ;$$
--echo #
--echo # Diplicate row field
--echo #
DELIMITER $$;
--error ER_DUP_FIELDNAME
CREATE PROCEDURE p1()
AS
a ROW (a INT, a DOUBLE);
BEGIN
SELECT a.a;
END;
$$
DELIMITER ;$$
--echo #
--echo # Bad scalar default value
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW (a INT, b DOUBLE):= 1;
BEGIN
SELECT a.a;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Bad ROW default value with a wrong number of fields
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW (a INT, b DOUBLE):= ROW(1,2,3);
BEGIN
SELECT a.a;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Scalar variable vs table alias cause no ambiguity
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a INT;
BEGIN
-- a.x is a table column here (not a row variable field)
SELECT a.x FROM a;
SELECT a.x FROM t1 a;
END;
$$
DELIMITER ;$$
DROP PROCEDURE p1;
--echo #
--echo # Using the entire ROW variable in select list
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW (a INT);
BEGIN
SELECT a;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP PROCEDURE p1;
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW (a INT,b INT);
BEGIN
SELECT a;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Using the entire ROW variable in functions
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW (a INT);
BEGIN
SELECT COALESCE(a);
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP PROCEDURE p1;
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW (a INT,b INT);
BEGIN
SELECT COALESCE(a);
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP PROCEDURE p1;
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW (a INT);
BEGIN
SELECT a+1;
END;
$$
DELIMITER ;$$
--error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
CALL p1();
DROP PROCEDURE p1;
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW (a INT,b INT);
BEGIN
SELECT a+1;
END;
$$
DELIMITER ;$$
--error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Comparing the entire ROW to a scalar value
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW (a INT,b INT);
BEGIN
SELECT a=1;
END;
$$
DELIMITER ;$$
--error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
CALL p1();
DROP PROCEDURE p1;
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW (a INT,b INT);
BEGIN
SELECT 1=a;
END;
$$
DELIMITER ;$$
--error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Passing the entire ROW to a stored function
--echo #
DELIMITER $$;
CREATE FUNCTION f1(a INT) RETURN INT
AS
BEGIN
RETURN a;
END;
$$
CREATE PROCEDURE p1()
AS
a ROW (a INT,b INT);
BEGIN
SELECT f1(a);
END;
$$
DELIMITER ;$$
--error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
CALL p1();
DROP PROCEDURE p1;
DROP FUNCTION f1;
DELIMITER $$;
CREATE FUNCTION f1(a INT) RETURN INT
AS
BEGIN
RETURN a;
END;
$$
CREATE PROCEDURE p1()
AS
a ROW (a INT);
BEGIN
SELECT f1(a);
END;
$$
DELIMITER ;$$
--error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
CALL p1();
DROP PROCEDURE p1;
DROP FUNCTION f1;
--echo #
--echo # Assigning a scalar value to a ROW variable with 1 column
--echo #
DELIMITER $$;
CREATE OR REPLACE PROCEDURE p1
AS
rec ROW(a INT);
BEGIN
rec:=1;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Assigning a scalar value to a ROW variable with 2 columns
--echo #
DELIMITER $$;
CREATE OR REPLACE PROCEDURE p1
AS
rec ROW(a INT,b INT);
BEGIN
rec:=1;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Assigning a ROW value to a ROW variable with different number of columns
--echo #
DELIMITER $$;
CREATE OR REPLACE PROCEDURE p1
AS
rec ROW(a INT,b INT);
BEGIN
rec:=ROW(1,2,3);
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Returning the entire ROW from a function is not supported yet
--echo # This syntax would be needed: SELECT f1().x FROM DUAL;
--echo #
DELIMITER $$;
CREATE FUNCTION f1(a INT) RETURN INT
AS
rec ROW(a INT);
BEGIN
RETURN rec;
END;
$$
DELIMITER ;$$
--error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
SELECT f1(10);
DROP FUNCTION f1;
--echo #
--echo # Using the entire ROW in SELECT..CREATE
--echo #
DELIMITER $$;
CREATE PROCEDURE p1
AS
rec ROW(a INT,b INT);
BEGIN
CREATE TABLE t1 AS SELECT rec;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Using the entire ROW in LIMIT
--echo #
DELIMITER $$;
--error ER_WRONG_SPVAR_TYPE_IN_LIMIT
CREATE PROCEDURE p1()
AS
rec ROW(a INT);
BEGIN
rec.a:= '10';
SELECT * FROM t1 LIMIT rec;
END;
$$
DELIMITER ;$$
--echo #
--echo # Setting ROW fields using a SET command
--echo #
DELIMITER $$;
CREATE OR REPLACE PROCEDURE p1
AS
rec ROW(a INT,b DOUBLE,c VARCHAR(10));
a INT;
BEGIN
SET @a= 10, rec.a=10, rec.b=20, rec.c= 'test', a= 5;
SELECT rec.a, rec.b, rec.c, a;
END;
$$
DELIMITER ;$$
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Assigning a ROW variable from a ROW value
--echo #
DELIMITER $$;
CREATE PROCEDURE p1
AS
rec ROW(a INT,b INT);
BEGIN
rec:=ROW(1,2);
SELECT rec.a, rec.b;
END;
$$
DELIMITER ;$$
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Assigning a ROW variable from another ROW value
--echo #
DELIMITER $$;
CREATE PROCEDURE p1
AS
rec1 ROW(a INT,b INT);
rec2 ROW(a INT,b INT);
BEGIN
rec1:=ROW(1,2);
rec2:=rec1;
SELECT rec2.a, rec2.b;
END;
$$
DELIMITER ;$$
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Comparing a ROW variable to a ROW() function
--echo #
DELIMITER $$;
CREATE OR REPLACE PROCEDURE p1
AS
rec ROW(a INT,b INT);
BEGIN
rec.a:= 1;
rec.b:= 2;
SELECT rec=(0,0), rec=ROW(0,0), (0,0)=rec, ROW(0,0)=rec;
SELECT rec=(1,2), rec=ROW(1,2), (1,2)=rec, ROW(1,2)=rec;
SELECT rec=(NULL,0), rec=ROW(NULL,0);
SELECT rec=(NULL,2), rec=ROW(NULL,2);
SELECT rec<>(0,0), rec<>ROW(0,0);
SELECT rec<>(1,2), rec<>ROW(1,2);
SELECT rec<>(NULL,0), rec<>ROW(NULL,0);
SELECT rec<>(NULL,2), rec<>ROW(NULL,2);
SELECT rec IN ((0,0)), rec IN (ROW(0,0));
SELECT rec IN ((1,2)), rec IN (ROW(1,2));
SELECT rec IN ((0,NULL),(1,2));
SELECT rec NOT IN ((0,NULL),(1,1));
SELECT rec NOT IN ((1,NULL),(1,1));
END;
$$
DELIMITER ;$$
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Comparing a ROW variable to another ROW variable
--echo #
DELIMITER $$;
CREATE OR REPLACE PROCEDURE p1
AS
rec1,rec2,rec3 ROW(a INT,b INT);
BEGIN
rec1.a:= 1;
rec1.b:= 2;
rec2.a:= 11;
rec2.b:= 12;
rec3.a:= 11;
rec3.b:= 12;
SELECT rec1=rec2, rec2=rec1, rec2=rec3, rec3=rec2;
END;
$$
DELIMITER ;$$
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # Referencing a non-existing row variable
--echo #
DELIMITER $$;
--error ER_UNKNOWN_STRUCTURED_VARIABLE
CREATE PROCEDURE p1()
AS
BEGIN
SET a.b=1;
END;
$$
DELIMITER ;$$
DELIMITER $$;
--error ER_UNKNOWN_STRUCTURED_VARIABLE
CREATE PROCEDURE p1()
AS
BEGIN
a.b:=1;
END;
$$
DELIMITER ;$$
--echo #
--echo # Referencing a non-existing row field
--echo #
DELIMITER $$;
--error ER_ROW_VARIABLE_DOES_NOT_HAVE_FIELD
CREATE PROCEDURE p1()
AS
a ROW(a INT,b INT);
BEGIN
SELECT a.c FROM t1;
END;
$$
DELIMITER ;$$
--echo #
--echo # ROW and scalar variables with the same name shadowing each other
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW(a INT);
BEGIN
a.a:=100;
DECLARE
a INT:= 200;
BEGIN
SELECT a;
DECLARE
a ROW(a INT);
BEGIN
a.a:=300;
SELECT a.a;
END;
SELECT a;
END;
SELECT a.a;
END;
$$
DELIMITER ;$$
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # ROW with good default values
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
a ROW(a INT,b INT):= (10,20);
b ROW(a INT,b INT):= (11,21);
c ROW(a INT,b INT):= a;
BEGIN
SELECT a.a, a.b, b.a, b.b, c.a, c.b FROM DUAL;
END;
$$
DELIMITER ;$$
CALL p1;
DROP PROCEDURE p1;
--echo #
--echo # ROW in WHERE clause
--echo #
CREATE TABLE t1 (a INT,b INT);
INSERT INTO t1 VALUES (10,20);
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec ROW(a INT,b INT):=ROW(10,20);
BEGIN
SELECT * FROM t1 WHERE rec=ROW(a,b);
SELECT * FROM t1 WHERE ROW(a,b)=rec;
SELECT * FROM t1 WHERE rec=ROW(10,20);
SELECT * FROM t1 WHERE ROW(10,20)=rec;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # ROW fields in WHERE clause
--echo #
CREATE TABLE t1 (a INT);
INSERT INTO t1 VALUES (10),(20);
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec ROW(a INT);
BEGIN
rec.a:= 10;
SELECT * FROM t1 WHERE a=rec.a;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # ROW fields in HAVING clause
--echo #
CREATE TABLE t1 (a INT);
INSERT INTO t1 VALUES (10),(20);
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec ROW(a INT);
BEGIN
rec.a:= 10;
SELECT * FROM t1 HAVING a=rec.a;
SELECT * FROM t1 HAVING MIN(a)=rec.a;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # ROW fields in LIMIT clause
--echo #
CREATE TABLE t1 (a INT);
--error ER_SP_UNDECLARED_VAR
SELECT 1 FROM t1 LIMIT t1.a;
DROP TABLE t1;
CREATE TABLE t1 (a INT);
INSERT INTO t1 VALUES (10),(20);
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec ROW(a INT);
BEGIN
rec.a:= 10;
SELECT * FROM t1 LIMIT rec.a;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
DELIMITER $$;
--error ER_WRONG_SPVAR_TYPE_IN_LIMIT
CREATE PROCEDURE p1()
AS
rec ROW(a VARCHAR(10));
BEGIN
rec.a:= '10';
SELECT * FROM t1 LIMIT rec.a;
END;
$$
DELIMITER ;$$
--echo #
--echo # ROW fields in select list
--echo #
CREATE TABLE t1 (a INT);
INSERT INTO t1 VALUES (10),(20);
DELIMITER $$;
CREATE PROCEDURE p1()
AS
t1 ROW(a INT);
BEGIN
t1.a:= 10;
SELECT t1.a, 'This is the variable t1.a value, rather than the column t1.a' AS comm FROM t1;
SELECT t1.a, t2.a, t1.a+t2.a FROM t1 t2;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # ROW fields as insert values
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec ROW(a INT, b VARCHAR(10));
BEGIN
rec.a:= 10;
rec.b:= 'test';
INSERT INTO t1 VALUES (rec.a, rec.b);
END;
$$
DELIMITER ;$$
CALL p1();
SELECT * FROM t1;
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # ROW fields as SP out parameters
--echo #
DELIMITER $$;
CREATE PROCEDURE p1(a OUT INT, b OUT VARCHAR)
AS
BEGIN
a:= 10;
b:= 'test';
END;
$$
CREATE PROCEDURE p2
AS
rec ROW(a INT, b VARCHAR(10));
BEGIN
CALL p1(rec.a, rec.b);
SELECT rec.a, rec.b;
END;
$$
DELIMITER ;$$
CALL p2;
DROP PROCEDURE p1;
DROP PROCEDURE p2;
--echo #
--echo # ROW fields as dynamic SQL out parameters
--echo #
DELIMITER $$;
CREATE PROCEDURE p1(a OUT INT, b OUT VARCHAR)
AS
BEGIN
a:= 20;
b:= 'test-dynamic-sql';
END;
$$
CREATE PROCEDURE p2
AS
rec ROW(a INT, b VARCHAR(30));
BEGIN
EXECUTE IMMEDIATE 'CALL p1(?,?)' USING rec.a, rec.b;
SELECT rec.a, rec.b;
END;
$$
DELIMITER ;$$
CALL p2;
DROP PROCEDURE p1;
DROP PROCEDURE p2;
--echo #
--echo # ROW fields as SELECT..INTO targets
--echo #
--enable_prepare_warnings
DELIMITER $$;
CREATE PROCEDURE p1
AS
rec ROW(a INT, b VARCHAR(10));
BEGIN
SELECT 10,'test' INTO rec.a,rec.b;
SELECT rec.a, rec.b;
END;
$$
DELIMITER ;$$
CALL p1;
DROP PROCEDURE p1;
--disable_prepare_warnings
--echo #
--echo # Implicit default NULL handling
--echo #
DELIMITER $$;
CREATE PROCEDURE p1
AS
rec ROW(a INT, b VARCHAR(10), c DOUBLE, d DECIMAL(10,0), e TIME, f DATETIME);
BEGIN
SELECT rec.a, rec.b, rec.c, rec.d, rec.e, rec.f FROM DUAL;
END;
$$
DELIMITER ;$$
CALL p1();
DROP PROCEDURE p1;
--echo #
--echo # NULL handling
--echo #
DELIMITER $$;
CREATE PROCEDURE p1
AS
rec1 ROW(a INT, b VARCHAR(10)):=(NULL,NULL);
rec2 ROW(a INT, b VARCHAR(10)):=rec1;
BEGIN
SELECT rec1.a, rec1.b, rec2.a, rec2.b;
rec1:= (10,20);
rec2:= rec1;
SELECT rec1.a, rec1.b, rec2.a, rec2.b;
rec1:= (NULL,20);
rec2:= rec1;
SELECT rec1.a, rec1.b, rec2.a, rec2.b;
rec1:= (10,NULL);
rec2:= rec1;
SELECT rec1.a, rec1.b, rec2.a, rec2.b;
rec1:= (NULL,NULL);
rec2:= rec1;
SELECT rec1.a, rec1.b, rec2.a, rec2.b;
END;
$$
DELIMITER ;$$
CALL p1;
DROP PROCEDURE p1;
--echo #
--echo # Testing multiple ROW variable declarations
--echo # This makes sure that fill_field_definitions() is called only once
--echo # per a ROW field, so create length is not converted to internal length
--echo # multiple times.
--echo #
DELIMITER $$;
CREATE PROCEDURE p1
AS
rec1, rec2, rec3 ROW(a VARCHAR(10) CHARACTER SET utf8);
BEGIN
CREATE TABLE t1 AS SELECT rec1.a, rec2.a, rec3.a;
END;
$$
DELIMITER ;$$
CALL p1();
SHOW CREATE TABLE t1;
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # INT
--echo #
--let type=INT
--source sp-row-vs-var.inc
--let type=INT(1)
--source sp-row-vs-var.inc
--let type=INT(2)
--source sp-row-vs-var.inc
--let type=INT(3)
--source sp-row-vs-var.inc
--let type=INT(4)
--source sp-row-vs-var.inc
--let type=INT(5)
--source sp-row-vs-var.inc
--let type=INT(6)
--source sp-row-vs-var.inc
--let type=INT(7)
--source sp-row-vs-var.inc
--let type=INT(8)
--source sp-row-vs-var.inc
--let type=INT(9)
--source sp-row-vs-var.inc
--let type=INT(10)
--source sp-row-vs-var.inc
--let type=INT(11)
--source sp-row-vs-var.inc
--let type=INT(12)
--source sp-row-vs-var.inc
--let type=INT(13)
--source sp-row-vs-var.inc
--let type=INT(14)
--source sp-row-vs-var.inc
--let type=INT(20)
--source sp-row-vs-var.inc
--let type=INT(21)
--source sp-row-vs-var.inc
--echo #
--echo # TINYINT
--echo #
--let type=TINYINT
--source sp-row-vs-var.inc
--let type=TINYINT(1)
--source sp-row-vs-var.inc
--let type=TINYINT(2)
--source sp-row-vs-var.inc
--let type=TINYINT(3)
--source sp-row-vs-var.inc
--let type=TINYINT(4)
--source sp-row-vs-var.inc
--let type=TINYINT(5)
--source sp-row-vs-var.inc
--let type=TINYINT(6)
--source sp-row-vs-var.inc
--let type=TINYINT(7)
--source sp-row-vs-var.inc
--let type=TINYINT(8)
--source sp-row-vs-var.inc
--let type=TINYINT(9)
--source sp-row-vs-var.inc
--let type=TINYINT(10)
--source sp-row-vs-var.inc
--let type=TINYINT(11)
--source sp-row-vs-var.inc
--let type=TINYINT(12)
--source sp-row-vs-var.inc
--let type=TINYINT(13)
--source sp-row-vs-var.inc
--let type=TINYINT(14)
--source sp-row-vs-var.inc
--let type=TINYINT(20)
--source sp-row-vs-var.inc
--let type=TINYINT(21)
--source sp-row-vs-var.inc
--echo #
--echo # SMALLINT
--echo #
--let type=SMALLINT
--source sp-row-vs-var.inc
--let type=SMALLINT(1)
--source sp-row-vs-var.inc
--let type=SMALLINT(2)
--source sp-row-vs-var.inc
--let type=SMALLINT(3)
--source sp-row-vs-var.inc
--let type=SMALLINT(4)
--source sp-row-vs-var.inc
--let type=SMALLINT(5)
--source sp-row-vs-var.inc
--let type=SMALLINT(6)
--source sp-row-vs-var.inc
--let type=SMALLINT(7)
--source sp-row-vs-var.inc
--let type=SMALLINT(8)
--source sp-row-vs-var.inc
--let type=SMALLINT(9)
--source sp-row-vs-var.inc
--let type=SMALLINT(10)
--source sp-row-vs-var.inc
--let type=SMALLINT(11)
--source sp-row-vs-var.inc
--let type=SMALLINT(12)
--source sp-row-vs-var.inc
--let type=SMALLINT(13)
--source sp-row-vs-var.inc
--let type=SMALLINT(14)
--source sp-row-vs-var.inc
--let type=SMALLINT(20)
--source sp-row-vs-var.inc
--let type=SMALLINT(21)
--source sp-row-vs-var.inc
--echo #
--echo # MEDIUMINT
--echo #
--let type=MEDIUMINT
--source sp-row-vs-var.inc
--let type=MEDIUMINT(1)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(2)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(3)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(4)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(5)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(6)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(7)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(8)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(9)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(10)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(11)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(12)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(13)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(14)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(20)
--source sp-row-vs-var.inc
--let type=MEDIUMINT(21)
--source sp-row-vs-var.inc
--echo #
--echo # BIGINT
--echo #
--let type=BIGINT
--source sp-row-vs-var.inc
--let type=BIGINT(1)
--source sp-row-vs-var.inc
--let type=BIGINT(2)
--source sp-row-vs-var.inc
--let type=BIGINT(3)
--source sp-row-vs-var.inc
--let type=BIGINT(4)
--source sp-row-vs-var.inc
--let type=BIGINT(5)
--source sp-row-vs-var.inc
--let type=BIGINT(6)
--source sp-row-vs-var.inc
--let type=BIGINT(7)
--source sp-row-vs-var.inc
--let type=BIGINT(8)
--source sp-row-vs-var.inc
--let type=BIGINT(9)
--source sp-row-vs-var.inc
--let type=BIGINT(10)
--source sp-row-vs-var.inc
--let type=BIGINT(11)
--source sp-row-vs-var.inc
--let type=BIGINT(12)
--source sp-row-vs-var.inc
--let type=BIGINT(13)
--source sp-row-vs-var.inc
--let type=BIGINT(14)
--source sp-row-vs-var.inc
--let type=BIGINT(20)
--source sp-row-vs-var.inc
--let type=BIGINT(21)
--source sp-row-vs-var.inc
--echo #
--echo # DOUBLE
--echo #
--let type=DOUBLE
--source sp-row-vs-var.inc
--let type=DOUBLE(30,1)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,2)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,3)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,4)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,5)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,6)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,7)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,8)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,9)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,10)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,11)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,12)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,13)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,14)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,20)
--source sp-row-vs-var.inc
--let type=DOUBLE(30,21)
--source sp-row-vs-var.inc
--echo #
--echo # VARCHAR
--echo #
--let type=CHAR
--source sp-row-vs-var.inc
--let type=BINARY
--source sp-row-vs-var.inc
--let type=CHAR(1)
--source sp-row-vs-var.inc
--let type=CHAR(10)
--source sp-row-vs-var.inc
--let type=NCHAR(10)
--source sp-row-vs-var.inc
--let type=BINARY(10)
--source sp-row-vs-var.inc
--let type=VARBINARY(10)
--source sp-row-vs-var.inc
--let type=VARCHAR(10)
--source sp-row-vs-var.inc
--let type=VARCHAR(10) CHARACTER SET utf8
--source sp-row-vs-var.inc
--let type=VARCHAR(10) CHARACTER SET utf8 COLLATE utf8_bin
--source sp-row-vs-var.inc
--echo #
--echo # TIME
--echo #
--let type=TIME
--source sp-row-vs-var.inc
--let type=TIME(1)
--source sp-row-vs-var.inc
--let type=TIME(2)
--source sp-row-vs-var.inc
--let type=TIME(3)
--source sp-row-vs-var.inc
--let type=TIME(4)
--source sp-row-vs-var.inc
--let type=TIME(5)
--source sp-row-vs-var.inc
--let type=TIME(6)
--source sp-row-vs-var.inc
--echo #
--echo # DATETIME
--echo #
--let type=DATETIME
--source sp-row-vs-var.inc
--let type=DATETIME(1)
--source sp-row-vs-var.inc
--let type=DATETIME(2)
--source sp-row-vs-var.inc
--let type=DATETIME(3)
--source sp-row-vs-var.inc
--let type=DATETIME(4)
--source sp-row-vs-var.inc
--let type=DATETIME(5)
--source sp-row-vs-var.inc
--let type=DATETIME(6)
--source sp-row-vs-var.inc
--echo #
--echo # LOB
--echo #
--let type=TEXT
--source sp-row-vs-var.inc
--let type=TINYTEXT
--source sp-row-vs-var.inc
--let type=MEDIUMTEXT
--source sp-row-vs-var.inc
--let type=LONGTEXT
--source sp-row-vs-var.inc
--let type=TEXT CHARACTER SET utf8
--source sp-row-vs-var.inc
--let type=TINYTEXT CHARACTER SET utf8
--source sp-row-vs-var.inc
--let type=MEDIUMTEXT CHARACTER SET utf8
--source sp-row-vs-var.inc
--let type=LONGTEXT CHARACTER SET utf8
--source sp-row-vs-var.inc
--echo #
--echo # End of MDEV-10914 ROW data type for stored routine variables
--echo #
--echo #
--echo # MDEV-12133 sql_mode=ORACLE: table%ROWTYPE in variable declarations
--echo #
--echo #
--echo # Referring to a table in a non-existing database
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec test2.t1%ROWTYPE;
BEGIN
NULL;
END;
$$
DELIMITER ;$$
--error ER_NO_SUCH_TABLE
CALL p1();
CREATE TABLE t1 (a INT, b VARCHAR(10), c DOUBLE, d DECIMAL(10));
--error ER_NO_SUCH_TABLE
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Referring to a table in the current database
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec t1%ROWTYPE;
BEGIN
CREATE TABLE t2 AS SELECT rec.a, rec.b, rec.c, rec.d;
SHOW CREATE TABLE t2;
DROP TABLE t2;
END;
$$
DELIMITER ;$$
--error ER_NO_SUCH_TABLE
CALL p1();
CREATE TABLE t1 (a INT, b VARCHAR(10), c DOUBLE, d DECIMAL(10));
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Referring to a table in an explicitly specified database
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec test.t1%ROWTYPE;
BEGIN
CREATE TABLE t2 AS SELECT rec.a, rec.b, rec.c, rec.d;
SHOW CREATE TABLE t2;
DROP TABLE t2;
END;
$$
DELIMITER ;$$
--error ER_NO_SUCH_TABLE
CALL p1();
CREATE TABLE t1 (a INT, b VARCHAR(10), c DOUBLE, d DECIMAL(10));
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Referring to a view in the current database
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec v1%ROWTYPE;
BEGIN
CREATE TABLE t2 AS SELECT rec.a, rec.b, rec.c, rec.d;
SHOW CREATE TABLE t2;
DROP TABLE t2;
END;
$$
DELIMITER ;$$
--error ER_NO_SUCH_TABLE
CALL p1();
CREATE TABLE t1 (a INT, b VARCHAR(10), c DOUBLE, d DECIMAL(10));
CREATE VIEW v1 AS SELECT * FROM t1;
CALL p1();
DROP VIEW v1;
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Referring to a view in an explicitly specified database
--echo #
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec test.v1%ROWTYPE;
BEGIN
CREATE TABLE t2 AS SELECT rec.a, rec.b, rec.c, rec.d;
SHOW CREATE TABLE t2;
DROP TABLE t2;
END;
$$
DELIMITER ;$$
--error ER_NO_SUCH_TABLE
CALL p1();
CREATE TABLE t1 (a INT, b VARCHAR(10), c DOUBLE, d DECIMAL(10));
CREATE VIEW v1 AS SELECT * FROM t1;
CALL p1();
DROP VIEW v1;
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Checking that all table%ROWTYPE fields are NULL by default
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10), c DOUBLE, d DECIMAL(10,2));
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec1 t1%ROWTYPE;
BEGIN
SELECT rec1.a, rec1.b, rec1.c, rec1.d;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # A table%ROWTYPE variable with a ROW expression as a default
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec1 t1%ROWTYPE DEFAULT ROW(10,'bbb');
BEGIN
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # A table%ROWTYPE variable with an incompatible ROW expression as a default
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec1 t1%ROWTYPE DEFAULT ROW(10,'bbb','ccc');
BEGIN
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # A table%ROWTYPE variable with a ROW variable as a default
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec1 ROW(a INT, b VARCHAR(10)):= ROW(10,'bbb');
rec2 t1%ROWTYPE DEFAULT rec1;
BEGIN
SELECT rec2.a, rec2.b;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # A ROW variable using a table%ROWTYPE variable as a default
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec1 t1%ROWTYPE := ROW(10,'bbb');
rec2 ROW(a INT, b VARCHAR(10)):= rec1;
BEGIN
SELECT rec2.a, rec2.b;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Assigning table%ROWTYPE variables with a different column count
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10), c DOUBLE);
CREATE TABLE t2 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec1 t1%ROWTYPE;
rec2 t2%ROWTYPE;
BEGIN
rec2:=rec1;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP PROCEDURE p1;
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec1 t1%ROWTYPE;
rec2 t2%ROWTYPE;
BEGIN
rec1:=rec2;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP TABLE t2;
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Assigning compatible table%ROWTYPE variables (equal number of fields)
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
CREATE TABLE t2 (x INT, y VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec1 t1%ROWTYPE;
rec2 t2%ROWTYPE;
BEGIN
rec1.a:= 10;
rec1.b:= 'bbb';
rec2:=rec1;
SELECT rec2.x, rec2.y;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t2;
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Assigning between incompatible table%ROWTYPE and explicit ROW variables
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec1 t1%ROWTYPE;
rec2 ROW(x INT,y INT,z INT);
BEGIN
rec2.x:= 10;
rec2.y:= 20;
rec2.z:= 30;
rec1:= rec2;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Assigning between compatible table%ROWTYPE and explicit ROW variables
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec1 t1%ROWTYPE;
rec2 ROW(x INT,y INT);
BEGIN
rec2.x:= 10;
rec2.y:= 20;
rec1:= rec2;
SELECT rec1.a, rec1.b;
rec1.a:= 11;
rec1.b:= 21;
rec2:= rec1;
SELECT rec2.x, rec2.y;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Assigning table%ROWTYPE from a ROW expression
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec1 t1%ROWTYPE;
BEGIN
rec1:= ROW(10,20);
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Fetching a cursor into a table%ROWTYPE variable with a wrong field count
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10), c DOUBLE, d DECIMAL(10,2));
CREATE TABLE t2 (a INT, b VARCHAR(10));
INSERT INTO t1 VALUES (10,'bb1',111.111e2, 12.31);
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec2 t2%ROWTYPE;
CURSOR cur1 IS SELECT * FROM t1;
BEGIN
OPEN cur1;
FETCH cur1 INTO rec2;
CLOSE cur1;
END;
$$
DELIMITER ;$$
--error ER_SP_WRONG_NO_OF_FETCH_ARGS
CALL p1();
DROP TABLE t2;
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Fetching a cursor into a table%ROWTYPE variable
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10), c DOUBLE, d DECIMAL(10,2));
CREATE TABLE t2 LIKE t1;
INSERT INTO t1 VALUES (10,'bb1',111.111e2, 12.31);
INSERT INTO t1 VALUES (20,'bb2',222.222e2, 12.32);
INSERT INTO t1 VALUES (30,'bb3',333.333e2, 12.33);
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec t1%ROWTYPE;
CURSOR cur IS SELECT * FROM t1;
BEGIN
OPEN cur;
LOOP
FETCH cur INTO rec;
EXIT WHEN cur%NOTFOUND;
SELECT rec.a, rec.b, rec.c, rec.d;
INSERT INTO t2 VALUES (rec.a, rec.b, rec.c, rec.d);
END LOOP;
CLOSE cur;
END;
$$
DELIMITER ;$$
CALL p1();
SELECT * FROM t2;
DROP TABLE t2;
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Fetching a cursor into a table%ROWTYPE variable with different column names
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
CREATE TABLE t2 (x INT, y VARCHAR(10));
INSERT INTO t1 VALUES (10,'bbb');
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec2 t2%ROWTYPE;
CURSOR cur1 IS SELECT * FROM t1;
BEGIN
OPEN cur1;
FETCH cur1 INTO rec2;
SELECT rec2.x, rec2.y;
CLOSE cur1;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t2;
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # Fetching a cursor into a table%ROWTYPE variable, with truncation
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
CREATE TABLE t2 (a INT, b INT);
INSERT INTO t1 VALUES (10,'11x');
DELIMITER $$;
CREATE PROCEDURE p1()
AS
rec2 t2%ROWTYPE;
CURSOR cur1 IS SELECT * FROM t1;
BEGIN
OPEN cur1;
FETCH cur1 INTO rec2;
SELECT rec2.a, rec2.b;
CLOSE cur1;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t2;
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # table%ROWTYPE variables are not allowed in LIMIT
--echo #
CREATE TABLE t1 (a INT, b INT);
INSERT INTO t1 VALUES (1,2);
DELIMITER $$;
--error ER_WRONG_SPVAR_TYPE_IN_LIMIT
CREATE PROCEDURE p1()
AS
rec1 t1%ROWTYPE:=(1,2);
BEGIN
SELECT * FROM t1 LIMIT rec1.a;
END;
$$
DELIMITER ;$$
DROP TABLE t1;
--echo #
--echo # table%ROWTYPE variable fields as OUT parameters
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1(a OUT INT,b OUT VARCHAR(10))
AS
BEGIN
a:=10;
b:='bb';
END;
$$
CREATE PROCEDURE p2()
AS
rec1 t1%ROWTYPE;
BEGIN
CALL p1(rec1.a, rec1.b);
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
CALL p2();
DROP PROCEDURE p2;
DROP PROCEDURE p1;
DROP TABLE t1;
--echo #
--echo # Passing the entire table%ROWTYPE variable
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1(a ROW(a INT, b VARCHAR(10)))
AS
BEGIN
SELECT a.a, a.b;
END;
$$
CREATE PROCEDURE p2()
AS
rec1 t1%ROWTYPE:= ROW(10,'bb');
BEGIN
CALL p1(rec1);
END;
$$
DELIMITER ;$$
CALL p2();
DROP PROCEDURE p2;
DROP PROCEDURE p1;
DROP TABLE t1;
--echo #
--echo # Passing the entire table%ROWTYPE variable as an OUT parameter
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1(a OUT ROW(a INT, b VARCHAR(10)))
AS
BEGIN
a:= ROW(10,'bb');
END;
$$
CREATE PROCEDURE p2()
AS
rec1 t1%ROWTYPE;
BEGIN
CALL p1(rec1);
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
CALL p2();
DROP PROCEDURE p2;
DROP PROCEDURE p1;
DROP TABLE t1;
--echo #
--echo # Assigning a table%ROWTYPE field to an OUT parameter
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1 (res IN OUT INTEGER)
AS
rec1 t1%ROWTYPE:=ROW(10,'b0');
BEGIN
res:=rec1.a;
END;
$$
DELIMITER ;$$
CALL p1(@res);
SELECT @res;
SET @res=NULL;
DROP PROCEDURE p1;
DROP TABLE t1;
--echo #
--echo # Testing Item_splocal_row_field_by_name::print
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1
AS
rec t1%ROWTYPE:=ROW(10,'bb');
BEGIN
EXPLAIN EXTENDED SELECT rec.a, rec.b;
END;
$$
DELIMITER ;$$
CALL p1();
DROP PROCEDURE p1;
DROP TABLE t1;
--echo #
--echo # Non-existing field
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1
AS
rec t1%ROWTYPE;
BEGIN
SELECT rec.c;
END;
$$
DELIMITER ;$$
--error ER_ROW_VARIABLE_DOES_NOT_HAVE_FIELD
CALL p1();
ALTER TABLE t1 ADD c INT;
CALL p1();
DROP PROCEDURE p1;
DROP TABLE t1;
--echo #
--echo # Testing that field names are case insensitive
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1
AS
rec t1%ROWTYPE:=ROW(10,'bb');
BEGIN
SELECT rec.A, rec.B;
END;
$$
DELIMITER ;$$
CALL p1();
DROP PROCEDURE p1;
DROP TABLE t1;
--echo #
--echo # Testing that table%ROWTYPE uses temporary tables vs shadowed real tables
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(10));
CREATE TEMPORARY TABLE t1 (x INT, y VARCHAR(10));
DELIMITER $$;
CREATE PROCEDURE p1
AS
rec t1%ROWTYPE:=ROW(10,'bb');
BEGIN
SELECT rec.A, rec.B;
END;
$$
DELIMITER ;$$
--error ER_ROW_VARIABLE_DOES_NOT_HAVE_FIELD
CALL p1();
DROP TEMPORARY TABLE t1;
CALL p1();
DROP PROCEDURE p1;
DROP TABLE t1;
--echo #
--echo # Testing that the structure of table%ROWTYPE variables is determined at the very beginning and is not changed after ALTER
--echo #
CREATE TABLE t1 (a INT, b VARCHAR(32));
INSERT INTO t1 VALUES (10,'b10');
DELIMITER $$;
CREATE PROCEDURE p1 AS
BEGIN
ALTER TABLE t1 ADD c INT;
DECLARE
rec t1%ROWTYPE; -- this will not have column "c"
BEGIN
rec.c:=10;
END;
END;
$$
DELIMITER ;$$
--error ER_ROW_VARIABLE_DOES_NOT_HAVE_FIELD
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # MDEV-12291 Allow ROW variables as SELECT INTO targets
--echo #
--enable_prepare_warnings
--echo # ROW variable with a wrong column count
CREATE TABLE t1 (a INT, b VARCHAR(32));
INSERT INTO t1 VALUES (10,'b10');
DELIMITER $$;
CREATE PROCEDURE p1 AS
rec1 ROW(a INT, b VARCHAR(32), c DOUBLE);
BEGIN
SELECT * FROM t1 INTO rec1;
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
--error ER_WRONG_NUMBER_OF_COLUMNS_IN_SELECT
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo # Multiple ROW variables
CREATE TABLE t1 (a INT, b VARCHAR(32));
INSERT INTO t1 VALUES (10,'b10');
DELIMITER $$;
CREATE PROCEDURE p1 AS
rec1 ROW(a INT, b VARCHAR(32));
BEGIN
SELECT * FROM t1 INTO rec1, rec1;
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo # ROW variables working example
CREATE TABLE t1 (a INT, b VARCHAR(32));
INSERT INTO t1 VALUES (10,'b10');
DELIMITER $$;
CREATE PROCEDURE p1 AS
rec1 ROW(a INT, b VARCHAR(32));
BEGIN
SELECT * FROM t1 INTO rec1;
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo # table%ROWTYPE variable with a wrong column count
CREATE TABLE t1 (a INT, b VARCHAR(32));
INSERT INTO t1 VALUES (10,'b10');
DELIMITER $$;
CREATE PROCEDURE p1 AS
rec1 t1%ROWTYPE;
BEGIN
SELECT 10,'a','b' FROM t1 INTO rec1;
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
--error ER_WRONG_NUMBER_OF_COLUMNS_IN_SELECT
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo # Multiple table%ROWTYPE variables
CREATE TABLE t1 (a INT, b VARCHAR(32));
INSERT INTO t1 VALUES (10,'b10');
DELIMITER $$;
CREATE PROCEDURE p1 AS
rec1 t1%ROWTYPE;
BEGIN
SELECT 10,'a' FROM t1 INTO rec1, rec1;
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo # table%ROWTYPE working example
CREATE TABLE t1 (a INT, b VARCHAR(32));
INSERT INTO t1 VALUES (10,'b10');
DELIMITER $$;
CREATE PROCEDURE p1 AS
rec1 t1%ROWTYPE;
BEGIN
SELECT * FROM t1 INTO rec1;
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo # cursor%ROWTYPE variable with a wrong column count
CREATE TABLE t1 (a INT, b VARCHAR(32));
INSERT INTO t1 VALUES (10,'b10');
DELIMITER $$;
CREATE PROCEDURE p1 AS
CURSOR cur1 IS SELECT 10, 'b0', 'c0';
rec1 cur1%ROWTYPE;
BEGIN
SELECT * FROM t1 INTO rec1;
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
--error ER_WRONG_NUMBER_OF_COLUMNS_IN_SELECT
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo # Multiple cursor%ROWTYPE variables
CREATE TABLE t1 (a INT, b VARCHAR(32));
INSERT INTO t1 VALUES (10,'b10');
DELIMITER $$;
CREATE PROCEDURE p1 AS
CURSOR cur1 IS SELECT * FROM t1;
rec1 cur1%ROWTYPE;
BEGIN
SELECT * FROM t1 INTO rec1, rec1;
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
--error ER_OPERAND_COLUMNS
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo # cursor%ROWTYPE working example
CREATE TABLE t1 (a INT, b VARCHAR(32));
INSERT INTO t1 VALUES (10,'b10');
DELIMITER $$;
CREATE PROCEDURE p1 AS
CURSOR cur1 IS SELECT * FROM t1;
rec1 cur1%ROWTYPE;
BEGIN
SELECT * FROM t1 INTO rec1;
SELECT rec1.a, rec1.b;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--disable_prepare_warnings
--echo #
--echo # MDEV-12347 Valgrind reports invalid read errors in Item_field_row::element_index_by_name
--echo #
# An additional test for MDEV-12347, to make sure that
# Column_definition::interval creates a permanent copy of TYPELIB on
# the memory root when processing %ROWTYPE for a table with ENUM/SET column,
# rather than reuses the TYPELIB from table->field[i], which is freed in the
# end of sp_rcontext::resolve_table_rowtype_ref().
CREATE TABLE t1 (a INT, b ENUM('b0','b1','b12','b3'));
DELIMITER $$;
CREATE PROCEDURE p1 AS
BEGIN
DECLARE
rec t1%ROWTYPE;
BEGIN
rec.b:='b0';
SELECT rec.b;
END;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
CREATE TABLE t1 (a INT, b SET('b0','b1','b12','b3'));
DELIMITER $$;
CREATE PROCEDURE p1 AS
BEGIN
DECLARE
rec t1%ROWTYPE;
BEGIN
rec.b:='b0';
SELECT rec.b;
END;
END;
$$
DELIMITER ;$$
CALL p1();
DROP TABLE t1;
DROP PROCEDURE p1;
--echo #
--echo # MDEV-13273 Confusion between table alias and ROW type variable
--echo #
CREATE TABLE t1 (c1 INT, c2 INT);
INSERT INTO t1 VALUES (0,0);
DELIMITER $$;
CREATE PROCEDURE p1
AS
a INT;
b INT;
BEGIN
-- a.c1 is a table column
SELECT a.c1 INTO b
FROM t1 a
WHERE a.c2 = 0;
SELECT b;
END;
$$
DELIMITER ;$$
CALL p1;
DROP PROCEDURE p1;
DROP TABLE t1;
CREATE TABLE t1 (c1 INT, c2 INT);
INSERT INTO t1 VALUES (0,0);
DELIMITER $$;
CREATE PROCEDURE p1
AS
a ROW (c1 INT, c2 INT) := ROW(101,102);
b INT;
BEGIN
-- a.c1 is a ROW variable field
SELECT a.c1 INTO b
FROM t1 a
WHERE a.c2 = 102;
SELECT b;
END;
$$
DELIMITER ;$$
CALL p1;
DROP PROCEDURE p1;
DROP TABLE t1;
CREATE TABLE t1 (c1 INT, c2 INT);
INSERT INTO t1 VALUES (0,0);
DELIMITER $$;
CREATE PROCEDURE p1
AS
a t1%ROWTYPE := ROW (10,20);
b INT;
BEGIN
-- a.c1 is a ROW variable field
SELECT a.c1 INTO b
FROM t1 a
WHERE a.c2 = 20;
SELECT b;
END;
$$
DELIMITER ;$$
CALL p1;
DROP PROCEDURE p1;
DROP TABLE t1;
CREATE TABLE t1 (c1 INT, c2 INT);
INSERT INTO t1 VALUES (0,0);
DELIMITER $$;
CREATE PROCEDURE p1
AS
CURSOR cur1 IS SELECT * FROM t1;
a cur1%ROWTYPE := ROW (10,20);
b INT;
BEGIN
-- a.c1 is a ROW variable field
SELECT a.c1 INTO b
FROM t1 a
WHERE a.c2 = 20;
SELECT b;
END;
$$
DELIMITER ;$$
CALL p1;
DROP PROCEDURE p1;
DROP TABLE t1;
--echo #
--echo # MDEV-13527 Crash when EXPLAIN SELECT .. INTO row_sp_variable.field
--echo #
DELIMITER $$;
DECLARE
a ROW(a INT);
BEGIN
EXPLAIN SELECT 1 INTO a.a;
END;
$$
DELIMITER ;$$
--echo #
--echo # MDEV-14139 Anchored data types for variables
--echo #
DELIMITER $$;
DECLARE
row1 ROW(int11 INT,text1 TEXT);
a_row1 row1%TYPE;
aa_row1 a_row1%TYPE;
BEGIN
CREATE TABLE t1 AS SELECT a_row1.int11 AS int11, a_row1.text1 AS text1;
SHOW CREATE TABLE t1;
DROP TABLE t1;
CREATE TABLE t1 AS SELECT aa_row1.int11 AS int11, aa_row1.text1 AS text1;
SHOW CREATE TABLE t1;
DROP TABLE t1;
END;
$$
DELIMITER ;$$