已有计算机等级考试数据库表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命令。