masz co najmniej 3 opcje:
- (standard) użyj tablicy asocjacyjnej jako parametru procedury
- zdefiniuj „wystarczającą” liczbę opcjonalnych parametrów formalnych
- użyj pojedynczego parametru varchar ze zdefiniowanym znakiem separatora
przykładowy kod 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 );
/* ... */
przykładowy kod 2.) (maks. 5 parametrów)
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' );
/* ... */
przykładowy kod 3.) ( znak specjalny to ';' - nie może występować w danych ładunku )
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!;' );
/* ... */