急，报这样的错invail field name ORA-00904:"COMPN":无效的标识符 是什么原因？ 在线等

[新生代码农NJ]

我是用Delphi编程的，连接的Oracle数据库过程如下，
procedure TdlgWDW.RunWDW(DWMC: string);
begin
if qryWDW.Active then qryWDW.Close;
qryWDW.SQL.Clear;
qryWDW.SQL.Add('select GYS_GYSID, GYS_MC, ');
qryWDW.SQL.Add('(case when CHARINDEX(''X'',U_GYS_TYLX) > 0 then ''停用'' else ''在用'' end) as ZT ');
qryWDW.SQL.Add('from GYS ');
qryWDW.SQL.Add('where U_GYS_WDWLX like ''

%X%'' ');
if Trim(DWMC) <> '' then
begin
qryWDW.SQL.Add(' and GYS_MC like :pMC ');
qryWDW.ParamByName('pMC').AsString := '%'+ Trim(DWMC) +'%';
end;
qryWDW.SQL.Add('order by ZT desc, GYS_MC');
qryWDW.Open;
end;
在qryWDW.Open这一句时报错，但是在别人的机子上不报错。不知道问题出在哪里，GYS表我也用PLSQL重新导入了，还是报错。
请高手指点

[新生代码农NJ]

invail field name
ORA-00904:"COMPN":无效的标识符
报上面的错

[android2008]

??

[qap22]

??

[新生代码农NJ]

语句在PLSql下也能执行
select GYS_GYSID, GYS_MC,
(case when instr('X',U_GYS_TYLX) > 0 then '停用' else '在用' end) as ZT
from GYS
where U_GYS_WDWLX like '%X%'
order by ZT desc, GYS_MC

[codearts]

报什么错？

[yonghengdizhen]

很有可能是由于delphi对象复用引起的,类似在VB中的ADODB.Recordset.Filter中设置了属性,很多人把它忽略,结果在执行新的SQL时,Filter被作为新的SQL条件表达式的一部分,而新的SQL引用的数据库对象并不存在先前所引用的条件表达式设计的field

[cshluo]

奇怪！奇怪！ 关注,关注....

[linzi]

qryWDW.SQL.Add(' and GYS_MC like '':pMC'' ');
这样试试，好象是传进来的参数没有带引号的原因吧

[hyee]

qryWDW.ParamByName('pMC').AsString := '%'+ Trim(DWMC) +'%';

这一行有问题了

[gudaohanfeng]

用decode