在考生文件夹下有学生管理数据库BOOKS，数据库中有score表(含有学号、物理、高数、英语和学分5个字段，具体类型请查询表结构)，其中前4项已有数据。 
请编写符合下列要求的程序并运行程序： 
设计一个名为myform的表单，表单中有两个命令按钮，按钮的名称分别为cmdYes和cmdNo，标题分别为“计算”和“关闭”。程序运行时，单击“计算”按钮应完成下列操作： 
(1)计算每一个学生的总学分并存入对应的学分字段。学分的计算方法是：物理60分以上(包括60分)2学分，否则0分；高数60分以上(包括60分)3学分，否则0分；英语60分以上(包括60分)4学分，否则0分。 
(2)根据上面的计算结果，生成一个新的表xf，(要求表结构的字段类型与score表对应字段的类型一致)，并且按学分升序排序，如果学分相等，则按学号降序排序。 
单击“关闭”按钮，程序终止运行 

我自己写了个程序，但是不对，大家看看哪里不对啊！小弟我拜谢了！
store 0 to x1,x2,x3 
use xs 
for i = 1 to 3 
do case 
case 物理 >= 60 
x1 = 2 
case 数学 >= 60 
x2 = 3 
case 英语 >= 60 
x3 = 4 
endcase 
xf = x1 + x2 + x3 
repla all 学分 with 0 + xf 
next 
sele 学号,学分 from xs into table new order by 学号 desc