summaryrefslogtreecommitdiff
path: root/mysql-test/suite/compat/oracle/t/custom_aggregate_functions.test
blob: 0affc4efa297478367a902a3b40d6da2114ea4f4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
SET sql_mode=ORACLE;

delimiter |;
--error ER_INVALID_AGGREGATE_FUNCTION
create aggregate function f1(x INT) return INT AS
begin
  insert into t1(sal) values (x);
  return x;
end|

--error ER_NOT_AGGREGATE_FUNCTION
create function f1(x INT) return INT AS
begin
  set x=5;
  fetch group next row;
return x+1;
end |

DELIMITER ;|


CREATE TABLE marks(stud_id INT, grade_count INT); 
INSERT INTO marks VALUES (1,6), (2,4), (3,7), (4,5), (5,8);
SELECT * FROM marks;

--echo # Using PL/SQL syntax: EXCEPTION WHEN NO_DATA_FOUND

DELIMITER //;
CREATE AGGREGATE FUNCTION IF NOT EXISTS aggregate_count(x INT) RETURN INT AS
  count_students INT DEFAULT 0;
BEGIN  
  LOOP  
    FETCH GROUP NEXT ROW;  
    IF x THEN  
      count_students:= count_students + 1;
    END IF;  
  END LOOP;  
EXCEPTION
  WHEN NO_DATA_FOUND THEN
    RETURN count_students;
END aggregate_count //
DELIMITER ;//
SELECT aggregate_count(stud_id) FROM marks;
DROP FUNCTION IF EXISTS aggregate_count;


--echo # Using SQL/PSM systax: CONTINUE HANDLER

DELIMITER //;
CREATE AGGREGATE FUNCTION IF NOT EXISTS aggregate_count(x INT) RETURN INT AS
  count_students INT DEFAULT 0;
  CONTINUE HANDLER FOR NOT FOUND RETURN count_students;
BEGIN  
  LOOP  
    FETCH GROUP NEXT ROW;  
    IF x THEN  
      SET count_students= count_students + 1;
    END IF;  
  END LOOP;  
END //
DELIMITER ;//
SELECT aggregate_count(stud_id) FROM marks;
DROP FUNCTION IF EXISTS aggregate_count;


DROP TABLE marks;


--echo #
--echo # MDEV-18813 PROCEDURE and anonymous blocks silently ignore FETCH GROUP NEXT ROW
--echo #


DELIMITER $$;
--error ER_NOT_AGGREGATE_FUNCTION
CREATE PROCEDURE p1 AS
BEGIN
  FETCH GROUP NEXT ROW;
END;
$$
DELIMITER ;$$


DELIMITER $$;
--error ER_NOT_AGGREGATE_FUNCTION
BEGIN NOT ATOMIC
  FETCH GROUP NEXT ROW;
END;
$$
DELIMITER ;$$


DELIMITER $$;
--error ER_NOT_AGGREGATE_FUNCTION
CREATE DEFINER=root@localhost  FUNCTION f1 RETURN INT AS
BEGIN
  FETCH GROUP NEXT ROW;
  RETURN 0;
END;
$$
DELIMITER ;$$


CREATE TABLE t1 (a INT);
--error ER_NOT_AGGREGATE_FUNCTION
CREATE TRIGGER tr1
  AFTER INSERT ON t1 FOR EACH ROW 
   FETCH GROUP NEXT ROW;
DROP TABLE t1;


--error ER_NOT_AGGREGATE_FUNCTION
CREATE EVENT ev1
  ON SCHEDULE EVERY 1 HOUR
  STARTS CURRENT_TIMESTAMP + INTERVAL 1 MONTH
  ENDS CURRENT_TIMESTAMP + INTERVAL 1 MONTH + INTERVAL 1 WEEK
DO FETCH GROUP NEXT ROW;


DELIMITER $$;
CREATE PACKAGE pkg1 AS
  PROCEDURE p1;
  FUNCTION f1 RETURN INT;
END;
$$

--error ER_NOT_AGGREGATE_FUNCTION
CREATE PACKAGE BODY pkg1 AS
  PROCEDURE p1 AS
  BEGIN
    FETCH GROUP NEXT ROW;  -- In a package procedure
  END;
  FUNCTION f1 RETURN INT AS
  BEGIN
    RETURN 0;
  END;
END;
$$

--error ER_NOT_AGGREGATE_FUNCTION
CREATE PACKAGE BODY pkg1 AS
  PROCEDURE p1 AS
  BEGIN
    NULL;
  END;
  FUNCTION f1 RETURN INT AS
  BEGIN
    FETCH GROUP NEXT ROW;  -- In a package function
    RETURN 0;
  END;
END;
$$

--error ER_NOT_AGGREGATE_FUNCTION
CREATE PACKAGE BODY pkg1 AS
  PROCEDURE p1 AS
  BEGIN
    NULL;
  END;
  FUNCTION f1 RETURN INT AS
  BEGIN  
    RETURN 0;
  END;
BEGIN
  FETCH GROUP NEXT ROW;  -- In a package executable section
END;
$$

DELIMITER ;$$
DROP PACKAGE pkg1;