填空题 设有一个自由表(表文件名为lwsj.dbf.gjc字段的含义为“关键词”)，用于记录某期刊发表的学术论文情况，其表结构(部分字段)如表1所示，表数据如表2所示。

表1
字段名	含义	字段类型及宽度
lwbh	论文编号	C(10)
lwmc	论文名称	C(60)
gjc	关键词	C(80)
gs	关键词数	N(1)

表2
lwbh	lwmc	gjc	gs
2009G11011	商业生态系统视角的国际软件接包竞争 比较	商业生态系统/软件接包/接包竞争
2009J22012	国内情报学理论2008年研究热点及发展 趋势	情报学理论/研究热点/发展趋势
2009F22105	我国信息共享空间研究文献计量学分析	信息共享空间/作者分布/文献计量学/统 计分析
……	……	……

从表2中可以看出，每篇论文有多个关键词，且各个关键词之间用斜杠(/)分隔(注：关键词的个数为3～8)。完善下列程序，其功能是：统计每篇论文的关键词个数，并将关键词个数写入gs字段中。
CLOSE TABLE ALL
USE lwsj
SCAN
c=ALLT(gjc)
FOR i=7 TO 1 1
IF AT("/", c, i)＞0
REPLACE gs with i+1
2
ENDIF
ENI)FOR
ENDSCAN