Code listing for: ZR_FI_VENDOR_BALANCE_TOP

Description: Include ZR_FI_VENDOR_BALANCE_TOP

*&---------------------------------------------------------------------*
*&  包含                ZR_FI_VENDOR_BALANCE_TOP
*&---------------------------------------------------------------------*
TABLES:LFC1,LFC3,BKPF,BSEG,BSAK,BSIK,SSCRFIELDS,TVBUR,LFA1,USR02,PA0002,SKAT.

TYPE-POOLS: SLIS.

"Sum.
DATA: GT_FIELDCAT_SUM TYPE SLIS_T_FIELDCAT_ALV,
      GS_FIELDCAT_SUM TYPE SLIS_FIELDCAT_ALV,
      GS_LAYOUT_SUM   TYPE SLIS_LAYOUT_ALV,
      GT_SORT_SUM     TYPE SLIS_T_SORTINFO_ALV,
      GS_SORT_SUM     LIKE LINE OF GT_SORT_SUM.

"Detail.
DATA: GT_FIELDCAT_DETAIL TYPE SLIS_T_FIELDCAT_ALV,
      GS_FIELDCAT_DETAIL TYPE SLIS_FIELDCAT_ALV,
      GS_LAYOUT_DETAIL   TYPE SLIS_LAYOUT_ALV,
      GT_SORT_DETAIL     TYPE SLIS_T_SORTINFO_ALV,
      GS_SORT_DETAIL     LIKE LINE OF GT_SORT_SUM.

TYPES: BEGIN OF TYP_VENDOR_BALANCE_SUM,
         BUKRS    LIKE BKPF-BUKRS,
         GJAHR    LIKE BKPF-GJAHR,
         MONAT    LIKE BKPF-MONAT,
         LIFNR    LIKE LFA1-LIFNR,
         NAME1    TYPE  LFA1-NAME1, "供应商描述
         DMBTR_JZ LIKE BSEG-DMBTR, "年初结转额.
         DMBTR_QC LIKE BSEG-DMBTR, "本期初余额.
         DMBTR_FS LIKE BSEG-DMBTR, "本期发生额.
         DMBTR_QM LIKE BSEG-DMBTR,  "本期末余额.
       END OF TYP_VENDOR_BALANCE_SUM.
DATA: GT_VDBAS_SUM TYPE TABLE OF TYP_VENDOR_BALANCE_SUM WITH HEADER LINE.

TYPES: BEGIN OF TYP_VENDOR_BALANCE_DETAIL,
         BUKRS TYPE BKPF-BUKRS  ,                "公司代码
         BELNR TYPE BKPF-BELNR  ,                "会计凭证编号
         GJAHR TYPE BKPF-GJAHR  ,                "会计年度
         BLART TYPE BKPF-BLART  ,                "凭证类型
         BUDAT TYPE BKPF-BUDAT  ,                "过帐日期
         BKTXT TYPE BKPF-BKTXT  ,                "抬头文本
         USNAM TYPE BKPF-USNAM  ,                "记账人
         BUZEI TYPE BSEG-BUZEI  ,                "行项目号
         SGTXT TYPE BSEG-SGTXT  ,                "行项目文本
         HKONT TYPE  BSEG-HKONT  ,               "总账科目编号
         HKBEZ TYPE  HKBEZ       ,               "总帐科目名称
         BSCHL TYPE  BSEG-BSCHL  ,               "记帐代码
         SHKZG TYPE  BSEG-SHKZG  ,               "借贷标识
         UMSKZ TYPE  BSEG-UMSKZ  ,               "SGL符号
         DMBTR TYPE BSEG-DMBTR  ,                "本币金额
         LIFNR TYPE  BSEG-LIFNR  ,               "供应商
         NAME1 TYPE  LFA1-NAME1  .               "供应商描述 “lfa1
TYPES END OF TYP_VENDOR_BALANCE_DETAIL.
DATA: GT_VDBAS_DETAIL TYPE TABLE OF TYP_VENDOR_BALANCE_DETAIL WITH HEADER LINE.