获得某个organization unit下面的所有sales org id list

84 阅读1分钟

Created by Jerry Wang, last modified on May 15, 2015

执行report,输入sales org id:

输出:

为什么50000738也包含在result list里?

因为它也属于CCNEXT - 50000732

2359也同理:

 

source code:

 

 

*&---------------------------------------------------------------------*

 

*& Report  ZTEST_CALL_BADI

 

*&

 

*&---------------------------------------------------------------------*

 

*&

 

*&

 

*&---------------------------------------------------------------------*

 

 

REPORT ZORDER_GET_SALES_ORG_LIST.

 

 

PARAMETERS: org TYPE string OBLIGATORY DEFAULT 'O 50000732'.

 

 

DATA: lt_search TYPE HRTB_ATTVALUE,

 

      ls_search LIKE LINE OF lt_search,

 

      lt_result TYPE HRTB_OBJKEY.

 

 

ls_search-attrib = 'DIVISION'.

 

ls_search-value = '02'.

 

APPEND ls_search TO lt_search.

 

 

ls_search-attrib = 'D_CHANNEL'.

 

ls_search-value = '01'.

 

APPEND ls_search TO lt_search.

 

 

ls_search-attrib = 'SA_ORG'.

 

ls_search-value = org.

 

APPEND ls_search TO lt_search.

 

 

 

CALL FUNCTION 'HR_GENAT_FIND_ATTRIBUTES'

 

  EXPORTING

 

    scenario                = 'SALE'

 

    search_attr             = lt_search

 

 IMPORTING

 

   RESULT                  = lt_result

 

 EXCEPTIONS

 

   NOTHING_FOUND           = 1

 

   INVALID_SCENARIO        = 2

 

   INVALID_ATTRIBUTE       = 3

 

   INTERNAL_ERROR          = 4

 

   OTHERS                  = 5

 

          .

 

IF sy-subrc <> 0.

 

 WRITE: / 'attribute search failed: ' , sy-subrc.

 

 RETURN.

 

ENDIF.

 

 

LOOP AT lt_result ASSIGNING FIELD-SYMBOL(<result>).

 

   WRITE: / <result>-objid, ' type: ' , <result>-otype.

 

ENDLOOP.

\

要获取更多Jerry的原创文章,请关注公众号"汪子熙":