계층구조로 달려있는 요소들을 찾아주는 함수

[쥔장]

CO에는 여러가지 그룹핑이 많습니다.
코스트센터그룹, 손익센터그룹, 원가요소그룹 등등..

각 그룹 밑에 계층구조로 달려있는 요소들을 찾아주는 예쁜
함수가 바로 이 함수입니다.

1. 코스트센터 가져오기

  vl_e_setid = '0101XXXXA000'.
  

  CALL FUNCTION 'K_HIERARCHY_TABLES_READ'
       EXPORTING
            e_class     = '0106'
            e_setid     = vl_e_setid   "클래스+관리회계영역+그룹명
            e_kokrs     = 'XXXX'       "관리회계영역
            e_mandt     = sy-mandt
       TABLES
            t_nodes     = vlit_t_nodes
            t_values    = vlit_t_values
       CHANGING
            c_info      = vl_c_info
            c_overwrite = vl_c_overwrite.



2. 손익센터 가져오기

  vl_e_setid = '0106XXXXA1000'.
  

  CALL FUNCTION 'K_HIERARCHY_TABLES_READ'
       EXPORTING
            e_class     = '0106'
            e_setid     = vl_e_setid   "클래스+관리회계영역+그룹명
            e_kokrs     = 'XXXX'       "관리회계영역
            e_mandt     = sy-mandt
       TABLES
            t_nodes     = vlit_t_nodes
            t_values    = vlit_t_values
       CHANGING
            c_info      = vl_c_info
            c_overwrite = vl_c_overwrite.


3. 원가요소 가져오기

  vl_e_setid = '0102XXXXR-SGA-FUNC'.
  

  CALL FUNCTION 'K_HIERARCHY_TABLES_READ'
       EXPORTING
            e_class     = '0102'
            e_setid     = vl_e_setid   "클래스+관리회계영역+그룹명
            e_kokrs     = 'XXXX'       "관리회계영역
            e_mandt     = sy-mandt
       TABLES
            t_nodes     = vlit_t_nodes
            t_values    = vlit_t_values
       CHANGING
            c_info      = vl_c_info
            c_overwrite = vl_c_overwrite.


아마도 여기저기서 많이 쓰일 수 있는 함수 같은데, 여기까지만
알고 있습니다. 다른 테스트도 해보시길...