********************************************************************
* 事务代码： *
* 程序名称：ZPP001 *
* 程序目的：库存控制报表 *
* 使用变式： *
* 设 计 人： *
* 设计时间：2019-04-28 *
* 程序类型: ABAP/4 程序 ，报表 *
* 输入文件: *
* 输出文件: *
* 应用类型: *
* 描 述: *
*(修改日志)---------------------------------------------------------*
* *
* 日志号 修改人 修改时间 修改说明 传输号码 *
* ---- ---- ------ -----------
* 001 *
********************************************************************
REPORT zpp001.
TYPE-POOLS:slis .
TABLES: marc .
DATA: BEGIN OF gt_out OCCURS 0 ,
box TYPE c ,
werks TYPE marc-werks , "工厂
matnr TYPE marc-matnr , "物料
matnr1 TYPE marc-matnr , "下层物料
maktx TYPE makt-maktx , "产品名称
groes TYPE mara-groes , "零件号
lgobe TYPE t001l-lgobe , "库位名称
lgort TYPE mard-lgort , "库位
lifnr TYPE mslb-lifnr , "供应商代码
name1 TYPE lfa1-name1 , "供应商描述
labst TYPE mard-labst , "库位数量
zzzsl TYPE cpzp-istmn , "批产在制品数量
gxzzp TYPE afvv-lmnga , "试制在制品
min TYPE c LENGTH 17 ,
max TYPE c LENGTH 17 ,
icon TYPE icon-id , "判定结果指示灯
ztext TYPE c LENGTH 50 , "判定结果
index TYPE cscmat-index , "层阶
clr TYPE char4 , "行颜色
sign TYPE c ,
END OF gt_out .
DATA: gt_out1 LIKE TABLE OF gt_out WITH HEADER LINE ,
gt_out2 LIKE TABLE OF gt_out WITH HEADER LINE ,
gt_out3 LIKE TABLE OF gt_out WITH HEADER LINE ,
gt_out4 LIKE TABLE OF gt_out WITH HEADER LINE .
TYPES:BEGIN OF ty_output,
objnr TYPE cpzp-objnr,
gjper TYPE cpzp-gjper, "财政年度期间
aufnr TYPE ckmlmv013-aufnr,"成本收集器订单
fevor TYPE marc-fevor, "调度员
txt TYPE t024f-txt, "调度员描述
pmatn TYPE ckmlmv013-pmatn,"物料
maktx TYPE makt-maktx, "物料描述
