Map My Update Rule from a Master Data Attribute

Question

Hello experts,
I haven't tried this scenario yet, hope you can help me, the Issue is this
I have 2 InfoObjects ZPSCHRCHY and 0PROFIT_CTR from InfoCube WBS cost and allocations I want both the InfoObjects to be mapped to 0PROFIT_CTR attribute of 0WBS_ELEMT master data object, I have tried the Master Data Attribute but only 0PROFIT_CTR is an attribute of the Master Data.how can I mapped ZPSCHRCHY and 0PROFIT_CTR to 0PROFIT_CTR?, Is creating a start routine for it must be used? Thank you very much
Regards and Thanks
Chris

Answer 1

PROGRAM UPDATE_ROUTINE.
$$ begin of global - insert your declaration only below this line  -
TYPES:
BEGIN OF r_MD_WBS_ELEMENT,
   WBS_ELEMT  like /BI0/PWBS_ELEMT-WBS_ELEMT,
   OBJVERS    like /BI0/PWBS_ELEMT-OBJVERS,
   PROFIT_CTR like /BI0/PWBS_ELEMT-PROFIT_CTR,
END of r_MD_WBS_ELEMENT.
DATA: t_MD_WBS_ELEMENT  TYPE STANDARD TABLE OF r_MD_WBS_ELEMENT,
       wa_MD_WBS_ELEMENT TYPE r_MD_WBS_ELEMENT.
$$ end of global - insert your declaration only before this line   -
The follow definition is new in the BW3.x
TYPES:
  BEGIN OF DATA_PACKAGE_STRUCTURE.
     INCLUDE STRUCTURE /BIC/CS8ZPSG030.
TYPES:
     RECNO   LIKE sy-tabix,
  END OF DATA_PACKAGE_STRUCTURE.
DATA:
  DATA_PACKAGE TYPE STANDARD TABLE OF DATA_PACKAGE_STRUCTURE
       WITH HEADER LINE
       WITH NON-UNIQUE DEFAULT KEY INITIAL SIZE 0.
FORM startup
  TABLES   MONITOR STRUCTURE RSMONITOR "user defined monitoring
           MONITOR_RECNO STRUCTURE RSMONITORS " monitoring with record n
           DATA_PACKAGE STRUCTURE DATA_PACKAGE
  USING    RECORD_ALL LIKE SY-TABIX
           SOURCE_SYSTEM LIKE RSUPDSIMULH-LOGSYS
  CHANGING ABORT LIKE SY-SUBRC. "set ABORT <> 0 to cancel update
$$ begin of routine - insert your code only below this line        -
fill the internal tables "MONITOR" and/or "MONITOR_RECNO",
to make monitor entries
  REFRESH: t_MD_WBS_ELEMENT.
      SELECT WBS_ELEMT
             OBJVERS
             PROFIT_CTR
      INTO TABLE t_MD_WBS_ELEMENT
      FROM /BI0/PWBS_ELEMT
   FOR ALL ENTRIES IN DATA_PACKAGE
     WHERE WBS_ELEMT   = DATA_PACKAGE-WBS_ELEMT.
    IF sy-subrc EQ 0.
    Do nothing
    ENDIF.
if abort is not equal zero, the update process will be canceled
  ABORT = 0.
$$ end of routine - insert your code only before this line         -
ENDFORM.