SAP ME12批量修改采购信息记录

REPORT zmm_me12_batch.
********************************
* INNITIALIZATION
********************************
TYPES: BEGIN OF lty_infor,
  werks TYPE marc-werks,
  infnr TYPE eina-infnr,
  kbetr TYPE konp-kbetr,
  kpein TYPE konp-kpein,  "//per
  aplfz TYPE eine-aplfz,  "//plan.deliv.time
  bstma TYPE eine-bstma,
  tcode TYPE bdc_tcode,
  msgtyp TYPE bdc_mart,
  fldname  TYPE fnam_____4,
  message_text  TYPE char200,
  END OF lty_infor.

DATA: lt_infor TYPE TABLE OF lty_infor,
      ls_infor LIKE LINE OF lt_infor.

DATA: lt_upload LIKE TABLE OF alsmex_tabline,
      ls_upload LIKE LINE OF lt_upload.
DATA: gt_bdc_message_all TYPE TABLE OF zsbdc_message_all,           "//ALV显示所有返回信息
      ls_bdc_message_all LIKE LINE OF gt_bdc_message_all,
      lt_bdcmsg TYPE TABLE OF bdcmsgcoll,
      gt_bdc_message TYPE TABLE OF zsbdc_message_all, "// 返回带MESSAGE TEXT
      lwa_bdcmsg_all LIKE LINE OF gt_bdc_message,
      lwa_bdcmsg LIKE LINE OF lt_bdcmsg,