仓库管理系统的设计.docx
《仓库管理系统的设计.docx》由会员分享，可在线阅读，更多相关《仓库管理系统的设计.docx（45页珍藏版）》请在冰点文库上搜索。
仓库管理系统的设计
仓库管理系统的设计
仓库管理系统的设计
一、需求分析
1.1系统需求分析
仓库管理系统主要用于仓库货品信息的管理，系统包括仓库管理、入库、出库和一些统计查询等几部分组成。
仓库管理系统实现对货品信息的管理和总体的统计等，仓库信息，供货单位和操作员信息的查看及维护。
仓库管理人员可以浏览、查询、添加、删除等产品的基本信息。
⑴产品入库管理，可以填写入库单，确认产品入库；
⑵产品出库管理，可以填写出库单，确认产品出库；
⑶借出管理，凭借条借出，然后能够还库；
⑷初始库存设置，设置库存的初始值，库存的上下警戒限；
⑸可以进行盘库，反映每月、年的库存情况；
⑹可以查询产品入库情况、出库情况、当前库存情况，可以按出库单、入库单，产品、时间进行查询；
1.2系统功能基本要求和功能描述
1.2.1基本信息管理
基本信息包括客户信息、仓库信息和操作员信息。
客户可以分为供应商和购货商两种类型。
在产品入库时，需要提供供应商的信息；在产品出库和退货时，需要提供购货商的信息。
基本信息管理模块可以实现以下功能：
⑴添加、修改、删除和查看客户信息；
⑵添加、修改、删除和查看仓库信息；
⑶添加、修改、删除和查看操作员信息。
1.2.2产品信息管理
产品信息管理模块可以实现以下功能：
⑴添加产品信息；⑵修改产品信息；⑶删除产品信息；⑷查询产品信息；
1.2.3仓库管理操作
进行入库和出库操作。
入库操作需要记录相关的产品信息、仓库信息、客户信息、入库时间等信息；出库操作需要记录相关的产品信息、仓库信息、客户信息、出库时间等信息。
1.2.4仓库警示管理
仓库警示管理模块可以实现仓库产品数量报警和仓库容量报警。
1.2.5查询管理功能
查询管理模块可以对仓库产品进行各种类型的查询，从而能够全面的了解仓库情况。
1.3系统功能模型
根据以上所介绍的功能，可以设计出系统的总体功能模块，如图1-1所示。
1.4数据分析
1.4.1数据流图
通过进行系统调查,了解用户需求、分析应用软件系统的功能需求。
总结出了系统逻辑模型,即系统业务流程图、数据流图。
如图1-2和图1-3所示。
图1-2系统业务流程图
图1-3仓库管理系统数据流图
1.4.2数据字典
二、数据库概念结构设计
经考察和分析,本案例客房管理系统包括以下实体：
客户实体、客房实体、操作员实体、结算账单实体,它们的E-R图如以下所示。
三、数据库逻辑结构设计
根据E-R图，数据库仓库管理系统包含以下8个表：
客户信息表“客户”、仓库信息表“仓库”、操作员信息表“操作员”、产品类别表“产品类别”、产品信息表“产品”、入库操作信息表“入库”、出库操作信息表“出库”和库存产品信息表“库存”。
1.客户信息表“客户”
客户信息表“客户”主要是用来保存客户信息，表“客户”结构如图表2-1所示。
表2-1客户信息表“客户”
编号
字段名称
数据结构
说明
1
客户号
Int
客户编号
2
客户名
varchar（50）
客户名称
3
客户类型
tinyint
客户类型，供应商、购货商
4
联系地址
varchar（50）
客户的联系地址
5
邮政编号
varchar（10）
邮政编码
6
联系电话
varchar（30）
联系电话
7
备注
varchar（100）
备注信息
2.仓库信息表“仓库”
仓库信息表“仓库”用来保存仓库信息，表“仓库”的结构如表2-2所示。
表2-2仓库信息表“仓库”
编号
字段名称
数据结构
说明
1
仓库号
int
仓库编号
2
仓库名
varchar（50）
仓库名称
3
仓库备注
varchar（100）
仓库说明
3.操作员表“操作员”
操作员表“操作员”用来保存用户信息，表“操作员”的结构如表2-3表示。
表2-3操作员信息表“操作员”
编号
字段名称
数据结构
说明
1
操作员号
Int
操作员的编号
2
操作员名
varchar（40）
用户名
3
密码
varchar（40）
密码
4.产品信息表“产品”
产品信息表“产品”用来保存产品的基本信息，表“产品”的结构如表2-5表示。
表2-5产品信息表“产品”
编号
字段名称
数据结构
说明
1
产品号
int
产品编号
2
产品名
varchar（50）
产品名称
3
产品数量
int
产品的数量
4
产品单价
Varchar（20）
产品的每单位价格
5
客户号
int
供应商编号
5.入库操作信息表“入库表”
入库操作信息表“入库表”用来保存入库操作的基本信息，表“入库表”的结构如表2-6表示。
表2-6入库操作信息表“入库表”
编号
字段名称
数据结构
说明
1
产品号
int
入库产品编号
2
入库单价
Varchar（20）
入库产品单价
3
入库数量
int
入库产品数量
4
客户号
int
客户编号
5
仓库号
int
仓库编号
6
入库时间
char（10）
入库日期
6.出库操作信息表“出库表”
出库操作信息表“出库表”用来保存出库操作的基本信息。
表“出库表”的结构如表2-7表示。
表2-7出库操作信息表“出库表”
编号
字段名称
数据结构
说明
1
产品号
int
出库产品编号
2
出库单价
Varchar（20）
出库产品单价
3
出库数量
int
出库产品数量
4
客户号
int
客户编号
5
仓库号
int
仓库编号
6
出库时间
char（20）
出库日期
7.库存产品信息表“库存表”
库存产品信息表“库存表”用来保存库存产品的基本信息，表“库存表”的结构如表2-8表示。
表2-8库存产品信息表“库存”e
编号
字段名称
数据结构
说明
1
产品号
int
产品编号
2
入库价格
Varchar（20）
产品入库单价
3
现存数量
Int
产品数量
4
仓库号
Int
仓库编号
四、数据库物理结构设计
在进行了数据表的逻辑结构定义后,需要为每个数据表创建其物理结构,即在数据库系统中定义数据表具体存放的格式、位置等。
这里列出利用SQLServer2000自带的数据库创建的数据表的物理结构。
1.“客户”表的物理结构
“客户”表的物理结构如图4-1所示,关键字为”客户号”。
图4-1“客户”表
2.“产品”表的物理结构
“产品”表的物理结构如图4-2所示,关键字为”产品号”。
图4-2“产品”表
3.“仓库”表的物理结构
“仓库”表的物理结构如图4-3所示,关键字为”仓库号”。
图4-3“仓库”表
4.“库存表”的物理结构
“库存表”的物理结构如图4-4所示。
图4-4“库存表”
5.“入库表”的物理结构
“入库表”的物理结构如图4-5所示。
图4-5“入库表”
6.“出库表”的物理结构
“出库表”的物理结构如图4-6所示。
图4-6“出库表”
7.“操作员”表的物理结构
“操作员”表的物理结构如图4-7所示。
图4-7“操作员”表
8.“产品视图”的物理结构
“产品视图”的物理结构如图4-8所示。
图4-8“产品视图”
五、数据库的实施
根据以上所进行的调查、设计和进行方案,建立并实施数据库。
此系统运用
SQLServer2000进行数据库的开发。
1.数据库建表语句
⑴名称:
客户表“客户”
标识：
客户
建表语句如下：
createtable客户（
客户号intnotnull,
客户名varchar（50）null,
客户类型tinyintnull,
联系地址varchar（50）null,
邮政编号varchar（10）null,
联系电话varchar（30）null,
备注varchar（100）null,
constraintPK_客户primarykey（客户号）
）
go
（2）名称:
产品表“产品”
标识：
产品号
建表语句如下:
createtable产品（
产品号intnotnull,
产品名varchar（50）null,
产品数量intnull,
产品单价varchar（20）null,
客户号intnull,
constraintPK_产品primarykey（产品号）
）
go
（3）名称：
仓库表“仓库”
标识：
仓库号
建表语句如下：
createtable仓库（
仓库号intnotnull,
仓库名varchar（50）null,
仓库备注varchar（100）null,
constraintPK_仓库primarykey（仓库号）
）
go
（4）名称：
“入库表”
建表语句如下：
createtable入库表（
产品号intnull,
入库单价varchar（20）null,
入库数量intnull,
客户号intnull,
仓库号intnull,
入库时间varchar（10）null
）
go
（5）名称：
“出库表”
建表语句如下：
createtable出库表（
产品号intnull,
出库单价varchar（20）null,
出库数量intnull,
客户号intnull,
仓库号intnull,
出库时间varchar（10）null
）
go
（6）名称：
“库存表”
建表语句如下：
createtable库存表（
产品号intnull,
入库价格varchar（20）null,
现存数量intnull,
仓库号intnull
）
go
（7）名称：
“操作员”表
建表语句如下：
createtable操作员（
操作员号intnotnull,
操作员名varchar（40）null,
密码varchar（40）null,
constraintPK_操作员primarykey（操作员号）
）
go
2.数据库建视图语句
（1）名称：
“产品视图'”
建视图语句如下：
CREATEVIEWdbo.产品视图
AS
SELECTdbo.产品.产品号,dbo.产品.产品名,dbo.产品.客户号,
dbo.库存表.仓库号,dbo.产品.产品数量,
dbo.产品.产品单价,dbo.库存表.入库价格,dbo.库存表.现存数量
FROMdbo.产品INNERJOIN
dbo.库存表ONdbo.产品.产品号=dbo.库存表.产品号
六、数据库的运行
根据以上所做的准备以及SQLServer2000建立好的表、试图及各种关系，运用VisualBasic6.0为前台开发工具，开发出客户管理系统，主要运用了ADODC控件和DataGrid控件。
1.系统登陆界
填入用户名和密码后点击【登录】按钮,系统将自动从数据库中判断是否存在相同的用户名和密码,如果有则进入系统,进入系统的主页面并出现欢迎使用系统的对话框,不成功则显示错误信息页面。
如果不存在则提示用户名和密码有错误信息。
系统登陆界面如图6-1所示
图6-1系统登陆界面
2.系统主界面
主界面包括系统的主要功能包括新建客户信息、客房信息查询、客户信息查询、结算信息账单，四个主要的功能。
用户可以根据需要点击自己想使用的功能进入功能界面。
系统主界面如图6-2所示。
图6-2系统主界面
3.管理界面
图6-3各信息管理界面
4.添加界面
用于添加新的信息，有添加客户信息、添加仓库信息、添加产品信息、添加操作员信息，各个添加界面如图4-4所示。
图4-4-a添加客户信息界面
图4-4-b添加仓库信息界面
图4-4-c添加产品信息界面
5.查询界面
用于查询各种信息，有客户信息查询、仓库信息查询、产品信息查询、操作员信息查询。
各个查询界面如图4-5所示。
图4-5-1仓库信息查询
图4-5-2产品信息查询
图4-5-3入库表信息查询
图4-5-4客户信息查询
6.删除界面
删除界面用于删除无用的、过时的信息。
包括删除客户信息、删除仓库信息、删除产品信息。
各界面如下列图4-6所示。
图4-6-1删除客户信息界面
图4-6-2删除仓库信息界面
图4-6-3删除产品信息界面
参考文献
[1]王珊,陈红.数据库系统原理教程[M].北京：
清华大学出版社,1998.7.
[2]王珊,萨师煊.数据库系统概论（第四版）[M].北京：
高等教育出版社,2006.5.
[3]虞益诚,孙莉.SQLServer2000数据库应用技术[M].北京：
中国铁道出版社,2004.11.
[4]刘钢.VisualBasic程序设计与应用案例[M].北京：
高等教育出版社,2003.9.
[5]AbrahamSilberschatz,HenryF.Korth,S.Sudarshan.DatabaseSystemConcepts（FourthEdition）.HigherEducationPress.
[6]罗运模.完全掌握SQLServer2000[J].北京：
人民邮电出版社，2001.
[7]白尚旺.PowerDesigner软件工程技术[M].北京：
电子工业出版社，2004.
附录Ⅰ仓库管理系统部分程序代码
1.登陆代码
PrivateSubCommand1_Click（）
DimcnAsNewADODB.Connection
cn.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=仓库管理系统;DataSource=WWW-4FDE9FFEC01"
cn.Open
Dimrs,rssAsNewADODB.Recordset
Setrs=cn.Execute（"select*from操作员where操作员名='"&Text1.Text&"'"）
Setrss=cn.Execute（"select*from操作员where密码='"&Text2.Text&"'"）
Ifrs.EOFThen
MsgBox"用户名错误!
"
Text1.Text=""
Text1.SetFocus
Else
Ifrss.EOFThen
MsgBox"密码错误!
"
Text2.Text=""
Text2.SetFocus
Else
Me.Hide
Form2.Show
MsgBox（Text1.Text+",欢迎您使用冰舞奇迹仓库管理系统"）
EndIf
EndIf
EndSub
2.添加客户信息代码
PrivateSubCommand1_Click（）
DimcnAsNewADODB.Connection
DimsqlAsString
cn.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=仓库管理系统;DataSource=WWW-4FDE9FFEC01"
cn.Open
Dima1,a2,a3,a4,a5,a6,a7AsString
a1=Text1.Text
a2=Text2.Text
a3=Text3.Text
a4=Text4.Text
a5=Text5.Text
a6=Text6.Text
a7=Combo1.Text
sql="insertinto客户values（'"&a1&"','"&a2&"','"&a7&"','"&a3&"','"&a4&"','"&a5&"','"&a6&"'）"
cn.Execute（sql）
cn.Close
MsgBox"已添加客户信息"
EndSub
3.根据客户号查看、删除客户代码
PrivateSubCommand1_Click（）
DimkehuhaoAsString
kehuhao=Text8.Text
Adodc1.Recordset.Find"客户号="&Val（kehuhao）
EndSub
PrivateSubCommand2_Click（）
DimcnAsNewADODB.Connection
DimsqlAsString
DimkehuhaoAsString
kehuhao=Text8.Text
cn.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=仓库管理系统;DataSource=WWW-4FDE9FFEC01"
cn.Open
sql="deletefrom客户where客户号='"&kehuhao&"'"
cn.Execute（sql）
MsgBox"已删除编号为"&kehuhao&"的客户信息"
EndSub
4.查看客户信息代码
PrivateSubCommand1_Click（）
DimcnAsNewADODB.Connection
DimrsAsNewADODB.Recordset
DimsqlAsString
cn.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=仓库管理系统;DataSource=WWW-4FDE9FFEC01"
cn.Open
IfCombo1.Text="供应商"Then
rs.Open"select*from客户where客户类型='供应商'",cn,adOpenKeyset,adLockBatchOptimistic,adCmdText
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
Else
IfCombo1.Text="购货商"Then
rs.Open"select*from客户where客户类型='购货商'",cn,adOpenKeyset,adLockBatchOptimistic,adCmdText
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
Else
rs.Open"select*from客户",cn,adOpenKeyset,adLockBatchOptimistic,adCmdText
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
EndIf
EndIf
EndSub
PrivateSubCommand2_Click（）
DimcnAsNewADODB.Connection
DimrsAsNewADODB.Recordset
DimsqlAsString
cn.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=仓库管理系统;DataSource=WWW-4FDE9FFEC01"
cn.Open
rs.Open"select*from客户where客户号='"&Text1.Text&"'",cn,adOpenKeyset,adLockBatchOptimistic,adCmdText
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
EndSub
PrivateSubCommand3_Click（）
DimcnAsNewADODB.Connection
DimrsAsNewADODB.Recordset
DimsqlAsString
cn.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=仓库管理系统;DataSource=WWW-4FDE9FFEC01"
cn.Open
rs.Open"select*from客户where客户名='"&Text2.Text&"'",cn,adOpenKeyset,adLockBatchOptimistic,adCmdText
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
EndSub
5.查询仓库信息
DimsqlAsString
cn.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=仓库管理系统;DataSource=WWW-4FDE9FFEC01"
cn.Open
rs.Open"select*from仓库where仓库号='"&Text1.Text&"'",cn,adOpenKeyset,adLockBatchOptimistic,adCmdText
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
EndSub
Privat
升级会员 