使用游标或循环使用动态 SQL 自动创建表过程 - PLSQL

Question

语法：PL SQL IDE：PL/SQL 开发人员

我正在尝试使用一系列区域代码为每个区域生成 4 个表。

我知道生成一个包含所有区域的表并截断和替换此表可能更有效，但是根据使用所需的结构，我不允许这样做。

这 4 个区域来自一个特定的表

SELECT DISTINCT REGION
FROM REGION_TABLE
;

动态生成这一系列表的最佳方法是什么？

我尝试使用游标和循环，但我不确定将此游标集成到以下过程中的方法。

DECLARE 
CURSOR C_REGION IS
       SELECT DISTINCT REGION FROM REGION_TABLE ;
BEGIN
     FOR L_IDX IN C_REGION
     LOOP
     DBMS_OUTPUT.PUTLINE(L_IDX.C_REGION);
     END LOOP;
END;

使用上面的游标值，我如何将这些值不仅插入到 Sql 语句的 Create Table 部分中使用的表名中，而且作为 where 子句中的参数

-- 4 REGIONS  - NORTH SOUTH EAST WEST, 

CREATE OR REPLACE PROCEDURE SALES_ORDER_TBL_PROC
          (
          REGION IN VARCHAR2
          , RETURNCODE OUT NUMBER
          , ERROR_MESSAGE OUT VARCHAR2
          )
            IS 
  TABLE_NAME VARCHAR2(30);
  SQL_STR VARCHAR2;
  REGION_VAR VARCHAR;          
BEGIN 
  TABLE_NAME := 'SALES_COUNT_'||REGION_VAR;
  SQL_STR := 'CREATE TABLE '||TABLE_NAME||
             ' AS 
               (
               SELECT 
                      REGION
                          , COUNT(DISTINCT MEMBER_ID) AS NUM_MBR
                      FROM INCREMENTAL_SALES_TBL
                      WHERE 1=1
                          AND REGION = '||REGION_VAR||
                          'GROUP BY REGION)' 
               ;

 EXECUTE IMMEDIATE SQL_STR ;

         RETURNCODE := 0;

 EXCEPTION WHEN OTHERS THEN

         RETURNCODE := SQLCODE;

         ERROR_MESSAGE :='ERR:Creating/Altering table '||TABLE_NAME ||'-'||SQLERRM;
END;
/

BEGIN
     SALES_ORDER_TBL_PROC;
END;

Answer 1

如何将 DDL 置于 for 循环中？我还没有测试过下面的代码，但希望它至少能让你走上实现目标的道路。

FOR rec IN (SELECT DISTINCT REGION FROM REGION_TABLE) LOOP
  EXECUTE IMMEDIATE
    'CREATE TABLE SALES_COUNT_' || UPPER(rec.region) || ' AS (
       SELECT REGION,
              COUNT(DISTINCT MEMBER_ID) AS NUM_MBR
         FROM INCREMENTAL_SALES_TBL
        WHERE REGION = ''' || rec.region || '''
        GROUP BY REGION)';
END LOOP;

我不记得使用 EXECUTE IMMEDIATE 连接时的限制是什么，但如果它不起作用，那么可以使用绑定变量和 USING 子句。