综合应用（1小题，计30分）

在考生文件夹下创建一个下拉式菜单mymenu.mnx，并生成菜单程序

mymenu.mpr。运行该菜单程序时会在当前vfp系统菜单的末尾追加一个"考试"子菜

单，如下图所示。

菜单命令"计算"和"返回"的功能都通过执行过程完成。

菜单命令"计算"的功能如下：

(1) 用ALTER TABLE语句在order表中添加一个"总金额"字段，该字段为数值

型，宽度为7，小数位数为2。

(2) 根据orderitem表和goods表中的相关数据计算各订单的总金额（一个订

单的总金额等于它所包含的各商品的金额之和，每种商品的金额等于数量乘以单

价），并填入刚才建立的字段中。

菜单命令"返回"的功能是恢复标准的系统菜单。

菜单程序生成后，运行菜单程序并依次执行"计算"和"返回"菜单命令。

解题思路：

1. 建立菜单文件。 在“菜单设计器-mymenu.mnx”中，在“菜单名称”中输入“考试”，再单击“创建”按钮来建立子菜单，在“菜单名称”中输入“计算”，再移到下一个菜单项处中输入“返回”。选中“计算”子菜单项，在“结果”中选择“过程”并单击“创建”，在“菜单设计器-mymenu.mnx-统计 过程”中输入下列语句：

close data

alter table order add 总金额 N(7,2)

select 3

use goods

index on 商品号 to t1

select 2

use orderitem

set relation to 商品号 into c

index on 订单号 to t2

select 1

use order

set relation to 订单号 into b

go top

do while !eof()

ddh = 订单号

s = 0

select 2

do while 订单号=ddh

s = s + 数量 * goods.单价

skip

enddo

select 1

replace 总金额 with s

skip

enddo

use

select 2

use

select 3

use

4. 选中“返回”子菜单项，在“结果”中选择“过程”并单击“创建”，在“菜单设计-mymenu.mnx-返回过程”中输入下列语句：

set sysmenu nosave

set sysmenu to default

5. 单击“显示\常规选项”菜单项，在“常规选项”对话框的“位置”框中选中“追加”单选钮，再单击“确定”按钮。在“菜单设计器”窗口下，单击“菜单”菜单栏，选择“生成”菜单项，生成“mymenu.mpr”

文件。