Função: Deleted
Verifica se o registro está com marca de excluído.
Deleted ( ) --> lRet
-
lRet(logico)
- Retorna verdadeiro (.T.), se o registro tem marca de excluído; caso contrário, falso (.F.), o registro não tem marca (ou não há área em uso).
- Quando o registro é excluído, permanece fisicamente na tabela, mas fica marcado como excluído. Essa função verifica esse estado, mas se nenhuma área está selecionada, retorna falso (.F.).
- Quando a função __DBPack() é executada, todos os registros marcados como excluídos são apagados fisicamente. Já a função DBRecall() retira todas as marcas.
//Este exemplo verifica se determinado registro está excluído.//Caso positivo, apresenta uma mensagem.USE "\DADOSADV\AA1990.DBF" SHARED NEWDBGoTo(100)IF Deleted()Messagebox("O registro atual foi deletado","Erro", 0)ENDIF
Advanced Protheus 6.09
,
Advanced Protheus 7.10
,
Microsiga Protheus 8.11
,
Protheus 10
,
TOTVS Application Server 10
,
ByYou Application Server
Visão Geral
Import HTML Content
Conteúdo das Ferramentas