1、 計 量 管 理 信 息 系 統 說明: 1.需本辯論稿配套的程序及論文,可以訪問 下載 2.有什么不明白的地方,可以聯系作者本人計 量 管 理 信 息 系 統摘要: 計量管理信息系統是以某車輛廠質量保證處的計量管理的需求出發，使用Delphi7.0開發的MIS系統。利用該系統，管理人員可以根據需求方便地對計量信息進行管理。本文主要對計量管理信息系統的開發的背景、系統需求、系統設計、數據庫設計、系統實現、運行環境等進行了介紹，較全面的闡述了該系統開發的全過程。關鍵詞:計量管理 系統開發 管理信息系統 代碼 目 錄第一章 緒論 第二章 系統規劃 第三章 系統分析第四章 系統設計第五章 系統開發工

2、具的選取及介紹 第六章 系統實現 第七章 開發總結 附錄：參考文獻 目 錄第一章 緒論 第二章 系統規劃 第三章 系統分析第四章 系統設計第五章 系統開發工具的選取及介紹 第六章 系統實現 第七章 開發總結 附錄：參考文獻 3.1系統業務流程圖的提出 3.2系統邏輯模型的提出 3.3系統實現的根本目標 3.4對系統功能的根本要求目 錄第一章 緒論 第二章 系統規劃 第三章 系統分析第四章 系統設計第五章 系統開發工具的選取及介紹 第六章 系統實現 第七章 開發總結 附錄：參考文獻 4.1系統的總體結構設計4.2系統總體的物理結構4.3系統的詳細設計4.4數據庫設計 第一章 緒論 隨著信息技術的

3、不斷開展，計算機科學日漸成熟，它已進入社會的各個領域，并發揮著重要的作用。 大家熟知的互聯網Internet已經改變了和正在不斷改變人們的工作，生活方式和理念。許許多多的企業也已經建立起了自己企業內部的局域網，用來作為自己與外界溝通的橋梁。是否建有開放的、科學的，全面的管理信息系統已經成為衡量一個企業是否有競爭力的重要標志。 該廠已于2003年建立了工廠的局域網，而工廠較為重要的部門對外的數據文檔等均已進入了計算機管理，工廠內部文件精神及重大的通知都已實現了無紙化辦公。而質量保證處的計量人員一直以來使用傳統人工的方式管理計量工作。這種管理方式存在著許多的缺點，如：工作效率低且容易出錯，查找工作

4、煩瑣；另外隨著時間的增長，將產生大量的文件資料。這給計量工作的管理和維護都帶來了不少的困難。計量管理系統就是針對這一問題而研發的，它能為管理者提供充足的信息和快捷的查詢手段。 本文選用了結構化方法和delphi7.0開發軟件，使用計算機來對計量工作進行管理，具有了用手工管理無法比較的優點。如：查找文件方便，可靠性高，存儲量大，維護更新方便，保密性好，壽命長，本錢低等。這些優點能大大提高計量管理的工作效率。也是計量管理工作走向科學化，正規化的重要條件。 返回第二章 系 統 規 劃 系統規劃是管理信息系統生命周期的第一個階段，也是企業信息化建設的首要階段，企業加強管理信息系統加建設是一項投資大，歷

5、時長，技術復雜，涉及面廣的系統工程，系統的建設應該充分考慮企業的整體目標和管理決策的需要，對企業的內外部的環境要進行全面的調查研究，從而確定企業的內外部的約束條件，來確定企業信息系統的總目標，提出信息系統建設的總體結構方案，在實施解決問題的方案中，選用經濟，簡單的可實施方案。 在系統開發之前，對質量保證處的計量管理情況進行較全面細致的調查。主要方式是系統分析人員，設計人員與質量保證處的管理人員進行交流，根據自己在計量崗位的工作經驗和結合實際需求，經過初步調查了解到：質量保證處計量管理的主要方式是基于文本，表格等的手工處理，檢定記錄等數據的處理以計算器為工具來進行的。由于記錄的數量大，數據處理復

6、雜，工作量大，容易出錯；并且由于文字，數據記錄必須清晰無誤，因此在記錄過程中經常出現字跡不清，查詢不便的情況。同時產生大量的檢定記錄紙張，造成存放保管不便。質量保證處目前擁有專門負責計量標準器管理的計算機一臺，處長辦公室兩臺，這幾臺計算機都已進入到工廠的局域網。從質量保證處的行政管理和職能分工角度來看。 質量保證處現行計量管理工作存在的主要問題是：一質量保證處的高層管理人員對全廠的計量器具的使用情況，配備情況不能全面了解。 二各專業檢定人員各自為政，檢定數據記錄只被檢定人員單獨使用，各專業檢定人員間，彼此缺乏了解，容易造成具體工作對個別人員的過分依賴。影響業務的進展。三各專業之間信息交流少，信

7、息渠道不暢通，工作不易協調。四數據記錄處理手工操作，工作量大，出錯率高；尤其是在檢定樣板等專用計量器具時，用手工計算樣板數據時，計算復雜，工作量大，經常造成工作中的矛盾。五處領導對整個工廠的計量器具的配備，使用情況不能及時準確了解，計量器具不能及時提供保證，常影響車間生產的正常運行。六由于工廠新產品的不斷試制生產計量器具的及時配置尤為重要，因此建立基于計量機技術的管理信息系統的建設已是勢在必行。 計量管理信息系統的目標為： 按照管理信息系統的原理及方法，采用成熟的信息技術與手段，對質量保證處計量管理工作的全過程加強計量活動中的各種信息資源的管理與應用，提高企業管理工作的現代化水平，優化財物及信

8、息資源的配置，為企業生產經營活動提供全面計量保證的根底上，為經營管理決策提供支持，為企業工廠開展信息管理方面提供給有的奉獻。 計量管理信息系統的范圍和邊界，該系統主要是為質保處的內部計量管理活動提供信息效勞，它覆蓋質保處內部的各項計量管理工作，涉及質保處的所有計量業務職能 系統能夠對質保處的計量器具周期檢定方案，計量器具檢定，計量器具的采購管理，計量器具臺帳管理，計量器具送檢通知單的管理等方面的信息提供存儲，更新，查詢，統計等功能。系統的數據來源由各專業檢定人員通過鍵盤輸入，該系統范圍不涉及計量標準起的管理，同時該系統的信息可以輸送到工廠局域網。返回第 三 章 系 統 分 析31系統業務流程圖

9、的提出： 根據自己從事計量工作數年來積累的經驗，以及與處長的屢次交流中了解了計量管理活動及他們對信息系統的需求，現用系統流程圖中局部圖形工具來描述管理業務活動，進行標準地說明，業務流程圖的符號說明如以下圖所示： 處 理 物成單據 數據存儲 物成信息 外部實體 返回32系統邏輯模型的提出系統分析的主要成果是系統的邏輯模型，本系統的邏輯模型主要是以系統的數據流程圖和數據字典為主要的描述工具，即在對計量管理方式和業務流程進行認真分析和研究的根底上。超脫出計量管理現有的組織機構和業務分工所造成的信息障礙，完全從業務管理功能和管理對象出發，按照信息系統應有的數據流和數據結構來勾畫系統的概貌，這樣的系統在

10、組織機構改變的時候具有相應的靈活性。 數據流程圖簡稱DFD 數據流程圖是組織中信息運動的抽象。從邏輯上精確地描述系統應具有的數據加工功能、數據輸入、數據輸出、數據存儲及數據來源和去向外部實體等工程，數據流程圖的根本符號如下所示： 外部項 加工 數據存儲 數據流 返回3.3系統實現的根本目標：計量管理系統是一個相對獨立，功能完全的信息系統。從傳統的計量管理的特點來看，本系統應該實現以下幾個方面的根本目標：1操作員設置：1超級用戶：系統初始化一個Administrator用戶，超級用戶可以對系統進行任何操作，可以管理其他操作員，也可以刪除新購器具記錄因為有可能輸錯，經檢定后的器具說明廠內真實存在，

11、不允許刪除，至于其他某些屬性錯誤，那么相關的操作人員可以修改，這里只有Administrator用戶可以增加超級用戶，其他超級用戶那么不能加超級用戶，并且只有Administrato。2總工具室操作員：只限于總工具室所能操作的工程。3檢定人員：只限于與檢定工作有關的操作。檢定員能對計量管理信息進行輸入，包括檢定方案，每月周檢計量器具名稱，檢定記錄輸入，計量器具詳細情況登記，報廢理由等計量器具的信息。4車間工具員：只限于車間工具員能操作的范圍。5一般操作員：只用于查詢的操作。2用戶根據自己的信息進行查詢，設置合理的查詢方式如按月份查詢，按車間查詢，按計量器具名稱查詢，按條件查詢用戶方便。3計量器

12、具檢定后的檢測數據，合格證等能方便，快捷，準確的打印。4管理員權限內，能實現用戶管理和刪除用戶，新增用戶，任何用戶都能對自己的密碼進行修改。 返回34對系統功能的根本要求： 1、能提供完善而方便的數據輸入手段，以全面，正確，及時地錄入各種原始數據，并將它們轉化為系統所需的形式。在錄入過程中用戶權限以及數據的平安性進行必須的審核，提示操作者修改，拒絕非法入侵者或非法數據進入系統。 2、具備較為完善的內部控制機制，保證數據的平安可靠，防止數據喪失。 3、信息的輸出形式和檢測數據，合格證，報廢單的打印，以及計量器具的情況查詢等盡量滿足用戶的要求和計量器具檢定規程的要求和規定。 4、系統應當允許用戶通

13、過初始設置和修改，適應用戶的特定環境和環境的變化。 返回第四章 系 統 設 計系統設計的主要目的是將以上系統分析所提出的系統邏輯模型轉化為可以實施的基于計算機與通信系統的物理方案。它包括如下的主要內容：4.1系統總體結構設計根據系統分析的結果，按照結構化的系統設計方法，對系統的數據流圖采用變換中心法和事務中心法，用圖形方法表達一個系統的輸出功能，自頂向下逐步分解得到以下圖的模塊的層次結構圖HIPO圖返回42系統總體物理結構：網絡采用以網絡集線器(HUB)為中心，以雙絞線為傳輸介質的星型結構，在每個業務管理功能發生地點以及處長辦公室分別配置一臺微型計算機作為系統結點工作站。系統功能的實現子系統間

14、的數據共享與交換通過網絡效勞器完成。 系統具體物理配置如下：網絡集線器(HUB)采用 8 PORT A-TONE AT-5008，傳輸介質采用ATT五類雙絞線，網絡效勞器作為系統功能實現和數據共享的中心，應具有較高的性能和可靠性，選擇高品牌專用效勞器，選用的是一臺 浪潮英信NP50 的效勞器，網絡站選用486 以上一般兼容機即可，在檢定員辦公室分別配置打印機，型號為 Epson LQ-1600K。 返回4.3系統詳細設計數據庫設計 數據庫設計在MIS系統開發中是至關重要的一個環節，數據庫設計的好壞在很大程度上影響著編碼的效率以及將來擴展和維護。數據庫設計的不合理，甚至可能會導致由于無法實現用戶

15、的需求而影響整個MIS系統開發。因此在進行具體的編碼之前，應對整個數據庫的設計和思路有一個總體的把握。 在系統的數據庫設計中，首先要對系統分析得到的數據字典中的數據存儲進行分析。下面是E-R圖的符號說明： 實 體屬 性實體間聯系 以下以“計量器具檢定管理為例來說明數據庫根本結構的設計。 計量器具檢定管理中所涉及到的主要實體及其屬性如下： 計量器具廠內編號、器具名稱、制造廠家、測量范圍、分度值 檢定方案器具名稱、數量、檢定周期、使用單位 檢定記錄廠內編號、器具名稱、檢定數據 報廢通知單廠那編號、器具名稱、測量范圍、分度值、報廢理由 送檢通知單廠內編號、器具名稱、分度值、使用車間、送檢日期 新購計

16、量器具出廠編號、器具名稱、測量范圍、分度值 合格證廠內編號、器具名稱、合格等級、使用車間、檢定日期、有效期檢定員檢定數量新購計量器具計量器具屬于使用車間組成結果合格證報廢通知單數量1nmmpnmnp 按照用E-R圖方法設計關系數據庫的方法，除上述每一個實體分別構成一個關系外，彼此之間的聯系也轉化為關系，具體邏輯結構如下： 計量器具廠內編號、器具名稱、測量范圍、分度值、制造廠家、出廠編號、型號或規格、到廠日期、有效期、使用車間、報廢日期、備注 檢定方案器具名稱、數量、檢定周期、使用車間、測量范圍、分度值、檢定周期、檢定日期、方案日期、年度 檢定記錄廠內編號、器具名稱、檢定數據、檢定日期、使用車間

17、、有效期、檢定員、復核員、所用儀器名稱及編號、檢測室溫、備注 報廢通知單廠那編號、器具名稱、測量范圍、分度值、報廢日期、報廢理由、檢定員、復核員 送檢通知單廠內編號、器具名稱、分度值、使用車間、送檢日期、出廠編號、測量范圍、檢定周期、年度、月份、是否檢測 新購計量器具出廠編號、器具名稱、測量范圍、分度值、廠內編號、制造廠家、到廠日期、型號或規格、使用車間、備注 合格證廠內編號、器具名稱、合格等級、使用車間、檢定日期、有效期、檢定員、復核員 操作員表用戶名、密碼、權限、權限代碼、代號、姓名、職稱 設計的根本原那么是盡可能的減少數據的冗余度，這樣做的好處是能節省存儲空間，并且容易維護數據的完整和一

18、致性。 返回4.4數據庫設計數據庫名：jlqjglxt其中的表，設計如下： 一、操作員表 operator字段名數據類型長度說明User（Key）Char20用戶名（關鍵字）passwordChar20密碼powerChar16權限powercodeInteger1權限代碼codeChar10代號nameChar16姓名dutyChar10職稱二、計量器具記錄表 jlqjb字段名數據類型長度說明Cnbh（Key）Char10廠內編號（以“編號數量”表示）qjmcChar30器具名稱zzcjChar50制造廠家ccbhChar10出廠編號xhggChar16型號或規格clfwChar12測量范圍

19、fdzChar10分度值dcrqDate/Time到廠日期yxqInteger2有效期（用月份數表示）sycjChar30使用車間bfrqDate/Time報廢日期bzChar200備注三、器具類別記錄 qjb字段名數據類型長度說明ID（Key）自動編號記錄號qjmcChar30器具名稱xhggChar16型號或規格bhChar5編號slInteger3數量四、不合格（報廢）器具通知單記錄 bfb字段名數據類型長度說明cnbh（Key）Char10廠內編號qjmcChar30器具名稱sycjChar30使用車間zzcjChar50制造廠家clfwChar12測量范圍fdzChar10分度值bf

20、rqDate/Time報廢日期bflyChar200報廢理由jdyChar16檢定員fhyChar16復核員五、新購器具記錄 xgqjb字段名數據類型長度說明cnbh（Key）Char10廠內編號qjmcChar30器具名稱zzcjChar50制造廠家ccbhChar10出廠編號xhggChar16型號或規格dcrqDate/Time到廠日期sycjChar30使用車間clfwChar12測量范圍fdzChar10分度值bzChar200備注六、合格證記錄 hgzb字段名數據類型長度說明ID（Key）自動編號記錄號cnbhChar10廠內編號qjmcChar30器具名稱hgdjChar10合格

21、等級sycjChar30使用車間jdrqDate/Time檢定日期yxqInteger2有效期jdyChar16檢定員fhyChar16復核員（可以更改“合格等級”）七、送檢通知單記錄 sjtzd字段名數據類型長度說明ID（Key）自動編號記錄號cnbhChar10廠內編號qjmcChar30器具名稱zzcjChar50制造廠家ccbhChar10出廠編號clfwChar12測量范圍fdzChar10分度值sycjChar30使用車間jdzqinteger檢定周期sjrqDate/Time送檢日期yfChar2月份ndChar4年度sfjcInteger1是否檢測八、檢定記錄 jdjlb字段名

22、數據類型長度說明ID（Key）自動編號記錄號cnbhChar10廠內編號qjmcChar30器具名稱sycjChar30使用車間yqmcbhChar40所用儀器名稱和編號jcswinteger檢測室溫jdrqDate/Time檢定日期jdsjChar200檢定數據yxqInteger有效期jdyChar16檢定員fhyChar16復核員bzChar200備注九、檢定（周檢年度）計劃 jdjhb字段名數據類型長度說明ID（Key）自動編號記錄號qjmcChar30器具名稱slInteger2數量clfwChar12測量范圍fdzChar10分度值sycjChar30使用車間jdzqInteger

23、2檢定周期（以月份數表示）jdrqChar20檢定日期（以“2004年1月”表示）jhrqDate/Time計劃日期ndChar4年度十、采購報告記錄 cgbgb字段名數據類型長度說明ID（Key）自動編號記錄號qjmcChar30器具名稱clfwChar12測量范圍fdzChar10分度值syyqChar50使用要求sycjChar30使用車間slInteger2數量bgrqDate/Time報告日期sftyInteger1是否同意pfrqDate/Time批復日期十一、使用車間表 sycjb字段名數據類型長度說明sycjid（Key）Char10使用車間IDsycjmcChar30使用車間

24、名稱十二、制造廠家表 zzcjb字段名數據類型長度說明zzcjid（Key）Char10制造廠家IDzzcjmcChar50制造廠家名稱返回第五章 系統開發工具的選取及介紹 Delphi是一個真正面向對象的編程環境，不僅如此，Delphi的這種面向對象的機制是單純的建立在Windows的消息機制上的Delphi代碼，而不是像VB、VFP之類的調用DLL、OCX，通過查看Delphi控件的源代碼，你可以知道整個機制是怎樣組織起來的，而且你可以完完全全地控制這些控件，因為它們只是用Delphi代碼編寫的，而不是存在在DLL中看不見的東西。 本系統選用Delphi7.0作為開發工具，這是基于以下幾點

25、考慮：1、面向對象的技術。開發工具支持面向對象的技術應該是全面的，如多級繼承、多級封裝和多態等，而不就只是局部和有限的支持，Delphi7.0是真正面向對象的，它的根本語言是Object Pascal語言，Pascal語言數據類型豐富、語法風格嚴謹；Object Pascal在Pascal語言的根底上擴充了面向對象的特性，支持封裝、繼承、派生、多態等根本的面向對象的特性。 2、語言性能具有穩定性和可靠性。 3、具有強大的數據編程能力，能夠支持ODBC和數據庫專用接口。數據編程是Delphi的強項，Delphi除了使用BDE數據引擎外，還提供了ActiveX數據對象ADO的支持，為數據庫編程增加

26、了靈活性。 4、提供多種數據表現形式。Delphi7.0能夠有效的操作本地及其它網絡上的各種數據庫。 5、提供第四代語言可擴展的編程語言。其語言簡單而功能強大，開發人員無須關心復雜的底層工作。 返回第六章 系統的實現本章主要是將本系統的一些主要運行界面和具體的源代碼列出來，供在使用時作為參考，同時也可以為以后修改和完善時提供幫助。主要窗口和代碼： 1、工程文件的主要代碼： 2、主窗口： 3、用戶登陸窗口 4、采購方案的輸入窗口 5、新購器具技術報告輸入 6、檢定方案輸入窗口 7、每月周檢輸入窗口 8、檢定記錄輸入窗口返回1、工程文件的主要代碼：begin Application.Initial

27、ize; startfrm:=Tstartfrm.Create(Application); startfrm.Top:=() div 2; startfrm.Left:=() div 2; startfrm.Show; startfrm.Update; while do Application.ProcessMessages; Application.Title:=計量管理信息系統; Application.CreateForm(Tmainfrm, mainfrm); Application.CreateForm(TDataModule1, DataModule1); Application.

28、Run;end.返回2、主窗口：涉及到的自定義函數，和主要程序的代碼：procedure Tmainfrm.FormCreate(Sender: TObject);/創立主窗體時的執行代碼begin displaylog:=true; selfclose:=false; log:=false; yhdl.Enabled:=true; zxyh.Enabled:=false; canuse(false,mainfrm.logpowercode); /StatusBar1.Panels0.Text:=; StatusBar1.Panels2.Text:=FormatDateTime( yyyy 年

29、 mm 月 dd 日 hh:mm:ss dddd,now); StatusBar1.Panels1.Text:= +當前無用戶登陸; WebBrowser1.Enabled:=false; WebBrowser1.Visible:=false;end;procedure Tmainfrm.FormCloseQuery(Sender: TObject; var CanClose: Boolean);關閉主窗體時執行的代碼begin /用戶關閉系統或未關閉系統的情況下關閉windows時提示用戶 if selfclose then begin CanClose:=true; exit; end;

30、if MessageDlg(你確實要退出計量管理信息系統嗎?,mtInformation,mbYesNoCancel,0)=mryes then CanClose:=true else CanClose:=false;end;procedure Tmainfrm.canuse(login: bool; powercode: integer);/實現菜單的動態改變可操作性begin if login=false then /沒有用戶登陸的情況 begin xtcsh.Enabled:=false; jlqjcggl.Enabled:=false; jdjhbzgl.Enabled:=false;

31、 bxtzdgl.Enabled:=false; jdgl.Enabled:=false; jlqjtzgl.Enabled:=false; yhgl.Enabled:=false; end else begin case powercode of 1:begin /超級用戶 登陸的情況 xtcsh.Enabled:=(mainfrm.loguser=administrator); jlqjcggl.Enabled:=true; cgjh.Enabled:=true; shcgjh.Enabled:=true; xgjlqjsr.Enabled:=true; xgjlqjcx.Enabled:=true; jdjhbzgl.Enabled:=true; bxtzdgl.Enabled:=true; jdgl.Enabled:=true; jlqjtzgl.Enabled:=true; yhgl.Enabled:=true; zcxyh.Enabled:=true; scyh.Enabled:=true; end; 2:begin /總工具室操作員 登陸的情況 xtcsh.Enabled:=false; jlqjcggl.Enabled:=true;