zoukankan      html  css  js  c++  java
  • BAPI_OBJCL_CHANGE

    The following code is working perfectly in my system to update a date characteristic


    DATA: okey TYPE bapi1003_key-object,

    otable TYPE bapi1003_key-objecttable VALUE 'MCH1',

    classnum TYPE bapi1003_key-classnum VALUE 'PF',

    classtype TYPE bapi1003_key-classtype VALUE '023'.

    DATA: numnews TYPE TABLE OF bapi1003_alloc_values_num,

    numnew TYPE bapi1003_alloc_values_num,

    charnews TYPE TABLE OF bapi1003_alloc_values_char,

    currnews TYPE TABLE OF bapi1003_alloc_values_curr,

    bret TYPE TABLE OF bapiret2,

    ret TYPE bapiret2.

    DATA: atwrt TYPE atwrt.

    CHECK ck_test IS INITIAL.

    numnew-charact = 'ZDATAUM'.

    atwrt = out-budat.

    CALL FUNCTION 'CTCV_CONVERT_DATE_TO_FLOAT'

    EXPORTING

    date = atwrt

    IMPORTING

    float = numnew-value_from.

    APPEND numnew TO numnews.

    okey(18) = out-matnr.

    okey+18(10) = out-charg.

    CALL FUNCTION 'BAPI_OBJCL_CHANGE'

    EXPORTING

    objectkey = okey

    objecttable = otable

    classnum = classnum

    classtype = classtype

    TABLES

    allocvaluesnumnew = numnews

    allocvaluescharnew = charnews

    allocvaluescurrnew = currnews

    return = bret.

    LOOP AT bret INTO ret WHERE type = 'E' OR type = 'A'.

    out-message = ret-message.

    EXIT.

    ENDLOOP.

    IF sy-subrc = 0.

    out-status = icon_failure.

    CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.

    ELSE.

    CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.

    out-status = icon_checked.

    out-message = 'Batch classification updated'(001).

    ENDIF.

    image

  • 相关阅读:
    PHP 中的 cURL 爬虫实战基础
    PHP的输出缓冲区
    Web网站高并发量的解决方案
    PHP Socket 简单使用
    php无极限分类函数
    PHP单链表的基本操作
    PHP中的10个实用函数
    你真的了解现在的PHP吗?
    国人骄傲,layer.js 搞定所有弹窗
    字典排序
  • 原文地址:https://www.cnblogs.com/chrisrockdl/p/14079206.html
Copyright © 2011-2022 走看看