CREATE CURSOR T (MC N(4),BJ C(1)) CSTR=[123231312] LOCAL N FOR I=1 TO 151 N=IIF(MOD(I,9)=0,9,MOD(I,9)) INSERT INTO T VALUES (I,SUBSTR(CSTR,N,1)) ENDFOR BROWSE