1. 程式人生 > >C4C和CRM裏獲取當前登錄用戶分配的Organization Unit信息

C4C和CRM裏獲取當前登錄用戶分配的Organization Unit信息

res 關註 logs col asc tab sse port obj

C4C

如何查看某個用戶分配的組織單元ID:

技術分享圖片

在Employee的Organization Data區域內看到分配的組織名稱,如下圖紅色下劃線所示:

技術分享圖片

現在的需求就是使用ABSL獲取當前登錄用戶分配的Organization Unit信息,例如用WANGJERRY37登錄,則取出下圖顯示的Department name PMLS:

技術分享圖片

技術分享圖片

具體實現:新建一個custom BO,使用字段DepartmentName存儲這個待取的值:

技術分享圖片

然後創建AfterLoading script file,使用如下代碼:


import ABSL;
import AP.PC.IdentityManagement
.Global; import AP.FO.BusinessPartner.Global; var queryByIdentityUUID = Identity.QueryByElements; var queryByIdentityUUIDParameter = queryByIdentityUUID.CreateSelectionParams(); var queryByEmployeeBPUUID = Employee.QueryByIdentification; var queryByEmployeeBPUUIDParameter = queryByEmployeeBPUUID.CreateSelectionParams
(); if ( this.DepartmentName.IsInitial()){ var id = Context.GetCurrentIdentityUUID().content; queryByIdentityUUIDParameter.Add( queryByIdentityUUID.UUID.content, "I", "EQ", id.ToString() ); var result = queryByIdentityUUID.Execute(queryByIdentityUUIDParameter); var first = result.GetFirst
(); // points to identity instance var person = first.Person; var bpUUId = person.UUID.content; queryByEmployeeBPUUIDParameter.Add( queryByEmployeeBPUUID.UUID.content, "I", "EQ", bpUUId.ToString()); var employeeQueryResult = queryByEmployeeBPUUID.Execute(queryByEmployeeBPUUIDParameter); var EmployeeQueryResultCurrent = employeeQueryResult.GetFirst(); var assignedOrg = EmployeeQueryResultCurrent.OrganisationalUnitAssignment.GetFirst(); var org = assignedOrg.ToRoot; // readOnly in AfterLoading event this.DepartmentName = org.NameAndAddress.AddressSnapshot.NameSuitableForLogonLanguage.GetFirst().Name.SecondLineName; }

CRM

假設Jerry Wang分配的Organization Unit ID為50000732,使用下列report打印出這個ID:

技術分享圖片


PARAMETERS: id TYPE but000-partner OBLIGATORY DEFAULT ‘4031140‘.
DATA: lo_core                TYPE REF TO cl_crm_bol_core,
      lo_collection          TYPE REF TO if_bol_entity_col,
      lo_root_entity         TYPE REF TO cl_crm_bol_entity,
      lv_query_name          TYPE crmt_ext_obj_name,
      lt_selection_parameter TYPE genilt_selection_parameter_tab,
      ls_selection_parameter TYPE genilt_selection_parameter,
      ls_query_parameters    TYPE genilt_query_parameters,
      lv_size                TYPE i.
START-OF-SELECTION.
  ls_selection_parameter-attr_name = ‘PARTNER‘.
  ls_selection_parameter-option =  ‘EQ‘.
  ls_selection_parameter-sign = ‘I‘.
  ls_selection_parameter-low =  id.
  APPEND ls_selection_parameter TO lt_selection_parameter.
  ls_query_parameters-max_hits = 1.
  lo_core = cl_crm_bol_core=>get_instance( ).
  lo_core->load_component_set( ‘PROD_ALL‘ ).
  lv_query_name = ‘BuilEmpAdvancedSearch‘.
  lo_collection = lo_core->dquery(
      iv_query_name               = lv_query_name
      it_selection_parameters            = lt_selection_parameter
      is_query_parameters                = ls_query_parameters ).
  DATA(lo_result) = lo_collection->get_first( ).
  ASSERT lo_result IS NOT INITIAL.
  WRITE: / ‘Org unit id: ‘, lo_result->get_property_as_string( ‘ORGEH‘ ) COLOR COL_NEGATIVE.

技術分享圖片

最終調用的是這個function module:

技術分享圖片
要獲取更多Jerry的原創技術文章,請關註公眾號"汪子熙"或者掃描下面二維碼:

技術分享圖片

技術分享圖片

C4C和CRM裏獲取當前登錄用戶分配的Organization Unit信息