用友UFO解决合并报表

1、2008-1-281. 报表路径：先把路径列出，大家稍微看一下。合并报表主要有三个内容用于存放批处理合 并00 批命令01 母公司02 合并口03 管理主01 母公司02 合并口03 管理主用于存放最终合ZT003ZT013ZT023用于存放最终需合并报表编程过程说明：1. 由于第一次编合并报表， 所以很多东西不知道， 那么就查资料， 主要参考三个资料，一个是 UFO的二次开发帮助文件，第二个是孙勇写的 UFO报表高级应用培训讲义，第三个是用友报表的 PDF帮助2. 客户的要求：客户要求将12 张资产负债表（当然还有很多其他的表）做合并，这12张分别是不同的下属单位，由于在开始实施的时候，就考

2、虑到合并报表的事情，所以但是在建立帐套的时候， 要求所有单位的会计科目 （包括辅助核算），报表格式都必须一致，所以这 12 张表的格式都是一模一样的。开始动手了1. 现在第一步是建立一张合并报表模板，可以直接用现有的资产负债表模板，然后把公式清空，报表文件为“合并报表资产负债表.rep ”2. 报表归类：我们假设合并两张报表就可以了， zt003 和 zt013 ，路径如下：合并报表合并报表资产负债表 .rep合并报表资产负债表 .rep简单的合并方式：将 zt013 的资产负债表的对应的单元格与ZT003对应的单元格相加。批处理放在以下文件夹：合并报表批处理 2008我们先简单建立一个批处理

3、， 用以实现两个单元格的简单合并， 文件命名为“”批命令如下：合并报表合并报表资产负债表合并报表资产负债表 .rep" ->资产负债表 .rep" ->月.rep"->C7 RELA年, 月年起码知道以上的命令可以实现将C7单元格的数据加上“合并报表资产负债表 .rep ”C7 的数据。但是如果这样做的话， 每一个单元格就要一条语句， 而且如果有多张表的话，就更加复杂，而且如果到时候要修改的话，比如到了 2009 年的话，每一条都要改一下，甚至如果单元格发生变化，要改的话，那不是要疯掉！ ！所以在想能不能通过变量来实现，便于后续修改。经过翻查资料

4、，大概知道了变量的应用，然后就来实现吧。第一步，把报表路径变量化，可以直接设定一个变量 &rep，然后赋值，语句如下：合并报表资产负债表 .rep"那么单元格的赋值就可以这样来写：LET C7=C7+&rep->C7 RELA年 WITH &rep-> 年, 月 WITH &rep-> 月这样写可以减少修改报表路径的问题，至少改个路径变量值，其他就不用改了，相对来说比较方便一些，但是，问题是单元格也是比较麻烦，一条一来，有没有什么其他办法呢睡觉的时候突然想到能否用循环来处理，如果可以就好办多了，于是就开始实施，用while 循环，但是

5、问题是如何来表示列号和行号呢经过翻查资料，有一个意外的发现：1）变量使用关键字年、季、月、日为数值型， 单位名称 、单位编号 为字符型。表示报表名： &REP_NAME单->元格名表示表页号： &TAB表示行号： #&ROW表示列号： !&COL有了这个意外的发现之后，我就想，干脆把路径、列号、行号都用变量表示算了，看看情况如何，代码如下：ep"let &col0=3let &row0=7ep合并报表最终合并到以下表：合并报表 01 母公司资产负债表 .rep资产负债表.repZt003资 产 负Zt003资 产 负合并01 母公

6、司资产负如何实现呢如何来利用之前做的批命令呢难道需要把批命令重复写一遍吗突然想到，能否通过调用批命令文件，相当于编程里面的“ include ”，那问题就可以解决了， 也就是说，将一个合并的批命令写成一个批命令文件，然后来调用，只要有需要合并的时候， 就调用此批命令， 问题就可以解决了，减少重复工作，同时容易修改。在批处理里面是有一个调用批命令的命令，就是用”DO”命令。我们把之前做的“”重新另存为“” ，路径如下 :合并报表批命令 2008 "然后我们建立一个“”的批处理文件来调用。代码如下：主程序：定义变量、子程序 1：清空数子程序 2：合并子程序 3：数据ep"let &col01=3列取数1let &col0=&col01列取数2let &col0=&col02列取数1let &col0=&col01let &col0=&col02列取数ep"2let &col01=3列取数1let &col0=&col01列取数2let &col0=&col02/ 设置列起始值Glet &colmax=&colmax02/设置列循环最大值HDO &shlhb/-END-现在批命令也做出来了，我后来