您至少有 3 个选项:
- (标准)使用关联数组作为过程参数
- 定义“足够”数量的可选形式参数
- 使用带有已定义分隔符字符的单个 varchar 参数
示例代码 1.)
TYPE t_map IS TABLE OF VARCHAR2(50) INDEX BY VARCHAR2(20);
CREATE OR REPLACE PROCEDURE demo_1 ( vararg IN t_map ) IS
BEGIN
/* whatever */
NULL;
END demo_1;
/* ... somewhere else ... */
my_var t_map;
my_var('first') := 'this';
my_var('next') := ' is a ';
my_var('last') := 'demo';
demo_1 ( my_var );
/* ... */
示例代码 2.)(最多 5 个参数)
CREATE OR REPLACE PROCEDURE demo_2 (
vararg1 IN VARCHAR2 DEFAULT NULL
, vararg2 IN VARCHAR2 DEFAULT NULL
, vararg3 IN VARCHAR2 DEFAULT NULL
, vararg4 IN VARCHAR2 DEFAULT NULL
, vararg5 IN VARCHAR2 DEFAULT NULL
) IS
BEGIN
/* whatever */
NULL;
END demo_2;
/* ... somewhere else ... */
demo_2 ( 'this', ' is a ', 'demo' );
/* ... */
示例代码 3.)(特殊字符为 ';' - 不得出现在有效负载数据中)
CREATE OR REPLACE PROCEDURE demo_3 (
vararg IN VARCHAR2
) IS
l_arg2 VARCHAR2(50);
l_arg5 VARCHAR2(50);
BEGIN
l_arg2 := SUBSTR(REGEXP_SUBSTR(vararg, ';[^;]*', 1, 2), 2);
l_arg5 := SUBSTR(REGEXP_SUBSTR(vararg, ';[^;]*', 1, 5), 2);
/* whatever */
END demo_3;
/* ... somewhere else ... */
demo_3 ( ';this; is a ;demo;;really!;' );
/* ... */