[ABAP] BAPI 开SO

本程序不涉及SO的检查， 只描述创建SO所需数据

*---------------------------------------------------------------------*
*       FORM fm_createso                                              *
*---------------------------------------------------------------------*
FORM fm_createso.
  DATA: l_head  LIKE bapisdhd1.
  DATA: l_vbeln LIKE vbak-vbeln.
  DATA: l_item  LIKE TABLE OF bapisditm WITH HEADER LINE.
* DATA:  l_itemx like table of bapisditmx with header line.
  DATA: l_kunnr LIKE TABLE OF bapiparnr WITH HEADER LINE.
  DATA: l_schln LIKE TABLE OF bapischdl WITH HEADER LINE.
  DATA: l_cond  LIKE TABLE OF bapicond WITH HEADER LINE.
  DATA: return  LIKE bapiret2 OCCURS 0 WITH HEADER LINE.
  DATA: g_msg(255) TYPE c.
  DATA: BEGIN OF itab_po OCCURS 0,
        ebelp LIKE ekpo-ebelp,
        matnr LIKE ekpo-matnr,
        menge LIKE ekpo-menge,
        meins LIKE ekpo-meins,
        END OF itab_po.

  CLEAR: g_msg,g_vbeln.
  DATA: BEGIN OF l_soh OCCURS 0,
        auart  LIKE vbak-auart,