一个存储过程调用报错。该怎么处理

表是scott中的emp表。。create or replace package type_packis  type cur_type is ref cursor;end;--------create or replace procedure sel_insert_tab_emp2(p_empno number, p_ename varchar2,p_job varchar2, p_mgr number, p_hiredate varchar2, p_sal number, p_comm number, p_deptno number,v_page_data out type_pack.cur_type)as  l_sql_com varchar2(100);  begin  l_sql_com := 'select * from emp where';  if p_empno is not null then    l_sql_com := l_sql_com || 'empno := ' || p_empno ;   end if;  if p_ename is not null then    l_sql_com := l_sql_com || 'and ename := ' || p_ename;   end if;    if p_job is not null then    l_sql_com := l_sql_com || 'and job := ' || p_job;   end if;    if p_mgr is not null then    l_sql_com := l_sql_com + 'and mgr := ' || p_mgr ;   end if;    if p_hiredate is not null then    l_sql_com := l_sql_com || 'and hiredate := ' || to_date(p_hiredate,'yyyy-mm-dd');   end if;    if p_sal is not null then    l_sql_com := l_sql_com || 'and sal := ' || p_sal;   end if;    if p_comm is not null then    l_sql_com := l_sql_com || 'and comm := ' || p_comm;   end if;    if p_deptno is not null then    l_sql_com := l_sql_com || 'and deptno := ' || p_deptno;   end if;   open v_page_data for l_sql_com;  --mark! 这报错。。end;------------------测试调用(注意，抓取游标中数据，类型的问题)        declare  v_page_data type_pack.cur_type;  v_data_row emp%rowtype;begin  dbms_output.put_line('diaoyong');  pro_sel_tab_emp2(7788, null, null, null, null, null, null,null, v_page_data);  fetch v_page_data into v_data_row;  dbms_output.put_line('员工编号' || ' 员工姓名' ||' 部门名称');          while v_page_data%found loop            dbms_output.put_line(v_data_row.empno || ' ' || v_data_row.ename || ' ' ||v_data_row.deptno);    fetch v_page_data into v_data_row;    end loop;  close v_page_data;end; 存储过程编译不出错。。测试程序报错如下。ORA-00933: SQL 命令未正确结束ORA-06512: 在 "SDD.PRO_INSERT_TAB_EMP2", line 42ORA-06512: 在 line 6我这个存储过程逻辑还是有点问题的。不过我想先测试通过后再改的。。求报错原因。