谢谢!

解决方案 »

  1.   

    create or replace package aaa as
      type arr is varray(5) of varchar2(100);
       varr arr;
      .....
    end aaa;create or replace procedure bbb(
          a aaa.varr,
          ....)as
     .....
    end;
      

  2.   

    create package test_pkg is
      type arrtype is varray(100) of varchar2(20);
      procedure print(v in arrtype);   
    end; 
    create or replace package body test_pkg as  procedure print(v in arrtype) as
        i Pls_integer; 
      begin
        for i in 1..v.count loop
      dbms_output.put_line( v(i) );
    end loop;
      end;
    end;--test
    declare x test_pkg.arrtype;
    begin
      x := test_pkg.arrtype('123', '412', 'badf', '1412');
      test_pkg.print(x);
    end;
      

  3.   

    这样做不能符合我的要求, 
    我必须在vc中用ado调用存储过程的。
    得先把参数传递进去的。