Vídeo Aula – AdvPL 002 – Conceitos Básicos

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

Esses e outros códigos, estão disponíveis gratuitamente no nosso GitHub, acesse em github.com/dan-atilio/AdvPL.

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.

About Dan_Atilio

Analista e desenvolvedor de sistemas na TOTVS Oeste Paulista Bauru. Técnico em Informática pelo CTI da Unesp. Graduado em Banco de Dados pela Fatec Bauru. Entusiasta de soluções Open Source e blogueiro nas horas vagas. Autor do projeto Terminal de Informação, onde são postados tutoriais e notícias envolvendo o mundo da tecnologia.

Deixe uma resposta