1

在 cProjects 中创建项目时,我使用BADI BADI DPR_FIN_GECCO_ATTR它来操作在 SAP PS 中创建的外部 WBS ID。

SAP 接受我为阶段级别传递的 ID,但对于任务级别,SAP 将字符串“/TTO”附加到我的 WBS ID 的末尾。知道为什么会发生这种情况以及如何摆脱它。“/TTO”违反或屏蔽PS中的结构?

constants: lc_phase_id_ps type char30 value 'DPR_TV_PROJECT_ELEMENT_ID_PS',
           lc_task_id_co  type char30 value 'DPR_TV_PROJECT_ELEMENT_ID_CO'.

field-symbols: <project_ext> type dpr_ts_project_ext,
               <project_int> type dpr_ts_project_int,
               <phase_ext>   type dpr_ts_phase_ext,
               <phase_int>   type dpr_ts_phase_int,
               <task_ext>    type dpr_ts_task_ext,
               <task_int>    type dpr_ts_task_int,
               <attributes>  type dpr_ts_iaom_object_attribute.

case ir_common->get_object_type( ).
  when cl_dpr_co=>sc_ot_project.
    "not doing anything with this data yet
    assign ir_project_ext->* to <project_ext>.
    assign ir_project_int->* to <project_int>.  

  when cl_dpr_co=>sc_ot_phase.
    assign ir_attributes_ext->* to <phase_ext>.
    assign ir_attributes_int->* to <phase_int>.
    read table ct_attributes assigning <attributes>
      with key data_element = lc_phase_id_ps.
    if sy-subrc = 0.
      <attributes>-value = <phase_ext>-phase_id.  "something like Z/001-001
    endif.

  when cl_dpr_co=>sc_ot_task.
    assign ir_attributes_ext->* to <task_ext>.
    assign ir_attributes_int->* to <task_int>.
    read table ct_attributes assigning <attributes>
      with key data_element = lc_task_id_co.
    if sy-subrc = 0.
      <attributes>-value = <task_ext>-search_field.  "something like Z/001-001-001
      "sometime after this badi call it is changed to Z/001-001-001/TTO
    endif.
endcase.
4

1 回答 1

2

我找到了 SAP 更改 WBS 的地方:

在 ClassCL_IM_CPRO_PROJECT_LABEL方法IF_EX_GCC_PS_PROJECT_LABEL~GET_WBS_ELEMENT中有以下逻辑:

if lv_object_type_co ne 'DPO'.
  read table attributes_of_ext_obj
       into ls_attribute
       with key data_element = 'DPR_TV_PROJECT_ELEMENT_ID_CO'.
  if sy-subrc = 0.
    if lv_object_type_co eq 'TTO' or     "Aufgabe            "H860739
       lv_object_type_co eq 'ITO'.       "Checklistenpunkt   "H860739
      concatenate ls_attribute-value                         "H860739 
                  lv_object_type_co                          "H860739
                  into ls_value.         "<<==Here it is     "H860739
      wbs_element = ls_value.                                "H860739
    else.                                                    "H860739
      wbs_element = ls_attribute-value.
    endif.                                                   "H860739
  else.
    message e013(iaom_cprojects)
      with 'DPR_TV_PROJECT_ELEMENT_ID_CO'
      raising error_occurred.
  endif.
  "...
  "... Code removed
endif.

这是 GCC_PS_PROJECT_LABEL 的标准 BAdI 实现的一部分。

我通过使用方法末尾的隐式增强点来增强方法并在那里重置 WBS 元素,解决了这个问题。

于 2011-09-23T04:25:10.777 回答