【搞定】如何取得某个岗位下的所有人员列表？**

mouse_vip

是岗位.不是岗位成员哦.

atiger

岗位下没有人员，也没有人员成员，
岗位成员下，也没有人员，只有人员成员，

不知道楼主具体指啥

lixy

OrgChildren(OrgSelect(orgcondition('zjl.ptm', '', '')), '', False, False)

jiahaiminghr

图

lixy

楼主要的是这种效果吧！

mouse_vip

是这样，我想得某一个功能分配给了哪些人.
我现在左边有一个功能树，右边一个OrgListView负责显示具有这个功能的人员列表.
因为我把功能都是直接分配给岗位的，而不是岗位成员，
所以我用OrgSys.OrgSystem.GetFuncOwners这个方法得到的是一个岗位的列表.
我怎么再使用岗位的地址能够得到分配了这个岗位的人员列表呢？

Org:\POSITION\CWBFZJ.ptn
我得到的地址是这种类型的.是岗位.

lixy

OrgChildren(orgcondition('CGY.*','',''), '', False, False)   直接把扩展名改成【*】就行了

mouse_vip

在代码里面怎么写啊？

lixy

procedure TMainForm.Button1Click(Sender: TObject);
var
   Os:Business.Model.Org.TOrgSystem;
   olist:Business.Model.Org.TOrgURLs;
   i:integer;
begin
     olist:= Business.Model.Org.TOrgURLs.Create;
     os:=   Business.Model.Org.TOrgSystem.Create;
     os.GetOrgURLsByOrgExpr('OrgChildren(OrgSelect(orgcondition(''zjl.ptm'', '''', '''')), '''', False, False)',olist);
     for i:=0 to olist.Count-1 do
     begin
          memo1.Lines.add(olist.BizURL.URL);
     end;
     os.free;
     olist.free;
end;

end.

jiahaiminghr

可以不用创建OS，直接执行下句：
Business.Model.Org.OrgSys.OrgSystem.GetOrgURLsByOrgExpr('OrgChildren(OrgSelect(orgcondition(''zjl.ptm'', '''', '''')), '''', False, False)',olist);