Question

帮忙做下SQL题

学生信息表(XS.DBF)
考号 姓名
07020104 李萍
07040109 黄程
07030106 王军
07020132 周小丽
07050223 程成
07010213 张伟

学生成绩表(CJ.DBF)
考号 笔试成绩 上机成绩 成绩合格否
07010213 86 优 .F.
07030106 45 缺考 .F.
07040109 91 优 .F.
07020132 74 及格 .F.
07050223 79 不及格 .F.
07020104 57 及格 .F.

建立程序文件COM-SQL711.PRG要求将完成下列各小题任务的VFP数据表操作命令或VFP-SQL命令写在该程序文件中,并用注释语句标注小题号。（30分）
（1）正确修改每个学生的“成绩合格否”字段，并填入学生成绩表CJ.DBF中，规定笔试成绩<60或上机成绩为“缺考”或“不及格”，则该字段值为.F.，否则为.T.
（2）在学生成绩表CJ.DBF中，查询并显示成绩合格学生的考号、姓名、笔试成绩和上机成绩
(3)逻辑删除学生成绩表CJ.DBF中上机考试缺考的考生

学生信息表(XS.DBF)
IC卡号 姓名 性别 有效期
07020104 赵鱼君 女 2008－7
07040109 芳心江 女 2008－7
07030106 艾世平 男 2008－7
07020132 周海龙 男 2008－7
07050223 陈康平 男 2008－7
07010213 邓娟 女 2008－7

食堂消费数据表(XF.DBF)
IC卡号 时间 类别 金额
07010213 2007－11－1 面点 5.5
07030106 2007－11－1 饮料 4
07040109 2007－11－1 饮料 7
07020132 2007－11－1 热菜 8
07030106 2007－11－2 凉菜 6
07020104 2007－11－2 热菜 7

建立程序文件COM-SQL721.PRG要求将完成下列各小题任务的VFP数据表操作命令或VFP-SQL命令写在该程序文件中,并用注释语句标注小题号。（30分）
（1）正确修改学生信息表XS.DBF中的“有效期”字段的值。如果“IC卡号”的第4位的数值低于“4” (不包含)，则有效期改正为“2008-12”，否则更改为“2009-7”；
（2）利用学生信息表和食堂消费表的一对多关联，查询并显示学生姓名为“艾世平”的食堂消费明细，包括IC卡号、时间、类别和金额；
(3)按类别汇总2007年11月份食堂消费金额；

图书基本信息表(TUJ.DBF)
书号 书名 单价 第一作者
020365 VFP开发实例导航 36 邵洋
020528 VFP程序设计教程 23 刘瑞新
020234 数据库系统原理教程 18 王珊
020458 VFP及其应用系统开发 32 史济民
020636 VFP入门与提高 56 史济民
030810 基于web的数据库应用 15 邵洋

图书借阅情况表(JY.DBF)
书号 借出日期 有效期（天） 借阅人
020365 2007．09．03 30 张开
020528 2007．09．23 15 章缀
020234 2007．09．21 45 张开
020365 2007．09．12 15 李航
020365 2007．09．18 30 王子

、建立程序文件COM-SQL722.PRG要求将完成下列各小题任务的VFP数据表操作命令或VFP-SQL命令写在该程序文件中,并用注释语句标注小题号。（30分）
（1）查询有效期低于30天（含）的已借出图书的信息，包括：书号、书名、借出日期、有效期和借阅人；
（2）按第一作者分类汇总图书的总价值（即各书单价之和）；
(3)以日期2007.10.15为界，将YJ.DBF中超过有效借阅期的图书作删除标志；

Answer 1

1.1
update cj set 成绩合格否='F' where 笔试成绩<60 or 上机成绩='缺考' or 上机成绩='不及格';
update cj set 成绩合格否='T' where 笔试成绩>=60 and 上机成绩<>'缺考' and 上机成绩=<>'不及格'
1.2
select xs.考号,姓名,笔试成绩,上机成绩 from xs,cj where xs.考号=cj.考号 and 成绩合格否='T'
1.3
delete from xs where exists(select * from cj where 考号=xs.考号 and 上机成绩='缺考')

2.1
update xs set 有效期='2008-12' where substring(IC卡号,4,1)<'4';
update xs set 有效期='2009-7' where substring(IC卡号,4,1)>='4'
2.2
select xf.IC卡号,时间,类别,金额 from xs,xf where xs.IC卡号=xf.IC卡号 and xs.姓名='艾世平'
2.3
select 类别,金额=sum(金额) from xf where 时间 between '2007-11-01' and '2007-11-30' group by 类别

3.1
select tuj.书号,书名,借出日期,有效期,借阅人 from tuj,jy where tuj.书号=jy.书号 and 有效期<=30
3.2
select 第一作者,总价值=sum(单价) from tuj group by 第一作者
3.3
delete from jy where datediff(day,借出日期,'2007.10.15')>有效期