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:
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 *-------------------------------------------------------------------------------------------------------------------/ /*{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):