练习报表程序.xlsVIP

半成品收发平衡表 银行存款余额表 XXXX年XX月末银行存款余额表 填报单位：XXXXXXX公司 银行1 (国内) 银行1 (检查支付) 银行 1 (出项国内电缆传输) 银行 1 (出项国外电缆传输) 银行 1 (审计贷方) 银行1 (其它内部过帐) 银行 1 (预期的汇票债务) 银行 1 (折扣的汇票债务) 银行1 - 已接收支票 银行 1 (客户收项支付) 银行1 (接收的担保) 序号(R1) 银行(R2) 月末余额（元）(R3) R3 = 总账表(FAGLFLEXT)中结转余额(HSLVT)+一月余额(HSL01)+…+十二月余额(HSL12) 查询条件: 月份 年度 公司代码 输出结果: 如上图所示表格 备注: 表:FAGLFLEXT 计算逻辑: 前两列(R1,R2)为固定值 物料编码 物料描述 物料组 物料组描述 本期进入 本期发出 期末结存 R1 R2 R3 R4 R5 R6 R7 R8 半成品收发平衡表 备注: R1: 表 mska, 销售订单库存 makt , 物料描述 mara , 常规物料数据 t023t , 物料组描述 mkpf . 抬头：物料凭证 R2: MARA-MATNR makt-maktx 物料编码 物料描述 物料组 物料组描述 期初结存 期初结存 期末结存 R3: R4: R5: R6: R7: R8: mara-matkl t023t-wgbez mard-labst mseg-erfmg 计算逻辑: R5 = 销售订单库存(MSKA)中所有非限制使用的估价的库存(KALAB)之和 特殊库存标记需要加上sobkz = E R6 = 查询凭证日期段内Mseg-ERFMG (101 – 201 )的值 R7 = 查询凭证日期段内Mseg-ERFMG (321 – 601)的值 R8 = R5 + R6 - R7 注意单位转换: form frm_unit_conversion using p_matnr like mara-matnr p_qty_in like mard-labst p_unit_in like mara-meins p_unit_out like mara-meins p_qty_out like mard-labst. clear p_qty_out. translate p_unit_in to upper case. translate p_unit_out to upper case. if p_unit_in = p_unit_out. p_qty_out = p_qty_in. return. endif. call function ZMATERIAL_UNIT_CONVERSION exporting i_matnr = p_matnr i_qty_in = p_qty_in i_unit_in = p_unit_in i_unit_out = p_unit_out importing e_qty_out = p_qty_out exceptions err = 1 others = 2. if sy-subrc ne 0. message e398(00) with 物料单位转换不允许: . endform. frm_unit_conversion 查询条件: mska-werks mseg-lgort mseg-matnr mkpf-budat 要求SMARTFORMS打印报表要求B4纸及可以输出成为EXCEL表格 mseg , 凭证段:物料 FS10N显示余额 mseg-bwart = 101. 1.00 2.00 3.00 4.00 5.00 6.00 7.00 8.00 9.00 10.00 11.00 对应表中RACCT字段