小型自选商场商品管理系统文档格式.docx

资源描述

小型自选商场商品管理系统文档格式.docx

《小型自选商场商品管理系统文档格式.docx》由会员分享，可在线阅读，更多相关《小型自选商场商品管理系统文档格式.docx（21页珍藏版）》请在冰豆网上搜索。

小型自选商场商品管理系统文档格式.docx

主要有：

1）能记录每一笔进货，查询商品的进货记录，并能按月进行统计。

2）能记录每一笔售货，查询商品的销售情况，并能进行日盘存、月盘存。

3）在记录进货及售货的同时，必须动态刷新库存。

4）能查询某个厂商或供应商的信息。

5）设计收银台程序，能根据输入的商品编号、数量，显示某顾客所购商品的清单，并显示收付款情况。

3.3可行性分析

系统数据库采用目前比较流行的MicrosoftSQLServer，开发本地数据库。

该数据库系统在安全行、准确性、运行速度方面有绝对的优势，并且处理数据库量大，效率高；

开发工具采用Delphi7。

Delphi7是目前应用最广泛的数据库系统开发工具，可以快速开发Windows应用程序。

4.数据库设计

4.1数据库概念设计

具体的进货和销售属性，请参考基本表的逻辑设计。

4.2数据逻辑设计

4.2.1数据库概要说明

本系统数据库采用SQLServer2000数据库，数据库名称为jsc，其概要说明如下

表1、数据库概要说明

jsc数据库

类型

名称

描述

基本表

tb_import

进货单记录表

tb_power

操作员权限表

tb_sale

销售记录单表

tb_storage

商品库存明细表

tb_supplier

供应商信息表

存储过程

import_analysis

进货单统计

sale_analysis

销售单统计

触发器

import_delete_storage

进货单添加增加库存量

import_insert_storage

进货单删除减少库存量

sale_insert_storage

销售单添加减少库存量

4.2.2基本表

图2、tb_storage（库存表）

图3、tb_import（进货表）

图4、tb_sale（销售表）

图5、tb_supplier（供应商表）

图6、tb_power（用户权限表）

4.2.3触发器

某一商品的库存总量随着进货和销售而变化。

为了提高前台应用程序的运行效率，在后台数据库设置了相应的触发器，相关代码如下：

1）删除进货单的触发动作

createtrigger[import_delete_storage]ondbo.tb_import

fordelete

updatetb_storageset库存数量=库存数量-deleted.数量fromdeletedwheretb_storage.商品编号=deleted.商品编号

2）添加进货单的触发动作

createtrigger[import_insert_storage]ondbo.tb_import

forinsert

updatetb_storageset库存数量=库存数量+inserted.数量frominsertedwheretb_storage.商品编号=inserted.商品编号

3）添加销售单的触发动作

createtrigger[sale_insert_storage]ondbo.tb_sale

updatetb_storageset库存数量=库存数量-数量frominsertedwheretb_storage.商品编号=inserted.商品编号

需要注意的是在准备销售某件商品的时候，如果该商品的库存量减去本次销售量低于最低库存量的时候，此时不能销售，给出提示信息。

为了使程序更加紧凑，该安全检查设置在前台程序中，在数据库设计中不再涉及。

4.2.4统计存储过程的设计

根据输入的日期，查询该时间段进货、销售的商品编号，商品名称，总数量等信息。

）进货统计：

createprocedure[import_analysis]@dateonedatetime,@datetwodatetime

declare@bTable（商品编号varchar（20）,商品名称varchar（20）,进价float,数量float,进货日期datetime）

insertinto@bselecttb_import.商品编号,tb_storage.商品名称,tb_import.进价,tb_import.数量,进货日期fromtb_import,tb_storage

wheretb_import.商品编号=tb_storage.商品编号and进货日期between@dateoneand@datetwo

select

商品编号,商品名称,avg（进价）as平均进价,sum（数量）as总数量from@bgroupby商品编号,商品名称orderby商品编号

2）销售统计：

createprocedure[sale_analysis]@dateonedatetime,@datetwodatetime

declare@bTable（商品编号varchar（20）,商品名称varchar（20）,售价float,数量float,销售日期datetime）

insertinto@bselecttb_sale.商品编号,tb_storage.商品名称,tb_sale.售价,tb_sale.数量,售货日期fromtb_sale,tb_storage

wheretb_sale.商品编号=tb_storage.商品编号and售货日期between@dateoneand@datetwo

商品编号,商品名称,avg（售价）as售价,sum（数量）as总数量from@bgroupby商品编号,商品名称orderby商品编号

5.前台应用设计

5.1系统规划

小型自选商场商品管理系统是一个典型的数据库应用程序，由登陆模块，主界面、库存管理、进货管理，销售管理，统计管理，系统管理模块组成。

特规划功能模块如下。

功能

库存管理

及时更新显示所有库存商品信息

查询供应商信息

添加新商品

进货管理

录入进货单信息

自动生成编号

支持删除，修改

销售管理

录入销售单信息

显示购物清单和收付款情况

自动生成销售单编号

统计管理

按时间段统计销售情况以及进货情况

统计出交易数量总额

系统管理

系统退出等基本功能

表2系统功能表

Delphi窗体构架如下：

5.2具体模块设计

5.2.1数据模块（DataModule）

本系统采用BolandDelphi提供的ADO组件与本地数据库连接。

为了避免重复连接操作，我们建立一个包含ADOConnection组件数据模块，为其他模块的查询提供公共数据库连接。

考虑到在不同的计算机的服务器的名称，密码不一定相同，为了增强程序的可移植性，我们通过读取工程文件夹下的config.ini文件来动态设置ADOConnection组件的连接属性。

同时工程文件夹中的Data文件夹中包含了jsc的数据库文件，用户只要将该数据库附加到服务器上，然后修改config.ini中服务器的名称和密码就可以正常运行该软件了。

在登陆窗口显示的时候，即完成数据库的连接操作。

关键代码如下：

procedureTLogin.FormShow（Sender:

TObject）;

var

ini:

TIniFile;

//InI文件操作类

server,database,user,password,curpath:

String;

begin

curpath:

=ExtractFilePath（Application.ExeName）;

//获取exe文件所在路径

ifNotFileExists（curpath+'

config.ini'

）then

begin

ShowMessage（'

配置信息不存在!

）;

Application.Terminate;

end

else

Try

ini:

=TIniFile.Create（ExtractFilePath（Application.ExeName）+'

server:

=ini.ReadString（'

配置信息'

服务器'

//获取配置信息小节服务器关键字的值

database:

数据库'

user:

用户名'

password:

密码'

DataModule2.ADOConnection1.ConnectionString:

Provider=SQLOLEDB.1;

PersistSecurityInfo=False;

UserID='

+trim（user）+'

;

InitialCatalog='

+trim（database）+'

DataSource='

+trim（server）+'

Password='

+trim（password）;

//连接字符串属性设置

DataModule2.ADOConnection1.Open;

Except

数据库连接失败'

end;

Finally

ini.Free;

Edit1.SetFocus;

end;

注：

INI文件的结构：

[小节名]关键字=值;

注释

5.2.2登陆模块（FLogin）

该模块通过访问后台数据库的tb_power表进行操作员身份和权限验证，如果用户信息不符合给出提示信息。

该窗体运行结果如图。

图8、登陆界面

当按下“登陆”按钮时，即对后台数据库查询访问。

procedureTLogin.BitBtn1Click（Sender:

ifRadioButton1.Checkedthencatalogue:

=1;

//catalogue为public变量

ifRadioButton2.Checkedthencatalogue:

=0;

withADOQuery1do

SQL.Clear;

Parameters.Clear;

SQL.Add（'

select*fromtb_powerwhere用户名=:

aand密码=:

band权限=:

Parameters.ParamByName（'

）.Value:

=trim（Edit1.Text）;

=trim（Edit2.Text）;

=catalogue;

Open;

Active:

=True;

ifRecordCount=0then

MessageDlg（'

用户名或密码不正确!

mtError,[mbok],0）;

Edit1.Clear;

Edit2.Clear;

Exit;

MainForm.operator:

self.Release;

//销毁登陆窗体

MainForm.Show;

//显示主窗体

5.2.3主窗体设计（FMainForm）

主窗体主要功能是组织和整合各个子窗体。

当用户按下某一菜单键时，即动态创建该窗体，实现相应功能。

为了使界面更加整洁，紧凑，我们将动态创建的子窗体嵌入主窗体。

以进货子窗体为例，将该窗体的“DragKing”属性为“dkDock”；

“DragMode”属性为“dmAutomatic”。

创建该窗体时需要添加相关代码如下：

procedureTMainForm.N9Click（Sender:

importanalysis:

TImportAnalysis;

rect1:

Trect;

=TImportAnalysis.Create（self）;

importanalysis.Show;

importanalysis.Visible:

=False;

Rect1:

=Panel2.ClientRect;

//得到主窗体的panel2区域

importanalysis.Dock（Panel2,rect1）;

图9、主界面

5.2.4进货管理（TImportRecord）

该模块支持自动生成进货单编号，实际上就是“JH”＋当时时间所组成的字符串。

显示部分采用DBGrid组件，同时支持按行选中删除或者修改，并且DBGrid可动态及时显示所有进货情况。

图10、进货单录入界面

5.2.5销售窗体设计（TSaleRecord）

同样，为了方便使用，销货单编号和存根号根据当时时间自动生成。

一张销货单可包括多种商品，但是不允许重复，并且显示在左边的DBGrid组件中。

需要注意的是商品的销售量要受到库存量和最低库存量的限制，如果超过了可销售的商品总量，则给出错误提示，销售单无效。

另外为了方便售货框和收款框的通信，我们为收宽框设置了一个公共变量charge，表示找零金额。