进销存管理系统课程设计报告.docx
- 文档编号:8171508
- 上传时间:2023-01-29
- 格式:DOCX
- 页数:35
- 大小:810.88KB
进销存管理系统课程设计报告.docx
《进销存管理系统课程设计报告.docx》由会员分享,可在线阅读,更多相关《进销存管理系统课程设计报告.docx(35页珍藏版)》请在冰豆网上搜索。
进销存管理系统课程设计报告
2007级课程设计报告
课题名称:
进销存管理系统(盘点管理管理子系统)
专业:
班级:
学号:
姓名:
指导教师:
年月
1.系统概述…………………………………………………………1
2.系统分析………………………………………………………2-6
2.1需求分析………………………………………………
2.2业务流程图………………………………………………
2.3数据流程图………………………………………………
2.4数据词典………………………………………………
3.系统设计………………………………………………6----32
3.1模块结构设计………………………………………………
3.2数据库概念设计………………………………………………
3.3数据库逻辑设计………………………………………………
3.4输出设计………………………………………………
3.5输入设计………………………………………………
3.6代码设计………………………………………………
4.结语………………………………………………33
1.系统概述
现代科技技术突飞猛进,在不同的领域要求各异,以前对库存盘点的统计都是手写登记,纸制查看,这样很容易发生错误,导致企事业失去他们所需要的信息,而且会产生错误信息误导决策,现在为了方便决策者了解到更加确切的信息和资料,所以开发这样的系统方便决策者查询信息及网上浏览,使各方面的信息都能够正确及时。
系统的功能是将该企业的所有库存盘点信息进行电子统计,根据不同的需求建立各种的报表,便于企事业在网上查询库存的各方面的信息情况,方便决策者了解市场,也能够方便管理者对库存盘点的信息进行不同的统计。
库存盘点管理管理子系统主要实现的是库存盘点信息的录入,修改,查询以及盘点信息的打印等功能,为此,若要实现各方面的需求,系统的数据必须具有高度的完整性和准确性,这就要求系统的高度安全性,可维护性,可靠性及灵活性。
比如库存管理系统的管理,管理员在录入商品的库存情况的时候或是数据库出现异常而产生差错,可能会影响决策者从网上查询这些商品的库存情况,这就要求系统具有高度的安全性,可维护性和可靠性;灵活性指的是系统要具有强大的功能以适应不同层次的客户不同的需求。
另外,系统的操作界面要求简便,通俗,以便于操作。
用户对系统的信用,如果因为一次的错误就会导致一连串的信息错误,所以保证信息的可靠性十分必须的,这样才能使系统得到用户的信赖和支持。
这样的系统需要保证可靠性,避免给决策者提供虚假的信息,更确保各部门通过浏览该系统,进行相应的需求操作。
因此,随着技术发展,企业采用库存盘点信息化已成为趋势及必然。
2.系统分析
2.1需求分析
2.1.1需求分析
本系统通过简单的数据库的操作,实现企事业单位的库存信息的管理。
库存盘点管理管理子系统是一个小型的信息管理系统,数据库采用SQLServer2005。
使用户和项目人员明确系统的功能、应用范围。
本系统具有以下功能:
1:
实现库存盘点管理的信息化管理。
2:
实现库存盘点管理的基础要求,如信息添加,查看及删除。
操作方便简单,且数据稳定性强。
3:
方便的库存信息查询功能,支持多条件查询。
4:
数据计算自动完成,尽量减少人工干预。
5:
强大的报表打印功能。
2.1.2开发及运行环境
1.硬件环境:
CPU:
CⅡ1.7G以上,内存在256M以上。
2.软件环境:
WindowsXP操作系统,MicrosoftSQLServers数据库系统。
软件编程使用MicrosoftVisualBasic6.0中文版。
1
2.1.3程序流程
本库存盘点管理管理子系统使用如下的流程进行登陆以及其他的操作:
开始界面是始于登陆界面“登录(登录.frm)”,当用户键入用户名和密码的时候,系统自动到所对应的数据库“用户信息表”中进行用户验证。
如果输入正确则进入系统主界面,就可以进入到主操作菜单窗体“系统(系统.frm)”中进行操作。
在主操作菜单窗体“系统(系统.frm)”中,用户可以对数据库中的商品信息、供应商信息及客户信息等基本信息进行包括:
添加,查询,修改等操作,并能够进行入库管理,出库管理及库存盘点。
此外,可在“清单报表管理窗口”中进行相应的报表打印。
主界面入下图所示:
2.2业务流程图
库存盘点流程如下:
2.3数据流程图
2.4数据字典
4.1.数据元素条目
数据元素条目
总编号:
1-100
编号:
100
名称:
库存单编号
编码说明:
别名:
kcdb
****
**
说明:
库存单编码
商品编号
数据值类型:
离散
库存编号
类型:
数字
库存序号
长度:
10
有关数据:
库存卡
4.2数据结构条目
数据结构条目
名称:
商品入库卡
总编号:
2-03
说明:
商品入库时填写的卡片
编号:
006
结构:
有关的数据流,数据存储
入库序号
新商品入库表
入库编号
商品库存表
商品编号
商品名称
规格
数量:
计量单位
每年约2000份
数量
单价
总金额
入库日期
经手人
备注信息
4.3.数据流条目
数据流条目
名称:
库存信息表
总编号:
3-02
简要说明:
库存信息的汇总
编号:
005
数据流来源:
账面库存
数据流去向:
P2.1,P2,2
包含的数据结构:
流通量:
1000份每年
销售的商品
商品库存记录
4.4数据存储条目
数据存储条目
名称:
库存盘点明细表
总编号:
4-05
说明:
库存信息汇总
编号:
A1
结构:
有关的数据流
盘点编号
P2.1->A1
A1->P2.1.2
商品名称
A1->P2.1.5
账面库存
信息量:
150份每年
实盘库存
有无复查:
有
差异数
3.5处理过程条目
处理过程条目
名称:
打印库存盘点清单
总编号:
5-009
说明:
公布库存盘点信息,并说明库存情况
编号:
P2.1.5
输入:
A1->P2.1.5
输出:
P2.1.5->盘点明细表
处理:
查A1(库存明显表),打印库存信息表及盘点信息表,表现好的可以保持,表现不令人满意的可加以调整,并注明表现不好的地方,要求改进。
4.6外部实体条目
外部实体条目
名称:
员工
总编号:
06-001
说明:
编号:
001
输出数据流:
个数:
约2000个
输入数据流:
P2.1,5→员工(工资表)
2.5程序运行流程图
3.系统设计
3.1模块结构设计
该系统的总体结构设计如下图所示:
人员信息档案管理系统包括基本信息管理,销售信息管理,库存信息管理,数据报表管理和系统管理等部分。
其中,基本信息管理中可以对商品,供应商,客户基本信息进行添加,修改,查询和删除等操作,如图:
库存管理中可以实现库存信息,入库单信息,出库单信息,盘点清单信息的录入,修改,查询等操作,如图:
数据报表管理可以实现盘点清单的预览及打印等操作,如图:
系统管理中主要是用户查询,添加用户,修改密码,数据备份及恢复等的操作,如图:
3.2数据库概念设计
3.3数据库逻辑设计
1商品信息表
字段名
数据类型
长度
是否允许空
说明
商品编号
varchar
10
否
主键,惟一标识商品记录
商品名称
varchar
50
是
单价
varchar
50
是
计量单位
varchar
10
是
产地
varchar
50
是
供应商名称
varchar
50
是
备注信息
text
16
是
2供应商信息表
字段名
数据类型
长度
是否允许空
说明
供应商编号
varchar
10
否
主键,惟一标识供应商记录
供应商名称
varchar
50
是
供应商单位全称
地址
varchar
50
是
邮政编码
varchar
10
是
联系电话
varcgar
20
是
企业网址
varchar
50
是
联系人
varchar
50
是
联系人电话
varcgar
20
是
开户银行
varchar
50
是
银行账号
varchar
13
是
备注信息
text
16
是
3客户信息表
字段名
数据类型
长度
是否允许空
说明
客户编号
varchar
10
否
主键,惟一标识客户记录
客户名称
varchar
50
是
客户单位全称
地址
varchar
50
是
邮政编码
varchar
6
是
联系电话
varchar
20
是
企业网址
varcgar
30
是
联系人
varchar
50
是
联系人电话
varcgar
20
是
开户银行
varchar
50
是
银行账号
varchar
20
是
备注信息
text
16
是
4商品入库信息表
字段名
数据类型
长度
是否允许空
说明
入库序号
decimal
9
否
主键,惟一标识商品入库记录
商品编号
varchar
10
否
外键,对应商品信息表中商品编号
商品名称
varchar
50
是
供应商编号
varchar
10
否
外键,对应供应商信息表中供应商编号
供应商名称
varchar
50
是
规格
varchar
30
是
计量单位
varchar
10
是
数量
varchar
10
是
单价
varchar
50
是
总金额
varchar
50
是
日期
datetime
8
是
经手人
varchar
20
是
备注信息
text
16
是
修改人
varchar
20
是
修改日期
datetime
8
是
5商品库存信息表
字段名
数据类型
长度
是否允许空
说明
库存序号
decimal
9
否
主键,惟一标识商品库存记录
库存编号
varchar
30
是
库存名称
varchar
50
是
商品编号
varchar
10
否
外键,对应商品信息表中商品编号
规格
varchar
30
是
计量单位
varchar
10
是
数量
varchar
10
是
单价
varchar
50
是
总金额
varchar
50
是
日期
datetime
8
是
备注信息
text
16
是
6商品出库信息表
字段名
数据类型
长度
是否允许空
说明
出库序号
decimal
9
否
主键,惟一标识商品入库记录
出库编号
varchar
10
是
商品编号
varchar
10
否
外键,对应商品信息表中商品编号
商品名称
varchar
50
是
规格
varchar
30
是
计量单位
varchar
10
是
数量
varchar
10
是
单价
varchar
50
是
总金额
varchar
50
是
出库日期
datetime
8
是
提货单位
varchar
50
是
提货人
varchar
50
是
经手人
varchar
20
是
备注信息
text
16
是
修改人
varchar
20
是
修改日期
datetime
8
是
7库存明细表
字段名
数据类型
长度
是否允许空
说明
盘点编号
varchar
10
否
主键,惟一标识商品盘点记录
商品编号
varchar
10
否
外键,对应商品信息表中商品编号
商品名称
varchar
50
是
规格
varchar
30
是
计量单位
varchar
10
是
单价
varchar
50
是
账面库存
varchar
50
是
实盘库存
varchar
50
是
差异数
varchar
50
是
盘点人员
varchar
50
是
盘点日期
datetime
8
是
备注信息
text
16
是
8用户信息表
字段名
数据类型
长度
是否允许空
说明
用户编号
varchar
10
否
主键
用户密码
varchar
10
否
用户名称
varchar
50
是
备注信息
text
16
是
3.4输出设计和输入设计
3.4.1登录界面:
3.4.2主界面:
3.4.3商品信息管理的输出界面如图所示:
3.4.4入库单录入修改的输出界面如图所示:
3.4.5入库单信息查询的输出界面如图所示:
3.4.6盘点清单录入修改的输出界面如图所示:
:
3.4.7数据库备份与恢复:
3.4.8盘点清单打印界面:
3.5代码设计
3.5.1登录
OptionExplicit
DimSQLAsString
DimmsgAsString
DimLoginSucceededAsBoolean
Dim用户名称AsString
PrivateSubCommand1_Click()
DimrstAsADODB.Recordset
DimpasswordAsString
'判断用户是否存在
用户名称=Trim(Text1.Text)'取出用户的ID
SQL="select*from用户信息表where用户名称='"&用户名称&"'"
Setrst=SelectSQL(SQL,msg)
Ifrst.RecordCount>0Then
password=Trim(rst.Fields
(1))'取出该用户的密码
rst.Close
Else
MsgBox("数据库操作错误!
")
ExitSub
EndIf
'判断密码是否正确
Ifpassword=Trim(Text2.Text)Then
LoginSucceeded=True
系统.Show
UnloadMe
Else
MsgBox("密码错误!
")
LoginSucceeded=False
EndIf
EndSub
PrivateSubCommand2_Click()
'设置全局变量为false
'不提示失败的登录
LoginSucceeded=False
UnloadMe
EndSub
PrivateSubForm_Load()
登录.Enabled=True
EndSub
PrivateSubForm_Unload(CancelAsInteger)
LoginSucceeded=False
UnloadMe
EndSub
3.5.2.1进入系统主界面后,对系统进行操作,各代码如下:
3.5.1在基本信息管理界面中,各按钮的代码如下(以“商品信息管理”为例):
OptionExplicit
DimiAsInteger'定义整型变量
Dimrs1AsNewADODB.Recordset'定义数据集对象
DimrsAsNewADODB.Recordset'定义数据集对象
DimSQLAsString
DimmsgAsString
PrivateSubCommand1_Click()
IfText1.Text=""Then
MsgBox"商品编号不允许为空!
"
EndIf
SQL="SELECT*FROM商品信息表"
Setrs1=SelectSQL(SQL,msg)
'新增商品
rs1.AddNew
rs1.Fields("商品编号")=Text1.Text
rs1.Fields("商品名称")=Text2.Text
rs1.Fields("单价")=Text3.Text
rs1.Fields("单位")=Combo1.Text
rs1.Fields("产地")=Text4.Text
rs1.Fields("供应商名称")=Combo2.Text
rs1.Fields("备注信息")=Text5.Text
rs1.Update
MsgBox"添加数据成功!
"
'关闭数据集对象
rs1.Close
UnloadMe
商品信息管理.Show
EndSub
PrivateSubCommand2_Click()
商品信息管理.Hide
系统.Show
EndSub
PrivateSubCommand3_Click()
'查询操作
CallLoadData'装载数据
CallShowData'显示数据
EndSub
PrivateSubShowData()
'在控件中显示数据
'如果存在记录
'为控件赋值
SQL="SELECT*FROM商品信息表"
Setrs=SelectSQL(SQL,msg)
SetMe.DataGrid1.DataSource=rs
Ifrs.RecordCount<>0Then
DataGrid1.Refresh
EndIf
EndSub
PrivateSubLoadData()
'查询商品信息
SQL="SELECT*FROM商品信息表"
Setrs=SelectSQL(SQL,msg)
SetMe.DataGrid1.DataSource=rs
DataGrid1.Refresh
rs.Update
EndSub
PrivateSubControlClear()
'重置控件
Me.Text1.Text=""
Me.Text2.Text=""
Me.Text3.Text=""
Me.Text4.Text=""
Me.Text5.Text=""
Me.Combo1.Text=""
Me.Combo2.Text=""
EndSub
PrivateSubCommand4_Click()
'删除操作
OnErrorGoToErrMsg'错误处理
Ifrs.RecordCount>0Then
msg=MsgBox("删除该条记录吗?
",vbYesNo)
Ifmsg=vbYesThen
rs.Delete'删除数据
CallLoadData'重新装载数据
'清空控件
CallControlClear
'设置控件Enable值为不可用
MsgBox("成功删除的数据!
")
EndIf
Else
MsgBox("没有可删除的数据!
")
EndIf
ExitSub
ErrMsg:
'报告出错信息
MsgBoxErr.Description,vbExclamation,"出错"
EndSub
PrivateSubForm_Load()
Combo1.AddItem("瓶")
Combo1.AddItem("公斤")
Combo1.AddItem("袋")
Combo2.AddItem("吉良集团")
Combo2.AddItem("吉林米业")
Combo2.AddItem("宏基有限公司")
Combo2.AddItem("光华企业")
EndSub
3.5.3.1在库存信息查询界面中,各按钮的代码如下:
PrivateSubCommand1_Click()
'查询操作
DimcolNameAsString'保存所选择的查询条件
DimcolValueAsString'保存所要查询具体的值
DimstrWhereAsString
colName=Combo1.Text'取出条件的值
colValue=Text1.Text'取出所要查询的值
strWhere="where"&colName&"like'%"&colValue&"%'"
SQL="select*from商品库存信息表"&strWhere
Setrs=SelectSQL(SQL,msg)
Ifrs.RecordCount<>0Then
SetDataGrid1.DataSource=rs
Else
Setrs=Nothing
EndIf
EndSub
PrivateSubCommand2_Click()
'退出操作
库存信息查询.Hide
系统.Show
EndSub
PrivateSubForm_Load()
Combo1.AddItem("库存序号")
C
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 进销存 管理 系统 课程设计 报告