vfp第14部分(多表程序).ppt

本部分要点 复杂多表程序 多表程序 例（实验指导书P35）：根据如下两个数据表，分别设计程序完成以下功能。 职工号 姓名 职称 单位课时费 001 丁伟 讲师 33 003 黄鹂 副教授 45 002 邓兴 教授 58 004 李力 助教 25 课程名 授课教师 课时数 大学计算机 002 64 软件工程 001 80 C++ 002 80 计算机英语 001 64 会计学 004 72 计量学 003 64 金融学 004 80 大学计算机 001 64 软件工程 002 80 ①输入课程名，查询该课程授课教师姓名和职称； ② 统计每位教师总的课时费。 kc.dbf js.dbf ①方法一： clear accept请输入查询课程名称： to kcm ?课程名：+kcm select 姓名 as 教师姓名,职称 from js,kc ; where 职工号=授课教师 and 课程名=kcm to screen return 方法二: clear set safety off sele 1 use js index on 职工号 tag zgh sele 2 use kc set rela to 授课教师 into js accept请输入查询课程名称： to kcm ?课程名：+kcm ?教师姓名 职称 scan for 课程名=kcm ?a.姓名,space(4),a.职称 endscan close all set safety on return 数据环境 输入 输出 ② 方法一： clear sele 姓名 as 教师姓名,sum(学时数)*单位课时费 as 课时费 ; from js inner join kc on 职工号=授课教师; group by 授课教师 return 方法二: clear set safety off sele 1 use kc index on 授课教师 tag skjs total on 授课教师 to zks use zks index on 授课教师 to skjs sele 2 use js set rela to 职工号 into a ?教师姓名 课时费 scan ?姓名,a.学时数*单位课时费 endscan close all set safety on return 汇总 数据环境 输出 例(0701)、有营业员数据表文件YYY.DBF和日销售数据表文件RXS.DBF *RXS.DBF 营业员 代码 姓名 性别 101 天涯 女 102 海角 男 103 风声 男 104 水起 女 *YYY.DBF 营业员代码 品名 数量 单价 营业额 101 电视 3 1230.40 0000.00 102 电话 4 223.00 0000.00 101 电扇 5 334.00 0000.00 103 电话 3 223.00 0000.00 102 电视 1 1230.40 0000.00 编程要求： （1）计算出RXS.DBF中的营业额字段的值。注：营业额=数量*单价 （2）根据用户输入的营业员代码查询某个营业员的全天营业额，按如下格式显示： 代码：101 姓名：天涯 性别： 女 品名 营业额 电视 3691.20 电扇 1670.00 营业额： 5361.20 clear select 1 use rxs replace all 营业额 with 数量*单价 select 2 use yyy index on 营业员代码 tag dm select rxs set relation to 营业员代码 into yyy accept “输入营业员代码：” to dm ?”代码：”+dm locate for 营业员代码=dm ?“姓名：”+yyy.姓名+“ 性别：”+ yyy.性别 List 品名,营业额 for 营业员代码=dm off sum 营业额 to x1 for 营业员代码=dm