一个存储过程调用报错。
表是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我这个存储过程逻辑还是有点问题的。不过我想先测试通过后再改的。。求报错原因。