oracle - PL/SQL - 特定于一个数据库的条件编译

Question

我有一个 Oracle 开发数据库，​​其中有一些包最终被复制到生产服务器。我正在寻找一种在包规范中使用条件编译的方法，该方法仅在此开发服务器上为真，但在所有其他服务器上编译为假。

我无法向生产服务器添加任何内容来完成此操作 - 没有新的全局变量/配置设置/程序/等。

那么有没有一种有效的方法呢

$IF {{development_server}} $THEN
    my_proc;
$END

Answer 1

我不确定这是否正是您所追求的，但它应该会给您一些有用的东西:

CREATE OR REPLACE PACKAGE my_app_state
   AUTHID DEFINER
IS
   c_in_production   CONSTANT BOOLEAN := TRUE;
END;
/

CREATE OR REPLACE PROCEDURE test_app_state
   AUTHID DEFINER
IS
   PROCEDURE my_proc1 
   IS
   BEGIN
      DBMS_OUTPUT.PUT_LINE ('1');
   END;

   PROCEDURE my_proc2
   IS
   BEGIN
      DBMS_OUTPUT.PUT_LINE ('2');
   END;
BEGIN
   $if my_app_state.c_in_production $then
      my_proc1;
   $else
      my_proc2;
   $end
end;
/

EXEC test_app_state

您还可以使用条件编译标志。如果它未定义，它只是默认为 NULL，因此默认的生产状态是“关闭”。

CREATE OR REPLACE PROCEDURE test_app_state
   AUTHID DEFINER
IS
   PROCEDURE my_proc1 
   IS
   BEGIN
      DBMS_OUTPUT.PUT_LINE ('1');
   END;

   PROCEDURE my_proc2
   IS
   BEGIN
      DBMS_OUTPUT.PUT_LINE ('2');
   END;
BEGIN
   $if $$cc_in_dev $then
      my_proc1;
   $else
      my_proc2;
   $end
end;
/