我今天面临一个问题:如何使用自定义和非自定义字段更新MARA表?

我找到了一些解决方案，但是我想知道什么是最好的解决方案。

我来自HCM模块。在这个模块上，我们有变更日志。因此，如果可能的话，我想用日志更改来更新MARA表。

背景:

从表中选择一个MARA条目(OK)
编辑字段(OK)
检查每个字段，如果新值已经在可用值上
更新表

逻辑:

DATA:
  lt_mara TYPE TABLE OF mara,
  ls_mara TYPE mara.
lv_matnr = '000000000024856';
* Seelct data
"" matnr from CONVERSION_EXIT_MATN1_INPUT
SELECT SINGLE * INTO ls_mara FROM mara WHERE matnr = lv_matnr.
* Modification
ls_mara-vlumn = '999.9'. 
"ls_mara-z* = '...'.   
* Checks : volumn is numeric, ...
" [...]
* Update
" [...]

我只有关于MARA的信息，没有相关表格的数据。

解决方案1 - `MATERIAL_MAINTAIN_DARK`

使用功能模块MATERIAL_MAINTAIN_DARK

CALL FUNCTION 'MATERIAL_MAINTAIN_DARK'
    EXPORTING
        kz_activ_cad = blank
        flag_muss_pruefen = fest_x
        sperrmodus = fest_e
        max_errors = 0
        p_kz_no_warn = fest_x " 'N' ?
        kz_prf = blank " 's' ?
        kz_verw = fest_x
        kz_aend = fest_x
        kz_dispo = fest_x
        kz_test = blank
        kz_mdip = blank
        kz_mprp = blank
        kz_ale = blank
        kz_actv = blank
    TABLES
        AMARA_UEB = TMARA_UEB
        AMERRDAT = lt_amerrdat
    EXCEPTIONS
        OTHERS = 7.
" Loop lt_amerrdat.
"   CALL FUNCTION 'RPY_MESSAGE_COMPOSE' [...]
"     WRITE:/ lv_errmsg.
" ROLLBACK WORK.
" or
" CALL FUNCTION 'DB_COMMIT'.

(我使用了这个代码逻辑https://archive.sap.com/discussions/thread/169786)

问题:我成功地执行了代码，但是现在我发现了一些函数错误。如果我正确理解了这个FM的功能，修改将通过tcode(即:MM01/02/03)执行。但是，我不知道每行的初始tcode是什么，我有功能问题(即:文章类别不正确，…)，这取决于所使用的tcode。

你知道我怎样才能跳过这些检查吗?或者知道初始代码?

溶液2 - `BAPI_MATERIAL_SAVEDATA`

使用BAPI_MATERIAL_SAVEDATA功能模块。这个FM允许使用标准字段+自定义(通过EXTENSION(X))更新MARA表

关于信息，我的BAPI_TE_MARA &BAPI_TE_MARAX看起来像:

MATERIAL (MATNR, char, 18)
。追加(ZBAPI_TE_MARAX)
NOCHANGE (BAPIUPDATE, char, 1)

我想我必须在它上面添加每个Z*字段，在使用这个FM之前?此外，我没有找到一个解决方案来更新表的字段。如果我正在检查FM，我有一些对象，但列名不相同。如何找到这个FM上的字段与MARA表上的字段之间的映射?

<标题> 3 解决方案

我是否对代码的完整性进行了检查，我想我可以使用简单的INSERT/UPDATE (MODIFY) ?这应该是最简单的解决方案。

CONCATENATE sy-mandt lv_matnr INTO lv_mara_key.
" Lock object
CALL FUNCTION 'ENQUEUE_E_TABLE'
    EXPORTING
        MODE_RSTABLE   = 'E'
        tabname        = 'MARA'
        varkey         = lv_mara_key
    EXCEPTIONS
        foreign_lock   = 1      system_failure = 2      OTHERS = 3.
ls_mara-ernam = sy-uname.
" ...
" std & custo
MODIFY mara FROM ls_mara.
" Unlock object
CALL FUNCTION 'DEQUEUE_E_TABLE'
    EXPORTING
        MODE_RSTABLE   = 'E'
        tabname        = 'MARA'
        varkey         = lv_mara_key
    EXCEPTIONS
        foreign_lock   = 1      system_failure = 2      OTHERS = 3.

我对所有的推荐、教程或建议都很感兴趣。

方案二。时期。详情请参阅@chrisian和@dirk-trilsbeek的精彩评论。

关于您关于字段映射的后续问题。对于在SAP外部使用BAPI的人来说，更友好的名称是很好的，但它们确实使映射到我们在SAP内部知道的字段变得困难。幸运的是，SAP在这些情况下大多数时候使用相同的数据元素，所以这是一种匹配它们的方法。否则，不同的BAPI通常具有转换功能模块，用于将BAPI字段转换为数据库字段。对于您提到的材料BAPI，您可以检查子例程

_UEBERGEBEN(这转换为

_TRANSFER)，其中

是MARA, MARC等。请注意，例如，MARA_UEBERGEBEN例程调用FM MAP2I_BAPI_MARA_TO_MARA_UEB，并且该FM具有从BAPI结构到MARA的转换，例如，NET_WEIGHT映射到NTGEW。

使用解决方案1，但是这些自定义字段应该事先分配给group !这应该在自定义路径中完成:

物流总指挥->物料主管->外勤选择->分配外勤选择组

如果还没有组，应该创建一个新的组。这个组决定何时启用/禁用/激活/不激活字段等。代码应该像这样:

CALL FUNCTION 'MATERIAL_MAINTAIN_DARK'
 EXPORTING
  sperrmodus = ' '
  kz_prf = 'W'
  max_errors = ' '
  p_kz_no_warn = 'X'
  kz_verw = 'X'
  kz_aend = 'X'
  kz_dispo = 'X'
  kz_test = ' '
  flag_muss_pruefen = ' '
  call_mode = 'ACT'
 IMPORTING
  matnr_last = w_matnr_last
  number_errors_transaction = w_nb_errors
 TABLES
  amara_ueb = t_amara_ueb
  amarm_ueb = t_amarm_ueb
 EXCEPTIONS
  kstatus_empty = 1
  tkstatus_empty = 2
  t130m_error = 3
  internal_error = 4
  too_many_errors = 5
  update_error = 6
 OTHERS = 7.
 IF sy-subrc <> 0.
  MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO.
 ELSE.
  COMMIT WORK.
 ENDIF.

最后这是选择的解决方案。我们使用BAPI_MATERIAL_SAVEDATA扩展。如果你想使用它，我注释了代码来帮助你:)

FORM update_mara
  USING
    us_result TYPE mara. "Input entry of mara with masterdata to update in the system
  DATA :  ls_mara           TYPE bapi_te_mara,
          ls_head           TYPE bapimathead,
          lt_extensionin    TYPE TABLE OF bapiparex,
          ls_extensionin    TYPE bapiparex,
          lt_extensioninx   TYPE TABLE OF bapiparexx,
          ls_extensioninx   TYPE bapiparexx,
          ls_return         TYPE bapiret2,
          lv_x              TYPE char41,
          lv_mara           TYPE string. "Container for all data of ls_mara
  " MASTERDATA PART
  MOVE-CORRESPONDING us_result TO ls_mara.
  ls_mara-material = ls_head-material = us_result-matnr.
  "At least the mendatory key field: 'material'
  " DATA PART
  " Use extension BAPI_TE_MARA
  ls_extensionin-structure = 'BAPI_TE_MARA'.
  lv_mara = ls_mara.
  " Fill data into the extension
  ls_extensionin+30(960) = lv_mara.
  APPEND ls_extensionin TO lt_extensionin.
  " FLAG PART
  CLEAR lv_x.
  DO 41 TIMES. "Don't forget to change 'lv_x TYPE char41' if needed
    CONCATENATE lv_x 'X' INTO lv_x.
    "Add an 'X' where you want to activate the update
    "Here, it's for all fields
  ENDDO. " End of the do loop for all fields of the mara
  " Use extension BAPI_TE_MARAX
  ls_extensioninx-structure  = 'BAPI_TE_MARAX'.
  ls_extensioninx-valuepart1(18)  = us_result-matnr.
  ls_extensioninx-valuepart1+19   = lv_x.
  " The first part (18) of the extensioninx is the matnr and the next ones some 'X' flags to activate the update or not.
  APPEND ls_extensioninx TO lt_extensioninx.
  " PROCESS PART
  CALL FUNCTION 'BAPI_MATERIAL_SAVEDATA'
    EXPORTING
      headdata     = ls_head
    IMPORTING
      return       = ls_return
    TABLES
      extensionin  = lt_extensionin
      extensioninx = lt_extensioninx
  .
  IF ls_return-type = 'E'.
    CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
  ELSE.
    CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
      EXPORTING
        wait = 'X'.
  ENDIF.  " End if of check of BAPI result
ENDFORM.                    " UPDATE_MARA

解决方案#3在SAP系统中只是不是一个有效的选项

解决方案1和2都是好的。您可以直接填充自定义字段，就像您在解决方案3中所做的那样，在使用一个fm更改标准字段之后。

更新MARA表的最佳解决方案是什么?

解决方案1 - `MATERIAL_MAINTAIN_DARK`

溶液2 - `BAPI_MATERIAL_SAVEDATA`

相关内容

最新更新

热门标签：

更新MARA表的最佳解决方案是什么?

解决方案1 - MATERIAL_MAINTAIN_DARK

溶液2 - BAPI_MATERIAL_SAVEDATA

相关内容

最新更新

热门标签：

解决方案1 - `MATERIAL_MAINTAIN_DARK`

溶液2 - `BAPI_MATERIAL_SAVEDATA`