VF 第6章 实验报告

select * from v4
六【附加题】
用一个带有4个page的页框实现以下4个查询，这里给出各页的编辑和运行界面，请据此编程，保存为sy6
步骤：（1）添加页框，页数为4，标题分别为“按科室查询、按医生查询、按病人查询、按药品查询”
（2）设置数据环境，将所需的表放到数据环境中
（3）添加文本框，标题为“科室编号、医生编号、病人编号、药品编号”
2、查询每位病人的姓名、性别、所开药品的总金额（价格*数量）。
输入语句：
select姓名,性别,sum(prescription.价格*数量) as总金额from patientinner join prescription on patient.病人编号=prescription.病人编号group by病人编号
select department.科室编号,department.科室名,doctor.姓名;
count(patient.病人编号) as病人数;
from doctor,department,patient where department.科室编号=doctor.科室;
and doctor.医生编号=patient.主治医生;
3、建立各科室医生视图V3，列出科室名称、医生姓名，性别。
输入语句：
create view v3 as select科室名,姓名,性别from doctor inner join department on doctor.科室=department.科室编号
4、建立库存量（字段为“数量”）小于300的药品编号和药名及数量视图。
and department.科室编号=alltrim(this.parent.list1.value) group by doctor.医生编号into cursor temp;
this.parent.grid1.recordsource="temp"
thisform.refresh
2、按医生查询（查询医生所开药品情况）
步骤：“查询”按钮事件代码设计：
this.parent.grid1.recordsource=""
select doctor.医生编号,姓名,doctor.性别,药品名称,价格, sum(prescription.数量) as数量;
from doctor, prescription;
实验步骤及结果
where doctor.医生编号= prescription.医生编号;
7、查询D003医生所开药品的总金额和医生编号。
输入语句：
select医生编号,sum(数量*价格) as总金额from prescription where医生编号="D003"
8、查询“白”姓女病人的信息。
输入语句：
select * from patient where姓名like"白%" and性别="女"
select * from medicine where not exists (select * from prescription where prescription.药品编号=medicine.药品编号)
2、查询超过M004库存（数量）的药品信息。
输入语句：
select * from medicine where库存>all(select库存from medicine where药品编号="M004")
编辑 运行
实验步骤及结果
一、单表查询练习
1、查询病人的姓名和年龄，用“年龄”作为列标题，并按年龄降序排列。
输入语句：
select姓名,year(date())-year(出生日期) as年龄from patient order by年龄desc
2、查询处于工作中的女医生的全部信息。
输入语句：
select * from doctor where性别="女" and工作中=.t.
and doctor.医生编号=patient.主治医生;
andpatient.病人编号=alltrim(this.parent.list1.value) group byprescription.药品数量into cursor temp;
5、查询处方表金额（价格*数量）排在前三位的药品编号、医生编号和金额。
输入语句：
select top 3药品编号,医生编号,价格*数量as金额from prescription order by金额desc
6、在病人表中查询每个医生看病人数并列出医生编号。
输入语句：
select主治医生,coห้องสมุดไป่ตู้nt(病人编号) from patient group by主治医生
输入语句：
select top 2 *from v2 order by平均年龄
3、用V3查询不同科室的男女医生人数，列出科室名称、性别，医生数。
输入语句：
select科室名,性别,count(姓名) as医生数from v3 group by性别
4、查询库存量小于300的药品编号和数量视图。
输入语句：
步骤：“查询”按钮事件代码设计：
this.parent.grid1.recordsource=""
select patient.病人编号,姓名,性别,主治医生, prescription.药品名称,数量,价格,doctor,姓名as主治医生;
from prescription, patient;
wherepatient.病人编号=prescription.病人编号;
三、嵌套查询
1、用not in和not exist两种方法查询prescription表还没有开出的medicine表的药品信息。
输入语句：(not in )
select * from medicine where药品编号not in (select药品编号from prescription )
输入语句：(not exists )
实验内容
一、单表查询练习
1.查询病人的姓名和年龄，用“年龄”作为列标题，并按年龄降序排列。
2.查询处于工作中的女医生的全部信息。
3.查询处方表所含的各种药品编号、药名以及总数量。
4.查询病人表中的病人属于几个科室。
5.查询处方表金额（价格*数量）排在前三位的药品编号、医生编号和金额。
6.在病人表中查询每个医生看病人数并列出医生编号。
4.建立库存量（字段为“数量”）小于300的药品编号和药名及数量视图。
五、本地视图使用练习
1.用V1查询工作中的医生信息
2.用V2查询病人平均年龄排在前两位的各科室病人、病人数、平均年龄。
3.用V3查询不同科室的男女医生人数，列出科室名称、性别，医生数。
4.查询库存量小于300的药品编号和数量视图。
输入语句：
create view v4 as select药品编号,药品名称,库存from medicine where库存<300
实验步骤及结果
五、本地视图使用练习
1、用V1查询工作中的医生信息
输入语句：
select * from v1
2、用V2查询病人平均年龄排在前两位的各科室病人、病人数、平均年龄。
四、本地视图建立练习
1、建立工作中的医生信息视图V1
输入语句：
create view v1 as select * from doctor where工作中=.t.
2、建立各科室病人数、平均年龄视图V2，列出科室、病人数、平均年龄。
输入语句：
create view v2 as select科室名,count(病人编号) as病人数,avg(year(date())-year(出生日期))as;平均年龄from patient inner join department on department.科室编号=patient.所属科室group by科室名
7.查询D003医生所开药品的总金额和医生编号。
8.查询“白”姓女病人的信息。
二、内、外连接练习
1.查询40到50岁的病人姓名，所属的科室名。
2.查询每位病人的姓名、性别、所开药品的总金额（价格*数量）。
3.列出所有doctor.dbf中的医生信息及其所看病人信息。
4.查询Medicine表的所有药品的药品编号，药名，数量（标题为“库存”）以及该药品被医生开出的金额合计（标题为“总金额”，用价格*数量求得）
4、Medicine表的所有药品的药品编号，药名，数量（标题为“库存”）以及该药品被医生开出的金额合计（标题为“总金额”，用价格*数量求得）
输入语句：
select medicine.药品编号,medicine.药品名称,库存,sum(prescription.价格*数量) as总金额from medicine left join prescription onmedicine.药品编号=prescription.药品编号group by prescription.药品编号
（4）添加列表框，设置数据类型为字段，数据源为所需表
（5）添加表格，数据源为temp表
（6）添加命令按钮，标题为“查询”，编写程序
1.按科室查询（选中list框中科室和查询按钮，查询科室医生和病人情况）
步骤：“查询”按钮事件代码设计：
this.parent.grid1.recordsource=""
5.列出所有doctor.dbf中的医生信息及其所看病人信息。
6.查询Medicine表的所有药品的药品编号，药名，数量（标题为“库存”）以及该药品被医生开出的金额合计（标题为“总金额”，用价格*数量求得）
实验步骤及结果