【搞定】文档关联怎么实现。**

lhb963

我在 业务模型\协同系统\文档\关联\文档关联定义 这个里面设置关联后，使用的时候“文档关联”

里的功能是灰色，不能使用。我已经查了，你们的解决办法是让做一个按钮实现下面代码：
const
  cGUID = '4B666B997C49446688B339B6D944AA5B';
begin
  if not FileSys.FileSystem.FileExists(TRTLConsts.DocRoot) then  //TRTLConsts在协同常

量库
  try
    FileSys.FileSystem.CreateFile(TRTLConsts.DocRoot, cGUID, [], TFileKind.fkSpace,

TRTLConsts.DocDisplayName);
  except
    on E: TObject do
      raise Exception.CreateFmt('知识中心基础数据错误，初始化失败。'#13#10 + '错误原因

：%s', [jsCommon.ExceptText(E)]);
    else
      raise;
  end;
但是编译不过去，提示“[错误]Biz:\GLLCGL\GLLCGL_\YWGN1.FUNC.DIR\MainForm.Form.pas(26,

40): Undeclared identifier "TRTLConsts"
”，你们让引用“业务模型\协同系统\公共资源\协同常量库”这个，我在 项目管理\配置项熟悉\引

用 中添加了，还是不行，还是提示上面错误，
请问是怎么回事。

atiger

在use中加上 RTLConsts

lhb963

写成这样还是有出错
unit MainForm;

interface

uses
  Business.System, Business.Forms, RTLConsts;

type
  TMainForm = class(TForm)
    Panel1: TPanel;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    {private declarations}
  public
    {public declarations}
  end;

implementation


procedure TMainForm.Button1Click(Sender: TObject);
const
  cGUID = '4B666B997C49446688B339B6D944AA5B';
begin
  if not FileSys.FileSystem.FileExists(TRTLConsts.DocRoot) then  //TRTLConsts在协同常量库
  try
    FileSys.FileSystem.CreateFile(TRTLConsts.DocRoot, cGUID, [], TFileKind.fkSpace, TRTLConsts.DocDisplayName);
  except
    on E: TObject do
      raise Exception.CreateFmt('知识中心基础数据错误，初始化失败。'#13#10 + '错误原因：%s', [jsCommon.ExceptText(E)]);
    else
      raise;
  end;

end;

end.

错误为：“[错误]Biz:GLLCGLGLLCGL_YWGN1.FUNC.DIRMainForm.Form.pas(6, 36): 找不到命名空间“RTLConsts”（是否缺少 程序集引用？）”

atiger

抱歉，错了，是 COLLABORATIONCONSTS

lhb963

已经编译过去了。
发现一个新问题，如：有一个添加功能，和一个添加信息，信息中包括数据集一，我在数据集一中设置了一个过滤条件“1<>1”并且使用该条件，签入刷新后，点击添加功能右侧的“文档关联”里面的“文档、指标等”不能用，要是把过滤条件取消掉，则可以用，请问怎么处理这个问题。
我需要在添加能是显示的添加项是空的，怎么才能和这个文档不冲突。

lhb963

自己顶下

atiger

我们是根据业务数据来的，如果1<>1业务数据都没有了，那肯定就没有意义了

lhb963

假如过滤不设置 1<>1 ，那请问，有什么办法在点击添加功能时“文档关联”可用，并且在添加功能的页面上需要填写的内容为空（就是默认新增一条记录）呢？

jiahaiminghr

楼主为什么要在业务数据集为空时添加附件？

能把在业务上的需求描述一下吗？

lhb963

不是数据集为空时添加附件。举个例：我做了增加人员信息功能，现在点击人员信息添加功能系统默认为添加新记录（也就是说人员的属性，姓名、性别等要添加的项都是空的），而我在过滤中设置1<>1就是为了达到在添加的时候可以直接填写信息，不用在点击插入了，并且在添加人员信息时也可以添加附件。就是这个意思。