Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!

EXTERNAL

Propósito

Informar símbolos para o ligador.

Sintaxe

EXTERNAL <nome1> [[,<nome2>] [,<nome3>]......]

Argumentos

<nome>

representa o nome do procedimento codificado em outro arquivo fonte.

Utilização

Possibilita executar PROCEDURES através da função &S( ).

Exemplo

O exemplo a seguir mostra uma forma de uso do comando EXTERNAL e da função &S().

CLEAR

SET MESSAGE TO 23,21

MESSAGE " Pressione uma das letras maiúsculas "

EXTERNAL inclui, altera         && Declara símbolos para ligador.

WAIT "Inclui ou Altera (I/A) ?" TO k

IF k $ "Aa"

  var_cad = "altera"

ELSEIF k $ "Ii"

  var_cad = "inclui"

ELSE

  CLEAR MESSAGE

  MESSAGE "Opcao Nao Valida"

  QUIT         && Termina programa

ENDIF

DO &S (var_cad)

Consulte

DO, PROCEDURE, SET KEY e &S( ).

Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!