当前位置：首页 > news >正文

SAP SD交货单明细查询接口分享

news 2025/10/27 6:37:16

一、接口逻辑

1）输入参数和输出参数

2）业务逻辑

二、接口代码

FUNCTION z_fmsd_dn_base_info.
*"----------------------------------------------------------------------
*"*"本地接口：
*"  IMPORTING
*"     VALUE(I_DATA_GD) TYPE  ZSBC_IF_GD OPTIONAL
*"     VALUE(I_INPUT) TYPE  STRING OPTIONAL
*"  EXPORTING
*"     VALUE(E_OUTPUT) TYPE  STRING
*"----------------------------------------------------------------------
  DATA:ls_input  TYPE zssd_input_005,
       ls_output TYPE zssd_output_009.

  DATA:lv_status TYPE c.

  CALL FUNCTION 'ZFM_BREAK_POINT'  .

  CLEAR:ls_input,ls_output,lv_status.

  IF i_input IS NOT INITIAL.
    CALL FUNCTION 'Z_FMBC_JSONTOABAP'
      EXPORTING
        i_json = i_input
      IMPORTING
        e_data = ls_input.
  ENDIF.

  IF ls_input IS INITIAL.
    PERFORM frm_set_msg TABLES ls_output-messagelist
      USING 'E' '00' '001' '请检查JSON结构与SAP ABAP结构是否一致！'.

    PERFORM frm_write_log_new
      USING 'SD0027' ls_output i_data_gd i_input e_output 'E'.

    EXIT.
  ENDIF.

  IF ls_input-kunnr IS NOT INITIAL.
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input  = ls_input-kunnr
      IMPORTING
        output = ls_input-kunnr.
  ENDIF.

  PERFORM frm_get_dn_detail_info TABLES ls_output-data USING ls_input.

  IF ls_output-data IS INITIAL.
    lv_status = 'E'.
    PERFORM frm_set_msg TABLES ls_output-messagelist
      USING 'E' '00' '001' '输入参数条件，没有查询到有效数据！'.
  ELSE.
  &