在组织机构上设置的数据语义策略，工作台中如何起作用？**

alang

要代码在岗位环境上创建这个信息，直接设置隔离级不可以

dragonsoft

天，这么麻烦，我还是找其它办法好了。

不过，有点狠不理解：
工作台也是业务功能
我自己建的也是业务功能
这2个有不同的吗？
为什么自己的功能可以应用到组织机构策略，而工作台功能就不行呢？

alang

当然不同，区别就在于环境了

alang

其实不复杂，只要
TYWXX1.Create(Operator.....Context)
通过Operator找到执行所需要的岗位环境就可以了

dragonsoft

最初由 alang 发布
[B]其实不复杂，只要
TYWXX1.Create(Operator.....Context)
通过Operator找到执行所需要的岗位环境就可以了 [/B]

能否说得具体些？


比如，已经建好了 [业务信息1]，业务信息1下有[文档1]，而[文档1]用到业务信息1的数据集。
系统默认的[我的工作台]，要在工作台中用到[文档1]

我要怎么写代码才能使 [工作台]引用的业务信息会有策略应用到呢？

alang

在功能窗体上设置 InforBroker的自动代理属性为FAlse
然后在代码中创建这个信息，对InforBroker赋值
procedure TMainForm.BizFormCreate(Sender: TObject);
var
  lPosition: TOperatorPosition;
  lInfoURL: String;
begin

  lPosition := SystemCore.TSystemCore.Operator.DefaultPosition;
  if not Assigned(lPosition) then
  lPosition := SystemCore.TSystemCore.Operator.Positions[0];
  InfoBrokerDMCJXX.Info := TInfo(lPosition.Context.GetBizObject(InfoBrokerDMCJXX.BizClassRef));
  InfoBrokerDMCJXX.Info.DataSets[0].Open;
end;

alang

或者用
  InfoBrokerDMCJXX.Info := DMCJXX.TDMCJXX.Create(lPosition.Context);
代替上面的
  InfoBrokerDMCJXX.Info := TInfo(lPosition.Context.GetBizObject(InfoBrokerDMCJXX.BizClassRef));
也是一样的

alang

这里就是用用户登陆时选择的岗位，如果没有选择岗位（选择了自动岗位的话），用第一个岗位

dragonsoft

非常感谢，可以实现过滤了

lPosition := SystemCore.TSystemCore.Operator.DefaultPosition;
不过这句编译不通过，我的版本是 3.0.6
有没其它替代的方法？

jiahaiminghr

小版本号是多少。