Foxpro error con cursor

¿Hola necesita una ayuda yo tengo el código que copio a continuación el detalles es que si yo activo el BROWS que tienes allí con asterisco (*) funciona perfectamente pero si lo quito no me funciona pudieras guiarme porque?
IF nKeyCode=13 then
  SELECT provee
  puntero=recno()
  Locate FOR RECNO()=puntero
  *BROWSE
  if !EMPTY(valor_ini) then
      resp=messagebox("Desea Guardar Los Cambios?",1+32,"Importaciones")
      IF resp=1 then
          act_Sql = "Update PROVEE_ART Set " +;
                          "costo_prov="+str(provee.costo_prov,18,2)+" " +;
                          "Where co_art='"+ALLTRIM(thisform.text1.Value)+"' " +;
                          "and co_prov='"+(provee.co_prov)+"' "
        xcodadm="use "+Alltrim(tcod_emp)
        tcone1=SQLCONNECT("profit_a")
        tresult10= SQLEXEC(tcone1,xcodadm)
        tresult10= SQLExec(tcone1,act_Sql)
        If tresult10 <= 0
                     MESSAGEBOX('Error al Actualizar la información', 16)
                     Return .F.
        ENDIF
        MESSAGEBOX('Se Actualizo Correctamente la información', 64)
      ELSE
         SELECT provee
         Locate FOR RECNO()=puntero
         replace costo_prov with valor_ini
      ENDIF
      thisform.grid1.Refresh
      thisform.Refresh
Endif