MD04数据直接读表

【原创】 MD04数据直接读表

栏目：SAP 作者：在海边看星星阅读：（1362）更新于：2023-08-21 10:25

直接读表，这种数据和md04里相比有一点点差别

TYPES: BEGIN OF gtype_mdtb,
         mandt TYPE mandt,
         dtnum TYPE dtnum,
         dtpos TYPE dtpos,
         plakz TYPE plakz,
         planr TYPE planr,
         dat00 TYPE dat00,
         sort1 TYPE sort1,
         sort2 TYPE sort2,
         delkz TYPE delkz,
         vstat TYPE vstat_d,
         vrfkz TYPE vrfkz,
         plumi TYPE plumi,
         mng01 TYPE mng01,
         mng02 TYPE mng02,
         mng03 TYPE mng03,
         dat01 TYPE dat01,
         dat02 TYPE dat02,
         dat03 TYPE dat03,
         perkz TYPE perkz,
         prper TYPE prper,
         webaz TYPE webaz,
         fix01 TYPE fix01,
         fix02 TYPE fix02,
         baart TYPE baart,
         beskz TYPE beskz,
         sobes TYPE sobes,
         umskz TYPE umskz,
         plart TYPE plart,
         aussl TYPE aussl,
         wrk02 TYPE wrk02,
         lgort TYPE lgort_d,
         delnr TYPE delnr,
         delps TYPE delps,
         delet TYPE delet,
         aufvr TYPE aufvr,
         posvr TYPE posvr,
         einvr TYPE einvr,
         ukz01 TYPE ukz01,
         umdat TYPE umdat,
         del12 TYPE del12,
         baugr TYPE baugr,
         delvr TYPE delkz,
         versb TYPE versb,
         oldsl TYPE oldsl,
         rdmng TYPE rdmng,
         plaab TYPE plaab,
         tag00 TYPE tag00,
         abekz TYPE abekz,
         mdfst TYPE mdfst,
         mdmng TYPE mdmng,
         verid TYPE verid,
         wrk01 TYPE plwrk,
         sernr TYPE sernr,
         revlv TYPE revlv,
         dbskz TYPE dbskz,
         extnl TYPE extnl,
         adinf TYPE md_adinf,
         reslo TYPE reslo,
       END OF gtype_mdtb.

DATA: gt_mdtbx TYPE TABLE OF gtype_mdtb WITH HEADER LINE.
DATA: mdtbx LIKE mdtb OCCURS 0 WITH HEADER LINE.

  DATA: dtnum LIKE mdkp-dtnum.
  SELECT SINGLE dtnum INTO l_dtnum
    FROM mdkp
    WHERE dtart = 'MD'
      AND matnr = gt_alv-matnr
      AND plwrk = gt_alv-werks
    GROUP BY dsdat.

  CLEAR gt_mdtbx. REFRESH gt_mdtbx.""
  TRY.
      IMPORT mdtbx FROM DATABASE mdtc(ar) ID dtnum.
    CATCH cx_sy_import_mismatch_error.
      IMPORT mdtbx = gt_mdtbx
             FROM DATABASE mdtc(ar) ID dtnum
             ACCEPTING PADDING
             ACCEPTING TRUNCATION.
*      LOOP AT gt_mdtbx.
*        CLEAR mdtbx.
*        MOVE-CORRESPONDING gt_mdtbx TO mdtbx.
*        APPEND mdtbx.
*      ENDLOOP.
  ENDTRY.

2.函数-按单个物料

MD_STOCK_REQUIREMENTS_LIST_API

  CALL FUNCTION 'MD_STOCK_REQUIREMENTS_LIST_API'
    EXPORTING
      matnr                    = gt_matnr-matnr
      werks                    = gt_matnr-werks
    TABLES
      mdezx                    = lt_mdez
    EXCEPTIONS
      material_plant_not_found = 1
      plant_not_found          = 2
      OTHERS                   = 3.

3.函数-按多个物料

MD_MDPSX_READ_API

  CALL FUNCTION 'MD_MDPSX_READ_API'
    EXPORTING
      it_matnr_werks_berid = lt_md[]
*     IV_AGG               = ''
*     IV_CUTOFF_DATE       = '99991231'
    IMPORTING
      et_mdpsx             = lt_mdpsx[]
      et_mt61d             = lt_mt61d[]
*     ET_WERKS_NO_AUTH     =
    .

非特殊说明，本文版权归在海边看星星所有，转载请注明出处.

本文标题：MD04数据直接读表

本文网址：http://www.hysvr.com.com/article-69.html.

本文标签：MD04

上一篇： smartforms 范例...

下一篇：消息弹框...

我的评论