示例:
CREATE CURSOR T1 (EMS C(13),XM C(10))
INSERT INTO T1 (XM) VALUES ("12345")
INSERT INTO T1 (XM) VALUES ("23456")
INSERT INTO T1 (XM) VALUES ("34567")
INSERT INTO T1 (XM) VALUES ("45678")
INDEX ON RECNO() TO REC
CREATE CURSOR T2 (EMS C(13))
INSERT INTO T2 VALUES (REPLICATE("1",13))
INSERT INTO T2 VALUES (REPLICATE("2",13))
INSERT INTO T2 VALUES (REPLICATE("3",13))
INSERT INTO T2 VALUES (REPLICATE("4",13))
SELECT T2
SET RELATION TO RECNO() INTO T1
SCAN
REPLACE EMS WITH T2.EMS IN T1
ENDSCAN
SET RELATION TO
SELECT T1
BROWSE
CREATE CURSOR T1 (EMS C(13),XM C(10))
INSERT INTO T1 (XM) VALUES ("12345")
INSERT INTO T1 (XM) VALUES ("23456")
INSERT INTO T1 (XM) VALUES ("34567")
INSERT INTO T1 (XM) VALUES ("45678")
INDEX ON RECNO() TO REC
CREATE CURSOR T2 (EMS C(13))
INSERT INTO T2 VALUES (REPLICATE("1",13))
INSERT INTO T2 VALUES (REPLICATE("2",13))
INSERT INTO T2 VALUES (REPLICATE("3",13))
INSERT INTO T2 VALUES (REPLICATE("4",13))
SELECT T2
SET RELATION TO RECNO() INTO T1
SCAN
REPLACE EMS WITH T2.EMS IN T1
ENDSCAN
SET RELATION TO
SELECT T1
BROWSE
坚守VFP最后的阵地