货运站货场信息管理系统

1、货运站货场信息管理系统一、概述随着经济全球化的加快和中国经济的腾飞，我国铁路运输业取得了巨大的发 展。而货场是铁路货运站最基本的作业场所之一，工人数量多，作业任务重，作 业种类多。而随着信息科技的发展， 传统的管理模式逐渐被信息化及数字化的管 理模式所取代， 如何用先进的管理手段，提高货场的管理水平，已成为货运站货 场的当务之急。面对信息时代的机遇和挑战，用科技手段提高货场管理水平无疑 是一条行之有效的途径。货运站货场信息管理系统的幵发充分利用了信息技术和计算机技术，提高了 货运站货场的管理水平、服务水平。系统实现了货场计划管理、货场作业管理、 货场设备管理、货场安全管理、客户服务管理，并拥有

2、查询、录入、修改、打印 等功能。该系统主要服务于货运站货场工作人员，除此之外也设置客户服务管理,来满足客户对货运信息的查询及对货物运输的反馈，更加丰富了货运站货场信息 管理系统的内容，拓宽了使用范围。二、需求分析铁路货场是铁路运输企业面向社会办理货物运输业务的窗口和货物起止的集 散地。为了安全、方便、快捷地运送货物，经济合理地利用铁路货场设备，充分 发挥货场的作业能力，必须加强货场管理，从而实现货场作业标准化、管理科学 化、服务文明化。目前，一些铁路货运站虽然采用计算机工作，但是多数统计报表仍由人工处理，信息在不同实体之间没有实现共享，造成大量重复劳动。由于车站作业岗位 多，实行手工登记装卸信

3、息，使电话经常处于繁忙状态，导致其他作业点一直等待上报数据，造成时间浪费；而且手工登记容易出错，并且无法追查错误原因， 作业效率低下。在此基础上，通过设计开发货运站货场信息管理系统，实现货运集中管理，信息高度共享，提高工作质量和工作效率。三、系统设计系统功能本系统功能模块分为：货场计划管理、货场作业管理、货场设备管理、货场 安全管理、客户服务管理。客户的操作权限仅限使用客户服务管理功能模块及修 改密码，管理员操作权限可使用除客户服务管理和系统初始化全部功能模块，超 级管理员可使用所有功能。（1）货场计划管理：月计划查询及打印、运单查询及打印、货源信息查询；（2）货场作业管理：货场出车查询、装卸

4、车作业查询；（3）货场设备管理：货区查询、货位查询、装卸机械查询、篷布使用查询；（4）货场安全管理：货运事故查询；货运事故报告打印（5）客户服务管理：信息查询、服务评价；（6）系统管理：初始化系统、修改密码、数据备份、数据恢复、退出。系统功能结构本系统共分6大部分、20个完整的功能模块。系统结构图如图1所示。图 1 货运站货场信息管理系统功能结构四、主要功能模块设计数据库表设计（1）创建一个标准项目，名称为货运站货场信息管理系统。（2）在项目管理器下创建一个数据库，名称为datebase,在数据库中创建以下数据库表：czqx（操作权限）、fwpj（服务评价）、hccc（货场出车）、hcsg（货

5、 场事故） 、hqhw（货区货位）、pbgl（篷布管理）、hwyd（货物运单）、yjh（月计划）、ZXC（装卸车）、zxjx（装卸机械），创建完成后输入数据。具体内容见附录 表单设计设计的表单有登陆、服务评价、货场出车查询、货场事故查询、货区查询、 货位查询、货物运单查询、货源信息查询、客户货物信息查询、篷布使用查询、 数据备份、数据恢复、系统初始化、修改密码、月计划查询、装卸车查询、装卸 机械查询。登陆界面设计图 2 登录界面设计图用户进入系统前，必须通过登录进入主程序界面，登录界面主要用于确认用户的身份及使用权限，并且可对系统信息起到保密作用。系统登录界面如图 图3所示图 3 登录界面运行

6、图（1）表单设计在货运站货场信息管理系统项目中，添加一个新表单，名称为“登陆”在表单中添加Text控件、Label控件、Comman控件、Image控件。重要控件属性:Text2的PasswordChar属性设为“*”（2）代码设计在“登陆L”按钮的Click事件中添加以下代码实现判断密码是否正确的功能。 如果密码不正确，将提示密码不正确。if !eof（）=messagebox（ 欢迎您使用！,货运站货场信息管理系统）else=messagebox（ 密码不正确）endif在“image2”图片的Click事件中添加以下代码：管理员”在“image3”图片的Click事件中添加以下代码：超级

7、管理员”系统初始化设计系统初始化会清空所有记录，在执行此操作之前，系统会自动备份数据到默认备份目录下，以防数据丢失。系统初始化界面如图4及图5。图 4 系统初始化界面设计图图 5 系统初始化界面运行图（1） 表单设计在货运站货场信息管理系统项目中，添加一个新表单，名称为“系统初始化”在表单中添加shape控件、Label控件、Comman控件。（2） 代码设计在“初始化F”按钮的Click事件中添加以下代码实现系统初始化的功能。private outpatha=messagebox（确定要执行初始化操作吗？ ,32+4,系统提示）if a=6a=messagebox（初始化会清空所有数据，继续

8、吗？,32+4,系统提示）if a=6close all databaseoutpath =if directory(sys(5)+sys(2003)+bak)=.f.MKDIR sys(5)+sys(2003)+bakendifif file(系统设置.Rtt)=.t.handle=fopen(系统设置.Rtt,2)m=1do while feof(handle)=.f.mystr=fgets(handle)if m=7outpath=mystrendifm=m+1enddofclose(handle)if empty(outpath)=.t.outpath =sys(5)+sys(2003

9、)+bakendifelseoutpath =sys(5)+sys(2003)+bakendifmypath=Mypath=sys(5)+sys(2003)+data datepath=sys(5)+sys(2003)+dataDataBase wait windows 正在准备备份数据.Timeout if thisok=.t.wait windows 正在准备初始化. Timeoutelsemessagebox(初始化失败！ ,16,系统提示)returnendifjmpath=alltrim(outpath)+wait windows 正在删除其它设置文件 . Timeout if fi

10、le(系统设置.Rtt)=.t.dele file (系统设置.RTT)endifif file ( 检测.RBT)=.t.dele File( 检测.RBT)endifmessagebox(系统初始化完成！,32,系统提示)ENDIFENDIF在“退出E”按钮的Click事件中添加以下代码：修改密码设计通过本功能，用户可以修改自己的登陆密码，保证自身账户的安全性。修改密码界面如图6及图7。图 6 修改密码界面设计图图 7 修改密码界面运行图（1） 表单设计在货运站货场信息管理系统项目中，添加一个新表单，名称为“修改密码”在表单中添加Label控件、Comman控件。（2） 代码设计t1=al

11、ltrim（thisfor 。use czqxdo casecase t1=客户”if t2=111if t3=t4update czqz set 密码=t3 where 编号=1elsemessagebox（新密码输入不一致！ ,48,操作失败！）en difelsemessagebox（原密码输入错误！ ,48, 操作失败！）en difcase t1=管理员”if t2=222if t3=t4update czqz set 密码=t3 where 编号=2elsemessagebox（新密码输入不一致！ ,48,操作失败！）en difelsemessagebox（原密码输入错误！ ,4

12、8, 操作失败！）en difcase t1=超级管理员”if t2=333if t3=t4update czqz set 密码=t3 where 编号=3 elsemessagebox（新密码输入不一致！ ,48,操作失败！） en difelsemessagebox（原密码输入错误！ ,48, 操作失败！）en dif在“退出”按钮的Click事件中添加以下代码:数据备份设计数据备份可以将数据保存到其他位置，当由于某些意外原因而发生数据无法使用时，可以利用数据恢复进行恢复，以减少意外所带来的损失。数据备份界面如图8及图9。图 8 数据备份界面设计图图 9 数据备份界面运行图（1） 表单设计

13、在货运站货场信息管理系统项目中，添加一个新表单，名称为“数据备份”在表单中添加shape控件、Label控件、Comman控件。（2） 代码设计在“备份B”按钮的Click事件中添加以下代码实现数据备份的功能。close all databaseprivate outpathmypath=Mypath=sys（5）+sys（2003）+dataJMPath=alltrim（outPath）+messagebox（备份完成！ ,32,系统提示）在“退出E”按钮的Click事件中添加以下代码：数据恢复设计数据备份可以将数据保存到其他位置，当由于某些意外原因而发生数据无法 使用时，可以利用数据恢复进

14、行恢复，以减少意外所带来的损失。数据恢复界面 如图10及图11。图 10 数据恢复界面运行图图 11 数据恢复界面运行图(1) 表单设计在货运站货场信息管理系统项目中，添加一个新表单，名称为“数据恢复”C在表单中添加shape控件、Label控件、Comman控件。(2) 代码设计在“恢复R”按钮的Click事件中添加以下代码实现数据备份的功能。close all databaseprivate outpathmypath=outpath=sys(5)+sys(2003)+datamessagebox(数据恢复成功！无需要重新运行程序，可以直接使用！ ,32,系统提示)在“退出E”按钮的Cli

15、ck事件中添加以下代码：月计划查询设计查询月度运输计划，包括货物重量、体积、车种及始发终到地点等内容。月计划界面如图12及图13C图 12 月计划查询界面设计图图 13 月计划查询界面运行图(1) 表单设计在货运站货场信息管理系统项目中，添加一个新表单，名称为“月计划查询”。在表单中添加combo控件、Label控件、Commandgrou控件、shape控件、Grid控件。在表单中添加数据环境，数据环境为。(2) 代码设计在“查询”按钮的Click事件中添加以下代码实现查询月计划的功能。if empty(ctext)messagebox（请输入查询条件！,48,操作失败！）elseselec

16、t *;from datebase!yjh;order by货物名称；into cursor linqueryendif在“退出”按钮的Click事件中添加以下代码:其他如货场出车查询、 货场事故查询、货区查询、货位查询、货物运单查询、 货源信息查询等查询在界面设计及代码设计上基本一致，以下不再赘述。其他见 附录二。月计划录入设计录入月度运输计划，包括货物重量、体积、车种及始发终到地点等内容。月计 划录入界面如图14及图15。图 14 月计划录入界面设计图图 15 月计划录入界面运行图（1） 表单设计在货运站货场信息管理系统项目中，添加一个新表单，名称为“月计划录入”。在表单中添加Label控

17、件、Commandgroup$件、text控件、shape控件。（2） 代码设计在“保存”按钮的Click事件中添加以下代码实现月计划录入的功能。insert into yjh （货物名称，日均（车），静载重（t 每车），车数,运价（吨公里），发送吨,始发站，终到站，日期, 车种，货源地,备注）；values（t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12）在“退出”按钮的Click事件中添加以下代码：服务评价与月计划录入在界面设计及代码设计上基本一致，以下不再赘述 报表设计运单打印设计打印货物运单，包括委托方、收货方、货物名称、重量及始发目的地等内容， 并统计总

18、重量。运单打印界面如图16及图17。图 16 运单打印界面设计图图 17 运单打印界面运行图（1）在货运站货场信息管理系统项目中，添加一个新报表，名称为“运单打印”（2）在表单中添加Label控件、字段控件。（3） 在表单中添加数据环境，数据环境为。货场事故打印与运单打印在界面设计及控件设计上基本一致，以下不再赘述。菜单设计（1） 在货运站货场信息管理系统项目中， 添加一个新菜单，名称为“mainmenU（2） 按照功能模块结构依次输入子菜单和命令，命令有三种，分别是quit（退出）、do form表单名和report form报表名.frx preview。（3） 根据权限要求在跳过设置跳过

19、条件，依靠定义全局变量实现。具体菜单界面见图18、19、20。图 18 客户使用权限界面运行图图 19 管理员使用权限界面运行图图 20 管理员使用权限界面运行图主程序设计主程序是整个系统运行的第一步，主程序可以设置全局变量、运行界面属性、调用登陆界面和菜单等，所以，设计主程序对设计数据库系统至关重要public xuse czqxx=alltrim（czqx. 编号）clear screen=-10000do form 表单登陆=货运站货场信息管理系统do=0read events五、结束语货运站货场信息管理系统的应用能够实现货场基础设备及生产作业资源化管 理，货运指挥人员可以实时掌握货场的

20、作业车分布、月计划、货区货位、装卸工 作、装卸设备等资源和计划的变化和利用情况，最大程度提高货物运输的工作质 量和工作效率。附录一:原始数据库表表1月计划.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1货物名称字符型10升序2日均（车）数值型1003静载重（t/车）数值型804车数数值型305运价（吨公里）数值型826发送吨数值型807终到站字符型108始发站字符型109日期日期时间型810车种字符型1011货源地字符型1012备注备注型4表2货物运单.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1货运编号字符型10升序3收货方字符型105收货人电话字符型157收货

21、方地址字符型408货物名称字符型109件数数值型4010重量（t）数值型8011体积（数值型8012运费数值型8013始发地字符型2014目的地字符型2016收货时间日期时间型817备注备注型4表3货区货位.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1货物名称字符型10升序2品类字符型103货区字符型204货位字符型205重量（t）数值型806体积（M）数值型807占货位比例数值型848货位占货区比例数值型849货位利用率数值型8410备注备注型4表4装卸机械.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1机械名称字符型20升序2数量数值型203可用数量数值型204报修数量数值型205适用范围字符型406备注备注型4表5篷布管理.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1篷布种类