我需要做的是检查过程中的一系列变量是否具有值,但棘手的部分是我必须检查的变量列表在表中。让我进一步解释:
我们有一个表格,其中保存了所有变量名称和一个指示哪个变量不应为空的指标。这样我们就可以在该表中更改哪些字段是必需的,而无需更改代码。
我们想要实现的是类似于表单中内置的 NAME_IN 的东西,你有这样的东西:v_value := GetValue('v_variable');
这将评估 v_variable
的值至 v_value
.之后我会检查是否 v_value
一片空白。这整个事情将在一个游标的 LOOP 中,该游标将获取我之前提到的表中标记为需要的所有变量。
到目前为止,我已经尝试使用 EXECUTE IMMEDIATE 来获取动态分配的变量值,但这不起作用,因为 EXECUTE IMMEDIATE 在它自己的范围内运行,因此它无法“看到”过程范围内的变量。
我尝试过的另一件事是 PL/SCOPE,它允许我通过提供名称来实际查看变量是否存在于我的范围内,但它没有获取确实存在的变量值的机制。
嗯,我希望任何人都可以帮助我。帮助将不胜感激。
下面是一个例子:
假设我得到了以下名为 tblConfig 的表,其中包含两列:variable_name 和 required_ind。
variable_name | required_ind
-----------------------------
var1 | Y
var2 | N
var3 | N
然后我会有一个名为 check_variables 的过程,如下所示:
PROCEDURE check_variables (
var1 VARCHAR2,
var2 VARCHAR2,
var3 VARCHAR2)
IS
CURSOR c_var_check IS
SELECT variable_name
FROM tblConfig
WHERE required_ind = 'Y';
BEGIN
FOR rec_var IN c_var_check LOOP
... check if rec_var.variable_name is the name of variable that has value ...
END LOOP;
END;
在这个第一个场景中,循环必须检查是否
var1
有值(value)。如果我更改了其他变量的 required_ind 值,它们也会被检查。我读过那篇关于软编码的文章……这是一本很好的读物,不幸的是,在这种情况下,我不是作为开发人员做出的选择。这是必要的,因为具有所需配置的表由用户管理,而不是开发团队。
最佳答案
PL/SQL 没有太多的反射方式。肯定没有 NAME_IN 的等价物。我无法使用动态 SQL 解决此问题,但我找到了解决方案。
这是一个程序。它有三个程序。请注意,它们都是强制性的,但我们可以在参数的插槽中传递 NULL。这当然是我对这种“软编码”的反对意见之一:它混淆了 API。描述一个过程已经不足以知道它需要什么参数。
create or replace procedure do_something
(p1 in varchar2
, p2 in varchar2
, p3 in varchar2)
is
args sys.dbms_debug_vc2coll;
begin
args := new sys.dbms_debug_vc2coll(p1, p2, p3);
for r in ( select s.varname, a.position
from syscfg s
join user_arguments a
on (s.procname = a.object_name
and s.varname = a.argument_name)
where s.procname = 'DO_SOMETHING'
and s.mandatory = 'Y'
order by a.position
)
loop
if args(r.position) is null
then
raise_application_error(-20000, r.varname ||' cannot be null');
end if;
end loop;
dbms_output.put_line('Procedure executed successfully!');
end;
/
“动态”参数检查通过按签名顺序使用参数填充集合来工作。我们通过将数据字典 View 与我们的配置表连接来获取配置参数的位置。然后我们使用位置作为数组的索引。请注意,该集合采用字符串。我将所有参数声明为 Varchars,但您可能需要转换日期或数字。
所以,是的,它很笨重,但是“this quest of avoidance often leads towards [...] complication, convolution, and all-around unmaintainable code.”:)
这是配置表的内容:
SQL> select * from syscfg
2 /
PROCNAME VARNAME M
------------------------------ ------------------------------ -
DO_SOMETHING P1 Y
DO_SOMETHING P2 Y
DO_SOMETHING P3 N
SQL>
所以,让我们滚吧!
SQL> set serveroutput on
SQL> exec do_something('A', 'Y', null)
Procedure executed successfully!
PL/SQL procedure successfully completed.
SQL> exec do_something('A', null, 'X')
BEGIN do_something('A', null, 'X'); END;
*
ERROR at line 1:
ORA-20000: P2 cannot be null
ORA-06512: at "APC.DO_SOMETHING", line 24
ORA-06512: at line 1
SQL>
看起来不错,但要证明我没有袖手旁观......
SQL> update syscfg
set mandatory = 'N'
where varname = 'P2'
/
2 3 4
1 row updated.
SQL> select * from syscfg
2 /
PROCNAME VARNAME M
------------------------------ ------------------------------ -
DO_SOMETHING P1 Y
DO_SOMETHING P2 N
DO_SOMETHING P3 N
SQL> exec do_something('A', null, 'X')
Procedure executed successfully!
PL/SQL procedure successfully completed.
SQL>
也许您的客户足够疯狂,认为这种超灵活性在其他地方会很方便。好消息是这个解决方案可以很容易地提取到一个独立的过程中,该过程将 PROCNAME 和数组作为参数。
关于sql - 动态检查变量是否在 PL SQL 中具有值,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/8360352/