TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user admin

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Fernando Gomes Da Silva

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
portuguese
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css

Pagetitle
DBClearAllFilter
DBClearAllFilter

Função: DBClearAllFilter

Salva as atualizações pendentes de todas as tabelas abertas e limpa as condições de filtro das mesmas.

Sintaxe

DBClearAllFilter ( ) --> Nil

Retorno

Limpa todas as condições de filtro de todas as tabelas abertas.

Sintaxe

Bloco de código
collapsefalse
DBClearAllFilter()

Retorno

Nome

Tipo

Descrição

uRet

nil

Retorno sempre é nulo.

...

Observações

  • Essa função tem o mesmo funcionamento da DBClearFilter(), exceto que a operação é

...

  • realizada em todas as tabelas abertas.

Exemplos

...

// Este exemplo, apresenta como utilizar a função DBClearAllFilter() para limpar a expressão de filtro.USE Clientes NEW DBSetFilter({|| Idade < 40}, 'Idade < 40') // Seta a expressão de filtro...USE Dependentes NEWDBSetFilter({|| Idade < 18}, 'Idade < 18')  // Seta a expressão de filtro...DBClearAllFilter()//Limpa a expressão de filtro de Clientes e de Dependentes
Abrangência
Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
FUNCTION insert()

  Local cT1 := "T1"
  Local idx := 0
  Local name := ""
  Local tp := ""
  Local age := "2"
  
  DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.)
  WHILE (idx <= 5)
  
  name += "BA"
  tp += "T"
  age += "2"
  
  (cT1)->( DBAppend( .F. ) )
  (cT1)->FIELD_NAME := name
  (cT1)->FIELD_TYPE := tp
  (cT1)->FIELD_AGE := age
  (cT1)->( DBCommit() )
  
  idx++
  ENDDO
  DBCloseArea()
  
return

FUNCTION Example()
  Local cT1 := "T1"
  
  TCLink()
  
  DBCreate("T1", {{"FIELD_NAME", "C", 10, 0}, ;
                  {"FIELD_TYPE", "C", 10, 0}, ;
                  {"FIELD_AGE", "C", 10, 0}, ;
                  {"FIELD_NICK", "C", 10, 0}, ;
                  {"FIELD_COL", "C", 10, 0}}, "TOPCONN")
                  
  U_insert()

  DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .T.)

  (cT1)->(DbSetFilter({|| left(FIELD_NAME, 4)="BABA" }, "FIELD_NAME=BABA")
  
  (cT1)->(DBGoTop())
                  
  IF ((cT1)->FIELD_AGE == "222       ")
    conout("Found!")
  ENDIF
  
  // limpa todos os filtros
  DBClearAllFilter()
  
  DBCloseArea()
  
  TCUnlink()
RETURN

Veja também

...