create cursor x1 ( c1 c(1) ) insert into x1 values ( 'a' ) insert into x1 values ( 'b' ) create cursor x2 ( c1 c(2) ) insert into x2 ; select * from x1>On VFP the new CAST() function it will more become one of the functions used in SQL SELECT.
>********* > >CLEAR >SET TALK OFF > >CREATE CURSOR myCursor ( f1 C(1)) > >FOR K=1 TO 100000 >INSERT INTO myCursor VALUES ('a') >NEXT > >FOR K=1 TO 10000000 >NEXT > >T1=SECONDS() > >SELECT CAST(F1 AS C(2) NULL) F2 INTO CURSOR R1 FROM myCursor > >? 'TIME :',SECONDS()-T1 >LIST STRUCTURE > >T1=SECONDS() > >SELECT CAST(F1 AS C(2) NULL) F2 INTO CURSOR R2 FROM myCursor WHERE .F.; >UNION ALL ; >SELECT F1 FROM myCursor > >? 'TIME :',SECONDS()-T1 >LIST STRUCTURE >>