Publicidad
Se puede ejecutar cualquier cantidad de sentencias FIELD para un mismo
archivo. Todas las sentencias FIELD ejecutadas tienen efecto en forma
simultánea.
NOTA:
No utilice las variables indicadas en FIELD para ejecutar sentencias
INPUT o asignar valores con LET. Una vez que la variable ha sido
indicada en FIELD, apunta a la dirección correcta en el buffer del archivo.
Si, en cambio, ejecuta un comando INPUT o LET con ese nombre de
variable, el puntero de variable se mueve al espacio de alfanuméricos,
perdiéndose así toda referencia al buffer.
EJEMPLO 1:
10 OPEN "A:TELEFONO" AS #1 LEN=35
20 FIELD #1,2 AS REGNRO$,33 AS ALGO$
30 FIELD #1,25 AS NOMBRE$,10 AS NUMTEL$
40 GET #1
50 TOTAL=CVI(REGNRO$)
60 FOR I=2 TO TOTAL
70 GET #1,I
80 PRINT NOMBRE$,NUMTEL$
90 NEXT I
Ilustra la utilización de varios FIELD. En la línea 20, el campo de 35
bytes se define en el primer registro para almacenar la cantidad de
registros en el archivo. En el ciclo generado en las líneas 60 a 90, se
toman los nombres y teléfonos individuales definidos como campos en la
línea 30.
EJEMPLO 2:
10 FOR LOOP%=0 TO 7
20 FIELD $1, (LOOP%*16) AS OFFSET$,16 AS A$(LOOP%)
30 NEXT LOOP%
Muestra la construcción de una sentencia FIELD utilizando una matriz de
elementos de igual tamaño. El resultado obtenido equivale a la siguiente
sentencia:
FIELD #1,16 AS A$ (0) ,16 AS A$(l),16 AS A$
(2),...,16 AS A$(6),16 AS A$(7)
96
Publicidad
