See corrections inline

>If I execute this code in loop I get : Alias allready in use

***
USE IN ( SELECT("gg") )
USE IN ( SELECT("ggsn") )
***
>>SELECT 0000 AS RB, &lcFieldList FROM OBJEKT into cursor gg WHERE  &koje  NOFILTER
>*
>>SELECT 0
>>USE DBF('gg') AGAIN ALIAS  ggsn
>>REPLACE ALL Rb WITH RECNO()
>*
>>_VFP.DATATOCLIP('gg',,3)
***
USE IN ( SELECT("gg") )
USE IN ( SELECT("ggsn") )
***

>How to escape this/delete gg while repeating this sequnce ?