秦 威
地質(zhì)工作是一個(gè)對檔案資料依存度高的行業(yè),一切工作始于檔案資料,終于檔案資料。為便于對檔案資料的管理使用,需要一套檔案資料管理系統(tǒng)。該管理系統(tǒng)主要的功能是實(shí)現(xiàn)檔案資料的計(jì)算機(jī)日常管理等工作。
本系統(tǒng)采用Delphi 7+SQL Server2000企業(yè)版工具開發(fā)。首先為了使系統(tǒng)具有條理性,系統(tǒng)分為四大模塊:登錄模塊、系統(tǒng)管理模塊、查詢統(tǒng)計(jì)匯總模塊、借閱歸還模塊;其次,貫穿系統(tǒng)的是層級權(quán)限,這樣考慮是因?yàn)椴煌矸莸挠脩粜枰煌瑢哟涡畔⒓皺?quán)限;最后,具備人性化。比如給檔案管理者逾期信息及時(shí)自動(dòng)提醒功能等。
登錄模塊主要是賬號登錄和賬號申請。賬號登錄錯(cuò)誤超過三次自動(dòng)提示退出;賬號申請實(shí)行分層級,分權(quán)限功能,層級包括超級用戶、檔案管理、部門管理、一般用戶。不同層級權(quán)限是不同的,比如查詢權(quán)限,一般用戶級只能查那些資料能否借閱,但部門級可以查詢本部門未歸還資料,檔案管理級還可以查詢所有未歸還資料情況以及統(tǒng)計(jì)分析等等。

實(shí)現(xiàn)的部分語句如下:



系統(tǒng)管理模塊包括系統(tǒng)配置、賬號管理、資料管理,檔案管理權(quán)限者須先配置,比如出版社、部門、負(fù)責(zé)人等等信息。在配置管理中,特別要強(qiáng)調(diào)的是,為了保持?jǐn)?shù)據(jù)庫的一致性、完整性,不是隨意的刪除已建立的數(shù)據(jù),比如出版社、負(fù)責(zé)人等,因?yàn)閿?shù)據(jù)庫中這些關(guān)鍵性的信息是互相關(guān)聯(lián)的,比如負(fù)責(zé)人,雖然部門負(fù)責(zé)人更換了,但是該負(fù)責(zé)人曾經(jīng)審批的賬號、借閱信息等存在,所以不能刪除只能更新相應(yīng)的字段編號或?qū)顟B(tài)轉(zhuǎn)為無效。


實(shí)現(xiàn)的部分語句如下:

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

部分語句如下:

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

部分語句如下:

表的設(shè)計(jì)主要要考慮各類關(guān)系,達(dá)到數(shù)據(jù)的一致、完整統(tǒng)一。再一個(gè)就是提高前臺的效率,盡量縮小表的字段。表的關(guān)系主要是圍繞各類報(bào)告表,用戶表與之發(fā)生借閱關(guān)系,產(chǎn)生了借閱歸還表。圍繞這個(gè)核心,生成其他輔助數(shù)據(jù)庫表。
主要數(shù)據(jù)庫表如下:

用戶表tab_User

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

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

列名 數(shù)據(jù)類型 長度 允許空 備注Id int 4 編號 標(biāo)識BorrowID nvarchar 6 申請單編號BorrowTime DateTime 8 借閱時(shí)間Deadline Datetime 8 限定歸還日期(最晚一本時(shí)間)ReturnTime Datetime 8 歸還時(shí)間(最后一本歸還時(shí)間)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 借閱狀態(tài)(1歸還;0借出)DeptDateTime DateTime 8 部門審批時(shí)間(審批目的)

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