《数据库课程设计仓库管理系统.doc》由会员分享，可在线阅读，更多相关《数据库课程设计仓库管理系统.doc（29页珍藏版）》请在三一办公上搜索。
1、福 建 工 程 学 院课程设计课 程： 数据库系统概论 题 目： 仓库管理系统 专 业： 计算机科学与技术 班 级： 座 号： 姓 名： 2012年 6月 12日一、系统定义 随着各个公司经营的范围慢慢扩大，业务流量比较大，需要处理的数据比较多，为了能对公司的业务进行有效的管理，减少手工操作的繁琐，同时可以根据公司业务的运营情况，分析出公司发展的潜在信息，顺应时代的发展变化，使管理更加简单化。 二、需求分析1、最终仓库管理系统功能如下：（1） 资料管理功能人员信息：用于登记公司的员工信息资料、客户信息资料、和供应商信息资料，对员工信息资料支持员工信息的录入、修改和删除。最高权限的管理员能录入和
2、删除工作人员，普通权限的工作人员只能修改自己的密码产品信息：支持产品信息的录入、修改和删除，可以对各个产品进行查询。（2） 业务管理功能进出仓库明细：用于查看进货明细、进货退货、销售明细、销售退货、实现录入、修改和删除。退货时，需要指定相应的退货单，可以查询进出仓库明细。盘库：通过人工清点当前库存物品，与理论上仓库内物品数量对比，分析盘盈、盘亏问题（3） 统计分析功能物品分析：用于对物品进行分析，主要是销售分析，包括对利润、进货、退货、库存等进行分析，可以通过报表显示。人员分析：由于需求加大，需要各种职务的工作人员，分析职务需求，可供人才参考利润分析：对产品销售的利润进行分析，可以看出货物的供
3、求关系（4） 系统帮助功能： 制作人员介绍 使用帮助 2、给出系统的逻辑模型：数据流程图、数据字典数据流图例子（可根据需要用多层数据流图表示）：采购货物数据流图：数据字典：数据项： 仓库：仓库编号，仓库名，仓库类型，管理员，员工编号； 供应商：供应商编号，姓名，联系方式，地址； 供应商供应的货物存入仓库数据结构： 供应商提供货物，存入相应的仓库数据流： 需求的货物进入相应的仓库数据存储： 产品描述，应付款处理过程： 需求货物-送订单号-订单处理-付款-货物入库管理数据流图：数据字典：数据项： 员工：员工编号，姓名，登录密码，性别，生日，联系方式，职称，家庭住址；货物：货物编号，名称，类型，数量
4、，单位，进价，售价，订单号；管理员管理仓库和资料库数据结构： 管理员进行相关的操作，显示相应的信息，或存储相应的物品、资料数据流： 操作信息，操作数据，相关信息表数据存储： 查询时将数据信息显示出来，入出库数据进行存储处理等等处理过程： 管理员操作-获得操作信息-实行相应的处理三、系统设计1、概念结构设计画出系统E-R图。2、逻辑结构设计将E-R图（或其他概念设计图）转换为具体的DBMS对应的关系模式。员工：员工编号，姓名，登录密码，性别，生日，联系方式，职称，家庭住址；货物：货物编号，名称，类型，单位，进价，售价；仓库：仓库编号，仓库名，仓库类型，员工编号；供应商：供应商编号，姓名，联系方式
5、，地址；客户：客户编号，货物编号，姓名，联系方式，地址，订单号；库存: 仓库编号，货物编号，数量 进仓：入单号，进仓时间，入库数量，所付金额 出仓：出单号，出仓时间，出库数量，所付金额 盘库：盘库号，盘库时间，盘库数量 数据库设计：员工表序号字段名称数据类型大小可否为空主键说明1staff_no可变字符10否是员工编号2staff_password可变字符10否否登录密码3staff_name可变字符10否否员工姓名4staff_sex字符2否否性别5staff_birthday日期可否出生日期6staff_phone字符15否否联系方式7staff_rank字符10否否职称8staff_fa
6、mily_address可变字符50可否家庭住址仓库表序号字段名称数据类型大小可否为空主键说明1cangku_no可变字符10否是仓库编号2cangku_name可变字符10否否仓库名3cangku_type可变字符10否否仓库类型4staff_no可变字符10否否员工编号货物表序号字段名称数据类型大小可否为空主键说明1material_no可变字符10否是货物编号2material_name可变字符10否否货物名3material_type可变字符10否否货物类型4material_in_price可变字符10否否进价5material_out_price可变字符10否否出价6materia
7、l_unit字符4否否单位供应商表序号字段名称数据类型大小可否为空主键说明1supplier_no可变字符10否是供应商编号2material_no可变字符10否是货物编号3supplier_name可变字符10否否供应商姓名4supplier_phone字符15否否联系方式5supplier_address可变字符50可否住址客户表序号字段名称数据类型大小可否为空主键说明1kehu_no可变字符10否是客户编号2kehu_name可变字符10否否客户姓名3kehu_password可变字符10否否登录密码4kehu_phone字符15否否联系方式5kehu_address可变字符50可否住址
8、 进仓表序号字段名称数据类型大小可否为空主键说明1rudan_no整形否否入单号2supplier_no可变字符10否否供应商编号3material_no可变字符10否否货物编号4in_data日期否否进仓时间5ru_qty长整形否否进仓数量6supp_pay长整形否否所付金额7staff_no员工编号10否否员工编号出仓表序号字段名称数据类型大小可否为空主键说明1chudan_no整形否否出单号2kehu_no 可变字符10否否客户编号3material_no可变字符10否否货物编号4out_data日期否否出仓时间5chu_qty长整形否否出仓数量6kehu_pay长整形否否所付金额7st
9、aff_no员工编号10否否员工编号库存表序号字段名称数据类型大小可否为空主键说明1cangku_no可变字符10否是仓库号2material_no可变字符10否是货物编号3qty长整形否否数量盘库表序号字段名称数据类型大小可否为空主键说明1panku_no可变字符10否否盘库号2staff_no可变字符10否否员工编号3panku_date日期否否盘库日期4material_no可变字符10否否货物编号5panku_qty长整形否否盘库数量3、系统功能模块图画出系统功能模块图，并对子模块功能进行详细说明。四、详细设计主要的SQL语句-数据库的建立CREATE DATABASE ckglON
10、PRIMARY ( NAME=ckgl_data, FILENAME=f:cgckgl_data.mdf, SIZE=5mb, FILEGROWTH=15% )LOG ON( NAME=ckgl_log, FILENAME=f:cgckgl_log.ldf, SIZE=2mb, MAXSIZE=100mb, FILEGROWTH=1MB)GO -员工表create table staff(staff_no varchar(10) primary key,staff_password varchar(10) not null,staff_name varchar(10) not null,sta
11、ff_sex char(2) not null,staff_birthday datetime,staff_phone char(15)not null,staff_rank char(10) not null,staff_family_address varchar(50),)go-货物表create table material(material_no varchar(10) primary key,material_name varchar(10)not null,material_type varchar(10) not null,material_in_price varchar(1
12、0)not null,material_out_price varchar(10)not null,material_unit char(4) not null,)go-仓库表create table cangku(cangku_no varchar(10) primary key,cangku_name varchar(10)not null,cangku_type varchar(10)not null,staff_no varchar(10) not null,foreign key(staff_no) references staff(staff_no),)Go-库存表create t
13、able cunhuo(cangku_no varchar(10),material_no varchar(10),qty bigint,primary key(cangku_no,material_no),foreign key(cangku_no) references cangku(cangku_no),foreign key(material_no) references material(material_no),)-供应商表create table supplier(supplier_no varchar(10),material_no varchar(10),supplier_n
14、ame varchar(10)not null,supplier_phone char(15) not null,supplier_address varchar(50),primary key(supplier_no,material_no),foreign key(material_no) references material(material_no),)-进仓表create table material_in(rudan_no int not null,supplier_no varchar(10) not null,material_no varchar(10) not null,i
15、n_data datetime not null,ru_qty bigint not null,supp_pay bigint not null,staff_no varchar(10) not null,foreign key(supplier_no,material_no) references supplier(supplier_no,material_no),foreign key(staff_no) references staff(staff_no),)-客户表create table kehu(kehu_no varchar(10) primary key,kehu_name v
16、archar(10)not null,kehu_password varchar(10)not null,kehu_phone char(15)not null,kehu_address varchar(50),)-出仓表create table material_out(chudan_no int not null,kehu_no varchar(10) not null,material_no varchar(10) not null,out_data datetime not null,chu_qty bigint not null,kehu_pay bigint not null,st
17、aff_no varchar(10) not null,foreign key(kehu_no) references kehu(kehu_no),foreign key(material_no) references material(material_no),foreign key(staff_no) references staff(staff_no),)-盘库表create table panku( panku_no varchar(10) not null, staff_no varchar(10) not null, panku_date datetime, material_no
18、 varchar(10)not null, panku_qty bigint, foreign key(material_no) references material(material_no), foreign key(staff_no) references staff(staff_no), )Go建立进出仓的存储过程入仓:create procedure material_in_prorudan_no int,supplier_no varchar(10),material_no varchar(10),in_data datetime,ru_qty bigint,supp_pay bi
19、gint,staff_no varchar(10),out varchar(20)=0 outputasDECLAREn1 intselect n1=count(material_no) from materialwhere material_no=material_noif (n1=0)beginselect out=此物料不存在，如果要进仓，请先登记新物料信息！returnendelsebegininsert into material_in values(rudan_no,supplier_no,material_no,in_data,ru_qty,supp_pay,staff_no)u
20、pdate cunhuo set qty=qty+ru_qty where material_no=material_noselect out=操作成功！return endgo出仓:create proc material_out_pro chudan_no int,kehu_no varchar(10),material_no varchar(10),out_data datetime,chu_qty bigint,kehu_pay bigint,staff_no varchar(10),out varchar(20)=0 outputasDECLAREn1 intselect n1=co
21、unt(material_no) from materialwhere material_no=material_noif (n1=0)beginselect out=此物料不存在！returnendelsebeginif chu_qty(select qty from cunhuo where material_no=material_no)beginselect out=库存数量不足！returnendelsebegininsert into material_out values(chudan_no,kehu_no,material_no,out_data,chu_qty,kehu_pa
22、y,staff_no)update cunhuo set qty=qty-chu_qty where material_no=material_noselect out=操作成功！return endend盘库：procedure TForm4.Button8Click(Sender: TObject);begin/insert into panku(panku_no,staff_no,panku_date,material_no,panku_qty)/select 1,1001,2012-4-1,material_no,qty from cunhuo/将盘库结果插入到盘库表中 with da
23、tamodule2.panku do begin sql.clear; sql.add(insert into panku(panku_no,staff_no,panku_date,material_no,panku_qty); sql.add(select +edit4.text+,+combobox11.text+,+datetostr(datetimepicker4.datetime)+,material_no,qty from cunhuo); close; execsql; showmessage(盘库成功！); button8.enabled:=false; /一次登录不允许重复盘
24、库，以免多占空间资源 end;/显示本次盘库结果 with datamodule2.panku1 do begin sql.clear; sql.add(select * from panku,material where panku.material_no=material.material_no and panku_no = +edit4.text+); close; open; end;end;/盘库后盘库单号自动加1，便于下次盘库procedure TForm4.FormCreate(Sender: TObject);var max:integer;begin with DataMod
25、ule2.ADOQuery1 do begin sql.Clear; sql.Add(select max(panku_no) as max from panku ); close; open; max:=DataModule2.ADOQuery1.fieldbyname(max).AsInteger; edit4.Text:=inttostr(max+1); end;End;主要模块的程序流程图。1、2、3、4、五、系统实现与测试1、开发平台和工具选择Deiphi7 SQL20052、 系统测试登录界面：可以看到字体为动态形式，下面的诗为闪烁状态主界面：业务管理：进仓开单后单号自动加1盘库：
26、信息管理：其中添加员工和删除员工只有人事管理员才能操作，如果是其他员工，则客户资料：供应商：员工需求分析：系统帮助：客户登录进来购买：客户改密：六、课程设计总结1、说明设计心得、想法建议等。通过本次课程设计，我们了解到总体把握的重要性。编写软件的前期准备非常重要，首先要进行需求分析，确定我们要完成什么功能。紧接着，以需求为前提建立数据库，需要什么表，每个表里面要有那些元素，这个表在运用的时候具体会在哪个功能上使用到等等。其次，前台入手，先将要实现的功能建立菜单放入主窗口，再将各个功能细分，分配到各个form窗口中去实现。 在与老师的交流沟通中，我们受益匪浅，明白了数据库后台设计的重要性。依然记
27、得老师给我们举得例子：建立一个权限表，这样的话当员工的权限有变动的话就不需要去前台修改程序，而只要在后台把权限表做一定的修改，这样就可以省去了修改代码的麻烦。还有触发器和储存过程的使用的优点，也是在老师的举例下获得更深刻的了解。 通过本次设计，我们明白了，对于数据库的学习，最主要的是实践，只有多上机练习，才能找到自己在哪方面欠缺，才能更好的提高自己的水平。从模糊的概念变为清晰的思路。虽然这学期的数据库已经结束，但是为了更好的实现数据库的运用，我们仍会不断学习并巩固数据库知识。 最后，真诚的感谢这次专周设计给过我们帮助的老师和同学。2、 如果为多人同组，在此说明组内分工和每个成员的完成情况。我组一共2名组员：（前台），（后台）。均完成需求分析时分配下来的任务。参考文献1、 Delphi开发经典模块大全/梁水，赛奎春.-北京：人民邮电出版社，2009.42、 ADO.NET数据库应用开发张骏主编.-北京：机械工业出版社，2008.13、 Delphi管理信息系统项目方案精解/亚林等编著.北京：航空工业出版社，2006.10
