已有计算机等级考试数据库表DJKS.DBF,字段包括考号(类型N,宽度5),姓名(类型C,宽度6)、笔试成绩(类型N,宽度3),上机成绩(类型N,宽度3)和平均成绩(类型N,宽度4),但各成绩字段为空;另有成绩数据库CJ.DBF。字段包括考号(类型C,宽度5)、 考场编号(类型C,宽度3)、笔试成绩(类型N,宽度3)和上机成绩(类型N,宽度3),考生的考试成绩已录入其中。请编写程序PROGB.PRG,保存在c:\ata\temp\420202\1234567\dit\GAE\temp,要求把考生的考试成绩填写到数据库表DJKS.DBF中,然后再计算笔试和上机成绩的平均成绩,填入各记录“平均成绩”字段中、最后生成一个与DJSK.DBF结构完全相同的不及格数据库BJG.DBF,把平均成绩不及格的考生记录复制到不及格库。注意:按多工作区,用DO WHILE ……ENDDO循环结构完成,不得使用APPEND FROM命令。