SAP MM采购订单审批接口分享

一、接口逻辑

使用与SAP中通过MRP跑出的PR转成的采购订单推送OA进行审批，将审批结果通过接口传入SAP的业务场景。

二、接口代码

FUNCTION z_fmmm_0019.
*"----------------------------------------------------------------------
*"*"本地接口：
*"  IMPORTING
*"     VALUE(I_DATA_GD) TYPE  ZSBC_IF_GD OPTIONAL
*"     VALUE(I_INPUT) TYPE  STRING OPTIONAL
*"  EXPORTING
*"     VALUE(E_OUTPUT) TYPE  STRING
*"----------------------------------------------------------------------

  DATA: gs_input        TYPE zsmm_input_019,
        lt_data_list    TYPE zttmm_input_019,
        lwa_data_list   TYPE zssmm_input_019,
        gs_return       TYPE zsmm_output_019,
        lt_data_list_o  TYPE zttmm_output_019,
        ls_data_list_o  TYPE zssmm_output_019,
        lwa_messagelist TYPE zsbc_msg,
        lv_msg          TYPE bapi_msg,
        lt_return        TYPE TABLE OF bapireturn,
        lv_type         TYPE c LENGTH 1.

  "CALL FUNCTION 'ZFM_BREAK_POINT'  .

  CALL FUNCTION 'Z_FMBC_JSONTOABAP2'
    EXPORTING
      i_json = i_input
    IMPORTING
      e_data = gs_input.

  IF gs_input IS INITIAL.

    PERFORM frm_set_msg TABLES ls_data_list_o-messagelist USING 'E' '00' '001' '请检查JSON结构与SAP ABAP结构 是否一致！'.
    APPEND ls_data_list_o TO gs_return-data_list.
    PERFORM frm_write_log_new USING  'MM0019' gs_return i_data_gd i_input e_output 'E'.
    EXIT.

  ENDIF.

  lt_data_list = gs_input-data_list.

  LOOP AT lt_data_list INTO lwa_data_list.

    MOVE-CORRESP