我有一个表，表里有很多单位的个人信息，每个人都由行政区划+单位编号+00001（2.3.4...）编好号的，现在各单位又新增加人员，要接着原来的个人编号最高后接着给新增加人员编号，用VF怎么写这个程序？请大家帮忙解决 ，谢谢！

这样的编号本来不应该合在一个字段中，平添麻烦。把同一个单位的所有人查询出来，排序，找出最后那个人的流水码加一就是了。

取出原最大的 人员编号,然后把这编号 保存 在另一数据表上 ,再写个取号过程（如：repl 号码 with 号码+1),如是网络版的，这个取号过程 还要考虑抢号 情况，可以用上锁机制，以保证编号唯一.

已取出最大个人编号和相对应的单位编号保存在一张表A中，新增加人员在表B中的。

单位编号    个人最高编号        姓名    性别    …    个人编号    单位编号
0001    542310000100099                张三                         0001
0002    542310000200079                李四                         0002
…    …                         ….    ….    ….      ….              ….
                           
表A                    表B        
用VF 编程实现根据表A自动给表B接着编号

请各位高手帮个忙，谢谢！

思路都给你了,你不是要我们帮你写程序吧
简单写个吧

我要的新编号=get_id()

Function get_id
    USE 号码 IN 0 &&内有字段 最大号码 int,初始时把你原最大号码放在此
    LOCAL max_id
    IF EOF('号码')
        INSERT INTO 号码 (最大号码) VALUES (0)
    ENDIF
    REPLACE 最大号码 WITH 最大号码+1 IN 号码
    max_id=号码.最大号码
    USE IN 号码
    RETURN max_id
Endfunc


[ 本帖最后由 kiff 于 2013-3-20 16:10 编辑 ]

repl .个人编号 with A.个人编号 +1 where .单位编号=个B.单位编号
执行不了，

我先搞明白你的意思才行.
你是说 b表有记录了,要根据A表的最大编号,再新重新给B的记录作连续编号,是这样吗,但看你的要求又不是这样呀.


[ 本帖最后由 kiff 于 2013-3-20 16:25 编辑 ]

我真的服了