课程设计物流管理信息系统

1、物流管理信息系统课程设计报告课程名称：管理信息系统专业：物流管理题目：筋斗云物流信息系统2011年7月目录前言1第1章系统需求分析2 TOC o 1-5 h z 系统的背景介绍2系统的可行性研究2数据库设计方法简述2操作可行性31.3.2系统规划5系统数据流程的调查和分析数据库设计6概念结构设计6逻辑结构设计7物理结构设计8数据字典11第2章系统设计15模块结构图15代码设计15输入输出设计16、输入设计16、输出设计17第3章系统实现18登录模块设计18主界面设计18主窗体设计概述18菜单设计19状态栏20树状功能目录20工具栏21主窗体背景21数据模块设计21信息录入模块设计23信息统计模

2、块设计24信息查询模块设计29快件接收查询29快件派送查询30未派送快件查询3032资料维护与数据库备份模块设计333.9数据保护设计 TOC o 1-5 h z 防止用户直接操作数据库33权限管理设计343.10优化管理和维护36第4章系统说明36系统环境说明36数据库的命名规则37第5章系统评价与小结37系统开发中的问题37收获与心得37前言快递管理的内容包括三个方面的内容：即对快递活动诸要素的管理，包括运输、储存等环节的管理；对快递系统诸要素的管理，即对其中人、财、物、设备、方法和信息等六大要素的管理；对快递活动中具体职能的管理，主要包括快递计划、质量、技术、经济等职能的管理等。实施快递

3、管理的目的就是要在尽可能最低的总成本条件下实现既定的客户服务水平，即寻求服务优势和成本优势的一种动态平衡，并由此创造企业在竞争中的战略优势。根据这个目标，快递管理要解决的基本问题，简单地说，就是把合适的产品以合适的数量和合适的价格在合适的时间和合适的地点提供给客户。快递管理主要有4个特点：（1）以实现客户满意为第一目标；（2）以企业整体最优为目的；（3）以信息为中心；（4）重效率更重效果。目前，在快递行业中，时限和安全是快递服务价值的核心。客户对快递服务有着苛刻的要求，在时限、安全、可靠、便利、跟踪查询方面比其他运输服务有着更高的要求，因而客户愿意为得到这些高品质的服务支付较高的价格。筋斗云管

4、理系统将为快递事业的各项业务进行有效地管理与运作提供有力的支持。本软件服务于快递公司的业务。处理单据，数据统计，报表打印，单据查询以及数据库维护等。系统功能有：数据的添加、删除和修改派送单查询、接收单查询、投诉单查询以及未派送的快件查询等查询功能。对某一段时间内的数据进行统计打印详细报表基本资料维护及用户权限等数据库的备份与还原第1章系统需求分析快递是指承运方将托运方指定在特定时间内运达目的地的物品，以最快的运输方式，运送和配送到指定的目的地或目标客户手中。快递的市场基础是对于时间比较敏感的运输需求。中国快递市场可以分为国际快递市场和国内快递市场两大类型，其中国内快递市场又可分为同城快递市场和

5、城际快递市场。同城快递业务是指在同一个城市区域内互寄的快递业务。同城快递的时限标准一般可分为“限时递”、“当日递”、和“次日递”等。城际快递业务在国内城际市场按照空间运距，还可以细分为跨区城际快递和区域内城际快递，如华东地区、华南地区等。在快递行业中，时限和安全是快递服务价值的核心。客户对快递服务有着苛刻的要求，在时限、安全、可靠、便利、跟踪查询方面比其他运输服务有着更高的要求，因而客户愿意为得到这些高品质的服务支付较高的价格。目前快递市场目标客户主要来自高科技领域、从事高附加值含量的商品、半成品或配件的生产企业，其产品具有价值高、相对重量体积小等特点。如高科技、医疗器械、电子产品、电子元件、

6、通讯产品、电脑产品及配件、药品、日化产品的企业等。.2系统的可行性研究数据库设计方法简述数据库设计是对于一个给定的应用环境，构造最优的数据库模式，建立数据库及其应用系统，使之能够有效地存储数据，满足各种用户的应用需求。数据库设计可以分为6个步骤：需求分析阶段准确了解与分析用户需求（包括数据与处理）它是整个设计过程的基础，是最困难、最耗费时间的一步。概念结构设计阶段它是整个数据库设计的关键。通过对用户需求进行综合、归纳与抽象，形成一个独立于具体DBMS勺概念模型。逻辑结构设计阶段将概念结构转换为某个DBM新支持的数据模型，并对其进行优化。数据库物理设计阶段为逻辑数据模型选取一个最适合应用环境的物

7、理结构（包括存储结构和存取方法）。数据库实施阶段运用DBMS1供的数据语言、工具及宿主语言，根据逻辑设计和物理设计的结果。建立数据库，编制与调试应用程序，组织数据入库，并进行试运行。数据库运行和维护阶段数据库应用系统经过试运行后即可投入正式运行。在数据库系统运行过程中必须不断地对其进行评价、调整与修改。设计特点在设计过程中把数据库的设计和对数据库中数据处理的设计紧密结合起来将这两个方面的需求分析、抽象、设计、实现在各个阶段同时进行，相互参照，相互补充，以完善两方面的设计。操作可行性作为一个实际存在的业务，系统设计的目的，以及所包括的信息内容功能都能够比较清晰地获得。通过合理的系统分析，能够基本

8、上获得系统的需求，并且按照系统的需求进行之际的系统设计工作。技术可行性本系统将用Delphi工具编写。Delphi系统开发工具能够大幅度节省系统开发时间，所开发的系统的可维护性和稳定性较高。数据库部分使用SQLServer2000数据库系统。.3系统业务流程的调查和分析本软件服务于快递公司的业务。处理单据，数据统计，报表打印，单据查询以及数据库维护等系统功能有：数据的添加、删除和修改派送单查询、接收单查询、投诉单查询以及未派送的快件查询等查询功能。对某一段时间内的数据进行统计打印详细报表基本资料维护及用户权限等6数据库的备份与还原1.3.1系统业务流程分析:客户华暨小管学飞修件派送农1TiC上

9、导出信息图1-1快递管理业务流程简图客户I怏忤推牧*ttft.而髅收法入+按收自询*向苗业出中融杵汽T快件中转数州率-熊计统计些表J胃乾Jr咨询报表快件中转单ej怏杵派送帧景送者福，*杳加旗表快忤歌送堆V得也收件人图1-2快递管理业务流程图1.3.2系统规划系统处理范围单据处理、数据统计、单据查询、报表打印、数据库维护、权限管理系统功能1）数据的录入（添加、删除和修改）2）派送单、接收单、投诉单等的查询3）某一段时间内的数据进行统计4）打印详细报表5）基本资料的维护6）数据库的备份与还原7）权限管理1.4系统数据流程的调查和分析群“怏料提收电一快件推1fc-.I怏忤.收一.白 g：k.展收录X

10、IMr.*融:.+接收农if中转宜由H研中转数据库J-J-统计，*l荏询报去按件中转单*快件海话力梃版h快件混战则.技业一收件人图1-3快递管理数据流程图1.5.1概念结构设计(1)部分数据表关系图riK+j-iriaiikUadkaa-I图4-1部分数据表关系图(2) E-R 图逻辑结构设计收件单（接收单号，发站，运输方式，快递员号）派送单（派送单号，接收单号，发站，运输方式，快递员号）中转单（中转单号，发站，运输方式，快递员号）投诉单（投诉单号，派送单号，接收单号，货物编号，原因）快递员（编号，姓名，手机，住址，宅电）品名维护（编号，品名，备注）备注维护（编号，备注）物理结构设计（1）创建

11、数据库本系统使用SQLServer作为数据库管理系统。打印“企业管理器”，新建一个数据库，取名为“kd”。快递管理系统根据功能共需要设计9张数据表。综合快递物流信息系统表汇总在舁厅P表名称功能描述1fj_lr派送单记录表2js_lr接收单记录表3tslr投诉单记录表4zzlr中转记录表5Sender品名信息表6User1用户信息表7Memo备注信息表8Kuaidiyuan快递员信息表9权限管理权限管理表(2)设计数据表表名：fj_lr派送单记录表字段名代表意义数据类型长度是否允许空值主键fj_id派送单编号Varchar(15)15否Keystation发站名称nvarchar(10)10否s

12、end_mode运输方式nvarchar(10)10否name品名nvarchar(10)10否weight重量Numeric(9)9否sender送货人nvarchar(10)10rece_person收货人nvarchar(10)10否rece_addr收货人地址nvarchar(60)60否rece_tel收货人电话nvarchar(20)20否thing备注nvarchar(60)60fjfee派送费Float(8)8否ps_data派送日期Datatime否Jsid接收单号Varchar(15)15否d快递员idVarchar(15)15否表名：js_lr接收单记录表字段名代表意义数

13、据类型长度是否允许空值主键s_id接收单号Varchar(15)15否Keystation发站名称nvarchar(10)10send_mode运输方式nvarchar(10)10否name品名nvarchar(10)10否weight重量Numeric(9)9否sender送货人nvarchar(10)10rece_person收货人nvarchar(10)10否rece_addr收货人地址nvarchar(60)60否rece_tel收货人电话nvarchar(20)20否Memol备注nvarchar(60)60fjfee派送费Float(8)8否s_data接收日期Datatime8否

14、d快递员idVarchar(15)15否表名：ts_lr投诉单记录表字段名代表意义数据类型长度是否允许空值主键Ts_id投诉单编号Varchar(15)15否Keyfj_id派送单编号Varchar(15)15s_id接收单号Varchar(15)15customer客户名nvarchar(20)20customer_addr客户地址nvarchar(40)40customer_tel客户电话nvarchar(20)20Memo1备注原因nvarchar(40)40否Ts_date投诉日期Datatime8否11表名：zz_lr中转记录表字段名代表意义数据类型长度是否允许空值主键zz_id接收

15、单号Varchar(15)15否KeyStart_station发站名称nvarchar(10)10end_station终站名称nvarchar(10)10send_mode运输方式nvarchar(10)10否name品名nvarchar(10)10否weight重量Numeric(9)9否rece_person收货人nvarchar(10)10否rece_addr收货人地址nvarchar(60)60否rece_tel收货人电话nvarchar(20)20否Memol备注nvarchar(60)60zz_data接收日期Datatime8否表名：Sender品名信息表字段名代表意义数据类

16、型长度是否允许空值主键d编号Char10否Keymane品名char20否表名：Useri用户信息表列名数据类型长度允许空I面nvfirchar4namenvarchar101/jpasiwordnxrarchsr10J字段名代表意义数据类型长度是否允许空值主键d编号nvarchar4否Keymane姓名nvarchar10password密码nvarchar10表名：Memo备注信息表字段名代表意义数据类型长度是否允许空值主键d编号Nvarchar4否Keymemo备注Nvarchar50表名：Kuaidiyuan快递员信息表字段名代表意义数据类型长度是否允许空值主键d编号Nvarchar1

17、5否Keymane姓名Nvarchar10否Tel手机Varchar20否Addr住址Nvarchar40Phone宅电Varchar201.6数据字典数据字典的组成数据字典有6类条目：数据项、数据结构、数据流、数据处理、数据存储和外部实体。（1）数据项是数据的最小单位，是不可再分的数据单位。如学号，姓名等。对数据项的描述一般包括：数据项的编号、名称、别名和简述，数据项的类型、长度和取值范围等。表一：数据项描述一派送单编号数据项编号I01-01数据项名称fj_id别名派送单编号简述用于记录派送单的代码类型及宽度Varchar(15)取值范围相关数据结构派送单记录表、投诉单记录表表二：数据项描述

18、一运输方式数据项编号I01-02数据项名称send_mode别名运输方式简述用于描述采用何种运输方式类型及宽度nvarchar(10)相关数据结构派送单记录表、接受单记录表、中专记录表(2)数据结构数据结构描述了数据项之间的关系，由数据项或者数据结构组成。一个简单的数据结构由数据项组成，而复杂的数据结构则包含了其他数据结构对数据结构的描述包括：数据结构的编号、名称、简述、数据结构的组成表三：数据结构描述一品名信息数据结构编号DS02-01数据结构名称品名信息简述用于描述货物信息组成编号、品名相关数据流派送单、接收单、中转单相关数据处理录入、修改及删除出处理表四：数据结构描述一快递员信息数据结构

19、编号DS02-02数据结构名称快递员信息简述用于描述快递员的信息组成编号、姓名、手机、住址、宅电相关数据流派送单、接收单、中转单相关数据处理录入修改及删除处理表五：数据结构描述一一用户信息数据结构编号DS02-03数据结构名称用户信息简述用于描述此软件的用户的信息组成编号、姓名、密码相关数据流派送单、接收单、中转单相关数据处理录入、修改及删除处理表六：数据结构描述一一备注信息数据结构编号DS02-04数据结构名称备注信息简述用于描述备注组成编会、备注相关数据流派送单、接收单、中转单、投诉单相关数据处理录入、删除及修改处理(3)数据流数据流用来描述数据的流动过程，由一个或一组固定的数据项组成。可

20、以是一个已定义的数据结构，也可以由若干数据项组成。表七：数据流描述一派送单数据流编号F03-01数据流名称派送单简述快递公司根据接收单开出此单，根据此单进行派送数据流来源首发站数据流去向快件派送及中转管理模块数据流组成派送单编号、发站名称、运输方式、品名、重量、送货人、收货人、收货人地址、收货人电话、备注、派送费、派送日期、接收单号、快递员id表八：数据流描述一接收单数据流编号F03-02数据流名称接收单简述接收物品后的登记单据数据流来源快件接收登记数据流去向快件接收管理模块数据流组成接收单编号、发站名称、运输方式、品名、重量、送货人、收货人、收货人地址、收货人电话、备注、派送费、接收日期、快

21、递员id表九：数据流描述一投诉单数据流编号F03-03数据流名称投诉单简述用于登记用户的投诉情况数据流来源发件人数据流去向客户投诉管理数据流组成投诉单编号、派送单编号、接收单号、客户名、客户电话、客户地址、投诉原因、投诉日期表卜：数据流描述一中转单数据流编号F03-04数据流名称西单简述用于登记快件的中转记录数据流来源快递中转站数据流去向快件派送管理模块数据流:组成,接收单号、发站名称、终站名称、运输方式、品名、重量、收货人、收货人地址、收货人电话、备注、接受日期(4)数据处理数据处理定义数据流程图中数据项的处理方式表十一：数据处理一一登陆数据处理编号P04-01数据处理名称登陆处理简述对用户

22、登陆信息进行验证处理对用户信息验证，以判定其是否可登陆以及登陆权限输入数据流用户名、密码输出数据流验证信息处理频率无表十二：数据处理一一修改密码处理数据处理编号P04-02数据处理名称修改密码处理简述对自己的密码进行修改处理密码修改输入数据流用户名、旧密码、新密码输出数据流密码修改成功或失败的提示信息处理频率无表十三：数据处理一一查询处理数据处理编号P04-03数据处理名称查询处理简述发件、接收、中转以及投诉信息的查询处理根据用户诸如的信息，显示用户所要查询的信息输入数据流所查询信息的关键字或者关键项输出数据流发件、接收、中转以及投诉信息的查询处理频率无表十四：数据处理一一录入、修改、删除信息

23、处理数据处理编号P04-04数据处理名称录入、修改、删除信息处理简述货物信息、派送单、中转单等的录入、修改及删除处理对信息的修改、删除及录入操作输入数据流所要录入、修改或删除的内容输出数据流发件、接收、中转信息的录入、删除及修改处理频率无表十五：数据处理一一打印处理数据处理编号P04-05数据处理名称打印处理简述用于对信息内容的打印处理将录入信息进行打印，以便于进行配送输入数据流所要录入、修改或删除的内容输出数据流打印预览处理频率无表十六：数据处理一一统计处理数据处理编P04-06号数据处理名称统计处理简述对于每个月产生的派送、接受、投诉、中转以及大客户运量的统计处理对于每个月产生的派送、接收

24、、投诉、中转以及大客户运量的统计，并制作统计报表输入数据流派送单、接收单、投诉单、中转单输出数据流数据流量统计表处理频率每月一次(5)外部实体外部实体描述了数据流入、流出和处理的实际发生地点和有关的实体表十七：外部实体一一客户外部实体编号S05-01外部实体名称客户简述发货人输入数据姓名、联系电话、地址、收件人姓名、收件人地址、收件人联系电话输出数据流无表十八：外部实体一一收件人外部实体编号S05-02外部实体名称收件人简述收件人输入数据无输出数据流用户接受登记第2章系统设计2.1模块结构图常户运是战出皆料维护1姐出弟倏关于本系虢图2-1快递管理系统结构图2.2代码设计接收单号代码表产收单号2

25、01001010012010年1月1号接收的第1个单子20100101002-2010年1月1号接收的第2个单子20100101003-2010年1月1号接收的第3个单子派送单号代码表派送单号201001010012010年1月1号派送的第1个单子20100101002-2010年1月1号派送的第2个单子20100101003-2010年1月1号派送的第3个单子投诉备注代码表类型号1一运输途中丢失，运输公司负责赔偿2一不全3破损4一丢了5一包装导致物品破损，由快递公司负责赔偿6没有2.3输入输出设计输入设计(1)输入设计的任务根据具体业务要求，确定适当的输入形式，使信息系统获取管理工作中产生的

26、正确信息。(2)输入设计的内容.输入界面设计。根据具体业务要求确定(详见主界面设计和各模块设计)0.输入设备选择：键盘-磁盘输入装置。数据录入员通过工作站录入，经拼写检查和可靠性验证后存入磁记录介质。(3)输入数据正确性校验常用的校对方式有：.人工校对：录入数据后显示或打印出来，由人进行校对。.根据输入数据之间的逻辑关系校对：利用会计恒等式，对输入的记账凭证进行借贷平衡的检验。.用程序设计实现校对：通过设置取值区间检验，或利用输入数据表的外键进行一致性检验。二雄L1:ZDID1II.1星名中程常羽.净立收黑，-坨titJ浙江入学在.人电出irm,WTiJEi-StnCFJIflir-TChY：

27、K印IF51tn(F6)图2-2信息录入界面输出设计(1)输出设计的内容.输出信息使用情况。信息的使用者、业务统计、业务查询、信息量等。.输出信息内容。派送单据、业务单据、统计业务量等。.输出格式。如表格、报告等。.输出设备和介质，设备：如打印机、显示器等；介质：如磁盘、磁带、纸张等。(2)输出设计的方法1.表格信息。一般用来表示详细的信息图2-3信息查询输出图图2-4信息统计报表输出图第3章系统实现登录模块设计启动程序，首先进入登录模块，该模块用来确认用户身份，保证数据的安全性。在该模块中使用了TDBLookupListBox组件，该组件能将被查找字段的值自动添加到它的列表中，用户可以在该组

28、件中选取用户名进行登录。设计步骤1）新建窗体，设置BorderStyle属性（边框类型）为“bsNon3,在窗体上放置一个TImage组件，设置其Stretch属性为“true”图片放大或缩小以TImage组件边框为准，pictures属性选择图片（背景图片）。2）在TImage组件上放置一个TDBLookupListBox组件，设置Ctl3D属性为“False；设置ListSourse属性为“dm.dsuser1table；设置KeyField属性为“nam3；设置ListField属性为“nam3。在窗体上添加一个TEdit组件，设置Ctl3D属性为“False；设置passwordCha

29、r属性为“*”。3）在TImage组件上放置两个TBitBtn组件，为了按钮的美观，设置其Glyph属性加载按钮图片。程序代码设计主要的代码在单击【登录】按钮和【取消】按钮。单击【登录】按钮，系统在数据库中查找与用户输入的“用户名”和“密码”相符的记录。如果有，则用户可以登录，如果没有且输入3次都不正确，系统将自动退出。单击【取消】按钮,退出系统。（代码详见附录）主界面设计主窗体设计概述主窗体设计在系统中占据很重要的地位，因为只有界面友好、操作方便的软件才能被用户所接受。本系统使用TSpeedButton组件作为工具栏按钮，使用TTreeView组件作为功能目录树，使用TStatusBar组件

30、显示当前系统状态信息。图3-1用户主界面菜单是窗体的重要组成部分，本系统菜单主要是通过Additional页中的TActionMainmenuBar和TactionManager组件实现。下面是菜单设计的步骤：1）向窗体中添加TActionMainmenuBar和TactionManager组件,TActionMainmenuBar一般摆放在窗体的最上边。2）双击TactionManager组件，将显示如图（3-2）所示的编辑窗口，在该窗口的Action选项卡中，单击【AddNev!按钮可以添加一个TAction对象，单击【DeleteSelected按钮可以删除所选TAction对象。这里添

31、加的TAction对象要与菜单功能项个数相等并且相对应。当选中一个TAction对象后在“ObjectInspector”窗口中可以编辑其属性。双击TAction对象，进行代码编辑，实现操作。图3-2TAction对象编辑3）添加好TAction对象后返回主窗体，选中TActionManager组件，在ObjectInspector”窗口中单击ActionBars属性右边的【】按钮，打开编辑窗口。4）在显示的编辑窗口中单击【addnew按钮添加TActionBarltem对象，并选中它，在“ObjectInspector”窗口中设置ActionBar的值为前面加入窗体的TActionMainm

32、enuBar组件。5)在选中的TActionBarltem对象，在“ObjectInspector”窗口中选择Items属性，单击其右边的【】按钮，打开编辑窗口，在窗口中单击【AddNevi添力口TActionClientItems对象，并选中它，在“ObjectInspector”窗口中为Action属性选择一个TAction对象，该TAction对象是前面在TactionManager组件中添加的，在此可以通过Caption属性来改变TAction的标题。状态栏状态栏用于显示系统状态、用户信息及其提示信息，本系统的状态栏是通过TStatusBar组件实现的。.日期时间信息在状态栏的第一栏中

33、显示日期时间信息，代码如下：procedureTmainform.Timer1Timer(Sender:TObject);beginself.StatusBar1.Panels0.Text:=当前时间：+datetimetostr(now);end;.用户名及其编码的动态信息在状态栏的第二栏中显示用户名及其编码的动态信息。JdBUlMh7用户助t：用户昭：郦；、-、一，/日期时闾的佶息.用户n号能动杏花央除树状功能目录在主窗体左边放置一个功能目录，可以通过TTreeView组件实现。在TTreeView组件中的每一个节点都可以有一个图标，添加图标可以通过TImageList组件实现。丁 九；r

34、 i*M0单据录又Q件件评:遇T a快件疝依且 口快fT中伯日 &专尸战诉m3 &单据衽为.匕如:件交* 勺Ifi审查中 a中田香身 n 3t户投诉三 a场片福来 不唇吟 触收我小寄尸石Mw 士 M户主a*fi#H O0色健F；y ffirrtr* 品若好於 岳r三维衿图3-4树状功能目录设计图3.2.5工具栏本系统使用TSpeedButton组件作为工具栏按钮 Qi Hi# * 护鼻餐口卜力nil/ qI M去掣 情*图3-5工具栏设计图主窗体背景主窗体背景设计需要用一个TImage组件实现数据模块设计数据模块是将连接和处理数据的数据库组件统一规范管理的模块，在设计期间数据模块是以窗口的形式

35、显示在界面中的。但是不可以向数据模块中加入可视化组件，因为该模块不会在系统运行时显示出来。使用数据模块进行数据库设计与数据处理有以下优点:.便于数据库的移植.增加了程序的清晰性.可以最大程度的实现代码重用总之，可以将数据集全部放在数据模块中，这样可以方便地设置数据关联等，而且数据处理起来也相对方便，因为不需要在工程文件中去寻找对应的数据集。在本系统中使用数据模块统一管理数据库组件，下面是创建数据模块的过程：(1)建立数据模块。使用File菜单下的NewApplication建立一个新应用程序。在NewItem中双击DataModule建立一个数据模块(命名为dnj),图3-6数据模块(2)在数

36、据模块中添加数据组件。首先添加TADOConnection组件到dm中,取名为kdconn,并设置它的Connectionstring属性，是它与数据库建立连接图3-7Connectionstring属性编辑信息录入模块设计信息录入模块包括快件接收录入、快件派送录入、快件中转录入和客户投诉录入等板块。怏号星世和攵保存信等塞.泊o白其闲崖的图3-8快件派送录入界面图3-9快件接收录入图3-10快件中转录入客户投诉录入票据号;|2母加11酊口3流送单号;|20100116005客户名施;频客户地址:；浙江工商大孝12341241 冽客户电话！投诉内容；蓝色框必须堪写增加律相m(F7)打印电美南tg

37、图3-11客户投诉录入信息统计模块设计信息统计模块包括快件接收统计、快件派送统计、快件中转统计、客户投诉统计和大客户运量统计等板块。其中未派送统计是多表联系查询统计。派送统计：主要负责功能是统计在某一段时间内的派送的物品的重量和派送费用并且有相应的打印模块可以打印报表。相应的主要代码：procedureTtj_paisong.BitBtn1Click(Sender:TObject);beginifself.DateTimePicker1.Dateself.DateTimePicker2.Datethenbeginmessagebox(self.Handle,起始日期不能大于终止日期,提示信息,

38、mb_iconinformation);Exit;end;dm.search1.Close;dm.search1.Parameters.ParamByName(date1).Value:=formatdatetime(yyyy-mm-dd,self.DateTimePicker1.Date);dm.search1.Parameters.ParamByName(date2).Value:=formatdatetime(y);yyy-mm-dd,self.DateTimePicker2.Datedm.search1.Open;dm.searchO.Close;dm.search0.CommandT

39、ext:=selectsum(weight)”总重量”,sum(fjfee)派送费合计fromfj_lrwhereps_date=cast(:date1asdatetime)+andps_date. I liiCDI +ff0 oral fra图3-12派送统计界面接受统计：主要负责对一段时间内的收件进行显示和重量计算主要代码：类似于派送统计。图3-13接收统计界面未派送统计：具有相当重要的意义，因为快件派送统计、快件中转统计、客户投诉统计和大客户运量统计等，只是用来当做月末或季度末的结算功能使用；而未派送统计则是对工作有较大的意义，可以查到一段时间之内，还未派送的快件，便可以查看这些快件有无

40、缺失或者根据时间安排相应的派送顺序。具体实现为：DBGrid连接到dmdatadmunit中的TDataSourceTADODataSetTADOConnection（与相应数据库连接）。相应的SQL句为：selectjs_id票据号，send_station发站，send_mode运输方式,收货人,js_date 收name品名,weight重量,rece_person件日期fromjs_lrwherejs_date=cast(:date1asdatetime)andjs_date=cast(:date1asdatetime)+andps_date=cast(:date1asdatetime

41、)+andps_date=cast(:date1asdatetime)andps_date=cast(:date1asdatetime)andps_date=cast(:date1asdatetime)andjs_dateself.DateTimePicker2.Datethenbeginmessagebox(self.Handle,起始日期不能大于终止日期,提示信息,mb_iconinformation);exit;end;dm.search6.Close;);dm.search6.Parameters.ParamByName(date1).Value:=formatdatetime(yyy

42、y-mm-dd,self.DateTimePicker1.Datedm.search6.Parameters.ParamByName(date2).Value:=formatdatetime(yyyy-mm-dd,self.DateTimePicker2.Date);dm.search6.Open;dm.search0.Close;dm.search0.CommandText:=selectsum(weight)总重量fromjs_lrwherejs_date=cast(:date1asdatetime)andjs_date=cast(:date2asdatetime)andjs_idnotin(selectjs_idfromfj_lrwherefj_lr.js_id=js_lr.js_id);dm.search0.Parameters.ParamByName(date1).Value:=formatdatetime(yyyy-mm-dd,self.DateTimePicker1.Date);dm.search0.Parameters.ParamByName(date2).Value:=formatdat