--创建类型
 CREATE OR replace TYPE varray_list AS varray(10) OF varchar2(50);

 --创建存储过程
 CREATE OR replace PROCEDURE show_list(
 	p_varlist IN varray_list
 )IS
 i number;
 temp varchar2(20);
 BEGIN
	FOR x IN 1..p_varlist.count loop
	   dbms_output.put_line(p_varlist(x));
	END loop;
 END show_list;

 --调用存储过程
 set serveroutput on;
 exec show_list(myvarray_list('zsh1','zsh2','zsh3','zsh4'));