【搞定】[问题] 终止流程出现错误！**

yancm

我说的单独运行是指在此功能上可以临时提供一个按钮用来删除文档关联。也可以从数据库中删除掉。

roice

只有先这样了

roice

2 楼的代码可以换和位置嘛？就是将删除文档关联的代码放在前面，删除文档的代码放在后面：

    (dvAttach.Doc as TRelevancyDoc).DataSet.First;
    while not (dvAttach.Doc as TRelevancyDoc).DataSet.Eof   do
    begin
      (dvAttach.Doc as TRelevancyDoc).DataSet.Delete;
      (dvAttach.Doc as TRelevancyDoc).DataSet.ApplyUpdates;
    end;

      docs:=TStringList.Create;
    try
      (dvAttach.Doc as TRelevancyDoc).GetDocURLList(docs);
      for i:=0 to  docs.Count-1 do
      begin
        TDocSystem.DeleteFile(docs);
      end;
    finally
       docs.free;
    end;

yancm

可以，最好再加上一个事物。下面的出错后，上面的回滚。

roice

这个先结贴吧，另起一个帖子，http://bbs.justep.com/forum.php?mod=viewthread&tid=18769