ABAP-批導期初庫存
*&---------------------------------------------------------------------*
*&ReportZMMR_031
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORTzmmr_031.
*----------------------------------------------------------------------*
*INCLUDE*
*----------------------------------------------------------------------*
INCLUDE<list>.
INCLUDE<icon>.
*----------------------------------------------------------------------*
*CONSTANTS*
*----------------------------------------------------------------------*
CONSTANTS:
*常量定義
BEGINOFgc_con,
dow(4)TYPEcVALUE'FC01',"下載按鈕
objidTYPEwwwdatatab-objidVALUE'ZMMR_031',"SAPWWW閘道器物件名
ENDOFgc_con,
*EXCEL檔案行和列
BEGINOFgc_line,
begin_rowTYPEiVALUE'4',"起始行
begin_colTYPEiVALUE'2',"起始單元格
end_rowTYPEiVALUE'65535',"終了行
end_colTYPEiVALUE'18',"終了單元格
ENDOFgc_line.
*----------------------------------------------------------------------*
*TABLES*
*----------------------------------------------------------------------*
TABLESsscrfields.
*----------------------------------------------------------------------*
*TYPES*
*----------------------------------------------------------------------*
TYPES:
*上傳用
BEGINOFty_upload,
iconTYPEstring,"狀態
remarkTYPEstring,"訊息
zeileTYPEi,"物料憑證中的專案
filed01TYPEstring,"專案01
filed02TYPEstring,"專案02
filed03TYPEstring,"專案03
filed04TYPEstring,"專案04
filed05TYPEstring,"專案05
filed06TYPEstring,"專案06
filed07TYPEstring,"專案07
filed08TYPEstring,"專案08
filed09TYPEstring,"專案09
filed10TYPEstring,"專案10
filed11TYPEstring,"專案11
filed12TYPEstring,"專案12
filed13TYPEstring,"專案13
filed14TYPEstring,"專案14
filed15TYPEstring,"專案15
filed16TYPEstring,"專案16
filed17TYPEstring,"專案17
ENDOFty_upload,
*出力用
BEGINOFty_alv,
zeileTYPEi,"物料憑證中的專案
budatTYPEmkpf-budat,"過帳日期
werksTYPEmseg-werks,"工廠
lgortTYPEmseg-lgort,"庫位
matnrTYPEmseg-matnr,"物料編碼
maktxTYPEmakt-maktx,"物料描述
mengeTYPEmseg-menge,"數量
meinsTYPEmseg-meins,"計量單位
exbwrTYPEmseg-exbwr,"庫存金額
bwartTYPEmseg-bwart,"移動型別
*sobkzTYPEmseg-sobkz,"特殊庫存
*posidTYPEprps-posid,"WBS元素
iconTYPEstring,"狀態
remarkTYPEstring,"訊息
numberTYPEi,"序號
ENDOFty_alv.
*----------------------------------------------------------------------*
*DATA*
*----------------------------------------------------------------------*
*全域性內表定義
DATA:gt_uploadTYPESTANDARDTABLEOFty_upload,"上傳
gt_alvTYPESTANDARDTABLEOFty_alv,"出力
gt_alv2TYPESTANDARDTABLEOFty_alv,"出力
gt_fieldcatTYPEslis_t_fieldcat_alv,"ALV控制
gt_sortTYPEslis_t_sortinfo_alv,"ALV排序
*全域性構造定義
gs_fieldcatTYPEslis_fieldcat_alv,"ALV控制