1 前言1.1 作业背景本文根据《管理信息系统开发实践》课程要求而做。
课程作业要求如下：管理信息系统开发作为独立的教学环节，是学习完《管理信息系统》课程并进行完专业实习后进行的一次全面的综合练习。
其目的在于加深对管理信息系统基础理论和基本知识的理解，掌握使用信息系统分析、设计的基本方法，提高解决实际管理问题、开发信息系统的实践能力。
具体内容是：用信息系统开发工具（例如PowerBuilder、Delphi、Vb、Vfp等）开发一个实用的中小型采购管理信息系统。
具体要求如下：1、根据课程实践时间选择适当规模大小的设计课题。
针对信息系统课程实践的具体特点，体现项目管理的思想。
2、根据合理的进度安排，按照系统开发的流程及方法，踏实地开展课程实践活动。
3、课程实践过程中，根据选题的具体需求，在开发各环节中撰写相关的技术文档，最后要求提交详细的课程实践报告。
4、开发出可以运行的管理信息系统，通过上机检查。
1.2 选题说明进入 21 世纪，随着技术进步和客户需求多样化，企业经营的市场环境发生了很大的变化,从过去的供应商主导的、静态的、简单的市场环境变成客户为主导的、动态的、复杂的市场环境。
企业之间由单纯产品质量、性能方面的竞争转向企业所在的供应链之间的竞争。
在企业经营管理中,采购是最重要的一个环节。
它对于企业降低经营成本、确保产品质量、缩短生产周期具有非常重要的意义。
采购管理为降低采购成本，提高采购效益提供了广阔的空间，但也同时为采购管理带来了新的机遇和挑战。
目前,我国大多数企业仍然没有建立健全的供应链管理体系,物资的采购还存在机构设置分散,资源浪费严重,信息传递滞后等问题。
1.2.1 基本思路通过对课程设计的要求而进行初步调查，从提高采购管理的需求入手,给出了适合中小企业的采购管理系统整体设计方案。
在系统业务流程改造和功能模块的设计中体现出先进的采购管理思想,并对采购业务管理的具体内容进行了分析与设计。
1.2.2 作业目标该系统将有效的整合企业内外部的资源,加强企业与供应商之间的紧密合作,增强企业采购业务的透明度,规范标准业务流程,提高采购的效率和质量,提升企业的核心竞争力。
通过对采购管理系统设计与开发，使采购部门的工作效率大大提升，实现采购管理工作的信息化，网络化等，从而降低采购的总体成本，增加企业的利润，并能更好的完成企业最终目标。
1.3 工作业绩1.3.1 个人主要工作我的课程设计主要是有4项主要界面，主要内容包括采购信息系统的权限管理、采购信息系统的采购订单，采购信息系统的采购付款，采购信息系统的订单收货。
同时还进行了程序的调试、数据准备与录入、系统转换与评价等。
系统实施阶段既是成功地实现新系统，又是取得用户对系统信任的关键。
1.3.2 主要收获通过对全通公司的采购管理系统进行设计，使我不仅了解到系统实施部分的内容，也使我更深的掌握了管理信息系统的开发方法以及重要性。
开发一个管理信息系统好像建一栋大楼，系统分析、系统设计是根据用户的要求画出各种蓝图，系统实施是调集各类人员、设备、材料，在现场根据图纸按实施方案的要求把“大楼”建起来。
更重要是我终于明白了VB原来这么有用。
通过对这个系统的开发设计，使我这学期所学的管理信息系统得到了运用，实现了从理论到实践的升华，一个完善的管理信息系统可以促使公司向信息化方向发展，将管理工作统一化、规范化、现代化，使公司处于一个信息灵敏、管理科学、决策准确的良性循环中，为公司带来跟高的效益。
2 系统规划2.1 可行性分析2.1.1可行性研究方法通过调查分析采购供应管理信息系统所具备的能力及实现的方法。
确定总体结构，利用数据库所具有的能力，以最简洁最容易的方法，使其成为一个初级的系统软件。
2.1.2可行性综合分析（1）可行性：系统现阶段的发展过程中，利用现有人力和物力是完全具备的能力开发出来的，作为阶段性产品，日后的发展空间大，实现方法逐步简单容易。
对于该系统的技术要求，现行的软件开发条件，环境，完全可以实现。
SQL Server 2000完全可以提供该系统的操作要求和数据库需求。
但由于SQL Server较Access复杂，本设计又是注重研究系统的实现，所以采购管理信息系统在Access技术上是完全可行的。
（2）技术可行性：该系统的开发要求是界面简单，易于操作。
（3）经济可行性：该系统做为课程设计开发，经济可行性必然不能完全考察出来，但本人认为此次设计的采购管理信息系统完全可行。
（4）管理可行性：此次采购管理系统的设计由于操作简单，内容较少，且炒作简单，同时又能适应大部分的采购系统，故能使采购流程效率提高。
又经过权限的设置，帮助他们能够快速准确和职能化的工作，减少作业量并提高效率。
3 系统分析系统分析在整个开发过程中，是要解决“做什么”的问题。
从逻辑上，或者说从信息处理的功能需求上提出系统的方案，即逻辑模型，为下一阶段进行物理方案设计、解决“怎么做”提供依据。
本企业采购管理业务的系统功能：1．采购订单：如果企业向供应商订货物时，开据入库订单，以便了解收货情况并预先安排存放货物的仓库。
2．订单收货：是“采购订单”上的货到后入库完成交易。
3．采购开单：就是货物购买后直接进入仓库，此时仓库商品增加。
4．采购付款：付款给供应商，支付金额自动登帐进入明细账中。
5．采购退货：是把商品退回给供应商，退货时有几种方式，如选择退款冲应付款，则系统数据库会自动更改用户与供应商的交易情况，自动修改明细账；如选择退货收回现款，表示退货以现金的形式收回，现金形式也分为二种，一种是以银行账户的，另一种是以现金的，用户可自行选择。
6．系统操作人员口令及权限管理。
3.1 详细调查分析3.1.1 业务流程图业务流程图(transaction flow diagram,简称TFD),就是用一些规定的符号及连线来表示某个具体业务处理过程。
是一种用尽可能少、尽可能简单的方法来描述业务处理过程的方法。
3.2 系统的逻辑模型3.2.1 数据流程图3.2.2 数据字典数据字典是对描述数据流程图中的数据项、数据流、数据存储、加工处理逻辑等组成部分的严格定义，下面是本系统的部分数据字典。
(1)数据流的描述数据流编号G-01数据流名称采购订单简述企业购置商品时内部流动的单据数据流来源采购部门数据流去向采购员数据项组成订单号+经手人+日期+货物名称+货物代码+数量+货物单价+金额单价+摘要+供应商+商品编号+联系电话+预入仓库数据流量25张/天高峰流量50张/天处理逻辑编号P1处理逻辑名称采购处理简述对采购订单进行统计，开出采购单输入的数据流采购订单处理描述对采购订单进行处理，将所订的货物进行分类，编制合理有效的采购单输出的数据流采购单处理频率1张/小时数据存储编号F1数据存储名称收货表简述采购的货物的记录数据存储组成货物名称+货物代码+货物数量+货物单价+货物单位+金额+日期关键字货物相关联的处理P1外部实体编号S1外部实体名称采购员简述采购商品人员输入的数据流采购订单输出的数据流采购订单3.3.1组织结构分析组织结构图如下：4 系统设计4.2 总体设计4.2.1功能结构图设计4.3 详细设计4.3.1 输入输出设计输出设备：屏幕输出方式：显示输出与打印输出输出形式：报表输出形式输入设计：对输入信息进行校验1.在登陆界面：用户名及密码不能为空，如不填写两者或两者之一，则会弹出对话框提醒"请输入用户名与密码！"如果用户输入的密码不是密码管理表中的用户名及密码，则会弹出对话框提醒"无该用户！"2.在采购订单：订单号不能为空，否则会弹出对话框提醒"请输入完整信息，输入订单号编号为数字！"在单价和数量中输入数字，金额项目会自动显示为两者乘积结果。
5 系统实施一、登录界面当输入的账号和密码符合Access数据库中的cgdl表中的数据时时，焦点落在确定上面，此时点击确定就可以登入系统。
若错误，则会弹出对话框提醒“用户名密码错误,请重新输入！”并且它的输入密码为“*”，是在属性栏中的passwordchar设置“*”。
用户名及密码不能为空，如不填写两者或两者之一，则会弹出对话框提醒"请输入用户名与密码！"如果用户输入的密码不是密码管理表中的用户名及密码，则会弹出对话框提醒"无该用户！"设置了访问权限，根据不同人的管理职能提供相应的管理权限图5-1 登陆窗口它的具体代码为：Private Sub Command1_Click()Dim sql As StringDim cgdl As New ADODB.RecordsetDim dlqx As StringIf Trim(Text1.Text) = "" ThenMsgBox "用户名不能为空，请重新输入！"Text1.SetFocusElsesql = "select * from cgdl where 登录名='" & Trim(Text1.Text) & "'"cgdl.Open sql, cnn, adOpenKeyset, adLockPessimisticIf cgdl.EOF = True ThenMsgBox "用户名不存在,请重新输入！", vbOKOnly + vbExclamation, ""Text1.Text = ""Text2.Text = ""Text1.SetFocusElseIf Trim(cgdl.Fields("密码")) = Trim(Text2.Text) ThenForm2.Showdlqx = "select * from 权限管理 where 用户名='" & Trim(Text1.Text) & "'"Adodc2.RecordSource = dlqxAdodc2.RefreshIf Adodc2.Recordset.Fields("权限管理") = "Yes" ThenForm2.权限管理(10).Enabled = TrueEnd IfIf Adodc2.Recordset.Fields("采购付款") = "Yes" ThenForm2.采购付款(5).Enabled = TrueEnd IfIf Adodc2.Recordset.Fields("采购订单") = "Yes" ThenForm2.采购订单(2).Enabled = TrueEnd IfIf Adodc2.Recordset.Fields("订单收货") = "Yes" ThenForm2.订单收货(3).Enabled = TrueEnd IfUnload MeElseMsgBox "密码不正确,请重输入！", vbOKOnly + vbExclamation, ""Text2.SetFocusText2.Text = ""End IfEnd IfEnd Ifcgdl.CloseEnd SubPrivate Sub Command2_Click()EndEnd SubPrivate Sub Form_Load()End SubPrivate Sub Text2_KeyPress(KeyAscii As Integer)If KeyAscii = 13 ThenCommand1.SetFocusEnd IfEnd Sub二、主界面图5-2 主界面主界面是登陆后最基础的一个界面，内容包括采购订单，采购付款，订单收货，采购查询，采购开单，密码修改，权限管理，采购开单，帮助，新增产品等。