SQL变量，怎么做？

Question

我有这样的SQL：

DROP TABLE MISSINGTABLE; 

CREATE TABLE MISSINGTABLE (
    TABLE_NAME VARCHAR2 (70), 
    DESCRIPTION VARCHAR2 (1000) 
) 

CREATE OR REPLACE PROCEDURE MISSINGTABLES AS 
    BEGIN 
     INSERT INTO MISSINGTABLE 
     ((((SELECT TABLE_NAME, 'Missing Table on PEKA_ERP_001' Description FROM ALL_TABLES WHERE OWNER = 'ASE_ERP_001') 
     MINUS 
     (SELECT TABLE_NAME, 'Missing Table on PEKA_ERP_001' Description FROM ALL_TABLES WHERE OWNER = 'PEKA_ERP_001')) 
     UNION 
     ((SELECT TABLE_NAME, 'Missing Table on ASE_ERP_001' Description FROM ALL_TABLES WHERE OWNER = 'PEKA_ERP_001') 
     MINUS 
     (SELECT TABLE_NAME, 'Missing Table on ASE_ERP_001' Description FROM ALL_TABLES WHERE OWNER = 'ASE_ERP_001')))); 
    END; 

那么，如何ü可以看到，我创建一个表，然后一个过程，它填补了表。 现在我想2这些参数变量：'PEKA_ERP_001'和'ASE_ERP_001'（所以我并不总是需要将它手动编写，因为这个数值变化很大）

我想这（仅包括第一部分上述声明）：

DECLARE 
    S1 VARCHAR2(100) := 'ASE_ERP_001'; 
    S2 VARCHAR2(100) := 'PEKA_ERP_001'; 
    TableMissing VARCHAR(100) := 'Missing Table on '; 
    Apostrophe VARCHAR(10) := ''''; 
    BEGIN 
     EXECUTE IMMEDIATE ('CREATE OR REPLACE PROCEDURE MISSINGTABLES AS BEGIN INSERT INTO MISSINGTABLE (SELECT TABLE_NAME, ' || Apostrophe || TableMissing || S2 || Apostrophe || ' Description FROM ALL_TAB_COLUMNS WHERE OWNER = ' || Apostrophe || S1 || Apostrophe || ')' || ' END;'); 
END; 

它创建的程序，但程序中包含了 “CREATE OR REPLACE PROCEDURE” 本身和它的显示我的错误...（我不能执行程序）

任何人都可以帮助我吗？ 如何在头部使用第一条SQL语句编写第一条SQL语句，仅使用2个变量更多,ASE_ERP_001和PEKA_ERP_001？

编辑：

声明：

DECLARE 
    S1 VARCHAR2(100) := 'ASE_ERP_001'; 
    S2 VARCHAR2(100) := 'PEKA_ERP_001'; 
    TabelleFehlt VARCHAR(100) := 'Diese Tabelle fehlt '; 
    Hochkomma VARCHAR(10) := ''''; 
    BEGIN 
     EXECUTE IMMEDIATE ('CREATE OR REPLACE PROCEDURE MISSINGTABLES AS BEGIN INSERT INTO MISSINGTABLE (SELECT TABLE_NAME, ' || Hochkomma || TabelleFehlt || S2 || Hochkomma || ' Beschreibung FROM ALL_TAB_COLUMNS WHERE OWNER = ' || Hochkomma || S1 || Hochkomma || ') END;'); 
END; 

上面的语句创建一个过程。 但同时也说明我：

ORA-06512: in Row 7 
    24344. 00000 - "success with compilation error" 
    *Cause: A sql/plsql compilation error occurred. 
    *Action: Return OCI_SUCCESS_WITH_INFO along with the error code 

和程序Itselfs包含此：

create or replace 
PROCEDURE MISSINGTABLES AS BEGIN INSERT INTO MISSINGTABLE (SELECT TABLE_NAME, 'Diese Tabelle fehlt PEKA_ERP_001' Beschreibung FROM ALL_TAB_COLUMNS WHERE OWNER = 'ASE_ERP_001') END; 

但它不应该包含“创建或替换过程MISSINGTABLES”等只INSERT语句，我不能无论如何执行程序..

更好的是使用bpgergo脚本，如果它会去。

Answer 1

我希望我没有混合参数，你应该检查他们再次

CREATE OR REPLACE PROCEDURE MISSINGTABLES (p_1 in varchar2, p_2 in varchar2) 
AS 
    BEGIN 
     INSERT INTO MISSINGTABLE 
     ((((SELECT TABLE_NAME, 'Missing Table on '||p_1 Description FROM ALL_TABLES WHERE OWNER = p_2) 
     MINUS 
     (SELECT TABLE_NAME, 'Missing Table on '||p_1 Description FROM ALL_TABLES WHERE OWNER = p_1)) 
     UNION 
     ((SELECT TABLE_NAME, 'Missing Table on '||p_2 Description FROM ALL_TABLES WHERE OWNER = p_1) 
     MINUS 
     (SELECT TABLE_NAME, 'Missing Table on '||p_2 Description FROM ALL_TABLES WHERE OWNER = p_2)))); 
END; 

编辑

你会调用此类似：

begin 
    MISSINGTABLES ('PEKA_ERP_001', 'ASE_ERP_001'); 
end; 

Answer 2

的SQL你正试图立即执行将被评估为：

CREATE OR REPLACE PROCEDURE MISSINGTABLES AS 
BEGIN 
INSERT INTO MISSINGTABLE 
(SELECT TABLE_NAME, COLUMN_NAME, 'Missing Table on PEKA_ERP_001' Beschreibung 
FROM ALL_TAB_COLUMNS WHERE OWNER = 'ASE_ERP_001') 
END; 

这可能不是您实际需要的逻辑，但直接的问题是您正在尝试填充名为Beschreibung的不存在的第三列，而不是填充第二列DESCRIPTION。

Answer 3

可能我建议改进您的SELECT？

这里是一个可能的选择：

SELECT 
    TABLE_NAME, 
    'Missing Table on' 
    || CASE MAX(OWNER) WHEN 'PEKA_ERP_001' THEN 'ASE_ERP_001' ELSE 'PEKA_ERP_001' END 
    AS Description 
FROM ALL_TABLES 
WHERE OWNER IN ('PEKA_ERP_001', 'ASE_ERP_001') 
GROUP BY TABLE_NAME 
HAVING COUNT(*) = 1 

此查询只返回行，其中一个TABLE_NAME只有一个OWNER。然后显示缺少表格的所有者作为被测试的两个中的另一个。

使用参数，整个CREATE PROCEDURE声明可能是这样的：

CREATE OR REPLACE PROCEDURE MISSINGTABLES 
(
    owner1 IN varchar2, 
    owner2 IN varchar2 
) 
AS 
BEGIN 
    INSERT INTO MISSINGTABLE 
    (
    SELECT 
    TABLE_NAME, 
    'Missing Table on' 
    || CASE MAX(OWNER) WHEN owner1 THEN owner2 ELSE owner1 END 
    AS Description 
    FROM ALL_TABLES 
    WHERE OWNER IN (owner1, owner2) 
    GROUP BY TABLE_NAME 
    HAVING COUNT(*) = 1 
); 
END;