*&---------------------------------------------------------------------*
*& Report ZFICO_035
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ZFICO_035.
*&---------------------------------------------------------------------*
*& Report ZFICO_01
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
TYPE-POOLS: ALVT,SLIS.
TABLES: ACDOCA,KNVP,KNVV,T001,KNA1,t171t,tvv1t,tvkbt,P0002.
DATA: GS_FCAT TYPE LVC_S_FCAT,
GT_FCAT TYPE LVC_T_FCAT,
GS_LAYO TYPE LVC_S_LAYO,
GV_POS TYPE I. "宏字段
TYPES: BEGIN OF GTY_FICO, "定义结构体类型
BELNR TYPE ACDOCA-BELNR,
Bukrs TYPE ACDOCA-RBUKRS, "公司代码
BUTXT TYPE T001-BUTXT, "公司代码名称
GJAHR TYPE ACDOCA-GJAHR, "会计年度
POPER TYPE ACDOCA-POPER, "过账期间
RACCT TYPE ACDOCA-RACCT, "会计科目号
KUNNR TYPE ACDOCA-KUNNR, "客户编号
NAME1 TYPE KNA1-NAME1, "客户名称
BUDAT TYPE ACDOCA-BUDAT,
DRCRK TYPE ACDOCA-DRCRK,
VKORG TYPE KNVP-VKORG, "销售组织
VTWEG TYPE KNVP-VTWEG, "分销渠道
SPART TYPE KNVP-SPART, "部门
BZIRK TYPE KNVV-BZIRK, "开发大区
bztxt TYPE t171t-bztxt, "开发大区描述
KVGR1 TYPE KNVV-KVGR1, "开发员
bezei TYPE tvv1t-bezei, "开发员名称
VKBUR TYPE KNVV-VKBUR, "物流大区
bezei1 TYPE tvkbt-bezei, "物流大区描述
KUNN2 TYPE KNVP-KUNN2, "物流员
nachn TYPE pA0002-nachn, "物流员名称
"汇总货币需要的两个字段, TSL交易货币 HSL本位币
* *KNVP-PARVW,
TSL TYPE ACDOCA-TSL ,
HSL TYPE ACDOCA-HSL ,
PARVW TYPE KNVP-PARVW ,
ZNCYSJ TYPE vbrp-kzwi5,"年初应收额
ZNCYSB TYPE vbrp-kzwi5,"年初应收额
ZYCYSJ TYPE vbrp-kzwi5,"月初应收额
ZYCYSB TYPE vbrp-kzwi5,"月初应收额
ZBYKPJ TYPE vbrp-kzwi5,"本月开票
ZBYKPB TYPE vbrp-kzwi5,"本月开票
ZBYHLJ TYPE vbrp-kzwi5,"本月回笼额
ZBYHLB TYPE vbrp-kzwi5,"本月回笼额
ZBNKPJ TYPE vbrp-kzwi5,"本年开票
ZBNKPB TYPE vbrp-kzwi5,"本年开票
ZBNHLJ TYPE vbrp-kzwi5,"本年回笼额
ZBNHLB TYPE vbrp-kzwi5,"本年回笼额
ZYSYEJ TYPE vbrp-kzwi5,"应收余额
ZYSYEB TYPE vbrp-kzwi5,"应收余额
ZDQJEJ TYPE vbrp-kzwi5,"到期金额
ZDQJEB TYPE vbrp-kzwi5."到期金额
TYPES END OF GTY_FICO.
DATA : GT_FICO TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GT_FICO1 TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GT_FICO2 TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GT_FICO3 TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GT_FICO4 TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GT_FICO5 TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GT_FICO6 TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GT_FICO7 TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GT_FICO8 TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GT_FICO9 TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GT_FICO10 TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GT_FICO11 TYPE TABLE OF GTY_FICO WITH HEADER LINE ,
GS_FICO TYPE GTY_FICO,
GS_FICO1 TYPE GTY_FICO,
GS_FICO7 TYPE GTY_FICO,
GS_FICO2 TYPE GTY_FICO,
GS_FICO3 TYPE GTY_FICO,
GS_FICO10 TYPE GTY_FICO,
GS_FICO11 TYPE GTY_FICO,
GS_FICO12 TYPE GTY_FICO.
FIELD-SYMBOLS : <FS_PP> TYPE GTY_FICO.
DEFINE ZM_FCAT.
GV_POS = GV_POS + 1.
clear GS_FCAT.
GS_FCAT-COL_POS = GV_POS.
GS_FCAT-FIELDNAME = &1.
GS_FCAT-COLTEXT = &4.
GS_FCAT-SCRTEXT_L = &4.
GS_FCAT-SCRTEXT_M = &4.
GS_FCAT-SCRTEXT_S = &4.
GS_FCAT-REF_TABLE = &2.
GS_FCAT-REF_FIELD = &3.
append GS_FCAT to GT_FCAT.
END-OF-DEFINITION.
SELECTION-SCREEN BEGIN OF BLOCK BL1 WITH FRAME TITLE TEXT-H01.
*PARAMETERS : S_WERKS TYPE AUFK-WERKS OBLIGATORY.
SELECT-OPTIONS: S_RBUKRS FOR ACDOCA-RBUKRS Obligatory, "公司代码
s_racct for acdoca-racct obligatory default 1122010000 to 1122020000, "会计科目号
s_gjahr for acdoca-gjahr no-extension no intervals obligatory, "会计年度
s_poper for acdoca-poper no-extension no intervals obligatory, "过账期间
s_vkorg for knvp-vkorg No-extension no intervals obligatory, "销售组织
s_vtweg for knvp-vtweg No-extension no intervals obligatory default 99, "分销渠道
s_spart for knvp-spart No-EXTENSION NO INTERVALS OBLIGATORY DEFAULT 99, "部门
S_KUNNR FOR ACDOCA-KUNNR, "客户编号
S_BZIRK FOR KNVV-BZIRK, "开发大区
S_KVGR1 FOR KNVV-KVGR1
应收账款报表
最新推荐文章于 2024-06-30 18:01:00 发布
本文探讨了企业应收账款的报表分析,包括应收账款的构成、周转率及其对企业财务状况的影响。通过实例解析,阐述如何有效管理和控制应收账款,以提升企业资金流动性及风险管理。
摘要由CSDN通过智能技术生成