CREATE CURSOR test (学校 C(10), 姓名 M)
INSERT INTO test (学校) SELECT DISTINCT 学校名称 FROM AA
INDEX ON 学校 TAG XX
USE AA IN 0
SELECT AA
SET RELATION TO 学校名称 INTO test
SCAN REPLACE 学校 WITH 学校 - "、" - AA.人员名单 IN test
ENDSCAN
SET RELATION TO
SELECT test
REPLACE 姓名 WITH SUBSTR(姓名, 3) ALL
SET ORDER TO
BROWSE