SAP-MRP计划库存发运报表DEMO

1、 效果图：

2、 调用的外部 FUNCTION：ZFM_PP_GETDATE

FUNCTIONZFM_PP_GETDATE.

*"----------------------------------------------------------------

------

*"*"Localinterface:

*"IMPORTING

*"VALUE(Z_COUNT)TYPEINT4

DATA:BEGINOFITABOCCURS0,"

临时存放日期

ZNUMTYPEI,

ZDATETYPED,

ENDOFITAB.

DATAl_on_date_eTYPED.

DATAZWA_GETDATETYPEZTA_GETDATE.

*&----------------------------------------------------------------

-----*

*&

开始执行

*

EXIT.

ELSE.

ZNUMT=0.

WHILEZNUMT<Z_COUNT.

*&----------------------

获 取 系 统 日

期

-----------------------------------------------*

CALLFUNCTION'RP_CALC_DATE_IN_INTERVAL'

EXPORTING

date=Z_DATE

days=ZNUMT

signum='+'

years=0

IMPORTING

calc_date=l_on_date_e.

CLEARZWA_GETDATE.

ZNUMT=ZNUMT+1.

ENDFUNCTION.

******************************************************************

******

*-----------------------------------------------------------------

*

创建日期///////程序员////

*

描述

*

BBA

的预发货

ASN

清单

*

从表

ZTA_MM006

取数

======

*

修改日期///版本////修改人//////修改描述

*20190715lb

REPORTZMMRP070.

*----------------------------tables----------------------------

TABLES:

ZTA_MM006.

*-------------------workareaandinternaltable---------------

-----*

DATA:IT_DATELIKETABLEOFZTA_GETDATE."

存放日期函数调用结果

DATA:BEGINOFIT_DATETEMPOCCURS0,"

临时存放表头日期

DATA:BEGINOFIT_TEMP1OCCURS0,"

临时交付计划

ZCOL-2(10)TYPEC,"

ZCOL0TYPEI,"

到期

ZCOL1TYPEI,"

列

1

ZCOL4TYPEI,

ZCOL5TYPEI,

ZCOL7TYPEI,

ZCOL8TYPEI,

ZCOL10TYPEI,

ZCOL18TYPEI,

ZCOL19TYPEI,

ZCOL20TYPEI,

ZCOL22TYPEI,

ZCOL24TYPEI,

ZCOL25TYPEI,

ZCOL26TYPEI,

ZCOL27TYPEI,

ZCOL28TYPEI,

ZCOL29TYPEI,

ZCOL31TYPEI,

ZCOL32TYPEI,

ZCOL33TYPEI,

ZCOL34TYPEI,

ZCOLTTYPEI,"

CLRTYPECHAR4,"

CELLCOLORTYPELVC_T_SCOL,"

DATAIW_CELLCOLORTYPELVC_S_SCOL."

DATA:IT_TEMP2LIKETABLEOFIT_TEMP1WITHHEADERLINE,

IT_TEMP3LIKETABLEOFIT_TEMP1WITHHEADERLINE,

IT_TEMP4LIKETABLEOFIT_TEMP1WITHHEADERLINE.

DATAWA_TEMP2LIKEIT_TEMP2.

DATAWA_TEMP3LIKEIT_TEMP3.

DATAWA_TEMP4LIKEIT_TEMP4.

DATAWA_TEMPTOTAL2LIKEIT_TEMP2."

小计

DATAWA_TEMPTOTAL3LIKEIT_TEMP3."

小计

DATAWA_TEMPTOTAL4LIKEIT_TEMP4."

小计

DATA:BEGINOFIT_TEMPTOTALOCCURS0,"

ZCOL-2(10)TYPEC,"

ZCOL-1(30)TYPEC,"

ZCOL0TYPEI,"

ZCOL1TYPEI,"

1

ZCOL2TYPEI,"

2

ZCOL3TYPEI,"

3

ZCOL4TYPEI,

ZCOL5TYPEI,

ZCOL7TYPEI,

ZCOL9TYPEI,

ZCOL10TYPEI,

ZCOL11TYPEI,

ZCOL12TYPEI,

ZCOL13TYPEI,

ZCOL14TYPEI,

ZCOL16TYPEI,