进销存管理系统课程设计报告Word文档下载推荐.docx
- 文档编号:21307793
- 上传时间:2023-01-29
- 格式:DOCX
- 页数:35
- 大小:810.88KB
进销存管理系统课程设计报告Word文档下载推荐.docx
《进销存管理系统课程设计报告Word文档下载推荐.docx》由会员分享,可在线阅读,更多相关《进销存管理系统课程设计报告Word文档下载推荐.docx(35页珍藏版)》请在冰豆网上搜索。
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->
P2.1.2
P2.1.5
信息量:
150份每年
实盘库存
有无复查:
有
差异数
3.5处理过程条目
处理过程条目
打印库存盘点清单
5-009
公布库存盘点信息,并说明库存情况
输入:
输出:
P2.1.5->
盘点明细表
处理:
查A1(库存明显表),打印库存信息表及盘点信息表,表现好的可以保持,表现不令人满意的可加以调整,并注明表现不好的地方,要求改进。
4.6外部实体条目
外部实体条目
员工
06-001
001
输出数据流:
个数:
约2000个
输入数据流:
P2.1,5→员工(工资表)
2.5程序运行流程图
3.系统设计
3.1模块结构设计
该系统的总体结构设计如下图所示:
人员信息档案管理系统包括基本信息管理,销售信息管理,库存信息管理,数据报表管理和系统管理等部分。
其中,基本信息管理中可以对商品,供应商,客户基本信息进行添加,修改,查询和删除等操作,如图:
库存管理中可以实现库存信息,入库单信息,出库单信息,盘点清单信息的录入,修改,查询等操作,如图:
数据报表管理可以实现盘点清单的预览及打印等操作,如图:
系统管理中主要是用户查询,添加用户,修改密码,数据备份及恢复等的操作,如图:
3.2数据库概念设计
3.3数据库逻辑设计
1商品信息表
字段名
数据类型
长度
是否允许空
说明
varchar
否
主键,惟一标识商品记录
50
是
产地
供应商名称
text
16
2供应商信息表
供应商编号
主键,惟一标识供应商记录
供应商单位全称
地址
邮政编码
联系电话
varcgar
20
企业网址
联系人
联系人电话
开户银行
银行账号
13
3客户信息表
客户编号
主键,惟一标识客户记录
客户名称
客户单位全称
6
30
4商品入库信息表
decimal
9
主键,惟一标识商品入库记录
外键,对应商品信息表中商品编号
外键,对应供应商信息表中供应商编号
日期
datetime
8
修改人
修改日期
5商品库存信息表
主键,惟一标识商品库存记录
库存名称
6商品出库信息表
出库序号
出库编号
出库日期
提货单位
提货人
7库存明细表
主键,惟一标识商品盘点记录
盘点人员
盘点日期
8用户信息表
用户编号
主键
用户密码
用户名称
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
密码错误!
LoginSucceeded=False
EndSub
PrivateSubCommand2_Click()
设置全局变量为false
不提示失败的登录
EndSub
PrivateSubForm_Load()
登录.Enabled=True
PrivateSubForm_Unload(CancelAsInteger)
3.5.2.1进入系统主界面后,对系统进行操作,各代码如下:
3.5.1在基本信息管理界面中,各按钮的代码如下(以“商品信息管理”为例):
DimiAsInteger'
定义整型变量
Dimrs1AsNewADODB.Recordset'
定义数据集对象
DimrsAsNewADODB.Recordset'
IfText1.Text="
Then
MsgBox"
商品编号不允许为空!
SELECT*FROM商品信息表"
Setrs1=SelectSQL(SQL,msg)
新增商品
rs1.AddNew
rs1.Fields("
商品编号"
)=Text1.Text
商品名称"
)=Text2.Text
单价"
)=Text3.Text
单位"
)=Combo1.Text
产地"
)=Text4.Text
供应商名称"
)=Combo2.Text
备注信息"
)=Text5.Text
rs1.Update
添加数据成功!
关闭数据集对象
rs1.Close
商品信息管理.Show
商品信息管理.Hide
系统.Show
PrivateSubCommand3_Click()
查询操作
CallLoadData'
装载数据
CallShowData'
显示数据
PrivateSubShowData()
在控件中显示数据
如果存在记录
为控件赋值
Setrs=SelectSQL(SQL,msg)
SetMe.DataGrid1.DataSource=rs
Ifrs.RecordCount<
>
DataGrid1.Refresh
PrivateSubLoadData()
查询商品信息
rs.Update
PrivateSubControlClear()
重置控件
Me.Text1.Text="
Me.Text2.Text="
Me.Text3.Text="
Me.Text4.Text="
Me.Text5.Text="
Me.Combo1.Text="
Me.Combo2.Text="
PrivateSubCommand4_Click()
删除操作
OnErrorGoToErrMsg'
错误处理
Ifrs.RecordCount>
msg=MsgBox("
删除该条记录吗?
vbYesNo)
Ifmsg=vbYesThen
rs.Delete'
删除数据
重新装载数据
清空控件
CallControlClear
设置控件Enable值为不可用
成功删除的数据!
没有可删除的数据!
ErrMsg:
报告出错信息
MsgBoxErr.Description,vbExclamation,"
出错"
Combo1.AddItem("
瓶"
公斤"
袋"
Combo2.AddItem("
吉良集团"
吉林米业"
宏基有限公司"
光华企业"
3.5.3.1在库存信息查询界面中,各按钮的代码如下:
DimcolNameAsString'
保存所选择的查询条件
DimcolValueAsString'
保存所要查询具体的值
DimstrWhereAsString
colName=Combo1.Text'
取出条件的值
colValue=Text1.Text'
取出所要查询的值
strWhere="
where"
colName&
like'
%"
colValue&
%'
select*from商品库存信息表"
strWhere
SetDataGrid1.DataSource=rs
Setrs=Nothing
退出操作
库存信息查询.Hide
库存序号"
C
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 进销存 管理 系统 课程设计 报告
![提示](https://static.bdocx.com/images/bang_tan.gif)