erase a datarow entirely with a single command ?

[mauri.menabue]

hi all
is it possible to completely delete a datarow with a single command if so which one?

Code: Select all  Expand view

   LOCAL oRsDel AS OBJECT
   LOCAL cSql    AS CHARCTER
   
   cSql := ""
   cSql += "SELECT *" + " "
   cSql += "FROM " + ::cTabellaTestate + " "  
   cSql += "WHERE " + ::cCampoFiltro + " >= ? AND "  
   cSql += ::cCampoFiltro + " <= ?"  
   ::oRsDel := ::oCn:RowSet( cSql, { ::uValDa, ::uValA } )
 
  ::oRsDel:deleteall()

  *- or only method is

  ::oRsDel:gotop()
  do while .not. ::oRsDel:eof()
      ::oRsDel:delete()
      ::oRsDel:skip()
 enddo
 

[nageswaragunupudi]

Either

Code: Select all  Expand view

::oRsDel:gotop()
  do while .not. ::oRsDel:eof()
      ::oRsDel:delete()
//      ::oRsDel:skip() // remove this line
 enddo
 

OR this is better

Code: Select all  Expand view

oCn:Execute( "DELETE FROM <table> WHERE <cond>" )

[mauri.menabue]

Thank you Master !
Maurizio Menabue