Nesta lição, vamos apresentar os diferentes tipos de procedimentos disponíveis em WLanguage, seu modo de criação, como chamá-los, passar parâmetros e recuperar um resultado.

Tipos de procedimentos ( Types of procedures )

Três tipos de procedimentos estão disponíveis:

Procedimento global : pode ser usado em todos os processos do projeto (declarados em um conjunto de procedimentos). ( Global procedure: )
Procedimento local em uma Janela, Página ou Janela Móvel: pode ser utilizado em todos os processos que dependem do objeto no qual este procedimento foi declarado. ( Local procedure )
Procedimento interno em um processo: só pode ser utilizado no processo em que foi declarado. (Internal procedure )


	Observação	Âmbito dos procedimentos ( Scope of procedures) Os procedimentos obedecem às regras de âmbito apresentadas para as variáveis (ver “Âmbito das variáveis” ). see "The scope of variables").

Criar e chamar um procedimento ( Creating and calling a procedure )

Para criar um procedimento global , você deve: ( To create a global procedure )

Crie (se necessário) um conjunto de procedimentos (através do painel "Explorador de projetos", pasta "Procedimentos"). Dê um nome ao conjunto de procedimentos.
Crie um procedimento global no conjunto de procedimentos (através do painel "Explorador de projetos", pasta "Procedimentos, Definir nome"). Dê um nome ao procedimento.
Digite o código do procedimento global. O código do procedimento tem o seguinte formato:
PROCEDURE <Name of global procedure>()

Para criar um procedimento local , você deve: ( To create a local procedure )

Selecione o elemento associado ao procedimento (janela, página, etc.).
Crie um procedimento local (através do painel "Explorador de projetos", expanda o nome do elemento, pasta "Procedimentos locais").
Dê um nome ao procedimento.
Digite o código do procedimento local. O código do procedimento tem o seguinte formato:
PROCEDURE <Name of local procedure>()

Para criar um procedimento interno , digite o seguinte código no processo necessário:

( To create an internal procedure, )

INTERNAL PROCEDURE <Procedure name>()
<Code of internal procedure>
END

Para chamar um procedimento , use o nome do procedimento (com os parâmetros possíveis que serão passados para ele).

( To call a procedure )

<Procedure name>(<Parameter 1>, ..., <Parameter N>)

Veja Procedimento / Função para mais detalhes.

(See Procedure/Function for more details.)

Parâmetros de um procedimento ( Parameters of a procedure )

O que é um parâmetro? ( What is a parameter? )

Um parâmetro é um valor enviado a um procedimento durante a chamada do procedimento.

O exemplo a seguir é usado para chamar a procedure Multiply10 e passar o valor que será tratado na procedure como parâmetro:

Multiply10(50)

Você pode passar 0 ou vários valores como parâmetros para um procedimento. Esses valores podem ser de qualquer tipo (como com variáveis).

O parâmetro é especificado na declaração do procedimento no formato de uma variável. Por exemplo, para o procedimento Multiply10 , o código do procedimento é:

PROCEDURE Multiply10(P)
P=P*10

P é o parâmetro esperado pelo procedimento.


	Observação	Para especificar a função do parâmetro no procedimento, você tem a capacidade de typecast o parâmetro na declaração do procedimento. Por exemplo, para usar apenas valores numéricos, você pode declarar: PROCEDURE Multiply10(P is numeric)

No exemplo a seguir, o procedimento de multiplicação espera dois parâmetros inteiros e retorna o resultado da multiplicação.

O código do procedimento é o seguinte:

PROCEDURE Multiplication(Nb1 is int, Nb2 is int)
MyResult is int
MyResult = Nb1 * Nb2
RESULT MyResult

O código usado para chamar o procedimento é o seguinte:

res is int
res = Multiplication(10, 50)
// Res is equal to 500

Como usar os parâmetros?

Por padrão, a passagem de parâmetros em WLanguage é realizada por referência (ou por endereço). O parâmetro no procedimento representa (referências) a variável passada durante a chamada.

Portanto, quando uma instrução de procedimento modifica o valor do parâmetro, o valor da variável correspondente a este parâmetro é modificado.

Exemplo:

O código do procedimento é o seguinte:
PROCEDURE Test_address(P1)
P1 = P1 * 2
O código usado para chamar o procedimento é o seguinte:
T is int
T = 12 // T is equal to 12 before the call
Test_address(T)
// T is equal to 24 after the call

Para evitar a modificação do valor da variável correspondente ao parâmetro, os parâmetros devem ser passados por valor . Passar parâmetros por valor permite que você controle uma cópia do valor do parâmetro. Se o código do procedimento modifica o valor da variável, o valor da variável correspondente ao parâmetro não é modificado.

Para forçar um parâmetro a ser passado por valor para um procedimento, a palavra-chave LOCAL deve ser usada antes do nome do parâmetro na declaração do procedimento. Esta palavra-chave indica que o seguinte parâmetro não será modificado pelo procedimento.
Exemplo:

O código do procedimento é o seguinte:
PROCEDURE Test_value(LOCAL P1)
// Local indicates that the parameter will be passed by value
P1 = P1 * 2
O código usado para chamar o procedimento é o seguinte:
T is int
T = 12 // T is equal to 12
Test_value(T)
// T does not change


	Observação	No mesmo procedimento, alguns parâmetros podem ser passados por referência enquanto outros parâmetros podem ser passados por valor. Basta usar a palavra-chave LOCAL antes de cada parâmetro passado por valor.

Parâmetros obrigatórios ou opcionais? ( Mandatory or optional parameters? )

Os parâmetros recebidos no procedimento podem ser parâmetros obrigatórios ou opcionais. Um parâmetro obrigatório deve ser preenchido durante a chamada ao procedimento enquanto um parâmetro opcional pode ser omitido: neste caso, ele assumirá o valor padrão definido ao declarar os parâmetros do procedimento.


	Observação	Ao declarar um procedimento, os parâmetros opcionais são os últimos parâmetros (eles são sempre especificados após todos os parâmetros obrigatórios).

No exemplo a seguir, o procedimento de multiplicação usa um parâmetro opcional, Nb2. Este parâmetro opcional é indicado após os parâmetros obrigatórios, especificando seu valor padrão. Neste exemplo, o valor padrão do parâmetro opcional é definido como 10.

PROCEDURE Multiplication(Nb1 is int, Nb2 is int=10)
MyResult is int
MyResult = Nb1 * Nb2
RESULT MyResult

O código usado para chamar o procedimento é o seguinte:

res is int
res = Multiplication(6)
// Res is equal to 60

Neste exemplo, o segundo parâmetro não foi especificado. Portanto, seu valor padrão será usado.

Resultado de um procedimento ( Result of a procedure )

Os procedimentos podem retornar um ou mais resultados. O resultado pode ser estipulado. A palavra-chave RESULT deve ser usada para retornar um valor.

Consulte a declaração RESULT para obter mais detalhes.

( See RESULT statement for more details. )

segunda-feira, 3 de agosto de 2020

DICAS 2991 - WINDEV TUTORIAL 14 - PROCEDURES REFERENCIA - PARTE 3

https://youtu.be/Lh99xH8rDHc

Esse Ao Vivo vai estrear as 20:00 do dia 03/09/2020 QUINTA

Bom Dia/Boa Tarde/Boa Noite

DICAS 2991 - WINDEV TUTORIAL 14 - PROCEDURES REFERENCIA - PARTE 3

Tutoriel WINDEV : Leçon 2.4.c. Procédures - Référence ou valeur

ASSUNTOS:

1. CRIANDO PROCEDURE POR REFERENCIA
2. MOSTRANDO QUE A VARIAVEL DE PARAMETRO É ALTERADA
3. MOSTRANDO COMO NAO ACONTECER, USANDO LOCAL
4. achei MUITO LEGAL ESSE TUTORIAL, POR MUITAS VEZES NAO SABER SOBRE MEMORIA

https://windevdesenvolvimento.blogspot.com/2020/08/dicas-2991-windev-tutorial-14.html

https://doc.windev.com/en-US/?1410087517&name=lesson_24_the_procedures

Video original da Franca

https://youtu.be/H58TlmgTvFE

Playlist Windev TUTORIAL
https://www.youtube.com/playlist?list=PLwJwZaqiZW-lxU1XF0M0htb5S5f8pavuE

========================

The WLanguage code of the procedure is:

PROCEDURE Test_Reference(P1)
P1 = P1 * 2
The WLanguage code used to call the procedure is:

T is int
T = 12 // T is equal to 12 before the call
Test_Reference(T)
// T is equal to 24 after the call
Example:
- The WLanguage code of the procedure is:
  
  PROCEDURE Test_value(LOCAL P1)
  // Local indicates that the parameter will be passed by value
  P1 = P1 * 2
- The WLanguage code used to call the procedure is:
  
  T is int
  T = 12 // T is equal to 12
  Test_value(T)
  // T does not change