書店調撥系統和業務查詢系統設計

楊海斌

江蘇省興化市運輸管理處，江蘇興化 225700

書店調撥系統和業務查詢系統設計

楊海斌

江蘇省興化市運輸管理處，江蘇興化 225700

新華書店業務量越來越大，原有的進書管理系統已經不能滿足日常業務的需要。本文針對業務調撥系統和業務查詢系統的設計進行了論述。

書店；業務；調撥；查詢；設計

新華書店的進書管理工作是書店各項業務的前提，隨著圖書業務量越來越大，原有的進書管理系統已經不能滿足日常業務的需要。為此，開發一套新的進書管理系統成為該店迫切的需要。本文針對業務調撥系統和業務查詢系統的設計，做詳細闡述。

1 業務調撥系統

業務調撥系統根據書店業務的需要，將新書調撥到各門市部，同時生成前臺POS機銷售數據，書店門市假定為：長安門市、牌樓門市、九頃門市、建行門市。

新建Form4，在窗體上放置7個TLable組件，分別設置其Caption屬性為：書名、業務科、批銷中心、長安門市、牌樓門市、九頃門市、建行門市。放置一個Ttable組件，設置TableName=Table1，Table1.DatabaseName=（mw），Table1.TableName=“業務 調撥”，Table1.Active=true。放置兩個按鈕組件，分別設置其Caption為“業務調撥”、“退出”。

“業務調撥”的響應代碼為：

上述程序中，使用Insert方法要在數據庫表格中先插入一個空記錄，即調用Ttable組件的Insert方法，然后，再依次添加該記錄的每一個字段，最后再用Post方法將記錄寫回到數據庫中去。

2 業務查詢系統

業務查詢系統克服了原來的查詢系統中用戶輸入負擔過重的缺點。新系統界面友好，用戶操作方便。

新建一個Form，放置一個Combobox組件、一個Edit組件、兩個button組件、一個TDBnavigator組件、一個TDBgrid組件、一個Tquery組件、一個Ttable組件、一個TDatasource組件。設置Combobox的屬性Caption為“請選擇你要查詢的內容”，Items屬性的值為“貨源”、“進書方式”、“到貨日期”、“發貨依據”、“新書名”、“書名”。設置Edit組件的Caption為“請輸入你要查詢的具體內容”。設置TDBnavigator組件和TDBgrid連接的數據庫名為mw，Datasource的Dataset屬性為Query1。設置Button.Caption=查詢。

這個子系統要實現在同一個數據庫的三個不同的表中不同字段進行動態查詢。所以各數據庫組件的DatabaseName統一設置為mw，而具體的表名應該在程序運行時動態設計。子系統設計思想是：根據用戶選擇的combobox的內容來確定具體的表名。例如：用戶選擇“貨源”、“進書方式”、“到貨日期” 、“發貨依據”，則表名為“業務清單”；選擇“新書名”，則表名為“新書”；選擇“書名”則表名為“業務調撥”。程序設計時必須先置Table1.Active=False，當選擇了具體的表之后，在置Table1.Active=True。查詢按鈕的響應代碼編寫思路如下：

3 結論

本系統的開發工具是Delphi6.0，這個優秀的面向對象開發工具提供了豐富的可視化組件庫（VCL）和強大的數據庫引擎Borland Data Engineer（BDE）通過BDE很容易鏈接本地（Access，FoxPro）或遠程數據庫服務器上的數據庫（SQL Server，Oracle等等）。經過測試，系統運行穩定，功能完善，符合要求。

[1]張錦芳.系統分析和設計[M].北京：北京航空航天大學出版社，1997.

[2]郭晶.Delphi 6編程指南[M].北京：電子工業出版社，2002.

TP315

A

1674-6708（2011）48-0066-01