>hi all,
>
>would you help,
>
>i need to save (append) all fields and records except one field from mygrid to another table,
>
>code to built the grid
>

>SELECT course.coursenumb,  course.coursename, ;
>       table2.g1, table2.g2, table2.wm1, table2.g3, table2.tot1, ;
>        table2.g4, table2.g5, table2.wm2, table2.g6, table2.tot2, table2.ltot  ;
>  from Course ;
>  inner join TABLE2 on table2.no = course.no ;
>  into cursor csrCourseStats readwrite
>
>Thisform.Grid1.RecordSource = "csrCourseStats"
>

>i try as
>use stud && i get error message file is in use
>append from (...........)
>
>thanks

LOCAL lbFlUsed
IF NOT USED("Stud")
   USE Stud IN 0
   lbFlUsed = .t.
ENDIF
SELECT Stud
APPEND FROM (DBF("csrCourseStats"))
IF lbFlUsed
   USE IN Stud
ENDIF