基于CS模式企业进销存管理系统的设计与实现

1、基于C/S模式企业进销存管理系统的设计与实现 摘要：进销存系统作为一种企业管理软件可以帮助企业快速有效地管理进货、销售、库存和应收/应付款等各项业务。因此进行计算机进销存管理系统的建设是企业的一项重要工作。本系统采用软件工程的思想，从工作流的角度出发，使用结构化设计思想对系统进行分析和设计。在分析阶段，用户的需求采用数据流图和数据字典来描述；在设计阶段，模块化程序采用了结构图和流程图来描述。在实现阶段，采用VB和SQL Server 2000数据库管理系统，成功开发出基于C/S模式的企业进销存管理系统应用程序。它主要由七大功能模块组成：1、系统管理模块；2、基本信息管理模块；3、进货信息管理模

2、块；4、生产信息管理模块；5、库存信息管理模块；6、销售信息管理模块；7、财务信息管理模块。本系统界面友好方便，易于使用；实时共享，具有个性化特征，合法用户可以共享数据信息，满足不同用户的需求；功能多样性，从开票到各种查询、统计、汇总、打印报表，完全满足了用户的实际需要。关键词：C/S结构，进销存管理，SQL Server 2000数据库,数据流图（DFD）基于C/S模式企业进销存管理系统的设计与实现The Development of Purchase Vendition And StockpileManagement System Based on C/S ModeAbstract:As

3、a type of management information system,the purchase vendition and stockpile system can be more efficient and convenient for enterprises to manage purchase-stock-sale operations.it is an important work to build computer purchase vendition and stockpile management system for corporation.This system a

4、dopts the thought of the software engineering,the angle that flow from the work sets out,using structured technique to proceed the analysis and design.At the analysis stage,the consumer request describe with the data dictionary and DFD;At the design stage,moduled program describe with flow diagram a

5、nd structured diagram;At the realization stage,adopts VB and SQL Server 2000 data-base management system.I have developed purchase vendition and stockpile management system based on C/S mode successfully.This system is powerful and practicable,including seven sub-modules:system management module,bas

6、ic information management module,purchase information management module,manufacture information management module,sell information management module,stockpile information management module and wealth information management.This system has a amity and convenient interface;The real time and share qual

7、ity.Characters usage for users.The legality consumer can share data information. All of which satisfies users of different requirements.Variety of functions.This system quite satisfies the users ptactice requirements from making out an invoice to various searching,statistic,total and printing form.

8、Keywords:C/S pattern,Purchase Vendition and Stockpile Management,SQL Server 2000 database,DFD基于C/S模式企业进销存管理系统的设计与实现前言当今的中小企业，一般应具有产品开发、生产、销售、服务的能力，为此企业都设有相应的机构，以管理各个环节的业务。在市场经济中，销售是企业运作的重要环节，一般采用分公司或代理制，通过分公司或代理把产品推向最终用户。销售中，总公司和分公司及代理商之间按年度签订销售协议，总公司统一规定产品的市场零售价，而总公司与分公司或代理之间采用基本代理价的销售总量累进梯阶返点制，根据分

9、公司或代理完成协议的情况确定其享受的优惠，以次鼓励分公司或代理商的销售积极性。许多分公司或代理商分布在全国各地，还有一些地境外，远距离频繁的业务交流形成企业活动的特点。公司之间一般采用电传、电报甚至电话传递订货、发货、到货、压货、换货、退货等信息。总公司的商务部门一般见到分公司或代理的货款银行汇款单据传真件就开据产品出库统计。销售情况是公司“进、销、存”系统中（如果公司已经有单机或局域网的“进、销、存”系统）。纵观当前国内大多数中小企业的销售运作现状，不难看出存在着信息传输效率低。可靠性、安全性、保密性差的缺点，缺少系统的数据资源和规范的商务文件运行手段（拟稿、审核、执行记录、存档及统计分析等

10、），许多信息分散随意存放，缺少一致性、易于丢失、不易重复使用。建立一个规范、高效、安全可靠的进销存信息管理系统，提高企业在市场中的竞争力是每一个公司总裁日思夜想的问题。以往由于通信手段尤其是网络技术的限制，公司老总们很难建立满意的计算机进销存信息管理系统，当今的网上电子商务为企业的发展提供了难得的机会。在国外一些大的公司，由于业务的需要和雄厚的资产，从七、八十年代就开始建立专用的电子数据传输系统，这对于一般的中小企业是可望而不可及。现在不同了，由于Internet的发展和相应开发软件的商品化，使得企业不必大量投资就可以建立一个满意的计算机进销存信息管理系统（本质上是基于C/S模式的局域网络的商

11、务管理信息系统）。广义上讲，电子商务可以涉及到企业运作的各个方面，但一个无所不包的系统不要说在Internet上难以实现,即便在一些利用早期网络手段建立的企业管理信息系统,也多是在一些部门和一些业务方面运转比较成功.因此没有必要概念上和完整性上追求一个理性的电子商务系统.应该从企业自身的实际情况出发,利用Internet技术,改善最需改善的商务活动条件,以此作为突破口,带动企业向现代化管理迈进.本方案正式基于这个思想,提出一个以面向中小企业,具有全国范围购销网络系统的“进、销、存”电子商务解决方案。根据企业进销存的业务流程和在传统人工管理方式下存在的问题，开发了计算机企 2业进销存管理系统。对

12、整个系统进行了业务需求分析、功能需求分析、数据库需求分析、数据库建模、系统设计、系统实现、系统测试等相关工作。本系统运用的是结构化分析与设计技术，采用VB可视化程序设计语言作为前台开发工具，后台数据库采用SQL SERVER 2000。开发平台使用windows 2000 advance server。系统的体系结构采用了C/S模式。采用ADO组件对数据库进行访问。我把整个系统分为七个功能模块：1.系统用户管理，2.基本信息管理，3.进货信息管理，4.生产信息管理，5.销售信息管理，6.库存信息管理，7.财务系统管理以满足用户的需求。本系统的操作简单、界面友好，能高效地对整个企业的“进、销、存

13、”进行管理，降低企业进销存的管理成本，提高经济效益。1第1章 引言1.1 研究背景和意义电子商务的发展和市场竞争的加剧将企业推上了风口浪尖，中小企业除了积极迎接挑战而别无选择。网络的兴起与电子商务的发展带来了时空界限的突破、贸易方式的变革以及经济活动的革命，在某种意义上，这些变化为中小企业创造了同大企业、同国外企业平等竞争的有利挑件。然而，管理水平的差异会弱化这种平等的实际意义。具体而言，中小企业在进、销、存等环节的管理上都存在这一定程度的不足，而这些不足无疑将使其在市场竞争中陷入举步维艰的境地。显然在网络经济的时代背景下，进行有效的进销存管理已经成为中小企业存的头等要事。然而对于一贯疏于管理

14、的中小企业而言，实现有效的进销存管理必然存在着一定的难度，因此必须借助现代化的管理方法和管理技术-计算机进销存管理系统。由于企业经营的商品种类经常会很多，例如一个超市可能会经营上万种商品，因此按照传统的人工管理方式，会存在着很多问题。如：物资种类繁多、品种齐全，保管管理困难；无法进行准确及时的成本、毛利核算；管理信息相互独立，市场预测手段、方法落后，严重影响企业科学决策，建立科学的市场信息反馈系统已迫在眉睫；应收帐款居高不下，占用了大量资金，严重影响了企业资产运作效率，加大了企业经营风险；在生产和销售环节，不能准确地掌握质量的变化，尤其一些客户投诉或降级使用的次品，无法做到全程跟踪，影响到市场

15、的销售；不能有效管理异地仓库和办事处销售企业。传统的人工管理方式已无法满足管理要求，企业应该考虑进行计算机进销存管理系统的建设。进销存管理系统是基于先进的软件和高速、大容量的硬件基础上的新的进销存管理模式，通过集中式的信息数据库，将企业的进、销、调、存、转等企业的经营业务有机地结合起来，达到数据共享、降低成本、提高效率、改进服务等目的。一般来说，利用进销存管理系统可以在以下方面提高企业管理的水平。（1）提高管理效率降低人工成本。（2）降低采购成本。（3）及时调整营销策略，防止价格流失。（4）防范陈呆死帐降低应收帐款。（5）减少仓储面积，提高房产综合利用。（6）加快资金周转实现的经济效益。（7）

16、强化财务监控制实现的经济效益。1基于C/S模式企业进销存管理系统的设计与实现（8）商业数据智能分析。（9）高效决策。1.2 国内外研究现状对于企业进销存管理系统的研究现已有许多人进行了这方面的研究。徐焕玲就对这方面进行了研究，他开发的系统是通用商务进销存管理系统。他采用的系统结构是单机版，采用数据库是Borlan公司的Paradox，开发工具采用Borland C+18。匡泰开发了一个基于INTERNET的进销存管理系统，采用Multi-Tier结构与虚拟专用网相结合模式，通过互联网实现分布式进销存信息管理。数据库采用SQL SERVER 2000，采用Delphi 619。修晓杰，王小华开发

17、了基于C/S模式的进销存系统。使用Borland公司的Delphi6.0作为前台开发工具，微软公司的SQL Server 2000做后台数据库16。数据库服务器采用Microsoft的SQL Server 2000比较好，因为Microsoft SQL Server是一个关系数据库管理系(RDBMS)，可以应用于各种商业组织及专业数据库和应用开发环境中。SQL Server 2000提供了对高效的存储过程和灵活的用户自定义函数的支持，并在核心层实现了数据完整性控制。对企业进销存管理系统来说，采用C/S结构更好些。因为C/S模式专用性、交互性强，存取数据安全，网络通讯量低、速度快。比较适合像进销

18、存这样操作复杂，数据多的系统。但该系统也有些不足的地方，他们使用的Delphi语言不是一种很流行的语言并且发展前景也不是特别的大。颜丹，高楠开发了商业流通进销存系统，该系统采用powerbuilder作为前台开发环境，应用sybase SQL Anywhere作为后台数据库，结合windows操作系统建立起来的B/S结构的数据库管理系统15。B/S模式是三层的结构。网络通讯量不仅包括客户机和web服务器之间的通讯量，而且也包括web服务器与数据库服务器之间的通讯量。因而网络通讯量较大、使得运行速度变慢。在企业进销存业务流程过程中操作比较复杂通讯量大如果只采用B/S模式不是特别理想。冉春玉，陈建

19、军，姚辉开发了基于C/S和B/S模式的进销存系统。系统采用Borland公司的Delphi6.0作为客户端软件的开发工具。SQL Server 2000作为后台数据库管理系统。IIS作WEB服务器17。本系统中，采用B/S模式来实现各分销点对公司总部的数据库的操作。由于公司总部负责所有的进货业务，同时负责由于公司总部负责所有的进货业务，同时负责对各分销点的货品实时调拨以及供货方和客户的基础数据管理，计算和操作相对复杂，因而采用CS模式的计算环境。为简化系统的日常维护，采用“胖”服务端的两层CS架构。所有的业务逻辑(Business Logic)都用存储过程实现，部署于数据库服务器上，可供前的客

20、户软件和Web服务器上的应用程序调用。采用B/S模式和C/S模式充分利用了两种结构的优点，在B/S和C/S模式下的系统，有速度快，数据安全，交互性强，易维护、易升级， 2用户操作使用简便，适合网上发布信息等优点。但他们开发出来的企业进销存是很昂贵的一般的小型公司是承担不起这么巨额费用的。所以我们采用C/S模式，用SQL SERVER 2000作为数据库，用VB作为开发工具开发企业进销存管理系统。1.3 开发工具与数据库的选择1.3.1 开发工具的选择考虑该系统要用可视化开发工具编写，当前流行的可视化开发工具有微软的Microsoft Visual Basic,Microsoft Visual

21、FoxPro,Borland Delphi,PowerSoft Power Builder,VC+.net等。FoxPro的事件处理能力先天不足,而PB对数据库固然是功能强大,但在界面上和其他自由编程软件方面就稍显不足.VC+.net不是特别成熟。Visual Basic是一个功能强大的Windows 平台上的开发工具，从开发个人和小组使用工具，到大型企业应用系统，甚至通过Internet遍及全球的分布式应用程序，都可以利用Visual Basic实现.Visual Basic 6.0利用ADO完成对数据的访问和操作.ADO是基于OLE DB技术,有效访问远程数据的新型接口. Visual B

22、asic 6.0将其作为基本部件提供，以增强其数据访问能力，并可以在不同进程、不同的主机间利用HTTP或DCOM技术传递ADO记录集，实现资源共享。Visual Basic 6.0开发效率较高，做界面和一般的数据库应用都能很好的实现。很多大型公司数据库和客户机/服务器应用程序的前端开发工具都采用VB，使它特别使用于MIS系统的开发。因此在本系统的开发中我采用了Visual BasicVisual Basic 6.0是Microsoft公司推出的Visual Basic 6.0可视化应用程序开发工具组件中的一员,也是当今非常流行的可视化编程工具之一. Visual Basic 6.0不但简化了可

23、视化编程的方法,而且使得应用程序的开发流程更加流畅.特别是Visual Basic 6.0在数据库和Internet应用程序开发两个方面的改进,使程序员能够轻松自如地开发出功能卓越的各种数据库和多媒体应用程序. Visual Basic 6.0具有以下特点:(1)真正的面向对象编程,使开发人员在进行系统维护时,只需要修改很少的代码,同时也加快了系统的开发速度.(2)可视化的编程以及向导的功能,使开发人员不用加入太多代码就可以开发出标准的windows程序.(3)数据访问特性允许对包括Microsoft SQL Server和其他企业数据库在内的大部分数据库格式建立数据库和前端应用程序.(4)通

24、过AvtiveX技术可使用其他应用程序提供的功能.例如Microsoft Word、Microsoft Excel及其他Windows应用程序，甚至可以使用Visual Basic创建的应用程序和对象。(5)网络功能强大，使得在应用程序中很容易通过Internet访问稳当和应用程序。 1基于C/S模式企业进销存管理系统的设计与实现(6)已完成的应用程序是真正的“.exe”文件，供运行时可自由发布的动态链接库（DLL）使用。1.3.2 数据库的选择现在,几乎任何一个大型的网络应用系统,都需要一种大型的数据库.Microsoft Access、Microsoft SQL Server、Sybase

25、、DB2和Oracle等都是当前比较流行的大型关系数据库管理系统（RDMS），DB2和Oracle价格比较贵，操作比较复杂不是很适用。SQL SERVER 2000和任何其他RDBMS都是一个用来建立和管理数据库的引擎。它的作用和桌面型数据库ACCESS FOXBASE等一样，但是在存储大容量数据方面，在数据的安全性和完整性方面、在分布式处理和具有高效机制等方面，桌面型数据库是无法实现的。SQL SERVER 2000不仅能够实现个人数据库的管理，更适合于企业级的数据库应用。事务是并发控制的基本单位，通过事务，SQL SERVER 2000可以将逻辑的一组操作绑定到一起，以便服务器保持数据的完

26、整性。一个事务中可能包括了多个输入和输出操作，最终结果是从一个一致性状态达到另一个一致性状态，但在事务执行期间，数据库可能暂时处于一个不一致的状态，利用封锁技术可以有效的防止其他事务读不一致性的数据。此外 SQL SERVER 2000 还提供了存储过程机制，采用存储过程有以下特点：模块化编程，创建一个存储过程保存到数据库中，可以被应用程序反复调用，可以独立的进行修改。快速执行。在创建存储过程时，就进行了分析和优化。在第一次执行后，长驻内存，从而省去了重新分析，优化，编译的过程。减少网络通信量。存储过程可以有几百条TRANSACT_SQL语句组成，执行它只用一条语句即可，减少了在网络线上的数据

27、传输。所以我选用Microsoft SQL Server 2000作为后台数据库。1.4 论文的内容编排本文是在对某企业的进销存管理流程分析的基础上，利用软件工程基本理论与方法对系统进行了设计，然后用VB实现了这个进销存管理系统，最后对进销存管理系统进行了软件测试。本文的内容结构编排如下：第1章引言：简述本课题的研究背景与意义、国内外的发展现状和完成本课题的总体思路。第2章系统分析：首先对进销存管理系统进行功能需求分析，然后得出相关的数据流图和数据字典。4第3章系统设计：对系统体系结构进行分析、运用结构化设计方法设计出相应的系统模块层次图，同时进行了数据库的概念结构和逻辑结构的设计。第4章主要

28、功能模块的设计与实现：详细阐述了基本信息管理子系统、销售信息管理子系统、进货信息管理子系统、库存管理子系统、生产管理子系统中主要功能模块的设计与实现，最后重点介绍了设计中采用的主要技术。第5章测试：首先介绍了软件测试技术，然后具体阐述了运用黑盒测试技术对系统进行的单元和集成测试的过程和测试结果。最后对本系统进行了总结在结论中阐述了本系统的一些优点和不足。1基于C/S模式企业进销存管理系统的设计与实现第2章 系统分析2.1 功能需求分析系统开发的总体任务是实现各种信息的系统化、规范化和自动化。系统功能分析是在系统开发的总体任务的基础上完成。工业企业进销存系统需要完成功能主要有：(1)基本信息的管

29、理，包括产品设置、产品类别设置、供应商设置、业务员类别设置、业务员设置、仓库设置等。(2)进货信息的管理，包括订货单的管理、入库单的管理以及进货信息的查询等。(3)生产信息的管理，包括配料单信息的管理、生产计划单信息的管理、产品组装单信息的管理以及相关信息的查询等。(4)销售信息管理，包括销售单的管理以及销售信息的查询等。(5)库存信息的管理，包括转仓单的管理、产品盘点和转仓信息的查询等。(6)财务信息管理，包括应收信息的管理、应付信息的管理等。(7)系统用户管理，包括用户登陆、添加用户和更改用户密码。2.2 系统的数据流图为了便于对这个进销存系统进行有效地分析和设计,我们对进销存的业务流程进

30、行分析后,采用分层的方法得到了进销存管理系统的数据流图(DFD)(1)图2.1（b）系统用户管理模块分解的数据流图6（2）基本信息管理图2.2(a)基本信息管理模块总的数据流图图2.2（b）产品信息管理模块分解的数据流图（3） 进货信息管理12.3(b)进货信息管理模块分解的数据流图基于C/S模式企业进销存管理系统的设计与实现(4)销售信息管理图2.4(a)销售信息管理模块总的数据流图（5图2.5(b)库存信息管理模块分解的数据流图8（6图2.6(a)组装信息管理模块总的数据流图2.6(b)组装信息管理模块分解的数据流图2.3 系统的数据字典2.3.1 数据描述产品类别信息=类别编号+类别名称

31、产品信息=产品编号+产品名称+计量单位+类别+入库价格+分销价格+零售价格+生产厂家+更新日期+备注信息客户信息=客户编号+客户名称+地址+邮政编码+电话号码+公司主页+电子邮件地址+税号+银行帐户+开户银行+联系人+备注信息供应商信息=供应商编号+供应商名称+地址+邮政编码+电话号码+公司主页+电子邮件地址+税号+银行帐号+开户银行+联系人+备注信息 业务员类别信息=类别编号+类别名称业务员信息=业务员编号+业务员姓名+类别+电话号码+家庭住址+身份证号码+备注信息仓库信息=仓库编号+仓库名称1基于C/S模式企业进销存管理系统的设计与实现进货订单信息=订货日期+编号+业务员+供应商编号+产品

32、编号+数量+单价+折扣比例+总金额+备注信息入库单信息=入库日期+编号+业务员+供应商编号+产品编号+数量+单价+折扣比例+总金额+是否即时付款+是否记帐+预付比例+备注信息配料单信息=配料单编号+设置日期+产品编号+产品名称+产品计量单位+配料编号+配料名称+配料计量单位+配料数量+配料单价+配料总金额+业务员编号+备注信息生产计划信息=计划编号+计划制定人+计划制定时间+产品编号+产品名称+计量单位+生产数量+单价+总金额+计划起始时间+计划结束时间+备注信息销售出货单信息=销售日期+编号+业务员+客户编号+产品编号+数量+单价+折扣比例+总金额+是否即时付款+是否记帐+预付比例+备注信息

33、库存信息=更新日期+编号+仓库编号+产品编号+数量+单价+总金额+备注信息转仓信息=转仓日期+编号+业务员+转出仓库编号+转入仓库编号+产品编号+数量+总金额+备注信息2.3.2 数据处理10表2.5订货单管理1基于C/S模式企业进销存管理系统的设计与实现12第3章 系统设计3.1系统设计指导思想3.1.1 体系结构设计对本系统我采用C/S模式，C/S模式 专用性、交互性强。在这种模式中，客户端装有专门客户软件，更有利于完成某一项专门的任务。存取数据安全，因为C/S模式的平台一般采用适于局域网、安全性好的局域网络协议，如Netbeui协议，安全性有保证。网络通讯量低、速度快。因为只有二层结构，

34、网络通讯量只包括客户机与服务器之间的通讯量。通讯量低使得运行速度快，有利于处理大量数据。而B/S模式是三层的结构。网络通讯量不仅包括客户机和web服务器之间的通讯量，而且也包括web服务器与数据库服务器之间的通讯量。因而网络通讯量较大、使得运行速度变慢。在企业的“进、销、存”业务流程中由于核算组负责所有的进货业务，同时负责对各仓库的产品实时调拨以及供货方和客户的基础数据管理，计算和操作相对复杂，因而采用C/S结构。C/S结构是一种典型的二层结构，按照各自实现功能的不同，将应用程序分为两大部分：一部分是用于处理数据库，另一部分是用于处理应用程序、请求服务，客户部分负责执行前台功能，如管理用户接口

35、、数据处理和报告请求等。而服务器部分执行后台服务，如管理共享外设、控制对共享数据库的操纵、接受并应答客户机的请求等。C/S结构的工作原理：用户通过应用程序向客户机提出数据要求，客户机通过网络将用户的数据要求交给服务器，服务器的数据库管理系统执行数据处理任务，然后把经过处理后的用户需要的那部分数据，而不是整个文件，传输到客户机完成对其所需数据的加工。C/S系统的结构如图3.1所示。图3.1客户机/服务器结构图3.1.2 建设原则为了开发一个实用性强，安全性高，符合客户要求的系统，必须遵照好的原则去开发系统，开发工作必须按照以下建设原则：(1)规范、统一各类所需的管理信息，遵循国家标准。用统一、规

36、范、完整的数据格式 1基于C/S模式企业进销存管理系统的设计与实现描述，将所有的业务工作标准化、规范化、电算化。(2)系统设计简洁、直观，易操作和维护，并具有可扩展性，适于非计算机人员使用。系统的设计一定要在符合传统的人工管理的基础上，做到业务功能实用、到位，简单、易学、易用，界面友好，美观大方，便于管理。如果将来应用需求发生变化时，应保证系统的可修改性和可扩充性。(3)层次化的数据共享，为所有用户提供数据保障。在保证数据规范、标准、一致的前提下，对数据的存放进行合理布局，该放在服务器上的数据和该放在客户端的数据要科学界定，区别对待。在保证数据安全的同时一定要提供对数据的高效处理能力。(4)系

37、统的安全性和可靠性。系统要能够对用户进行身份认证和权限检查，保证数据的安全、可靠，并具有数据备份和数据恢复功能。软件设计过程中要坚决贯彻软件产品化的设计原则和实施方案。另外系统还应能够适应计算机技术的更新换代。3.2 功能设计总体设计采用结构化设计方法（SD），结构化设计方法设计是基于模块化、自顶向下细化的设计原则的设计方法，在具体的设计中，根据基本的模块化设计原则“高内聚低耦合”，将需求分析中所产生的数据流图转换为模块结构图。本课题开发的系统包括系统用户管理、基本信息设置、进货信息管理、生产信息管理、销售信息管理、库存信息管理以及财务信息管理的功能。系统功能模块如图3.2所示，各模块完成如下

38、功能(1)用户管理模块：系统启动后，需要对用户进行判断。如果登陆者是授权用户，将进入系统，否则将停止程序的执行。系统管理员可以添加新用户并记录其相关信息。用户可以修改自己的密码。(2)基本信息设置模块：系统管理员可以对产品信息、产品类别信息、客户信息、供应商信息、业务员信息、仓库信息作添加和修改等相关操作。(3)进货信息管理模块：主要有订单管理、入库单管理以及进货信息查询。一般进货分两步：第一步到供应商签订订货单，达成进货意向；第二步产品到货并入库，完成产品入库单、库存信息更新。入库产品信息可以按照供应商、保存仓库和业务员进行查询。(4)生产信息管理模块：主要功能有配料单、生产计划、组装单的录

39、入和修改和有关生产信息的查询。(5)销售信息管理模块：主要功能有订货单、销售单的录入和修改以及销售信息的查询。销售一般分为两步：第一步，客户订货并获得销售的意向，同时为生产、进货信息提供需求；第二步。产品出库，同时完成库存和出活信息的更新。销售信息可以按照客户、出货仓库和业务员进行分类查询。14(6)库存信息管理模块：根据经营活动的需要，产品在各个仓库中调配并产生相应的转仓单并且可以按照转出仓库、转入仓库和转出转入方式查询转仓信息。盘点产品通过指定仓库或者产品名称来完成。(7)财务信息管理模块：主要功能有应收款项的收款登记和应付款项的付款登记。图3.2系统功能模块图3.3 数据库设计进销存管理

40、系统数据库设计要求：企业进销存管理系统是为采集，加工，存储，检索，传递企业经营的基础资料及管理资料而建立的人机系统。资料的管理是企业进销存管理系统成功的关键。数据必须准确，可信，可用，完整，规范，及安全可靠。企业数据库是有企业经营的基础资料及其他一些相关数据组成的完整集合。数据库应包含与企业进销存相关的全部资料的信息，便于快速查询，数据共享。数据库管理系统的选择应根据企业进销存数据量的大小。企业的经济状况、经营状况以及考虑到企业今后的发展来确定。3.3.1 数据库概念结构设计数据库概念结构设计是将前面对企业进销存管理系统的功能需求分析得到的用户需求抽象为概念模型。这里主要通过设计图来明确地表示

41、进销存管理系统的各功能模块中实体之间的联系。实体属性图如图3.3所示，进销存E-R图如图3.4所示1基于C/S模式企业进销存管理系统的设计与实现16图3.3实体属性图1基于C/S模式企业进销存管理系统的设计与实现图3.4 进销存管理系统E-R图3.3.2 数据库逻辑结构设计将数据库概念结构设计阶段设计好的基本图转化为相应的逻辑结构。在本系统的数据库设计中运用了规范化理论，因为过于追求数据的精简就会增加操作的复杂程度。所有的数据表都只规范到了第二范式(2NF),即关系模式R(U,F)中的所有非主属性都完全依赖于任意一个候选关键字。 进销存管理系统主要数据表：表3.1为进货订单表表3.1 dh进货

42、订单表18表3.2为入库单表表3.2 inh入库单表表3.3为销售订单表表3.3 xsdh销售订单表1基于C/S模式企业进销存管理系统的设计与实现表3.4为销售单表表3.4 outh销售单表表3.5为库存表表3.5 kucun库存表20表3.6为转仓单表表3.6 zc转仓单表表3.7为配料单表表3.7 mate配料单表1基于C/S模式企业进销存管理系统的设计与实现表3.8为生产计划表表3.8 plang生产计划表22第4章 系统功能模块的实现4.1 主要功能模块的设计与实现4.1.1 进销存管理子系统的流程设计进销存管理系统是一个比较复杂的系统，它的内部包括了若干个子系统及许多功能模块，各个功

43、能模块之间有数据信息的交流，如库存信息就是来源于销售信息，进货信息，生产信息等，因此，在具体设计中要使各个组成部分协调一致，成为一个整体。对数据在某一模块内的变化，其结果要全面周密地覆盖整个系统，确保各种关联数据逻辑关系的正确性。经过对企业进销存流程的分析，现做出本系统的数据流程图如下图 进销存管理系统设计系统除了要实现某些具体的功能，对系统进行初始化设置更是所有功能实现的基础。本系统就仓库信息、业务员信息、业务员类别、供货商信息、商品类别和商品信息进行了初始化我们可以对其进行维护，包括增加、删除、修改仓库信息、业务员信息、业务员类别供货商信息、商品类别和商品信息。下面给出产品

44、信息管理的工作流程如图4.1所示1基于C/S模式企业进销存管理系统的设计与实现图4.2进销存管理系统的数据流程图用户设置产品信息时，输入所有的与产品相关的信息。当输入信息错误时系统给出相应的提示，更新日期系统自动生成。产品信息设置完单击“保存”后系统提示用户设置成功。具体实现方法如下：Private Sub cmdSave_Click()Dim intCount As IntegerDim sMeg As StringDim MsgText As StringFor intCount = 0 To 724If Trim(txtItem(intCount) & " "

45、) = "" ThenSelect Case intCountCase 0sMeg = "款号"Case 1sMeg = "名称"Case 2sMeg = "单位"Case 3sMeg = "入库价格"Case 4sMeg = "分销价格"Case 5sMeg = "零售价格"Case 6sMeg = "生产厂家"Case 7sMeg = "设置日期"End SelectsMeg = sMeg & "

46、;不能为空！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" txtItem(intCount).SetFocusExit SubEnd IfNext intCountFor intCount = 3 To 5If Not IsNumeric(Trim(txtItem(intCount) Then sMeg = "产品价格"sMeg = sMeg & "请输入数字！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" tx

47、tItem(intCount).SetFocusExit Sub1基于C/S模式企业进销存管理系统的设计与实现End IfNext intCountIf gintWZSmode = 1 ThentxtSQL = "select * from dm_wz where dm ='" & Trim(txtItem(0) & "'"Set mrc = ExecuteSQL(txtSQL, MsgText)If mrc.EOF = False ThenMsgBox "已经存在此产品编号的记录！", vbOKOnl

48、y + vbExclamation, "警告" txtItem(0).SetFocusExit SubEnd Ifmrc.CloseEnd IftxtSQL = "delete from dm_wz where dm ='" & Trim(txtItem(0) & "'"Set mrc = ExecuteSQL(txtSQL, MsgText)txtSQL = "execute wz_setup '"For intCount = 0 To 2txtSQL = txtSQL &

49、amp; Trim(txtItem(intCount) & "','"Next intCounttxtSQL = txtSQL & Trim(Combo1(1) & "','"For intCount = 3 To 7txtSQL = txtSQL & Trim(txtItem(intCount) & "','"Next intCounttxtSQL = txtSQL & Trim(txtItem(8) & "'&

50、quot;Set mrc = ExecuteSQL(txtSQL, MsgText)If gintWZSmode = 1 ThenMsgBox "添加记录成功！", vbOKOnly + vbExclamation, "添加记录"For intCount = 0 To 8txtItem(intCount) = ""Next intCounttxtItem(7) = Format(Now, "yyyy-mm-dd")mblChange = FalseUnload frmWZSetup26frmWZSetup.txtS

51、QL = "select * from dm_wz"frmWZSetup.ShowElseIf gintWZSmode = 2 ThenUnload MeUnload frmWZSetupfrmWZSetup.txtSQL = "select * from dm_wz"frmWZSetup.ShowEnd IfEnd SubPrivate Sub Combo1_Change(Index As Integer)mblChange = TrueEnd Sub产品信息管理模块产品信息设置运行界面如图4.3所示：图4.3产品信息设置界面4.1.3 具体功能的实现

52、由于有些功能实现起来比较简单，如应收款项的收款登记、应付款项的付款登记、产品盘点；或者有些模块功能相似，如各查询模块，所以在本文仅详细介绍了入库单管理、组装单管理、销售单管理、转库单管理和库存信息查询这五个模块的实现过程。(1)入库单管理产品入库需要实现入库单和库存信息的更新。在实现这个模块功能的过程中需要特别注意多个数据表的数据关联如：修改入库单信息时，首先需要删除入库记录，恢复库存信息到原始状态然后添加新的入库记录，并更新库存信息。工作流程图如图4.4 1基于C/S模式企业进销存管理系统的设计与实现所示图4.4进货信息管理工作流程图产品进货入库时设置进货相关的信息，如果输入错误时系统给出相

53、应的提示，当设置完后单击“保存”后会显示操作结果。具体实现方法如下：Private Sub cmdSave_Click()Dim intCount As IntegerDim sMeg As StringDim MsgText As StringDim mrce As ADODB.RecordsetFor intCount = 1 To 7If Trim(txtItem(intCount) & " ") = "" ThenSelect Case intCountCase 1sMeg = "订货单号"Case 2sMeg = &

54、quot;供应商代码"28Case 3sMeg = "产品代码"Case 4sMeg = "数量"Case 5sMeg = "订货单价"Case 6sMeg = "折扣比例"Case 7sMeg = "总金额"End SelectsMeg = sMeg & "不能为空！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" txtItem(intCount).SetFocusExit SubEnd IfN

55、ext intCountIf txtItem(8).Visible = True ThenIf Trim(txtItem(8) & " ") = "" ThensMeg = "预付比例不能为空！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" txtItem(8).SetFocusExit SubEnd IfEnd IfFor intCount = 0 To 2If Trim(Combo1(intCount) & " ") = "

56、" ThenSelect Case intCountCase 0sMeg = "业务员"Case 1sMeg = "供应商名称"1基于C/S模式企业进销存管理系统的设计与实现Case 2sMeg = "产品名称"End SelectsMeg = sMeg & "不能为空！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" Combo1(intCount).SetFocusExit SubEnd IfNext intCountFor intC

57、ount = 4 To 5If Trim(Combo1(intCount) & " ") = "" ThenSelect Case intCountCase 4sMeg = "仓库名称"Case 5sMeg = "支付方式"End SelectsMeg = sMeg & "不能为空！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" Combo1(intCount).SetFocusExit SubEnd IfNext i

58、ntCountFor intCount = 4 To 7If Not IsNumeric(Trim(txtItem(intCount) Then sMeg = "请输入数字！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" txtItem(intCount).SetFocusExit SubEnd IfNext intCountIf txtItem(8).Visible = True Then30If Not IsNumeric(Trim(txtItem(8) ThensMeg = "预付比例请输入数字！

59、"MsgBox sMeg, vbOKOnly + vbExclamation, "警告"txtItem(8).SetFocusExit SubEnd IfEnd If'添加判断是否有相同的ID记录If gintINHmode = 1 ThentxtSQL = "select * from inh where inh_no ='" & Trim(txtItem(1) & "'"Set mrc = ExecuteSQL(txtSQL, MsgText)If mrc.EOF = False

60、ThenMsgBox "已经存在此入库单编号的记录！", vbOKOnly + vbExclamation, "警告" txtItem(1).SetFocusExit SubEnd Ifmrc.CloseEnd If'先删除已有记录txtSQL = "delete from inh where inh_no ='" & Trim(txtItem(1) & "'"Set mrc = ExecuteSQL(txtSQL, MsgText)'再加入新记录txtSQL = "execute inh_setup '"txtSQL = txtSQL & Trim(txtItem(0) & "','"txtSQL = txtSQL & Trim(Combo1(0).ItemData(Combo1(0).ListIndex) & "','"