Adding REF CURSOR in parameters and return

Author: abarkov

plugin/type_cursor/mysql-test/type_cursor/type_cursor2.result

@@ -269,3 +269,61 @@ v0	v1
 Warnings:
 Note	1265	Data truncated for column 'b' at row 1
 DROP PROCEDURE p1;
+CREATE PACKAGE pkg1 AS
+PROCEDURE p1;
+END;
+$$
+CREATE PACKAGE BODY pkg1 AS
+TYPE rec0_t IS RECORD(a INT, b VARCHAR(10));
+TYPE cur0_t IS REF CURSOR RETURN rec0_t;
+PROCEDURE p20 (c0 cur0_t) AS
+r0 rec0_t;
+BEGIN
+FETCH c0 INTO r0;
+SELECT r0.a, r0.b;
+END;
+PROCEDURE p1 AS
+c0 cur0_t;
+BEGIN
+OPEN c0 FOR SELECT 1 AS a, '           ' AS b;
+CALL p20(c0);
+CLOSE c0;
+END;
+END;
+$$
+CALL pkg1.p1;
+r0.a	r0.b
+1	          
+Warnings:
+Note	1265	Data truncated for column 'b' at row 0
+DROP PACKAGE pkg1;
+CREATE PACKAGE pkg1 AS
+PROCEDURE p1;
+END;
+$$
+CREATE PACKAGE BODY pkg1 AS
+TYPE rec0_t IS RECORD(a INT, b VARCHAR(10));
+TYPE cur0_t IS REF CURSOR RETURN rec0_t;
+FUNCTION f1() RETURN cur0_t AS
+c0 cur0_t;
+BEGIN
+OPEN c0 FOR SELECT 1 AS a, '           ' AS b;
+RETURN c0;
+END;
+PROCEDURE p1 AS
+c0 cur0_t;
+r0 rec0_t;
+BEGIN
+c0:= f1();
+FETCH c0 INTO r0;
+SELECT r0.a, r0.b;
+CLOSE c0;
+END;
+END;
+$$
+CALL pkg1.p1;
+r0.a	r0.b
+1	          
+Warnings:
+Note	1265	Data truncated for column 'b' at row 0
+DROP PACKAGE pkg1;

plugin/type_cursor/mysql-test/type_cursor/type_cursor2.test

@@ -339,3 +339,61 @@ $$
 DELIMITER ;$$
 CALL p1;
 DROP PROCEDURE p1;
+
+
+DELIMITER $$;
+CREATE PACKAGE pkg1 AS
+  PROCEDURE p1;
+END;
+$$
+CREATE PACKAGE BODY pkg1 AS
+  TYPE rec0_t IS RECORD(a INT, b VARCHAR(10));
+  TYPE cur0_t IS REF CURSOR RETURN rec0_t;
+  PROCEDURE p20 (c0 cur0_t) AS
+    r0 rec0_t;
+  BEGIN
+    FETCH c0 INTO r0;
+    SELECT r0.a, r0.b;
+  END;
+  PROCEDURE p1 AS
+    c0 cur0_t;
+  BEGIN
+    OPEN c0 FOR SELECT 1 AS a, '           ' AS b;
+    CALL p20(c0);
+    CLOSE c0;
+  END;
+END;
+$$
+DELIMITER ;$$
+CALL pkg1.p1;
+DROP PACKAGE pkg1;
+
+
+DELIMITER $$;
+CREATE PACKAGE pkg1 AS
+  PROCEDURE p1;
+END;
+$$
+CREATE PACKAGE BODY pkg1 AS
+  TYPE rec0_t IS RECORD(a INT, b VARCHAR(10));
+  TYPE cur0_t IS REF CURSOR RETURN rec0_t;
+  FUNCTION f1() RETURN cur0_t AS
+    c0 cur0_t;
+  BEGIN
+    OPEN c0 FOR SELECT 1 AS a, '           ' AS b;
+    RETURN c0;
+  END;
+  PROCEDURE p1 AS
+    c0 cur0_t;
+    r0 rec0_t;
+  BEGIN
+    c0:= f1();
+    FETCH c0 INTO r0;
+    SELECT r0.a, r0.b;
+    CLOSE c0;
+  END;
+END;
+$$
+DELIMITER ;$$
+CALL pkg1.p1;
+DROP PACKAGE pkg1;

plugin/type_cursor/mysql-test/type_cursor/type_sys_refcursor-default.result

@@ -36,7 +36,7 @@ BEGIN NOT ATOMIC
 DECLARE c SYS_REFCURSOR DEFAULT 0;
 END;
 $$
-ERROR HY000: Cannot cast 'int' as 'sys_refcursor' in assignment of `c`
+ERROR HY000: Cannot cast 'int' as 'sys_refcursor' in assignment of `c` for operation SET
 BEGIN NOT ATOMIC
 DECLARE c SYS_REFCURSOR DEFAULT IGNORE;
 END;

plugin/type_cursor/mysql-test/type_cursor/type_sys_refcursor-default.test

@@ -46,7 +46,7 @@ DELIMITER ;$$
 
 
 DELIMITER $$;
---error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
+--error ER_CANNOT_CAST_ON_IDENT1_ASSIGNMENT_FOR_OPERATION
 BEGIN NOT ATOMIC
   DECLARE c SYS_REFCURSOR DEFAULT 0;
 END;

plugin/type_cursor/mysql-test/type_cursor/type_sys_refcursor.result

@@ -220,14 +220,14 @@ DECLARE c SYS_REFCURSOR;
 SET c=1;
 END;
 $$
-ERROR HY000: Cannot cast 'int' as 'sys_refcursor' in assignment of `c`
+ERROR HY000: Cannot cast 'int' as 'sys_refcursor' in assignment of `c` for operation SET
 BEGIN NOT ATOMIC
 DECLARE c SYS_REFCURSOR;
 DECLARE i INT;
 SET c=i;
 END;
 $$
-ERROR HY000: Cannot cast 'int' as 'sys_refcursor' in assignment of `c`
+ERROR HY000: Cannot cast 'int' as 'sys_refcursor' in assignment of `c` for operation SET
 BEGIN NOT ATOMIC
 DECLARE c SYS_REFCURSOR;
 DECLARE i INT;
@@ -248,7 +248,7 @@ FETCH p1c0 INTO p1c1;
 END;
 /
 CALL p1;
-ERROR HY000: Cannot cast 'int' as 'sys_refcursor' in assignment of `p1c1`
+ERROR HY000: Cannot cast 'int' as 'sys_refcursor' in assignment of `p1c1` for operation SET
 DROP PROCEDURE p1;
 CREATE PROCEDURE p1()
 BEGIN
@@ -259,7 +259,7 @@ FETCH p1c0 INTO p1c1;
 END;
 /
 CALL p1;
-ERROR HY000: Cannot cast 'int' as 'sys_refcursor' in assignment of `p1c1`
+ERROR HY000: Cannot cast 'int' as 'sys_refcursor' in assignment of `p1c1` for operation SET
 DROP PROCEDURE p1;
 CREATE PROCEDURE p1()
 BEGIN

plugin/type_cursor/mysql-test/type_cursor/type_sys_refcursor.test

@@ -319,7 +319,7 @@ SET sql_mode=DEFAULT;
 --echo #
 
 DELIMITER $$;
---error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
+--error ER_CANNOT_CAST_ON_IDENT1_ASSIGNMENT_FOR_OPERATION
 BEGIN NOT ATOMIC
   DECLARE c SYS_REFCURSOR;
   SET c=1;
@@ -328,7 +328,7 @@ $$
 DELIMITER ;$$
 
 DELIMITER $$;
---error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
+--error ER_CANNOT_CAST_ON_IDENT1_ASSIGNMENT_FOR_OPERATION
 BEGIN NOT ATOMIC
   DECLARE c SYS_REFCURSOR;
   DECLARE i INT;
@@ -363,7 +363,7 @@ BEGIN
 END;
 /
 DELIMITER ;/
---error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
+--error ER_CANNOT_CAST_ON_IDENT1_ASSIGNMENT_FOR_OPERATION
 CALL p1;
 DROP PROCEDURE p1;
 
@@ -378,7 +378,7 @@ BEGIN
 END;
 /
 DELIMITER ;/
---error ER_ILLEGAL_PARAMETER_DATA_TYPES2_FOR_OPERATION
+--error ER_CANNOT_CAST_ON_IDENT1_ASSIGNMENT_FOR_OPERATION
 CALL p1;
 DROP PROCEDURE p1;