AllwaysFalse

Tempo de leitura: 1 minuto

Olá, no post de hoje iremos aprender como usar a função AllwaysFalse no ADVPL. Ela é uma das funções de validação no ADVPL.  A função AllwaysFalse foi criada com o objetivo de compatibilidade, sendo que sempre irá retornar um valor lógico falso(.F.), facilitando a especificação desta situação nas parametrizações de validações de modelos de interface pré-definidos no sistema.

Sintaxe:

AllwaysFalse( )
 

Parâmetro(s):

Retorno:

 

Exemplo da função AllwaysFalse no ADVPL:

#include 'protheus.ch'
#include "tbiconn.ch"

/*------------------------------------------------------------------------------------------------------------------

Acesse e se inscreva no Blog/Site ProtheusAdvpl para receber conteúdo:www.protheusadvpl.com.br
Se inscreva no Canal do ProtheusAdvpl para receber vídeos:https://wwww.youtube.com/protheusadvpl
Siga-nos no Instagram:http://https://www.instagram.com/protheusadvpl
Siga a página do ProtheusAdvpl no Facebook:https://www.facebook.com/protheusadvpl2
Participe do grupo do ProtheusAdvpl no Facebook:https://www.facebook.com/groups/934461593385051/
Conheça o Portal ProtheusAdvpl:http://www.protheusadvpl.com.br/sobre-o-portal-protheusadvpl
Participe dos grupos do ProtheusAdvpl no Whatsapp:http://protheusadvpl.com.br/grupo-whatsapp-protheusadvpl
 e Telegram:http://protheusadvpl.com.br/grupo-telegram-protheusadvpl

*-------------------------------------------------------------------------------------------------------------------/

/*{Protheus.doc} User Function PAwFalse
    (Essa função tem por finalidade mostrar a função de validação AllwaysFalse em ADVPL/TL++)
    @type  Function
    @author Adilio Costa
    @since 07/08/2023
    @version 12.1.2210
	@Post:AllwaysFalse
*/


User Function PAwFalse()

	Local aParamBox := {}
	Local cTitulo := "Importacao de cadastros"
	Local cLoad := ""
	Local lCanSave := .T.
	Local lUserSave := .T.
	Local aRet := {}
	

	 MsgInfo(AllwaysFalse()) //Retorna .F.

//Usando AllwaysFalse() para retornar verdadeiro .T. nas parametrizações do ParamBox
	aAdd(aParamBox,{2,"Tipo de informação" ,1 ,aTiposFile ,060,"AllwaysFalse()", .T.})
	aAdd(aParamBox,{1,"Diretorio de dados" ,Space(60) ,"@!","AllwaysFalse()","HSSDIR" ,".T.",120,.T.})

	lRet := ParamBox(aParamBox, cTitulo, aRet, bOk, aButtons, lCentered, nPosx,nPosy, /*oMainDlg*/ , cLoad, lCanSave, lUserSave)

Return

 

Bem, finalizamos mais um post aqui no blog. Espero que você tenha entendido, qualquer dúvida nos envie um e-mail para adiliocosta@protheusadvpl.com.br. Grande abraço e fica com Deus.

Links de referência(s):

Receba as últimas atualizações do ProtheusAdvpl
Deixe seu melhor email
Nós respeitamos sua privacidade.