实际界面
结果
源代码
*&---------------------------------------------------------------------*
*& Report ZRPT_FICO_F01
*&---------------------------------------------------------------------*
*& 20240614 批量显示余额 发生额
*&---------------------------------------------------------------------*
REPORT ZRPT_FICO_F01.
TABLES:ACDOCA,SKAT,SKA1,SKB1,BSEG.
*----------------------------------------------------------------------*
* TYPES
*----------------------------------------------------------------------*
TYPES:
BEGIN OF TYP_DATA,
SAKNR TYPE SKAT-SAKNR, "科目
TXT20 TYPE SKAT-TXT20, "科目描述
DMBTRS TYPE BSEG-DMBTR, "期初
DMBTRSS TYPE BSEG-DMBTR, "借方
DMBTRSH TYPE BSEG-DMBTR, "贷方
DMBTRE TYPE BSEG-DMBTR, "期末
DLT TYPE BSEG-DMBTR, "绝对差异
PERCENT TYPE BSEG-DMBTR, "绝对差异
END OF TYP_DATA.
*----------------------------------------------------------------------*
* DATA
*----------------------------------------------------------------------*
DATA:
GT_DATA TYPE TABLE OF TYP_DATA,
GS_DATA TYPE TYP_DATA.
* ALV变量
DATA:
GT_FCAT TYPE LVC_T_FCAT,
GS_FCAT LIKE LINE OF GT_FCAT,
GS_LAYOUT TYPE LVC_S_LAYO.
*----------------------------------------------------------------------*
* 宏定义
*----------------------------------------------------------------------*
DEFINE FIELDS_ADD.
GS_FCAT-FIELDNAME = &1.
GS_FCAT-COLTEXT = &2..
GS_FCAT-SCRTEXT_L = GS_FCAT-COLTEXT.
GS_FCAT-SCRTEXT_M = GS_FCAT-COLTEXT.
GS_FCAT-SCRTEXT_S = GS_FCAT-COLTEXT.
GS_FCAT-FIX_COLUMN = &3.
GS_FCAT