起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 439|回复: 3

组织机构

[复制链接]
发表于 2010-10-20 16:57:02 | 显示全部楼层 |阅读模式
需求:完整组织机构是:
亚洲/中国/哈尔滨/动力区/人员,现在我想取出“哈尔滨/动力区”,人员在这四级中都可以定义分配
回复

使用道具 举报

发表于 2010-10-20 17:23:42 | 显示全部楼层
想取出“哈尔滨/动力区”是什么意思?人员在这四级中都可以定义分配是什么意思?
看不懂楼主的需求
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-10-21 08:51:48 | 显示全部楼层
已知一个人员BIZURL,如何得到该人员BIZURL部分显示名称就像:某某机构\某某部门\某某部门1\某某人,要取到“某某部门\某某部门1”的中文名称
回复 支持 反对

使用道具 举报

发表于 2010-10-21 09:31:11 | 显示全部楼层
不能取到部分,可以取到全部的显示名称,如果只需要部分,需要楼主自己写函数去实现。

取显示路径名称的参考代码
procedure TMAINFORM.Button5Click(Sender: TObject);
var
lContextCurrent: Business.Model.TContextCurrent;
cPersonID,cGW,cDeptID : String;
lOrgUnit : TOrgUnit;
lObjectInfo: IObjectInfo;
begin
  lContextCurrent := Business.Model.TContextCurrent.Create(Self.Context);
  cPersonID := lContextCurrent.Operator.ID;           //当前操作者ID
  cGW       := lContextCurrent.PositionMember.ID;  //当前操作者岗位ID
  cDeptID   := lContextCurrent.Dept.ID;               //当前操作者部门ID

  lOrgUnit := OrgSys.OrgSystem.FindUnit(cDeptID,cGW,cPersonID);

  lObjectInfo := Bizsys.ObjectInfo(lOrgUnit.BizURL) as IObjectInfo;
  dialogs.ShowMessage(lObjectInfo.DisplayNamePath+lObjectInfo.DisplayName);
end;
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-6 09:33 , Processed in 0.037852 second(s), 16 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表