計算機(jī)等級考試二級VFP上機(jī)試題及解題思路(10)

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

　　在考生文件夾下有股票管理數(shù)據(jù)庫stock_4，數(shù)據(jù)庫中有stock_mm表和stock_cc表，stock_mm的表結(jié)構(gòu)是股票代碼C(6)、買賣標(biāo)記L(.T.表示買進(jìn)，.F.表示賣出)，單價N(7.2)、本次數(shù)量N(6)。stock_cc的表結(jié)構(gòu)是股票代碼C(6)，持倉數(shù)量N(8)。 stock_mm表中一只股票對應(yīng)多個記錄，stock_cc表中一只股票對應(yīng)一個記錄(stock_cc表開始時記錄個數(shù)為0)。

　　請編寫并運行符合下列要求的程序：

　　設(shè)計一個名為menu_lin的菜單，菜單中有兩個菜單項"計算"和"退出"。

　　程序運行時，單擊"計算"菜單項應(yīng)完成下列操作：

　　(1)根據(jù)stock_mm統(tǒng)計每只股票的持倉數(shù)量，并將結(jié)果存放到stock_cc表。計算方法：買賣標(biāo)記為.T.(表示買進(jìn))，將本次數(shù)量加到相應(yīng)股票的持倉數(shù)量;買賣標(biāo)記為.F.(表示賣出)，將本次數(shù)量從相應(yīng)股票的持倉數(shù)量中減去。

　　(注意：stock_cc表中的記錄按股票代碼從小到大順序存放)。

　　(2)將stock_cc表中持倉數(shù)量最少的股票信息存儲到自由表stock_x中(與

　　stock_cc表結(jié)構(gòu)相同)。

　　單擊"退出"菜單項，程序終止運行。

　　本題主要考核點：

　　菜單的建立、結(jié)構(gòu)化查詢語言(SQL)中的聯(lián)接查詢、查詢的排序、臨時表的概念、查詢結(jié)果的去向等知識點。

　　本題解題思路:

　　第一步：利用菜單設(shè)計器定義兩個菜單項，在菜單名稱為"計算"的菜單項的結(jié)果列中選擇"過程"，并通過單擊"編輯"按鈕打開一個窗口來添加"計算"菜單項要執(zhí)行的命令。在菜單名稱為"退出"的菜單項的結(jié)果列中選擇"命令"，并在后面的"選項"列中輸入以下退出菜單的命令：SET SYSMENU TO DEFAULT

　　第二步：在單擊"計算"菜單項后面的"編輯"按鈕所打開的窗口中添加如下的過程代碼：

　　SET TALK OFF &&在程序中常常要關(guān)閉命令結(jié)果的顯示

　　OPEN DATABASE STOCK_4 &&打開數(shù)據(jù)庫文件STOCK_4

　　SELECT 股票代碼,SUM(本次數(shù)量) AS 持倉數(shù)量 FROM STOCK_MM;

　　WHERE 買賣標(biāo)記 GROUP BY 股票代碼;

　　INTO CURSOR CurTable1

　　&&

　　SELECT 股票代碼,SUM(本次數(shù)量) AS 持倉數(shù)量 FROM STOCK_MM;

　　WHERE NOT 買賣標(biāo)記 GROUP BY 股票代碼;

　　INTO CURSOR CurTable2

　　SELECT CurTable1.股票代碼,(CurTable1.持倉數(shù)量-CurTable2.持倉數(shù)量) AS 持倉數(shù)量;

　　FROM CurTable1,CurTable2 ;

　　WHERE CurTable1.股票代碼=CurTable2.股票代碼;

　　ORDER BY CurTable1.股票代碼;

　　INTO ARRAY AfieldsValue

　　&&由于每種股票的買進(jìn)的數(shù)量的和與賣出的數(shù)量的和在兩個不同的臨時表CurTable1和

　　&&CurTable2中。因此要想得到兩者之間的差，需要進(jìn)行聯(lián)接查詢，可以通過"股票代碼"來

　　&&做為聯(lián)接的條件，置于WHERE的后面;可以用ORDER BY 子句來確定查詢的排序依據(jù)，

　　&&這里以股票代碼的升序進(jìn)行排序：ORDER BY 股票代碼;可以利用INTO ARRAY 數(shù)組名子句

　　&&將SELECT語句的查詢結(jié)果放在一個數(shù)組中，以備后面的程序利用

　　DELETE FROM STOCK_CC

　　&&刪除STOCK_CC表中以前的記錄

　　&&DELETE SQL語句可以將滿足指定條件的記錄加上刪除標(biāo)記

　　&&DELETE FROM [DatabaseName!]TableName

　　&&[WHERE FilterCondition1 [AND | OR FilterCondition2 ...]]

　　INSERT INTO STOCK_CC FROM ARRAY AfieldsValue

　　&&將所得到每支股票的代碼和持倉數(shù)量的數(shù)組插入到表STOCK_CC中

　　&&INSERT SQL語句可以向指定的表追加一條新的記錄

　　&&INSERT 可以直接將一個數(shù)組中的值做為記錄值追加到表中，

　　&&利用FROM ARRAY 數(shù)組變量名來實現(xiàn)

　　CLOSE ALL

　　USE STOCK_CC

　　PACK

　　&&物理刪除加上刪除標(biāo)記的記錄

　　USE

　　SELECT * TOP 1 FROM STOCK_CC ORDER BY 持倉數(shù)量 INTO TABLE STOCK_X

　　&&SELECT語句中可以通過TOP來限制返回結(jié)果集中行數(shù) TOP n[PERCENT] n指定返回的行數(shù)。&&如果未指定 PERCENT，n 就是返回的行數(shù)。如果指定了 PERCENT，n 就是返回的結(jié)果集行的&&百分比;INTO TABLE 表名 可以將結(jié)果集生成一個表

　　SET TALK ON

　　第三步：保存所編輯的菜單為menu_lin.mnx，并生成菜單menu_lin.mpr,運行。