三、
1. 建立菜單文件
CREATE MENU mymenu
在“新建菜單”對話框中,單擊“菜單”按鈕。
2. 在“菜單設計器-mymenu.mnx”中,在“菜單名稱”中輸入“考試”,再單擊“創(chuàng)建”按鈕來建立子菜單,在“菜單名稱”中輸入“計算”,再移到下一個菜單項處中輸入“返回”。
3. 選中“計算”子菜單項,在“結果”中選擇“過程”并單擊“創(chuàng)建”,在“菜單設計器-mymenu.mnx-統(tǒng)計 過程”中輸入下列語句:
close data
create table tablethree(商品名 C(20),總金額 N(7,2))
use
select 1
use tablethree
select 4
use order
index on 訂單號 to n1
select 3
use orderitem
index on 商品號 to n2
set relation to 訂單號 into d
select 2
use goods
index on 商品名 to n3
set rela to 商品號 into c
go top
do while .not.eof()
h = 商品號
j = 單價
n = 商品名
s = 0
select 3
do while 商品號=h
if year(order.簽訂日期)=2001
s=s+數(shù)量*j
endif
skip
enddo
select 1
append blank
repl 商品名 with n,總金額 with s
select 2
skip
enddo
close data
4. 選中“返回”子菜單項,在“結果”中選擇“過程”并單擊“創(chuàng)建”,在“菜單設計器-mymenu.mnx-返回 過程”中輸入下列語句:
set sysmenu nosave
set sysmenu to default
5. 單擊“顯示\常規(guī)選項”菜單項,在“常規(guī)選項”對話框的“位置”框中選中“追加”單選鈕,再單擊“確定”按鈕。
6. 在“菜單設計器”窗口下,單擊“菜單”菜單欄,選擇“生成”菜單項,生成“mymenu.mpr”文件。
相關鏈接:北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |