import.css=/download/attachments/6062824/tecnologia.css

Marca o registro atual para exclusão.

Sintaxe

DBDelete()

Observações

Exemplos

O exemplo abaixo utiliza a RDD "TOPCONN", mas a função pode ser utilizada com qualquer uma das RDDs válidas.

user function test()
  Local nHandle := TCLink( "MSSQL/DSN1", "127.0.0.1", 7890 )
  Local cTable := "MYTABLE"
  Local cRDD := "TOPCONN"
  
  // Abre a tabela
  DBUseArea( .T., cRDD, cTable, (cTable), .F., .F. )
  
  // Maraca os registros para deleção
  DBGoTo( 100 )
  DBDelete()
  
  DBGoTo( 105 )
  DBDelete()
  
  DBGoTo( 110 )
  DBDelete()
  
  // Remove efetivamente os regisros
  __DBPack()
  
  // Fecha a tabela
  DBCloseArea()
  
  // Desconecta do SGBD
  TCUnlink( nHandle )
return

Veja também