26号汽车配件管理系统的设计与开发.doc
《26号汽车配件管理系统的设计与开发.doc》由会员分享，可在线阅读，更多相关《26号汽车配件管理系统的设计与开发.doc（19页珍藏版）》请在冰豆网上搜索。
VisualFoxpro
课程设计实习报告
题目：
汽车配件管理系统的设计与开发
班级：
171081
姓名：
康健
学号：
20081004239
指导教师：
宋麦玲
2009年7月
目录
一、系统开发背景-----------------------------------------------------------（3）
二、课程设计要求-----------------------------------------------------------（3）三、业务流程---------------------------------------------------------------（4）
四、分析与设计--------------------------------------------------------------（4）
1、系统分析------------------------------------------------------------（4）
2、系统设计------------------------------------------------------------（4）
3、项目管理------------------------------------------------------------（7）
4、结构设计------------------------------------------------------------（8）
5、程序设计------------------------------------------------------------（8）
五、系统实施---------------------------------------------------------------（16）
六、系统测试---------------------------------------------------------------（16）
七、结束语------------------------------------------------------------------（16）
附录--------------------------------------------------------------------------（18）
汽车配件管理系统的设计与开发
（20081004239康健）
一、系统开发背景
目前汽车配件销售企业大多数在其连锁店的管理还是手工进行，随着汽车配件行业的迅速发展，手工管理的种种弊端暴露无疑，给销售企业的发展带来了不必要的麻烦。
为了规范企业内部管理，提高企业业务管理水平，更好的为客户服务，应采用计算机来管理汽车配件的进销存业务。
汽车配件管理系统的目的是为企业提供一个计算机化的管理平台，实践企业内部科学有效的管理，促进企业管理信息化，规范化，将能使管理人员从繁琐的杂务工作中解脱出来，真正从事管理工作。
本系统实在vf理论学习的基础上，在老师的帮助下，针对具体项目进行了详细的设计，在设计与实现过程中，结合源代码具体的描述出整个项目的开发过程。
二、课程设计要求：
要求：
1、本系统包括数据录入，数据修改，数据添加，数据查询，数据备份和报表生成。
2、数据库信息包括配件名称，配件代码，配件型号，配件价格，配件库存量，配件所属车型，出厂日期等。
3、查询应可以提供多种查询方式。
4、汇总报表等。
三、业务流程
打开程序可直接进行相关操作和查询，具体业务流程如下：
汽车配件管理系统
数据查询
数据录入
数据添加
数据修改
报表生成
关闭
配件名称，配件代码，配件型号，配件价格，配件库存量，配件所属车型，出厂日期
四、分析与设计
1、系统分析
该系统可以达到以下几个目的：
汽车配件代码，配件型号，配件价格，配件库存量，配件所属车型，出厂日期等信息的查询；上述信息的添加与删除等。
在软件开发分析阶段，信息收集是决定软件项目可行性的重要环节。
程序设计者要通过对开发项目信息的收集，确定系统目标，软件开发的总体思路。
2、系统设计
数据库文件设计
（1）、用程序文件建立数据库文件“汽车配件管理系统.dbf”，程序如下；
Createtable汽车配件管理系统.dbf配件代码char
（2）；配件名称char（10）；配件型号char
（2）；配件价格char（5）；库存量char（3）；所属车型char（10）；出厂日期出厂日期char（8）；
（2）、用程序文件建立数据库文件“xs.dbf”，程序如下；
Createtablecar.dbf配件代码char
（2）；配件名称char（10）；配件型号char
（2）；配件价格char（5）；库存量char（3）；所属车型char（10）；出厂日期char（8）；
字段名称
字段类型
字段宽度
小数位数
是否索引
配件代码
字符型
2
0
普通索引
配件名称
字符型
10
0
无
配件型号
字符型
2
0
无
配件价格
数值型
5
0
无
库存量
字符型
3
0
无
所属车型
字符型
10
0
无
出厂日期
日期型
8
0
无
（3）、建立“登录main.SCT”
3、项目管理
建立“car.PJT”
4、结构设计
各控件属性及其程序
登陆菜单结构如图：
因其直接可以进入主程序，故没有click程序；
关闭按钮的click程序如下：
thisform.release
5、程序设计
在程序设计里需要完成配件名称，配件代码，配件型号，配件价格，配件库存量，配件所属车型，出厂日期等的查询，数据的添加和修改，退出程序的程序设计。
VF不但拥有大量的交互式数据管理工具，而且还拥有一套功能完善的程序语言系统，下面是每个环节的程序原代码。
本系统的程序语法简单易懂，没有错误，可以完成基本的程序要求。
全部查看汽车配件信息的程序如下：
docase
casemandgroup1.value=1
thisform.label2.caption="请输入配件代码：
"
casemandgroup1.value=2
thisform.label2.caption="请输入配件名称：
"
casemandgroup1.value=3
thisform.label2.caption="请输入所属车型：
"
casemandgroup1.value=4
thisform.label2.caption="请输入出厂日期：
"
casemandgroup1.value=5
thisform.label2.caption="请输入库存量：
"
endcase
thisform.text1.value=""
thisform.text1.setfocus
thisform.refresh
（2）数据录入、数据修改、数据添加系统
其结构如下图所示
其代码如下：
doformadd.scx
docase
casemandgroup1.value=1
setfilterto配件代码=alltrim（thisform.text1.value）
casemandgroup1.value=2
setfilterto配件名称=alltrim（thisform.text1.value）
casemandgroup1.value=3
setfilterto所属车型=alltrim（thisform.text1.value）
casemandgroup1.value=4
tj=""
ifnotempty（thisform.text1.value）
tj="出厂日期=ctod（thisform.text1.value）"
endif
setfilterto&tj
casemandgroup1.value=5
nj=""
ifnotempty（thisform.text1.value）
nj="库存量=val（thisform.text1.value）"
endif
setfilterto&nj
endcase
thisform.refresh
（3）数据查询系统
其结构图如下
其代码程序如下：
docase
casemandgroup1.value=1
thisform.label2.caption="请输入配件代码：
"
casemandgroup1.value=2
thisform.label2.caption="请输入配件名称：
"
casemandgroup1.value=3
thisform.label2.caption="请输入所属车型：
"
casemandgroup1.value=4
thisform.label2.caption="请输入出厂日期：
"
casemandgroup1.value=5
thisform.label2.caption="请输入库存量：
"
endcase
thisform.text1.value=""
thisform.text1.setfocus
thisform.refresh
docase
casemandgroup1.value=1
setfilterto配件代码=alltrim（thisform.text1.value）
casemandgroup1.value=2
setfilterto配件名称=alltrim（thisform.text1.value）
casemandgroup1.value=3
setfilterto所属车型=alltrim（thisform.text1.value）
casemandgroup1.value=4
tj=""
ifnotempty（thisform.text1.value）
tj="出厂日期=ctod（thisform.text1.value）"
endif
setfilterto&tj
casemandgroup1.value=5
nj=""
ifnotempty（thisform.text1.value）
nj="库存量=val（thisform.text1.value）"
endif
setfilterto&nj
endcase
thisform.refresh
（4）报表制作与
其结构图如下：
其代码如下：
re
升级会员 