Create Material Master Record with Text

Question

Hi, I am looking to create material Master Data via ABAP.  I currently have some code that creates the Master Data Characteristic value I want, but I need the text as well.  Can someone tell me what I need to do to add the text for the Master Data Characteristic value?
Here's what I have using CL_RSDMD_UPDATE_MASTER_DATA=>UPDATE_ATTRIBUTES_STATIC
TYPE-POOLS: RS, RSSM.
  DATA: T_ZFREETEXT   LIKE STANDARD TABLE OF ZFREETEXT.
  DATA: T_INFO        TYPE RSSM_S_MINFO.
  DATA: RETURN_STATUS TYPE RSARR_T_IDOCSTATE.
  DATA: RETURN_SUBRC  LIKE SY-SUBRC.
  DATA: MSG TYPE RS_T_MSG.
  DATA: L_R_ACTIVATE_MASTER_DATA TYPE REF TO CL_RSDMD_ACTIVATE_MASTER_DATA.
  INSERT ZFREETEXT INTO TABLE T_ZFREETEXT.
  CALL METHOD CL_RSDMD_UPDATE_MASTER_DATA=>UPDATE_ATTRIBUTES_STATIC
    EXPORTING
      I_IOBJNM        = '0MATERIAL'     " Technical name of InfoObject
      I_CHAVL_ENQUEUE = RS_C_FALSE
      I_T_DATA        = T_ZFREETEXT
      I_S_MINFO       = T_INFO
      I_MONITORING    = RS_C_FALSE
    CHANGING
      C_T_IDOCSTATE   = RETURN_STATUS.
  IF SY-SUBRC <> 0.
    RETURN_SUBRC = 'Error happened'.
  ELSE.
    RETURN_MSG = 'Process Completed Successfully'.
    CREATE OBJECT L_R_ACTIVATE_MASTER_DATA
      EXPORTING
        I_IOBJNM            = '0MATERIAL'
        I_P_Q_HAVE_TO_EXIST = RS_C_FALSE.
    IF SY-SUBRC = 0.
      L_R_ACTIVATE_MASTER_DATA->ACTIVATE(
      IMPORTING
      E_SUBRC = RETURN_SUBRC
      CHANGING
      C_T_MSG = MSG ).
    ENDIF.
  ENDIF.

Answer 1

Dear Kenneth,
do you need to add master data during load of transaction data in planning scenario? If yes, you can do this with a planning function of type exit in the INIT function module.
I think you've to use the table ETO_CHAS (table for char. combinations) and all kind of char. combinations has to be transfered.
data:
l_s_chas type /1SEM/_YS_CHAS_"YOURCLIENT"YOURPLANNINGAREA",
l_r_co_area type range of /bi0/oico_area,
l_s_costcenter type /bi0/pcostcenter.
field-symbols:
<f_coar> type /bi0/oico_area,
<f_cctr> type /bi0/oicostcenter.
select * from /bi0/pcostcenter into l_s_costcenter
             where co_area IN l_r_co_area
             and objvers = 'A'.
<f_coar> = l_s_costcenter-co_area.
<f_cctr> = l_s_costcenter-costcenter.
INSERT l_s_chas INTO TABLE eto_chas.
endselect.
Regards, Clemens