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

EDIT

Propósito

Invocar um editor de textos e arquivar o texto em um banco de dados.

Sintaxe

EDIT [(<exp.C>)] <item.lig> = <exp>

Argumentos

<exp.C>

Representa o nome do editor de texto que será utilizado. Caso seja omitido, o editor invocado é o ed do UNIX.

<item.lig>

representa o nome da chave de ligação na entidade fraca associada.

<exp>

representa o valor da chave que identifica o texto.

Utilização

Na edição de cartas, propostas, contratos, etc... onde se faz necessária à ligação do documento com o assunto.

O arquivo onde será armazenado o texto deve ser uma entidade fraca e ter apenas dois itens: a chave de ligação com a entidade e a linha do documento digitado, que deve ter o tamanho da maior linha editada para que não seja truncada.

Exemplo

O exemplo a seguir mostra a utilização deste recurso com as observações sobre o cliente com código igual a 234

USE tab_obsc

EDIT ("vi") id1_clie = 234    && Invoca o editor vi do unix

* rotina para imprimir curriculum

SEEK id1_clie = 234        && Pesquisa cliente

SET PRINT ON            && Ativa impressora

DO WHILE FOUND()

  ? obs_clie            && Imprime texto de observações.

  SKIP

ENDDO

SET PRINT OFF        && Desativa impressora

Consulte

$FILES, $OPEN e USE.

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