第1套 有两个数据表: 学生信息表(XS.DBF)和学生成绩表(CJ.DBF) 。其数据形式如下: 学生信息表(XS.DBF) 考 号 姓 名 07020104 李 萍 07040109 黄 程 07030106 王 军 07020132 周小丽 07050223 程 成 07010213 张 伟 学生成绩表(CJ.DBF) 上机成绩 成绩合格否 优 .F. 缺考 .F. 优 .F. 及格 不及格 及格 .F. .F. .F.
考 号 07010213 07030106 07040109 07020132 07050223 07020104
笔试成绩 86 45 91 74 79 57
COM-SQL711.PRG .PRG, 2、建立程序文件 COM-SQL711.PRG,要求将完成下列各小题任务的 VFP 数据表操作命令或 VFPVFP-SQL 命令写在该程序文件中。 命令写在该程序文件中。在程序首行用注释语句注明考生和准考证号, 在程序首行用注释语句注明考生和准考证号,并用注 释语句标注小题号。 30 分) 释语句标注小题号。 (3 ( (1)正确修改每个学生的“成绩合格否”字段,并填入学生成绩表 CJ.DBF 中。规定笔试 成绩<60 或上机成绩为“缺考”或“不及格” ,则该字段值为.F.,否则为.T.; (2)在学生成绩表 CJ.DBF 中,查询并显示成绩合格学生的考号、、笔试成绩和上机 成绩; (3)逻辑删除学生成绩表 CJ.DBF 中,上机考试缺考的考生;
(1)VFP 命令:USE CJ REPLACE ALL 成绩合格否 WITH .T. FOR 笔试成绩>=60 AND (上机成绩=“及 格” OR 上机成绩=“优”) SQL 命令:UPDATE CJ SET 成绩合格否=.T. WHERE 笔试成绩>=60 AND (上机成绩=“及 格” OR 上机成绩=“优”)
(2) VFP 命令:SELECT 1 USE XS INDEX ON 考号 TAG KH SELECT 2 USE CJ SET RELATION TO 考号 INTO XS LIST 考号,XS.,笔试成绩,上机成绩 FOR 成绩合格否=.T.
SQL 命令:SELECT XS.考号,,笔试成绩,上机成绩 FROM XS,CJ WHERE XS.考 号=CJ.考号 AND 成绩合格否=.T.
(3)VFP 命令:USE CJ DELETE FOR 上机成绩=“缺考” SQL 命令:DELETE FROM CJ WHERE 上机成绩=“缺考”
第2套 有两个数据表: 职工数据表(ZGB.DBF)和工资数据表(GZB.DBF) 。其数据形式如下: 职工数据表 ZGB.DBF 职工号 婚否 职称 020365 周尔杰 .T. 工人 020528 王雨 .T. 技术员 010234 李丽 .F. 技术员 020458 李长新 .T. 工程师 020636 郑然 .F. 工人 工资数据表 GZB.DBF 津贴 奖金 公积金 213.5 115 90 283.0 144 140 223.0 115 120 302.0 156 160 143.0 98 70
职工号 020365 020528 010234 020458 020636
基本工资 882.00 1562.00 1306.00 1748.00 864.00
实发工资
COM-SQL712.PRG .PRG, 2、建立程序文件 COM-SQL712.PRG,要求将完成下列各小题任务的 VFP 数据表操作命令或 VFP-SQL 命令写在该程序文件中。在程序首行用注释语句注明考生和准考证号,并请用 VFP命令写在该程序文件中。在程序首行用注释语句注明考生和准考证号, 注释语句标注小题号。 (3 注释语句标注小题号
。 30 分) ( (1)计算每个职工的“实发工资”字段,并填入工资数据表 GZB.DBF 中。其中:实发 工资=基本工资+津贴+奖金-公积金; (2)显示未婚职工的职工号、、基本工资和实发工资; (3)计算工资表 GZB 中所有职工的平均奖金和实发工资总额;
(1)VFP 命令:USE GZB REPLACE ALL 实发工资 WITH 基本工资+津贴+奖金-公积金 SQL 命令:UPDATE GZB SET 实发工资=基本工资+津贴+奖金-公积金 (2) VFP 命令:SELECT 1 USE ZGB INDEX ON 职工号 TAG ZGH SELECT 2 USE GZB SET RELATION TO 职工号 INTO ZGB LIST 职工号,ZGB.,基本工资,实发工资 FOR NOT ZGB.婚否 CLOSE ALL SQL 命令:SELECT GZB.职工号,,基本工资,实发工资 FROM ZGB,GZB WHERE ZGB.职工 号=GZB.职工号 AND NOT ZGB.婚否 (3)VFP 命令:USE GZB CALCULATE AVG(奖金),SUM(实发工资) TO A,B ?”平均奖金:”,A,” 实发工资总额:”,B SQL 命令:SELECT AVG(奖金) AS 平均奖金,SUM(实发工资) AS 实发工资总额 FROM GZB
第3套 有两个数据表: 运动员基本情况表(JBB.DBF)和运动成绩表(YDCJ.DBF) 。其数据形 式如下: 运动员基本情况表(JBB.DBF)