Hi all,

I have this code in a method, at development mode it works, but in .EXE it gives a error 111-'Cannot update cursor RPT, since it's read only.

IF USED('rpt')
   SELECT rpt
 ELSE
   USE ".\reports\"+ALLTRIM(.txtDocImp.Value)+".frx"  ALIAS rpt IN 10  
 SELECT rpt
ENDIF
LOCATE FOR Objtype = 1 AND Objcode = 53
REPLACE Tag WITH "", Tag2 WITH "" 
REPLACE expr WITH STRTRAN(Expr,lcCopiasOld,lcCopiasNew)

Thank's

João Batista