[搞定]X3上取当前登陆者的机构ID出错!!**

浩繁

如下图,我想获取当前登陆者的机构ID, 当执行到下图所示的位置上就弹出错误信息!!!  从变量跟踪可知:登陆者ID已经取到了。就是取机构ID时出错。
但在老平台上没有一点问题的!!

另外我也试过通过组织机构表达式来获取当前登陆者的机构ID,但得到的是 Orgerson 本来应该得到 Org:ROOTQCDLKJYXGS.ogn
组织机构表达式获取代码如下:

procedure TYSTZ.FormDocCreate(Sender: TObject);
var
  lContextCurrent: TContextCurrent;
  XMID: string; //登陆者ID
  Tmp : string;
  URLs: TStringList;
  I   : Integer;
begin
  lContextCurrent := TContextCurrent.Create(Self.Context);
  try
    XMID := lContextCurrent.Operator.ID;
  finally
    lContextCurrent.Free;
  end;
  URLs := TStringList.Create;
  try
    Tmp := Org.OrgExpr.OrgParent(Org.OrgExpr.OrgKey('','',XMID),
                                 Org.OrgExpr.OrgCondition('*.OGN;*.DPT','',''),
                                 True,False);
    Org.OrgSys.OrgSystem.GetBizURLsByOrgExpr(Tmp,URLs);
    Tmp := '';
    for I := 0 to URLs.Count - 1 do
        Tmp := Tmp +URLs[I];
  finally
    URLs.Free;
  end;
end;

浩繁

怎么没有反映啊

jiahaiminghr

请参考http://bbs.justep.com/forum.php?mod=viewthread&tid=9474

浩繁

一样出错!!

浩繁

出错信息和上面相同

jiahaiminghr

你这个窗体所在功能的隔离级设置成了全局吗？或者这个窗体是自定义界面方案的主窗体？

你试试用在“ 业务模型\系统空间\系统运行库\系统核心库”中
   TSystemCore.Operator
看看

浩繁

已经设为全局隔离级别,仍然不行.
TSystemCore.Operator得不到到当前人员的部门,机构信息.

你们那里行通过上面代码能不能取到机构ID,,如果取到的话,就是我们这边的问题,因为我们这里的两个服务器我都试了,都取不到机构ID,都报同一错误信息.

jiahaiminghr

TYSTZ是不是主界面窗体？
在主界面中以及隔离级设置成全局的功能中，要获取当前操作员信息必须使用以下方法：
  TSystemCore.Operator.Positions[0].PersonMember.ID  //当前操作者ID
    TSystemCore.Operator.Positions[0].PositionMember.ID  //当前操作者岗位ID
    TSystemCore.Operator.Positions[0].PositionMember.Parent.ID  //当前操作者部门ID
  TSystemCore.Operator.Positions[0].PositionMember.Parent.Parent.ID //当前操作者机构ID

浩繁

[错误]Biz:\COLLABORATION\TZ\TZXX.INFO.DIR\YSTZ.FormDoc.pas(48, 45): Undeclared identifier "ositions"

根本就没有 Positions 这个属性

浩繁

不要回答了,我自己查表.