起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 143|回复: 1

隔离级的问题**

[复制链接]
发表于 2009-4-18 10:32:32 | 显示全部楼层 |阅读模式
我这样取操作人员所在的部门编号时,如果操作人员在登陆时未选择岗位信息就会出现隔离级不存在的提示,这个如何解决呀
function TSJWG1.getoperatorDep():string;
var
   lParam: TBizParam;
   lBizURL: TBizURL;
   intZ,intx:integer;
   // context:TContextCurrent;
begin
//  context:=TContextCurrent.Create(self.Context);
//  result:=context.Dept.ID;

   lBizURL := TBizURL.Create;
  try
    lBizURL.URL := 'Biz:\SYSTEM\ORGPARAMS.PARAMGROUP';
    lParam := SystemUtils.TContextUtils.GetParam(Context, lBizURL, 'DeptID');
    Result :=Variants.VarToStr(lParam.Value);
  finally
    lBizURL.Free;
  end;
  //result:=SystemCore.TSystemCore. .Operator. .Operator.ID;
end;
回复

使用道具 举报

发表于 2009-4-18 10:38:51 | 显示全部楼层
http://bbs.justep.com/forum.php?mod=viewthread&tid=9474
1楼中,TSystemCore.Operator.Positions[0]取的是当前人员所有身份中的第一个
用这个。
回复 支持 反对

使用道具 举报

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

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-22 10:50 , Processed in 0.038004 second(s), 16 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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