生产企业内部物资管理信息系统设计报告.docx
- 文档编号:18474165
- 上传时间:2023-08-18
- 格式:DOCX
- 页数:20
- 大小:94.95KB
生产企业内部物资管理信息系统设计报告.docx
《生产企业内部物资管理信息系统设计报告.docx》由会员分享,可在线阅读,更多相关《生产企业内部物资管理信息系统设计报告.docx(20页珍藏版)》请在冰点文库上搜索。
生产企业内部物资管理信息系统设计报告
课程设计说明书
设计题目:
生产企业内部物资管理信息系统
专业:
物流工程
设计人:
学号
山东科技大学
2014年1月3日
课程设计任务书
学院:
机电学院专业:
物流工程班级:
11-2姓名:
刘菲
一、课程设计题目 生产企业物资管理信息系统设计
二、课程设计内容与要求:
(1)___________________________________________________________
(2)___________________________________________________________
(3)___________________________________________________________
________________________________________________________________
三、课程设计应解决主要问题:
(1)___________________________________________________________
(2)___________________________________________________________
(3)___________________________________________________________
________________________________________________________________
四、课程设计相关附件(如:
图纸、软件等)
(1)____________________________________________________________
(2)____________________________________________________________
________________________________________________________________
________________________________________________________________
五、任务发出日期:
____________课程设计完成日期:
__2014-1-3__
指导教师签字:
_______________系主任签字:
_____________
指导教师对课程设计的评语
指导教师签字:
_____年____月____日
1.课题简介………………………………………………………1
课题研究目的和意义………………………………………1
课题主要研究内容…………………………………………1
2.系统分析………………………………………………………1
业务流程图…………………………………………………1
用户需求分析………………………………………………1
系统功能设计………………………………………………1
3.系统设计………………………………………………………1
总体设计……………………………………………………1
详细设计……………………………………………………1
数据结构设计………………………………………………1
4.系统实施……………………………………………………1
各功能界面设计(每个功能作一小节)………………1
5.使用说明……………………………………………………1
6.参考资料……………………………………………………1
一、课题简介
项目背景
物资管理系统是企业管理的一个重要内容,随着时代的进步,企业也逐渐变的庞大起来。
如何管理好企业内部物质的信息,成为企业管理中的一个大问题。
在这种情况下,一个可以规范化,自动化的物资管理信息系统就显得非常必要。
最初的物资管理,都是靠人力来完成的。
当企业规模比较小的时候,人力可以完成,随着企业的规模越来越大,企业的进出物资数量也越来越多,依然维持着人力进行物资管理,必然会造成工作效率低,工作错误增高的问题。
物资管理系统就是把分散的企事业单位的职工信息实行统一,集中,规范的收集管理,建立分类编号管理,电脑存储查询以及防火,防潮,防蛀,防盗等现代化,专业化的管理系统,为企事业单位和职工解除后顾之忧。
、项目研究目的和意义
系统开发的总体任务是实现物资设备管理系统化、规范化和自动化,从而达到提高单位工作效率的目的。
信息已成为继劳动力、土地、资本之后的又一大资源。
谁控制的信息越多,谁利用信息资源的效率越高,谁就会在各方面的竞争中占有一席之地,谁就会有更多的优势。
物资供应部门是企业与生产单位之间的桥梁、纽带,是企业正常生产的物资保障部门。
正因为供应部门是关键的中转环节,建立一套物资管理信息系统对于如何有效的把本单位生产资料及时、保质保量的供应上去,有着重要的意义。
从微观上讲,建立一套物资管理信息系统能够加快物资的周转速度,提高生产效率,从而加强了管理的信息化手段,提高了本单位的经济效益。
从宏观上讲,顺应了社会的信息化、社会化潮流,缩短了整个社会化大生产的周期。
二、系统分析
、业务流程图
、用户需求分析
针对一般物资管理信息系统的需求,通过对上面物资调配工作过程的内容和数据流程分析,设计如下面所示的数据项和数据结构:
●有关物资基本信息的输入、包括物资编号、物资名称、规格型号、种类和计量单位等;
●物资基本信息的查询、修改;
●入库信息的输入、查询、修改;
●出库信息的输入、查询、修改;
●物质剩余物资的查询、预览。
●物资金额简单的统计查询
、系统功能设计
三、系统设计
、系统详细设计
各个实体具体的描述E-R图如下:
物资基本信息实体E-R图
物资入库信息实体E-R图
物资出库信息实体E-R图
物资余额信息实体E-R图
、数据结构设计
在上面的实体以及实体之间关系的基础上,形成数据库中的表格以及各个表格之间的关系。
仓库管理系统数据库中各个表格的设计结果如下面的几个表格所示。
每个表格表示在数据库中的一个表。
物资信息表:
管理表:
入库信息表:
出库信息表:
余额信息表:
四、系统实施
、各功能页面设计:
(1)、登陆界面设计及代码:
PrivateSubCmdLand_Click()
StaticmiCountAsInteger
DimsqlstrAsString
sqlstr="select*from管理表where用户名='"&Text1&"'"
=sqlstr
MsgBox"用户名错误,重新输入",vbExclamation,"警告"
=""
Else
首页.Show
UnloadMe
Else
MsgBox"密码错误,重新输入",vbExclamation,"警告"
=""
EndIf
EndIf
miCount=miCount+1
IfmiCount=3ThenUnloadMe
EndSub
PrivateSubcmdCancel_Click()
UnloadMe
EndSub
(2)、首页界面设计及代码:
PrivateSubclxsxxtj_Click()
销售额统计
EndSub
PrivateSubgccbtj_Click()
工程成本统计.Show
EndSub
PrivateSubPicture1_Click()
EndSub
PrivateSubsywzxxcx_Click()
剩余物资查询.Show
EndSub
PrivateSubtc_Click()
登录.Show
UnloadMe
EndSub
PrivateSubwzrkxxcxcx_Click()
入库信息查询.Show
EndSub
PrivateSubwzrkxxtj_Click()
入库物资添加.Show
EndSub
PrivateSubwzckxxcx_Click()
出库物资查询.Show
EndSub
PrivateSubwzckxxtjyxg_Click()
物资出库信息.Show
EndSub
PrivateSubwzrkxxcx_Click()
入库信息查询.Show
EndSub
PrivateSubwzrkxxtjyxg_Click()
物资入库信息.Show
EndSub
PrivateSubwzxxsc_Click()
物资信息删除.Show
EndSub
PrivateSubwzxxtj_Click()
物资信息添加.Show
EndSub
PrivateSubwzxxxg_Click()
物资信息修改.Show
EndSub
PrivateSubxsetj_Click()
销售额统计.Show
EndSub
(3)、物资信息添加设计及代码:
PrivateSubcmdedit_Click()
=True
=True
=False
=False
=True
EndSub
PrivateSubCmdAdd_Click()
=False
=False
=True
=True
EndSub
PrivateSubCmddel_Click()
X=MsgBox("确实要删除此条记录吗",vbYesNo+vbQuestion,"确认")
IfX=vbYesThen
EndIf
Else
EndSub
PrivateSubcmdok_click()
=True
=True
=False
=False
If=""Then
MsgBox"请输入材料编码",vbExclamation,"警告"
=""
=True
Else
MsgBox"添加成功"
EndIf
EndSub
PrivateSubcmdesc_click()
=True
=True
=False
=False
EndSub
PrivateSub返回_Click()
首页.Show
UnloadMe
EndSub
(4)物资信息修改设计及代码:
PrivateSubcmdedit_Click()
MsgBox"请选择要修改的行"
ExitSub
EndIf
物资信息修改窗口.Show
物资信息修改.Hide
EndSub
PrivateSubcomback_Click()
首页.Show
UnloadMe
EndSub
PrivateSubcmdupdate_Click()
物资信息修改.
MsgBox"修改成功"
EndSub
PrivateSubcomback_Click()
Unload物资信息修改窗口
物资信息修改.Show
EndSub
PrivateSubForm_Load()
EndSub
(5)物资信息删除:
PrivateSubCommand1_Click()
首页.Show
UnloadMe
EndSub
PrivateSubForm_Load()
=True
EndSub
PrivateSubcmdedit_Click()
MsgBox"请选择要删除的行"
ExitSub
EndIf
EndSub
PrivateSubCmddel_Click()
X=MsgBox("确实要删除当前记录吗",vbYesNo+vbQuestion,"确认")
IfX=vbYesThen
EndIf
EndIf
EndSub
(6)、入库物资信息添加和修改及代码:
PrivateSubCommand1_Click()
=True
EndSub
PrivateSubCommand3_Click()
EndSub
PrivateSubCommand4_Click()
首页.Show
EndSub
PrivateSubCommand2_Click()
X=MsgBox("添加成功",vbOKOnly+vbInformation+0,"添加成功")
Print"x=";X;
EndSub
PrivateSubcmdupdate_Click()
MsgBox"请选择要修改的行"
EndIf
MsgBox"修改成功"
EndSub
(7)、出库信息添加修改及代码;
PrivateSubCommand1_Click()
=True
EndSub
PrivateSubCommand3_Click()
EndSub
PrivateSubCommand4_Click()
首页.Show
UnloadMe
EndSub
PrivateSubCommand2_Click()
X=MsgBox("添加成功",vbOKOnly+vbInformation+0,"添加成功")
Print"x=";X;
EndSub
PrivateSubcmdupdate_Click()
MsgBox"请选择要修改的行"
EndIf
MsgBox"修改成功"
EndSub
PrivateSubcomback_Click()
首页.Show
EndSub
PrivateSubSSTab1_DblClick()
EndSub
(8)、入库信息查询及代码:
PrivateSubCmd1_Click()
DimstrAsString
str="select*from入库信息表where入库信息表."&&"like'"&&"%'"
=str
EndSub
PrivateSubCmd2_Click()
首页.Show
UnloadMe
EndSub
PrivateSubForm_Load()
"材料名称"
"材料编码"
"入库单号码"
"发票号码"
"数量"
"经办人"
="保管人"
=""
EndSub
(9)、出库信息查询及代码:
PrivateSubCmd1_Click()
DimstrAsString
str="select*from出库信息表where出库信息表."&&"like'"&&"%'"
=str
EndSub
PrivateSubCmd2_Click()
首页.Show
UnloadMe
EndSub
PrivateSubForm_Load()
"物资名称"
"材料编码"
"出库单号码"
"发票号码"
"数量"
"经办人"
="保管人"
=""
EndSub
(10)、剩余物资设计及代码:
PrivateSubCmd1_Click()
DimstrAsString
str="select*from余额信息表where余额信息表."&&"like'"&&"%'"
=str
EndSub
PrivateSubCmd2_Click()
首页.Show
UnloadMe
EndSub
PrivateSubForm_Load()
"金额"
"材料编码"
"数量"
"单价"
="材料名称"
=""
EndSub
(11)、销售额统计及代码:
PrivateSubCmd1_Click()
DimstrAsString
str="select金额from出库信息表where出库日期>='"&&"'and出库日期<='"&&"'"
=str
EndSub
PrivateSubCmd2_Click()
首页.Show
UnloadMe
EndSub
PrivateSubForm_Load()
"2013-1-1"
"2013-1-2"
"2013-1-3"
"2013-1-4"
"2013-1-5"
"2013-1-6"
"2013-1-7"
"2013-2-1"
"2013-2-2"
"2013-1-1"
"2013-1-2"
"2013-1-3"
"2013-1-4"
"2013-1-5"
"2013-1-6"
"2013-1-7"
"2013-2-1"
"2013-2-2"
=""
EndSub
PrivateSubText1_Change()
"selectsum(金额)from出库信息表where出库日期>='"&&"'and出库日期<='"&&"'"
=(0)
EndSub
(12)、工程成本设计及代码:
PrivateSubForm_Load()
"10101"
"10102"
=""
EndSub
PrivateSubCmd1_Click()
DimstrAsString
str="select金额from出库信息表where工程号='"&&"'"
=str
EndSub
PrivateSubCmd2_Click()
首页.Show
UnloadMe
EndSub
五、使用说明
物资管理信息系统建立后,应装入大量物资记录,进入试运行及调试阶段。
装入物资数据
往数据库中装入数据又称为数据库加载。
由于数据库中通常包含着一个组织内多个部门的数据,这些数据的格式、规格都可能不同,所以在加载之前要对这些数据作严格地检验、整理,并建立严格的数据登录和校验规范,设计出完善的数据检验和校正程序,尽可能在加载之前把不合格的数据排除掉。
然后,通过系统提供的工具程序或自编的专门装入程序将数据装入数据库。
试运行及调试
这个阶段的工作主要是实际运行物资管理应用程序,进入物资管理系统登录界面,输入正确的用户名和口令,单击确定进入主菜单。
在前一阶段,虽然也作了性能预测,但是仅仅做了性能估计,且在估计过程中,做了许多简化和假设,忽略了许多次要因素,因而估计是粗糙的,并可能失真。
在试运行阶段,必须进行实际测量和评价,测试数据尽可能覆盖现实世界的各种情况。
如果实际测试结果不符合设计目标,则需返回物理设计阶段,修改参数。
有时也许还需要返回初始阶段。
首先,测试用户登录功能能否实现:
打开仓库管理系统,在“用户名”里填入数据库“用户表”中的任一用户名,“密码”框里我们填入与用户名相对的密码作为用户登录密码。
填写完成点击“确定”按钮,将会出现操作程序页面,即该用户已经登陆成功了。
当我们输入错误密码时,提示“密码错误”,三次密码错误会自动退出系统。
至此,用户登录成功实现。
其次,测试编辑功能能否实现:
在登录成功之后,用户进入相应的管理页面,可以对相应的信息进行新增、修改和删除操作,最后把编辑好的信息送入数据库。
至此,编辑功能成功实现。
再次,测试查询功能能否实现:
查询功能:
在登录成功之后,用户进入相应的管理页面,点击“查询”时,进入相应的查询界面,在里面输入想要查找的资料,点击“查询”按钮,成功即可出现结果页面,页面内显示查询出来的信息,表示测试成功。
再次,测试用户登出系统能否实现:
在管理操作已全部完成,需要退出程序的时候,在主菜单页面“系统”的下拉菜单的有一个“退出”的选项,点击之后便可退出。
最后,测试密码更改能否实现:
在用户成功登录的情况下,在主菜单“系统”的下拉菜单中选择“密码修改”,进入到“用户密码修改”界面,用户可以对自己的密码进行相应的修改。
经过以上各项的测试,证明本系统完全可以正常运行,至此测试成功!
本项目主要完成了物资管理信息系统各个模块功能的实现,可以添加、删除、查询物资的信息,主要采用了VisualBasic+SQL,但是由于设计时间较短,所以该系统还有许多不尽如人意的地方,比如联机文档比较少,用户界面不够美观,出错处理不够,系统维护功能不全,对于数据的一致性的问题也没有完全解决等多方面问题,这些都有待工作中进一步改善。
六、参考文献
【1】《基于VB和SQL的数据库编程技术》刘志妩、张焕君等编着
【2】《VisualBasic管理信息系统项目开发实践》梁伟、苏瑞主编
【3】《VisualBasic数据库系统开发实例导航》第二版
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 生产 企业内部 物资 管理信息系统 设计 报告