库存账龄分析表

库龄分析表本期概述●本文档适用于 K/3 V10.1和V10.3 库龄分析汇总表（库存账龄分析表）●本文档详细描述了库龄分析表的应用和区别版本信息●2007年5月31日 V1.0 编写人：骆锦程版权信息●本文件使用须知著作权人保留本文件的内容的解释权，并且仅将本文件内容提供给阁下个人使用。

对于内容中所含的版权和其他所有权声明，您应予以尊重并在其副本中予以保留。

您不得以任何方式修改、复制、公开展示、公布或分发这些内容或者以其他方式把它们用于任何公开或商业目的。

任何未经授权的使用都可能构成对版权、商标和其他法律权利的侵犯。

如果您不接受或违反上述约定，您使用本文件的授权将自动终止，同时您应立即销毁任何已下载或打印好的本文件内容。

著作权人对本文件内容可用性不附加任何形式的保证，也不保证本文件内容的绝对准确性和绝对完整性。

本文件中介绍的产品、技术、方案和配置等仅供您参考，且它们可能会随时变更，恕不另行通知。

本文件中的内容也可能已经过期，著作权人不承诺更新它们。

如需得到最新的技术信息和服务，您可向当地的金蝶业务联系人和合作伙伴进行咨询。

著作权声明著作权所有 2007 金蝶软件（中国）有限公司。

所有权利均予保留。

目录第一章库龄分析表的原理 (3)1.1 K/3 V10.1商业库龄分析汇总表的原理 (3)1.2 K/3 V10.1工业库存账龄分析表的原理 (3)1.3 K/3 V10.3库存账龄分析表的原理 (3)第二章库龄分析表的案例 (3)2.1K/3 V10.1商业库龄分析汇总表案例 (3)2.2K/3 V10.1工业库存账龄分析表案例 (5)2.3K/3 V10.3工业库存账龄分析表案例 (8)2.4总结 (10)第一章库龄分析表的原理1.1 K/3 V10.1商业库龄分析汇总表的原理库龄分析汇总表的取数依据期初余额、出入库单据，对进行库龄管理商品的库龄情况进行统计。

库龄分析汇总表是按先进先出原则进行账龄分析，时间的判定方法是：以报表过滤日期为截止日期和出入库单上的日期进行比较（采用保质期管理的物料同样是以单据日期作为比较对象），得到存储天数；如果是初始化录入的余额，则以初始化录入的收入日期为比较对象，得到存储天数。

账龄分析表excel模板账龄分析表excel模板的工作量，有时甚至会因耗费太多的人工、时间而不能实现，但是应用Excel，其实现起来是相当轻松的，与编制表1模式的账龄分析表的工作量没有特别明显的增加。

账龄分析表excel模板。

Excel提供了数据排序功能，可以对工作表中的数据按照某个或某些字段重新进行排列顺序。

在进行账龄分析时，为了对客户数据进行分类汇总，可以事先应用Excel的排序功能，其方法是：选中被排序的数据清单中的任一单元格，单击命令【数据】|【排序】，指定关键字后则可由系统自动将数据进行重新排列。

账龄分析表excel模板。

2. 筛选 Excel提供了数据筛选功能，可以由操作人员指定筛选条件，由系统将满足条件的数据筛选出来。

数据筛选又包括自动筛选和高级筛选两种方式。

本文应用的自动筛选方法是：单击命令【数据】|【筛选】|【自动筛选】，随后指定筛选条件进行数据的筛选工作。

数据透视表是一种对大量数据进行自动快速汇总和交叉列表的交互式表格，方法是：单击命令【数据】|【数据透视表和图表报告】，随后可以在向导的提示下，由操作员指定被汇总的数据，汇总条件，“对某字段求和、求平均”等汇总方式，随后系统会自动生成数据透视表。

当前进行分析评价应收账款的时间，这样编制的账龄分析表就是一个动态的表，每天的账龄分析表都会由Excel自动更新数据内容，达到实施监督应收账款发生情况的目的。

建立Excel数据清单，包含如下一些数据项：客户名称、发货单号、业务发生日期、应收账款借方发生额、应收账款贷方发生额、信用期限等，记录应收账款相关信息，当应收账款发生或回款时，及时将信息记录在数据清单中。

应收账款数据清单如图1所示。

日常形成的应收账款数据清单记录着应收账款的发生情况，还记录着应收账款的回款情况，而账龄分析主要是对应收账款的余额进行分析，所以，事先需要对应收账款进行核销。

核销时，一般遵循的原则是，除非特别说明，认为客户返回的货款是支付最早一笔应收账款的，当然核销的原则不同，所生成的账龄分析表是截然不同的，这没有特别严格的标准，企业可以根据自己账龄分析的目的决定。

****************************************************************** * PROGRAM SOURCE HEADER****************************************************************** *Program Name: ZHTFI_R019*Description: 存货账龄分析明细表*Date/Author: 2012.06.27/许林锋*Table Update:*Special Logic:*Include:****************************************************************** * MODIFICATION LOG****************************************************************** *ChangeDate *Programer *Request *Desctiption*-----------------------------------------------------------------*2007.06.27 *许林锋 *DEVK900358 *New Program*2007.06.28 *许林锋 *DEVK900358 *Change*2007.06.29 *许林锋 *DEVK900358 *Change*2007.07.02 *许林锋 *DEVK900358 *Change*2007.07.03 *许林锋 *DEVK900358 *Change*2007.07.04 *许林锋 *DEVK900358 *Change*2007.07.05 *许林锋 *DEVK900358 *Change******************************************************************* *-----------------------------------------------------------------*Program Name*-----------------------------------------------------------------report zhtfi_r019.tables: t001, t001w, t001l, mara, mbew.*Data*-----------------------------------------------------------------*ALVtype-pools: slis.data: i_fieldcat_alv type slis_t_fieldcat_alv with header line,i_layout type slis_layout_alv, "alv的格式w_fieldcat type slis_fieldcat_alv, "alv列属性w_repid like sy-repid. "当前程序data: d_pos type i value 0."rangesranges: r_bwkey for t001k-bwkey, "评估范围r_bukrs for t001k-bukrs, "公司代码r_werks for t001w-werks. "工厂data: begin of it_data occurs 0,bukrs like t001-bukrs, "公司mjahr like mkpf-mjahr, "年度rpmax(2) type c, "期间matnr like mseg-matnr, "物料maktx like makt-maktx, "物料描述mtart like mara-mtart, "物料类型matkl like mara-matkl, "物料组werks like mseg-werks, "工厂lgort like mseg-lgort, "库位menge_e like mseg-menge, "期末数量dmbtr_e like mseg-dmbtr, "期末金额menge_1 like mseg-menge, "1-3月数量 dmbtr_1 like mseg-dmbtr, "1-3月金额menge_2 like mseg-menge, "4-6月数量 dmbtr_2 like mseg-dmbtr, "4-6月金额menge_3 like mseg-menge, "7-9月数量 dmbtr_3 like mseg-dmbtr, "7-9月金额menge_4 like mseg-menge, "10-12月数量 dmbtr_4 like mseg-dmbtr, "10-12月金额 menge_5 like mseg-menge, "1-2年数量 dmbtr_5 like mseg-dmbtr, "1-2年金额menge_6 like mseg-menge, "2-3年数量 dmbtr_6 like mseg-dmbtr, "2-3年金额menge_7 like mseg-menge, "3年以上数量 dmbtr_7 like mseg-dmbtr, "3年以上金额 end of it_data.data: begin of it_werks occurs 0,bwkey like t001k-bwkey, "评估范围bukrs like t001k-bukrs, "公司代码werks like t001w-werks, "工厂end of it_werks,it_werks_b like table of it_werks with header line.data: begin of it_matnr occurs 0,matnr like mara-matnr, "物料号码mtart like mara-mtart, "物料类型matkl like mara-matkl, "物料组maktx like makt-maktx, "物料描述end of it_matnr.data: begin of it_mseg occurs 0,mblnr like mkpf-mblnr, "物料凭证mjahr like mkpf-mjahr, "年度budat like mkpf-budat, "过账日期zeile like mseg-zeile, "项目matnr like mseg-matnr, "物料werks like mseg-werks, "工厂lgort like mseg-lgort, "库位shkzg like mseg-shkzg, "借/贷dmbtr like mseg-dmbtr, "本位币金额menge like mseg-menge, "数量end of it_mseg.data: begin of it_bsim occurs 0,bukrs like bkpf-bukrs, "公司代码belnr like bkpf-belnr, "会计凭证gjahr like bkpf-gjahr, "会计年度budat like bkpf-budat, "过账日期buzei like bsim-buzei, "项目matnr like bsim-matnr, "物料shkzg like bsim-shkzg, "借/贷dmbtr like bsim-dmbtr, "本位币金额end of it_bsim.data: begin of it_lgort occurs 0,bukrs like t001-bukrs, "公司werks like mseg-werks, "工厂lgort like mseg-lgort, "库位end of it_lgort.data: begin of it_bukrs occurs 0,bukrs like t001-bukrs, "公司代码end of it_bukrs.data: begin of it_perpr occurs 0,matnr like mara-matnr, "物料bukrs like t001-bukrs, "公司代码perpr like mseg-dmbtr, "单价end of it_perpr.data: p_budat_low_f like mkpf-budat, "查询期间的第一天p_budat_high_f like mkpf-budat, "查询期间的最后一天"各个期间的开始结束日p_budat_low_1 like mkpf-budat,p_budat_high_1 like mkpf-budat,p_budat_low_2 like mkpf-budat,p_budat_high_2 like mkpf-budat,p_budat_low_3 like mkpf-budat,p_budat_high_3 like mkpf-budat,p_budat_low_4 like mkpf-budat,p_budat_high_4 like mkpf-budat,p_budat_low_5 like mkpf-budat,p_budat_high_5 like mkpf-budat,p_budat_low_6 like mkpf-budat,p_budat_high_6 like mkpf-budat,p_budat_low_7 like mkpf-budat,p_budat_high_7 like mkpf-budat,p_budat_low like mkpf-budat, "期间的第一天p_budat_high like mkpf-budat. "期间的最后一天data: d_menge_i_1 like mseg-menge," d_dmbtr_i_1 like mseg-dmbtr, d_menge_i_2 like mseg-menge," d_dmbtr_i_2 like mseg-dmbtr,d_menge_i_3 like mseg-menge," d_dmbtr_i_3 like mseg-dmbtr,d_menge_i_4 like mseg-menge," d_dmbtr_i_4 like mseg-dmbtr,d_menge_i_5 like mseg-menge," d_dmbtr_i_5 like mseg-dmbtr,d_menge_i_6 like mseg-menge," d_dmbtr_i_6 like mseg-dmbtr,d_menge_i_7 like mseg-menge," d_dmbtr_i_7 like mseg-dmbtr,d_menge_i_e like mseg-menge, d_dmbtr_i_e like mseg-dmbtr,d_menge_i_e_sum like mseg-menge, d_dmbtr_i_e_sum like mseg-dmbtr, * d_perpr like mseg-dmbtr. "单价d_perpr type f.data: d_menge_i like mseg-menge, d_dmbtr_i like mseg-dmbtr, d_menge_i_sub like mseg-menge, d_dmbtr_i_sub like mseg-dmbtr. data d_str type string.*Selection Screen*-----------------------------------------------------------------selection-screen begin of block blk_1 with frame title text-blk.select-options: s_bukrs for t001-bukrs obligatory, "公司s_werks for t001w-werks, "工厂s_lgort for t001l-lgort. "库位selection-screen skip.select-options: s_matnr for mara-matnr, "物料s_mtart for mara-mtart, "物料类型s_matkl for mara-matkl. "物料组select-options: s_bklas for mbew-bklas. "估价类selection-screen skip.parameter: p_mjahr like mkpf-mjahr obligatory, "年度 p_rpmax(2) type c obligatory. "期间selection-screen end of block blk_1.*Define*----------------------------------------------------------------- define move_sub.d_menge_i = d_menge_i_sub. clear d_menge_i_sub.* d_dmbtr_i = d_dmbtr_i_sub. clear d_dmbtr_i_sub. end-of-definition.define sub_m_d.d_menge_i_sub = d_menge_i - &1.* d_dmbtr_i_sub = d_dmbtr_i - &2.end-of-definition.define move_m_d.&1 = d_menge_i.* &2 = d_dmbtr_i.end-of-definition.define write_screen.call function 'SAP GUI_PROGRESS_INDICATOR' exportingtext = &1.end-of-definition.*Initialization*----------------------------------------------------------------- initialization.perform sub_initialization.*At Selection Screen*-----------------------------------------------------------------at selection-screen.perform func_check_authority.*Start of selection*----------------------------------------------------------------- start-of-selection.perform sub_get_data.*End Selection.*-----------------------------------------------------------------end-of-selection.if it_data[] is initial."写屏幕d_str = text-s04.write_screen d_str.else."写屏幕d_str = text-s03.write_screen d_str.perform sub_build_layout.perform sub_build_fields.perform sub_dis_data.endif.*&---------------------------------------------------------------------* *& Form sub_get_data*&---------------------------------------------------------------------* * text*----------------------------------------------------------------------* * --> p1 text* <-- p2 text*----------------------------------------------------------------------* form sub_get_data .*---取数"写屏幕d_str = text-s01.write_screen d_str."取当前期间的第一天和第二天concatenate p_mjahr p_rpmax '01' into p_budat_low_f. call function 'RP_LAST_DAY_OF_MONTHS'exportingday_in = p_budat_low_fimportinglast_day_of_month = p_budat_high_fexceptionsday_in_no_date = 1others = 2."取得选择标准下的所有公司代码、评估范围、工厂select a~bwkey a~bukrs b~werksinto table it_werksfrom t001k as ajoin t001w as b on a~bwkey = b~bwkeywhere a~bukrs in s_bukrsand b~werks in s_werks.if not it_werks[] is initial.loop at it_werks.clear: r_bukrs, r_bwkey, r_werks, it_bukrs."所有公司代码it_bukrs-bukrs = it_werks-bukrs.collect it_bukrs.r_bukrs-sign = 'I'.r_bukrs-option = 'EQ'.r_bukrs-low = it_werks-bukrs.append r_bukrs.r_bwkey-sign = 'I'.r_bwkey-option = 'EQ'.r_bwkey-low = it_werks-bwkey.append r_bwkey.r_werks-sign = 'I'.r_werks-option = 'EQ'.r_werks-low = it_werks-werks.append r_werks.clear it_werks.endloop.else.clear: r_bukrs, r_bwkey, r_werks.r_bukrs-sign = 'I'.r_bukrs-option = 'EQ'.r_bukrs-low = 'XXXX'.append r_bukrs.r_bwkey-sign = 'I'.r_bwkey-option = 'EQ'.r_bwkey-low = 'XXXX'.append r_bwkey.r_werks-sign = 'I'.r_werks-option = 'EQ'.r_werks-low = 'XXXX'.append r_werks.endif.sort: r_bukrs by low,r_bwkey by low,r_werks by low.delete adjacent duplicates from: r_bukrs,r_bwkey,r_werks."取得所有公司代码下的工厂select a~bwkey a~bukrs b~werksinto table it_werks_bfrom t001k as ajoin t001w as b on a~bwkey = b~bwkeywhere a~bukrs in s_bukrs."取得物料号码、物料类型、物料组、物料描述select a~matnr a~mtart a~matkl b~maktxinto table it_matnrfrom mara as ajoin makt as b on a~matnr = b~matnrjoin mbew as c on a~matnr = c~matnrwhere a~matnr in s_matnrand a~mtart in s_mtartand a~matkl in s_matkland a~lvorm = '' " 为空表示未被删除物料。

SAP库存账龄分析报表（转）功能概述1.1. 业务背景本程序是对物料按⼯⼚、库存地点、物料号、销售订单号进⾏查询当前的库存及库龄的报表。

1.2. 功能描述本程序能够查询出每个物料的数量、⾦额数据及库龄的明细数据。

1.2. 使⽤范围所有有库存的事业部都需要查看库存及库龄情况。

1.3. 权限设定所有有查看库存权限的⼈员都需要有这个权限。

需要增加权限对象：M_MSEG_LGO、M_MSEG_WMB、M_MSEG_WWA。

1.4. 处理类型前台⼿动执⾏。

1.5. 数据量及使⽤频率本程序为库存相关，⽤户需要查询时可以进⾏查询。

功能详述2.1. 程序标题及其属性程序标题：“库存异常表（库龄报表）”2.2. 屏幕设计2.2.1. 屏幕流2.2.2. 输⼊屏幕结果如下：显⽰出结果后，可以⽤Excel导出。

报表各字段取值逻辑本程序分为两种情况，⼀种是普通库存，⼀种是对应销售订单的库存，需要把两种情况分别处理，然后加在⼀起显⽰，普通库存取数逻辑如下：描述参考字段⼯⼚ MARD-WERKS⼯⼚描述 T001W-NAME1库存地点 MARD-LGORT库存地点描述 T001L-LGOBE物料号 MARD-MATNR物料描述 MAKT-MAKTL库存类型普通库存销售订单号 MSKA-VBELN 销售订单⾏项⽬MSKA-POSNR当前库存数量 MARD-LABST（MSKA-KALAB）当前库存⾦额当前库存数量 * (MBEW-SALK3 / MBEW-LBKUM)，最终结果保留⼩数点后两位库存1-30天数量 1、以每个⼯⼚、库存地点、物料号为条件取 MSEG-MENGE MKPF-BUDAT from ( MSEG inner join MKPF by MSEG-MBLNR = MKPF-MBLNR and MSEG-MJAHR = MKPF-MJAHR) where MSEG-WERKS = MARD-WERKS and MSEG-LGORT = MARD-LGORT and MSEG-MATNR = MARD-MATNR and MSEG-SHKZG = ‘S’ and MSEG-SOBKZ NE ‘E’ ，取物料凭证数据时排除移动类型321和322。