职工.DBF参考数据如下

职工号 02356 02528 01023 01035 02526 01234 02458 02636 部门号 11 12 11 12 21 21 22 22 姓名 周小杰 王雨 李斯 蔡英 刘红 李玛丽 李新 郑然 性别 男 女 男 女 女 女 男 女 职称 讲师 副教授 副教授 讲师 副教授 副教授 教授 助教 出生日期 12/25/70 03/12/60 07/08/61 09/18/76 12/25/70 05/23/70 03/11/58 06/19/80 婚否 .T. .T. .T. .F. .T. .T. .T. .F. 工资 863.00 1024.00 1024.00 658.00 863.00 863.00 1146.00 569.00 工资.DBF参考数据如下

职工号 02356 02528 01023 01035 02526 01234 02458 02636 基本工资 582.00 662.00 628.00 546.00 606.00 606.00 748.00 464.00 津贴 213.5 283.0 265.0 193.0 223.0 223.0 302.0 143.0 奖金 115 144 136 96 115 115 156 78 会费 2.91 3.31 3.14 2.73 3.03 3.03 2.74 2.32 公积金 90 140 120 80 120 120 160 70 2.2 查询表数据

以下各个查询都要求在实验报告中给出详细的SQL查询语句。 ① 查询部门代码第一个字符为2的部门信息

② 查询职工表中70年(含70年)以前出生的男职工的姓名和工资。 ③ 查询职工表中1960到1970年之间的出生的职工姓名和出生日期。 ④ 统计职工表中记录数和部门数。 ⑤ 统计职工表中工资总和及平均工资。

⑥ 按部门统计各部门人数、工资和、最高工资、最低工资、平均工资。 ⑦ 查询职工表中副教授以上的记录，并按工资降序排列，工资相同时按出生日期升序排列。 ⑧ 查询男职工的姓名和工资信息。

⑨ 查询所有职工的姓名、所在部门名称和基本工资。

41

《机械工程数据库》实验指导 第四次实验 VFP程序设计

实验13：顺序结构和分支结构程序设计 1．实验目的：

? ? ? ?

掌握常用的交互语句和移动指针命令的运用。 掌握编写顺序结构程序的思路和方法。

掌握使用if…else…endif语句编写程序的方法。 掌握使用do case … endcase语句编写程序的方法。

2．实验内容：

(1)试编写一个程序XSWH.PRG，能根据表“学生.DBF”(实验4建立的数据表)的记录号来修改某学生的学号和姓名。

42

【提示】：本实验的重点是顺序结构程序的编写及绝对移动指针命令和格式输入语句的运用。题目要求根据用户指定的记录号来修改学生的学号和姓名，则程序中需要把用户输入的记录号赋给某个变量存储，然后把指针移动到该变量所指的记录上，再用交互语句SAY语句把用户输入的姓名和学号赋给该记录的相应字段变量(即姓名和学号)，从而修改了指定记录的相应字段，完成程序功能。

(2)有如下一段程序代码，其功能是根据用户输入的考试成绩来显示相应的等级成绩。试使用do case … endcase语句编写程序，完成上述功能。 Set talk off Clear

Input “请输入考试成绩：” to cj

dj=iif(cj<60,”不合格”, iif(cj>=90, “优秀”, “合格”)) ?”成绩等级：”, dj Set talk on

43

44