--功能：采用存储过程、type组合来实现批量操作，以节省系统开销，提高效率。 --创建 Type bodies CREATE OR REPLACE TY
--功能：采用存储过程、type组合来实现批量操作，以节省系统开销，提高效率。
--创建 type bodies
create or replace type type_array as object
(
id number(10),
remark varchar2(10)
)
--创建 types
create or replace type type_array_tbl as table of type_array
--创建表
create table t_temp(id number(10) not null, remark number(10))
--创建存储过程
create or replace procedure proc_array_param(type_object in type_array_tbl) is
begin
insert into t_temp
(id, remark)
select id, remark
from the (select cast(type_object as type_array_tbl) from dual);
for i in 1 .. type_object.count loop
delete from t_temp where id = to_number(type_object(i));
end loop;
commit;
end;
end proc_array_param;
--创建包
CREATE OR REPLACE PACKAGE PKG_PARAM AS
TYPE ARRAY_PARAMS IS TABLE OF VARCHAR2(20) INDEX BY BINARY_INTEGER; --先定义包，这个就相当于一个数组
PROCEDURE PROC_PARAM(PARAMS IN ARRAY_PARAMS);
END PKG_PARAM;
--创建包体
CREATE OR REPLACE PACKAGE BODY PKG_PARAM AS
PROCEDURE PROC_PARAM(PARAMS IN ARRAY_PARAMS) AS
I NUMBER := 1; --这个可以不写
BEGIN
SAVEPOINT SP1;
FOR I IN 1 .. PARAMS.COUNT LOOP
DELETE FROM T_TEMP WHERE ID = TO_NUMBER(PARAMS(I));
END LOOP;
COMMIT;
EXCEPTION
WHEN OTHERS THEN
ROLLBACK TO SAVEPOINT SP1;
END PROC_PARAM;
END PKG_PARAM;
企业网站.net管理系统,采用三层结构开发，网页编辑器用的是FCKeditor，数据库操作采用的是存储过程学习作品，参照N-Layered Web Applications with ASP.NET 3.5文章及源码码发
