【正文】
總金額 with *數(shù)量 do while .T. accept 請(qǐng)輸入訂單號(hào): to ddh locate for 訂單號(hào) =ddh ? ==========查詢結(jié)果 ========== ? 商品名稱 單價(jià) 數(shù)量 總金額 do while found() ? , , 數(shù)量 , 總金額 continue enddo wait 繼續(xù)查詢嗎( Y/N)? to yn if upper(yn)=N exit endif enddo close databases * []編寫(xiě)程序(文件名: ) ?SQL查詢 SELECT , , ,。 , 。 FROM xscjzk INNER JOIN xjxx。 INNER JOIN dm_yx 。 ON = 。 ON = 。 WHERE = 動(dòng)科院 []編寫(xiě)程序(文件名: ) use cj5 ?打開(kāi)表 ?數(shù)據(jù)處理 — 統(tǒng)計(jì),顯示 1. 從鍵盤(pán)上輸入查詢的學(xué)號(hào),能查詢?cè)撏瑢W(xué)的學(xué)號(hào)、平均成績(jī) 2. 程序要求能反復(fù)查詢輸出,其輸出格式如下: 。 do while .T. accept 請(qǐng)輸入查詢的學(xué)號(hào): to xh average 成績(jī) to pj for 學(xué)號(hào) =xh ? 學(xué)號(hào): , xh, 平均成績(jī): , pj wait 繼續(xù)查詢嗎( Y/N)? to yn if upper(yn)=N exit endif enddo ?關(guān)閉表 close databases clear set talk off set safety off use cj5 do while .T. accept 請(qǐng)輸入查詢的學(xué)號(hào): to xh average 成績(jī) to pj for 學(xué)號(hào) =xh ? 學(xué)號(hào): , xh, 平均成績(jī): , pj wait 繼續(xù)查詢嗎( Y/N)? to yn if upper(yn)=N exit endif enddo close databases *