TOTVSTEC

Árvore de páginas

Marca o registro atual para exclusão.

Sintaxe

DBDelete()

Observações

  • Utilize o comando Set Deleted para filtrar os arquivos marcados.
  • Utilize o comando PACK para excluir fisicamente os arquivos marcados pela DBDelete.
  • Caso a RDD utilizada para a abertura de tabela seja a RDD TOPCONN, a função DBDelete irá gravar na tabela aberta, no campo de controle R_E_C_D_E_L_ do registro que está sendo marcado para exclusão, o número do registro (Recno).

Exemplos

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

#include "totvs.ch"
user function test()
  Local nHandle := TCLink()
  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
  PACK
  
  // Fecha a tabela
  DBCloseArea()
  
  // Desconecta do SGBD
  TCUnlink( nHandle )
return

Veja também

  • Sem rótulos