數(shù)據(jù)庫原理與應(yīng)用-Visual FoPro（第2版）第16章

第16章 數(shù)據(jù)庫應(yīng)用系統(tǒng)設(shè)計實例

16.1 需求分析16.2 數(shù)據(jù)庫設(shè)計16.3 應(yīng)用程序設(shè)計與實現(xiàn)16.4 報表16.5應(yīng)用程序連編與發(fā)布本章介紹一個小型數(shù)據(jù)庫應(yīng)用系統(tǒng)實例——“小書店經(jīng)營管理信息系統(tǒng)”的設(shè)計與實現(xiàn)。16.1需求分析系統(tǒng)功能：實現(xiàn)超市型小書店的日常經(jīng)營管理，具體功能如下：（1）進(jìn)書登記（2）售書登記（3）查詢統(tǒng)計與報表（4）購書咨詢開發(fā)目標(biāo)：開發(fā)一個運行于單臺微機(jī)環(huán)境、基于Windows系統(tǒng)的小型數(shù)據(jù)庫應(yīng)用系統(tǒng)——“小書店經(jīng)營管理信息系統(tǒng)”16.2數(shù)據(jù)庫設(shè)計（一）1．?dāng)?shù)據(jù)庫概念結(jié)構(gòu)設(shè)計

開單人總金額購書單位開單日期單據(jù)號庫存書數(shù)量售書單據(jù)售書nm書號書名出版社作者定價進(jìn)書日期進(jìn)價備注庫存數(shù)封面16.2數(shù)據(jù)庫設(shè)計（二）2．?dāng)?shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計

由3個關(guān)系組成：（1）庫存（書號，書名，作者，出版社，進(jìn)書日期，定價，進(jìn)價，庫存數(shù)，備注，封面）主鍵是書號。（2）單據(jù)（單據(jù)號,開單日期,購書單位,開單人,總金額）主鍵是單據(jù)號。（3）售書（單據(jù)號,書號，數(shù)量）主鍵是（單據(jù)號,書號）。外鍵是單據(jù)號、書號。

16.2數(shù)據(jù)庫設(shè)計（三）3．表結(jié)構(gòu)設(shè)計

“庫存”表的結(jié)構(gòu)

“單據(jù)”表的結(jié)構(gòu)“售書”表的結(jié)構(gòu)（2）自由表（1）數(shù)據(jù)庫表“temp庫存”表的結(jié)構(gòu)：與“庫存”表相同“售書”表的結(jié)構(gòu)16.2數(shù)據(jù)庫設(shè)計（四）4．創(chuàng)建數(shù)據(jù)庫與表（2）在項目中創(chuàng)建數(shù)據(jù)庫“書店信息”。在數(shù)據(jù)庫中創(chuàng)建3個表“庫存”、“單據(jù)”和“售書”。以“庫存”表為父表、以“售書”表為子表、按“書號”字段建立一對多永久關(guān)系；以“單據(jù)”表為父表、以“售書”表為子表、按“單據(jù)號”字段建立一對多永久關(guān)系。（1）建立“書店管理”項目，建立項目文件夾“f:\書店管理”（3）在項目中創(chuàng)建自由表“temp庫存”和“temp銷售”。16.3應(yīng)用程序設(shè)計與實現(xiàn)

16.3.1應(yīng)用程序的邏輯結(jié)構(gòu)（一）“進(jìn)書登記”表單“售書”表單“購書咨詢”表單“庫存查詢”表單“銷售查詢統(tǒng)計”表單退出系統(tǒng)“主窗口”表單，顯示本系統(tǒng)菜單“歡迎”表單主文件（main.prg）16.3.1應(yīng)用程序的邏輯結(jié)構(gòu)（二）1．項目主文件（main.prg）代碼

2．菜單

SETTALKOFFDOFORM歡迎READEVENTS16.3.2“歡迎”表單

“歡迎”表單是本系統(tǒng)運行時執(zhí)行的第一個表單，它顯示“歡迎使用”的字樣。當(dāng)定時時間到、按下任意鍵或用鼠標(biāo)雙擊表單時將關(guān)閉該表單。當(dāng)該表單釋放時轉(zhuǎn)向執(zhí)行“主窗口”表單。表單設(shè)計的主要技巧：采用頂層表單：Caption設(shè)置為“歡迎使用書店管理信息系統(tǒng)”，表單分兩步釋放（1）設(shè)置“Form1”的KeyPress事件和DblClick事件、Timer1的Timer事件代碼，相同為：thisform.release

（2）設(shè)置“Form1”的Destroy事件代碼

thisform.hidedoform主窗口

16.3.3“主窗口”表單

“主窗口”表單是本系統(tǒng)的主界面，它顯示本系統(tǒng)的菜單。使用關(guān)閉按鈕或菜單中“退出”菜單項可以關(guān)閉該表單，并結(jié)束本系統(tǒng)的執(zhí)行。表單設(shè)計的主要技巧：采用頂層表單：Caption設(shè)置為“書店管理信息系統(tǒng)”在“Form1”的Init事件代碼調(diào)用菜單do菜單.mprwiththis,.t.“Form1”的Destroy事件代碼：quit16.3.4“進(jìn)書登記”表單

如果單擊“登記下一本”按鈕，就可以在各個文本框中輸入新到書的信息。表單上的表格中能顯示輸入記錄，但不能編輯記錄。表單設(shè)計的主要技巧：數(shù)據(jù)環(huán)境的InitialSelectedAlias屬性設(shè)置為“temp庫存”表，各控件的數(shù)據(jù)源也是“temp庫存”表或其中字段屬性設(shè)置與代碼與12.5節(jié)實例表單完全類似在“退出”按鈕的Click事件代碼中將檢查數(shù)據(jù)輸入有無錯誤，若有錯誤，則提示用戶核對數(shù)據(jù)。若無錯誤，將查找是不是現(xiàn)存書。若是現(xiàn)存書，則增加“庫存”表的該書數(shù)量，否則，將該書添加到“庫存”表中16.3.5“售書”表單（一）

操作：當(dāng)該表單運行時，會自動生成單據(jù)號和開單日期。該表單是銷售圖書界面若單擊“增加”按鈕，則會在表格中增加一個空行。此時若單擊書號列的單元格，就可以從當(dāng)前存書列表中選擇一個書號。當(dāng)選擇書號之后，該書號對應(yīng)圖書的書名和單價就會顯示出來，用戶只需輸入售書數(shù)量即可。單擊“數(shù)據(jù)核對與金額合計”按鈕，隨時進(jìn)行金額合計16.3.5“售書”表單（二）

表單設(shè)計的主要技巧：將“Dataenvironment”對象的InitialSelectedAlias屬性設(shè)置為“temp銷售”

從數(shù)據(jù)環(huán)境中拖動“temp銷售”表到表單上，形成表格對象。將表格的DeleteMark設(shè)置為.F.將一個組合框添加到表格中的第一列中，并將它設(shè)置為該列的CurrentControl屬性，該列的Sparse設(shè)置為.T.。將組合框的RowSource設(shè)置為“庫存”表的“書號”字段，ControlSource為“temp銷售”表的“書號”字段。“Combo1”的Click事件代碼replace書名

with庫存.書名replace單價

with庫存.定價thisform.refresh在“數(shù)據(jù)核對與金額合計”按鈕與“打印預(yù)覽單據(jù)”按鈕的Click事件代碼中都將檢查有在該銷售中某書的數(shù)量合計是否大于庫存，即數(shù)據(jù)輸入錯誤。在“退出”按鈕的Click事件代碼中首先詢問該單據(jù)是否有效，無效即表示放棄本次銷售，若有效，則向下進(jìn)行Fprint的值用于檢查是否已核對數(shù)據(jù)，要求必須已核對；將本次銷售信息記錄在“單據(jù)”表和“售書”表中，并修改庫存書的數(shù)量。

16.3.6“庫存清單”表單

該表單顯示所有庫存圖書列表及統(tǒng)計信息。若單擊“打印預(yù)覽”按鈕，可以預(yù)覽（打?。皫齑媲鍐巍眻蟊?。先設(shè)計“庫存清單”報表。表單設(shè)計的要點：數(shù)據(jù)環(huán)境中添加“庫存”表，將表的Order屬性設(shè)置為“書號”。從數(shù)據(jù)環(huán)境中拖動“庫存”表到表單上，形成表格對象，設(shè)置為只讀狀態(tài)。將各文本框設(shè)置為只讀?？偨痤~為：sum(庫存數(shù)*進(jìn)價)16.3.7“購書咨詢”表單

該表單用于為用戶提供購書咨詢，可以按書號、書名、作者或出版社查詢書店中有無符合查詢條件的圖書，也可以實現(xiàn)這四種條件的組合查詢。表單設(shè)計的要點：數(shù)據(jù)環(huán)境中添加“庫存”表，將表的Order屬性設(shè)置為“書號”。從數(shù)據(jù)環(huán)境中拖動“庫存”表到表單上，形成表格對象。將表格的DeleteMark設(shè)置為.F.，ReadOnly設(shè)置為.T.“Form1”的Init事件代碼thisform.grd1.recordsource=""在“查詢”按鈕的Click事件代碼中，根據(jù)4個復(fù)選框的選中狀態(tài)，將各個條件拼成一條select語句，保存在s1中，然后執(zhí)行該語句，結(jié)果在表格中顯示，代碼如下：&s1thisform.grd1.recordsource='書信息'16.3.8“銷售查詢統(tǒng)計”表單（一）

該表單用于對銷售情況做查詢統(tǒng)計。

由2個頁面組成頁面1

頁面2

16.3.8“銷售查詢統(tǒng)計”表單（二）

在“查詢”按鈕的Click事件代碼中，判斷單選按鈕的選中狀態(tài)，然后執(zhí)行相應(yīng)的查詢語句，結(jié)果在表格中顯示。其中計算利潤最高的前10種圖書的語句中的主要內(nèi)容是：selecttop10sum(售書.數(shù)量)*(庫存.定價-庫存.進(jìn)價)as利潤；groupby庫存.書號;orderby1descintocursor查詢結(jié)果表單數(shù)據(jù)環(huán)境：頁面1的設(shè)計要點：

16.3.8“銷售查詢統(tǒng)計”表單（三）（2）創(chuàng)建“銷售視圖”：用于和細(xì)節(jié)視圖形成1：N關(guān)系的1方CREATESQLVIEW銷售視圖

ASSELECT售書.書號,SUM(售書.數(shù)量)AS銷售數(shù)量,庫存.書名,庫存.作者,;庫存.出版社,庫存.進(jìn)書日期,庫存.定價,庫存.進(jìn)價,庫存.庫存數(shù);FROM書店信息!庫存

INNERJOIN書店信息!售書

INNERJOIN書店信息!單據(jù);ON單據(jù).單據(jù)號=售書.單據(jù)號

ON庫存.書號=售書.書號;WHERE單據(jù).開單日期>="d1"AND單據(jù).開單日期<="d2";GROUPBY售書.書號;ORDERBY2DESC（1）創(chuàng)建“細(xì)節(jié)視圖”：用于和銷售視圖形成1：N關(guān)系的N方CREATESQLVIEW細(xì)節(jié)視圖

ASSELECT售書.單據(jù)號,售書.數(shù)量,單據(jù).開單日期,單據(jù).購書單位,單據(jù).開單人,;單據(jù).總金額,售書.書號;FROM書店信息!單據(jù)

INNERJOIN書店信息!售書

ON單據(jù).單據(jù)號=售書.單據(jù)號;ORDERBY售書.書號（3）創(chuàng)建“銷售總視圖”：用做銷售報表的數(shù)據(jù)源CREATESQLVIEW銷售總視圖

ASSELECT售書.單據(jù)號,售書.書號,庫存.書名,售書.數(shù)量,單據(jù).開單日期,;單據(jù).購書單位,單據(jù).開單人;FROM書店信息!庫存

INNERJOIN書店信息!售書

INNERJOIN書店信息!單據(jù);ON單據(jù).單據(jù)號=售書.單據(jù)號

ON庫存.書號=售書.書號;WHERE單據(jù).開單日期>="d1"AND單據(jù).開單日期<="d2";ORDERBY售書.書號頁面2的設(shè)計要點：

1.創(chuàng)建三個視圖16.3.8“銷售查詢統(tǒng)計”表單（四）頁面2的設(shè)計要點：

2.在“查詢”按鈕的Click事件代碼中，如下代碼用于關(guān)閉細(xì)節(jié)視圖和銷售視圖?？刂仆粋€表或視圖以多個別名在多個工作區(qū)同時打開ifused('細(xì)節(jié)視圖')select細(xì)節(jié)視圖use

endififused('銷售視圖')select銷售視圖use3.在“查詢”按鈕的Click事件代碼中，在銷售視圖和細(xì)節(jié)視圖間建立1：N臨時關(guān)系，并分別將銷售視圖和細(xì)節(jié)視圖作為兩個表格的數(shù)據(jù)源，這樣當(dāng)選擇左邊表格的一行時，右邊表格中顯示該書在那些單據(jù)中賣過“退出”按鈕的Click事件代碼中用命令關(guān)閉數(shù)據(jù)庫，是為了關(guān)閉視圖closedatabasethisform.release16.4報表

16.4.1“庫存清單”報表“庫存清單”報表預(yù)覽結(jié)果

設(shè)計“庫存清單”報表16.4.2“單據(jù)”報表“單據(jù)”報表預(yù)覽結(jié)果

設(shè)計“單據(jù)”報表說明：在運行“售書”表單時，單擊“打印預(yù)覽單據(jù)”按鈕，才可以預(yù)覽（打?。┰搱蟊?；報表中域控件“pa單據(jù)號”、“pa開單人”、“pa開單日期”、“pa購書單位”和“pa總金額”的值由“售書”表單提供。16.4.3“銷售報表”報表“銷售報表”報表預(yù)覽結(jié)果

設(shè)計“銷售報表”報表說明：報表數(shù)據(jù)環(huán)境中是“銷售總視圖”；報表中域控件“d1”、“d2”、“zje”和“l(fā)r”的值由“銷售查詢統(tǒng)計”表單提供。16.5應(yīng)用程序連編與發(fā)布（一）1．項目連編連編之前，需要將程序代碼中使用文件絕對路徑的地方進(jìn)行修改，改為使用相對路徑。這樣便于以后發(fā)布和安裝應(yīng)用程序。為該應(yīng)用程序附加圖標(biāo)單擊項目管理器中的“連編按鈕”對“書店管理”項目進(jìn)行連編，形成可執(zhí)行文件“書店管理.e