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

MEMOLINE()

Propósito

Retornar uma determinada linha de uma variável texto.

Sintaxe

MEMOLINE (<var.C>, <exp.N1>, <exp.N2>)

Argumentos

<var.C>

representa uma variável-caracter que contém o texto.

<exp.N1>

representa a quantidade de caracteres que se deseja retornar.

<exp.N2>

representa o número da linha no texto.

Utilização

Retorna uma cadeia de caracteres correspondente a linha de uma variável que contém um texto.

Útil na impressão de um arquivo texto. Deve ser utilizada com a função MLCOUNT() para saber o fim de um texto.

Exemplos

O exemplo a seguir mostra-nos como imprimir o conteúdo de uma variável texto.

DATABASE bdemp1 33 a 2

USE tab_func

FIND 123     && Lê o registro do funcionário 123

PRIVATE var_text (500)

* Lê o texto associado ao registro

var_log = MEMOGET (cur_func, var_text)

cont = 1

SET PRINT ON

DO WHILE cont <= MLCOUNT(var_text,80)

* Imprime a linha do texto

  ? MEMOLINE (var_text,80,cont)

  ++ cont

ENDDO

SET PRINT OFF

Consulte

$LEN, $LENTMP, MEMODEL(), MEMOEDIT(), MEMOFILE(), MEMOGET(), MEMOLINE(), MEMOPUT(), MEMOREAD(), MLCOUNT(), MEMOSEEK, MEMOSAVE e SPACE().

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