Olá pessoal…
Na vídeo aula de hoje, vou falar um pouco sobre Conceitos Básicos do AdvPL, no caso, o Corpo de um Programa.
Abaixo os links do TDN sobre o assunto:
Simplificando laços e lógica
Corpo do Programa
A Linguagem AdvPL
Abaixo o código fonte utilizado:
//------------------------------------------------------------------
// Corpo de um programa AdvPL:
//------------------------------------------------------------------
/*
{Bibliotecas utilizadas - Includes}
{Constantes declaradas - Defines}
{Variáveis Estáticas - Static}
{Documentação da Função}
{Tipo Função} Function {Nome Função}
{Declaração de variáveis}
{Lógica do Programa}
{Encerramento de variáveis / áreas}
Return {Variável Retorno}
*/
//------------------------------------------------------------------
// Exemplo abaixo:
//------------------------------------------------------------------
//Bibliotecas
#Include "Protheus.ch"
//Constantes
#Define STR_PULA Chr(13)+Chr(10)
/*/{Protheus.doc} zCorpo
Exemplo de corpo de programa em AdvPL
@author Atilio
@since 11/10/2015
@version 1.0
@example
u_zCorpo()
/*/
User Function zCorpo()
Local aArea := GetArea()
Local cHora := Time()
//Mostrando uma mensagem da hora atual
MsgInfo("Hora Atual: " + STR_PULA + cHora, "Atenção")
RestArea(aArea)
Return
Se quiser fazer o download desse código, acesse nosso GitHub pelo link github.com/dan-atilio/AdvPL (Exemplos > Vídeo Aulas > 002 – Conceitos Básicos > zCorpo.prw).
Boim pessoal, por hoje é só.
Abraços e até a próxima.
