
Executar um procedimento.
DO {<nome> | &S(<exp.C>)} [ WITH <parâmetros>]
|
<nome> |
Representa o nome do procedimento a ser executado. |
|
&S(<exp.C>) |
Determina que será executado um dos procedimentos declarados no comando EXTERNAL, onde <exp.C> representa o nome do procedimento. |
|
WITH |
Determina que serão passados parâmetros para o procedimento. Se mais de um parâmetro for passado estes devem ser separados por "," (vírgula). |
Os parâmetros podem ser variáveis e/ou vetores.
Em programação modular, quando um procedimento é utilizado várias vezes em um programa ou utilizado por vários programas.
Facilita a manutenção e depuração de sistemas já que estes são compostos de pequenos trechos independentes.
O comando DO e WITH não são obrigatórios, pode-se executar um procedimento passando-se somente seu nome e seus parâmetros entre parênteses.
Todos os parâmetros são passados por referência.
A lista de parâmetros deve conter todos os parâmetros que o procedimento receberá.
O exemplo a seguir mostra-nos como executar uma PROCEDURE de diversas formas.
EXTERNAL inclui, altera, exclui
WAIT "alterar, incluir ou excluir ? " TO opcao
DO CASE
CASE opcao = "a"
DO altera
CASE opcao = "i"
DO inclui( )
CASE opcao = "e"
DO &S("exclui")
OTHERWISE
MESSAGE "Opcao não valida"
ENDCASE
$LIBRARY, $NOLIB, $OVLY, CC PROC, EXTERNAL, FUNCTION, PARAMETERS, PRIVATE, RUN, SET KEY, STATIC e &S ().
