| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3718 人关注过本帖
标题:查找零件存货
只看楼主 加入收藏
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
不明白什么意思

坚守VFP最后的阵地
2018-10-13 22:01
zpeter1991
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2018-10-12
收藏
得分:0 
因存货会不断变动,增加和减少,所以形号,入庫号和材质都有变化的。
2018-10-13 22:12
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:5 
到底要想表达什么意思

坚守VFP最后的阵地
2018-10-13 22:13
zpeter1991
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2018-10-12
收藏
得分:0 
CREATE CURSOR 存货(入庫号 C(3),形号 C(3),材质 C(2),颜色 C(2))   就可以进入整个存货表,是吗?
2018-10-13 22:20
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
这是创建临时表,不能保存在硬盘上。

坚守VFP最后的阵地
2018-10-13 22:25
zpeter1991
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2018-10-12
收藏
得分:0 
在正式的存货表,应该怎样做呢?
2018-10-13 22:30
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
建立一个自由表
建议楼主先看一下VFP关于建立自由表方面的内容。

坚守VFP最后的阵地
2018-10-13 22:36
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3147
专家分:8408
注 册:2015-3-25
收藏
得分:15 
以下是引用zpeter1991在2018-10-13 21:39:39的发言:

版主们好,我测试过了,是这个效果。但工作上我随时需要复查材质和颜色,或形号和颜色,所以希望可以键入如135和BK,就可以单独显示出所有135,BK的存货,又如键入CO和BU,就可以单独显示出所有CO,BU的存货。麻烦你们了!


*!* 建立测试数据
CREATE CURSOR 存货(入庫号 C(3),形号 C(3),材质 C(2),颜色 C(2))

INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('100','136','CO','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('101','136','TU','RE')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('102','138','CO','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('103','138','MU','RE')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('104','221','CO','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('105','221','MU','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('106','135','CO','BU')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('107','135','CO','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('108','222','TU','RE')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('109','222','TU','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('110','222','MU','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('111','223','TU','RE')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('112','221','MU','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('113','221','CO','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('114','136','TU','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('115','136','CO','BU')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('116','138','MU','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('117','135','TU','RE')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('118','223','CO','BU')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('119','223','CO','BK')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('120','222','MU','RE')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('121','330','TU','RE')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('122','330','MU','RE')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('123','331','TU','YE')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('124','335','FE','BU')
INSERT INTO 存货(入庫号,形号,材质,颜色) VALUES ('125','335','TU','BU')
*!* 动态查询
Local lc形号,lc材质,lc颜色,lcWhere
lc形号 = ALLTRIM(Thisform.text1.value)
lc材质 = ALLTRIM(Thisform.text2.value)
lc颜色 = ALLTRIM(Thisform.text3.value)
lcWhere = ""
If !Empty(lc形号) &&如果形号条件不空,有输入数据
   lcWhere = "ALLTRIM(形号)==lc形号"
EndIf
If !Empty(lc材质) &&如果材质条件不空,有输入数据
   lcWhere = Iif(Empty(lcWhere),"ALLTRIM(材质)==lc材质",lcWhere + " and ALLTRIM(材质)==lc材质")
EndIf
If !Empty(lc颜色) &&如果颜色条件不空,有输入数据
   lcWhere = Iif(Empty(lcWhere),"ALLTRIM(颜色)==lc颜色",lcWhere + " and ALLTRIM(颜色)==lc颜色")
EndIf
If !Empty(lcWhere) &&如果查询条件不空,形号,材质,颜色,任何一个有数据
   lcWhere = " where "+ lcWhere
EndIf
Text To lcSql TEXTMERGE NOSHOW PRETEXT 4
 select 入庫号,形号,材质,颜色 from 存货 <<lcWhere>> ;
 order by 形号,材质,颜色
EndText

*!* 观察一下动态语句是什么样子的
?lcSql

*!* 执行动态查询
EXECSCRIPT(lcSql)
2018-10-14 21:32
zpeter1991
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2018-10-12
收藏
得分:0 
这几天试用了,较容易配对了,可能操作未熟练,仍需要多作些。非常感谢各位版主热情帮忙!有问题再向各位老师请教。向各位版主老师致敬!
2018-10-16 10:21
gs2536785678
Rank: 10Rank: 10Rank: 10
等 级:贵宾
威 望:45
帖 子:610
专家分:1784
注 册:2017-7-16
收藏
得分:0 
看了有点头昏。
2018-10-16 12:51
快速回复:查找零件存货
数据加载中...
 
   



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

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