如何代码创建岗位

john

可以通过CreatePosition(Parent: TBizURL; AID: string; ADisplayName: string)创建岗位。

函数声明：function CreatePosition (Parent: TBizURL; AID: string; ADisplayName: string): TPosition;
命名空间：Org.OrgSys
所属对象（类）：OrgSystem
函数作用：创建组织机构的岗位
参数说明：
返回值：所创建的岗位对象；
Parent：岗位所在的BizURL，创建岗位默认路径为“Org:\POSITION”；
AID：部门的ID；
ADisplayName：部门的显示名称。

例如，创建一个显示名称为“测试员”，ID为“CSY”的岗位：

procedure TMainForm.btnCreatePositionClick(Sender: TObject);
var
  lBizURL: TBizURL;
begin
  lBizURL := TBizURL.Create;
  try
    lBizURL.URL := 'Org:\POSITION';
    OrgSystem.CreatePosition(lBizURL, 'CSY', '测试员');
    ShowTreeNode('CSY');
  finally
    lBizURL.Free;
     end;
end;