表数据处理记录指针变动是常态，RECNO()、GO命令等都可以处理这类问题。

掌握了基础知识，就能灵活应用VFP中的各种命令解决实际工作中的问题。

使用 CALCULATE 命令前,先保存当前记录号,统计完毕后,回到以前的位置
n记录号 = recn()
CALCULATE....
go n记录号

最好用SQL
表单里要显示表中的数据，该命令在一个表单上是生成编号用的，如果再用指针转来转去，会影响数据插入删除操作。

指针转来转去怎会影响数据插入删除操作？除非是乱来。

*!*    https://bbs.bccn.net/thread-480064-1-1.html
SET ENGINEBEHAVIOR 70
Close Databases
Create Cursor tt (编号 C(10))
Insert Into tt Values ("200112001")
Insert Into tt Values ("200112002")
Insert Into tt Values ("200112003")
Insert Into tt Values ("200112004")
Insert Into tt Values ("200112005")

Insert Into tt Values ("200123001")
Insert Into tt Values ("200134001")
Insert Into tt Values ("200113001")
Insert Into tt Values ("200213001")

Select 编号, Left(编号, 6) As 编号1, SUBSTR(编号, 7, 3) As X From tt Into Cursor Query
Select 编号, X From Query Group By 编号1 Order By 编号1  && 或者后面可以跟 Where 过滤条件

Set ENGINEBEHAVIOR 70
Close Databases
Create Cursor tt (编号 C(10))
Insert Into tt Values ("200112001")
Insert Into tt Values ("200112002")
Insert Into tt Values ("200112003")
Insert Into tt Values ("200112004")
Insert Into tt Values ("200112005")

Insert Into tt Values ("200123001")
Insert Into tt Values ("200134001")
Insert Into tt Values ("200113001")
Insert Into tt Values ("200213001")

Select TOP 1 编号, Substr(编号, 7, 3) As X From tt ;
    Order By 编号 Desc  Group By 编号 Where Left(编号, 6) = "200112"

SELECT MAX(RIGHT(编号,3)) FROM 表文件名 WHERE LEFT(编号,6)==c年份+c种类号
以上是根据表单中指定的年份和种类号查找出最大的序号。如果是全系列查找，则：
SELECT LEFT(编号,6) 年份种类,MAX(RIGHT(编号,3)) FROM 表文件名 GROUP BY 年份种类 ORDER BY 1