bCondBloco que retorna lógico para cada registro.
AdvPL GuiaDBSetFilter( bCond, cCond ) --> NilDefine uma condição de visibilidade na área.
DBSetFilter recebe bloco lógico e expressão textual equivalentes. A chamada não reposiciona imediatamente: DBGoTop aplica a navegação ao filtro. DBGoTo pode alcançar registros fisicamente fora dele, portanto filtro não substitui autorização. A demonstração requer ED_COD caractere na tabela própria e mantém filtro/posição alterados; a rotina completa precisa administrar esse estado. 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)
DBSetFilter( bCond, cCond ) --> NilbCondBloco que retorna lógico para cada registro.
cCondExpressão equivalente ao bloco.
Nil; não é um indicador lógico de sucesso.
#Include "Protheus.ch"
User Function Ed337()
// ED_COD deve existir como caractere na tabela propria.
If Select("EDTRB") > 0
EDTRB->(DBSetFilter({|| ED_COD == "A"}, "ED_COD == 'A'"))
EDTRB->(DBGoTop())
ConOut(cValToChar(!EDTRB->(Eof())))
EndIf
Return NilIndica se há registro visível com o código fictício; depende da tabela. Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
© 2026 Usina.BR. Todos os direitos reservados. TOTVS, Protheus, Microsiga e seus respectivos logotipos são marcas de seus titulares. O AdvPL Guia é independente e utiliza citações limitadas, atribuídas e justificadas por finalidade educativa. Consulte os Termos de Uso. Termos de Uso
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.