【结贴】怎样获得业务操作列表**

lxs202 · 发表于 2008-11-19 10:27:47

我想统计那些人员成员分配了那此业务操作，包括继承的。

因为太多业务操作，分到现在我不都不知道分给了那此人。

lxs202 · 发表于 2008-11-19 11:11:40

急呀

lxs202 · 发表于 2008-11-19 11:53:02

shangxy · 发表于 2008-11-19 12:36:25

NameSpace: Business.Model.Org ClassDelcare: Business.Model.Org.TOrgModule
--------------------------------------------------------------------------------
procedure GetOperationPolicy(APolicies: Business.System.TList);

使用这个方法获取组织单元的操作策略

lxs202 · 发表于 2008-11-20 10:06:11

可以详细点吗？

lixy · 发表于 2008-11-20 10:20:01

http://bbs.justep.com/forum.php?mod=viewthread&tid=25782
5楼有例子。可以看我们组织机构设计器的代码。

zfang · 发表于 2008-11-20 10:20:41

楼主，平台中的【业务模型\系统空间\系统功能\组织机构\组织机构资源库】中就有相关的方法来获取，ORGLIB.TCommonFunc.GetOperaters(Context,OperationBroker1,AList);
说明：
Context--当前的环境
OperationBroker1--业务操作代理，你可以把所有涉及到的业务操作给他的Operations
AList--TStrings类型，返回的是当前环境中的操作者与OperationBroker1中的业务操作相匹配的业务操作列表
具体你看看相关代码。

lxs202 · 发表于 2008-11-20 13:14:14

这样写错在那里？

var
lOrgUnit: TOrgUnit;
op:TOrgModule;
lBizURL: TBizURL;
lst:Tlist;
begin
lBizURL:=TBizURL.Create;
lBizURL.URL:=SysUtils.UpperCase(OrgTreeView1.SelectedNode.BizURL.URL);

  lOrgUnit :=org.OrgSys.OrgSystem.GetUnit(lBizURL);
Dialogs.ShowMessage(lOrgUnit.ID);

  op:=Business.Model.Org.TOrgModule.Create(lOrgUnit);
  op.GetOperationPolicy(lst);

// dialogs.ShowMessage(lst.ToString);

返回的LST为空值.

lixy · 发表于 2008-11-20 13:26:55

lOrgUnit.Module.GetOperationPolicy(lList);替换 op:=Business.Model.Org.TOrgModule.Create(lOrgUnit);
呢

lxs202 · 发表于 2008-11-20 13:31:06

按9楼的方替换后不行。
运行时这句
lOrgUnit.Module.GetOperationPolicy(lList);
会报错

		自动登录	找回密码
密码			立即注册