PB中执行下面的SQL不成功,请高手来指点一下解决思路

PB中执行下面的SQL不成功,请高手来指点一下
UPDATE SK_XFJLB  
SET JZstatus = :li_flag  
WHERE (XF_PH in ( :as_phlist )AND XF_JZBZ='否' ) ;

IF SQLCA.SQLCODE = 0 THEN
COMMIT USING SQLCA;
ELSE
ROLLBACK USING SQLCA;
Messagebox('','失败.')
END IF

as_phlist 参数为(0001,0002,0003)
如果as_phlist为 0001是可以成功的,
如果是多个以上,则不能成功了

[解决办法]
试试这样

C# code

String ls_sql, as_phlistInt li_flagas_phlist = "'0001','0002','0003'"ls_sql = "UPDATE SK_XFJLB SET JZstatus = " + String(li_flag) +&    " WHERE XF_PH in (" + as_phlist  + ") AND XF_JZBZ='否' "EXECUTE IMMEDIATE :ls_sql;
[解决办法]
但是建议改成这样
UPDATE SK_XFJLB  
SET JZstatus = :li_flag  
WHERE (CHARINDEX(','+XF_PH+',',','+:as_phlist+',') >0
AND XF_JZBZ='否' 
) ;