CKM3查看未分配差异,主要通过表CKMLCR,CKMLHD查询
*----------------------------------------------------------------------*
* <更新记录>
* 更新日 : 更新者
:
更新内容 :
*----------------------------------------------------------------------*
PROGRAM Z_XGCO_R_WFP_DIF_01.
TYPE-POOLS: SLIS.
DATA: I_FIELDCAT_ALV TYPE SLIS_T_FIELDCAT_ALV WITH HEADER
LINE,
I_LAYOUT TYPE
SLIS_LAYOUT_ALV, "alv的格式
I_FIELDCAT TYPE SLIS_FIELDCAT_ALV,
TMP_TITLE(70),
W_REPID LIKE SY-REPID.
**---------------------------------------------------------------------*
*** Types
**---------------------------------------------------------------------*
*CKMLHD结构
TYPES:BEGIN OF TYP_CKMLHD,
MATNR
LIKE CKMLHD-MATNR,"物料号
BWTAR
LIKE CKMLHD-BWTAR,"评估类型
ABPRD_O LIKE
CKMLCR-ABPRD_O,
ZUPRD_O LIKE
CKMLCR-ZUPRD_O,
VNPRD_EA
LIKE CKMLCR-VNPRD_EA,
EBPRD_EA
LIKE CKMLCR-EBPRD_EA,
END OF TYP_CKMLHD.
*输出结构
TYPES:BEGIN OF TYP_DATA,
MATNR LIKE
MSEG-MATNR,"物料号
MAKTX LIKE
MAKT-MAKTX,
BWTAR LIKE
CKMLHD-BWTAR,"评估类型
ABPRD_O LIKE
CKMLCR-ABPRD_O,
ZUPRD_O LIKE
CKMLCR-ZUPRD_O,
VNPRD_EA
LIKE CKMLCR-VNPRD_EA,
EBPRD_EA
LIKE CKMLCR-EBPRD_EA,
END OF TYP_DATA,
BEGIN OF TYP_DATA1,
MATNR LIKE
MSEG-MATNR,"物料号
MAKTX LIKE
MAKT-MAKTX,
BWTAR LIKE
CKMLHD-BWTAR,"评估类型
WFPCY LIKE
CKMLCR-ABPRD_O,
END OF TYP_DATA1.
***内表定义
DATA : IT_CKMLHD TYPE STANDARD TABLE OF TYP_CKMLHD,
WA_CKMLHD TYPE TYP_CKMLHD.
DATA : IT_DATA TYPE STANDARD TABLE OF TYP_DATA,
WA_DATA TYPE TYP_DATA.
DATA : IT_DATA1 TYPE STANDARD TABLE OF TYP_DATA1,