这个函数怎么错了

[eHuaTian]

--对表tableName将记录导出，导出记录的列为fieldCols
--tableName：要查找的表名
--fieldCols:查找表的字段名称集合，值形如“field1,field2,fields”,各字段名称用逗号隔开。
--judegField：判断字段
--judegFieldValue：标准值
procedure getRecords(tableName varchar2, fieldCols varchar2,judegField varchar default NULL,
judegFieldValue varchar2 default NULL,records out SYS_REFCURSOR)is
p_str varchar2(4000);

begin
IF (judegField is NULL) then
p_str :='select '||fieldCols||' from ' ||tableName|| ';
ELSE
p_str :='select '||fieldCols||' from ' ||tableName|| ' where ' || judegField|| '=' ||''''||judegFieldValue||'''';
END IF;

open records for p_str;/*返回游标*/

end;

编译的时候提示：p_str :='select '||fieldCols||' from ' ||tableName|| ' where ' || judegField|| '=' ||''''||judegFieldValue||'''';错误

[学海无涯-回头是岸]

加一个dbms_output.put_line 输出看看你的拼接有没有问题。
后面= 前面 加个空格吧 试试

[卖水果的net]

IF (judegField is NULL) then p_str :='select '||fieldCols||' from ' ||tableName|| '; ELSE 红色这行，最后的单引号去掉，或者 换成两个单引号 p_str :='select '||fieldCols||' from ' ||tableName|| ''; p_str :='select '||fieldCols||' from ' ||tableName;