数组　作为oracle 存储过程参数的　实践

今天做了一个关于短消息批量删除的功能，　刚开始准备在后台用循环来逐条删除，后来因为其它功能模块也会用到大批量删除数据。　所以就决定用　数组作为存储过程的参数进行传值，在存储过程中批量删除。说实话这个选择有点得不偿失，本来以为上午就能搞定，谁知道从摸索到实现，居然发了大半天时间。

rem 删除选中短信息

CREATE OR REPLACE PACKAGE MSGPAG
AS
TYPE MSG_ARRAY IS TABLE OF VARCHAR2(20) INDEX BY BINARY_INTEGER;--先定义包，这个就相当于一个数组
PROCEDURE DELMSG(M_ARRAY IN MSG_ARRAY);
END MSGPAG;
/
CREATE OR REPLACE PACKAGE BODY MSGPAG
AS
PROCEDURE DELMSG(M_ARRAY IN MSG_ARRAY)
AS
I NUMBER:=1; --这个可以不写
BEGIN
SAVEPOINT SP1;
FOR I IN 1..M_ARRAY.COUNT LOOP
DELETE FROM T_MESSAGE WHERE FID = TO_NUMBER(M_ARRAY(I));
END LOOP;
COMMIT;
EXCEPTION
WHEN OTHERS THEN
ROLLBACK TO SAVEPOINT SP1;
END DELMSG;
END MSGPAG;

短短的这些，着实让我走了不少弯路。　最后有一个小时是花在TO_NUMBER(M_ARRAY(I))上的，我想把TO_NUMBER(M_ARRAY(I))赋给一个NUMBER　型变量，但就是执行不到　DELETE 句处，呵呵，　最后才明白是怎么回事。

后台的调用执行语句就这么多：

connection.Open();
Oracle.DataAccess.Client.OracleCommand cmd = connection.CreateCommand();
cmd.CommandType = CommandType.StoredProcedure;
cmd.CommandText = procedureName;
Oracle.DataAccess.Client.OracleParameter parameter = new Oracle.DataAccess.Client.OracleParameter(@"M_ARRAY", Oracle.DataAccess.Client.OracleDbType.Varchar2);// @"M_ARRAY"　是存储过程的IN 参数
parameter.Direction = ParameterDirection.Input;
parameter.Value = charArray;
parameter.CollectionType = Oracle.DataAccess.Client.OracleCollectionType.PLSQLAssociativeArray;

cmd.Parameters.Add(parameter);

cmd.ExecuteNonQuery();