采购订单增强：ME_PROCESS_PO_CUST

抬头： 

HEADER
 DATA: ls_mepoheader TYPE mepoheader.

    ls_mepoheader = im_header->get_data( ).

行项目：

ITEM
  DATA: ls_mepoitem TYPE mepoitem,
        ls_customer TYPE mepo_badi_exampl,
        ls_tbsg     TYPE tbsg,
        lv_dummy    TYPE c LENGTH 128,
        lv_check    TYPE char1.

  DATA: ls_mepoheader TYPE mepoheader.
  DATA: lo_header TYPE REF TO if_purchase_order_mm.
*---------------------------------------------------------------------*
* here we check customers data
*---------------------------------------------------------------------*
  lo_header ?= im_item->get_header( ).
  ls_mepoheader = lo_header->get_data( ).
  ls_mepoitem = im_item->get_data( ).

数据检验CHECK:

*CHECK
 DATA:
    ls_header   TYPE mepoheader,
    lt_items    TYPE purchase_order_items,
    lo_item     TYPE REF TO if_purchase_order_item_mm,
    ls_mepoitem TYPE mepoitem,
    lv_matnr    TYPE ekpo-matnr,
    lv_msg      TYPE char60,
    lv_msgv1    TYPE i.
 * get po header
  CALL METHOD im_header->get_data
    RECEIVING
      re_data = ls_header.

* get po items
  CALL METHOD im_header->get_items
    RECEIVING
      re_items = lt_items.