Pular para o conteúdo principal

Postagem em destaque

BlackTDN :: AdvPL/TLPP Estudando xBase: A Linguagem "Pátria

_Créditos da imagem: Gerada com auxílio do ChatGPT/Gemini_ **Domine AdvPL/TLPP Estudando xBase: A Linguagem "Pátria"** Você quer ser um programador proficiente em **AdvPL/TLPP**? Está em busca de cursos online, suporte via Skype ou Facebook? Que tal uma abordagem que realmente faça você **dominar** essas linguagens entendendo suas bases? Eu domino o AdvPL/TLPP porque **não estudo diretamente essa linguagen**. O segredo? Eu estudo **xBase**, a "linguagem pátria" que deu origem ao AdvPL/TLPP. Ao compreender a xBase, você adquire uma base sólida para dominar suas variações e derivados. E qual é a melhor e maior fonte de conhecimento xBase hoje? Sem dúvidas, é o projeto **(x)Harbour**. Este compilador e repositório oferece uma vasta coleção de exemplos e ferramentas que não só aprimoram suas habilidades, mas também ampliam sua compreensão do funcionamento interno da linguagem. Algumas sugestões práticas para iniciar sua jornada: - **Explore os exemplos no projet

Protheus :: Programação Básica em Advpl “Combo XXV”

Chamando Funções Indiretamente:

Em Advpl é possível efetuar a chamada de funções indiretamente usando o operador de macros. Este procedimento lhe permitirá usar aplicativos controlados por dados.

Pode-se usar um bando de dados ( à exemplo do SX3 ) para armazenar uma seqüência de funções a serem chamadas, e depois usá-lo para gerar telas, efetuar validação de campos, iniciar o conteúdo de campos, etc.

Para passar uma função como parâmetro, passe o nome da função como uma string de caracteres ou como uma chamada de função dentro de um bloco de codificação. Para chamá-la, use o operador de macros & ou a função __ExecMacro() quando estiver passando uma string de caracteres ou Eval() para avaliar o bloco de código.

Exemplo:

cExecTeste := “U_TESTE()”
&( cExecTeste )

ou

cExecTeste := “U_TESTE()” //Executa a função U_TESTE()
__ExecMacro ( cExecTeste ) //Executa a função U_TESTE()

ou ainda

bExecTeste := { || U_TESTE() )
Eval( bExecTeste ) //Executa a função U_TESTE()

Comentários

Postagens mais visitadas