《企业销售采购管理系统课程设计18420.docx》由会员分享,可在线阅读,更多相关《企业销售采购管理系统课程设计18420.docx(53页珍藏版)》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、交通运输学院课程设计目录1.引言言11.1 需求分分析11.2可可行性分分析12. 系系统分析析22.1 业务流流程分析析22.2 数据流流程分析析32.3 数据字字典43. 系系统设计计53.1 系统总总体结构构53.2 数据结结构与数数据库设设计53.3 代码设设计73.4 输入输输出设计计73.5系系统的安安全设计计84. 系系统实施施94.1 系统实实施94.2系系统运行行管理制制度3225. 结束语语33 参考文文献46II50交通运输学院课程设计1.引言言1.1 需求分分析随着电子子产品创创新性技技术的迅迅速发展展、人民民生活水水平的提提高,电电脑已成成为人们们追求娱娱乐不可可或缺
2、的的生活用用品。而而对于销销售这些些产品的的终端,无无论是规规模型的的商场还还是小的的商店,都都要求它它们的采采购业务务能顺利利、高效效地进行行。博宏宏电脑公公司近年年来的销销售量激激增,但但是采购购业务成成为了它它获取高高效益的的掣肘。该该公司无无论是高高层领导导还是员员工,都都希望能能开发一一个采购购管理系系统,对对采购业业务进行行管理。在该公司司中,产产品的采采购管理理是一项项日常性性的工作作。电脑脑产品因因其更新新换代迅迅速,如如果做不不到使产产品的采采购量以以及采购购时间适适应需求求的变化化,那么么很容易易造成商商品积压压或脱销销,不仅仅影响商商品的销销售业绩绩,也会会增加库库存费以
3、以及采购购环节不不必要的的支出,最最终影响响公司的的效益。另另外,该该公司的的商品种种类非常常繁多,采采购量大大且频繁繁,依靠靠传统的的手工处处理记录录是很难难对采购购环节进进行及时时、正确确地处理理。所以以开发并并应用采采购管理理系统成成为适应应时代发发展,使使管理现现代化的的重要措措施。采采购管理理系统体体现了当当今先进进的企业业管理思思想,对对提高企企业的管管理水平平有着重重要的意意义。采采购管理理系统能能够保证证计划的的准确性性和采购购的合理理性,降降低商品品的运营营成本,让让利于消消费者,提提升该公公司的竞竞争力。1.2可可行性分分析可行性分分析的任任务是明明确开发发该采购购管理系系
4、统的必必要性和和可行性性。该公公司的采采购环节节出现了了制约商商场发展展的现象象,利用用计算机机技术解解决采购购业务数数据的处处理迫在在眉睫,公公司的领领导支持持开发采采购管理理系统,管管理人员员、员工工积极响响应。因因此开发发采购管管理系统统的必要要性与可可行性是是存在的的。具体体表现为为:1)管理理上的可可行性:公司内内部的采采购环节节的滞后后让管理理人员的的日常管管理工作作难以顺顺利地进进行,领领导层也也注意到到当前落落后的采采购管理理手段对对商品的的销售利利润影响响很大,公公司上下下都对采采购管理理系统的的开发有有很大的的热情,迫迫切需要要对其采采购管理理进行改改革,开开发采购购管理系
5、系统的时时机已成成熟。2)技术术上的可可行性:由于该该公司的的办公室室、采购购部门、库库存部门门、销售售部门和和财务部部门等都都使用了了电脑办办公,公公司员工工的素质质较高,员员工的技技术水平平达到了了采购管管理系统统所要求求的水平平。目前前可视化化开发技技术及工工具(如如vissuall baasicc)和数数据库技技术(如如acccesss)很成成熟,并并且该采采购管理理系统在在公司现现有的硬硬软件资资源基础础上可以以实施,因因此技术术上是可可行的。3)经济济上的可可行性:该系统统所需的的硬件设设备,如如服务器器、PCC机、打打印机以以及网络络配件等等的市场场价格不不高,且且目前主主流的配
6、配置就能能满足该该系统的的功能要要求,设设备费用用的支出出很小。该该公司对对于此次次开发MMIS的的经济效效益和费费用支出出进行了了比较评评价,回回收期短短。该公公司经济济效益好好,现金金流正常常,为此此次项目目开发提提供了充充足的经经费。由由于该系系统规模模小,仅仅在公司司内部运运行,日日常的维维护量不不大,所所以运行行费用低低。但是是由于采采用了采采购管理理系统,减减少了采采购环节节的人员员作业,提提高了工工作效率率,进而而降低了了商品的的成本,这这些费用用的节省省远大于于该采购购管理系系统的开开发和运运行费用用。2. 系系统分析析2.1 业务流流程分析析 图2.1为采采购管理理系统业业务
7、流程程图:描描述了系系统内各各单位、人人员之间间业务关关系、作作业顺序序和管理理业务流流向的图图表。供应商付款单退款单采购订单财务部采购员退货单采购开单收货单仓库管理员图2.11 采购购管理业业务流程程图2.2 数据流流程分析析根据数据据流程图图画出的的业务流流程图如如图2.22和图22.3所所示:数数据流程程图能全全面地描描述信息息系统逻逻辑模型型供应商提货单采购处理 采采购订单单图2.22 采采购管理理的顶层层数据流流程图财务账簿财务 部 退货单单数据 订订 单单 数数 据据采购订单审核处理采购部供应商 采购购订单 订订单数据据 入入 出 库 库 单 单销售部收退货处理库存处理 销售报报表
8、 出、入入库数据据库存台账图2.33 采采购管理理系统的的第二层层数据流流程图2.3 数据字字典1)数据据项的定定义(以以采购订订单的单单据编号号为例) 数数据项编编号:II02-01 数数据项名名称:单单据编号号 别别名:单单据编号号 简简述:区区别采购购订单唯唯一性的的代码 类类型与长长度:字字符型,长长度为111 取取值范围围:“20111011010001”“21000122319999” 2)数数据结构构的定义义(以采采购订单单为例) 数数据结构构编号:DS002-001 数数据结构构名称:采购订订单 简述述:采购购部门所所填采购购订单信信息 数数据结构构组成:DS002-002 +
9、 DSS02-03 + DDS022-0443)数据据流的定定义(以以采购订订单为例例) 数数据流编编号:DD02-02 数数据流名名称:合合格的采采购订单单 简简述:经经审核批批准的采采购订单单 数数据流来来源:采采购订单单审核处处理模块块 数数据流去去向:采采购部门门 数数据项组组成:单单据编号号+录单单日期+商品编编号+商商品名称称+型号号+规格格+单位位+数量量+单价价+合计计金额+供应商商+到货货日期+联系人人+电话话+业务务员+摘摘要 数数据流量量:约330张/日 高高峰流量量:约550张/日 4)处处理逻辑辑的定义义(以采采购订单单审核为为例) 处处理逻辑辑编号:P022-011
10、 处处理逻辑辑名称:采购订订单审核核处理 简述述:审核核采购订订单是否否合格并并给予批批准或不不批准 输输入的数数据流:采购订订单 审审核处理理描述:审核采采购部门门送来的的采购订订单填写写格式是是否符合合要求,单单据上的的信息是是否符合合采购计计划,是是否真实实等。不不合格的的单据返返回采购购部门,合合格的单单据登记记采购订订单台账账。输出的数数据流:合格的的采购订订单,未未批采购购订单 处处理频率率:约330次/日5)数据据存储的的定义(以以采购订订单数据据存储为为例) 数数据存储储编号:F022-011 数数据存储储名称:采购订订单台账账 简述述:存放放采购订订单信息息 数数据存储储组成
11、:单据编编号+录录单日期期+商品品编号+商品名名称+型型号+规规格+单单位+数数量+单单价+合合计金额额+预付付账户+预付金金额+供供应商+到货日日期+联联系人+电话+业务员员+摘要要 关关键字:单据编编号 相相关联的的处理:P022-011 6)外外部实体体的定义义(以供供应商为为例) 外外部实体体编号:S022-011外部实体体名称:供应商商 简述述:提供供商品的的供应商商 输输入的数数据流:D022-022 输输出的数数据流:D022-0113. 系系统设计计3.1 系统总总体结构构新系统的的功能设设计是以以业务流流程图和和数据流流程图为为依据的的。对该该采购管管理系统统划分为为系统设设
12、置、资资料管理理、采购购订单、订订单收货货、采购购开单、采采购付款款、采购购退货、产产品销售售等功能能模块。根根据以上上分析,该该采购管管理系统统功能划划分图如如图3.11所示:采购管理系统系统设置采购管理产品销售采购退货采购付款采购开单订单收货采购订单修改密码权限管理添加用户 图3.1 采购管管理系统统功能结结构图3.2 数据结结构与数数据库设设计ERR模型:概念模模型的最最常用的的表示方方法是实实体-联联系方法法。商品名称型号商品编号订单号规格采购订单日期供应商名称交给联系人编号供应商电话名称日期交货商品数量商品名称仓库订单号数量采购开单单价商品名称商品编号图3.22 采购管管理系统统E-
13、RR模型图图数据表表的设计计:这是是根据数数据流程程图设计计的数据据表主键列名数据类型型长度允许空*供应商代代码charr3*供应商名名称文本4*产品代码码charr6*产品名称称文本4图3.11 产品品销售表表主键列名数据类型型长度允许空*商品编号号charr6*商品名称称文本4*型号文本8*规格文本9*单位文本15*数量varccharr15*单价charr4*合计金额额varccharr19*单据编号号varccharr3*供应商文本4*入库日期期dataatimme8*联系人文本3*电话charr11*业务员文本3*摘要文本9表3.22 商商品库存存表3.3 代码设设计代码设计计部分主
14、主要是采采购订单单号的设设计。博博宏公司司的主要要合作伙伙伴为其其设计固固定的编编码。采采购订单单号是由由供应商商名和产产品类别别构成的的。表3.33为采购购订单编编号表 :供应商代代码*供应商名名称产品代码码产品名称称001A经销商商N-011联想电脑脑002B经销商商N-022戴尔电脑脑003C经销商商N-033索尼电脑脑004D经销商商N-044华硕电脑脑005E经销商商N-055宏基电脑脑006F经销商商N-066三星电脑脑007G经销商商N-077惠普电脑脑表3.33 采采购订单单编号表表 3.4 输入输输出设计计输出设计计:输出设备备:打印印机、显显示器输出报告告:输出设计计书资料
15、代码码XS-001输出名称称销售报表表份数1报送库存部门门项目号项目名称称位数及编编辑备注1商品编号号X(4)2商品名称称X(6)3型号X(6)4销售数量量X(3)表3.44 输输出设计计书输入设计计: 对对输入信信息进行行校验在登陆陆界面: 用用户名及及密码不不能为空空,如不不填写两两者或两两者之一一,则会会弹出对对话框提提醒用用户不存存在,请请从新输输入!如果用用户输入入的密码码不是密密码管理理表中的的用户名名及密码码,则会会弹出对对话框提提醒用用户不存存在,请请从新输输入!在产品品销售中中:商品品编号不不能为空空,否则则会弹出出对话框框提醒Sorrry,未找到到你所查查询的数数据,请请查
16、证后后再试单据号规格数量录单日期期单位单价商品编号号到货日期期合计金额额商品名称称业务员预付账户户型号联系人预付金额额供应商电话摘要表3.55 产品品销售单单录入屏屏幕3.5系系统的安安全设计计信息系统统安全设设计主要要解决以以下几个个问题: 止带宽资资源滥用用 防止无关关网络行行为影响响工作效效率 管控外发发信息,降降低泄密密风险 掌握组织织动态、优优化员工工管理 为网络管管理与优优化提供供决策依依据,防防止病毒毒木马等等网络风风险低成本本且有效效推行信信息管理理制度等等4. 系系统实施施4.1 系统实实施一、登录录界面当输入的的账号为为:xiiaollin密密码为:xiaaoliin 时时
17、,焦点点会自动动落在确确定上面面,此时时点击确确定或按按回车键键即可以以登入系系统。若若错误,则则会弹出出对话框框提醒“此用户户不存在在,请重重新输入入!”并且它它的输入入密码为为“*”,是在在属性栏栏中的ppasssworrdchhar设设置“*”。用户名及及密码不不能为空空,如不不填写两两者或两两者之一一,则会会弹出对对话框提提醒此此用户不不存在,请请从新输输入!如果用户户输入的的密码不不是密码码管理表表中的用用户名及及密码,则则会弹出出对话框框提醒此用户户不在,请请从新输输入!图4-11 登陆陆窗口它的具体体代码为为:Dim TIMM Ass Inntegger 定定义一个个整型变变量D
18、im myvval As Strringg 定义一一个字符符串变量量Privvatee Suub FFormm_Looad() 连接aacceess数数据库 Adoodc11.CoonneectiionSStriing = Proovidder=Miccrossoftt.Jeet.OOLEDDB.44.0;Datta SSourrce= & Appp.PPathh & 采采购管理理系统.mdbb;Peersiist Seccuriity Inffo=FFalsse Adoodc11.ReecorrdSoourcce = sseleect * ffromm 用户户 Adoodc11.Reefre
19、esh Endd SuubPrivvatee Suub CCommmandd1_CClicck()Stattic itiimess Ass Inntegger Forrm2.StaatussBarr1.PPaneels(4).Texxt = Teext11.Teext 验验证用户户名及密密码 Adoodc11.ReecorrdSoourcce = sseleect * ffromm 用户户 whheree 用户户名= + Teext11.Teext + Adoodc11.ReefreeshIf AAdoddc1.Reccorddsett.ReecorrdCoountt 0 TThenn 如如果
20、记录录数大于于零 验验证密码码If TTextt2.TTextt = Adoodc11.Reecorrdseet.FFiellds(密码码) Theen LLoadd Foorm22 FFormm2.SShoww UUnlooad Me Ellse IIf TTextt2.TTextt Addodcc1.RRecoordsset.Fieeldss(密密码) Thhen MsggBoxx 密密码错误误,请重重新输入入!, vbbCriiticcal, 系系统提示示 itiimess = itiimess + 1 Texxt2.Texxt = Texxt2.SettFoccus EEnd If E
21、nnd IIf Elsse MssgBoox 用户不不存在,请重新新输入!, vbCCritticaal, 系统统提示 ittimees = ittimees + 1 Teext11.Teext = Teext22.Teext = Teext11.SeetFoocuss Endd Iff If itiimess = 3 TThenn 错误33次,退退出系统统 MyyMsgg = MsggBoxx(输输入错误误,请向向管理员员查询!, vbCCritticaal, 系统统提示) Iff MyyMsgg = vbOOK TThenn Ennd Endd IffEnd SubbPrivvatee S
22、uub CCommmandd2_CClicck()EndEnd SubbPrivvatee Suub ttextt2_KKeyDDownn(KeeyCoode As Inttegeer, Shiift As Inttegeer) If KeyyCodde = vbbKeyyRetturnn Thhen Commmannd1_Cliick 按按回车键键进入End SubbPrivvatee Suub TTextt1_KKeyDDownn(KeeyCoode As Inttegeer, Shiift As Inttegeer) If KeyyCodde = vbbKeyyRetturnn Thhe
23、n Texxt2.SettFoccus 按按回车键键,teext22获得焦焦点End Subb二、主界界面主界面是是登陆后后最基础础的一个个界面,内内容包括括采购订订单,订订单收获获,采购购开单,采采购付款款,采购购退货,产产品销售售。图4-22 主界界面它的具体体代码为为:Privvatee Suub CCommmandd1_CClicck()Formm3.SShowwFormm2.EEnabbledd = FallseEnd SubbPrivvatee Suub 供供应商资资料_CClicck()Formm21.ShoowFormm2.EEnabbledd = FallseEnd Subb
24、Privvatee Suub 库库存查询询_Cllickk()Formm8.SShowwFormm2.EEnabbledd = FallseEnd SubbPrivvatee Suub 权权限管理理_Cllickk()Formm91.ShoowFormm2.EEnabbledd = FallseEnd SubbPrivvatee Suub 添添加用户户_Cllickk()Formm9.SShowwFormm2.EEnabbledd = FallseEnd SubbPrivvatee Suub 退退出系统统_Cllickk()EndEnd SubbPrivvatee Suub 修修改密码码_Cl
25、lickk()Formm92.ShoowFormm2.EEnabbledd = FallseEnd Subb三添加加用户图4-33 添加加用户它的具体体代码为为:Privvatee Suub FFormm_Looad() 自动动识别数数据库路路径Adoddc1.ConnnecctioonSttrinng = PProvvideer=MMicrrosooft.Jett.OLLEDBB.4.0;DDataa Soourcce= & Appp.Paath & 采购购管理系系统.mmdb;Perrsisst SSecuuritty IInfoo=FaalseeAdoddc1.ReccorddSouur
26、cee = seelecct * frrom 权限设设置Adoddc1.ReffresshAdoddc2.ConnnecctioonSttrinng = PProvvideer=MMicrrosooft.Jett.OLLEDBB.4.0;DDataa Soourcce= & Appp.Paath & 采购购管理系系统.mmdb;Perrsisst SSecuuritty IInfoo=FaalseeAdoddc2.ReccorddSouurcee = seelecct * frrom 用户Adoddc2.ReffresshEnd SubbPrivvatee Suub FFormm_Acctiv
27、vatee() Texxt1.SettFoccus texxt1获获得焦点点End SubbPrivvatee Suub FFormm_Unnloaad(CCanccel As Inttegeer) Forrm2.Enaableed = TrrueEnd SubbPrivvatee Suub TTextt1_KKeyDDownn(KeeyCoode As Inttegeer, Shiift As Inttegeer) If KeyyCodde = vbbKeyyRetturnn Thhen Texxt2.SettFoccus 回回车teext22获得焦焦点End SubbPrivvatee S
28、uub ttextt2_KKeyDDownn(KeeyCoode As Inttegeer, Shiift As Inttegeer) If KeyyCodde = vbbKeyyRetturnn Thhen Texxt3.SettFoccus 回回车teext33获得焦焦点End SubbPrivvatee Suub TTextt3_KKeyDDownn(KeeyCoode As Inttegeer, Shiift As Inttegeer) If KeyyCodde = vbbKeyyRetturnn Thhen Commmannd1.SettFoccus 回回车Coommaand11获得
29、焦焦点End SubbPrivvatee Suub CCommmandd1_CClicck() Diim yyhm 保存用用户名及及密码 If Texxt1.Texxt TThenn Adoodc11.ReecorrdSoourcce = sseleect * ffromm 用户户 whheree 用户户名= + Teext11.Teext + Iff Teext11.Teext = AAdoddc1.Reccorddsett.Fiieldds(用户名名) Theen MMsgBBox 已添添加该用用户,请请重新添添加, , 系统统提示 TTextt1.TTextt = : Teext22.T
30、eext = : Texxt3.Texxt = TTextt1.SSetFFocuus EllseIIf TTextt2.TTextt Annd TTextt3.TTextt Annd TTextt2.TTextt = Texxt3.Texxt TThenn aadoccon.Opeen Proovidder=Miccrossoftt.Jeet.OOLEDDB.44.0;Datta SSourrce= & Appp.PPathh & 采采购管理理系统.mdbb;Peersiist Seccuriity Inffo=FFalsse aadoRRs.OOpenn sseleect * ffromm
31、 用户户, adooconn, aadOppenKKeysset, addLocckOpptimmisttic aadoRRs.AAddNNew aadoRRs.FFiellds(用户户名) = Texxt1.Texxt aadoRRs.FFiellds(密码码) = TTextt2.TTextt aadoRRs.UUpdaate aadoccon.Cloose aadoccon.Opeen Proovidder=Miccrossoftt.Jeet.OOLEDDB.44.0;Datta SSourrce= & Appp.PPathh & 采采购管理理系统.mdbb;Peersiist Secc
32、uriity Inffo=FFalsse aadoRRs.OOpenn sseleect * ffromm 权限限设置, aadoccon, addOpeenKeeyseet, adLLockkOpttimiistiic aadoRRs.AAddNNew aadoRRs.FFiellds(用户户名) = Texxt1.Texxt aadoRRs.FFiellds(密码码) = TTextt2.TTextt aadoRRs.UUpdaate aadoccon.Cloose TTextt1.TTextt = : Teext22.Teext = : Texxt3.Texxt = MMsgBBox 添
33、加加用户成成功!, , 系系统提示示 EllseIIf TTextt3.TTextt = Theen MMsgBBox 请输输入确认认密码, , 系系统提示示 Texxt3.SettFoccus EllseIIf TTextt2.TTextt Teext33.Teext Theen MMsgBBox 两次次输入的的密码不不相同, , 系系统提示示 TTextt2.TTextt = TTextt3.TTextt = TTextt2.SSetFFocuus Ennd IIf Elsse MssgBoox 请输入入用户名名!, , 系统统提示 Endd IffEnd SubbPrivvatee Su
34、ub CCommmandd2_CClicck() Texxt1.Texxt = : TTextt2.TTextt = : Teext33.Teext = End SubbPrivvatee Suub CCommmandd3_CClicck() Unlloadd Mee Forrm2.Shoow Forrm2.Enaableed = TrrueEnd Subb四密码码设置本功能允允许使用用者对密密码进行行修改,取取保系统统的安全全与方便便。如果果你是系系统的用用户,输输入用户户名可对对自己的的密码进进行修改改。图4-44 密码码设置它的具体体代码为为:Privvatee Suub FFormm_
35、Looad() Adoodc11.CoonneectiionSStriing = Proovidder=Miccrossoftt.Jeet.OOLEDDB.44.0;Datta SSourrce= & Appp.PPathh & 采采购管理理系统.mdbb;Peersiist Seccuriity Inffo=FFalsse Adoodc11.ReecorrdSoourcce = sseleect * ffromm 权限限设置 Adoodc11.ReefreeshEnd SubbPrivvatee Suub CCommmandd1_CClicck() If Texxt1.Texxt = Orr Teext22.Teext = OOr TTextt3.TTextt = Theen MssgBoox 输入不不能为空空!, 448, 提示示信息 Elsse Adoodc11.ReecorrdSoourcce = sseleect * ffromm 权限限设置 wheere 用户名名= + Texxt1.Texxt + Adoodc11.Reefreesh If Adoodc11.Reecorrdseet.RRecoordCCounnt 0 Theen If Texxt2.Texxt = Addodcc1.RRecoordsset.Fieeldss(密
限制150内