生产企业内部物资管理信息系统课程设计模板.doc
《生产企业内部物资管理信息系统课程设计模板.doc》由会员分享,可在线阅读,更多相关《生产企业内部物资管理信息系统课程设计模板.doc(39页珍藏版)》请在咨信网上搜索。
1、课程设计说明书设计题目:生产企业内部物资管理信息系统专 业:物流工程设 计 人:学 号山东科技大学 1 月 3日课程设计任务书学院:机电学院 专业:物流工程 班级:11-2 姓名:刘菲一、课程设计题目生产企业物资管理信息系统设计二、课程设计内容和要求:(1)_(2)_(3)_三、课程设计应处理关键问题:(1)_(2)_(3)_四、课程设计相关附件(如:图纸、软件等)(1)_(2)_五、任务发出日期:_ 课程设计完成日期:_-1-3_指导老师签字:_ 系主任签字:_指导老师对课程设计评语 指导老师签字: _年_月_日目录 1课题介绍11.1 课题研究目标和意义11.2 课题关键研究内容12系统分
2、析12.1 业务步骤图12.2 用户需求分析12.3 系统功效设计13系统设计13.1 总体设计13.2 具体设计13.3 数据结构设计14系统实施14.1 各功效界面设计(每个功效作一小节)15使用说明16参考资料1一、 课题介绍1.1项目背景物资管理系统是企业管理一个关键内容,伴随时代进步,企业也逐步变庞大起来。怎样管理好企业内部物质信息,成为企业管理中一个大问题。在这种情况下,一个能够规范化,自动化物资管理信息系统就显得很必需。最初物资管理,全部是靠人力来完成。当企业规模比较小时候,人力能够完成,伴随企业规模越来越大,企业进出物资数量也越来越多,仍然维持着人力进行物资管理,肯定会造成工作
3、效率低,工作错误增高问题。物资管理系统就是把分散企机关职员信息实施统一,集中,规范搜集管理,建立分类编号管理,电脑存放查询和防火,防潮,防蛀,防盗等现代化,专业化管理系统,为企机关和职员解除后顾之忧。1.2、项目研究目标和意义 系统开发总体任务是实现物资设备管理系统化、规范化和自动化,从而达成提升单位工作效率目标。信息已成为继劳动力、土地、资本以后又一大资源。谁控制信息越多,谁利用信息资源效率越高,谁就会在各方面竞争中占有一席之地,谁就会有更多优势。物资供给部门是企业和生产单位之间桥梁、纽带,是企业正常生产物资保障部门。正因为供给部门是关键中转步骤,建立一套物资管理信息系统对于怎样有效把本单位
4、生产资料立即、保质保量供给上去,有着关键意义。从微观上讲,建立一套物资管理信息系统能够加紧物资周转速度,提升生产效率,从而加强了管理信息化手段,提升了本单位经济效益。从宏观上讲,顺应了社会信息化、社会化时尚,缩短了整个社会化大生产周期。二、 系统分析 2.1、业务步骤图出库物资信息管理入库物资信息管理物资余额信息管理物资调配物资基础信息管理基础信息录入物资登记 2.2、用户需求分析针对通常物资管理信息系统需求,经过对上面物资调配工作过程内容和数据步骤分析,设计以下面所表示数据项和数据结构:l 相关物资基础信息输入、包含物资编号、物资名称、规格型号、种类和计量单位等;l 物资基础信息查询、修改;
5、l 入库信息输入、查询、修改;l 出库信息输入、查询、修改;l 物质剩下物资查询、预览。l 物资金额简单统计查询2.3、系统功效设计系统管理物资基础信息管理物资出库信息管理物资入库信息管理物资余额信息管理用户管理密码管理物资基础信息添加物资基础信息查询物资基础信息修改入库物资信息添加入库物资信息修改入库物资信息查询出库物资信息添加出库物资信息修改出库物资信息查询物资余额信息查询物资余额信息浏览物资管理信息系统三、 系统设计3.1、系统具体设计各个实体具体描述E-R图以下:物资基础信息实体计量单位物资编号物资名称物资规格物资基础信息实体E-R图物资入库信息实体保管人物资基础信息经办人入库时间物资
6、入库信息实体E-R图物资出库信息实体保管人物资基础信息经办人出库时间物资出库信息实体E-R图物资剩下信息实体仓库物资基础信息数量金额物资余额信息实体E-R图3.2、数据结构设计在上面实体和实体之间关系基础上,形成数据库中表格和各个表格之间关系。仓库管理系统数据库中各个表格设计结果以下面多个表格所表示。每个表格表示在数据库中一个表。物资信息表:管理表:入库信息表:出库信息表:余额信息表:四、 系统实施4.1、各功效页面设计:(1)、登陆界面设计及代码:Private Sub CmdLand_Click()Static miCount As IntegerDim sqlstr As Strings
7、qlstr = select*from 管理表 where 用户名= & Text1 & Adodc1.RecordSource = sqlstrAdodc1.RefreshIf Adodc1.Recordset.BOF Then 若没有找到符合where条件统计MsgBox 用户名错误,重新输入, vbExclamation, 警告Text1.Text = Text1.SetFocusElseIf Adodc1.Recordset.Fields(密码) = Text2 Then首页.ShowUnload MeElseMsgBox 密码错误,重新输入, vbExclamation, 警告Tex
8、t2.Text = Text2.SetFocusEnd IfEnd IfmiCount = miCount + 1If miCount = 3 Then Unload MeEnd SubPrivate Sub cmdCancel_Click()Unload MeEnd Sub(2)、首页界面设计及代码:Private Sub clxsxxtj_Click()销售额统计End SubPrivate Sub gccbtj_Click()工程成本统计.ShowEnd SubPrivate Sub Picture1_Click()End SubPrivate Sub sywzxxcx_Click()剩
9、下物资查询.ShowEnd SubPrivate Sub tc_Click()登录.ShowUnload MeEnd SubPrivate Sub wzrkxxcxcx_Click()入库信息查询.ShowEnd SubPrivate Sub wzrkxxtj_Click()入库物资添加.ShowEnd SubPrivate Sub wzckxxcx_Click()出库物资查询.ShowEnd SubPrivate Sub wzckxxtjyxg_Click()物资出库信息.ShowEnd SubPrivate Sub wzrkxxcx_Click()入库信息查询.ShowEnd SubPri
10、vate Sub wzrkxxtjyxg_Click()物资入库信息.ShowEnd SubPrivate Sub wzxxsc_Click()物资信息删除.ShowEnd SubPrivate Sub wzxxtj_Click()物资信息添加.ShowEnd SubPrivate Sub wzxxxg_Click()物资信息修改.ShowEnd SubPrivate Sub xsetj_Click()销售额统计.ShowEnd Sub(3)、物资信息添加设计及代码 :Private Sub cmdedit_Click()CmdAdd.Enabled = TrueCmdDel.Enabled
11、= TrueCmdOk.Enabled = FalseCmdEsc.Enabled = FalseCmdback.Enabled = TrueEnd SubPrivate Sub CmdAdd_Click()Adodc1.Recordset.AddNewCmdAdd.Enabled = FalseCmdDel.Enabled = FalseCmdOk.Enabled = TrueCmdEsc.Enabled = TrueEnd SubPrivate Sub Cmddel_Click()X = MsgBox(确实要删除此条统计吗?, vbYesNo + vbQuestion, 确定)If X =
12、 vbYes Then Adodc1.Recordset.Delete Adodc1.Recordset.MoveNext If Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLast End IfElse Adodc1.RefreshEnd SubPrivate Sub cmdok_click()Adodc1.Recordset.UpdateCmdAdd.Enabled = TrueCmdDel.Enabled = TrueCmdOk.Enabled = FalseCmdEsc.Enabled = FalseIf Text1.Text = Th
13、enMsgBox 请输入材料编码, vbExclamation, 警告Text1.Text = Text.SetFocusCmdOk.Enabled = TrueElseMsgBox 添加成功End IfEnd SubPrivate Sub cmdesc_click()Adodc1.RefreshCmdAdd.Enabled = TrueCmdDel.Enabled = TrueCmdOk.Enabled = FalseCmdEsc.Enabled = FalseEnd SubPrivate Sub 返回_Click()首页.ShowUnload MeEnd Sub(4)物资信息修改设计及代码
14、:Private Sub cmdedit_Click()If Adodc1.Recordset.EOF = True Or Adodc1.Recordset.BOF = True ThenMsgBox 请选择要修改行Exit SubEnd If物资信息修改窗口.Show物资信息修改.HideEnd SubPrivate Sub comback_Click()首页.ShowUnload MeEnd SubPrivate Sub cmdupdate_Click()物资信息修改.Adodc1.Recordset.Fields(材料编号) = Text1.Text物资信息修改.Adodc1.Recor
15、dset.Fields(材料名称) = Text2.Text物资信息修改.Adodc1.Recordset.Fields(型号) = Text3.Text物资信息修改.Adodc1.Recordset.Fields(单位) = Text4.Text物资信息修改.Adodc1.Recordset.Update物资信息修改.Adodc1.RefreshMsgBox 修改成功End SubPrivate Sub comback_Click()Unload 物资信息修改窗口物资信息修改.ShowEnd SubPrivate Sub Form_Load()Text1.Text = 物资信息修改.Adod
16、c1.Recordset.Fields(材料编号)Text2.Text = 物资信息修改.Adodc1.Recordset.Fields(材料名称)Text3.Text = 物资信息修改.Adodc1.Recordset.Fields(型号)Text4.Text = 物资信息修改.Adodc1.Recordset.Fields(单位)End Sub(5)物资信息删除:Private Sub Command1_Click()首页.ShowUnload MeEnd SubPrivate Sub Form_Load()CmdDel.Enabled = TrueEnd SubPrivate Sub c
17、mdedit_Click()If Adodc1.Recordset.EOF = True Or Adodc1.Recordset.BOF = True ThenMsgBox 请选择要删除行Exit SubEnd IfEnd SubPrivate Sub Cmddel_Click()X = MsgBox(确实要删除目前统计吗?, vbYesNo + vbQuestion, 确定)If X = vbYes ThenAdodc1.Recordset.DeleteAdodc1.Recordset.MoveNextIf Adodc1.Recordset.EOF ThenAdodc1.Recordset.
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 生产 企业内部 物资 管理信息系统 课程设计 模板
1、咨信平台为文档C2C交易模式,即用户上传的文档直接被用户下载,收益归上传人(含作者)所有;本站仅是提供信息存储空间和展示预览,仅对用户上传内容的表现方式做保护处理,对上载内容不做任何修改或编辑。所展示的作品文档包括内容和图片全部来源于网络用户和作者上传投稿,我们不确定上传用户享有完全著作权,根据《信息网络传播权保护条例》,如果侵犯了您的版权、权益或隐私,请联系我们,核实后会尽快下架及时删除,并可随时和客服了解处理情况,尊重保护知识产权我们共同努力。
2、文档的总页数、文档格式和文档大小以系统显示为准(内容中显示的页数不一定正确),网站客服只以系统显示的页数、文件格式、文档大小作为仲裁依据,平台无法对文档的真实性、完整性、权威性、准确性、专业性及其观点立场做任何保证或承诺,下载前须认真查看,确认无误后再购买,务必慎重购买;若有违法违纪将进行移交司法处理,若涉侵权平台将进行基本处罚并下架。
3、本站所有内容均由用户上传,付费前请自行鉴别,如您付费,意味着您已接受本站规则且自行承担风险,本站不进行额外附加服务,虚拟产品一经售出概不退款(未进行购买下载可退充值款),文档一经付费(服务费)、不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
4、如你看到网页展示的文档有www.zixin.com.cn水印,是因预览和防盗链等技术需要对页面进行转换压缩成图而已,我们并不对上传的文档进行任何编辑或修改,文档下载后都不会有水印标识(原文档上传前个别存留的除外),下载后原文更清晰;试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓;PPT和DOC文档可被视为“模板”,允许上传人保留章节、目录结构的情况下删减部份的内容;PDF文档不管是原文档转换或图片扫描而得,本站不作要求视为允许,下载前自行私信或留言给上传者【w****g】。
5、本文档所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用;网站提供的党政主题相关内容(国旗、国徽、党徽--等)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
6、文档遇到问题,请及时私信或留言给本站上传会员【w****g】,需本站解决可联系【 微信客服】、【 QQ客服】,若有其他问题请点击或扫码反馈【 服务填表】;文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“【 版权申诉】”(推荐),意见反馈和侵权处理邮箱:1219186828@qq.com;也可以拔打客服电话:4008-655-100;投诉/维权电话:4009-655-100。