DBDelete
DBDelete()Marca o registro atual para exclusão lógica.
Visão geral
DBDelete marca o registro corrente; não equivale a remover fisicamente todos os registros. A referência TOPCONN descreve o controle R_E_C_D_E_L_; o tratamento deve permanecer na API apropriada em vez de alterar colunas de controle manualmente. O fragmento atua somente após obter RecLock no registro da tabela própria. Não transfira essa operação para tabelas de negócio sem a rotina e as validações do módulo. EDTRB identifica exclusivamente uma tabela própria de teste, já aberta com a estrutura e os direitos necessários; os exemplos não se destinam a tabelas padrão. (TOTVS, s.d., ref. 1)
Sintaxe
DBDelete()Retorno
Retorno não formalizado na ficha consultada; não usado no exemplo.
Exemplo comentado
#Include "Protheus.ch"
User Function Ed330()
// EDTRB e descartavel; registro de teste previamente localizado.
If Select("EDTRB") > 0
If !EDTRB->(Eof())
If RecLock("EDTRB", .F.)
EDTRB->(DBDelete())
EDTRB->(MsUnlock())
EndIf
EndIf
EndIf
Return NilCom lock obtido, solicita exclusão lógica do registro de teste; tratamento completo de erro não está implementado. Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
- Conferir RDD, alias e operações pendentes. Navegação pode efetivar atualizações; preservar contexto conforme o contrato do chamador e tratar erros na rotina completa.
- Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.