| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 4137 人关注过本帖
标题:Vfp中怎么实现不同类别的流水编号?
只看楼主 加入收藏
kongyifei
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2019-11-21
结帖率:42.86%
收藏
已结贴  问题点数:20 回复次数:19 
Vfp中怎么实现不同类别的流水编号?
怎么实现:

比如:
kskmdm xm
303 张三
303 李四
303 王五
304 齐六
304 赵七
......
自动变成:
xh kskmdm xm
001 303 张三
002 303 李四
003 303 王五
001 304 齐六
002 304 赵七
......
搜索更多相关主题的帖子: 不同 Vfp 编号 类别 流水 
2019-11-21 14:23
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:3 
排序编码
2019-11-21 14:43
kongyifei
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2019-11-21
收藏
得分:0 
回复 2楼 吹水佬
大佬 能不能简单写一个程序我学习下
2019-11-21 14:55
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:0 
以下是引用kongyifei在2019-11-21 14:55:10的发言:

大佬 能不能简单写一个程序我学习下

代码简单,自己动动手。
按kskmdm排队后扫描表一次
xh从1起后一记录+1,如果kskmdm变动xh=1
2019-11-21 15:09
kongyifei
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2019-11-21
收藏
得分:0 
回复 4楼 吹水佬
大佬啊 vfp小白一个 请给个全的代码应急
2019-11-21 15:10
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:3 
CREATE CURSOR tt (xh c(3),kskmdm c(3), xm c(10))
INSERT INTO tt VALUES ("","304","张1")
INSERT INTO tt VALUES ("","303","张2")
INSERT INTO tt VALUES ("","303","张3")
INSERT INTO tt VALUES ("","304","张4")
INSERT INTO tt VALUES ("","303","张5")
INSERT INTO tt VALUES ("","303","张6")
INSERT INTO tt VALUES ("","305","张7")
INSERT INTO tt VALUES ("","306","张8")
INDEX on kskmdm TAG px
nXh = 1
cDm = ""
SCAN
    IF kskmdm == cDm
        nXh = nXh + 1
    ELSE
        nXh = 1        
    ENDIF
    cDm = Kskmdm
    REPLACE xh WITH PADL(nXh, 3, "0")
ENDSCAN
BROWSE

坚守VFP最后的阵地
2019-11-21 18:44
kongyifei
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2019-11-21
收藏
得分:0 
回复 6楼 sdta
大佬 我明白你的意思 但是我的考生编号这栏目 303  304啥的 有一百多项 不能一个个写命令吧 有没有其他的方式?
2019-11-21 21:51
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
解决问题的就下面几行代码
INDEX on kskmdm TAG px
nXh = 1
cDm = ""
SCAN
    IF kskmdm == cDm
        nXh = nXh + 1
    ELSE
        nXh = 1        
    ENDIF
    cDm = Kskmdm
    REPLACE xh WITH PADL(nXh, 3, "0")
ENDSCAN

坚守VFP最后的阵地
2019-11-21 22:39
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
以下是引用kongyifei在2019-11-21 21:51:48的发言:

大佬 我明白你的意思 但是我的考生编号这栏目 303  304啥的 有一百多项 不能一个个写命令吧 有没有其他的方式?

如果楼主嫌麻烦,可以请别人帮忙处理数据,那是要有代价的。

坚守VFP最后的阵地
2019-11-21 22:40
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
估计楼主连如何运行代码都不会

坚守VFP最后的阵地
2019-11-21 22:42
快速回复:Vfp中怎么实现不同类别的流水编号?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016455 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved