写入工单长文本问题

创建长文本:CREATE_TEXT
查询长文本:READ_TEXT
小坑: 创建完成之后,必须根据工单号更新aufk的ltext = 1 否则CO03前台看不到写入的长文本。

 CALL FUNCTION 'CREATE_TEXT'
      EXPORTING
        fid         = 'KOPF' "订单抬头文本ID
        flanguage   = sy-langu “语言
        fname       = fname  客户端+前导零工单号
        fobject     = 'AUFK' "文本对象
        save_direct = 'X'
*       fformat     = '*'
      TABLES
        flines      = flines
      EXCEPTIONS
        no_init     = 1
        no_save     = 2
        OTHERS      = 3.
    IF sy-subrc = 0.
      CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
        EXPORTING
          wait = 'X'.
    ELSE.
      CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.

    ENDIF.

猜你喜欢

转载自blog.csdn.net/ABAP_NY/article/details/109514725