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

INSERT

Propósito

Incluir um registro no arquivo selecionado

Sintaxe

INSERT [BEFORE]

Argumentos

BEFORE

determina que o registro seja inserido antes do registro corrente.

Utilização

Quando utilizado, inclui um registro no arquivo selecionado.

Os itens incluídos são inicializados pelo comando REPLACE ou pelos comandos de atribuição.

Caso o arquivo tenha uma chave única e esta já tenha o valor a ser incluído, a função DBERR() retornará um código diferente de 0 (zero) e o registro não e incluído. Com isso evita-se que antes de uma inclusão tenha que se verificar a existência dos valores que serão incluídos.

A cláusula BEFORE só se aplica a arquivo de banco de dados OpenBASE e é útil para ordenar o arquivo de dados.

Exemplo

O exemplo a seguir inclui um registro em um arquivo externo.

USE *     && Abre um arquivo externo

* Inicio da declaração do arquivo externo

tel S LEN(94)

numero n14

nome u30

ende u50

ENDUSE

ACCEPT "Nome " TO nome

ACCEPT "Endereço " TO ende

INPUT "Telefone " TO numero

IF CONF()

INSERT

ENDIF

O exemplo a seguir inclui um registro em um arquivo entidade.

USE tab_clie             && Abre o arquivo

ACCEPT "Codigo do Cliente " TO id0_clie

ACCEPT "Nome do Cliente " TO nom_clie

IF CONF( )

  REPLACE AUTOMEM        && Atribui aos itens do arquivo os valores em memória

  INSERT            && Inclui registro

** Verifica se registro foi incluído evitando pesquisar.

  IF DBERR( ) # 0

    BEEP

    ? "Registro já existe "

  ENDIF

ENDIF

Consulte

APPEND, REPLACE, RESTORE, SAVE, SELECT, DBERR( ), EOF( ), FBINSERT( ), FINSERT( ), RECNO( ) e FRECCOUNT( ).

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