数据库课程设计仓库管理系统样本

福建工程学院

课程设计

课程：数据库系统概论

题目：仓库管理系统

专业：计算机科学与技术

班级：

座号：

姓名：

6月12日

一、系统定义

随着各个公司经营范畴慢慢扩大，业务流量比较大，需要解决数据比较多，为了能

对公司业务进行有效管理，减少手工操作繁琐，同步可以依照公司业务运营状况，分析出

公司发展潜在信息，顺应时代发展变化，使管理更加简朴化。

二、需求分析

(1)1.最后仓库管理系统功能如下：

(2)资料管理功能

(3)人员信息：用于登记公司员工信息资料、客户信息资料、和供应商信息资料，对员

工信息资料支持员工信息录入、修改和删除。最高权限管理员能录入和删除工作人

员，普通权限工作人员只能修改自己密码

(4)产品信息：支持产品信息录入、修改和删除，可以对各个产品进行查询。

(5)业务管理功能

进出仓库明细：用于查看进货明细、进货退货、销售明细、销售退货、实现录入、

修改和删除。退货时，需要指定相应退货单，可以查询进出仓库明细。

(6)盘库：通过人工清点当前库存物品，与理论上仓库内物品数量对比，分析盘盈、盘

亏问题

(7)记录分析功能

物品分析：用于对物品进行分析•，重要是销售分析，涉及对利润、进货、退货、库

存等进行分析，可以通过报表显示。

(8)人员分析：由于需求加大，需要各种职务工作人员，分析职务需求，可供人才参照

(9)利润分析：对产品销售利润进行分析，可以看出货品供求关系

系统协助功能：

制作人员简介

使用协助

2.给出系统逻辑模型：数据流程图、数据字典

数据流图例子（可依照需要用多层数据流图表达）：

采购货品数据流图：

数据项：

仓库：（仓库编号，仓库名，仓库类型，管理员，员工编号｝;

供应商：｛供应商编号，姓名，联系方式，地址｝;

供应商供应货品存入仓库

数据构造：

供应商提供货品，存入相应仓库

数据流：

需求货品进入相应仓库

数据存储：

产品描述，应付款

解决过程：

需求货品-＞送订单号-＞订单解决-＞付款-＞货品入库

数据存储：

查询时将数据信息显示出来，入出库数据进行存储解决等等

解决过程：

管理员操作->获得操作信息->实行相应解决

三、系统设计

1.概念构造设计

画出系统E-R图。

职工号姓名登录密租।生日

m

（货物编号）采购职工管理

（名称

1

c类型

货物存取仓库

（单位

（进价

订单仓库号

P

订货客户

供应商磔

供应商编号佚应商名税保系方式

2.逻辑构造设计

将E-R图（或其她概念设计图）转换为详细DBUS相应关系模式。

员工：｛员工编号，姓名，登录密码，性别，生日，联系方式，职称，家庭

住址｝:

货品：｛货品编号，名称，类型，单位，进价，售价｝;

仓库：｛仓库编号，仓库名，仓库类型，员工编号｝;

供应商：｛供应商编号，姓名，联系方式，地址｝;

客户：｛客户编号，货品编号，姓名，联系方式，地址，订单号｝;

库存：｛仓库编号，货品编号，数量｝

进仓：｛入单号，进仓时间，入库数量，所付金额｝

出仓：｛出单号，出仓时间，出库数量，所付金额｝

盘库：｛盘库号，盘库时间，盘库数量｝

数据库设计：

员工表

序号字段名称数据类型大小可否为空主键阐明

1staff_no可变字符10否是员工编号

2staff_password可变字符10否否登录密码

3staffname可变字符10否否员工姓名

4staff_sex字符2否否性别

5staff_birthday日期可否出生日期

6staff_phone字符15否否联系方式

7staff_rank字符10否否职称

8stafffamilyaddress可变字符50可否家庭住址

仓库表

序号字段名称数据类型大小可否为空主键阐明

1cangkuno可变字符10否是仓库编号

2cangkuname可变字符10否否仓库名

3cangku_type可变字符10否否仓库类型

4staff_no可变字符10否否员工编号

货品表

序号字段名称数据类型大小可否为空主键阐明

1material_no可变字符10否是货品编号

2materialname可变字符10否否货品名

3material_type可变字符10否否货品类型

4material_in_price可变字符10否否进价

5material_out_price可变字符10否否出价

6materialunit字符4否否单位

供应商表

序号字段名称数据类型大小可否为空主键阐明

1supplier_no可变字符10否是供应商编号

2material^no可变字符10否是货品编号

3supplicr_name可变字符10否否供应商姓名

4supplier_phone字符15否否联系方式

5supplier_address可变字符50可否住址

客户表

序号字段名称数据类型大小可否为空主键阐明

1kehuno可变字符10否是客户编号

2kehu_name可变字符10否否客户姓名

3kehu_password可变字符10否否登录密码

4kehuphone字符15否否联系方式

5kehuaddress可变字符50可否住址

进仓表

序号字段名称数据类型大小可否为空主键阐明

1rudan_no整形否否入单号

供应商编

2supplier_no可变字符10否否号

3materialno可变字符10否否货品编号

4indata日期否否进仓时间

5ru_qty长整形否否进仓数量

6supp_pay长整形否否所付金额

7staff_no员工编号10否否员工编号

出仓表

序号字段名称数据类型大小可否为空主键阐明

1chudan_no整形否否出单号

2kehu_no可变字符10否否客户编号

3material^no可变字符10否否货品编号

4out_data日期否否出仓时间

5chu_qty长整形否否出仓数量

6kehu_pay长整形否否所付金额

7staff_no员工编号10否否员工编号

库存表

序号字段名称数据类型大小可否为空主键阐明

1cangkuno可变字符10否是仓库号

2material_no可变字符10否是货品编号

3qty长整形否否数量

盘库表

序号字段名称数据类型大小可否为空主键阐明

1panku_no可变字符10否否盘库号

2staff_no可变字符10否否员工编号

3pankudate日期否否盘库日期

4material_no可变字符10否否货品编号

5panku_qty长整形否否盘库数量

3.系统功能模块图

画出系统功能模块图，并对子模块功能进行详细阐明。

仓库管理系统

四、详细设计

重要SQL语句

一数据库建立

CREATEDATABASEckgl

ONPRIMARY

(NAME='ckgl_data:,

FILENAME=，f:\cg\ckgl_data.mdf,,

SIZE=5mb,

FILEGROWTH=15%

)

LOGON

(NAME-*ckgl_log*.

FILENAME^f:\cg\ckgl_log.Idf,,

SIZE=2mb,

MAXSIZE=100mb,

FILEGROWTH=1MB

)

GO

一员工表

createtablestaff

(

staffnovarchar(ID)primarykey,

staffpasswordvarchar(10)notnull,

staffnamevarchar(10)notnull,

staff_sexchar(2)notnull,

staffbirthdaydatetime,

staff_phonechai(15)notnull,

staff_rankchar(10.)notnull,

stafffamilyaddrcssvarchar(50),

)

go

一货品表

createtablematerial

(

material_novarchar(10)primarykey,

materiaInamovarchar(10)notnull,

material_typevarchar(10)notnull,

materia1in_pricevarchar(10)notnull,

materialoutpricevarchar(10)notnull,

materialunitchar(4)notnull,

)

g。

一仓库表

createtablecangku

(

cangkunovarchar(10)primarykey,

cangkunamevarchar(10)notnull,

cangkutypevarchar(10)notnul1,

staffnovarchar(ID)notnull,

foreignkey(staff_no)referencesstaff(staffno),

)

Go

一库存表

createtablecunhuo

(

cangku_novarchar(10),

matcrialnovarchar(10),

qtybigint,

primarykey(cangkuno,materia1no),

foreignkey(cangku^no)referencescangku(cangku_no),

foreignkey(materialno)referencesmaterial(materialno),

)

一供应商表

createtablesupplier

(

suppliernovarchar(10),

material_novarchar(10),

suppliernamevarchar(10)notnull,

supplierphonechar(15)notnull,

supplieraddressvarchar(50),

primarykey(supplierno,materialno),

foreignkey(materialno)referencesmaterial(materialno),

)

一进仓表

createtablematerialin

(

rudannointnotnull,

supplier_novarchar(10)notnull,

materialnovarchar(10)notnull,

in_datadatetimenotnull,

ruqtybigintnotnull,

supp_paybigintnotnull,

staffnovarchar(10)notnull,

foreignkey(supplier_no,material_no)references

supp1ier(supp1ierno,materialno),

foreignkey(staffno)referencesstaff(staff_no),

)

一客户表

createtablekehu

(

kehunovarchar(10)primarykey,

kehunamevarchar(10)notnull,

kehupasswordvarchar(10)notnull,

kehuphonechar(15)notnull,

kehuaddressvarchar(50),

)

一出仓表

createtablematerial_out

(

chudan_nointnotnull,

kchunovarchar(10)notnull,

material_novarchar(10)notnull,

outdatadatetimenotnull,

chu_qtybigintnotnull,

kchupaybigintnotnull,

staff_noVcirchar(10)notnull,

foi'cignkey(kchuno)referenceskehu(kehuno),

foreignkey(material_no)referencesmaterial(material_no),

foreignkey(staffno)referencesstaff(staffno),

)

一盘库表

createtablepanku

(

panku_novarchar(10)notnull,

staffnovarchar(10)notnull,

pankudatedatetime,

materialnovarchar(10)notnull,

pankuqtybigint,

foreignkey(materialno)referencesmaterial(materialno),

foreignkey(staffno)referencesstaff(staffno),

)

Go

建立进出仓存储过程

入仓：

createprocedurematerial_in_pro

@rudan_noint,

@supplier_novarchar(10),

@material_novarchar(10),

@in_datadatetine,

@ru_qtybigint,

@supp_paybigint,

@staffnovarchar(10),

©outvarchar(20；=’O'output

as

DECLARE@nlint

select@nl=count(material_no)fromnaterial

wherematerial_no=@material_no

if(@nl=0)

begin

select@cut='此物料不存在，如果要进仓，请先登记新物料信

J息匕、•11•'

return

end

else

begin

insertintomaterial_in

values(@rudan_no,©supplier_no,@material_no,@in_data,@ru_qty,@supp_pay

,@staff_no)

updatecunhuosetqty=qty+@ru_qtywhere

materialno=@materialno

select@out='操作成功！！’

return

end

go

出仓：

createprocmaterialoutpro

@chudan_noint,

@kehunovarchar(10),

@material_novarchar(10),

@outdatadatetime,

@chu_qtybigint,

©kehupaybigint,

@staff_novarchar(10),

©outvarchar(20)='O'output

as

DECLARE@nlint

select@nl=count(material_no)fromnaterial

wherematerialno二©materialno

if(@nl=0)

begin

select@out二'此物料不存在！’

return

end

else

begin

if@chu_qty>(selectqtyfromcunhuowhere

materialno=@materialno)

begin

select@out='库存数量局限性！！'

return

end

else

begin

insertintomaterialout

values(@chudan_no,@kehu_no,@material_no,@out_data,@chu_qty,@kehu_pay,

@staff_no)

updatecunhuosetqty=qty-@chuqtywhere

materialno二©materialno

select@out='操作成功！！’

return

end

end

盘库：

procedureTForm4.Button8Click(Sender:TObject);

begin

//insertintopanku(pankuno,staff_no,pankudate,materialno,pankuqty)

//select1,1001,'-4-1*.material_no,qtyfromcunhuo

//将盘库成果插入到盘库表中

withdatcimodule2.pankudo

begin

sql.clear;

sql.add(*insertinto

panku(panku_no,staffno,panku_date,materialno,panku_qty)*);

sql.add,select

'''+edit4.text+J'',…+comboboxl1.text+*'，，…+datetostr(datetimepicker4.dateti

me)+，'',material_no,qtyfromcunhuo*);

close;

execsql;

showmessage(：盘库成功！！')；

button8.enabled:=false;

〃一次登录不容许重复盘库，以免多占空间资源

end;

〃显示本次盘库成果

withdatamodule2.panku1do

begin

sql.clear;

sql.add('select*frompanku,materialwhere

panku.material_no=material.material_noandpanku_no='''+edit4.text+'''');

close;

open;

end;

end;

〃盘库后盘库单号自动加1,便于下次盘库

procedureTForm4.FormCreate(Sender:TObject);

varmax:integer;

begin

withDataModule2..ADOQueryldo

begin

sql.Clear;

sql.Add(/selectmax(panku_no)asmaxfrompanku');

close;

open;

max:=DataModule2.ADOQueryl.fieldbyname(*max*).Aslnteger;

edit4.Text:=inttostr(max+1);

end;

End;

重要模块程序流程图。

1

资料管理流程图

2、

业务管理流程图

4、

系统帮助流程图

五、系统实现与测试

LJT发平台和工具选取

Deiphi7

SQL

2、系统测试

登录界面：

"登陆

欢迎使用

仓库管理系统

可以看到字体为动态形式.下面诗为闪烁状态

主界面:

业务管理:

g峥毋里Io-B-a.lEl

查询|物料进出库盘库退货）

/业务管理三口M

查询|物料进出库I盘库I退货I

查询存货信息查询进出单信息|查询盘库信息|

订单类型开单日期：

,进厂出|2012/6/253查询J

查看全郃I

rudan_nosupplier_no|material_noin_data▲

►1gysOOl0012012/6/25

2gysOOl0012012/6/2S

2gys0020042012/6/25

・〜3gysOOl0012012/6/25

A4gys0020042012/6/25

Q

▼

1►

—-

卓业务管理IOII□I»I

查询物料进出库盘库I退货I

Projectl

成功添加!

类型

»进仓gysOOl二

单号:|2012/6/25二|

赁物编号[io

-

员工编号[40

添加物料|开单

进仓开单后单号自动加1

盘库:

查询I物料进出库盘库|退货I

2012/6/26▼

盘库序号:盘库日期:

仓库号I库存教案HF

15斤

21121台

4则

panku_nostaff_nopanku_datematerial_n<

►810012012/6/26001

810012012/6/26004u

J

叱■nil

信息管理:

次值也管理

员工资料客户资料|供应商资料

添加管理员|修改空码删除管理员|

员工编号：|1006姓名:

出生日Hfl：厂码:

家庭住址：厂电话：

员工职务二|采购员二性别:

、I

:员工费料|客户资料供应商资料

添加管理员修改密码删除管理员

原密码：

新密码：

确认密码:

确定

贸工寅祥［客户资料供应商资料I

添加管理员I修改密码删除管理员

请输入你要删除的管理员的姓名:

其中添加员工和删除员工只有人事管理员才干操作，如果是其她员工，则

员工资料客户资料供应商资料

添加管理员;修改密码I删除管理员I

客户资料:

员工资料客户资料I供应商资料I

添加客户I注销客户I查询客户资料

编号」姓名:

添加客户注销客户查询客户资料］

客户的姓名：小明3

确定注销一

添加客户注销客户查询客户资料

客户资料：

kehu_nokehu_namekehu_passwordkehu_phonek

►khOOO1小明11111112345678921彳

供应商:

员工资料I客户资料供应商资料I

添加供应商;修改供应商资料删除供应商查询供应商信息

编号：I公司名称：

供应货物编号：阿HI

添加供应商修改供应商资料删除供应商查询供应商信息1

供