貨運設(shè)備管理系統(tǒng)

貨運設(shè)備管理系統(tǒng)對整個鐵路運輸部門而言，設(shè)備管理具有很重要的意義。它是重要的基礎(chǔ)管理信息資源，是進行技術(shù)改造、行車指揮、保障行車安全及事故搶險救援等的重要依據(jù)。設(shè)備是固定資產(chǎn)的重要組成部分，如何管理好各部門的設(shè)備，如何使設(shè)備的壽命周期更長，使其使用綜合效率最高，是運輸部門實現(xiàn)生產(chǎn)經(jīng)營的重要目的之一。但是由于管理技術(shù)跟不上，使設(shè)備管理成為鐵路系統(tǒng)技術(shù)管理的薄弱環(huán)節(jié)。鐵路部門的日常計劃、生產(chǎn)質(zhì)量、技術(shù)、物資、能源和財務(wù)等管理，都與設(shè)備管理有著這樣或那樣的聯(lián)系。隨著鐵路經(jīng)營機制的變革和技術(shù)更新速度的加快，各級管理人員的行車技術(shù)設(shè)備信息的需求不斷增長，以傳統(tǒng)方式管理運輸設(shè)備難以適應(yīng)新形勢的需要。

設(shè)備管理的好壞，在很大程度上決定了行車安全以及運輸成本的高低。在現(xiàn)代化生產(chǎn)條件日益完善的今天，設(shè)備管理水平的高低對運輸部門的影響更是強烈。所以，提高鐵路運輸部門客貨運設(shè)備管理水平，使之為車站的正常生產(chǎn)經(jīng)營提供效率更高的后勤服務(wù)是十分有必要的。隨著現(xiàn)代化生產(chǎn)水平的不斷提高，設(shè)備的性能更加高級，結(jié)構(gòu)更加復(fù)雜，使用維修等條件更加嚴(yán)格，設(shè)備的投資越來越昂貴。設(shè)備管理成為影響運輸部門經(jīng)濟效益的主要因素之一，在運輸部門日常管理中的地位舉足輕重。所以，如何加強鐵路運輸部門的客貨運設(shè)備管理，是擺在我們面前的一項迫切的重要任務(wù)。

隨著計算機的日益普及，計算機水平的飛速發(fā)展，尤其是以計算機為根基推動的信息技術(shù)和信息應(yīng)用的發(fā)展更是成為了一個國家社會進步、經(jīng)濟騰飛的原動力。在全球互連網(wǎng)迅猛發(fā)展，網(wǎng)絡(luò)經(jīng)濟正在興起的背景下，鐵路運輸部門現(xiàn)有的設(shè)備管理系統(tǒng)也面臨著向網(wǎng)絡(luò)化、智能化、輔助決策支持等方向發(fā)展。

本系統(tǒng)運用計算機visualbasic編程工具設(shè)計了一個管理鐵路貨運設(shè)備，改變以前的落后的管理法，是貨運設(shè)備管理進入信息化。

下面是貨運設(shè)備管理信息系統(tǒng)功能結(jié)構(gòu)圖。

設(shè)計思想在該系統(tǒng)的開發(fā)過程中，我們充分吸收和借鑒了長期以來從事各種工程項目所積累的行之有效的原理、概念、技術(shù)、和方法，特別是在以往的計算機軟件開發(fā)過程中所積累的經(jīng)驗和教訓(xùn)。采用軟件工程的概念、原理、技術(shù)和方法開發(fā)和維護軟件，把正確的管理技術(shù)和先進的軟件開發(fā)技術(shù)結(jié)合起來。嚴(yán)格運用了生命周期方法學(xué)和各種結(jié)構(gòu)分析及結(jié)構(gòu)設(shè)計技術(shù)，以最大限度的滿足用戶需求為目的，從時間角度對該設(shè)備管理信息系統(tǒng)的開發(fā)和維護進行了分解，將軟件開發(fā)分為六個步驟：制定計劃、需求分析、軟件設(shè)計、程序編寫、軟件測試、運行和維護。（1）對系統(tǒng)的設(shè)計進行了可行性研究

開發(fā)應(yīng)用軟件前的可行性研究對開發(fā)人員來說是至關(guān)重要的一環(huán)，所以我們對以前類似的系統(tǒng)做了充分的研究，對即將開發(fā)的軟件也做了大量的分析，并做出了相應(yīng)的技術(shù)文檔。以前有關(guān)設(shè)備管理的軟件是在DOS操作系統(tǒng)下所實現(xiàn)的，隨著計算機水平的不斷提高，操作系統(tǒng)的不斷升級，該系統(tǒng)版本低、界面單調(diào)，而且使用起來十分麻煩，已經(jīng)遠(yuǎn)遠(yuǎn)不能符合用戶的需要。我們所開發(fā)的系統(tǒng)要求緊密結(jié)合用戶需求，針對以前軟件的不足之處，開發(fā)出基于WINDOWS視窗操作系統(tǒng)的版本，該系統(tǒng)界面友好、風(fēng)格獨特、功能強大、使用起來方便快捷。針對鐵路運輸部門來說，快速、高效是尤其重要的要素，系統(tǒng)的開發(fā)也緊密結(jié)合了此要求。（2）對軟件的需求分析及采用的開發(fā)環(huán)境

應(yīng)用軟件最主要的特點就是最大限度的滿足用戶的需求。系統(tǒng)開發(fā)人員要緊緊圍繞用戶的需求來開發(fā)軟件。根據(jù)用戶的要求，在經(jīng)過反復(fù)分析研究之后，確定出鐵路部門的運輸設(shè)備履歷簿管理信息系統(tǒng)要具有以下功能：實現(xiàn)對以前版本的設(shè)備管理系統(tǒng)數(shù)據(jù)的兼容性；方便、快捷、安全可靠的履歷數(shù)據(jù)編輯功能；高效、方便、時間和范圍任意組合的車站數(shù)據(jù)查詢功能；路局、分局在任意時間里對任意范圍的數(shù)據(jù)進行統(tǒng)計的功能；路局、分局、車務(wù)段、車站部分?jǐn)?shù)據(jù)年度、月度自動匯總功能；自動生成車站履歷簿報表及年度報表以及分局年度匯總表功能；實現(xiàn)車站、車務(wù)段、分局、路局間的履歷簿數(shù)據(jù)在網(wǎng)上自動傳輸?shù)墓δ堋?/p>

操作系統(tǒng)采用當(dāng)前計算機用戶普遍采用的WINDOWS95/98/2000操作系統(tǒng)，軟件開發(fā)工具選用了面向?qū)ο蟮能浖_發(fā)工具VISUALBASIC6.0，履歷簿數(shù)據(jù)的存放、數(shù)據(jù)的處理及報表的生成選擇了通用的辦公軟件OFFICE系列中的MICROSOFTACCESS以及MICROSOFTEXCEL不僅實現(xiàn)了軟件的大眾性及通用性，而且實現(xiàn)了對以前在DOS下開發(fā)的履歷設(shè)備管理數(shù)據(jù)存放的.dbf格式的兼容性。（3）系統(tǒng)的設(shè)計思路

如何制定系統(tǒng)總體結(jié)構(gòu)，即用什么樣的方案來設(shè)計應(yīng)用軟件的總體結(jié)構(gòu)以及制定什么樣的設(shè)計思路來完成所要開發(fā)的項目，是每個項目開發(fā)前最重要的環(huán)節(jié)之一。應(yīng)用軟件和工具軟件不同，系統(tǒng)的總體結(jié)構(gòu)、設(shè)計思路和系統(tǒng)目標(biāo)是以用戶的需求為中心的，所以選擇最合乎用戶要求的方案是必須的。

該系統(tǒng)運行所采用的操作系統(tǒng)是當(dāng)前大部分計算機用戶普遍采用的WINDOWS95/98/2000操作系統(tǒng)，也符合鐵路運輸部門普遍的使用習(xí)慣。

在當(dāng)前的軟件開發(fā)中，面向?qū)ο螅∣O：Object-Oriented）的概念已經(jīng)無處不在，面向?qū)ο蟮脑O(shè)計（OOD：Object-OrientedDesign）成為系統(tǒng)設(shè)計和系統(tǒng)分析的首選方式，面向?qū)ο蟮木幊蹋∣O：Object-OrientedProgramme）的語言已經(jīng)成為主要的考慮對象。大多數(shù)其它程序設(shè)計語言將數(shù)據(jù)元素從執(zhí)行它們的的過程或活動中分離，而面向?qū)ο螅∣O）的語言，是把數(shù)據(jù)與過程（或活動）結(jié)合起來與對象相聯(lián)系。

對設(shè)備履歷簿管理信息系統(tǒng)的開發(fā)選擇了功能強大的面向?qū)ο蟪绦蜷_發(fā)工具VISUALBASIC6.0。它不僅有友好的圖形界面，而且有強大的數(shù)據(jù)庫訪問和數(shù)據(jù)處理能力，以及許多支持面向?qū)ο笤O(shè)計和實現(xiàn)的特性：在類模塊中定義類；用屬性過程提供公共訪問；定義多態(tài)方法；生成事件；封裝類常量；用ObjectBrowser查看類；創(chuàng)建對象；使用窗體作為對象；使用對象組；定義多接口；開發(fā)數(shù)據(jù)庫應(yīng)用程序；開發(fā)基于WEB的應(yīng)用程序；

VISUALBASIC6.0的許多新特性更加完善了面向?qū)ο蟮募夹g(shù)。采用新的數(shù)據(jù)訪問工具如ADO2、DATAVIEW（數(shù)據(jù)視圖）、DataEnvironment（數(shù)據(jù)環(huán)境）、DataReport（數(shù)據(jù)報告）設(shè)計器大大方便了訪問數(shù)據(jù)庫的功能；在WEB開發(fā)方面，可以用VB創(chuàng)建WEB應(yīng)用程序。其中包括DHTML以及ILS應(yīng)用程序。

這些優(yōu)秀的面向?qū)ο笤O(shè)計和面向?qū)ο髷?shù)據(jù)訪問的功能結(jié)合起來運用，能夠高質(zhì)量的完成對履歷簿數(shù)據(jù)的編輯、查詢以及統(tǒng)計功能。不僅實現(xiàn)每一個車站的數(shù)據(jù)查詢，而且可以實現(xiàn)任何一個車務(wù)段，任何一個分局，任何一個路局，甚至任何一條鐵路線上的所有車站的履歷數(shù)據(jù)的查詢和統(tǒng)計功能。功能完善，風(fēng)格獨特，優(yōu)點突出，是該系統(tǒng)的特點，與多媒體的完美結(jié)合也使得該系統(tǒng)在使用戶滿意的程度上又上了一個臺階。

數(shù)據(jù)處理是現(xiàn)代計算機應(yīng)用中的一個重要組成部分。人們使用計算機對大量的數(shù)據(jù)保存和管理，一邊推出有價值的信息輔助決策。數(shù)據(jù)處理的發(fā)展分為三個階段：人工管理階段、文件系統(tǒng)階段、數(shù)據(jù)庫系統(tǒng)階段。數(shù)據(jù)庫系統(tǒng)的發(fā)展有經(jīng)歷了三個階段：網(wǎng)狀數(shù)據(jù)庫、層次數(shù)據(jù)庫、關(guān)系數(shù)據(jù)庫。

數(shù)據(jù)庫管理系統(tǒng)是一個軟件系統(tǒng)，它能夠?qū)?shù)據(jù)庫進行存儲管理、安全性管理、完整性管理。它為用戶提供了一個軟件環(huán)境，快速建立、維護、檢索、存取和處理數(shù)據(jù)庫中的信息。數(shù)據(jù)庫和數(shù)據(jù)庫管理系統(tǒng)在一起構(gòu)成了數(shù)據(jù)庫系統(tǒng)。

面向?qū)ο蟪绦蛟O(shè)計方法中的對象是以對象名封裝的數(shù)據(jù)結(jié)構(gòu)和可施加在這些數(shù)據(jù)上的操作的集合。操作名列在封裝對象的界面上，當(dāng)一個對象A啟動另一個對象B的某個操作C時，A只需要以操作名C為主要信息向B發(fā)一條消息。對象B接收到A的消息后就會自動啟動操作C的工作，完成對B的數(shù)據(jù)結(jié)構(gòu)的加工。

因此，數(shù)據(jù)庫技術(shù)成為了計算機信息系統(tǒng)和應(yīng)用系統(tǒng)的重要支柱。

而面向?qū)ο蟪绦蜷_發(fā)中的面向?qū)ο蟮臄?shù)據(jù)庫系統(tǒng)就顯的極為重要。鐵路運輸部門的客貨運履歷數(shù)據(jù)不僅多而且比較復(fù)雜，以前所采用的管理系統(tǒng)是DOS操作系統(tǒng)下的版本，履歷簿數(shù)據(jù)是以.dbf的格式保存的，所以選擇OFFICE辦公軟件中的數(shù)據(jù)庫開發(fā)軟件MICROSOFTACCESS不僅符合絕大多數(shù)計算機使用者的習(xí)慣，而且強大的數(shù)據(jù)存放和數(shù)據(jù)處理能力、對以前版本的履歷數(shù)據(jù)的完全兼容是完全正確的。報表的生成也選擇了OFFICE家族中的MICROSOFTEXCEL實現(xiàn)報表的自動生成，完全按照用戶習(xí)慣保存以及打印報表數(shù)據(jù)。簡潔方便，完全符合用戶的要求。貨運設(shè)備管理信息系統(tǒng)使用詳細(xì)說明

1、首先進入系統(tǒng)并選擇登錄身份：

單擊圖1中的“貨運設(shè)備履歷管理系統(tǒng)”，進入貨運履歷簿主窗口，如下圖：

圖1

點擊菜單上的“登錄”，進入貨運設(shè)備管理登錄窗口，選擇登錄身份。

圖22、選擇不同身份登錄以及登錄后的相關(guān)功能

（1）以局（或分局）的身份登錄：

在圖2中如果只選擇全路局（全分局）而不選擇車站直接登錄系統(tǒng)，將會出現(xiàn)如下功能菜單（圖3-3）：

圖3

①、對全局（全分局）的履歷簿數(shù)據(jù)進行統(tǒng)計

單擊菜單上的統(tǒng)計，進入系統(tǒng)的統(tǒng)計功能。利用該功能可以對全局（全分局）的履歷簿數(shù)據(jù)進行任何條件的統(tǒng)計。具體步驟如下：

a、選定所要統(tǒng)計的范圍

若登錄身份是全路局（全分局），那么統(tǒng)計范圍就在全路局（全分局）。在局級身份下可以選擇以下幾個范圍：

1）、按鐵路線統(tǒng)計

在右圖（圖4）中選擇所要統(tǒng)計的鐵路線。則統(tǒng)計的數(shù)據(jù)是在這條鐵路線上全路局（全分局）所有車站的數(shù)據(jù)。

圖4

2）、按站、段統(tǒng)計

在下圖中可選擇所要統(tǒng)計的段級站或者車務(wù)段。如果圖4中的選擇是“無”，那么該下拉框中會出現(xiàn)全路局（全分局）的所有段級站以及車務(wù)段，如果選擇了某條線，那么該下拉框中出現(xiàn)的只有這條線上的段級站以及車務(wù)段。圖4和圖5的下拉框組合確定的范圍就是所要統(tǒng)計的范圍。

b、填寫所要統(tǒng)計的時間

在時間范圍一欄中填寫所要統(tǒng)計的時間范圍。要求起止時間都要填寫。

c、選定所要統(tǒng)計的表格及數(shù)據(jù)字段并確定統(tǒng)計條件

先選定表格，然后雙擊該表中的某個字段，接著編輯所要統(tǒng)計的條件，確認(rèn)條件正確（即符合SQL查詢語法）。如果就這一個條件進行統(tǒng)計，可點“統(tǒng)計”按鈕進行統(tǒng)計。如果多條件組合統(tǒng)計，可以接著選擇下一個字段，繼續(xù)編輯統(tǒng)計條件，編輯完條件后，確認(rèn)條件正確無誤，單擊“統(tǒng)計”按鈕進行統(tǒng)計。

圖5

d、輸出統(tǒng)計結(jié)果并保存

第二步點“統(tǒng)計”按鈕后將會在如圖6中出現(xiàn)統(tǒng)計結(jié)果，點“保存”可將該結(jié)果保存在一個文本文件中。

②、對某個車站的履歷簿數(shù)據(jù)進行查詢

利用該功能可以對全路局所有車站的貨運設(shè)備履歷簿數(shù)據(jù)進行查詢。查詢步驟如下：

a、選擇車站

點擊功能菜單（圖3）中的查詢，出現(xiàn)窗口6，在該窗口中可以用三種不同方式確定一個車站，所有的查詢將針對這個車站。

三種查詢確定車站的方式：

首先，在“局/分局”一項中選擇某分局，然后再確定車站名

1）、按站段別確定車站名

如圖6，選中“站段別”一項，然后在左邊的下拉框中選擇車務(wù)段，右邊的下拉框中會相應(yīng)的出現(xiàn)該車務(wù)段的所有車站。如果左邊的下拉框中選擇的是段級站，那么右邊的下拉框會自動消失。

圖6

2）、按鐵路線確定車站名

如圖7，選中“線名”一項，然后在左邊的下拉框中選擇鐵路線，右邊的下拉框中會出現(xiàn)全局范圍里該條鐵路線上的所有車站名，這樣就可以選擇一個站名。

圖7

3）、按車站名首字母選擇站名

如圖8，選中車站名稱”一項，在文本框中輸入你所要查詢的車站名的首字母，在文本框的右邊會列出所有首字母符合條件的車站名，單擊你所要查詢的車站名即可。

圖8

b、選擇表格及字段

選擇完車站名后點“確定”進入到下一窗口，如圖9，按圖中的提示可選擇表格，選擇字段。如果沒有選擇字段或者選擇所有字段，那么系統(tǒng)都會自動認(rèn)為你選擇了所有字段。

圖9

c、選擇查詢時間

在第二步中選擇完表格后，選擇時間一欄中會自動出現(xiàn)該表格所包含的所有時間字段。可在你所要查詢的年份前打上對勾，那么查詢結(jié)果中將只會出現(xiàn)你所選的年份的記錄；如果你沒有選擇年份或選擇了所有年份，那么系統(tǒng)會認(rèn)為你所要查詢的是所有年份的記錄。

d、得出查詢結(jié)果

點擊圖9中的查詢后會出現(xiàn)如圖10的查詢結(jié)果（僅一部分，另一部分可拉滾動條看到）。

圖10

③、有關(guān)數(shù)據(jù)維護功能

a、維護全局的所有車務(wù)段名、鐵路線名、車站名以及車站名首字母

圖11

如圖11，點擊功能菜單上的“維護”——“濟南分局”，可出現(xiàn)如下表格窗口，

圖12

如圖12，在該表格中可任意添加或刪除記錄或者更改記錄的內(nèi)容。需要注意的是，在車站名一欄中，所有后邊帶“站”字的車站都是段級站。

b、維護全局的所有貨運設(shè)備履歷簿填寫時的可選項

圖13

如圖13，點擊功能菜單上的“維護”——“履歷簿可選項”，進入如下窗口，如圖14。選擇某一張表格，然后選擇一個可維護的字段。如果要添加內(nèi)容，點擊右邊的添加項，在文本框中輸入所要添加的內(nèi)容，點“添加”按鈕，該內(nèi)容自動添加到數(shù)據(jù)庫中。如果要刪除內(nèi)容，點擊右邊的刪除項，選定所要刪除的內(nèi)容，點“刪除”按鈕，該內(nèi)容自動從數(shù)據(jù)庫中刪除。

圖14

④、網(wǎng)上接收、發(fā)送數(shù)據(jù)

利用該功能可以接收由全局所有車站上報的數(shù)據(jù)庫文件，然后可以對該數(shù)據(jù)進行瀏覽、查詢、統(tǒng)計等操作；也可以將分局或者路局的數(shù)據(jù)傳輸給各車站或者車務(wù)段。

（2）、以站、車務(wù)段的身份登錄

如果選擇某個車站登錄系統(tǒng)，將會出現(xiàn)如下功能菜單（圖15）：

圖15

①、對履歷簿數(shù)據(jù)進行編輯

點擊菜單上的編輯，然后選擇某一表格，接著出現(xiàn)該表格的編輯瀏覽窗口，如（圖16）。

圖16

a、記錄的修改

用鼠標(biāo)單擊你所要修改的數(shù)據(jù)所在的單元格，該單元格獲得焦點，如圖17，

圖17

可任意改動該單元格的數(shù)據(jù)。如果該單元格的數(shù)據(jù)是固定的選項，那么單擊該單元格后會出現(xiàn)如圖18所示的下拉框，可在該下拉框中選擇所要修改的數(shù)據(jù)。下拉框中的數(shù)據(jù)可在以局或者分局身份登錄的功能中修改維護。在對某一單元格的數(shù)據(jù)修改完畢后，可用鼠標(biāo)單擊所要修改的下一個單元格，也可以按回車鍵使焦點挪到同一行的下一個單元格，當(dāng)焦點在這一行的結(jié)尾時，按回車可使焦點移動到下一行的開始。

圖18

b、記錄的添加

如果要添加記錄，點擊“添加”按鈕，會出現(xiàn)如圖19所示，新記錄添加到最后一行。接著可以進行新記錄的數(shù)據(jù)錄入。

圖19

c、記錄的刪除

如過要刪除某一條記錄，可單擊該記錄的第一列選定整條記錄，也可以在除第一列外的任意一個單元格獲得焦點時雙擊它而選定整條記錄，然后點“刪除”按鈕，系統(tǒng)會提示你是否刪除，如圖20，選擇“是”將會永久的刪除該記錄，且不能恢復(fù)；選“否”將不進行任何操作。

圖20

d、數(shù)據(jù)的保存

當(dāng)修改完數(shù)據(jù)或者添加完記錄后，可以點“保存”按鈕對數(shù)據(jù)進行保存，以免丟失。如果某一條記錄中任何一個字段都沒有填寫數(shù)據(jù)，在保存時，系統(tǒng)會自動把它刪除。

e、生成打印報表

圖21

數(shù)據(jù)修改并保存完畢后，可點擊“生成報表”按鈕，然后在所出現(xiàn)的對話框中確定路徑及文件名，如圖3-25，再點“確定”系統(tǒng)會自動生成和該表格完全相同的EXCEL報表文件。若想打印該報表文件，可以隨時在EXCEL中打開該文件，然后打印。

②、對履歷簿數(shù)據(jù)進行查詢

a、選擇表格及字段

如圖21，按圖中的提示可選擇表格，選擇字段。如果沒有選擇字段或者選擇所有字段，那么系統(tǒng)都會自動認(rèn)為你選擇了該表格的所有字段。

b、選擇查詢時間

選擇完表格后，選擇時間一欄中會自動出現(xiàn)該表格所包含的所有時間字段?？稍谀闼樵兊哪攴萸按蛏蠈?，那么查詢結(jié)果中將只會出現(xiàn)你所選的年份的記錄；如果你沒有選擇選擇年份或選擇所有年份，那么系統(tǒng)會認(rèn)為你所要查詢的是所有年份的記錄。

c、得出查詢結(jié)果

點擊圖9中的查詢后會出現(xiàn)如圖10的查詢結(jié)果。

③、網(wǎng)上發(fā)送數(shù)據(jù)

利用此功能可以將車站編輯后的數(shù)據(jù)庫文件通過網(wǎng)絡(luò)直接發(fā)送到分局，以便分局領(lǐng)導(dǎo)統(tǒng)計、查詢相關(guān)數(shù)據(jù)。操作系統(tǒng)及開發(fā)環(huán)境功能集成

近年來，網(wǎng)絡(luò)的迅速普及和應(yīng)用，促使計算機技術(shù)，網(wǎng)絡(luò)數(shù)據(jù)傳輸技術(shù)，除了E-mail、FTP、WWW等傳統(tǒng)的手段以外，電子報刊、遠(yuǎn)程教學(xué)、遠(yuǎn)程醫(yī)療、網(wǎng)上購物、虛擬專網(wǎng)、電子金融、電子貿(mào)易等新興的INTERNET應(yīng)用日益發(fā)展和成熟起來。INTERNET對鐵路運輸部門獲取信息的方式和相互交流信息的方式產(chǎn)生了巨大的影響，全新的信息服務(wù)將會為鐵路運輸部門的工作方式及工作效率帶來巨大的變化。鐵路是國民經(jīng)濟的動脈，建國幾十年以來，鐵道部逐步建成了四通八達(dá)的鐵道網(wǎng)，為國家提供了高效、暢通、經(jīng)濟的貨運、客運服務(wù)，為我國社會穩(wěn)定、經(jīng)濟繁榮作出了巨大貢獻(xiàn)。國家大力發(fā)展計算機網(wǎng)絡(luò)建設(shè)的現(xiàn)階段，要提高鐵路部門工作人員在本地、本行業(yè)的工作運營效率，充分利用網(wǎng)絡(luò)強大的數(shù)據(jù)傳輸功能以及豐富的通信資源是必要的。要在鐵路運輸部門間建立Intranet，充分利用現(xiàn)有資源，實現(xiàn)路局與分局之間，分局與車站之間，以及路局與車站之間的履歷簿數(shù)據(jù)互相傳輸功能。徹底代替以前鐵路運輸各部門之間的人工上報軟盤的情形。路局?jǐn)?shù)據(jù)庫路局?jǐn)?shù)據(jù)庫車務(wù)段數(shù)據(jù)庫分局?jǐn)?shù)據(jù)庫路局、分局、車務(wù)段之間數(shù)據(jù)互相傳輸

GIS（地理信息系統(tǒng)）是國際上近幾年才發(fā)展起來的一種新型軟件，它是在計算機硬、軟設(shè)備支持下，實現(xiàn)地理空間數(shù)據(jù)輸入、存儲、管理、檢索、處理和綜合分析的技術(shù)系統(tǒng)。它最重要的特點在于把需要研究的數(shù)據(jù)和反映這些數(shù)據(jù)地理位置的圖形有效結(jié)合起來，從而根據(jù)應(yīng)用的需要進行信息的空間分析處理。將GIS技術(shù)與鐵路運輸管理相結(jié)合，充分發(fā)揮先進的GIS技術(shù)的特點和功能為鐵路運輸管理系統(tǒng)服務(wù)。

GIS是計算機應(yīng)用領(lǐng)域的一個重要發(fā)展方向。對空間信息及其相關(guān)的屬性信息的處理是GIS的基本功能，空間信息的查詢和分析是GIS和其它數(shù)據(jù)處理系統(tǒng)的主要區(qū)別，迅速、及時地更新數(shù)據(jù)庫，大規(guī)模、綜合性地管理與地理分布有關(guān)的信息是它的特點。應(yīng)用GIS技術(shù)是鐵道部“十五”規(guī)劃中的一個重點，也是實現(xiàn)“數(shù)字鐵路”構(gòu)想的重要技術(shù)組成部分。因此為解決實際問題，適應(yīng)技術(shù)發(fā)展方向，基于GIS平臺以鐵路為具體服務(wù)對象做二次開發(fā)成為本項目的設(shè)計思路根源。（4）代碼的編寫及系統(tǒng)速度的優(yōu)化

高級程序設(shè)計語言的特性和編碼途徑及方法將會決定編碼的可靠性、可讀性、可測試性和可維護性。編寫的代碼的目的是實現(xiàn)人和計算機之間的互相通信，最終實現(xiàn)應(yīng)用軟件一定要符合用戶需求、方便用戶使用的目的。編程人員盡可能的使該管理系統(tǒng)在使用過程中減小對操作系統(tǒng)資源的消耗。選用VISUALBASIC6.0設(shè)計程序，在優(yōu)化系統(tǒng)速度我們采取了以下措施：

首先，優(yōu)化系統(tǒng)的真實速度方面：選用最佳的數(shù)據(jù)結(jié)構(gòu)；避免使用Variant變量以及隱式變量；盡可能的使用常數(shù)；使用內(nèi)嵌過程替代調(diào)用；盡量使用ByVal傳替參數(shù)，而不使用ByRef等。

其次，在優(yōu)化顯示速度方面：、恰當(dāng)?shù)氖褂肁utoRedraw;、設(shè)置屬性時隱藏控件，以避免多次重畫；、用Image控件代替PictureBox控件；、將容器的ClipControls屬性設(shè)為False等。第三，在優(yōu)化感覺速度方面：隱藏窗體而不卸載窗體;使用進度指標(biāo)器和等待光標(biāo)；加快應(yīng)用程序的啟動速度；預(yù)加載需讀取的數(shù)據(jù)等。（5）系統(tǒng)的試用及測試

在濟南分局部分車站已經(jīng)開始試用該系統(tǒng)。首先在一個相對較小的范圍里進行測試使用。選取一個車務(wù)段，然后選取分局，路局，分別安裝該系統(tǒng)。由不同的用戶分別操作，實現(xiàn)了履歷簿的記錄添加、刪除、保存以及報表生成等功能；而且成功的實現(xiàn)了車務(wù)段、分局、路局之間數(shù)據(jù)的互相傳輸。該系統(tǒng)受到現(xiàn)場用戶的一致好評。（6）系統(tǒng)的維護功能

設(shè)備履歷管理信息系統(tǒng)中包括客、貨運管理兩套系統(tǒng)。兩套系統(tǒng)采用了相同的路局、分局、車務(wù)段以及車站名數(shù)據(jù)庫，該數(shù)據(jù)庫中的車站被劃分為三種不同的范圍。分別是分局、車務(wù)段、鐵路線。不同的用戶級別有不同的維護功能。比如路局可以維護所有的分局名、車務(wù)段名，鐵路線名以及車站名；分局可以維護分局內(nèi)的所有車務(wù)段名、鐵路線名以及車站名。程序源代碼

'定義讀取ini文件的API函數(shù)

PublicDeclareFunctionGetPrivateProfileIntLib"kernel32"Alias"GetPrivateProfileIntA"(ByVallpApplicationNameAsString,ByVallpKeyNameAsString,ByValnDefaultAsLong,ByVallpFileNameAsString)AsLong

PublicDeclareFunctionGetPrivateProfileStringLib"kernel32"Alias"GetPrivateProfileStringA"(ByVallpApplicationNameAsString,ByVallpKeyNameAsAny,ByVallpDefaultAsString,ByVallpReturnedStringAsString,ByValnSizeAsLong,ByVallpFileNameAsString)AsLong

PublicDeclareFunctionWritePrivateProfileStringLib"kernel32"Alias"WritePrivateProfileStringA"(ByVallpApplicationNameAsString,ByVallpKeyNameAsAny,ByVallpStringAsAny,ByVallpFileNameAsString)AsLong

PublicdbAsDatabase

PublicrstAsRecordset

PublicstrLoginBureaNameAsString'登陸的分局名

PublicstrSuoshuxianAsString'如果是車站登陸，將登陸時所屬的鐵路線從數(shù)據(jù)庫中讀出來

PublicstrStationNameAsString'小站或者站管站中低一級的車站

PublicstrCwdNameAsString'車務(wù)段或者站管站中高一級的車站

PublicstrDatabaseNameAsString'數(shù)據(jù)庫名稱

PublicNeedSaveLocal(1000,1000)AsBoolean

PublicIsColorTurnAsBoolean'顏色是否轉(zhuǎn)變，是否選中整條記錄

PublicLoginStationNameAsString

PublicLoginStationAsString

PublicYearTj()AsString

PublicPathnameAsString'生成報表時所存儲的全路徑

PublicSelectedYearAsString

PublicTableNameSelectedAsString'所選擇表格的名字

PublicG_CurrentTableNameAsString'瀏覽編輯時所選擇的表格

PublicStrLoginAsString'從config.ini中讀取的字符串

PublicIsNoQueryAsBoolean'是否是查詢所調(diào)用的窗體

PublicCurrentYearAsString'當(dāng)前年份

PublicG_DbStationDataAsDatabase'定義打開車站的數(shù)據(jù)庫

PublicG_RstStationDataAsRecordset'定義車站數(shù)據(jù)集

PublicG_CurrentYearAsString

PublicEnumG_Distinction'用枚舉型變量定義登陸的級別

luju=1

fenju=2

chewuduan=3

duanjizhan=4

xiaozhan=5

EndEnum

PublicFunctionReturnFileName(ByValPathFileNameAsString)AsString

DimFNLenAsInteger

DimiAsInteger

DimtempAsString

FNLen=Len(PathFileName)

IfRight(PathFileName,1)="/"Then

ReturnFileName="/"

ExitFunction

EndIf

Fori=0ToFNLen-1

temp=Mid(PathFileName,FNLen-i,1)

Iftemp="\"Then

ReturnFileName=Right(PathFileName,i)

ExitFunction

EndIf

Nexti

EndFunction

PublicFunctionFindWeihuPath(strPathAsString)AsString

'查詢Weihu路徑

IntPathEnd=InStrRev(strPath,"\")

IntPathEnd=IntPathEnd-1

strCurrentPath=Mid(strPath,1,IntPathEnd)

strCurrentPath=strCurrentPath&"\weihu"

FindWeihuPath=strCurrentPath

EndFunction

'從數(shù)據(jù)庫中按照年份條件和車站名條件

'取出將要在網(wǎng)格中顯示的記錄集

PublicSubSelectCondition()

DimStrYearAsString'定義當(dāng)前年份

DimstrSQLAsString'定義SQL語句

'讀取當(dāng)前的年份

StrYear=Left(Format(Date,"LONGDATE"),4)

'如果以車站的身份登陸的話

strSQL="SELECT*FROM"&G_CurrentTableName&"WHEREP01='"&StrYear&"'"

SetG_RstStationData=G_DbStationData.OpenRecordset(strSQL)

EndSub

'從查詢窗口所選擇的表格中按照查詢條件取出記錄集

PublicSubQueryCondition()

DimStrYearAsString'定義當(dāng)前年份

DimstrSQLAsString'定義SQL語句

'讀取當(dāng)前的年份

StrYear=Left(Format(Date,"LONGDATE"),4)

'如果以車站的身份登陸的話

strSQL="SELECT*FROM"&G_CurrentTableName&"WHERE("&SelectedYear&")andcz='"&strStationName&"'ORDERBYP01"

SetG_RstStationData=G_DbStationData.OpenRecordset(strSQL)

EndSub

PublicSubFindLastRecAndCopyToCurrentYearRec()

'查找當(dāng)前年的記錄，如果不存在則復(fù)制上一年的記錄，

'如果上一年不存在,則手動輸入

IfG_RstStationData.RecordCount=0Then

ByValMsgbox=MsgBox("沒有今年的信息，是否復(fù)制上一年的內(nèi)容？",0+vbYesNo,"提問")

IfByValMsgbox=vbYesThen

SetG_RstStationData=G_DbStationData.OpenRecordset("select*from"&G_CurrentTableName&"whereP01='"&CStr(CInt(Left(G_CurrentYear,4))-1)&"'andcz='"&strStationName&"'")

IfG_RstStationData.RecordCount=0Then

MsgBox"沒有上一年的記錄，請手動輸入今年的設(shè)備信息！",0+vbInformation,"提示"

ExitSub

EndIf

G_DbStationData.Execute"INSERTINTO"&G_CurrentTableName&"select*from"&G_CurrentTableName&"WHEREP01='"&CStr(CInt(Left(G_CurrentYear,4))-1)&"'andcz='"&strStationName&"'"

SetG_RstStationData=G_DbStationData.OpenRecordset("select*from"&G_CurrentTableName&"WHEREP01='"&CStr(CInt(Left(G_CurrentYear,4))-1)&"'andcz='"&strStationName&"'")

G_RstStationData.MoveLast

Fori=G_RstStationData.RecordCountToG_RstStationData.RecordCount/2+1Step-1

G_RstStationData.Edit

G_RstStationData.Fields(4).Value=Left(G_CurrentYear,4)

G_RstStationData.Update

G_RstStationData.MovePrevious

Next

Else

ExitSub

EndIf

EndSub

'將從數(shù)據(jù)庫中讀出的數(shù)據(jù)，顯示在網(wǎng)格中

PublicSubBrowseData(ByValFgAsMSFlexGrid,ByValrecAsRecordset)

OnErrorResumeNext

DimstrSqlsAsString

DimCountRowsAsInteger

DimCountColsAsInteger

DimByValMsgbox

IfIsNoQuery=TrueThen

'打開查詢結(jié)果數(shù)據(jù)集

QueryCondition

Else

'打開編輯表格數(shù)據(jù)集

SelectCondition

'查找是否有今年的記錄，如果沒有，則復(fù)制上一年的

'如果上一年沒有，則手動輸入當(dāng)前年的記錄

FindLastRecAndCopyToCurrentYearRec

SelectCondition

EndIf

'數(shù)據(jù)集移動至尾，然后至頭

G_RstStationData.MoveLast

G_RstStationData.MoveFirst

CountRows=G_RstStationData.RecordCount

CountCols=G_RstStationData.Fields.Count-4

WithFg

IfCountRows=0Then

.Rows=1

EndIf

Fori=1ToCountRows

Forj=1ToCountCols

.Rows=CountRows+1

.Cols=CountCols

.Row=i

.Col=j-1

IfIsNull(G_RstStationData.Fields(.Col+4).Value)Then

.Text=""

Else

.Text=G_RstStationData.Fields(.Col+4).Value

EndIf

If.Text="0"Then

.Text=""

EndIf

Nextj

G_RstStationData.MoveNext

Nexti

.Refresh

EndWith

G_RstStationData.Close

EndSub

'存儲網(wǎng)格中凡是有改變的方格中的數(shù)據(jù)

PublicSubSaveData(ByValFgAsMSFlexGrid,ByValrecAsRecordset)

DimCountRowsAsInteger

DimCountColsAsInteger

DimjAsInteger,kAsInteger

'打開記錄集

SelectCondition

G_RstStationData.MoveLast

G_RstStationData.MoveFirst

WithFg

CountRows=.Rows

CountCols=.Cols

Fori=1ToCountRows-1

Forj=0ToCountCols-1

IfNeedSaveLocal(i,j)=TrueThen

.Row=i

.Col=j

G_RstStationData.Edit

G_RstStationData.Fields(j+4).Value=.Text

G_RstStationData.Update

EndIf

Nextj

G_RstStationData.MoveNext

Nexti

'刪除所有記錄中的空白記錄

Fori=.Rows-1To1Step-1

Ifi>.Rows-1Then

ExitFor

EndIf

Forj=1To.Cols-1

.Row=i

.Col=j

If.Text<>""Then

BlankValue=True

ExitFor

EndIf

Nextj

IfBlankValue=FalseThen

.RemoveItem.Row

EndIf

BlankValue=False

Nexti

EndWith

SetG_RstStationData=Nothing

EndSub

PublicSubAddRec(ByValFgAsMSFlexGrid,ByValrecAsRecordset)

'記錄集增加一條記錄

'前五個字段分別添上分局、車務(wù)段、車站、所屬線,年份

Withrec

.AddNew

.Fields(0)=strLoginBureaName

.Fields(1)=strCwdName

.Fields(2)=strStationName

.Fields(3)=strSuoshuxian

.Fields(4).Value=Left(G_CurrentYear,4)

.Update

.Close

EndWith

EndSub

附錄資料：不需要的可以自行刪除車間配線設(shè)計技術(shù)要求一、總體要求：1、工程概況：本次工程主要為車間內(nèi)部設(shè)備的動力電設(shè)計、安裝部分。2、本工程包含全部電氣配套設(shè)施的采購、安裝、對接；中標(biāo)方負(fù)責(zé)全部電線、電纜、連接頭、動力柜、配電盒及其配件的采購、搬遷、安裝等，并滿足使用要求。其中主線路的架設(shè)采用橋架支撐空中架設(shè)，距地面高度不低于6米，每根柱子架設(shè)一套。3、本次配電工程中電纜規(guī)格型號全部為BV系列銅芯電纜，電纜額定電壓為0.66/1KV。電纜品牌：電纜可選用江蘇上上電纜集團有限公司，南洋電纜集團有限公司，安徽綠寶電纜有限公司，安徽航天電纜集團有限公司,山東遠(yuǎn)東電纜有限公司等產(chǎn)品，隨電纜需附有產(chǎn)品合格證和產(chǎn)品質(zhì)量檢驗合格證；線纜為BV線纜標(biāo)準(zhǔn)符合國標(biāo)要求；斷路器選用正泰品牌，隨機附有產(chǎn)品合格證和產(chǎn)品質(zhì)量檢驗合格證。4、電纜鋪設(shè)按國家電氣安裝標(biāo)準(zhǔn)執(zhí)行，線號清晰，線路規(guī)范產(chǎn)品技術(shù)標(biāo)準(zhǔn)符合國家標(biāo)準(zhǔn)及行業(yè)規(guī)范要求。5、動力柜需配置零排和地排,柜體要有相應(yīng)的銘牌和產(chǎn)品合格證，配備電流、電壓表。6、塑料外殼式斷路器均采用正泰品牌標(biāo)準(zhǔn)型3極斷路器。配電柜體均采用上海電器股份有限公司人民電器廠生產(chǎn)的標(biāo)準(zhǔn)柜體。7.車間照明燈具要求功率100w，均采用浙江陽光品牌；配套開關(guān)采用TCL品牌。二、主材配置圖3-1裝一圖3-1裝一車間廠房布局圖1）配電柜底座安裝10#槽鋼基礎(chǔ)，高度約為200/180cm，周圍需密封,配置零排和地排,柜體要有相應(yīng)的銘牌和產(chǎn)品合格證。配置三相電壓表1塊，安裝電壓轉(zhuǎn)換開關(guān)1只實現(xiàn)相間電壓轉(zhuǎn)換；配置三相電流表3塊。2）配電柜箱體高度1800mm，門開啟大于135°，箱體獨立安裝，頂部、底部可根據(jù)要求開進出線孔；安裝板及側(cè)梁可以調(diào)節(jié)、安裝檢修靈活、方便、結(jié)構(gòu)緊湊、通用性好。柜門附配電柜線路圖。3）技術(shù)參數(shù)（銘牌須有標(biāo)識）□符合標(biāo)準(zhǔn)：IEC439、GB7251.1-1997、JB／T9661-1999

□額定電壓：AC400V

□額定絕緣電壓：660V

□額定電流：根據(jù)負(fù)荷要求定

□額定短時耐受電流：30kA

□外殼防護等級：IP304）配電柜內(nèi)部使用銅排母線連接，柜內(nèi)母線要求外敷熱縮套管，柜內(nèi)接線端子應(yīng)與出線導(dǎo)線截面匹配，不得使用小端子配大截面導(dǎo)線。2、分線配電柜要求1）配電柜箱體規(guī)格H1200*W600*D400，門開啟大于135°，箱體獨立安裝，底部可根據(jù)要求開進出線孔；安裝板及側(cè)梁可以調(diào)節(jié)、安裝檢修靈活、方便、結(jié)構(gòu)緊湊、通用性好。柜門附配電柜線路圖。2）技術(shù)參數(shù)（銘牌須有標(biāo)識）□符合標(biāo)準(zhǔn)：IEC439、GB7251.1-1997、JB／T9661-1999

□額定電壓：AC400V

□額定絕緣電壓：660V

□額定電流：根據(jù)負(fù)荷要求定

□額定短時耐受電流：30kA

□外殼防護等級：IP303）配電柜內(nèi)部使用銅排母線連接，柜內(nèi)母線要求外敷熱縮套管，柜內(nèi)接線端子應(yīng)與出線導(dǎo)線截面匹配，不得使用小端子配大截面導(dǎo)線。3、配電箱1）配電柜箱體規(guī)格600*400，門開啟大于135°，箱體獨立安裝，底部可根據(jù)要求開進出線孔；安裝板及側(cè)梁可以調(diào)節(jié)、安裝檢修靈活、方便、結(jié)構(gòu)緊湊、通用性好，要求安裝高度離車間地面1.5米。2））配電柜內(nèi)部使用銅排母線連接，柜內(nèi)母線要求外敷熱縮套管，柜內(nèi)接線端子應(yīng)與出線導(dǎo)線截面匹配，不得使用小端子配大截面導(dǎo)線。三、相關(guān)內(nèi)容及要求(一)車架車間配電要求1、總配電柜部分安裝1)從車間內(nèi)配電室接主電纜至主配電柜位置，安裝XL-21配電柜（JP1）1臺。2)該配電柜采用三相五線制，其中零線、底線由獨立接線銅排。配電柜要求含總控開關(guān)（塑殼斷路器）1只、車間線路控制開關(guān)3只、備用三相斷路器3只。4)從配電柜對應(yīng)斷路器三相五線制電纜連接分別至車間三條線路分配控制部分。2、車架車間線路1配電要求1）在車間指定位置（見車間配電圖）放置配電柜JP1-1、JP1-2；配電箱JK1-32）要求配電柜JP1-1含總控開關(guān)1只、三相斷路器3只、兩相斷路器（含漏電保護）1只、備用三相斷路器2只。配電柜JP1-2含總控開關(guān)1只、三相斷路器6只、兩相斷路器（含漏電保護）1只、備用三相斷路器2只。配電箱JK1-3含三相斷路器1只。3、車架車間線路2配電要求1）在車間指定位置（見車間配電圖）放置配電柜JP2-1、JP2-2、JP2-3；配電箱。2）要求配電柜JP1-1、JP1-2均含總控開關(guān)1只、三相斷路器3只、兩相斷路器（含漏電保護）1只、備用三相斷路器2只。配電柜JP1-3含總控開關(guān)1只、三相斷路器6只、兩相斷路器（含漏電保護）1只、備用三相斷路器2只。配電箱根據(jù)配電圖分配兩相斷路器、三相斷路器，所有斷路器均含有漏電保護功能。3）車間照明控制依照配電圖安裝于相應(yīng)位置。4、車架車間線路3配電要求1）在車間指定位置（見車間配電圖）放置配電箱。2）要求配電箱根據(jù)配電圖分配兩相斷路器、三相斷路器，所有斷路器均含有漏電保護功能。5、配線要求1）總配電柜采用1000A斷路器總開關(guān)，1個400A塑殼斷路器，2個250A塑殼斷路器2）分線配電箱內(nèi)部采用總開關(guān)250A塑殼斷路器，三相均采用100A塑殼斷路器，兩相采用60A塑殼斷路器，備用斷路器采用100A塑殼斷路器3）配電箱內(nèi)部采用總開關(guān)250A塑殼斷路器，三相均采用60A塑殼斷路器，兩相采用60A塑殼斷路器4）線路2主線采用BV95銅線，零線和地線采用BV50銅線。線路1和線路3主線采用BV50銅線零線和地線采用BV25銅線。5)配電柜支線采用BV25銅線，零線、地線采用10銅線。6)配電箱支線采用BV16銅線，零線、地線采用6銅線7）照明主線采用BV6銅線，燈線采用2.5銅線。6、材料明細(xì)名稱規(guī)格單位數(shù)量備注配電柜XL-21含配套件件1A類分線配電柜H1200*W600*D400件3內(nèi)含7個塑殼式斷路器B類分線配電柜H1200*W600*D400件2內(nèi)含10個塑殼式斷路器A類配電箱600×400件23相/1B類配電箱600×400件13相/2C類配電箱600×400件143相/3D類配電箱600×400個33相/1+2相/2E類配電箱600×400個23相/2+2相/1F類配電箱600×400個43相/3+2相/1銅線BV952米約420內(nèi)含接線鼻銅線BV502米約920銅線BV252米約500銅線BV162米約500銅線BV102米約100銅線BV62米約300線路橋架套505號槽鋼焊接，含瓷瓶照明配電箱400×200套4含控制系統(tǒng)其他輔材---(二)車相車間配電要求1、總配電柜部分安裝1)從車架車間內(nèi)配電室接主電纜至主配電柜位置，安裝XL-21配電柜（XP）1臺。2)該配電柜采用三相五線制，其中零線、底線由獨立接線銅排。配電柜要求含總控開關(guān)（塑殼斷路器）1只、車間線路控制開關(guān)3只、備用三相斷路器3只。4)從配電柜對應(yīng)斷路器三相五線