货运站货场信息管理系统_第1页
货运站货场信息管理系统_第2页
货运站货场信息管理系统_第3页
货运站货场信息管理系统_第4页
货运站货场信息管理系统_第5页
已阅读5页,还剩31页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

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

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

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

4、打印、货源信息查询;(2)货场作业管理:货场出车查询、装卸车作业查询;(3)货场设备管理:货区查询、货位查询、装卸机械查询、篷布使用查询;(4)货场安全管理:货运事故查询;货运事故报告打印(5)客户服务管理:信息查询、服务评价;(6)系统管理:初始化系统、修改密码、数据备份、数据恢复、退出。3.2 系统功能结构本系统共分 6大部分、 20个完整的功能模块。系统结构图如图 1所示。庆姑站货场甘啟营刃走躱1 1 1 1 1 1IHwir扮诈力忡用frittUV.J1 理廿计期W-理HJFqftihJ&£饨豐rf狗li.i化远*削|1 .母甲音曲打计划白IIU医皿出笔習世文案大全图

5、1货运站货场信息管理系统功能结构四、主要功能模块设计4.1数据库表设计(1)创建一个标准项目,名称为货运站货场信息管理系统。(2)在项目管理器下创建一个数据库,名称为 datebase,在数据库中创建以下数据库 表:czqx (操作权限)、fwpj (服务评价)、hccc (货场出车)、hcsg (货场事故)、hqhw (货 区货位)、pbgl (篷布管理)、hwyd (货物运单)、yjh (月计划)、zxc (装卸车)、zxjx (装 卸机械),创建完成后输入数据。具体内容见附录一。4.2表单设计设计的表单有登陆、服务评价、货场出车查询、货场事故查询、货区查询、货位查询、 货物运单查询、货源

6、信息查询、客户货物信息查询、篷布使用查询、数据备份、数据恢复、 系统初始化、修改密码、月计划查询、装卸车查询、装卸机械查询。4.2.1登陆界面设计目:詁. <| ct | 8 | S3图2登录界面设计图用户进入系统前,必须通过登录进入主程序界面,登录界面主要用于确认用户的身份及 使用权限,并且可对系统信息起到保密作用。系统登录界面如图2及图3所示图3登录界面运行图(1)表单设计在货运站货场信息管理系统项目中,添加一个新表单,名称为“登陆”。在表单中添加 Text控件、Label控件、Comman(控件、Image控件。 重要控件属性:Text2的PasswordChar属性设为“ * ”

7、(2)代码设计在“登陆按钮的Click事件中添加以下代码实现判断密码是否正确的功能。如果密 码不正确,将提示密码不正确。locate for alltrim(czqx.用户名)=alltrim(thisform.text1.value);and alltrim(czqx.密码)=alltrim(thisform.text2.value)if !eof()=messagebox(' 欢迎您使用!,货运站货场信息管理系统')else=messagebox(" 密码不正确")thisform.text2.value=""endifthisfor

8、m.release在“退出Z”按钮的Click事件中添加以下代码:Quit在“ image1 ”图片的Click事件中添加以下代码:thisform.text1.value=" 客户"在“ image2”图片的Click事件中添加以下代码:thisform.text1.value="管理员"在“ image3”图片的Click事件中添加以下代码:thisform.text1.value="超级管理员"422系统初始化设计系统初始化会清空所有记录, 在执行此操作之前,系统会自动备份数据到默认备份目录 下,以防数据丢失。系统初始化界面如图

9、4及图5。F您 究清执4113 中百会靈的防咿;到.初二皐下.i STS目0以可图4系统初始化界面设计图盲-f.D團口|創如刃盂睦虑2冋!図厂 亠=1正回|电圖钊图5系统初始化界面运行图(1)表单设计在货运站货场信息管理系统项目中,添加一个新表单,名称为“系统初始化” 在表单中添加 shape控件、Label控件、Comman控件。(2)代码设计在“初始化F”按钮的Click事件中添加以下代码实现系统初始化的功能。private outpatha=messagebox("确定要执行初始化操作吗?",32+4,"系统提示")if a=6a=messageb

10、ox("初始化会清空所有数据,继续吗?",32+4,"系统提示")if a=6close all databaseoutpath =""if directory(sys(5)+sys(2003)+"bak")=.f.MKDIR sys(5)+sys(2003)+"bak"endifif file("系统设置.Rtt")=.t.handle=fopen("系统设置.Rtt",2)m=1do while feof(handle)=.f.mystr=fgets(

11、handle)if m=7outpath=mystrendifm=m+1enddofclose(handle)if empty(outpath)=.t.outpath =sys(5)+sys(2003)+"bak"endifelseoutpath =sys(5)+sys(2003)+"bak"endifmypath=""Mypath=sys(5)+sys(2003)+"data"datepath=sys(5)+sys(2003)+"dataDataBase"wait windows "

12、正在准备备份数据." Timeout 0.8thisok=thisform.rainbak1.bak(mypath,outpath)if thisok=.t.wait windows " 正在准备初始化." Timeout 0.8thisform.rainfunction1.dateformat(datepath)elsemessagebox("初始化失败! ",16,"系统提示”)returnendifjmpath=alltrim(outpath)+"DataBase.dbc"thisform.lockdateb

13、ase1.lock(jmpath,"正在加密备份文件.")wait windows "正在删除其它设置文件 ."Timeout 0.8if file("系统设置.Rtt")=.t.dele file ("系统设置.RTT")endifif file (" 检测.RBT")=.t.dele File(" 检测.RBT")endifmessagebox("系统初始化完成! ",32,"系统提示")ENDIFENDIF在“退出E”按钮的Cli

14、ck事件中添加以下代码:thisform.release4.2.3修改密码设计通过本功能,用户可以修改自己的登陆密码,保证自身账户的安全性。修改密码界面如图6及图7。*11图6修改密码界面设计图图7修改密码界面运行图(1)表单设计在货运站货场信息管理系统项目中,添加一个新表单,名称为“修改密码” 在表单中添加 Label控件、Comman(控件。(2)代码设计t1=alltrim(thisfor 。m.textl.value)t2=alltrim(thisform.text2.value)t3=alltrim(thisform.text3.value)t4=alltrim(thisform.t

15、ext4.value)use czqxdo casecase t1="客户”if t2="111"if t3=t4update czqz set 密码=t3 where 编号="1"elsemessagebox('新密码输入不一致!,48,'操作失败!')en difelsemessagebox('原密码输入错误!',48,' 操作失败!')en difcase t1="管理员”if t2="222"if t3=t4update czqz set 密码=t3

16、where 编号="2"elsemessagebox('新密码输入不一致!',48,'操作失败!')en difelsemessagebox('原密码输入错误!',48,' 操作失败!')en difcase t1="超级管理员”if t2="333"if t3=t4update czqz set 密码=t3 where 编号="3"elsemessagebox('新密码输入不一致!',48,'操作失败!')en difelsem

17、essagebox('原密码输入错误!',48,' 操作失败!')en dif在“退出”按钮的 Click事件中添加以下代码:thisform.release4.2.4数据备份设计数据备份可以将数据保存到其他位置,当由于某些意外原因而发生数据无法使用时,以利用数据恢复进行恢复,以减少意外所带来的损失。数据备份界面如图8及图9。*11 口 1回S3E-备E-出in将,血,垃帀i奋忆胳輕:|tmii e Iran > n ei t r n nmnnniiHtn图8数据备份界面设计图¥眾却卅£ IrM 鬓-!|宙1' 'klf

18、all t|矗占哩応3-'丄言崔 JJz、业百謹 J;乜丘兜厘乩i住宝雪总胃.避葩0:ft討>9£;(-. ._1*也丰虫 ni-歹.-希 1刁昭擁彳 | C: WsusIlitM- v)-1 iDisk topv|图9数据备份界面运行图(1) 表单设计在货运站货场信息管理系统项目中,添加一个新表单,名称为“数据备份” 在表单中添加 shape控件、Label控件、Comman控件。(2) 代码设计在“备份B”按钮的Click事件中添加以下代码实现数据备份的功能。close all databaseprivate outpathmypath=""My

19、path=sys(5)+sys(2003)+"data"outpath=alltrim(thisform.text1.value)thisform.rainbak1.bak(mypath,outpath)JMPath=alltrim(outPath)+"DateBase.dbc"thisform.Lockdatebase1.lock(JmPath,"正在加密备份文件.")messagebox("备份完成! ",32,"系统提示")在“退出E”按钮的Click事件中添加以下代码:thisform.

20、release4.2.5数据恢复设计数据备份可以将数据保存到其他位置,当由于某些意外原因而发生数据无法使用时,可以利用数据恢复进行恢复,以减少意外所带来的损失。数据恢复界面如图10及图11。'ftfl 3書岌可黨 将,而,&市 可fe原退亠黑IR nail !* I a * a a 恢萇路衿;|r«stiJwi iBliinnKiH :anitteia ics(a)图10数据恢复界面运行图-fc&-VITi5 -r*l l&T71 -11 1*1 *t|l TaI图11数据恢复界面运行图(1) 表单设计在货运站货场信息管理系统项目中,添加一个新表单,名

21、称为“数据恢复” 在表单中添加 shape控件、Label控件、Comman控件。(2) 代码设计在“恢复R”按钮的Click事件中添加以下代码实现数据备份的功能。close all databaseprivate outpathmypath=""Mypath=alltrim(thisform.text1.value)outpath=sys(5)+sys(2003)+"data" thisform.rainbak1.bak(mypath,outpath)thisform.Lockdatebase1.lock(sys(5)+sys(2003)+"

22、dataDataBase.dbc","正在解密.")messagebox("数据恢复成功!无需要重新运行程序,可以直接使用!",32,"系统提示")在“退出E”按钮的Click事件中添加以下代码:thisform.release4.2.6月计划查询设计查询月度运输计划, 包括货物重量、体积、车种及始发终到地点等内容。月计划界面如 图12及图13。图12月计划查询界面设计图月计创M理运雪握货运计勺笆鬼奠运忙丄罪货壬设备苣毘疣运左仝隹逞宜戸医吕漓期月计注词 juiaiifelj磴谊棗;1笑柯容称 T亭段!图13月计划查询界面运行

23、图(1) 表单设计在货运站货场信息管理系统项目中,添加一个新表单,名称为“月计划查询”。在表单中添加 combo控件、Label控件、Commandgroup控件、shape控件、Grid控件。 在表单中添加数据环境,数据环境为yjh.dbf。(2) 代码设计在“查询”按钮的 Click事件中添加以下代码实现查询月计划的功能。cif=alltrim(bo1.displayvalue)ctext=alltrim(thisform.text1.value)if empty(ctext)messagebox('请输入查询条件!,48,' 操作失败!')thisform.tex

24、t1.setfocuselseselect *;from datebase!yjh;where & cif.=alltrim(thisform.text1.value);order by货物名称;into cursor linquerythisform.grid2.recordsource='linquery'thisform.refreshendif在“退出”按钮的 Click事件中添加以下代码:thisform.release其他如货场出车查询、货场事故查询、货区查询、货位查询、货物运单查询、货源信息 查询等查询在界面设计及代码设计上基本一致,以下不再赘述。其他见附

25、录二。4.2.7月计划录入设计录入月度运输计划,包括货物重量、体积、车种及始发终到地点等内容。月计划录入界面如图14及图15。图14月计划录入界面设计图期賞込緡賞嘩邑肯理訣网苣理碍运计甸営理負运作业飙 M迂设至兰芒占运衣丸理喜户强崟昔理:口目口)冃灯吞鋼3创剧垂I国 J_| jJ月计旬1录入;E=图15月计划录入界面运行图(1) 表单设计在货运站货场信息管理系统项目中,添加一个新表单,名称为“月计划录入”。在表单中添加 Label控件、Commandgroup控件、text控件、shape控件。(2) 代码设计在“保存”按钮的 Click事件中添加以下代码实现月计划录入的功能。t1=alltr

26、im(thisform.text1.value)t2=alltrim(thisform.text2.value)t3=alltrim(thisform.text3.value)t4=alltrim(thisform.text4.value)t5=alltrim(thisform.text5.value)t6=alltrim(thisform.text6.value)t7=alltrim(thisform.text7.value)t8=alltrim(thisform.text8.value)t9=alltrim(thisform.text9.value)t1O=alltrim(thisform

27、.text1O.value)t11=alltrim(thisform.text11.value)t12=alltrim(thisform.text12.value)insert into yjh (货物名称,日均(车),静载重(t每车),车数,运价(吨公里),发送吨,始发站,终到站,日期,车种,货源地,备注);values(t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12)在“退出”按钮的 Click事件中添加以下代码:thisform.release服务评价与月计划录入在界面设计及代码设计上基本一致,以下不再赘述。4.3报表设计4.3.1运单打印设计打印货物运单,

28、包括委托方、收货方、货物名称、重量及始发目的地等内容,并统计总 重量。运单打印界面如图16及图17。V Mkrslerh Vktlal FaJiFra口 Xwqoi iM(n* mbkp) awy aw whWl金削匸1 *1尙1©1 小l打罔 应忑3 口価I欄1刨曲1 U为飙*山IL/lMtdui"图16运单打印界面设计图申貫并彷氏显刘怦哼uhSdik耙再登虫宁戦連甘广电畀百irPO)巨"上,列._. .丨*J w>. tlNi“ 1|酣* |”|11到创國worn _J莹体积池地目社览托运时同收贺时何runWfl:傅“ K |d |2 T 11fla 1

29、5 Ifi 12 01 flO克?1封Q北R凰眩M 12 00:«Oh L& 14 1? D) nn含計9宝:WJt图17运单打印界面运行图(1)在货运站货场信息管理系统项目中,添加一个新报表,名称为“运单打印”。(2)在表单中添加 Label控件、字段控件。(3) 在表单中添加数据环境,数据环境为hwyd.dbf。货场事故打印与运单打印在界面设计及控件设计上基本一致,以下不再赘述。4.4菜单设计(1) 在货运站货场信息管理系统项目中,添加一个新菜单,名称为“mai nmenu”。(2) 按照功能模块结构依次输入子菜单和命令,命令有三种,分别是quit (退出)、 do fo

30、rm 表单名和 report form 报表名.frx preview 。(3)根据权限要求在跳过设置跳过条件,依靠定义全局变量实现。具体菜单界面见图18、 19、20。V法逢陀旦兰理4£吒啟音理 哎暑咔16理 题哲躍 超避瓯 JJBAAMS 畫八够它理冋 剖固旷I :d毛|i电1IE !同f刁同圍童灌I鼬圄*1图18客户使用权限界面运行图¥斗a苛細MR9 盛卫世睦 iSfiiffilM BiattWA fili*空凹 玛二&.£,.”皿:円 J 一|: | - 一 | 一|川!凶|U T於|餌型雯回 1t|图19管理员使用权限界面运行图cJqIhJ剧国1

31、歇| 是|輛團 i|T JIM|3 ®J®I圖I MB Tl2k.1=1 13竝化IiHHj Z图20管理员使用权限界面运行图4.5主程序设计主程序是整个系统运行的第一步,主程序可以设置全局变量、运行界面属性、调用登陆界面和菜单等,所以,设计主程序对设计数据库系统至关重要。public xuse czqxx=alltrim(czqx. 编号)clear screen_screen.left=-10000do form 表单登陆_screen.caption='货运站货场信息管理系统'do mainmenu.mpr_scree n.l eft=0read ev

32、ents五、结束语货运站货场信息管理系统的应用能够实现货场基础设备及生产作业资源化管理,货运指挥人员可以实时掌握货场的作业车分布、月计划、货区货位、装卸工作、装卸设备等资源和计划的变化和利用情况,最大程度提高货物运输的工作质量和工作效率。附录一:原始数据库表表1月计划.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1货物名称字符型10升序:2日均(车)数值型1003静载重(t/车)数值型804车数数值型305运价(吨公里)数值型826发送吨数值型807终到站字符型108始发站字符型109日期日期时间型810车种字符型1011货源地字符型1012备注备注型4表2货物运单.DBF数据库

33、表结构序号字段名称字段类型字段宽度小数位数索引1货运编号字符型10升序3收货方字符型105收货人电话字符型157收货方地址字符型408货物名称字符型109件数数值型4010重量(t)数值型8011体积(数值型8012运费数值型8013始发地字符型2014目的地字符型2016收货时间日期时间型817备注备注型4表3货区货位.DBF数据库表结构序号字段名称字段类型1字段宽度小数位数索引1货物名称字符型10升序2品类字符型103货区字符型204货位字符型205重量(t)数值型806体积(M数值型807占货位比例数值型848货位占货区比例数值型849货位利用率:数值型8410备注备注型4表4 装卸机械

34、.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1机械名称字符型20升序2数量数值型203:可用数量数值型204报修数量数值型205:适用范围字符型406备注备注型4表5篷布管理.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1:篷布种类字符型20升序2数量数值型403:可用数量数值型404报修数量数值型405:适用范围字符型406备注备注型4表6货场事故.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1事故编号字符型10升序2事故等级字符型13事故种类字符型44损失款额数值型1005赔偿款额数值型10706事故原因字符型1007备注备注型4表7服务评价.D

35、BF数据库表结构序号字段名称字段类型字段宽度小数位数索引1:货运编号字符型10升序2运输速度字符型103r货物有无损坏字符型104运价水平字符型205其他说明字符型1006备注备注型4表8装卸车.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1:货运编号字符型10升序2股道现在车数值型8升序3:装卸车数量数值型84装卸车时间日期时间型85装卸车地点字符型206备注备注型4表9货场出车.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1:货运编号字符型10升序2出车时间日期时间型83出车内容字符型204出车数量数值型85备注备注型4表10操作权限.DBF数据库表结构序号字段名称字段类型字段宽度小数位数索引1:用户名字符型10升序2密码字符型103编号字符型74备注备注型4实

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论