计算机等级考试二级VFP上机试题及解题思路(17)

　　三、综合应用(1小题，计30分)

　　当order_detail表中的单价修改后，应该根据该表的"单价"和"数量"字段修改

　　order_list表的总金额字段，现在编写程序实现此功能，具体要求和注意事项

　　如下：

　　(1) 根据order_detail表中的记录重新计算order_list表的总金额字段的值;

　　(2) 一条order_list记录可以对应几条order_detail记录;

　　(3) 在编程前应保证在基础操作中正确地建立了order_list表，在简单应用中为该表追加了记录(注意只能追加一次);

　　(4) 最后将order_list表中的记录按总金额降序排序存储到od_new表中(表结构与order_list表完全相同);

　　(5) 将程序保存为prog1.prg文件。

　　本题主要考核点：

　　程序的建立方法、程序中循环结构的使用、SQL查询语句的使用、记录的修改方法等知识点

　　本题解题思路：

　　第一步：打开项目客户管理，在项目管理器中先选择"代码"标签，再选择"程序"，最后点击"新建"按钮。

　　第二步：在弹出的窗中中输入以下代码：

　　SET TALK OFF &&在程序运行模式下关闭命令结果的显示

　　SET SAFETY ON &&关闭文件重名时的提示

　　CLOSE ALL

　　SELECT 订单号,SUM(数量*单价) AS 总金额;

　　FROM ORDER_DETAIL;

　　GROUP BY 订单号;

　　INTO CURSOR CurTable

　　&&这里首先得到每一个订单的总金额，由于每一个订单对应有多项记录，

　　&&所以我们要得到每一个订单的总金额需要用到SUM函数，SUM(数量*单价) AS 总金额

　　&&放在SELECT的后面，并和订单号用逗号隔开;要以订单号做为分组的依据，将订单号放在

　　&&ORDER BY 的后面;将结果集放入一个临时表CurTable中用INTO CURSOR CurTable

　　OPEN DATABASE 订货管理

　　&&打开数据库文件

　　SELECT 2

　　&&选择工作区

　　USE ORDER_LIST

　　&&在新的工作区中打开表ORDER_LIST

　　DO WHILE NOT EOF() &&遍历ORDER_LIST中的每一条记录

　　SELECT CurTable.总金额 FROM CurTable;

　　WHERE CurTable.订单号=order_list.订单号;