SELECT 1
USE ks
COPY STRUCTURE TO jg
SELECT 2
USE da
SELECT 3
USE jg
SELECT 1
nn=""
ks=""
DO WHILE !EOF()
nn=zkz
SELECT 3
APPEND BLANK
REPLACE zkz WITH nn
SELECT 1
FOR n=1 TO FCOUNT()-1
ks=field(n+1)
cks="ks." + ks
cda="da." + ks
IF &cks=&cda
SELECT 3
REPLACE &ks WITH "1"
ELSE
SELECT 3
REPLACE &ks WITH "0"
ENDIF
ENDFOR
SELECT 1
SKIP
ENDDO
春风红照日,夏雨绿送归。 秋霜黄落叶,冬雪白花飞。