用ABAP写一个库存报表 代码怎么写
时间: 2023-11-29 18:06:55 浏览: 162
好的,下面是一个简单的 ABAP 代码示例,可以根据您的需求进行修改和优化。
```
REPORT z_inventory_report.
TABLES: mard, marc, mbew.
DATA: BEGIN OF itab OCCURS 0,
matnr LIKE mard-matnr, "物料号
maktx LIKE mard-maktx, "物料描述
werks LIKE mard-werks, "工厂
lgort LIKE mard-lgort, "库存地点
labst LIKE mard-labst, "库存数量
speme LIKE mbew-speme, "货币单位
stprs LIKE mbew-stprs, "标准价格
END OF itab.
START-OF-SELECTION.
SELECT mard~matnr mard~maktx mard~werks mard~lgort mard~labst mbew~speme mbew~stprs
INTO TABLE itab
FROM mard
INNER JOIN marc ON mard~matnr = marc~matnr AND mard~werks = marc~werks
INNER JOIN mbew ON mard~matnr = mbew~matnr AND mard~werks = mbew~bwkey
WHERE mard~matnr IN ('MATERIAL1', 'MATERIAL2') "选择特定的物料号
AND mard~werks = 'WORKCENTER1'. "选择特定的工厂
LOOP AT itab INTO DATA(wa_itab).
WRITE: / wa_itab-matnr, wa_itab-maktx, wa_itab-werks, wa_itab-lgort, wa_itab-labst, wa_itab-speme, wa_itab-stprs.
ENDLOOP.
```
这段代码会从 MARD、MARC 和 MBEW 表中查询特定的物料号和工厂的库存信息,并将结果输出。您可以根据自己的需求修改 WHERE 子句中的条件,以选择不同的物料和工厂。另外,您还可以根据需要添加更多的输出字段,或者进行其他的优化。
阅读全文