4.為以上建立的聯(lián)系設(shè)置參照完整性約束：更新規(guī)則為"級聯(lián)";刪除規(guī)則為"限制";插入規(guī)則為"限制"。

　　二、簡單應(yīng)用(2小題，每題20分，計(jì)40分)

　　在考生文件夾下完成如下簡單應(yīng)用：

　　1.建立查詢qq，查詢會(huì)員的會(huì)員號(來自Customer表)、姓名(來自Customer表)、會(huì)員所購買的商品名(來自article表)、單價(jià)(來自O(shè)rderItem表)、數(shù)量(來自O(shè)rderItem表)和金額(OrderItem.單價(jià) * OrderItem.數(shù)量)，結(jié)果不要進(jìn)行排序，查詢?nèi)ハ蚴潜韘s。查詢保存為qq.qpr，并運(yùn)行該查詢。

　　2.使用SQL命令查詢小于30歲(含30歲)的會(huì)員的信息(來自表Customer)，列出會(huì)員號、姓名和年齡，查詢結(jié)果按年齡降序排序存入文本文件cut_ab.txt中，SQL命令存入命令文件cmd_ab.prg。

　　解題思路：

　　第1題：建立查詢可以使用"文件"菜單完成，選擇文件--新建--查詢--新建文件，將"Customer"表，"article"表，"OrderItem"表添加到查詢設(shè)計(jì)器中(將"article"表和"OrderItem"表通過"商品號"字段建立關(guān)聯(lián)，將"Customer"表和"OrderItem"表通過"會(huì)員號"字段建立關(guān)聯(lián))，在"字段"選項(xiàng)卡選擇題面中要求的會(huì)員號、姓名、商品名、單價(jià)、數(shù)量字段，金額需要通過計(jì)算得到，在函數(shù)和表達(dá)式處輸入"OrderItem.單價(jià) * OrderItem.數(shù)量 as 金額"，單擊"添加"按鈕;單擊查詢菜單下的查詢?nèi)ハ颍x擇表，輸入表名ss，最后將查詢保存在qq.qpr文件中，并運(yùn)行該查詢。

　　第2題：SQL命令為：SELECT 會(huì)員號,姓名,年齡 FROM Customer WHERE 年齡<=30 order by 年齡 DESC TO FILE cut_ab.txt，然后將此命令保存在cmd_ab.prg文件中。

　　本題主要考核點(diǎn)：表單文件的創(chuàng)建、控件的屬性的修改、SQL語句運(yùn)用、表單的退出。

　　三、綜合應(yīng)用(1小題，計(jì)30分)

　　在考生文件夾下，完成如下綜合應(yīng)用(所有控件的屬性必須在表單設(shè)計(jì)器的屬性窗口中設(shè)置)：

　　設(shè)計(jì)一個(gè)名稱為myform的表單(文件名和表單名均為myform)，其中有一個(gè)標(biāo)簽Lable1(日期)、一個(gè)文本框Text1和兩個(gè)命令按鈕command1("查詢")和command2("退出")，如下圖所示：

　　然后在表單設(shè)計(jì)器環(huán)境下進(jìn)行如下操作：

　　1.將表單的標(biāo)題設(shè)置為"綜合應(yīng)用"。

　　2.將文本框的初始值設(shè)置為表達(dá)式date()。

　　3.設(shè)置"查詢"命令按鈕的Click的事件代碼，其功能是：根據(jù)文本框Text1中的輸入日期，查詢各會(huì)員在指定日期后(大于等于指定日期)簽訂的各商品總金額，查詢結(jié)果的字段包括"會(huì)員號"(來自Customer表)、"姓名"和"總金額"三項(xiàng)，其中"總金額"為各商品的數(shù)量(來自O(shè)rderitem表)乘以單價(jià)(來自Article表)的總和;查詢結(jié)果的各記錄按總金額升序排序;查詢結(jié)果存放到表dbfa.dbf中。

　　4.設(shè)置"退出"命令按鈕的Click的事件代碼，其功能是：關(guān)閉并釋放表單。

　　最后運(yùn)行表單，在文本框中輸入2003/03/08，并單擊"查詢"命令按鈕。

　　本題主要考核點(diǎn)：查詢文件的建立、利用SQL_SELECT語句建立查詢。

　　解題思路：

　　①在命令窗口輸入命令：CREATE FORM myform，打開表單設(shè)計(jì)器窗口。

　　②在表單上添加標(biāo)簽、文本框和命令按鈕，并進(jìn)行適當(dāng)?shù)牟贾煤痛笮≌{(diào)整。

　　③設(shè)置標(biāo)簽、"退出"命令按鈕、表單的Caption屬性值以及表單的Name屬性值。將"查詢"命令按鈕的Caption屬性值設(shè)置為"查詢(\　　④將文本框的Value屬性值設(shè)置為"=date()"。

　　⑤設(shè)置"查詢"按鈕的Click事件代碼：

　　SELECT Customer.會(huì)員號,Customer.姓名,sum(Orderitem.數(shù)量*Article.單價(jià)) as 總金額;

　　FROM customer,orderitem,article;

　　WHERE Article.商品號=Orderitem.商品號 AND Customer.會(huì)員號=Orderitem.會(huì)員號 AND;

　　Orderitem.日期>=ctod(thisform.Text1.Text);

　　ORDER BY 3 GROUP BY Customer.會(huì)員號;

　　INTO TABLE dbfa.dbf

　　⑥設(shè)置"退出"按鈕的Click事件代碼：THISFORM.RELEASE

　　⑦保存表單并運(yùn)行，在文本框中輸入03/08/2003，并單擊"查詢"命令按鈕。