StoredProc奇怪的问题??解决马上给分!!!
//判断查询条件
if ys_TreeView.selected.Index=0 then
begin
clbz:=0;
clztbz:=0;
end;
if ys_TreeView.selected.index =1 then
begin
clbz:=1;
clztbz:=0;
end;
if ys_TreeView.selected.Index =2 then
begin
clbz:=2;
clztbz:=1;
end;
ys_treeview.Selected.DeleteChildren;
//第一层查询
if ys_TreeView.selected.Level =0 then
begin
//查询符合条件的记录
dm.Database.Connected:=true;
dm.DataSource.DataSet:=dm.csh_StoredProc;
csh_DBGridEh.DataSource:=dm.DataSource;
//待处理用户查询储存过程
//try
dm.csh_StoredProc.Close;
//dm.csh_StoredProc.Prepared:=false;
dm.csh_StoredProc.Params.Clear;
dm.csh_StoredProc.StoredProcName:='P_YK_csh2CX';
dm.csh_StoredProc.Params.CreateParam(ftString,'@czgw',ptinput);
dm.csh_StoredProc.Params.CreatePara(ftinteger,'@czydm',ptinput);
dm.csh_StoredProc.Params.CreateParam(ftString,'@sbh',ptinput);
dm.csh_StoredProc.Params.CreateParam(ftinteger,'@clbz',ptinput);
dm.csh_StoredProc.Params.CreateParam(ftinteger,'@clztbz',ptinput);
dm.csh_StoredProc.ParamByName('@czgw').Value:='8';
dm.csh_StoredProc.ParamByName('@czydm').Value:=14;
dm.csh_StoredProc.ParamByName('@sbh').Value:=null;
dm.csh_StoredProc.ParamByName('@clbz').Value:=clbz;
dm.csh_StoredProc.ParamByName('@clztbz').Value:=clztbz;
dm.csh_StoredProc.Prepared:=true;
dm.csh_StoredProc.Open;
当选择 ys_TreeView.selected.index =1 可以查到记录
但选择其他的,比如 ys_TreeView.selected.index =0 或 ys_TreeView.selected.index =2
就没有记录返回了。
但是如果我先选择ys_TreeView.selected.index =0 可以查到记录
但再选择其他的,比如 ys_TreeView.selected.index =1或 ys_TreeView.selected.index =2
就没有记录返回了。
有谁遇到过这样的怪问题,请帮我解决一下吧!!!1