程序代码：

USE jf

repl ywkmjf with ICASE(ALLTRIM(类别)=="加强",21,ALLTRIM(类别)=="奥赛",21,ALLTRIM(类别)=="英才",5,1)-ywjfmc FOR !Empty(ywkmjf) AND RECNO()<=44
repl sxkmjf with ICASE(ALLTRIM(类别)=="加强",21,ALLTRIM(类别)=="奥赛",21,ALLTRIM(类别)=="英才",5,1)-sxjfmc FOR !Empty(ywkmjf) AND RECNO()<=44
repl yykmjf with ICASE(ALLTRIM(类别)=="加强",21,ALLTRIM(类别)=="奥赛",21,ALLTRIM(类别)=="英才",5,1)-yyjfmc FOR !Empty(ywkmjf) AND RECNO()<=44
repl wlkmjf with ICASE(ALLTRIM(类别)=="加强",21,ALLTRIM(类别)=="奥赛",21,ALLTRIM(类别)=="英才",5,1)-wljfmc FOR !Empty(ywkmjf) AND RECNO()<=44
repl hxkmjf with ICASE(ALLTRIM(类别)=="加强",21,ALLTRIM(类别)=="奥赛",21,ALLTRIM(类别)=="英才",5,1)-hxjfmc FOR !Empty(ywkmjf) AND RECNO()<=44
repl swkmjf with ICASE(ALLTRIM(类别)=="加强",21,ALLTRIM(类别)=="奥赛",21,ALLTRIM(类别)=="英才",5,1)-swjfmc FOR !Empty(ywkmjf) AND RECNO()<=44
repl zzkmjf with ICASE(ALLTRIM(类别)=="加强",21,ALLTRIM(类别)=="奥赛",21,ALLTRIM(类别)=="英才",5,1)-zzjfmc FOR !Empty(ywkmjf) AND RECNO()<=44
repl lskmjf with ICASE(ALLTRIM(类别)=="加强",21,ALLTRIM(类别)=="奥赛",21,ALLTRIM(类别)=="英才",5,1)-lsjfmc FOR !Empty(ywkmjf) AND RECNO()<=44
repl dlkmjf with ICASE(ALLTRIM(类别)=="加强",21,ALLTRIM(类别)=="奥赛",21,ALLTRIM(类别)=="英才",5,1)-dljfmc FOR !Empty(ywkmjf) AND RECNO()<=44
repl zfkmjf with ICASE(ALLTRIM(类别)=="加强",21,ALLTRIM(类别)=="奥赛",21,ALLTRIM(类别)=="英才",5,1)-zfjfmc FOR !Empty(ywkmjf) AND RECNO()<=44