mysql与oracle通过存储过程查询数据库所有表的列总和

Mysql数据库：

delimiter //  # 定义//为一句sql的结束标志，取消;的所代表的意义
drop procedure if exists db_table_col_count;  # 如果存在名字为db_table_col_count的procedure则删除
create procedure db_table_col_count()  # 创建（创建函数使用的关键字为function 函数名()）
begin
    declare s_table_name varchar(64);  # 声明变量
    declare flag int default 0;
	declare db_all_col_count int default 0;
    # 这是重点，定义一个游标来记录sql查询的结果
    declare s_table_name_list cursor for select table_name from infORMation_schema.tables where table_schema="icu_core";
    # 为下面while循环建立一个退出标志，当游标遍历完后将flag的值设置为1
    declare continue handler for not found set flag=1;
    open s_table_name_list;  # 打开游标
    # 将游标中的值赋给定义好的变量，实现for循环的要点
        fetch s_table_name_list into s_table_name;
        while flag <> 1 do
            # 在T-SQL中，局部变量必须以@作为前缀，统计表的列数
            set @temp_col_count = (select count(1) from information_schema.COLUMNS where table_name=s_table_name);
            # 相加统计到的列数
            set db_all_col_count = db_all_col_count + @temp_col_count;
            # 游标往后移
            fetch s_table_name_list into s_table_name;
        end while;
		# 打印列数
        select  db_all_col_count;
    close s_table_name_list;  # 关闭游标
end
//
delimiter ;  # 重新定义;为一句sql的结束标志，取消//的所代表的意义

call db_table_col_count(); # 调用

oracle：说来惭愧，oracle存储过程编译错误无法定位到哪一行，所以写了一段不是存储过程的代码来搞的，直接执行就可以了

declare
	db_all_col_count number := 0;
	temp_col_count number := 0;
begin   
	for cur_row in (select TABLE_NAME from all_tables t where owner = "数据库名称") loop
    select count(*) into temp_col_count from dba_tab_columns where table_name=cur_row.TABLE_NAME;
		db_all_col_count := db_all_col_count + temp_col_count;
  end loop;
  dbms_output.put_line(db_all_col_count);
end;