唉……有遇到难题了
如下：
本公司有50个部门，打印工资的时候需要打印50份，给每个部门分配一个表（为了方便表的名称全用数字代替）
可是打印工资的时候需要把部门的名称打印出来 ，而不是数字名称。现有一个各部门名称的表，如何将页标头关联此表，例:打印第一个表的时候，页标头（不是标题）自动变更为部门名称。

还有一个问题：我设定打印纸的页边距后，每页除页标头外，纸允许打印24条记录，
              可是，如果最后一页正好能打印24条记录是，总结就打印不出来了

搜了半天也没找着答案，还请各位大侠拔刀啊

谢谢hu9jj

这样应该可以解决问题
但是每次都需要从第一个单位逐一核查，太麻烦了
有没有简单一点的方法呢
 
还有您说的那个自定义函数，应该如何自定义呢，
这个东西不太会用，能不能指点一下需要从什么地方入手
谢谢

parameters bh &&bh=部门编号
clear
set talk off
set safe off
sele 1
use xtzk &&各单位名称库
inde on bh to bh
sele 2
wbh=1
DO WHILE wbh<51  &&运行后出现嵌套错误
IF wbh<10
  II=STR(wbh,1)
ELSE
  II=STR(wbh,2)
ENDIF
use gzz&wbh
set rela to bh into name
name=a->name
return name

上边的自定义函数 哪里有错误 还请明示

我制作的报表如下
其中域控件 的自定义函数如下
PARAMETERS x
SELECT 1
use xtzk.dbf && xtzk.dbf为部门名称表
LOCA for 'x'='bh' &&此处如果不带’‘的话，运行时老是出现函数参数的值，类型或数目无效
IF FOUND()
    RETURN name
ELSE
    RETURN ""
ENDIF
return

如果把此域控件去掉的话，打印程序可以顺利运行，只是打印出来的工资表没有部门！？
以下是打印程序，请看一下我调用自定义函数的方式是否正确（红色粗体）
parameters bh
clear
set talk off
set safe off
wbh=0
QYH=1
ZYH=99
SELE 1
USE XTZK   &&如果修改XTZK.DBF中 BH 的类型,程序将出错.
do while .t.
  clear
  @13,20 say '单位编号:' GET WBH PICT '99'
  READ
  
  IF WBH=99
    EXIT
  ENDIF

  SELE 1
  LOCATE FOR BH=WBH

  IF EOF()
    @18,20 SAY '该单位不存在!'
      ?CHR(7)+CHR(7)
    LOOP
  ENDIF

  IF WBH<10
    I=STR(WBH,1)
  ELSE
    I=STR(WBH,2)
  ENDIF
  WNAME=NAME
  @19,20 SAY '正在打印'+WNAME+'工资表'

  sele 2
*  ?my_func(wbh) &&自定义函数是这样调用吗？？ 如果我把前面的‘*‘去掉的话 打印程序运行就出现问题了
  USE GZZ&I
  report form 报表1.frx preview
  *to printer
enddo
name=LTRIM(TRIM(WNAME))
return name

*  ?my_func(wbh) &&自定义函数是这样调用吗？？ 如果我把前面的‘*‘去掉的话 打印程序运行就出现问题了
老兄 麻烦看一下8楼的打印程序   调用时自定义函数是这样操作吗（把*号去掉？）
我在设计的报表中的 修改后，运行报表显示无法找到wbh
我去掉打印程序中*  ?my_func(wbh) 前面的*号，又显示无法找到某个字段（该字段在部门名称表xtzk.dbf中缺省，只在各单位的工资表中存在），这是怎么回事，
我怀疑是在调用自定义函数的时候  迫使  报表选择了 数据环境 为各单位名称表   而不是各单位的工资表
请问我调用自定义函数的方法对吗，还有 我的打印程序哪里出错了呢

谢谢提醒
对vfp还不是很熟悉
慢慢改进

只要有这个域控件 就不能完美运行（而这个域控件有很重要）
哪位老兄有时间  
帮我调试调试
不胜感激！
为了避免头晕，只上传了2个工资单位库

[ 本帖最后由 qq156059757 于 2010-5-20 09:13 编辑 ]

程序运行良好，完全达到打印要求

非常感谢 qjbzjp 热心帮助与指导

现在主要问题已经解决了，还有些不足的地方我会慢慢改进
再次感谢！

你好  现在打印程序已经成功运行
但是打印出来的工资表有点问题，如下：

我原来的打印程序已通过调整细节以及页标头距离  调整为每页打印24条记录，可是现在每页能打印24条记录，
问题是：如果一个单位有48条记录，第25条记录应该打印在第二页上，可是现在  这第25条录失踪了！！
第一页没有，第二页从第26条记录开始打印的

还有，每个单位需要一个‘合计数’打印在‘总结’区，问题出现了：如果该单位记录不满24条，则可以打印出来
如果正好24条，这个‘合计数’有失踪了

这是怎么回事呢，还请明示