PPAS 是 EnterpriseDB公司的以PostgreSQL為基礎的資料庫產品 Postgres Plus Advised Server。
下面看例子:
1
--建立表
CREATE TABLE TABLE2
( COLUMN1 NUMBER(10,0),
COLUMN2 VARCHAR2(20 ),
COLUMN3 VARCHAR2(20 ),
PRIMARY KEY(COLUMN1)
);
2
--建立類型
create or replace type t_type is object (column2 varchar2(20),column3 varchar2(20));
3
--建立預存程序
create or replace procedure p_table_test(example t_type ARRAY)
as
v_count int:=0;
begin
select array_length(example,1) into v_count;
forall i in 1..v_count
insert into table2(column1,column2,column3)
values(i, example[i].column2, example[i].column3);
end;
4
--調用預存程序
DECLARE
v_example t_type ARRAY;
BEGIN
v_example := ARRAY[t_type('meeting','lunch'), t_type('training','presentation')];
exec p_table_test(v_example);
END;
5
--查結果
dbtest=# select * from table2;
column1 | column2 | column3
---------+----------+--------------
1 | meeting | lunch
2 | training | presentation
(2 行記錄)