【结贴】登陆的时候选择自动登陆的怎么才能取岗位和部门?

bsit

登陆的时候选择自动登陆的怎么才能取岗位和部门,一个人可能有多个岗位,而且在可以在不同的部门任职 ,我需要在当用户选择自动登陆的时候在工作台和者标准风格窗体里取当前登陆者部门和岗位??

jiahaiminghr

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

bsit

不行吧  lContextCurrent.Operator.ID ,SystemUtils.TContextUtils.GetDept(FContext).ID这个能在标准风格窗体里调用吗  我调用的时候要出错

bsit

连问题都没看清就在说哦

jiahaiminghr

如何获取当前操作员相关信息

在系统中获取当前操作员信息有两种方式：（第二种方法只适用于X3的版本，COM+不适用）
1、通过当前环境来获取，要求当前环境链中必须要有人员信息
var
lContextCurrent: Business.Model.TContextCurrent;
begin
  lContextCurrent := Business.Model.TContextCurrent.Create(Self.Context);
  try
    cPersonID := lContextCurrent.Operator.ID;           //当前操作者ID
    cGW       := lContextCurrent.PositionMember.ID;  //当前操作者岗位ID
    cDeptID   := lContextCurrent.Dept.ID;               //当前操作者部门ID
  finally
    lContextCurrent.Free;

      以上方法在系统中很多地方都用到，例如：表达式编辑器中用来作表达式参数的组织机构函数等，都是通过环境来取人员相关信息的。

2、使用系统函数
   在“ 业务模型\系统空间\系统运行库\系统核心库”中
   TSystemCore.Operator
      在主界面中需要获取用户信息时，由于还没有环境信息，所以必须使用此种方法。
  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


注：以下的方法已经过时，不能正确执行。
  //业务模型\系统空间\用户界面基础\库\公共组件库
  TCommonComponentLibrary.UserSystem.CurrentUser.ID

bsit

晕死   当没有环境信息的时候只有用第2种方法  要是一个人员有多个岗位第2种方法取到的不一定正确,因为第2种方法取的是列表的第一个岗位,  该怎么办啊  晕了  难道没有解决办法吗

bsit

你的回答没有解决问题啊  你说得没错 但是没解决问题

jiahaiminghr

TOperator.DefaultPosition

lixy

由于长时间没有反馈，先结贴了。

有问题请开新贴。

bsit

结什么结　　没完