Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Incluir Página
tec:Field
tec:Field

Sintaxe

 

FIELD( <expressão numérica> )

 

Propósito

 

Retorna o nome de um campo do arquivo de dados corrente.

 

Argumentos

 

<expressão numérica>

 

Define um número inteiro correspondente à posição do campo desejado dentro da estrutura do arquivo de dados.

 

Utilização

 

Se o número da expressão numérica for maior que o número de campos do arquivo, uma cadeia de caracteres nula será fornecida. Entretanto, a função COUNT() pode ser utilizada para determinar a quantidade de campos que o arquivo possui, evitando assim ultrapassá-la.

 

Exemplos

 

Suponhamos que a estrutura de um arquivo de trabalho temporário seja composto dos campos TRB_FILIAL, TRB_CODIGO, TRB_NOME, TRB_ENDERE, TRB_CIDADE, TRB_ESTADO e TRB_CEP. No exemplo abaixo, obteremos os nomes dos campos deste arquivo:

 

MsgAlert(FIELD(1))     // Retorna “TRB_FILIAL”

MsgAlert(FIELD(2))     // Retorna “TRB_CODIGO”

MsgAlert(FIELD(3))     // Retorna “TRB_NOME”

MsgAlert(FIELD(4))     // Retorna “TRB_ENDERE”

MsgAlert(FIELD(5))     // Retorna “TRB_CIDADE”

MsgAlert(FIELD(6))     // Retorna “TRB_ESTADO”

MsgAlert(FIELD(7))     // Retorna “TRB_CEP”

 

Para tornar esse código genérico, podemos utilizar a seguinte estrutura:

 

LOCAL nTam := TRB->(FCOUNT())

LOCAL nPos  := 0

 

// Mostrará o nome de todos os campos do arquivo de trabalho cujo alias é TRB

FOR nPos := 1 TO nTam

          MsgAlert(“Nome do campo: “ + PADR(FIELD(nPos), 10))

NEXT nPos