|
作者： 时间：2001-9-24 15:26:11 来自： 责任编辑： 阅读次数： | |
 |
考生目录下完成下列操作：
1.在考生目录下CXMA\CD子目录中建立一个新的子目录RING。
2.将考生目录下的WORD\KEN子目录删除。
3.将考生目录下GATE\WAY子目录中的文件ROUTER.HLP删除。
4.将考生目录下的文件PASS.BAK拷贝到考生目录下WIDE\LAN子目录中，文件名为SERVER.FOX。
5.将考生目录下LIFE\SHORT子目录中的文件CLOCK.BAS设置成具有归档属性的文件。
6.将考生目录下IPX\TCP子目录中的文件PROTOCOL.LIB更名为PROFIX.TXT。
二、改错题(30分)
KSH.DBF(考号C/6，上机N/3，笔试N/3)
CJ.DBF(考号C/6，上机N/3，笔试N/3，成绩C/4)
给定程序MODI1.PRG的功能是：实现两个库文件之间的数据更新，以KSH.DBF中的笔试和上机成绩
更新CJ.DBF中的相应数据。然后写入考试结果。
改错要求：程序中共有三类错误，请修改***found***下面的错误，并调试运行。
注意：要求在指定位置修改，不得增加或删除程序行。
*********************modi1.prg*************************
set talk off
set safety off
select 1
use cj
index on 考号 to ikhc
select 2
use ksh
select 1
update on 考号 from b replace 笔试 with b->笔试,上机 with b->上机 random
go top
*******found*******
do while .not.found()
do case
case 笔试>=85.and.上机>=85
replace 成绩 with "优秀"
case 笔试<60.and.上机>=60.or.笔试>=60.and.上机<60
replace 成绩 with "补考"
case 笔试<60.and.上机<60
replace 成绩 with "未过"
*******found*******
case otherwise
replace 成绩 with "通过"
endcase
*******found*******
go next 1
enddo
close database
set talk on
return
三、程序设计试题(40分)
GZZ.DBF(职工号C/6，姓名C/8，基本工资N/6.2，奖金N/6.2，津贴N/6.2，房租N/6.2，水电
费N/6.2，实发工资N/6.2)
有某单位的工资数据库GZZ.DBF。其中职工号的前四位是部门编码(1001~1005，共5个部门)。先建
立一个统计数据库GZTJ.DBF，包括三个字段：部门编码(C,4)、职工号(C,6)、增资额(N,7.2)。请编写
程序PROG1.PRG，在程序中首先由工资数据库拷贝生成GZ.DBF，然后再修改GZ.DBF，把实发工资等于或
低于本部门平均工资的职工的实发工资提高百分之三十；并计算出每人的增资额，把有关数据存放到
GZTJ.DBF中。
|
|
|
|
中华网校依法保护知识产权，如果我们的文章有涉及或侵犯您的有关权益，请即时与我们
联系，
注明网址及文章，我们会即时处理或删除，感谢您的合作！中华网校email
中华网校由广州市中六电脑城智锐计算机专业培训学院及中华网校技术中心提供网络支持未经本站许可任何个人网站、书刊报社一律不得私自复制,转载本站内容! |
|
 | |
