显示循环表的结果（oracle、pl/sql）

Question

我正在尝试循环一些表并运行如下选择：

set serveroutput on
declare

type tables_names is table of varchar2(30);
type selectTable is table of varchar2(30);

tName tables_names;
sTableName selectTable;

begin;

tName := tables_names('PERIOD','SETTING','RAP','LOG');
sTableName := selectTable('m_table1','m_table2','m_table3','m_table4','m_table5');    

    for i in 1..tName.count loop
        for j in 1..sTableName.count loop

               select col10, count(*) from user.sTableName(j) 
               where table_name = tName(i) group by col10;            

        end loop;
    end loop;

end;

我收到错误：PL/SQL: ORA-00933。

您能否告诉我如何正确运行 PL/SQL 程序以显示我选择的结果？

更新：查看结果

通常，为了得到这个，我需要在 select 下运行：

select column_name, 
count(*) as countColumn
from user.m_table1 where table_name = 'PERIOD' group by column_name;

select column_name, 
count(*) as countColumn
from user.m_table2 where table_name = 'PERIOD' group by column_name;

Answer 1

Oracle 抱怨 (ORA-00933) 命令未正确结束。这可能是因为 BEGIN 后面有一个分号；另外，您缺少 INTO 子句。

我不确定 PERIOD、SETTING、... 与 m_table1、m_table2、... 哪些是表名？那么，其他值是什么？

无论如何：这是一个示例，它显示了如何执行类似的操作 - 从表中计算行数。尝试根据您的情况进行调整，或者 - 可能 - 添加更多信息，以便我们知道您在做什么。

SQL> set serveroutput on
SQL> declare
  2    tname   sys.odcivarchar2list := sys.odcivarchar2list();
  3    l_cnt   number;
  4    l_str   varchar2(200);
  5  begin
  6    tname := sys.odcivarchar2list('EMP', 'DEPT');
  7
  8    for i in 1 .. tname.count loop
  9      l_str := 'select count(*) from ' || tname(i);
 10      execute immediate l_str into l_cnt;
 11      dbms_output.put_line(tname(i) ||': '|| l_cnt);
 12    end loop;
 13  end;
 14  /
EMP: 14
DEPT: 4

PL/SQL procedure successfully completed.

SQL>

[编辑：添加 GROUP BY 选项]

给你；由于 EMP 和 DEPT 共享 DEPTNO 列，我选择它作为 GROUP BY 列。

SQL> declare
  2    tname   sys.odcivarchar2list := sys.odcivarchar2list();
  3    type    t_job is record (deptno varchar2(20), cnt number);
  4    type    t_tjob is table of t_job;
  5    l_tjob  t_tjob := t_tjob();
  6    l_str   varchar2(200);
  7  begin
  8    tname := sys.odcivarchar2list('EMP', 'DEPT');
  9
 10    for i in 1 .. tname.count loop
 11      l_str := 'select deptno, count(*) from ' || tname(i) ||' group by deptno';
 12      execute immediate l_str bulk collect into l_tjob;
 13
 14      for j in l_tjob.first .. l_tjob.last loop
 15        dbms_output.put_Line('Table ' || tname(i) || ': Deptno ' || l_tjob(j).deptno||
 16          ': number of rows = '|| l_tjob(j).cnt);
 17      end loop;
 18
 19    end loop;
 20  end;
 21  /
Table EMP: Deptno 30: number of rows = 6
Table EMP: Deptno 20: number of rows = 5
Table EMP: Deptno 10: number of rows = 3
Table DEPT: Deptno 10: number of rows = 1
Table DEPT: Deptno 20: number of rows = 1
Table DEPT: Deptno 30: number of rows = 1
Table DEPT: Deptno 40: number of rows = 1

PL/SQL procedure successfully completed.

SQL>

Answer 2

您可能正在寻找类似的东西。请注意，如果没有INTO 子句，您将无法在 PL/SQL 中运行简单的选择语句。使用refcursor 和DBMS_SQL.RETURN_RESULT

DECLARE
   TYPE tables_names IS TABLE OF VARCHAR2 (30);

   TYPE selectTable IS TABLE OF VARCHAR2 (30);

   tName        tables_names;
   sTableName   selectTable;
   rc           SYS_REFCURSOR;
BEGIN
   tName :=
      tables_names ('PERIOD',
                    'SETTING',
                    'RAP',
                    'LOG');
   sTableName :=
      selectTable ('m_table1',
                   'm_table2',
                   'm_table3',
                   'm_table4',
                   'm_table5');

   FOR i IN 1 .. tName.COUNT
   LOOP
      FOR j IN 1 .. sTableName.COUNT
      LOOP
         OPEN rc FOR
               'select col10, count(*) from '||USER||'.'
            || sTableName (j)
            || ' where table_name = '''
            || tName (i)
            || ''' group by col10';

         DBMS_SQL.RETURN_RESULT (rc);

      END LOOP;
   END LOOP;
END;
/