SAP SD借贷项凭证创建接口分享

一、接口逻辑

1）输入和输出参数

2）业务逻辑

二、接口代码

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

  CALL FUNCTION 'ZFM_BREAK_POINT'  .


  "清空全局变量
  CLEAR:GV_INPUT_060,
        GV_OUTPUT_060,
        GV_STATUS_060.

  "清空输出变量
  CLEAR:E_OUTPUT.

  IF I_INPUT IS NOT INITIAL.

    CALL FUNCTION 'Z_FMBC_JSONTOABAP'
      EXPORTING
        I_JSON = I_INPUT
      IMPORTING
        E_DATA = GV_INPUT_060.

  ENDIF.

  IF GV_INPUT_060 IS INITIAL.
    PERFORM FRM_SET_MSG TABLES GV_OUTPUT_060-MESSAGELIST USING 'E' '00' '001' '请检查JSON结构与SAP ABAP结构 是否一致！'.
    PERFORM FRM_WRITE_LOG_NEW  USING  'SD0060'
                                GV_OUTPUT_060
                                 I_DATA_GD
                                 I_INPUT
                                 E_OUTPUT
                                 'E'.
    EXIT.
  ENDIF.

  PERFORM FRM_CHECK_DATA_060 TABLES GV_OUTPUT_060-MESSAGELIST.

  IF GV_OUTPUT_060 IS NOT INITIAL.
    PERFORM FRM_WRITE_LOG_NEW  USING 'SD0060'
                            &nb