How about:

SET EXACT OFF
m.i = AUSED( a1 )

FOR m.j = 1 TO m.i
   IF a1[ m.j ] = "cursor"
      USE IN ( a1[ m.j ] )
   ENDIF
NEXT

>Thank you
>I found better way:
>In the init of the form I added:
>

nalias=0

>in the command button beginning:
>

nalias=nalias+1
>if nalias>1
>use in cursor1
>use in cursor2
>use in cursor3
>use...
>endif