秦 威
地質工作是一個對檔案資料依存度高的行業,一切工作始于檔案資料,終于檔案資料。為便于對檔案資料的管理使用,需要一套檔案資料管理系統。該管理系統主要的功能是實現檔案資料的計算機日常管理等工作。
本系統采用Delphi 7+SQL Server2000企業版工具開發。首先為了使系統具有條理性,系統分為四大模塊:登錄模塊、系統管理模塊、查詢統計匯總模塊、借閱歸還模塊;其次,貫穿系統的是層級權限,這樣考慮是因為不同身份的用戶需要不同層次信息及權限;最后,具備人性化。比如給檔案管理者逾期信息及時自動提醒功能等。
登錄模塊主要是賬號登錄和賬號申請。賬號登錄錯誤超過三次自動提示退出;賬號申請實行分層級,分權限功能,層級包括超級用戶、檔案管理、部門管理、一般用戶。不同層級權限是不同的,比如查詢權限,一般用戶級只能查那些資料能否借閱,但部門級可以查詢本部門未歸還資料,檔案管理級還可以查詢所有未歸還資料情況以及統計分析等等。

實現的部分語句如下:



系統管理模塊包括系統配置、賬號管理、資料管理,檔案管理權限者須先配置,比如出版社、部門、負責人等等信息。在配置管理中,特別要強調的是,為了保持數據庫的一致性、完整性,不是隨意的刪除已建立的數據,比如出版社、負責人等,因為數據庫中這些關鍵性的信息是互相關聯的,比如負責人,雖然部門負責人更換了,但是該負責人曾經審批的賬號、借閱信息等存在,所以不能刪除只能更新相應的字段編號或將狀態轉為無效。


實現的部分語句如下:

查詢統計匯總模塊主要從三方面來進行設計的,一是從檔案管理者角度來進行的統計分析資料的借閱情況,比如所有資料的逾期情況,各部門資料的借閱情況、當年資料借閱情況等等,便于年度工作分析總結。;二是從部門角度出發了解部門資料借閱歸還等情況;三是從資料使用這角度出發的資料借閱與歸還查詢。

部分語句如下:

借閱歸還模塊,主要是按照工作流程,其中要檢查有無逾期資料情況,同時借閱須各級審核。

部分語句如下:

表的設計主要要考慮各類關系,達到數據的一致、完整統一。再一個就是提高前臺的效率,盡量縮小表的字段。表的關系主要是圍繞各類報告表,用戶表與之發生借閱關系,產生了借閱歸還表。圍繞這個核心,生成其他輔助數據庫表。
主要數據庫表如下:

用戶表tab_User

列名 數據類型 長度 允許空 備注DeptDateTime datetime 8 部門審批時間DeptLeader Smallint 2 部門負責人編號ArchiveDateTime datetime 8 檔案館審批時間WorkerID smallint 2 檔案館操作人員編號State Bit 1 狀態(0:正常,1:刪除)User_Level smallint 2用戶層級(0普通,1部門,2館,3超級)權限(0 普通,1部門,2館,3超級)LastLoginDatetime datetime 8 上次登錄時間AppID Int 4 申請單編號Author nvarchar 10

地質報告表tab_GeoReport
借閱歸還表 tab_BorrowReturn(拆分成一般信息、資料信息表,資料歸還在一般信息表中,申請單編號為連接字段)一次審批借閱,多次歸還模式。

列名 數據類型 長度 允許空 備注Id int 4 編號 標識BorrowID nvarchar 6 申請單編號BorrowTime DateTime 8 借閱時間Deadline Datetime 8 限定歸還日期(最晚一本時間)ReturnTime Datetime 8 歸還時間(最后一本歸還時間)BorrowPurpose Nvarchar 50 借閱目的UserID Smallint 2 借閱人編號DeptID smallint 2 所屬部門編號Fdept Nvarchar 50 外單位名稱Fuser Nvarchar 20 外單位借閱人姓名Address Nvarchar 50 外單位地址Phone Nvarchar 11 外單位電話Remark nvarchar 50 備注BorrowReturnState Bit 1 借閱狀態(1歸還;0借出)DeptDateTime DateTime 8 部門審批時間(審批目的)

列名 數據類型 長度 允許空 備注DeptLeader Smallint 2 部門負責人編號BworkerID Smallint 2 借閱操作人員編號RworkerID Smallint 2 歸還操作人員編號(最后一本)Flag bit AppID Int 1 4外單位標志(1是)申請單編號
本系統經過實踐的驗證,較好的發揮了管理作用,提高了工作效率,將原來看不見摸不著的檔案管理狀態,直觀量化具體化了,有助于極大的提高地質檔案工作水平。