前言:一篇好文章的诞生,需要你不断地搜集资料、整理思路,本站小编为你收集了丰富的仓库管理系统设计的意义主题范文,仅供参考,欢迎阅读并收藏。
关键词:RFID技术;矿山机械;仓储管理;智能化
中图分类号:F253 文献标识码:A
Abstract: Based on the current situation of China's mining equipment spare parts management, RFID technology, which replaces the bar code technology, is applied in the mining machine spare parts warehouse management and to complete the intelligent of the warehouse management. The intelligent management of warehouse is implemented by using RFID in the in-out warehouse and inventory operation, and the safety of warehouse is also protected by using RFID technology through the system identification and security alarm module. Using this system can realize tracking key spare parts, and the requirement of safety stock is satisfied by using the intelligent prediction replenishment. Finally it makes the management of spare parts intelligentization, transparency, and information.
Key words: RFID technology; mining machinery; warehouse management; intelligentization
目前我国的矿山设备备件种类繁多,价格昂贵,而且有些备件是由国外引进,采购手续复杂,订购周期长,这就给备件库的管理与安全库存带来了挑战[1]。有些企业缺乏备件精细化管理意识,企业的备件使用部门、计划采购部门、设备管理部门和技术部门之间缺乏协同合作和信息沟通,最终造成备件超储、积压、甚至报废,导致大量资金的浪费,或是供应不及时,增加停机时间,使客户企业生产活动和经济效益受到损失[2]。随着我国经济的不断发展和转型,“中国制造”必然向“中国智造”转型。备件管理是矿山设备管理的关键与核心,因此针对备件库的智能管理应运而生。
为有效地管理备件仓库,目前大多数企业采用条形码技术,虽然条形码技术价格低廉,应用广泛,但是条形码印刷后不能更改,无法循环利用,使用效率低,并且扫描货物信息时需要近距离逐个对准货物条形码,工作效率慢,不能实现智能化管理。相比之下,RFID(无线射频识别, Radio Frequency Identification)技术因其非接触性以及可对多目标同时快速识别的特性正逐渐应用在仓库管理系统[3]。
1 RFID技术及应用
RFID技术是一种非接触式的自动识别技术,可通过无线电讯号识别特定目标并读写相关数据,识别工作无须人工干预[4]。基本的RFID应用系统由以下部分组成:
(1)标签:俗称电子标签或智能标签,由耦合元件及芯片组成,每个标签具有唯一的电子编码,附着在物体上标识目标对象。由于矿机备件多是金属,所以在仓库管理中多采用抗金属标签;
(2)读写器:读取或写入标签信息的设备,有手持式和固定式;
(3)应用接口或中间件软件:是应用系统和读写器间数据流入和数据流出的软件;
(4)传输网络:网口、232接口或USB接口(如发卡器),wifi(固定式读写器)或蓝牙(手持式读写器);
(5)业务应用与管理系统:规范仓库作业流程,改善仓库的管理,如WMS(Warehouse Management System的缩写)仓库管理系统。
在矿机备件仓库管理过程中使用RFID技术,可以有效地减轻或代替现有的人工操作,实现仓库管理的智能化。RFID技术在仓库管理中的主要作用如图1所示。
2 智能作业流程
2.1 智能仓库管理
一般的仓库作业包括出入库管理和在库管理。
入库时,备件与写入信息的电子标签关联,经过叉车组盘后通过入库通道,使用仓库入口处的固定式读写器采集备件信息。在通过入口的RFID读写器时,备件的信息都会被自动记录。入口处的RFID固定读写器将备件的详细信息自动传递给智能仓库管理系统(EWMS),该系统将所接收到的信息与产品入库单进行身份验证。如果电子标签信息合法就进行后续工作的处理,否则将会反馈报警信息,库存管理人员接收到报警信息后拒绝产品入库。在接收到的信息合法情况下系统分配库位,根据系统分配对备件执行上架,利用手持RFID读写器将货架标签与备件标签关联,更新数据库,完成入库操作。流程图如图2所示。
出库时,销售部门接到客户订单后向EWMS发送出库通知,系统接收到出库指令后通过数据库中所记录的备件货位信息提示库存管理人员扫描备件的电子标签,库存管理人员进行产品分拣和出库作业,当备件通过出库口通道的RFID读写器时,出库口RFID读写器获取经过出库通道的备件电子标签内所包含的详细信息,自动上传到EWMS,系统对接收到的电子标签信息与出库单核对,如果电子标签信息合法就进行后续工作的处理,否则将会反馈报警信息。在电子标签信息合法情况下生成出库清单,取消电子标签与备件及货位的关联并更新库存管理系统中的信息,实现电子标签的循环使用。出库流程图如图3所示。
在库管理主要是对在库产品进行盘点管理、备件查询、货位查询、备件信息的修改。利用RFID阅读器对在库备件的标签进行扫描,并与系统数据库中所记录信息进行比对核实,方便库存管理人员实时、准确地掌握在库产品的详细信息。
2.2 智能身份识别
为工作人员发放RFID标签,在RFID标签内写入基本信息,并设置权限,即库管是高级用户,其他工作人员是普通用户。利用在库区门边的读写器,和工作人员佩戴的RFID标签,可以识别进入库区的人员是否符合规定,执行报警操作。其次,在进出仓库时只有高级用户,经过接受器扫描验证,方可授予作业权限进行出入库操作,普通用户能进入仓库,但是不能进行出入库操作,未佩戴标签的非法用户进入仓库,执行门禁或报警操作。流程图如图4所示。
2.3 智能防盗报警
当仓库发生被盗情况时,仓库的物理报警系统(如声光报警系统)被破坏,被盗取备件离开带有RFID电子标签读写器的仓库出库口时,标签读写器接收到被盗产品上RFID电子标签发射的信号,并将被盗备件的详细信息发送到EWMS,系统将接收到被盗备件的详细信息与系统内所记录信息进行核实比对,由于系统没有得到正常的出库指令,所以RFID标签读取到的备件状态信息与系统记录的备件状态信息不一致,说明该备件是未经授权移动而异常出库,执行门禁或报警操作,并通过产生智能报警报表将产品的详细信息(例如货位信息)通过PC端或手机终端发送给库存管理人员,在最短时间内起到智能报警作用,而库存管理人员通过得到的被盗备件详细信息例如被盗备件货位号能够尽快对被盗备件定位,减少了纯人工盘查操作环节,为后期的破案工作和追回被盗备件争取了更多有效时间,减少了仓库和企业的损失。流程图如图5所示。
2.4 智能备件预测
利用RFID无线识别技术对矿机零部件中关键件进行全程跟踪标识,达到全程智能化的管理[5]。设备厂商提前准确地预测到维修厂备件的未来需求是至关重要的,从而决定何时给维修厂补货以及补货数量的多少。
在关键件装入设备时,主要是建立关键件号与设备号的对应联系。关键备件上贴RFID 标签,标签里写入关键件的各种需要跟踪的信息,包括该关键备件的自身详细信息,销售信息,使用维修记录信息,库存信息,各种收集到的信息都上传到系统整合平台上。设备厂商将这些信息汇集起来对其进行相应的分析处理,利用数据挖掘技术对关键件的需求进行预测模型训练,建立未来相关的预测模型,对关键件的需求进行及时的预测补货,自动生成生产订单,然后经过系统审核和修改确认最后的订单。预测模型图如图6所示。
3 基于RFID技术的智能备件库管理系统设计
3.1 系统构架设计
矿机备件库管理系统构架共分为三层:
信息采集层:利用发卡器将备件信息写入标签,通过读写器采集备件信息和储位信息。主要设备有发卡器、手持式读写器、固定式读写器以及电子标签。
信息传输层:通过无线通讯技术或计算机网络技术将采集到的信息传输到数据库。主要设备有前端控制器、无线接入设备和相关的网络、数据库设备。
信息管理层:对采集数据信息进行分析、处理与管理,包括数据库服务器、相关的网络服务器和信息管理软件。
系统利用DELPHI平台+ SQL Server 2000构建客户端、应用服务器和数据库服务器三层结构。
3.2 系统模块设计
系统主要有五大功能模块:基本信息模块、仓库管理模块、身份识别模块、智能报警模块和智能预测模块。如图7所示。
基本信息管理模块包含综合信息和标签管理(写卡、读卡)。综合信息包括登录系统、客户服务、储位及备件设置等。写卡是库存管理人员在专门写标签区域向RFID电子标签中写入产品的入库信息,读卡是在整个库存管理中都会出现的操作。
仓库管理模块主要包括出入库管理和在库管理。入库管理包括入库信息、入库报表以及入库作业。在库管理主要包括盘点管理、货物查询以及货位查询。出库管理包括出库信息、出库报表以及出库作业。
身份识别模块通过设置权限区分不同工作人员,利用标签管理将该信息写入标签达到对使用人员权限的管理。当有非法身份进入仓库时,启用报警及门禁管理。
智能报警模块当有异常出库时,产生报警并产生智能报警报表将产品的详细信息(例如货位信息)通过PC端或手机终端发送给库存管理人员,同时启用门禁系统。
智能预测模块利用RFID技术采集关键备件的库存信息、维修信息以及销售信息,根据相关算法预测补货,生成订单,完成智能预测过程。
3.3 软件开发
3.3.1 软件开发方式。该智能仓库管理系统(EWMS)的开发方式有两种:(1)自己动手编写程序,完成底层读写器对电子标签的读写以及读写器与上位机的通信等。对于开发者,这种方式具有很大的灵活性,但同时要求开发者具有较高的软、硬件水平,不是开发者都能完成的。(2)利用厂商提供的Windows标准动态链接库(DLL)文件。采用该方式不仅灵活,而且开发过程比较容易。
下面主要介绍Delphi环境下采用第二种方法。
3.3.2 动态链接库(DLL)。“动态链接库”(DLL)是一个可执行的并可以被多个Windows应用程序共享的程序模块,包含了一些可以被多个Windows应用程序或DLL共享的代码、数据和资源。DLL不是代码的复制,不用重复编译或链接,而是在应用程序运行时刻载入,从而提高了运行效率。程序利用RFID 读写器厂家提供的DLL(EPCSDK.dll)实现函数的调用。下面对所用到的函数说明如下:
(1)OpenComm
函数原型:HANDLE OpenComm(int portNo);
功能说明:打开串口。
(2)CloseComm
函数原型:void CloseComm(HANDLE hCom);
功能说明:关闭串口。
(3)IdentifySingleTag
函数原型:BOOL IdentifySingleTag(HANDLE hCom, BYTE* tagID, BYTE* antennaNo,BYTEReaderAddr);
功能说明:识别单个标签。
(4)StopReading
函数原型:BOOL StopReading(HANDLE hCom, BYTE ReaderAddr);
功能说明:使读卡器停止读取标签。通常是在定时模式下,要临时停止读标签,使用该函数,如果要恢复到定时模式,此时要发送 ResumeReading,即复位读取命令。
(5)ResumeReading
函数原型:BOOL ResumeReading(HANDLE hCom,BYTE ReaderAddr);
功能说明:复位读写器,相当于对读写器重新上电,用于定时模式下,临时停读标签之后,恢复到定时读取标签。
(6)FastWriteTagID
函数原型:BOOL FastWriteTagID(HANDLE hCom, int bytesNum, const BYTE* bytes, BYTEReaderAddr);
功能说明:快写标签ID,只写标签的EPC区,即通常所说的标签号码。
(7)FastWriteTag
函数原型:BOOL FastWriteTag(HANDLE hCom, BYTE memBank, BYTE address, BYTE WordCount,constBYTE* bytes,BYTE ReaderAddr);
功能说明:快写标签,包括EPC区,数据区和保留区。
在Delphi静态调用DLL时,一般要用extern子句声明要调用的过程或函数及其所在的DLL文件名。例如实现打开串口,需要先声明调用的打开串口函数,Function OpenComm(PortNo:Integer):THandle;Stdcall External ‘EPCSDK.dll’;然后,在程序中直接调用OpenComm函数即可打开相应串口。
4 结束语
该备件库智能管理系统的应用可以实现有关仓库管理的智能化,通过系统的身份识别与防盗报警模块为仓库安全提供保障,利用该系统可以实现关键备件的跟踪,通过智能预测进行补货,满足了安全库存要求。将RFID技术引入矿山机械备件仓库的管理有如下重要意义:
(1)矿山机械备件价格昂贵,且由于其大小不一,形状不规则等原因导致其必须放置在集装箱内运输,所以每次验货都需要开箱扫描检验,不便于管理。而RFID技术可以透过外包装进行无光源读取数据,则免去了开箱检验的环节,提高了工作效率。
(2)RFID标签是靠电磁波工作的,而金属环境会阻碍电磁波的传播,而矿山机械都属于金属器械,所以在应用RFID技术时需要选用抗金属标签,相对于其他场合的RFID标签,其技术要求也会相对提高。所以如果RFID技术在矿机备件仓库中能够很好的应用,在其他方面,这套仓库管理系统会得到普遍的推广。
参考文献:
[1] 杨好强,于海东,孙文生. 矿山设备备件管理浅谈[J]. 矿山设备,2011(5):96-97.
[2] 姚春江,陈小虎,周永涛,等. RFID技术在维修备件仓储管理中的研究[J]. 微计算机信息,2009,25(10-2):176-177.
[3] 刘新亮,姜同强,王雯. RFID在仓储物流中的应用[J]. 商场现代化,2008,11(55):120-122.
关键词:仓库管理 零库存 周期盘点 系统设计
当今社会,物流业发展如雨后春笋,各类产品流通分外频繁,随着产品流通增多,对仓库的数量要求也增多,因此涌现出一大批大型仓库。这些经营性仓库的诞生,在很大程度上为物品运输中所需的临时中转提供了方便,促进了经济以及社会发展。但是这些仓库自身的性质导致在日常活动中,物品出库以及入库非常频繁,出库往往不能按时完成,入库所占空间不固定,使仓库管理变得复杂。尽量使库存量保持最佳,力争向理想化的“零库存”靠近,在减少财力、物力、人力的前提下管理好库存,保障最大的供给,是众多企业竞相追逐的目标。因此,研究如何提高仓库管理水平,尽量降低消耗,提高效益,更好的服务于物资供应,具有深刻的意义。
■一、传统仓库管理中存在的不足
传统的仓库管理模式较为简单,只是一种静态管理,很难使企业资源得以充分利用,并且传统仓储业主要是依照货主委托对其相关物品进行养护以及保管,功能较为单一。而仓库管理仅仅是包装、上架、收货、拣货等仓库内部的一些活动,而对仓库规划、布局、选址等往往不够重视,在经营传统业务时,并未引进仓储新技术。而现代化的仓库不再是以往的静态储存场所,更呼吁掌握仓库的实时、动态数据从而更及时、准确的提供物资供应,以“零库存”的思想,尽量减少不必要的库存,加快内部库存流动速度,提高其透明度,使资源合理利用。具体说来,有以下几点有待改进。
1、仓库系统设计未尽合理
物流系统的设计过程中,仓库具体数目以及其地理位置取决于产品要求、制造点、客户三个因素。仓库往往是企业通过努力赢得效益以及时间的体现,而传统的仓库设计已经无法适应市场多元化对应的高要求,也不能够满足消费者对其所需求的高水平、高质量的服务。
2、盘点方式落后
传统的对物品的盘点是由手工方式进行的,负责盘点的人员随身携带笔和纸亲临现场,逐条的记录信息,而且尤其对于大件物品,翻动盘点极其不便。此外,盘点物品从而完成数据采集并不意味着盘点整个过程的终结,采集好数据之后,人工将其输入计算机,对相关数据进行汇总、比较。这样的操作流程不仅耗用大量的时间,而且对人力也是一种浪费,同时,准确性不够高,人为错误时有发生。
3、文字记录式影响准确性
传统模式中的物品入库以及出库时,往往依靠纸张文件、非自动化的系统对进出物品进行追踪、记录,主要是根据人为记忆来管理仓库。而对于大范围的存储区而言,人为因素往往具有的不确定性导致采集物品存放点等信息变得格外繁琐,传递滞后时有发生,库存量因此上升,这与现代化“零库存”理念相悖,难以保证确切的发货日期,导致决策不够准确。这种主要依靠人力收集数据的方式很难实现系统化,造成人力浪费,增加了储存量,降低了仓库有限空间利用率,减缓了资金周转速度,不利于企业效益的提高。
4、管理软件无法及时反应市场变化
随着库存数量以及种类增多,出入库不断提升频率,仓库传统的作业机制中很大程度上阻碍了工作效率。伴随着不断加剧的商品物流,原有的以计算机为基础的仓库管理系统已经很难适应仓库管理及时、快速、准确、高效的要求。一个现代化的配送以及履行中心必不可少,传统的软件无法轻松实现改变的业务流程。
■二、增强仓库管理效率的方法
1、制定合理的仓库决策
合理的仓库决策是提升仓库物资流动运行质量的基本前提。仓库决策包括仓库设计、选址、布局等方面相关的决策。首先应当展开关于仓库设计中所涉及的材料搬运、空间要求、布局等主要计划,同时选择仓库的确切地点。这些决策都在很大程度上决定了仓库自身的特点,通过这些才能够得出可能具备的搬运效率。下面分别就以上几个方面加以说明。
首先,仓库选址方面。利用地点分析技术来选址仓库地址。完成选址后,就应当确定确切的建设地点。选择分析时考虑的首要因素是服务成本以及服务可得性。其中,采购所对应的获取成本对选址影响最大。此外,还必须对作业费以及设备安装费(如税金、公路通道、铁路铁轨、保险费率等)进行评估,上述费用具有地区差异性,因此,可以适当调整仓库位置,变成客户对应的供应商。如为了运输效率的提高冷藏食品相关的分销商适当调整仓库位置。
其次,仓库布局方面。仓库的总平面是否合理,对仓库储运质量、盈利水平、储运成本、作业效率等都有很大影响。在新仓库建设中应当对仓库总体布置予以重视,同时,适当调整老仓库。仓库在布局上应当与仓库作业流程相互配合,这由材料搬运以及预算的地面计划共同决定,从而更好的服务于产品流程。根据需要对仓库布局进行适当优化。
再次,仓库物理设计方面。仓库中,移动所储存的产品为主要功能,仓库通常被视为某种结构设计,最大限度的服务于产品流动。因此,必须精确对需要配送的产品进行研究,确定物资在仓库进出时对于的平均重量、总容积、总规模等。
2、实行订货周期盘点
依照帕累托定律,采取A-B-C模式的库存分类,对周期盘点计划进行改进,减少企业库存,掌握物品分布情况,准确掌握哪些物品已经过期、哪些周转缓慢等情况。实践证明,采用周期盘点能够获取准确的库存记录,提高了库存管理质量。
3、实行储存作业自动化
首先,引进条码技术。仓库管理中使用条码技术,自动化的采集仓库调拨、人库、移库移位、到货检验、库存盘点、出库等相关数据,保证所有环节能够高效、准确的输入数据,力求保住企业能够准确、及时的对库存中实际数据进行掌握,适当的控制或者保持企业库存。因为条码识别易于操作、准确、快速,因此,在供应物资的配送中心或者仓储配送、出入库中使用条码,可能大大节省人力。同时,可以有效避免人为差错,保证工作效率,使商品运转得以顺畅进行。
其次,自动化库房有待加强建设。目前,自动化库房朝着智能自动化趋势发展得益于迅速发展的人工智能技术。数据采集技术、扫描技术、条码技术等应用于自动引导车、传送带、仓库堆垛车等设备上。
4、安装WMS系统
WMS能够提高作业速度、生产效率、库存精确性。在与自动识别设备相连接时,可以采用WMS或者与之相似的方案。目前,众多分销商都在努力寻求此解决方案,而仓库不容置疑的变成适用此技术的相对前端机构,此技术也为其使用企业带来了很多效益。同时,WMS能够使仓库的资产以及设备、空间得到充分利用。在很大程度上节约人力的同时实现仓库的优化、标准化以及其功效。此外,WMS能够紧密满足顾客要求。通过跟踪库位对应的库存,对库存控制严格执行,使顾客对库存中能够用来销售的产品对应的具体数量十分有信心,从而减少库存,尽量向“零库存”的目标迈进,使仓库空间得以充分利用,减少顾客在其外部仓库方面的需求。
此外,还可以建立网络仓库从而尽量降低经营成本,使仓库效益得以提高。
参考文献:
[1] 罗剑宏,彭秀清. 浅谈新形势下中国中小型生产企业的仓库管理[J]. 科技情报开发与经济, 2008,(02)
[2] 贾桂珠,张丽萍. 仓库管理在物资管理中的重要性[J]. 辽宁经济, 2008,(04)
1.1废旧家电逆向物流概念
废旧家电是指因为淘汰、损坏或报废的家电,为了减少环境污染和资源浪费,就必须对废旧家电开展逆向物流。所谓的废旧家电逆向物流是指废旧家电产品的资源循环利用和无害化处理为目的,对消费者使用后的废旧家电产品组织进行的回收、运输、储存、加工处理等活动。
废旧家电逆向物流是淘汰或报废的废旧家电产品,从消费者手中沿着回收渠道逐步流动到废旧家电处理企业的过程,废旧家电逆向物流是为了对废旧家电产品进行资源循环再利用和有害物质的无害化处理。为实现逆向物流的目的,需要对废旧家电产品进行回收、分类、检验、拆卸、再生产及报废处理等活动。
1.2废旧家电逆向物流渠道
目前,我国废旧家电产品逆向物流渠道有三种。
一是走街串巷的以废品收购为主的个体商贩。他们用低价回收的方式从消费者手中获得废旧家电,对于还能继续使用的旧家电则适当加价转卖给二手家电经营商,而那些无法正常使用的报废家电则送往地下拆卸点。二手店对这些废旧家电进行清洗、检修和重装,再重新销售给外来务工人员或边远农村,实在无法修好的废旧家电则在地下拆卸点,通过简单拆卸提取有用的零部件,剩余部分则成为对环境危害极大地电子垃圾。
二是家电卖场的“以旧换新”活动,但其回收后的产品大多也是转卖给二手市场,以获利为主,并非公益性的行为,并没有形成长效的回收机制和固定的回收渠道。
三是废品回收公司,这类企业一般都来源于早期就已存在的物流系统且经营的时间都较长,拥有自己固定的业务范围和独特的物资经营渠道。他们针对于废旧电子产品的处理主要是对此类产品的拆解,再处理业务。对于有用的零部件等进行回收和再利用,而对于其他没有利用价值的板材等则转卖给专业的厂家进行进一步的材料回收。这种模式通常有很广泛的人力基础(城市垃圾收集人员),活动易于开展,业务容易进行。
上述三种渠道的共同点是各方都从自身经济利益出发,不能兼顾社会的公共利益,还给公共安全带来不少隐患。
1.3废旧家电逆向物流存在的问题
目前我国废旧家电处理处于无序回收状态,主要流向收废品的小贩和非法拆解的地下作坊。其将仍能继续使用的旧家电改头换面后,以新产品的身份进入市场销售给低收入消费者或边远地区。这种做法会严重损害该品牌家电的信誉与社会地位。或者利用不正确的方法对废旧家电进行拆解、处理,以获得有用的零部件或贵重金属,这样不仅造成资源浪费,还会严重地污染环境。
国家建立了废旧家电回收处理试点,同时一些外资企业也在我国建立电子废弃物处理厂,但是在实际运行过程中,由于采用高价的拆解设备,同时因不擅长回收社会废旧家电,无法回收到足够多的废旧家电,而导致其规模上不去、不能盈利。
2废旧家电逆向物流存在问题的成因分析
作为家电行业供应链殊的一环,与新家电销售正向物流相比,废旧家电逆向物流有着很大的差异性和复杂性。废旧家电逆向物流具有以下几个特点:
首先,由于家电正向物流具有明确的产品需求方,正向物流的流向、数量都能够明确确定,而废旧家电产生的地点、时间、数量和质量相关信息都是不可预知的,因此无法有效做出相应的回收策略。
其次,由于废旧家电的淘汰信息分散且与回收企业资源不对称,导致废旧家电逆向物流的地点较为分散、无序,且不可能集中一次承接到大批量淘汰家电形成规模效应,有些种类的产品需要积累很长的时间才能有一次较大规模的物流。这一切都使得逆向物流的过程运作的非常缓慢。
再次,由于不同种类的废旧家电所使用的处理方式不同,必然会引起逆向物流的流程和手段差异性,产品种类的多样性信息造成了回收企业开展逆向物流的决策困难,无产品种类信息分析使很多回收企业不知开展废旧家电逆向物流。
最后,废旧家电回收企业没有根据实际情况有效开发设计符合自身需求的信息系统,逆向物流过程中物流信息技术使用不全面、不恰当,回收企业开展逆向物流过程中缺少有效监控,导致回收企业逆向物流成本过高。
以上四个特点决定了废旧家电逆向物流的实施必然是高难度并且是高成本的,事实也确实如此。面对我国日益加快的家电淘汰大潮,如何有效地降低废旧家电逆向物流存在的缺陷,改变废旧家电逆向物流的落后现状,切实做好环境保护,彻底提升废旧家电回收利用效率的意义是重大的。废旧家电逆向物流产生的诸多问题,关键因素就在于没有有效对废旧家电各类信息进行有效监控、采集分析,并形成有用的决策依据,因此信息技术应当是解决废旧家电逆向物流诸多问题的一剂良方。
3基于物联网技术下的废旧家电逆向物流革新
3.1信息技术在废旧家电逆向物流中的运用
废旧家电逆向物流信息技术是对废旧家电相关信息进行采集、输入、数据分析、输出等有关的信息技术,包含硬件和软件两部分。它充分使用了网络技术、通信技术、计算机技术等方面。现代信息技术可以在废旧家电逆向物流的管理过程中发挥以下几个方面的作用。
3.1.1对废旧家电逆向物流订单进行系统化管理
制定废旧家电逆向物流订单管理系统,居民个体消费者可以通过电子邮件、传真、电话或者是互联网下废旧家电回收订单,退货订单管理系统将通过各种方式将回收订单进行统一化、标准化处理,这将有利于回收订单的分析和管理。以实现废旧家电从消费者手中转移的过程。
3.1.2对废旧家电回收信息进行及时、准确采集
在废旧家电逆向物流过程中由于回收物种类繁多,为了及时采集回收信息,有效管理回收物商品信息,对于低附加价值的回收物可以采用条码技术,而对于高附加价值的回收物则采用射频识别(Radio Frequency Identification,RFID)技术。将条形码和射频技术结合在一起,可以更有效的解决与仓库及逆流物流动有关的信息管理,其优势在于可以增加处理逆流物的件数,除此之外还可以查看逆流物的流动信息。
3.1.3使用GPS、GIS对废旧家电回收过程有效监控
利用GPS全球定位系统和GIS电子地图系统可以应用到对装载逆流货物的运输车辆的跟踪,同时为废旧家电回收的运输制定出最佳的运输路线和运输方式。通过GPS和GIS信息系统有效结合,便于回收企业对废旧家电逆向物流进行有效跟踪和线路优化以保证废旧家电逆向物流的透明度和运作效率。
3.1.4以仓库管理系统(WMS)为手段进行逆流物仓储控制
对传统的回收企业库房进行有效改造,运用仓库管理系统对回收企业的逆流物仓储水平有效控制,针对不同类型的废旧家电库存水平制定准确的仓储策略,WMS系统可以按照废旧家电逆流物运作的业务规则和运算法则对逆流物的信息、运输资源进行很好的管理,最大化保证废旧家电绿色环保运作。
3.1.5将物流信息技术与网络技术有效融合
不论是运输管理信息技术(GPS和GIS),还是仓储管理系统(WMS)或者快速准确的信息采集条码、RFID技术,如果不能与现代网络信息技术有效集合,就不能发挥现代物流技术的最大化优势,不能系统而完整的对各个逆流物进行实时查询,不能辅助提高逆向物流效率。
3.1.6数据库技术
废旧家电逆向物流各种数据信息经过信息系统或管理软件分析处理后,需要存储在大容量的服务器硬件中以备今后的各种查询使用,这时就需要建立逆流物的信息数据库,需要运用数据库技术完善对逆流物的信息监管。
3.2基于物联网的废旧家电逆向物流信息系统构建
3.2.1基于物联网信息技术的逆向物流管理信息系统功能结构
废旧家电逆向物流发展必须依靠物流信息技术,实现物流的信息化管理,以信息化手段最大限度促进逆向物流运行的高效率和绿色环保。物联网技术是以利用现代互联网技术为依托建立新的物流信息化处理平台为基础的信息处理手段,物联网技术打破传统物流的局限,整合公司现有资源,重新设计逆向物流流程与功能。一般而言,基于物联网的废旧家电逆向物流信息系统应具备以下基本功能:
(1)采集功能。逆流物信息采集是逆向物流信息系统的信息输入功能。废旧家电逆向物流运行过程中会产生大量关于逆流物的信息,逆向物流信息系统需要设置高效的采集功能,将逆流物信息及时准确采集后传输给逆向物流信息系统。
(2)存储功能。逆向物流信息系统需要在服务器硬件的支撑下,运用数据库系统将各种逆向物流过程中采集到的逆流物信息加以存储,以备管理者随时查询。
(3)分析处理功能。逆向物流信息系统可以根据系统内预设的数据处理逻辑结构和函数设置对存储在系统内的信息进行分类整理,然后进行统计分析和分类加工,转换成具有参考价值的信息。
(4)信息跟踪功能。如果不能够对废旧家电逆向物流运作过程进行有效跟踪监管,则有可能造成废旧家电对环境的污染,同时降低废旧家电处理效率,因此需要给信息系统设计对逆流物的跟踪功能,监管逆流物的回收全过程。
(5)废旧家电处理决策功能。由于废旧家电产生具有很大的不确定性,且废旧家电产生地点分布较广,因此给废旧家电回收企业处理决策带来了很大的困难,因此信息系统需要预留回收企业处理决策支持功能,帮助企业作出各种回收处理决策。
(6)回收资源再利用信息跟踪功能。各种废旧家电逆向物流根本目的在于资源的回收再利用,为保证资源再利用的高效性,需要给信息管理系统中设置一个资源再利用的跟踪功能,随时了解回收资源再利用情况。
3.2.2基于物联网信息技术的逆向物流管理信息系统开发过程
本系统主要完成对图书仓库的库存管理,包括图书入库、出库、库存,员工信息,供应商信息以及密码管理等六个方面。系统可以完成对各类信息的浏览、查询、添加、删除、修改、报表等功能。
系统的核心是入库、库存和出库三者之间的联系,每一个表的修改都将联动的影响其它的表,当完成入库或出库操作时系统会自动地完成库存的修改。查询功能也是系统的核心之一,在系统中即有单条件查询和多条件查询,也有精确查询和模糊查询,系统不仅有静态的条件查询,也有动态生成的条件查询,其目的都是为了方便用户使用。系统有完整的用户添加、删除和密码修改功能,并具备报表打印功能。
系统采用Microsoft Office中的Access 2000来设计数据库,并使用当前优秀的开发工具—Delphi 6.0 ,它有着最为灵活的数据库结构,对数据库应用有着良好的支持。
论文主要介绍了本课题的开发背景,所要完成的功能和开发的过程。重点的说明了系统设计的重点、设计思想、难点技术和解决方案。
关键字:数据库,SQL语言,Delph 6,数据库组件,仓库管理
目 录
第一章 引言 ……………………………………………………………………………1
1.1 课题来源 ……………………………………………………………………1
1.2 开发工具的选择 ……………………………………………………………2
1.3 所做的主要工作 ……………………………………………………………3
第二章 数据库概论 ……………………………………………………………………4
2.1 数据库的发展 ………………………………………………………………4
2.1.1 数据库的发展 …………………………………………………………4
2.1.2 数据库阶段的特点 ……………………………………………………5
2.1.3 数据库技术 ……………………………………………………………6
2.2 数据库理论基础 ……………………………………………………………7
2.2.1 数据库模型 ……………………………………………………………7
2.2.2 数据库体系结构
……………………………………………………10
2.2.3 数据的独立性 ………………………………………………………11
2.2.4 范式 …………………………………………………………………11
2.3 SQL语言基础 ……………………………………………………………13
2.3.1 SQL简介 ……………………………………………………………13
2.3.2 SQL查询
……………………………………………………………13
2.3.3 SQL数据更新
………………………………………………………14
第三章数据库开发工具 ……………………………………………………………16
3.1 Delphi 6.0 简介 ……………………………………………………………16
3.2 Delphi 6.0 控件 ……………………………………………………………17
3.2.1 ADO数据访问组件 …………………………………………………17
3.2.2 数据控制类DataControl
……………………………………………18
3.2.3 数据访问类DataAccess
……………………………………………18
3.2.4 SQL语言在Delphi中的应用
………………………………………19
3.3 Access 简介
………………………………………………………………21
第四章 系统总体设计 ………………………………………………………………23
4.1 系统需求分析
……………………………………………………………23
4.2 系统概要设计
……………………………………………………………25
4.2.1 系统结构设计
………………………………………………………25
4.2.2 数据库设计
…………………………………………………………27
4.2.2.1 ER图设计 ……………………………………………………27
4.2.2.2 数据库表格设计………………………………………………29
4.3系统详细设计………………………………………………………………34
第五章 系统应用程序设计 …………………………………………………………37
5.1 系统窗体模块组成…………………………………………………………37
5.2 数据模块窗体设置…………………………………………………………38
5.3 主窗体功能模块的实现……………………………………………………39
5.4 入库、出库窗体模块的实现………………………………………………43
5.5 查询功能的实现……………………………………………………………51
5.6 系统登陆窗体模块的实现…………………………………………………52
5.7 用户管理功能的实现………………………………………………………54
5.7.1 用户管理主窗体 ……………………………………………………54
5.7.2 密码修改窗体模块的实现
…………………………………………54
5.7.3 用户注册窗体模块的实现
…………………………………………55
5.7.4 用户注销窗体模块的实现
…………………………………………57
结束语 …………………………………………………………………………………59
致谢 ……………………………………………………………………………………60
参考文献 ………………………………………………………………………………61
第一章
引 言
§1.1 课题来源
随着社会经济的迅速发展和科学技术的全面进步,计算机事业的飞速发展,以计算机与通信技术为基础的信息系统正处于蓬勃发展的时期。随着经济文化水平的显著提高,人们对生活质量及工作环境的要求也越来越高。书籍做为人类的精神食粮,在现代社会中越来越受到重视,大量的书籍出现在市场上,人们有了各种各样不同的选择。与此同时,为了管理大量的图书,图书仓库也大量的出现,仓库的管理问题也就提上了日程。随着图书的大量增加,其管理难度也越来越大,如何优化仓库的日常管理也就成为了一个大众化的课题。
在计算机飞速发展的今天,将计算机这一信息处理利器应用于仓库的日常管理已是势必所然,而且这也将为仓库管理带来前所未有的改变,它可以带来意想不到的效益,同时也会为企业的飞速发展提供无限潜力。采用计算机管理信息系统已成为仓库管理科学化和现代化的重要标志,它给企业管理来了明显的经济效益和社会效益。主要体现在:
极大提高了仓库工作人员的工作效率,大大减少了以往入出存流程繁琐,杂乱,周期长的弊端。
基于仓库管理的全面自动化,可以减少入库管理、出库管理及库存管理中的漏洞,可以节约不少管理开支,增加企业收入。
仓库的管理的操作自动化和信息的电子化,全面提高了仓库的管理水平。
随着我国改革开放的不断深入,经济飞速的发展,企业要想生存、发展,要想在激烈的市场竞争中立于不败之地,没有现代化的管理是万万不行的,仓库管理的全面自动化、信息化则是其中极其重要的部分。为了加快仓库管理自动化的步伐,提高仓库的管理业务处理效率,建立仓库管理系统已变得十分心要。
入库、库存、出库还是现在企业图书仓库管理的常规基本模式,虽然,最近又出现了很多新的管理模式,如:基于零库存思想的沃尔玛特管理方式,但这些新的思想在中国大部分企业的管理中还是难以实现的。所以如何设计好仓库管理系统,尽可能地减少仓库管理的重复性和低效性就成为当前最为重要的问题。图书仓库管理的核心是入库、库存和出库之间的联系,如何处理好三者之间的关系是系统最为关键的部分。另外,员工信息和供应商信息管理也是仓库管理中一个必不可少的部分,它提供着与入库和出库相关的地一些信息,使得整个系统更加完整,更加实用。
通过对仓库管理日常工作的详细调查,搜集了大量的资料,从系统结构的组织,功能的实现,技术的要求以及可行性等多方面进行考虑,认为本课题是一个适应现今图书仓库管理需求的计算机信息管理系统,具有一定的实际开发价值和使用价值。
§1.2 开发工具的选择
自Java诞生以来,随着Internet技术的普及和应用需求的变化,以第四代语言为主的应用开发产品发生了较大的变化,它们不仅已成为人们开发应用的开发工具,而且很多产品已发展成为一种强有力的应用开发环境。这些新型的开发工具通常以一种集成软件包的形式提供给开发人员,被称为Studio(工作室)或Suite(程序组)。例如,微软的Visual Studio 6.0,Borland公司的Delphi 6.0等数据库辅助开发工具。
现在,市场上可以选购的应用开发产品很多,流行的也有数十种。目前在我国市场上最为流行、使用最多、最为先进的可用作企业级开发工具的产品有:
Microsoft公司的Visual Basic 6.0版
Microsoft公司的Visual C++6.0版
Borland公司的Delphi 6.0版
在目前市场上这些众多的程序开发工具中,有些强调程语言的弹性与执行效率;有些则偏重于可视化程序开发工具所带来的便利性与效率的得高,各有各的优点和特色,也满足了不同用户的需求。然而,语言的弹性和工具的便利性是密不可分的,只有便利的工具,却没有弹性的语言作支持,许多特殊化的处理动作必需要耗费数倍的工夫来处理,使得原来所标榜的效率提高的优点失去了作用;相反,如果只强调程语言的弹性,却没有便利的工具作配合,会使一些即使非常简单的界面处理动作,也会严重地浪费程序设计师的宝贵时间。
而Delphi是一个非常理想选择。Delphi 6 是操作系统中快速应用开发环境的最新版本。它也是当前Windows平台上第一个全面支持最新Web服务的快速开发工具。无论是企业级用户,还是个人开发者,都能够利用Delphi 6 轻松、快捷地构建新一代电子商务应用。Delphi 6 是惟一支持所有新出现的工业标准的RAD环境,包括XML(扩展标记语言)/XSL(可扩展样式语言),SOAP(简单对象存取协议)和WSDL(Web服务器描述语言)等。
Delphi 6 是可视化的快速应用程序开发语言,它提供了可视化的集成开发环境,这一环境为应用程序设计人员提供了一系列灵活而先进的工具,可以广泛地用于种类应用程序设计。在Delphi 6 的集成开发环境中,用户可以设计程序代码、运行程序、进行程序错误的调试等,可视化的开发方法降低了应用程序开发的难度。Delphi的基础编程语言是具有面向对象特性的Pascal语言,即Object Pascal 。Object Pascal具有代码稳定、可读性好、编译速度快等优点,并将面向对象的概念移植到了Pascal语言中,使这种基础语言有了新的发展空间。
使用Delphi 6.0 ,我们几乎可以作任何事情,还可以撰写种各种类型的应用程序,动态链接库(DLL)、CON、或CORBA对象,CGI/ISAPI程序,Microsoft Back Office应用程序。程序的规模小到简单的个人数据库应用,大到复杂的企业的多层次分布式系统,都可以使用Delphi进行开发,其友好的集成开发界面,可视化的双向开发模式,良好的数据库应用支持高效的程序开发和程序运行,备受广大程序开发人员的好评。尤其是Delphi对数据库应用的强大支持,大大提高了数据库应用软件开发的效率,缩短了开发周期,深受广大数据库应用程序设计人员的喜爱。Delphi为数据库应用开发人员提供了丰富的数据库开发组件,使数据库应用开发功能更强大,控制更灵活,编译后的程序运行速度更快。
§1.3 本文所做工作
引言部分介绍了本系统的课题来源以及对数据库开发工具的选择。
第二章介绍了数据库的发展,关系数据库,数据库体系结构,并系统介绍了SQL语言,为设计和理解应用程序做了铺垫。
第三章系统介绍了Delphi 6.0及其部分控件,SQL语言在Delphi 6.0中的应用,以及Access等。
第四章是本文的主体,按照软件工程的要求,从需求分析开始,经过概要设计最后到详细设计,完成对整个系统的设计。
第五章根据第四章的设计结果利用Access 2000和Delphi 6.0进行了具体的窗体和应用程序设计。
总结部分介绍了设计体会和编程体会,并指出了系统设计中的不足和改进的方向
转贴于 第二章
数据库概论
§2.1
数据库的发展
数据库处理在信息系统的研究中一直是非常重要的主题,然而,近年来,随着World Wide Web(WWW)的猛增及Internet技术的迅速发展,使得数据库技术之时成为最热门技术之一。数据库技术能使Internet应用超越具有早期应用特点的简单的。同时,Internet技术提供了一种向用户数据库内容的标准化的访问方法。这些技术没有脱离经典数据库技术的要求。它们只是加重了数据库技术的重要性。
数据库的设计和开发及包括艺术有包括工程。理解用户的需求,然后,把它们转变为有效的数据库设计是一个艺术过程。把设计转变为实际的数据库,并且这些数据库带有功能完备、高效能的应用,是一个工程过程。
数据库的目的是帮助人们跟踪事务。经典的数据库应用涉及诸如订单、顾客、工作、员工、学生、电话之类的项,或其它数据量较大、需要密起关注的事务。最近,由于数据库的普及,数据库技术已经被应用到了新的领域,诸如用于Internet的数据库或用于公司内联网的数据库。数据库也被越来越多地应用于生成和维护多媒体应用程序上。
计算机的数据处理应用,首先要把大量的信息以数据形式存放在存储器中。存储器的容量、存储速率直接影响到数据管理技术的发展。从1956年生产出第一台计算机到现在,存储器的发展,为数据库技术提供了良好的物质基础。
使用计算机以后,数据处理的速度和规模,无论是相对于手工方式,还是机械方式,都有无可比拟的优势。通常在数据处理中,计算是比较简单的而数据的管理却比较复杂。数据管理是指数据的收集、整理、组织、存储、维护、检索、传送等操作,这部分操作是数据处理业务的基本环节,而且是任何数据处理业务中必不可少的共有部分。数据管理技术的优劣,将直接影响数据处理的效率。
2.1.1 数据库的发展
数据管理技术的发展,与硬件(主要是外存)、软件、计算机应用的范围有密切的联系。数据管理技术的发展经过三个阶段:人工管理阶段、文件系统阶段和数据库阶段。
人工管理阶段和文件系统阶段都有着相当多的缺陷,诸如数据冗余性 ,数据不一致性以及数据联系弱等等。也正是由于这些原因,促使人们研究新的数据管理技术,从而产生了数据库技术。
20世纪60年代末发生的三件大事,层次模型IMS系统的推出、关于网状模型DBTG报告的发表以及关于关系模型论文的连续发表标志着数据管理技术进入数据库阶段。进入70年代以后,数据库技术得到迅速发展,开发了许多有效的产品并投入运行。数据库系统克服了文件系统的缺陷,提供了对数据更高级更有效的管理。
当进入数据库阶段后,随着数据管理规模一再扩大,数据量急剧增加,为了提高效率,开始时,人们只是对文件系统加以扩充,在应用文件中建立了许多辅助索引,形成倒排文件系统。但这并不能最终解决问题。在20世纪60年代末,磁盘技术取得重要进展,具有数百兆容量和快速存取的磁盘陆续进入市场,成本也不高,为数据库技术的产生提供了良好的物质条件。
2.1.2 数据库阶段的特点
(1)减少数据的重复(Redundancy can be reduced)
当在一个非数据库系统当中,每一个应用程序都有属于他们自己的文件,由于无法有系统建立的数据,因此常常会造成存储数据的重复与浪费。例如:在一家公司当中,人事管理程序与工资管理程序或许都会使用到职员与部门的信息或文件,而我们可以运用数据库的方法,把这两个文件整理起来,以减少多余的数据,过度地占用存储空间。
(2)避免数据的不一致(Inconsistency can avoid)
本项的特色,可以说是延伸前项的一个特点,要说明这样的一个现象,我们可以从下面这个实例来看:若是在同一家公司当中,职员甲在策划部门工作,且职员甲的记录同时被存放在数据库的两个地方,而数据库管理系统却没有对这样重要的情况加以控制,当其中一条数据库被修改时,便会造成数据的不一致,但是,对于一个健全的数据库管理系统而言,将会对这样的情况加以控制,但有时并不需要刻意消除这种情形,应当视该数据库的需求与效率来决定。
(3)数据共享(Data shared)
对于数据共享的意义,并不是只有针对数据库设计的应用程序,可以使用数据库中的数据,对于其他撰写好的应用程序,同样可以对相同数据库当中的数据进行处理,进而达到数据共享的目的。
(4)强化数据的标准化(Standard can be enforced)
由数据库管理系统,对数据做出统筹性的管理,对于数据的格式与一些存储上的标准进行控制,如此一来,对于不同的环境的数据交换(Data Interchange)上将有很大的帮助,也能提高数据处理的效率。
(5)实践安全性的管理(Security restriction can be applied)
通过对数据库完整的权限控制,数据库管理者可以确认所有可供用户存取数据的合法途径渠道,并且可以事先对一些较重要或关键性的数据进行安全检查,以确保数据存取时,能够将任何不当损毁的情形降至最低。
(6)完整性的维护(Integrity can be maintained)
所谓完整性的问题,就是要确认某条数据在数据库当中,是正确无误的。正如(2)所述,若是无法控制数据的不一致性,便会产生完整性不足的问题,所以,我们会发现,当数据重复性高的时候,数据不完整的情形也会增加,当然,若是数据库的功能完整,将会大大地提高数据完整性,也会增加数据库的维护能力与维护简便性。
(7)需求冲突会获得平衡(Conflicting requirements can be balance)
在一个较大型的企业当中,用户不同的需求,往往会造成系统或数据库在设计上的困扰,但是一个合适的数据库系统,可以通过数据库管理员的管理,将会有效地整理各方面的信息,对于一些较重要的应用程序,可以适时地提供较快速的数据存取方法与格式,以平衡多个用户在需求上的冲突。
上述七个方面构成了数据库系统的主要特征。这个阶段的程序和数据间的联系可用下图表示: 2.1.3 数据库技术
从文件系统发展到数据库系统是信息处理领域的一个重大变化。在文件系统阶段,人们关注的中心问题是系统功能的设计,因而程序设计处于主导地位,数据只起着服从程序需要的作用。在数据库方式下,信息处理观念已为新体系所取代,数据占据了中心位置。数据结构的设计成为信息系统首先关心的问题,而利用这些数据的应用程序设计则退居到以既定的数据结构为基础的外围地位。
目前世界上已有数百万个数据库系统在运行,其应用已经深入到人类社会生活的各个领域,从企业管理、银行业务、资源分配、经济预测一直到信息检索、档案管理、普查统计等。并在通信网络基础上,建立了许多国际性的联机检索系统。我国20世纪90年代初在全国范围内装备了12个以数据库技术为基础的大型计算机系统,这些系分布在邮电、计委、银行、电力、铁路、气象、民航、情报、公安、军事、航天和财税等行业。
数据库技术还在不断的发展,并且不断地与其它计算机技术相互渗透。数据库技术与网络通信技术相结合,产生了分布式数据库系统。数据库技术与面向对象技术相结合,产生了面向对象数据库系统。
在数据库技术中有四个名词,其概念应该分清。
(1)数据库(database,DB):DB是统一管理的相关数据的集合。DB能为各种用户共享,具有最小冗余度,数据间联系密切,而又有较高的数据独立性。
(2)数据库管理系统(Database Management System,DBMS):DBMS是位于用户与操作系统之间的一层数据管理软件,为用户或应用程序提供访问DB的方法,包括DB的建立、查询、更新及各种数据控制。DBMS总是基于某种数据模型,可以分为层次型、网状型、关系型和面向对象型DBMS。
(3)数据库系统(Database System,DBS):DBS是实现有组织地、动态地存储大量关联数据,方便多用户访问的计算机软件、硬件和数据资源组成的系统,即采用了数据库技术的计算机系统。
(4)数据库技术:这是一门研究数据库的结构、存储、管理和使用的软件学科。数据库技术是操作系统的文件系统基础上发展起来的。而DBMS本身要在操作系统的支持下才能工作。数据库不仅用到数据结构的知识,而且丰富了数据结构的内容。在关系数据库中要用到集合论、数理逻辑的理论。因此,数据库技术是一门综合性较强的学科。
§2.2数据库理论基础
2.2.1 数据库模型
从20世纪50年代中期开始,计算机的应用由科学研究部门逐步扩展到企业、行政部门。至60年代,数据处理成为计算机的主要应用。数据库技术作为数据管理技术,是计算机软件领域的一个重要分支,产生于60年代末。现已形成相当规模的理论体系和实用技术。
模型是对现实世界的抽象。在数据库技术中,我们用模型的概念描述数据库的结构与语义,对现实世界进行抽象,表示实体类型及实体间联系的模型称为“数据模型” 。
目前广泛作用的数据模型可分为两种类型。
一种是独立于计算机系统的模型,完全不涉及信息在系统中的表示,只是用来描述某个特定组织所关心的信息结构,这类模型称为“概念数据模型” 。要领模型用于建立信息世界的数据模型,强调其语义表达功能,应该概念简单、清晰,易于用户理解,它是现实世界的第一层抽象,是用户和数据库设计人员之间进行交流的工具。这一其中著名的模型是“实体联系模型” 。
另一种数据模型是直接面向数据库的逻辑结构,它是现实世界的第二层抽象。 这类模型涉及到计算机系统和数据库管理系统,又称为“结构数据模型” 。例如,层次、网状、关系、面向对象等模型。这类模型有严格的形式化定义,以便于在计算机系统中实现。
(1)层次模型。用树型结构表示实体类型及实体间联系的数据模型。树的结点是记录类型,每个非根结点有且只有一个父结点。上一层记录类型和下一层记录类型间联系是1∶N联系。
层次模型的特点是记录之间的联系通过指针实现,查询效率较高。但层次模型有两个缺点:一是只能表示1∶N联系,虽然有多种辅助手段实现了M∶N联系,但都较复杂,用户不易掌握,二是由于树型结构层次顺序的严格和复杂,引起数据的查询和更新操作也很复杂,因此,编写应用程序也很复杂。
(2)网状模型。用有向图结构表示实体类型及实体间联系的数据模型。。1969年DBTG报告提出的数据模型是网状模型的主要代表。有向图中的结点是记录类型,有向边表示从箭尾一端的记录类型到箭头一端的记录类型间联系是1∶N联系。
网状模型的特点:记录之间联系通过指针实现,M∶N联系也容易实现(每个M∶N联系可拆成两个1∶N联系),查询效率较高。网状模型的缺点是编写应用程序比较复杂,程序员必须熟悉数据库的逻辑结构。由于层次系统和网状系统的应用程序编制比较复杂,因此,从20世纪80年代中期起,其市场已被关系系统所取代。但是使用这两种模型建立起的许多数据库仍然在正常运转,只是在外层加了个关系数据库语言的接口。网状模型有许多成功的产品,20世纪70年代的产品大部分网状系统,例如,Honeywell公司的IDS/Ⅱ、HP公司的IMAGE/3000、Burroughs公司的DMSⅡ、Umivac公司的DMS1100、Cullinet公司的IDMS、Cimcom公司的TOTAL等
(3)关系模型。关系模型的主要是用二维表格结构表达实体集,用外键表示实体间联系。关系模型是由若干个关系模式组成的集合。关系模式相当于前面提到的记录类型,它的实例称为关系,每个关系实际上是一张二维表格。
关系模型和层次、网状模型的最大判别是用关键码而不是用指针导航数据,表格简单用户易懂,编程时并不涉及存储结构,访问技术等细节。关系模型是数学化模型。SQL语言是关系数据库的标准化语言,已得到了广泛的应用。20世纪70年代对关系数据库的研究主要集中在理论和实验系统的开发方面。80年代初才形成产品,但很快得到广泛的应用和普及,并最终取代了层次、网状数据库产品。现在市场上典型的关系DBMS产品有DB2、ORACLE、SYBASE、INFORMIX和微机型产品Foxpro、Access等。
关系模型和网状、层次模型的最大区别是:关系模型用表格数据而不是通过指针链来表示和实现实体间联系。关系模型的数据结构简单、易懂。只需用简单的查询语句就可对数据库进行操作。
关系模型是数学化的模型,可把表格看成一个集合,因此集合论、数理逻辑等知识可引入到关系模型中来。关系模型已是一个成熟的有前途的模型,已得到广泛应用。
(4)面向对象模型。目前,关系数据库的使用已相当普遍,但是,现实世界中仍然存在着许多含有复杂数据结构的应用领域,例如,CAD数据、图形数据等,而关系模型在这方面的处理能力就显得力不从心。因此,人们需要更高级的数据库技术来表达这类信息。面向对象的概念最早出现在程序设计语言中,随后迅速渗透到计算机领域的每一个分支。面向对象数据库是面向对象概念与数据库技术相结合的产物。
面向对象模型能完整地描述现实世界的数据结构,具有丰富的表达能力,但模型相对较复杂,涉及的知识面也广,因此面向对象数据库尚未达到关系数据库那样的普及程度。
2.2.2 数据库体系结构
数据库的体系结构分三级:内部级(internal),概念级(conceptual)和外部级(external)。这个三级结构有时也称为“三级模式结构”,或“数据抽象的三个级别”,最早是在1971年通过的DBTG报告中提出,后来收入在1975年的美国ANSI/SPARC报告中。虽然现在DBMS的产品多种多样,在不同的操作系统支持下工作,但是大多数系统在总的体系结构上都具有三级模式的结构特征。从某个角度看到的数据特性称为“数据视图”(data view)。
外部级最接近用户,是单个用户所能看到的数据特性。单个用户使用的数据视图的描述称为“外模式”。
概念级涉及到所有用户的数据定义,是全局的数据视图。全局数据视图的描述称为“概念模式”。
内部级最接近于物理存储设备,涉及到实际数据存储的结构。物理存储数据视图的描述称为“内模式”。
数据库的三级模式结构是数据的三个抽象级别。它把数据的具体组织留给DBMS去做,用户只要抽象地处理数据,而不必关心数据在计算机中的表示和存储,这样就减轻了用户使用系统的负担。
三级结构之间往往差别很大,为了实现这三个抽象级别的联系和转换,DBMS在三级结构之间提供两个层次的映象(mappings):外模式/模式映象,模式/内模式映象。此处模式是概念模式的简称。
2.2.3 数据的独立性
由于数据库系统采用三级模式结构,因此系统具有数据独立性的特点。在数据库技术中,数据独立性是指应用程序和数据之间相互独立,不受影响。数据独立性分成物理数据独立性和逻辑数据独立性两级。
(1)物理数据独立性
如果数据库的内模式要进行修改,即数据库的存储设备和存储方法有所变化,那么模式/内模式映象也要进行相当的修改,使概念模式尽可能保持不变。也就是对内模式的修改尽量不影响概念模式,当然,对于外模式和应用程序的影响更小,这样,我们称数据库达到了物理数据独立性。
(2)逻辑数据独立性
如果数据库的概念模式要进行修改,譬如增加记录类型或增加数据项,那么外模式/模式映象也要进行相应的修改,使外模式尽可能保持不变。也就是对概念模式的修改尽量不影响外模式和应用程序,这样,我们称数据库达到了逻辑数据独立性。
现有关系系统产品均提供了较高的物理独立性,而对逻辑独立性的支持尚有欠缺,例如,对外模式的数据更新受到限制等。
2.2.4 范式
建立起一个良好的数据指标体系,是建立数据结构和数据库的最重要的一环。一个良好的数据指标体系是建立DB的必要条件,但不是充分条件。我们完全可以认为所建指标体系中的一个指标类就是关系数据库中的一个基本表,而这个指标类下面的一个个具体指标就是这个基本表中的一个字段。但如果直接按照这种方式建库显然还不能算最佳。对于指标体系中数据的结构在建库前还必须进行规范化的重新组织。
在数据的规范化表达中,一般将一组相互关联的数据称为一个关系(relation),而在这个关系下的每个数据指标项则被称为数据元素(data element),这种关系落实到具体数据库上就是基本表,而数据元素就是基本表中的一个字段(field)。规范化表达还规定在每一个基本表中必须定义一个数据元素为关键字(key),它可以唯一地标识出该表中其它相关的数据元素。在规范化理论中表是二维的,它有如下四个性质:
在表中的任意一列上,数据项应属于同一个属性(如图中每一列都存放着不同合同记录的同一属性数据)。
表中所有行都是不相同的,不允许有重复组项出现(如图中每一行都是一个不同的合同记录)。
在表中,行的顺序无关紧要(如图中每行存的都是合同记录,至于先放哪一个合同都没关系)。
在表中,列的顺序无关紧要,但不能重复(如图中合同号和合同名谁先谁后都没关系,但二者不可重复或同名)。
在对表的形式进行了规范化定义后,数据结构还有五种规范化定义,定名为规范化模式,称为范式。在这五种范式中,一般只用前三种,对于常用系统就足够了。而且这五种范式是“向上兼容”的,即满足第五范式的数据结构自动满足一、二、三、四范式,满足第四范式的数据结构自动满足第一、二、三范式,……,依此类推。
第一范式(first normal form,简称1st NF)就是指在同一表中没有重复项出现,如果有则应将重复项去掉。这个去掉重复项的过程就称之为规范化处理。在本文所讨论的开发方法里,1st NF实际上是没有什么意义的。因为我们按规范化建立的指标体系和表的过程都自动保证了所有表都满足1st NF。
第二范式(second normal form,简称 2nd NF)是指每个表必须有一个(而且仅一个)数据元素为主关键字(primary key),其它数据元素与主关键字一一对应。例如,在图l9.7中如果我们将合同号定义为主关键字(其它数据元素中的记录数据都有可能重名,故不能作为主关键字),故只要知道了一个合同记录的合同号,就可以唯一地在同一行中找到该合同的任何一项具体信息。通常我们称这种关系为函数依赖(functional depEndence)关系。即表中其它数据元素都依赖于主关键字,或称该数据元素唯一地被主关键字所标识。
第三范式(third normal form,简称 3rd NF)就是指表中的所有数据元素不但要能够唯一地被主关键字所标识,而且它们之间还必须相互独立,不存在其它的函数关系。也就是说对于一个满足了 2nd NF的数据结构来说,表中有可能存在某些数据元素依赖于其它非关键宇数据元素的现象,必须加以消除。
为防止数据库出现更新异常、插入异常、删除异常、数据冗余太大等现象,关系型数据库要尽量按关系规范化要求进行数据库设计。
§2.3 SQL语言基础
2.3.1 SQL简介
用户对数据库的使用,是通过数据库管理系统提供的语言来实现的。不同的数据库管理系统提供不同的数据库语言。关系数据库管理系统几乎都提供关系数据库标准语言——SQL。
SQL 的全称是Structured Query Language,即结构化查询语言。SQL语句可以从关系数据库中获得数据,也可以建立数据库、增加数据、修改数据。1986年ANSI采用SQL语言作为关系数据库系统的标准语言,后被国际化标准组织(ISO)采纳为国际标准。SQL语言使用方便、功能丰富、简洁易学,是操作数据库的工业标准语言,得到广泛地应用。例如关系数据库产品DB2、ORACLE等都实现了SQL语言。同时,其它数据库产品厂家也纷纷推出各自的支持SQL的软件或者与SQL的接口软件。这样SQL语言很快被整个计算机界认可。
SQL语言是一种非过程化语言,它一次处理一个记录集合,对数据提供自动导航。SQL语言允许用户在高层的数据结构上工作,而不对单个记录进行操作。SQL语言不要求用户指定数据的存取方法,而是使用查询优化器,由系统决定对指定数据存取的最快速手段。当设计者在关系表上定义了索引时,系统会自动利用索引进行快速检索,用户不需知道表上是否有索引或者有什么类型的索引等细节。
SQL语言可以完成许多功能,例如:
查询数据
在数据库表格中插入、修改和删除记录
建立、修改和删除数据对象
控制对数据和数据对象的存取
确保数据库的一致性和完整性等
2.3.2 SQL查询
数据查询是关系运算理论在SQL语言中的主要体现,SELECT 语句是SQL查询的基本语句,当我们在对一个数据库进各种各样的操作时,使用的最多的就是数据查询,在以SQL为基础的关系数据库中,使用的最多的就是SELECT查询语句。
SELECT语句的完整句法如下:
SELECT 目标表的列名或列表达式序列
FROM 基本表和(或)视图序列
[WHERE 行条件表达式]
[GROUP BY 列名序列]
[HAVING 组条件表达式]
[ORDER BY列名 [ASC│DEAC]…]
我在SELECT语句中还使用了大量的保留字和通配符以进行各种各样的条件查询。在系统中有大量的查询按钮,其使用了大量的查询语句,而且这些查询语句大部分使用的是模糊查询,所以大量的使用了模式匹配符LIKE(判断值是否与指定的字符通配格式相符)。在包含LIKE的查询语句中可以使用两个通配符:%(百分号):与零个或多个字符组成的字符串匹配;_(下划线):与单个字符匹配。系统中的条件判断往往包含多个条件,这时就需要使用逻辑运算符NOT、AND、OR(用于多条件的逻辑连接),谓词ALL以及保留字DISTINCT等等。做为SELECT语句还有很多的使用方法,这里就不再叙述。
2.3.3 SQL数据更新
使用数据库的目的是为了有效地管理数据,而数据的插入、删除和修改则是必不可少的一个功能。在本系统中就大量地使用了数据插入、删除和修改这三种操作,现做一个简单地介绍。
数据插入
往数据库的基本表中插入数据使用的是INSERT语句,其方式有两种:一种是元组值的插入,另一种是查询结果的插入。在本系统中使用的是前一种方式,其句法如下:
INSERT INTO 基本表名(列表名)VALUES(元组值)
数据删除
往数据库的基本表中删除数据使用的是DELETE语句,其句法如下:
DELETE FROM 基本表名 [WHERE 条件表达式]
在些作一点说明,删除语句实际上是“SELECT * FROM 基本表名 [WHERE 条件表达式]”和DELETE操作的结合,每找到一个元组,就把它删除。此外,DELETE语句只能从一个基本表中删除元组,WHERE子句中条件可以嵌套,也可以是来自几个基本表的复合条件。
数据修改
当需要修改基本表中元组的某些列值时,可以用UPDATE语句实现,其句法如下:
UPDATE基本表名
SET列名=值表达式[,列名=值表达式…]
[WHERE条件表达式]
在Delphi中使用SQL语句是很方便的,一般来说,都是通过TQuery组件来使用SQL语言的。有一点要进行说明,虽然通过TQuery组件来使用SQL语言很方便,但考虑到自己对不同组件的理解程度、个人习惯以及其它各个方面,在本系统中我采用的是ADO组件来对数据库进行操作。最简单的方法比如在TADOQuery组件的SQL属性中就可以键入SQL语句,至于详细的使用方法在后面进行介绍。
转贴于 第三章
数据库开发工具
§3.1 Delphi 6.0 简介
Delphi类可以粗略地分成两部分:一部分是组件类,这些组件类通常以某种方式出现在组件面板上,当用户从组件面板上点取一个类的图标后,在程序中就自动生成了该类的对象(非可视组件除外);另一部分是功能类,这此功能类的对象通常出现在程序代码中,起着不可代替的作用,但是这些功能类在组件面板上是找不到的。在Delphi中,每一个类的祖先都是Tobject类,整个类的层次结构就像一棵倒挂的树,在最顶层的树根即为Tobject类。这样,按照面向对象编程的基本思想,就使得用户可用Tobject类这个类型代替任何其它类的数据类型。实际上在Delphi的类库中,Tobject类派生出了为数相当众多的子类,它们形成了一个庞大的体系,通常情况下,如果不自行开发组件,就不必了解整个类的体系结构,只用到类层次树的叶结点就足够了。
凡是做过程序开发的人都知道从来没有单纯的数据应用程序,也就是说,数据库应用程序必须和用户界面(可以是图形界面,也可以是命令接口)元素相结合,只讲界面或只讲数据库本身都构不成数据库应用程序,因而用Delphi 6.0开发数据库应用程序就隐含着界面开发。Delphi6中的VCL组件可用图3-1来说明。组件在Delphi程序的开发中是最显眼的角色。大家知道,在编写程序时一般都开始于在组件面板上选择组件并定义组件间的相互作用。但也有一些组件不在组件面板上,例如Tform和Tapplication(典型的非可视组件)。组件是Tcomponents派生出来的子类,可以流的形式存放在DFM文件中,具有事件和Publish属性。
窗口组件类是窗口化的可视化组件类,在Delphi的类库中占有最大的份额。在实际编程中,窗口组件类的对象都有句柄,可以接受输入焦点和包含其它组件。
图形组件与窗口组件并列,是另一大类组件。图形组件不是基于窗口的,因而不能有窗口句柄,不能接受输入焦点和包含其它组件。从图8-43中可以看出,图形组件的基类是TgraphicControl,在实际编程中,它们必须寄生于它们的宿主——窗口组件类的对象,由它们的拥有者负责其显示,而且它们还能触发一些和鼠标活动相关的事件。图形控件最典型的例子是Tlabel和TspeedButton。由此可以看出图形组件的功能很弱,有读者会问图形组件的用处何在呢?其实使用图形组件的最大好处在于节省资源,正是因为它们的功能较弱,所以使用的系统资源就要少。在一个应用程序中,如果能在不影响其功能的前提下合理大量地使用图形组件,将会大减少程序对系统资源的消耗。
非可视组件是与可视组件相并列的另一类组件,非可视组件在程序运行中是不可见的(除各种对话框组件之外,事实上有人认为对话框组件不能归入非可视组件,应该是另一种介于可视与非可视之间的组件)。
§3.2 Delphi 6.0 控件
用Delphi6开发数据库应用,重点是和各种数据库组件打交道,当然也要使用其它的一些组件,现在就我在系统设计中所使用的重要组件给与简单介绍。
3.2.1 ADO数据访问组件
ADO数据对象(Active Data Objects)实际是一种提供访问各种数据类型的链接机制。ADO设计为一种极简单的格式,通过ODBC的方法同数据库接口中,可以使用任何一种ODBC数据源,即不止适合于SQL Server、Oracle、Access等数据库应用程序,也适合于Excel表格、文本文件、图形文件和无格式的数据文件。ADO是基于OLE-DB之上的技术,因此ADO通过其内部的属性和方法提供统一的数据访问接口方法。ADO使您的客户端应用程序能够通过OLE DB提供访问和操作在数据库服务器中的数据。ADO支持用于建立C/S和Web的应用程序的主要功能。其主要优点是易于使用、高速度、低内存支出和占用磁盘空间较少。ADO同时具有远程数据服务(RDS)功能,通过RDS可以在一次往返过程中实现将数据从服务器移动到客户端应用程序和Web页、在客户端对数据进行处然后将更新结果返回服务器的操作。
Delphi 6.0继续对Microsoft的ADO访问能力的支持。这种能力是通过一组新组件实现的,这些组件是在企业版的ADO组件页中,在组件面版的ADO页上可以找到这些组件。利用在前面章节提到的TdataSet抽象类,ADO组件可以不通过BDE而直接实现ADO连接。这意味着只需要很少的代码就可以实现该连接并且性能得到提高。
利用ADO数据访问组件,可以只使用ADO结构与数据库取得联系并对其中的数据进行操作,而在这些过程中完全不需要使用BDE。大多数的ADO连接和数据集组件都是与基于BDE的连接和数据集组件相类似的。TADOConnection组件与基于BDE的应用程序中的Tdatabase组件类似。TADOTable与Ttable,TADOQuery与Tquery,以及TADOStoreProc和TstoredProc之间都具有这种类似的对应关系。使用这些ADO组件的方式与我们常使用的数据访问组件(基于BDE)都有许多相同之处。TTADODataSet没有直接的BDE对应组件,但它提供了许多与Ttable和Tquery相同的功能。同样,TADOCommand也没有相对应的BDE组件,它是在Delphi/ADO环境中完成特定功能的组件。Delphi 6.0通过ADO数据集访问组件,可以不借助BDE数据引擎而是通过微软的OLEDB来访问更为广泛的数据库中的数据。ADO数据集访问组件与常用的数据访问组件是并列的关系。
在系统中我主要使用的是ADOTablet和ADOQuery两个组件。
3.2.2 数据控制类DataControl
数据控制类负责数据库数据的显示,并把用户对数据的修改传回。这里的绝大多数组件,如DBText, DBEdit, DBMemo, DBImage, DBListBox, DBComboBox, DBCheckBox, DBRadioGroup, DBLookupListBox, DBLookupCombox, DBCtrGrid的功能和对应的非数据感知组件相同,如TEdit框,TRadioGroups单选按钮组等,只不过在显示数据库数据时要用而已。
在系统中主要使用数据网格控件DBGrid和数据库导航器控件DBNavigator。
3.2.3 数据访问类DataAccess
数据库应用系统中数据访问是一个首要问题,包括单用户和 C/S系统,都必须联系一些数据库和数据表文件。Delphi 6 提供了专门用于数据访问的基类控件。主要包括数据源控件DataSource、客户数据集控件ClientDataSet、数据集提供器控件DataSetProvider等等。
Tdatabase:当一个基于BDE的数据库应用程序需要一个永久数据库连接时,需要定制向一个数据库服务器的连接时,需要事务控制和特殊的数据库别名时就得用到Tdatabase对象。特别是当连接到一个远程的SQL数据库服务器时,如果要利用BDE进行数据库事务处理,那么,TDatabase对象的威力就体现出来了。在一个应用程序中为每一个数据库连接显示的声明Tdatabase对象要根据需要而定,不是必需的。对一个数据库连接,如果没有显示的声明并实例化TDatabase对象,系统就会产生一个带有默认属性的TDatabase对象。
TdataSource对象用于在DataSet对象(包括Tquery,TstoredProc,Ttable等)和数据感知组件之间提供一个连接的纽带,以便在窗体上显示数据库中的数据,在数据库中导航定位与编辑数据集中的数据。如果一个DataSet对象中的数据想在数据感知组件中显示和修改,它就必须和TdataSource对象相联系。同样,一个数据感知组件如果想和数据源相联系以便显示和操纵数据,就必须以TDataSource对象为中介。
用Delphi6作数据库应用开发概括来说如下:先利用数据存取组件和实际的数据库建立连接,并用Tsession对象和Tdatabase对象管理这些连接。然后以Tdatasource对象为中介,用数据感知组件向用户显示数据库的内容并接受用户的查询和修改等操作。
3.2.4 SQL语言在Delphi中的应用
在Delphi中使用SQL语言非常方便,一般来说,都是通过Tquery组件来使用SQL语言的。可以在TQuery组件的SQL属性中设置SQL语句。设计程序时,在该组件的属性对话框中选择SQL属性,单击带省略号的按钮,就可以打开String List Editor对话框,然后我们就可以在对话框中添加SQL语句。还可以使用Delphi的SQL Builder来自动生成SQL语句,这样可以避免手工编写SQL而可能造成的语法错误。
静态SQL语句在程序设计时便已固定下来,它不包含任何参数和变量。
动态SQL语句,也被称作参数化的语句,在其中间包含着表示字段名或表名的参数,例如下面的语句是一条动态SQL语句:
Select * From Students Where StudentCode =: StudentCode;
其中的变量StudentCode便是一个参数变量,它由一个冒号引导,在程序运行过程中,必须要为该参数赋值,该条SQL语句才能正确执行,每次运行应用程序时可以为该参数变量赋予不同的值。为参数赋值有三种方法:
①根据参数在SQL语句中出现的顺序,设置TQuery部件的Params属性值为参数赋值。
②直接根据SQL语句中各参数的名字,调用ParamByName方法来为各参数赋值。
③将TQuery部件的DataSource属性设置为另一个数据源,这样将另一个数据源中与当前TQuery部件的SQL语句中的参数名相匹配的字段值赋给其对应的参数。利用这种方法也能实现所谓的连接查询,创建主要—明细型数据库应用。
在程序运行过程中,要想设置TQuery部件的SQL属性,必须首先调用Close方法,关闭TQuery部件,然后再调用Clear方法清除SQL属性中现存的SQL命令语句, 最后再调用Add方法为SQL属性设置新的SQL命令语句。例如:
Query1.Close {关闭Query1)
Query1.SQL.Clear {清除SQL属性中的SQL命令语句}
Query1.SQL.Add(‘Select * From Students‘);
Query1.SQL.Add(‘ Where Name ="Lucy" ‘);
在为TQuery部件设置SQL属性时调用Close方法总是很安全的,如果TQuery部件已经被关闭了,调用Close方法时不会产生任何影响。在应用程序中为SQL属性设置新的SQL 命令语句时,必须要调用Clear方法以清除SQL属性中现存的SQL命令语句,如果不调用Clear方法,便调用Add方法向SQL属性中设置SQL命令语句,那么新设置的SQL命令语句会追加在现存SQL命令语句后面, 在程序运行时常常会出现出乎意料的查询结果甚至程序无法运行下去。
在这里要特别注意的,一般情况下TQuery部件的SQL属性只能包含一条完整的SQL语句,它不允许被设置成多条SQL语句。当然有些数据库服务器也支持在TQuery部件的SQL属性中设置多条SQL语句,只要数据库服务器允许这样,我们在编程时可以为 SQL 属性设置多条SQL语句。
在为TQuery部件设置完SQL属性的属性值之后,也即编写好适当的SQL程序之后,可以有多种方式来执行SQL程序。
在设计过程中,设置完TQuery部件的SQL属性之后将其Active属性的值置为True, 这样便可以执行SQL属性中的SQL程序,如果应用中有与TQuery部件相连的数据浏览部件( 如TDDGrid TDBEdit等)那么在这些数据浏览部件中会显示SQL程序的执行结果。
在应用程序运行过程中,通过程序调用TQuery部件的Open方法或ExecSQL 方法可以执行其SQL属性中的SQL程序。Open方法和ExecSQL方法是不一样的。Open方法只能用来执行SQL语言的查询语句(Select命令), 并返回一个查询结果集,而ExecSQL方法还可以用来执行其它常用的SQL语句(如INSERT, UPDATE, DELETE等命令),例如:
Query1.Open (这样会返回一个查询结果集)
如果调用Open方法,而没有查询结果时,会出错。此时应该调用ExecSQL 方法来代替Open方法。如:
Query1.ExecSQL (没有返回结果)
当然在设计应用程序时,程序设计人员是无法确定TQuery部件中的SQL 语句是否会返回一个查询结果的。对于这种情况应当用Try…Except模块来设计程序。在 Try 部分调用Open方法,而在Except部分调用ExceSQL方法,这样才能保证程序的正确运行。
Delphi中用ADOQuery来使用SQL语句同样十分方便。在ADOQuery组件中首先通过ConnectionString属性值来联接数据源,然后就通过双击SQL…属性值来写入SQL语句。在Delphi中调用数据库,就可以调用ADOQuery组件,通过修改其中的SQL…属性中的SQL语句来实现对数据库的各项操作。
值得注意的是,ADOQuery组件只有在激活的情况下才可以被正确地使用,这样就提出了一个问题,也就是说,在每次修改ADOQuery组件的SQL…属性时都必须先行进行关闭,待清除掉SQL…中所有的SQL语句后才可以添加新的SQL语句。而且,在每一次修改完成以后,还应该记得重新将ADOQuery激活。其它的使用方法与TTQuery有许多的相似之处。
§3.3 Access 简介
建立一个数据库我们有多种选择,现在市场上有各种各样的数据库,而且每一种数据库都有其自身的特点,不能说哪一种更好,只能在其中寻找一种能更好地适应系统需求、更好地满足用户的要求以及适应开发人员的习惯。在本系统中,做为图书仓库管理系统是一个比较小的应用系统,它所产生和处理的数据量也比较小。因此,没有必要使用像SQL Server和Oracle这样的大型数据库。我首先想到的数据库是Borland公司的Paradox数据库。另外,Microsoft Office中的Access数据库在计算机上的应用比较普及,是开发小型数据库系统的比较理想的选择,所以,在本系统中我选择了Access数据库。
Access做为一个数据库管理系统,它被集成在Microsoft Office中。Access数据库处理的基本结构,采取关系型数据库模式。与其他的数据库系统相比,Access更加简单易学,一个普通的计算机用户可以很快地掌握它。Access 2000的功能十分强大,利用它可以方便地实现对信息保存、维护、查询、统计、打印、交流、,而且它可以十分方便地与Office其他组件交流数据,这些功能对一个一般用户而言已经足够了。
转贴于 第四章 系统总体设计
软件系统的总体设计大约要经历可行性分析和项目开发计划,需求分析,概要设计,详细设计,编码,测试以及维护等七个阶段。可行性分析和项目开发计划在前面已经叙述,下面所要做的是进行软件需求分析,概要设计和详细设计。编码过程将在下一节论述,而测试和维护过程不在本文叙及。
§4.1 系统需求分析
在经过前一阶段的分析之后,我确定了我的开发课题为图书仓库管理。现在所要做的是要准确定义系统必须做什么以及系统必须具备的功能。
软件需求分析中我采用结构化分析方法(Structured Analysis,简称SA),SA是面向数据流进行需求分析的方法,像所有的软件分析方法(如面向对象分析方法、IDEF方法等等)一样,SA也是一种建模活动,它使用简单易读的符号,根据软件内部数据传递、变换的关系,自顶向下逐层分解,描绘满足功能要求的软件模型。
在系统中我采用数据流图(DFD)这种半形式化的描述方式表达需求。它是一种功能模型,以图形的方式描绘数据在系统中流动和处理的过程,只反映系统必须完成的逻辑功能。它有四种基本图形符号:
:箭头,表示数据流;
〇:圆或椭圆,表示加工;
:双杠,表示数据存储;
:方框,表示数据的源点或终点。
为了表达较为复杂问题的数据处理过程,用一张数据流图是不够的,要按照问题的层次结构进行逐步分解,并以一套分层的数据流图反映这种结构关系。在这里我一共使用了三层数据流图,即顶层图,0层图和1层图(也是底层图)。
在多层数据流图中,顶层流图仅包含一个加工,它代表被开发系统,它的输入流是该系统的输入数据了,输出流是该系统的输出数据;底层流图是指其加工不需要再做分解的数据流图,中间层流图表示对其上层父图的细化,它的每一步加工可能继续细化成子图。
经过对系统的分析首先得到系统的顶层DFD,如下: 一步细化得到系统的0层DFD,如下:
再进一步细化每一个数据加工功能,得到系统的1层DFD图。
在这里只给出有关入库管理和出库管理的1层数据流图,它们是系统的关鍵部分,也是主要的部分。通过以上对数据流图的分析之后,我们已大体地了解了系统的功能和目标,接下来所要做的就是系统功能模块的划分和数据库的设计,也就是系统的概要设计。
§4.2 系统概要设计
在软件需求分析阶段,搞清楚了软件“做什么”的问题,形成了目标系统的逻辑模型。现在我们所要做的就是要把软件“做什么”的逻辑模型变换为“怎么做”的物理模型,即着手实现软件的需求。首先,我们需要描述的是系统的总的体系结构。
4.2.1 系统结构设计
系统的概要设计中最重要的就是系统的模块化。模块化是指解决一个复杂问题时自项向下逐层把软件系统划分成若干个模块的过程。每个模块完成一个特定的功能,所有的模块按某种方法组织起来,成为一个整体,完成整个系统所要求的功能。
将系统划分为多个模块是为了降低软件系统的复杂性,提高可读性、可维护性,但模块的划分不能是任意的,应尽量保持其独立性。也就是说,每个模块只完成系统要求的独立的子功能,并且与其他模块的联系最少且接口简单,即尽量做到高内聚低耦合,提高模块的独立性,为设计高质量的软件结构奠定基础。
在系统的概要设计中我采用结构化设计(Structure Design,简称SD),SD以需求分析阶段产生的数据流图DFD为基础,按一定的步骤映射成软件结构。我首先将整个系统化分为几个小问题,小模块,在系统中,我设计了用户管理、库存管理、入库管理、出库管理、员工管理和供应商管理6个小模块。然后,进一步细分模块,添加细节。比如,用户管理我又将其分为用户注册、用户注销、密码修改;库存管理分为库存记录查询、库存记录修改、库存记录打印等等。
以下就是系统的结构图:(在这里为了表达方便我将结构图分开来表达。)
在得到系统的第一层功能模块图后,经过进一步地细化,得一系统的子功能模块图:
4.2.2 数据库设计
在信息世界中,信息从客观事物出发流经数据库,通过决策机构最后又回到客观世界,信息的这一循环经历了三个领域:信息世界,数据世界,现实世界。现实世界的事物反映到人的头脑中,人的大脑对它有个认识过程,经过分析(选择、命名、分类等)进入信息世界。这些信息再进一步加工、编码,然后进数据世界,而软件系统的开发工作需要考虑这两个方面的问题,也就是要考虑系统开发所需要的数据,以及如何对这些数据进行操作。这两个问题贯穿了整个软件系统的开发过程,这也就是数据库的设计问题,软件设计的一个核心。
4.2.2.1 ER图设计
在系统设计的开始,我首先考虑的是如何用数据模型来数据库的结构与语义,以对现实世界进行抽象。目前广泛使用的数据模型可分为两种类型,一种是独立于计算机系统的“概念数据模型”,如“实体联系模型”;另一种是直接面向数据库逻辑结构的“结构数据模型”。在本系统中我采用“实体联系模型”(ER模型)来描述数据库的结构与语义,以对现实世界进行第一次抽象。ER模型直接从现实世界抽象出实体类型及实体间联系,然后用ER图来表示数据模型。它有两个明显的优点:接近于人的思维,容易理解;与计算机无关,用户容易接受。但ER模型只能说明实体间语义的联系,不能进一步说明详细的数据结构,它只是数据库设计的第一步。
ER图是直观表示概念模型的工具,它有四个基本成分:
矩形框,表示实体类型(考虑问题的对象)。
菱形框,表示联系类型(实体间的联系)。
椭圆形框,表示实体类型和联系类型的属性。对于关键码的属性,在属性名下划一横线。
直线,联系类型与其涉及的实体类型之间以直线连接。
本系统为图书仓库管理,主要管理图书的入库、出库以及库存等事项。仓库根据需要可以查询图书供应商的信息,同时还需要了解在入库和出库中员工的参与情况。依据仓库管理的实际情况,考虑了多方面的因素以后,确定系统的ER图如下:
(为了表达的方便,在这里我没有在一张图上表达出所有的关系,而是用一张总体ER图,和几张实体属性关系图来表达数据库的结构。)
在该数据库中,我设计了三个实体,分别是库存、员工和供应商以及两个联系类型入库和出库。在本系统中库存是核心,也是基本,没有了库存其它的也就没有什么意义了。员工记录的添加是考虑到责任问题,也就是说,在仓库管理的实际运用中,出现了责任不清的现象,特别是由于仓库的进出图书数量都比较大时产生了一系列问题,所以在设计数据库时,我特别考虑到这一点,加入了员工记录这一实体。供应商信息的添加主要出于对图书来源问题的思考。通过添加供应商信息可以比较清楚地了解图书的进货渠道,从图书的质量到供应商的信誉都可以进行了解,同时可以为以后的图书进购提供一定有用的信息。
入库联系类型将库存信息、供应商信息和员工信息联系在一起,可以方便地实现三个实体之间的联接,而出库联系类型则将库存信息和员工信息较好地联接起,同时这两个联系类型又都具有各自特有的属性。
下面就是各实体及联系类型的属性图:(带#号的属性为关键字段)4.2.2.2 数据库表格设计
在完成系统的ER图之后,需要将ER模型转化为关系模型,也就是说,要设计出数据库所需要的表格。在这里,我选用的是关系数据库。因为关系数据库中的二维表格可以很清楚地描述数据之间的联系。
在这里不得不提到一个概念——范式。其实在上一节的ER图设计中,已经运用了范式的思想,不仅如此,在数据库的表格设计中更离不开范式的思想,它是数据库设计的基础,如果不注意这个问题将会导致一系列问题的出现。
我在系统中定义的表格都严格地按照范式的思想和要求去完成,数据库中的所有表格都达到了三范式的要求。根据系统ER图,针对本系统的特点,在对所搜集的数据进行规范化之后,定义了如下六张表格,分别是库存信息表,入库信息表,出库信息表,员工信息表,供应商信息表和密码信息表。通过对这六张表格的操作可以较好地完成系统设计的各项功能,六张表格之间有着不同程度的联系。(说明:在以下数据表中,K代表主键,#代表外键,字段值不为空。)
BookRecord 表(库存信息表)
字段名称 数据类型 说明
K BookID 数字 图书编号
BookName 文本 图书名
Author 文本 作者
Publisher 文本 出版社
PubDate 日期/时间 出版日期
Price 货币 价格
BookType 文本 图书类型
Number1 数字 库存数量
Addation 文本 备注
图4.13 库存信息表
库存信息表主要用于记录仓库中现存放的所有图书的详细信息,包括图书编号、书名、作者、出版社、图书类型等有关图书的各类信息,它即是该数据库的主表,也是系统主界面的主要内容。
在该表中图书编号是主键,它按图书入库的先后次序来编写,每当有图书入库,系统自动给出图书编号,这样我们按图书编号来查找图书是比较方便的。考虑到编号比较难于记忆,所以使用了出版社和图书类型两个字段,在系统中我提供了出版社和图书类型的分类查找,而且全部采用自动生成,每当系统中有新的出版社类型和图书类型,弹出菜单会自动添中新类型,这样就可以比较方便地实现按出版社和按图书类型查找。此外,库存数量也是一个比较关键的字段,该字段是在系统初始化时就给定的,每当有图书入库或出库操作,系统就会自动修改图书的库存数量,以保持数据的一致性。做为备注有一点说明,我的数据库中备注的数据类型是文本,而不是备注类型,主要考虑到该字段的长度并不大,而且在Delphi中文本数据类型的处理也比较方便一点。
Employee 表(员工信息表)
字段名称 数据类型 说明
K EmployeeID 数字 员工编号
EmployeeName 文本 员工姓名
Sex 文本 性别
BornDate 日期/时间 出生日期
Grade 文本 职称
WorkDate 日期/时间 工作日期
Telephone 文本 联系电话
Address 文本 联系地址
图4.14 员工信息表
员工信息表主要用于记录有关员工的各类信息,包括姓名、职称、出生日期、联系电话、联系地址等。它主要用来为系统提供员工的有关信息,因为在系统中,入库和出库操作均与员工有着一定的联系,在查询入库信息和出库信息时,有时需要查找有关此项记录有关的员工信息,在系统中我是通过入库记录与员工记录(出库记录和员工记录)之间的联接查询来完成的。另外,作为一个仓库也有必要了解其所属员工的一些基本情况,以便查询。
Shopkeeper 表(供应商信息表)
字段名称 数据类型 说明
K ShopkeeperID 数字 供应商编号
ShopkeeperName 文本 供应商姓名
Address 文本 地址
PostNo 数字 邮编
OfficePhone 文本 办公电话
HomePhone 文本 住宅电话
Email 文本 E-mail
PayType 文本 付款方式
图4.15 供应商信息表
供应商信息表主要用于记录有关供应商的各类信息,包括姓名、地址、电话、付款方式等。它主要用来为系统提供供应商的有关信息,在系统中入库记录是与供应商记录相联系的,通过入库记录可以查找相关的供应商信息。在供应商信息中,考虑当实际情况,我特别加入了Email和付款方式这两个字段,因为在当今信息世界中,多种多样的通讯方式和多种多样的付款方式是必然的,是数据库中必须与以记录。
InRecord 表(入库信息表)
字段名称 数据类型 说明
K InID 数字 入库编号
# BookID 数字 图书编号
# EmployeeID 数字 员工编号
# ShopkeeperID 数字 供应商编号
Number 数字 入库数量
BuyDate 日期/时间 入库日期
图4.16 入库信息表
OutRecord 表(出库信息表)
字段名称 数据类型 说明
K OutID 数字 出库编号
# BookID 数字 图书编号
# EmployeeID 数字 员工编号
Number2 数字 出库数量
OutDate 日期/时间 出库日期
图4.17 出库信息表
入库信息表主要用于记录有关入库的详细信息,包括入库数量、入库日期以及图书、员工、供应商三方的编号,以便查询。出库信息表主要用于记录有关出库的详细信息,包括出库数量、出库日期以及图书、员工的编号。出库信息表和入库信息表一样,其实它们都属于联系类型,系统通过这两个表可以联接上其它的表为用户提供多种条件的联接查询。值得提出的一点是入库记录和出库记录的添加不仅仅是单表操作,由于它们都与库存记录相联系,所以,无论您是添中入库记录还是添加出库记录,都必须同时修改库存记录,以保持数据的一致性,否则将引发系统出错而这些我都让其在系统中自动完成。无论您是添加入库记录,还是添加出库记录,系统都将自动修改库存中图书的数量,而且,在您出库的数量大于库存数量时,系统还会自动提示错误,这样就可以防止一定错误的发生。
在入库信息表和出库信息表中我还定义了几个外键,它提供了一种表示几个关系联系的方法。比如,系统中通过在入库信息表中定义的外键 BookID、EmployeeID和ShopkeeperID可以将库存信息表、员工信息表和供应商信息表联系在一起,从而方便地实现联接查询,而且,引入外键的定义是实体完整性约束的一个主要方面。
Key 表(密码信息表)
字段名称 数据类型 说明
K KeyName 文本 用户姓名
KeyNo 文本 用户密码
图4.18 密码信息表
密码信息表主要用于记录所有的用户名和用户密码。它是在用户登陆时用来确定用户和密码的正确性,以防止非法用户登陆。
通过以上设计已经完成了系统的概要设计,当我们有了系统的功能模块图和数据库之后,就需要着手去实现每一个模块,为每一个功能设计程序流程图,这也就是系统的详细设计。
§4.3 系统详细设计
在前面的概要设计中,已将系统划分为多个模块,并将它们按照一定的原则组装起来,同时确定了每个功能及模块之间的外部接口。现在所要做的就是确定每个模块具体执行过程,也可以说是“过程设计”。
在处理过程设计时我采用的是结构化程序设计(简称SP)方法。需要指出的是系统的详细设计并不是指具体的编程序,而是将概要设计阶段产生的系统功能模块图细化成很容易产生程序的图纸。因此详细设计的结果基本决定了最终程序的质量。为软件的质量,延长软件的生存期,软件的可测试性、可维护性提供重要的保障。详细设计的目标不仅是逻辑上正确地实现每个模块的功能,还应使设计出的处理过程清晰易读。
由前一阶段产生的系统功能模块图,我为系统的主要部分设计了如下程序流程图:通过以上步骤,基本上完成了对整个系统的总体设计,接下来所要做的就是软件的编码工作。系统总体设计的好坏直接影响着下一步工作,只有在这一阶段设计出好的模块图和程序流程图,才能更有利于编码,产生好的软件系统。
第五章 系统应用程序设计
§5.1 系统窗体模块组成
§5.2 数据模块窗体的设置
在编写数据库应用程序时,经常要遇到这样的情况,即好多组件、窗体同时访问相同的数据源,如果为每一个组件或者窗体都设置一个数据源将是十分耗时的工件,而且要保证这些数据源的确是相同的也需花一番功夫。那么,能不能将这些数据源集中管理,最好是做成一个统一的模块,需要时就将该模块引入而不必直接操作数据源本身呢?数据模块(DataModule)是解决这个问题最好的答案。简单说来,数据模块是用来集中管理数据源的一个窗体,该窗体可被需要的地方随时引入。
图5.2给出了本程序的数据模块(datamoduleform)窗体图,除报表窗体外所有的数据存取组件和数据源组件都在此数据模块中进行了定义。值得一提的是,设置了数据库Database组件,该组件引入了系统所需的唯一的数据库tsxs,Database组件的DatabaseName属性设置为tsckgl。tsxs数据库已在ODBC配置程序中进行了设置。其他的数据存取组件都是基于此数据库组件创建的,这样做的好处是,当数据库的别名或者其他信息改变之后,只需修改Tdatabase组件的AliasName属性即可。
另外,在本系统的数据模块窗体图中,我大多采用的AODQuery组件而没有采用BDE组,这主要是基于对ADO组件的了解。在Delphi的学习中我对ADO组件了解的更加清楚,使用也较BDE更为熟练,而且,ADO组件的功能也较BDE更为强大,所以在这里大多采用ADO组件来进行数据库联接。同时我也使用了BDE组件中的Table,因为在某些时候BDE有着其自身特有的优越性。 主窗体功能模块的实现
file://主窗体程序代码
public
file://在程序的起始部分,定义快捷按钮点击事件
Procedure Popup1Handler(Sender:Tobject);
Procedure Popup2Handler(Sender:TObject);
**********************************************************************
procedure Tmainform.Popup1Handler(Sender: TObject);
begin
file://快捷按钮1(点“按出版社分类”按钮产生)的点击事件
with datamoduleform.MainQuery do
begin
file://打开数据模块窗体的MainQuery,对BookRecord表进行操作
close;
file://关闭MainQuery
SQL.Clear;
file://清除SQL属性中的SQL命令语句
SQL.Add(‘select * from BookRecord where Publisher=:Pub‘); file://添加新的SQL语句
Parameters.ParamByName(‘Pub‘).Value:=(Sender as TMenuItem).Caption;
open;
file://重新打开MainQuery
end;
end;
**********************************************************************
procedure Tmainform.SpeedButton1Click(Sender: TObject);
Var s1,s2,s3,s4,s5 :String;
file://设立5个变量以方便实现模糊查询
begin
file://主窗口库存查询按钮事件
with datamoduleform.MainQuery do
begin
close;
SQL.Clear;
SQL.Add(‘select * from BookRecord‘);
SQL.Add(‘where BookID Like :BookID and BookName Like :Name and Author Like :Author and Publisher Like :pub and BookType Like :BookType‘);
file://使用Like语句来实现模糊查询
if Edit1.Text‘‘ then s1:=‘%‘+Edit1.Text+‘%‘ else s1:=‘%‘;
Parameters.ParamByName(‘BookID‘).Value:=s1;
file://给变量s1赋值
if Edit2.Text‘‘ then s2:=‘%‘+Edit2.Text+‘%‘ else s2:=‘%‘;
Parameters.ParamByName(‘Name‘).Value:=s2;
file://给变量s2赋值
if Edit3.Text‘‘ then s3:=‘%‘+Edit3.Text+‘%‘ else s3:=‘%‘;
Parameters.ParamByName(‘Author‘).Value:=s3;
file://给变量s2赋值
if Edit4.Text‘‘ then s4:=‘%‘+Edit4.Text+‘%‘ else s4:=‘%‘;
Parameters.ParamByName(‘Pub‘).Value:=s4;
file://给变量s2赋值
if Edit5.Text ‘‘ then s5:=‘%‘+Edit5.Text+‘%‘ else s5:=‘%‘;
Parameters.ParamByName(‘BookType‘).Value:=s5;
file://给变量s2赋值
open;
if FieldValues[‘BookID‘]=NULL
file://判断是否找到记录
then begin
Messagedlg(‘没有找到你所需要的记录!‘,mtInformation,[mbOK],0);
Edit1.Text:=‘‘;Edit2.Text:=‘‘;Edit3.Text:=‘‘;Edit4.Text:=‘‘;Edit5.Text:=‘‘;
close;
SQL.Clear;
SQL.Add(‘select * from BookRecord‘);
file://这里相当于一个刷新功能
open;
end;end;
end;
**********************************************************************
procedure Tmainform.SpeedButton3Click(Sender: TObject);
begin
file://库存表刷新按钮事件
with datamoduleform.MainQuery do
begin
close;
SQL.Clear;
SQL.Add(‘select * from BookRecord‘);
open;
end;
end;
**********************************************************************
procedure Tmainform.SpeedButton11Click(Sender: TObject);
var PopupItem:TMenuItem;
begin
file://自动生成快捷按钮1的内容
with datamoduleform.BookQuery do
begin
file://从数据库中选择出版社类型
close;
SQL.Clear;
SQL.Add(‘select distinct Publisher from BookRecord‘);
open;
PopupMenu1:=TPopupMenu.Create(Self); file://自动生成快捷菜单
PopupMenu1.AutoHotkeys:=maManual;
file://自定义热键
while Not Eof do
begin
file://根据出版社内容生成菜单子项
PopupItem:=TMenuItem.Create(Self);
PopupItem.Caption:=FieldByName(‘Publisher‘).AsString;
PopupMenu1.Items.Add(PopupItem);
PopupItem.onClick:=Popup1Handler;
file://确定菜单子项的点击事件
Next;
end; end;
PopupMenu1.Popup(384,67);
file://在指定位置显示快捷菜单1
end;
**********************************************************************
procedure Tmainform.FormActivate(Sender: TObject);
begin
file://系统初始化,在进入mainform时自动添加数据源
mainform.DBGrid1.DataSource:=datamoduleform.MainSource;
mainform.DBNavigator1.DataSource:=datamoduleform.MainSource;
mainform.DBGrid2.DataSource:=datamoduleform.EmpSource;
mainform.DBNavigator2.DataSource:=datamoduleform.EmpSource;
mainform.DBGrid3.DataSource:=datamoduleform.ShopSource;
mainform.DBNavigator3.DataSource:=datamoduleform.ShopSource;
mainform.DBGrid4.DataSource:=datamoduleform.InSource;
mainform.DBNavigator4.DataSource:=datamoduleform.InSource;
mainform.DBGrid5.DataSource:=datamoduleform.OutSource;
mainform.DBNavigator5.DataSource:=datamoduleform.OutSource;
end;
**********************************************************************
procedure Tmainform.FormCreate(Sender: TObject);
begin
file://系统初始化,定义界面大小,以适应不同分辩率
Width:=800;Height:=600;
end;
**********************************************************************
procedure Tmainform.Timer1Timer(Sender: TObject);
begin
file://在状态栏显示时间
StatusBar1.Panels[2].Text:=DateToStr(Date);
StatusBar1.Panels[4].Text:=TimeToStr(Time);
end;
§5.4 入库、出库窗体模块的实现
图5.4 系统入库管理窗体
图5.5 系统出库管理窗体
procedure Tinoutform.SpeedButton4Click(Sender: TObject);
begin
file://入库管理查找按钮事件
with datamoduleform.BookQuery do
file://入库查询处理
begin
close;
SQL.Clear;
SQL.Add(‘select * from BookRecord where BookID=:BookID‘);
Parameters.ParamByName(‘BookID‘).Value:=Edit13.Text;
open;
if FieldValues[‘BookID‘]NULL
then
begin
Edit1.Text:=‘‘;
Edit1.ReadOnly:=true;Edit1.Color:=clMenu;
Edit6.Text:=FieldValues[‘BookName‘]; file://显示图书名
Edit6.ReadOnly:=true;Edit6.Color:=clMenu; file://设置显示框不可更改属性
Edit7.Text:=FieldValues[‘Author‘];
Edit7.ReadOnly:=true;Edit7.Color:=clMenu;
Edit8.Text:=FieldValues[‘Publisher‘];
Edit8.ReadOnly:=true;Edit8.Color:=clMenu;
Edit9.Text:=FieldValues[‘PubDate‘];
Edit9.ReadOnly:=true;Edit9.Color:=clMenu;
Edit10.Text:=FieldValues[‘Price‘];
Edit10.ReadOnly:=true;Edit10.Color:=clMenu;
Edit11.Text:=FieldValues[‘BookType‘];
Edit11.ReadOnly:=true;Edit11.Color:=clMenu;
Edit12.Text:=FieldValues[‘Number1‘];
Edit12.ReadOnly:=true;Edit12.Color:=clMenu;
If FieldValues[‘Addation‘]NULL
then Edit25.Text:=FieldValues[‘Addation‘]
else Edit25.Text:=‘‘;
Edit25.ReadOnly:=true;Edit25.Color:=clMenu;
end
else
begin
file://在没有查找到的情况下,清空所有显示框
Edit1.ReadOnly:=false;Edit1.Text:=‘‘;Edit1.Color:=clMenu;
Edit6.ReadOnly:=false;Edit6.Text:=‘‘;Edit6.Color:=clMenu;
Edit7.ReadOnly:=false;Edit7.Text:=‘‘;Edit7.Color:=clMenu;
Edit8.ReadOnly:=false;Edit8.Text:=‘‘;Edit8.Color:=clMenu;
Edit9.ReadOnly:=false;Edit9.Text:=‘‘;Edit9.Color:=clMenu;
Edit10.ReadOnly:=false;Edit10.Text:=‘‘;Edit10.Color:=clMenu;
Edit11.ReadOnly:=false;Edit11.Text:=‘‘;Edit11.Color:=clMenu;
Edit12.ReadOnly:=false;Edit12.Text:=‘‘;Edit12.Color:=clMenu;
Edit25.ReadOnly:=false;Edit25.Text:=‘‘;Edit25.Color:=clMenu;
MessageDlg(‘没有找到你所需要的记录!‘,mtInformation,[mbOK],0);
Edit13.Text:=‘‘;Edit13.SetFocus;
end;
end;
with datamoduleform.InQuery do file://自动入库编号的获取
begin
close;
SQL.Clear;
SQL.Add(‘select * from InRecord where InID>=All(select InID from InRecord)‘);
open;
file://找到入库编号中最大的一个
Edit26.ReadOnly:=false;
Edit26.Text:=FieldValues[‘InID‘]+1; file://最大的入库编号加1形成新的入库编号
Edit26.ReadOnly:=true;Edit26.Color:=clMenu; file://设置编号的不可更改性
end;
end;
**********************************************************************
procedure Tinoutform.SpeedButton1Click(Sender: TObject);
var s:integer;
begin
file://入库管理添加按钮事件
if Edit1.TextNULL
then MessageDlg(‘请输入完整的入库信息和图书信息,然后单击确定按钮。‘,
mtInformation,[mbok],0)
else begin
if (Edit2.Text=‘‘) or (Edit3.Text=‘‘) or (Edit4.Text=‘‘) or (Edit5.Text=‘‘)
then begin
MessageDlg(‘请输入完整的入库信息!‘,mtInformation,[mbok],0);
Edit2.SetFocus;
end
else begin
with datamoduleform.InQuery do
file://将找到的图书信息显示
begin
close;
SQL.Clear;
SQL.Add(‘insert into InRecord values(:InID,:BookID,:EmpID,:ShopID,
:Number,:InDate)‘); file://向入库信息表中插入记录
Parameters.ParamByName(‘InID‘).Value:=Edit26.Text; file://向Edit框取值
Parameters.ParamByName(‘BookID‘).Value:=Edit13.Text;
Parameters.ParamByName(‘EmpID‘).Value:=Edit2.Text;
Parameters.ParamByName(‘ShopID‘).Value:=Edit3.Text;
Parameters.ParamByName(‘Number‘).Value:=Edit4.Text;
Parameters.ParamByName(‘InDate‘).Value:=Edit5.Text;
execSQL;
end;
Edit12.ReadOnly:=False;
S:=StrToInt(Edit12.Text)+StrToInt(Edit4.Text); file://计算入库后库存图书数量
Edit12.Text:=IntToStr(s);
file://将修改后的库存图书数量显示
Edit12.ReadOnly:=true;
with datamoduleform.BookQuery do
file://修改库存记录中图书数量
begin
close;
SQL.Clear;
SQL.Add(‘update BookRecord set Number1=:Number where
BookID=:BookID‘);
Parameters.ParamByName(‘Number‘).Value:=s;
Parameters.ParamByName(‘BookID‘).Value:=Edit13.Text;
execSQL;
file://提交SQL语句
MessageDlg(‘记录已成功添加!‘,mtInformation,[mbOK],0);
Edit13.SetFocus;
end;
end;
end;
end;
**********************************************************************
procedure Tinoutform.SpeedButton2Click(Sender: TObject);
begin
file://入库管理确定按钮事件
if (Edit2.Text=‘‘) or (Edit3.Text=‘‘) or (Edit4.Text=‘‘) or (Edit5.Text=‘‘)
or (Edit6.Text=‘‘) or (Edit7.Text=‘‘) or (Edit8.Text=‘‘) or (Edit9.Text=‘‘)
or (Edit10.Text=‘‘) or (Edit11.Text=‘‘) or (Edit25.Text=‘‘)
then begin
file://判断输入信息的完整性
MessageDlg(‘请输入所需的全部入库信息!‘,mtInformation,[mbok],0);
Edit2.SetFocus;
end
else
begin
with datamoduleform.InQuery do
file://入库信息添加
begin
close;
SQL.Clear;
SQL.Add(‘insert into InRecord values(:InID,:BookID,:EmpID,:ShopID,
:Number,:InDate)‘);
file://向入库信息表中插入记录
Parameters.ParamByName(‘InID‘).Value:=Edit26.Text;
Parameters.ParamByName(‘BookID‘).Value:=Edit1.Text;
Parameters.ParamByName(‘EmpID‘).Value:=Edit2.Text;
Parameters.ParamByName(‘ShopID‘).Value:=Edit3.Text;
Parameters.ParamByName(‘Number‘).Value:=Edit4.Text;
Parameters.ParamByName(‘InDate‘).Value:=Edit5.Text;
execSQL;
end;
with datamoduleform.BookQuery do
begin
close;
SQL.Clear;
file://在完成入库信息的添加后,修改库存记录
SQL.Add(‘insert into BookRecord values(:BookID,:BookName,:Author,
:Publisher,:PubDate,:Price,:BookType,:Number,:Addration)‘);
Parameters.ParamByName(‘BookID‘).Value:=Edit1.Text;
Parameters.ParamByName(‘BookName‘).Value:=Edit6.Text;
Parameters.ParamByName(‘Author‘).Value:=Edit7.Text;
Parameters.ParamByName(‘Publisher‘).Value:=Edit8.Text;
Parameters.ParamByName(‘PubDate‘).Value:=Edit9.Text;
Parameters.ParamByName(‘Price‘).Value:=Edit10.Text;
Parameters.ParamByName(‘BookType‘).Value:=Edit11.Text;
Parameters.ParamByName(‘Number‘).Value:=Edit4.Text;
Parameters.ParamByName(‘Addration‘).Value:=Edit25.Text;
execSQL;
end;
MessageDlg(‘记录添加成功!‘,mtInformation,[mbok],0);
end;
end;
**********************************************************************
procedure Tinoutform.SpeedButton11Click(Sender: TObject);
begin
file://新书入库按钮事件
Edit13.Text:=‘‘;Edit13.Color:=clMenu;
with datamoduleform.InQuery do file://自动入库编号的获取
begin
close;
SQL.Clear;
SQL.Add(‘select * from InRecord where InID>=All(select InID from InRecord)‘);
open;
Edit26.Text:=FieldValues[‘InID‘]+1;
Edit26.ReadOnly:=true;Edit26.Color:=clMenu;
end;
with datamoduleform.BookQuery do
file://自动图书编号的获取
begin
close;
SQL.Clear;
SQL.Add(‘select * from BookRecord where BookID>=All(select BookID from BookRecord)‘);
file://找到库存图书编号中最大的一个
open;
Edit1.ReadOnly:=false;
Edit1.Text:=FieldValues[‘BookID‘]+1; file://显示自动生成的图书编号
Edit1.ReadOnly:=true;Edit1.Color:=clMenu;
end;
Edit2.Text:=‘‘;Edit3.Text:=‘‘;Edit4.Text:=‘‘;Edit5.Text:=‘‘;
Edit6.ReadOnly:=false;Edit6.Text:=‘‘;Edit6.Color:=clWindow;
Edit7.ReadOnly:=false;Edit7.Text:=‘‘;Edit7.Color:=clWindow;
Edit8.ReadOnly:=false;Edit8.Text:=‘‘;Edit8.Color:=clWindow;
Edit9.ReadOnly:=false;Edit9.Text:=‘‘;Edit9.Color:=clWindow;
Edit10.ReadOnly:=false;Edit10.Text:=‘‘;Edit10.Color:=clWindow;
Edit11.ReadOnly:=false;Edit11.Text:=‘‘;Edit11.Color:=clWindow;
Edit12.ReadOnly:=false;Edit12.Text:=‘‘;Edit12.Color:=clMenu;
Edit25.ReadOnly:=false;Edit25.Text:=‘‘;Edit25.Color:=clWindow;
end;
procedure Tinoutform.SpeedButton22Click(Sender: TObject);
var s:integer;
begin
file://出库管理确定按钮事件
if (Edit24.Text=‘‘) or (Edit27.Text=‘‘) or (Edit28.Text=‘‘)
then begin
MessageDlg(‘请输入完整的出库信息!‘,mtInformation,[mbok],0);
Edit24.SetFocus;
end
else begin
if Edit27.Text>Edit21.Text
file://检查出库数量是否小于库存数量
then begin
MessageDlg(‘库存中的图书数量不够!‘,mtInformation,[mbok],0);
Edit27.Text:=‘‘;Edit27.SetFocus;
end
else begin
with datamoduleform.OutQuery do
begin
close;
SQL.Clear;
SQL.Add(‘insert into OutRecord values(:OutID,:BookID,:EmpID,
:Number,:OutTime)‘);
file://添加出库记录
Parameters.ParamByName(‘OutID‘).Value:=Edit23.Text;
Parameters.ParamByName(‘BookID‘).Value:=Edit14.Text;
Parameters.ParamByName(‘EmpID‘).Value:=Edit24.Text;
Parameters.ParamByName(‘Number‘).Value:=Edit27.Text;
Parameters.ParamByName(‘OutTime‘).Value:=Edit28.Text;
execSQL;
end;
Edit21.ReadOnly:=False;
s:=StrToInt(Edit21.Text)-StrToInt(Edit27.Text); file://计算出库后库存图书数量
Edit21.Text:=IntToStr(s);
file://显示出库后库存图书数量
Edit21.ReadOnly:=True;
with datamoduleform.BookQuery do
begin
file://修改库存图书数量
close;
SQL.Clear;
SQL.Add(‘update BookRecord set Number1=:Number where BookID=:BookID‘);
Parameters.ParamByName(‘Number‘).Value:=s;
Parameters.ParamByName(‘BookID‘).Value:=Edit14.Text;
execSQL;
end;
MessageDlg(‘出库记录添加成功!‘,mtInformation,[mbok],0);
Edit14.Text:=‘‘;Edit14.SetFocus;
end;
end;
end;
§5.5 查询功能的实现
查询功能包括员工信息查询,供应商信息查询,入库信息查询和出库信息查询。由于每一个功能的实现都差不太多,而且其窗体也差不太多,所以在这里只给出员工信息查询窗体及其源代码。
图5.6 员工信息查询窗体
procedure Tfindempform.SpeedButton1Click(Sender: TObject);
Var s1,s2,s3 :String;
begin
file://员工记录查询窗体查找按钮事件
with datamoduleform.EmpQuery do
begin
close;
SQL.Clear;
SQL.Add(‘select * from Employee‘);
SQL.Add(‘where EmployeeID Like :EmpID and EmployeeName Like :Name and Grade Like :Grade‘);
file://实现模糊查询功能
if Edit1.Text‘‘ then s1:=‘%‘+Edit1.Text+‘%‘ else s1:=‘%‘;
Parameters.ParamByName(‘EmpID‘).Value:=s1;
if Edit2.Text‘‘ then s2:=‘%‘+Edit2.Text+‘%‘ else s2:=‘%‘;
Parameters.ParamByName(‘Name‘).Value:=s2;
if Edit3.Text‘‘ then s3:=‘%‘+Edit3.Text+‘%‘ else s3:=‘%‘;
Parameters.ParamByName(‘Grade‘).Value:=s3;
open;
if FieldValues[‘EmployeeID‘]NULL
then findempform.Close
file://在找到记录的情况下关闭查找窗口
else
begin
MessageDlg(‘没有找到你所需要的记录!‘,mtInformation,[mbOK],0);
Edit1.Text:=‘‘;Edit2.Text:=‘‘;Edit3.Text:=‘‘;Edit1.SetFocus;
close; SQL.Clear;
SQL.Add(‘select * from Employee‘);
file://刷新员工信息窗口
open;
end; end;
end;
§5.6 系统登陆窗体模块的实现
由于系统登陆窗体中有一幅彩图,在这里不便给出,而只给出了系统的实现。
var keyname: string; file://定义了一个全局变量,在key2中有调用
procedure Tkeyform.SpeedButton1Click(Sender: TObject);
var s:string;
file://登陆窗口登陆按钮事件
begin
if (Edit1.Text=‘‘) then begin
MessageDlg(‘清输入登陆姓名和密码!‘,mtInformation,[mbok],0);
Edit1.SetFocus;
end
else begin
datamoduleform.KeyTable.Active:=true;
if not datamoduleform.KeyTable.Locate(‘KeyName‘,Edit1.Text,[])
file://判断登陆名是否存在
then begin
MessageDlg(‘登陆名错误,请重新输入!‘,mtInformation,[mbok],0);
Edit1.Text:=‘‘; Edit1.SetFocus;
end
else begin
with datamoduleform.KeyQuery do
begin
close; SQL.Clear;
SQL.Add(‘select * from Key where KeyName=:KeyName‘);
Parameters.ParamByName(‘KeyName‘).Value:=Edit1.Text;
open;
s:=FieldValues[‘KeyNo‘];
end;
if sEdit2.Text file://判断登陆密码是否正确
then begin
MessageDlg(‘登陆密码错误,请重新输入!‘,mtInformation,[mbok],0);
Edit2.Text:=‘‘; Edit2.SetFocus;
end
else begin
keyname:=Edit1.Text;
keyform.Hide;
mainform.Show;mainform.WindowState:=wsMaximized;
end; end; end;
end;
§5.7 用户管理功能的实现
5.7.1 用户管理主窗体
图5.7 用户管理主窗体
5.7.2 密码修改窗体模块的实现
图5.8 密码修改窗体
procedure Tkey2form.SpeedButton1Click(Sender: TObject);
begin
file://密码修改窗口修改按钮事件
if (Edit1.Text=‘‘)or(Edit2.Text=‘‘)or(Edit3.Text=‘‘)
then begin
MessageDlg(‘请输入完整的信息。‘,mtInformation,[mbok],0);
Edit1.SetFocus;
end
else begin
if Not datamoduleform.KeyTable.Locate(‘KeyNo‘,Edit1.Text,[])
then begin
MessageDlg(‘原密码输入错误,不能修改新密码!‘,mtInformation,[mbok],0);
Edit1.Text:=‘‘;Edit2.Text:=‘‘;Edit3.Text:=‘‘;Edit1.SetFocus;
end
else begin
if Edit2.TextEdit3.Text
then begin
MessageDlg(‘两次密码输入不同,请重新输入新密码!‘,mtInformation,[mbok],0);
Edit2.Text:=‘‘;Edit3.Text:=‘‘;Edit2.SetFocus;
end
else begin
file://在数据库中修改密码
with datamoduleform.KeyQuery do
begin
close; SQL.Clear;
SQL.Add(‘update key set KeyNo=:KeyNo where KeyName=:KeyName‘);
Parameters.ParamByName(‘KeyName‘).Value:=keyname;
Parameters.ParamByName(‘KeyNo‘).Value:=Edit2.Text;
execSQL;
MessageDlg(‘密码修改成功!‘,mtInformation,[mbok],0);
key2form.Close;
end; end; end; end;
end;
5.7.3 用户注册窗体模块的实现
图5.9 用户注册窗体
procedure Tkey3form.SpeedButton1Click(Sender: TObject);
begin
file://用户注删窗口注删按钮事件
if (Edit1.Text=‘‘)or(Edit2.Text=‘‘)or(Edit3.Text=‘‘)
then begin
MessageDlg(‘请输入完整的信息!‘,mtInformation,[mbok],0);
Edit1.SetFocus;
end
else begin
if datamoduleform.KeyTable.Locate(‘KeyName‘,Edit1.Text,[])
file://判断用户名是否存在,系统不允许用户名重复
then begin
MessageDlg(‘用户名已存在,请输入新的用户名和密码!‘,
mtInformation,[mbok],0);
Edit1.Text:=‘‘;Edit2.Text:=‘‘;Edit3.Text:=‘‘;Edit1.SetFocus;
end
else begin
if Edit2.TextEdit3.Text
then begin
MessageDlg(‘您输入的两个密码不相同,请重新输入!‘,mtInformation,[mbok],0);
Edit2.Text:=‘‘;Edit3.Text:=‘‘;Edit2.SetFocus;
end
else begin
with datamoduleform.KeyQuery do
file://在数据库中添加该用户
begin
close;
SQL.Clear;
SQL.Add(‘insert into Key values(:KeyName,:KeyNo)‘);
Parameters.ParamByName(‘KeyName‘).Value:=Edit1.Text;
Parameters.ParamByName(‘KeyNo‘).Value:=Edit2.Text;
execSQL;
end;
MessageDlg(‘新用户添加成功,您可以继续添加用户,或按“取消”退出。‘,mtInformation,[mbok],0);
Edit1.Text:=‘‘;Edit2.Text:=‘‘;Edit3.Text:=‘‘;Edit1.SetFocus;
end; end; end;
end;
5.7.4 用户注销窗体模块的实现
图5.10 用户注销窗体
procedure Tkey4form.SpeedButton1Click(Sender: TObject);
var s:string;
begin
file://用户注销窗口注销按钮事件
if (Edit1.Text=‘‘)or(Edit2.Text=‘‘)
then MessageDlg(‘请输入完整的信息!‘,mtInformation,[mbok],0)
else begin
if Not datamoduleform.KeyTable.Locate(‘KeyName‘,Edit1.Text,[])
file://判断用户名是否存在,用户名必须存在,才可以删除
then begin
MessageDlg(‘您所输入的用户名不存在,请重新输入或按“取消”退出。‘,
mtInformation,[mbok],0);
Edit1.Text:=‘‘;Edit2.Text:=‘‘;Edit1.SetFocus;
end
else begin
with datamoduleform.KeyQuery do
begin
close;
SQL.Clear;
SQL.Add(‘select * from Key where KeyName=:KeyName‘);
Parameters.ParamByName(‘KeyName‘).Value:=Edit1.Text;
open;
s:=FieldValues[‘KeyNo‘];
end;
if sEdit2.Text file://判断该用户名下的密码是否正确
then begin
MessageDlg(‘您所输入的密码不正确,请重新输入或按“取消”退出。‘,
mtInformation,[mbok],0);
Edit2.Text:=‘‘;Edit2.SetFocus;
end
else begin
file://从数据库中删除该用户
with datamoduleform.KeyQuery do
begin
close;
SQL.Clear;
SQL.Add(‘delete from Key where KeyName=:KeyName‘);
Parameters.ParamByName(‘KeyName‘).Value:=Edit1.Text;
execSQL;
end;
MessageDlg(‘用户已成功删除,您可以继续删除用户,或按“取消”退出。‘,
mtInformation,[mbok],0);
Edit1.Text:=‘‘;Edit2.Text:=‘‘;Edit1.SetFocus;
end; end; end;
end;
结束语
本系统是一个面向小型图书企业,具有一定实用性的数据库信息管理系统。它主要完成对图书仓库的一系列管理,包括入库、出库、库存以及员工和供应商信息管理。本系统采用当前流行的面向对象的开发工具—Delphi来完成整个系统的设计,在数据库的设计上利用了Access的便利性和实用性。
本系统具有相当的实用功能。在查询方面,系统实现了多条件任意字段的模糊查询,同时在分类查询上实现了动态生成,系统可以自动识别用户不同的输入。在图书入库、出库和库存三者之间建立了良好的链接关系,某一部分地修改均会自动引发系统对与其相关的部分进行连锁修改。在用户管理方面,系统较好地实现了用户注册,用户注销和密码修改等各项功能。
系统在设计过程中不可避免地遇到了各种各样的问题,由于整个系统完全都是由个人设计的,有关Delphi许多细节问题都要靠自己去摸索,加之本人水平有限,并没有完全地理解Delphi的强大功能,而且还存在着许多不足之处。如:
受开发条件和开发时间的限制,本系统只利用了本地数据库Access,它同应用程序处于同一系统中,能存储的数据量也有一定限制,并没有发挥出Delphi其数据库方面的优势;
报表打印功能尚不够全面完善,不能实现动态报表;
在一些数据输入时没有及时的进行数据格式校验,不能保证数据输入的绝对正确性。
由于时间关系,系统功能实现不够完善,使用不是很方便,比如,没有实现多条记录的连锁删除和添加以及数据的导入功能。
这些都是需要完善的地方,该系统离实际使用也还有相当的距离,需要我进行不断地补充和完善。
通过本次毕业设计我学到了不少新的东西,也发现了大量的问题,有些在设计过程中已经解决,有些还有待今后慢慢学习。只要学习就会有更多的问题,有更多的难点,但也会有更多的收获。
考 文 献
[1] 郑荣贵、黄平、谷会东,Delphi 6.0数据库开发与应用,中科多媒体电子出版社,2002
[2] 伍俊良,Delphi 6控件应用实例教程,北京希望电子出版社,2002
[3] 卢国俊,Delphi 6数据库开发,电子工业出版社,2002
[4] 边萌,Delphi 编程起步,机械工业出版社,2002
[5] 伍俊良,Delphi 6课程设计案例精编,中国水利水电出版社,2002
关键词:课程建设;课程设计;计算机软件
作者简介:张艳(1976-),女,河南南阳人,上海理工大学光电信息与计算机工程学院,讲师。(上海 200093)
中图分类号:G642.0 文献标识码:A 文章编号:1007-0079(2013)05-0096-01
计算机是一门技术性、工程性和应用性很强的学科,教育部高等学校计算机科学与技术教学指导委员会的发展战略研究报告中也指出:计算机专业的人才应该被分为科学型、工程型、应用型三类,而绝大多数应该是工程型和应用型的。许多高校注重学生专业能力的培养,纷纷开设实践类课程以满足信息社会对实用型人才的需求。因此,如何建设实践类课程无疑是摆在每位一线专业教师面前的重要课题。本文以“应用软件课程设计”课程的建设为主要探讨对象,介绍了该课程的设置意义、教学方法和实施细则,希望能对计算机专业实践类课程的建设和教学以及学生的就业有所帮助。
一、课程设置的重要意义
在大学里,设置一门课程,不能只关注这门课程所含的内容,更要考虑本科教育培养学生基本专业能力、可持续发展能力等这些本质性的问题。计算机学科问题求解的基本思路是“问题形式化描述计算机化”,以抽象、理论、设计为其学科形态。按照计算机科学与技术专业本科生的培养目标,到学生毕业时应具备计算思维;算法设计与分析;程序设计与实现系统的认知、分析、开发与应用等四大基本能力。
“应用软件课程设计”课程面向大三的学生开设,在计算机科学与技术专业四年本科教学中,是以前期的“数据结构”、“计算方法”、“离散数学”、“软件系统”(包括编译原理,操作系统)、“软件工程”、“程序设计”、“数据库原理”以及“计算机网络与通信”等课程为基础的一门软件开发技术综合应用的专业课程。该课程让学生综合运用专业知识,通过动手实践,以团队协作的方式根据软件工程的原理选择难度适中的课题,完成网络环境下基于B/S架构的综合应用软件的系统设计与实现任务。课程设置的目的就是通过本课程的系统学习与实训,达到全面提升学生综合应用软件的实际开发能力和团队合作能力,以解决传统教学中理论学习与工程应用相脱节、单门课程孤立地学习与缺乏正确运用学科体系的理念来指导学生实现综合技术全面应用的突出问题,以期有效地实现计算机科学与技术专业本科学生的培养目标。
课程开设近10年的实践证明,学生综合运用计算机专业基础知识,科学设计、开发软件,合理进行软件开发的能力得到全方位的、实战型的锻炼,不仅实现了专业理论知识与实践有效地相互结合,而且很好地锻炼了学生的动手实践能力和团队协作能力,为日后的择业起到很好的铺垫作用。
二、“应用软件课程设计”的教学内容
“应用软件课程设计”主要以曹渠江教授编写的《综合运用软件设计》一书为教材,辅助以课程网站和网络上的各类学习资源,要求学生利用软件工程、面向对象程序设计的思想,根据课程项目任务和功能完成课题的需求分析;制定课程项目详细的时间进度规范;利用面向对象程序设计、计算机网络、数据库原理、多媒体技术等相关知识来进行数据库设计与开发;熟悉和掌握网络应用的开发环境,分析课题中技术难点并进行技术攻关;根据制定的时间进度计划和需求分析,进行网络环境下基于B/S架构的系统软件模块的编写、开发与整合;对整个项目所有模块进行代码集成测试、软件产品完善;最后提交课程设计个人报告、课程设计小组报告以及完整程序。整个课程总学时为64学时,主要以机房实践为主,通过演示软件、答辩的形式公开、公平地评定成绩。
三、应用软件课程设计的实施方法
1.本课程的实施原则
实践类课程不同于其他计算机专业课程,主要以实践为主,这就比较难控制进度和公正地评价学习成绩,因此笔者制定了如下实施原则:
由教师提供网上新闻管理系统、网上宠物商店、网上公文流转系统、药品管理系统、继续教育管理系统、网上用户投诉系统、在线同学录、企业仓库管理系统、班级相册管理系统、在线学籍管理系统、网上聊天室、客户关系管理系统等难度适中的十几个项目,对于每个项目都讲明设计要求和要求实现的基本功能;按照自愿原则,四到六个同学组成一个项目小组,推选出一位组长。对于没被组合的同学,由教师统一安排,每组配备一位有项目开发与项目管理经验的研究生为指导教师,负责学生的上机辅导、课外答疑、技术咨询与指导;每组由组长填报所有成员的个人信息,以便师生之间紧密联系;每组组长代表小组全体成员与指导教师商定每周一次的辅导、提问与答疑的时间,并互通联络信息;教师每周安排两次上机,每次4个学时。最初的3周(12学时)进行理论授课,主要讲课程基本要求和安排以及软件工程、软件开发工具和方法的基本知识;设立课程公共电子邮箱,上传所有课程资料、进度安排和学生要提交的各个阶段的文档模板,每位学生必须根据给定的工作模板与课程要求,在不同时间节点完成个人与小组的初期、中期、末期三个时期的阶段报告和最终的课程设计报告;最后进行大组公开演示和答辩,全体指导教师根据答辩情况、提交的报告质量、平时上机表现与平时的检查情况集体打分,综合评定出每位学生的最终成绩。
2.本课程的教学安排
整个课程在实际教学过程中,按照16周的总体时间共分为以下5个阶段。
(1)课程设计第一阶段(3周):认真学习教材和阅读课题任务说明书,根据软件工程的理论和选定项目任务完成课题的需求分析;制定本课题的实施方案,完成个人角色任务分配等各类文档和开发规范;确定课题技术难点及其攻关措施;熟悉和掌握.NET的开发环境、后台数据库开发工具以及与课题相关的开发工具。在本阶段结束时,向指导教师提交课程设计个人及小组的初期报告。
(2)课程设计第二阶段(4周):根据制定的时间进度计划和需求分析,进行系统数据库的实现及应用软件的初步模块编写与开发。在本阶段结束时,向指导教师提交课程设计个人与小组的中期报告以及个人阶段性开发的程序源码。
(3)课程设计第三阶段(4周):本阶段是项目开发的实质性阶段,对整个项目所有模块进行开发并进行代码集成测试、完善整个软件产品。在本阶段结束时,向指导教师提交课程设计末期的个人和小组的报告。
(4)课程设计第四阶段(3周):完成全部代码的开发工作,检查并汇总本课题小组成果,课题小组完成项目开发总结报告,个人完成各自的课程设计个人报告。在本阶段结束时,向指导教师提交课程设计个人与小组的报告以及小组的完整的、可供运行的代码文档。
(5)最后是课程设计综合评价阶段(2周):对本课题设计项目综合评价,最后进行大组公开演示和答辩,检查程序运行效果;全体指导教师根据答辩情况、提交的报告质量与平时的上机情况集体打分,综合评定出每位学生的最终成绩,力求公平、公正。
另外,在课程结束后会召开师生座谈会,集中讲评、总结课程的教学、学习情况,征求学生对课程和教学方面的建议和意见,同时给学生指出专业学习的努力方向,学生给教师提出今后课程需改进的地方,使教与学相互促进从而不断完善该课程。
四、结论
“应用软件课程设计”在上海理工大学已经开设10年,是上海理工大学精品课程与上海市教委重点课程建设项目,它很好地体现了计算机专业课程的系统性、完整性、科学性和原理性,有效锻炼了学生的动手实践、软件开发和团队协作能力,对提高学生的专业能力和专业素质起到了关键作用。任课教师在教学实践中付出了很大的努力,不断完善课程的教学模式和评价手段,积累了大量经验,该课程多次受到学生的好评,很多已就业的学生反馈的信息表明:该课程对学生专业素养的培养和从学校到职场的衔接起到了很好的作用,为计算机专业的实践教学探索出一条切实可行的道路。
参考文献: