以下是引用qq156059757在2010-5-19 09:20:27的发言:
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
1、clear通常不能用在子程序中,仅用有主程序开始。否则会将有用的变量全部清除。
2、set talk off和set safe off通常也只要用在主程序开始,除非确有必要,在程序的其他部位很少使用。
3、通常不要自己指定工作区,除非你对所有工作区打开的表都全盘规划(这样做太累,也无必要),否则很容易关闭其他程序中已经打开的表。习惯用法是use XXX in 0,然后用表别名来选择所需要的表。