Manual del programador fox pro

Manual del programador Visual FoxPro
Parte 1: Programación en Visual FoxPro
Visual FoxPro es una eficaz herramienta de administración de datos, pero además podrá beneficiarse de toda
su eficacia para crear aplicaciones. Comprender las técnicas de programación orientada a objetos y el modelo
controlado por eventos puede aumentar su productividad como programador.
Capítulo 1 Introducción a la programación: Si está empezando a programar, aprenda el proceso y el método
de programación en Visual FoxPro.
Capítulo 2 Programar una aplicación: Cuando programe una aplicación, organice sus componentes con el
Administrador de programas, una forma integrada de generar y probar su aplicación a medida que la cree.
Capítulo 3 Programación orientada a objetos: Con la programación orientada a objetos, puede crear
componentes de aplicación independientes que respondan a acciones del usuario y al sistema y que se puedan
mantener y reutilizar fácilmente.
Capítulo 4 Descripción del modelo de eventos: El modelo de eventos define cuándo y cómo tienen lugar las
interacciones con el usuario y el sistema.
Parte 2: Trabajar con datos
Para crear aplicaciones efectivas, debe comprender sus requisitos de datos y después diseñar sus bases de
datos, índices y tablas de forma que resuelvan estas necesidades.
Capítulo 5 Diseñar una base de datos: Aproveche la tecnología de bases de datos relacionales que ofrece
Visual FoxPro creando bases de datos bien diseñadas.
Capítulo 6 Crear bases de datos: Use bases de datos de Visual FoxPro para establecer relaciones entre tablas,
hacer cumplir la integridad referencial y administrar datos locales y remotos.
Capítulo 7 Trabajar con tablas: Asegúrese de que sus tablas tengan la estructura que necesita su aplicación.
La elección de los tipos de datos y los índices es esencial para el éxito de su aplicación.
Capítulo 8 Crear vistas: Use las vistas para tener acceso a registros de varias tablas y actualizarlos. Mediante
vistas puede actualizar datos locales y remotos.

Manual del programador, Parte 1: Programación en Visual FoxPro Página 1 de 83
file://C:temp~hh52BB.htm 30/05/2000
Manual del programador, Parte 1:
Programación en Visual FoxPro
Visual FoxPro es una eficaz herramienta de administración de datos, pero además podrá beneficiarse
de toda su eficacia para crear aplicaciones. Comprender las técnicas de programación orientada a
objetos y el modelo controlado por eventos puede aumentar su productividad como programador.
Capítulo 1 Introducción a la programación
Si está empezando a programar, aprenda el proceso y el método de programación en Visual FoxPro.
Capítulo 2 Programar una aplicación
Cuando programe una aplicación, organice sus componentes con el Administrador de programas, una
forma integrada de generar y probar su aplicación a medida que la cree.
Capítulo 3 Programación orientada a objetos
Con la programación orientada a objetos, puede crear componentes de aplicación independientes que
respondan a acciones del usuario y al sistema y que se puedan mantener y reutilizar fácilmente.
Capítulo 4 Descripción del modelo de eventos
El modelo de eventos define cuándo y cómo tienen lugar las interacciones con el usuario y el sistema.
Capítulo 1: Introducción a la programación
En Visual FoxPro funcionan juntas la programación por procedimientos y la programación orientada
a objetos para permitirle crear aplicaciones potentes y flexibles. Conceptualmente, puede imaginarse
que la programación consiste en escribir una secuencia de instrucciones con el fin de realizar tareas
específicas. A un nivel estructural, la programación en Visual FoxPro precisa la manipulación de los
datos almacenados.
Si no tiene experiencia en programación, este capítulo le ayudará a ponerse en marcha. Si ya conoce
otros lenguajes de programación y desea compararlos con Visual FoxPro, vea el tema Visual FoxPro
y otros lenguajes de programación. Si desea una descripción de la programación orientada a objetos,
consulte el capítulo 3, Programación orientada a objetos.

En este capítulo se abordan los temas siguientes:
l Ventajas de la programación
l La mecánica de la programación en Visual FoxPro
l Conceptos básicos de programación
l El proceso de la programación
l Usar procedimientos y funciones definidos por el usuario
l Pasos siguientes
Ventajas de la programación
Normalmente, cualquier función que pueda realizar con un programa podrá realizarla también a
mano, si dispone de suficiente tiempo. Por ejemplo, si desea consultar información sobre un cliente
en una tabla de clientes, como por ejemplo la empresa Ernst Handel, podría hacerlo manualmente si
sigue una secuencia concreta de instrucciones.
Para buscar manualmente un único pedido en una tabla
1. En el menú Archivo, elija Abrir.
2. En el cuadro Archivos de tipo, elija Tabla.
3. Haga doble clic en Customer.dbf en la lista de archivos.
4. En el menú Ver, elija Examinar.
5. Desplácese por la tabla, examinando el campo Company de los registros hasta encontrar “Ernst
Handel”.
Mediante programación podría conseguir el mismo resultado escribiendo los siguientes comandos de
Visual FoxPro en la ventana Comandos:
USE Customer
LOCATE FOR Company = "Ernst Handel"
BROWSE
Cuando haya localizado el pedido de esta empresa, tal vez desee incrementar la cantidad máxima del
pedido en un 3%.
Para incrementar manualmente la cantidad máxima del pedido
1. Presione la tecla Tab para desplazarse hasta el campo max_ord_amt.
2. Multiplique el valor mostrado en el campo max_ord_amt por 1,03 y escriba el nuevo valor en
el campo.
Para conseguir el mismo resultado mediante programación, escriba el siguiente comando de Visual
FoxPro en la ventana Comandos:

REPLACE max_ord_amt WITH max_ord_amt * 1,03
Es relativamente sencillo cambiar la cantidad máxima del pedido para un cliente, ya sea manualmente
o escribiendo las instrucciones en la ventana Comandos. Sin embargo, suponga que desea
incrementar en un 3% la cantidad máxima de pedido de todos los clientes. Podría hacerlo
manualmente, pero le llevaría mucho tiempo y es posible que cometiese errores. Si especifica las
instrucciones correctas en un archivo de programa, Visual FoxPro podrá realizar esta tarea con
rapidez y facilidad, sin cometer ningún error.
Programa de ejemplo para incrementar las cantidades máximas de pedido de todos los clientes
Código Comentarios
USE customer Abre la tabla CUSTOMER.
SCAN Examina todos los registros de la tabla y realiza
todas las instrucciones comprendidas entre SCAN
y ENDSCAN para cada registro.
REPLACE max_ord_amt WITH ;
max_ord_amt * 1.03
Incrementa la cantidad máxima de pedido en un
3%. (El punto y coma (;) indica que el comando
sigue en la línea siguiente).
ENDSCAN Final del código que se ejecuta para cada registro
contenido en la tabla.
La ejecución de un programa ofrece numerosas ventajas en comparación con la introducción de
distintos comandos en la ventana Comandos:
l Los programas se pueden modificar y volver a ejecutar.
l Se pueden ejecutar programas desde los menús, formularios y barras de herramientas.
l Los programas pueden ejecutar otros programas.
En las siguientes secciones se describe la mecánica, los conceptos y los procesos que subyacen a éste
y otros programas de Visual FoxPro.
La mecánica de la programación en Visual FoxPro
Puede programar en Visual FoxPro escribiendo código: instrucciones en forma de comandos,
funciones u operaciones que Visual FoxPro puede entender. Puede incluir estas instrucciones en:
l La ventana Comandos.
l Archivos de programa
l Ventanas de código de eventos o de métodos en el Diseñador de formularios o en el Diseñador
de clases
l Ventanas de código de procedimientos en el Diseñador de menús
l Ventanas de código de procedimientos en el Diseñador de informes

Usar la ventana Comandos
Puede ejecutar un comando de Visual FoxPro si lo escribe en la ventana Comandos y presiona
ENTRAR. Para volver a ejecutar el comando, lleve el cursor a la línea que contiene el comando y
presione nuevamente ENTRAR.
Puede ejecutar varias líneas de código en la ventana Comandos como si constituyeran un programa.
Para ejecutar varias líneas de código en la ventana Comandos
1. Seleccione las líneas de código.
2. Presione ENTRAR o elija Ejecutar selección en el menú emergente.
Como la ventana Comandos es una ventana de edición, puede modificar comandos con las
herramientas disponibles en Visual FoxPro. Puede modificar, insertar, eliminar, cortar, copiar o pegar
texto en la ventana Comandos.
La ventaja que supone poder escribir código en la ventana Comandos radica en el hecho de que las
instrucciones se ejecutan de inmediato. No es necesario guardar un archivo y ejecutarlo como un
programa.
Además, las opciones que elige en los menús y los cuadros de diálogo aparecen en la ventana
Comandos como comandos. Puede copiar y pegar estos comandos en un programa de Visual FoxPro
y a continuación ejecutar el programa repetidamente, lo cual facilita la ejecución de miles de
comandos, una y otra vez.
Crear programas
Un programa de Visual FoxPro es un archivo de texto que contiene una serie de comandos. Puede
crear un programa en Visual FoxPro de una de las siguientes maneras:
Para crear un programa
1. En el Administrador de proyectos, seleccione Programas en la ficha Código.
2. Elija Nuevo.
–O bien–
1. En el menú Archivo, elija Nuevo.
2. En el cuadro de diálogo Nuevo, seleccione Programa.
3. Elija Nuevo archivo.
–O bien–

l En la ventana Comandos, escriba:
MODIFY COMMAND
Visual FoxPro abrirá una nueva ventana denominada Programa1. Podrá entonces escribir su
programa en esta ventana.
Guardar programas
Una vez creado un programa, asegúrese de guardarlo.
Para guardar un programa
l En el menú Archivo, elija Guardar.
Si intenta cerrar un programa sin antes guardarlo, aparecerá un cuadro de diálogo en el que se le
preguntará si desea guardar o descartar los cambios realizados en el mismo.
Si guarda un programa creado a partir del Administrador de proyectos, el programa se agregará al
proyecto.
Si guarda un programa al que todavía no ha asignado un nombre, se abrirá el cuadro de diálogo
Guardar como, en el que podrá especificar el nombre del programa. Cuando haya guardado el
programa, podrá ejecutarlo o modificarlo.
Modificar programas
Después de guardar el programa, podrá modificarlo. En primer lugar, abra el programa de una de las
siguientes maneras:
Para abrir un programa
l Si el programa forma parte de un proyecto, selecciónelo en el Administrador de proyectos y
elija Modificar.
–O bien–
l En el menú Archivo, elija Abrir. Aparecerá un cuadro de diálogo en el que se muestra una
lista de los archivos disponibles. En la lista Archivos de tipo, elija Programa. En la lista de
archivos, seleccione el programa que desea modificar y elija Abrir.
–O bien–
l En la ventana Comandos, escriba el nombre del programa que desea modificar:
MODIFY COMMAND miprogram
–O bien–

l En la ventana Comandos, escriba:
MODIFY COMMAND ?
Cuando aparezca la lista de archivos, seleccione el programa que desea modificar y a
continuación elija Abrir.
Después de abrir el programa, podrá realizar cambios en el mismo. Cuando haya terminado de
introducir los cambios, asegúrese de guardar el programa.
Ejecutar programas
Después de crear un programa, podrá ejecutarlo.
Para ejecutar un programa
l Si el programa forma parte de un proyecto, selecciónelo en el Administrador de proyectos y
elija Ejecutar.
–O bien–
l En el menú Programa, elija Ejecutar. Cuando aparezca la lista de programas, seleccione el
programa que desea ejecutar y a continuación elija Ejecutar.
–O bien–
l En la ventana Comandos, escriba DO y el nombre del programa que desea ejecutar:
DO miprogram
Escribir código en las herramientas de diseño de Visual FoxPro
El Diseñador de formularios, el Diseñador de clases y el Diseñador de menús le permiten integrar
fácilmente código de programas mediante la interfaz de usuario, de forma que el código apropiado se
ejecute como respuesta a las acciones del usuario. El Diseñador de informes le permite crear informes
complejos y personalizados integrando código en el archivo del informe.
Para aprovechar plenamente la eficacia de Visual FoxPro, debe utilizar estas herramientas de diseño.
Si desea más información sobre el Diseñador de informes, consulte el capítulo 7, Diseñar informes y
etiquetas, del Manual del usuario. Para obtener información más detallada sobre el Diseñador de
formularios, consulte el capítulo 3, Programación orientada a objetos, de este manual. Para obtener
información más detallada sobre el Diseñador de formularios, consulte el capítulo 9, Crear
formularios, y si desea más información acerca del Diseñador de menús, consulte el capítulo 11,
Diseñar menús y barras de herramientas.
Conceptos básicos de programación

Cuando se programa, se almacenan datos y se manipulan mediante una serie de instrucciones. Los
datos y los contenedores en los que se almacenan los datos constituyen la materia prima de la
programación. Las herramientas utilizadas para manipular esta materia prima son comandos,
funciones y operadores.
Almacenar datos
Los datos con los que trabaja probablemente incluyan períodos de tiempo, dinero y elementos
contables, así como fechas, nombres, descripciones, etc. Cada dato corresponde a un determinado
tipo, es decir, pertenece a una categoría de datos que se manipula de maneras similares. Podría
trabajar directamente con estos datos sin almacenarlos, si bien perdería la mayor parte de la
flexibilidad y potencia que ofrece Visual FoxPro. Visual FoxPro aporta numerosos contenedores de
almacenamiento con el fin de ampliar su capacidad para manipular fácilmente los datos.
Los tipos de datos determinan la manera en que se almacenan los datos y la forma en que se pueden
utilizar tales datos. Puede multiplicar dos números, pero no puede multiplicar caracteres. Puede
imprimir caracteres en mayúsculas, pero no puede imprimir números en mayúsculas. En la tabla
siguiente se muestran algunos de los principales tipos de datos de Visual FoxPro.
Tipos de datos
Tipo Ejemplos
Numeric 123
3,1415
– 7
Character “Prueba”
“123”
“01/01/98”
Logical .T. (verdadero)
.F. (falso)
Date
DateTime
{^1998-01-01}
{^1998-01-01 12:30:00 p}
Contenedores de datos
Los contenedores de datos le permiten realizar las mismas operaciones con varios datos. Por ejemplo,
sumar las horas que ha trabajado un empleado, multiplicarlas por el salario por hora y restar los
impuestos para determinar el sueldo que ha percibido el empleado. Deberá realizar estas operaciones
para cada empleado y para cada período de pago. Si almacena esta información en contenedores y
realiza las operaciones sobre éstos, bastará con sustituir los datos antiguos por los nuevos datos y
volver a ejecutar el mismo programa. En la siguiente tabla se enumeran algunos de los principales
contenedores de datos disponibles en Visual FoxPro:

Tipo Descripción
Variables Elementos individuales de datos almacenados en la memoria RAM
(memoria de acceso aleatorio) del PC.
Registros de tabla Varias filas de campos predeterminados, cada uno de los cuales puede
contener un dato definido previamente. Las tablas se guardan en disco.
Matrices Varios elementos de datos almacenados en la memoria RAM.
Manipular datos
Los contenedores y los tipos de datos le ofrecen los módulos que necesita para manipular los datos.
Los elementos finales son los operadores, las funciones y los comandos.
Usar operadores
Los operadores se utilizan para vincular los datos. A continuación se muestran los operadores
utilizados habitualmente en Visual FoxPro.
Operador Tipos de datos válidos Ejemplo Resultado
= Todos ? n = 7 Imprime .T. si el valor
almacenado en la
variable es 7; de lo
contrario, imprime .F.
+ Numeric,
Character,Date,
DateTime
? "Fox" + "Pro" Imprime “FoxPro”
! or NOT Logical ? !.T. Imprime .F. (falso)
*, / Numeric ? 5 * 5
? 25 / 5
Imprime 25
Imprime 5
Nota Un signo de interrogación (?) situado delante de una expresión imprime el resultado de la
expresión y un carácter de nueva línea en la ventana de salida activa, que es normalmente la ventana
principal de Visual FoxPro.
Recuerde que debe utilizar el mismo tipo de datos con cada operador. Las siguientes instrucciones
almacenan dos datos numéricos en dos variables. Los nombres de variable empiezan con la letra n,
por lo que se puede determinar de inmediato que contienen datos numéricos, pero puede nombrarlas
con cualquier combinación de caracteres alfanuméricos y caracteres de subrayado.
nPrimero = 123
nSegundo = 45

Las instrucciones siguientes almacenan dos datos de caracteres en dos variables. Los nombres de
variable empiezan con la letra c para indicar que contienen datos de tipo character.
cPrimero = "123"
cSegundo = "45"
Las dos operaciones siguientes, suma y concatenación, producen resultados distintos, ya que el tipo
de datos es diferente en cada una de ellas.
? nPrimero + nSegundo
? cPrimero + cSegundo
Resultado
168
12345
Puesto que cPrimero contiene caracteres y nSegundo contiene datos numéricos, se producirá un error
de tipo de datos incorrecto si se intenta ejecutar el siguiente comando:
? cPrimero + nSegundo
Puede evitar este problema si utiliza funciones de conversión. Por ejemplo, STR( ) devuelve el valor
de tipo Character equivalente de un valor de tipo Numeric, mientras que VAL( ) devuelve el
equivalente numérico de una cadena de caracteres formada por números. Estas funciones y LTRIM( ),
que elimina los espacios iniciales, le permiten realizar las operaciones siguientes:
? cPrimero + LTRIM(STR(nSegundo))
? VAL(cPrimero) + nSegundo
Resultado
12345
168
Usar funciones
Las funciones devuelven un tipo específico de datos. Por ejemplo, las funciones STR( ) y VAL( )
utilizadas en la sección anterior devuelven valores de tipo Character y Numeric, respectivamente. Al
igual que ocurre con todas las funciones, estos tipos devueltos están documentados con las funciones.
Hay cinco maneras de llamar a una función de Visual FoxPro:
l Asignar a una variable el valor que devuelve la función. La siguiente línea de código almacena
la fecha actual del sistema en una variable denominada dHoy:
dHoy = DATE( )
l Incluir la llamada a la función en un comando de Visual FoxPro. El siguiente comando
establece el directorio predeterminado como el valor devuelto por la función GETDIR( ):

CD GETDIR( )
l Imprimir el valor devuelto en la ventana de salida activa. La siguiente línea de código imprime
la hora actual del sistema en la ventana principal de Visual FoxPro:
? TIME( )
l Llamar a la función sin almacenar en ningún lugar el valor devuelto. La siguiente llamada de
función desactiva el cursor:
SYS(2002)
l Incluir la función dentro de otra función. La siguiente línea de código imprime el día de la
semana:
? DOW(DATE( ))
A continuación se enumeran otros ejemplos de funciones utilizados en este capítulo:
Función Descripción
ISDIGIT( ) Devuelve el valor verdadero (.T.) si el carácter situado al comienzo de
una cadena es un número; de lo contrario, devuelve el valor falso (.F.).
FIELD( ) Devuelve el nombre de un campo.
LEN( ) Devuelve el número de caracteres de una expresión de caracteres.
RECCOUNT( ) Devuelve el número de registros de la tabla que está activa en este
momento.
SUBSTR( ) Devuelve el número especificado de caracteres a partir de una cadena de
caracteres, empezando en una posición especificada de la cadena.
Usar comandos
Un comando hace que se realice una determinada acción. Cada comando dispone de una sintaxis
específica que indica lo que se debe incluir con el fin de que se ejecute correctamente el comando.
Hay también cláusulas opcionales asociadas a los comandos que permiten especificar de forma más
detallada la acción que se desea realizar.
Por ejemplo, el comando USE permite abrir y cerrar tablas:
Sintaxis de USE Descripción
USE Cierra la tabla que aparece en el área de trabajo
actual.
USE customer Abre la tabla CUSTOMER en el área de trabajo
actual y cierra cualquier tabla que ya esté abierta

en el área de trabajo.
USE customer IN 0 Abre la tabla CUSTOMER en la siguiente área de
trabajo disponible.
USE customer IN 0 ;
ALIAS miCliente
Abre la tabla CUSTOMER en la siguiente área de
trabajo disponible y asigna al área de trabajo el
alias miCliente.
A continuación se muestran algunos ejemplos de comandos utilizados en este capítulo:
Comando Descripción
DELETE Selecciona registros especificados de una tabla para su eliminación.
REPLACE Sustituye el valor almacenado en el campo del registro por un nuevo
valor.
Go Coloca el puntero de registro en una posición específica de la tabla.
Control del flujo del programa
Visual FoxPro incluye una categoría especial de comandos que "envuelven" a otros comandos y
funciones, y determinan cuándo y con qué frecuencia se ejecutan. Estos comandos permiten realizar
bifurcaciones condicionales y bucles, dos herramientas de programación muy eficaces. El siguiente
programa muestra el uso de las bifurcaciones y los bucles condicionales. Estos conceptos se describen
de forma más detallada después del ejemplo.
Suponga que su empresa cuenta con 10.000 empleados y desea conceder a todos aquéllos que ganan
3.000.000 de pesetas o más un aumento salarial del 3%, y a todos los que ganan menos de 3.000.000
de pesetas un aumento del 6%. El siguiente ejemplo de programa le permite hacerlo.
Este programa presupone que en el área de trabajo actual está abierta una tabla que contiene un
campo numérico denominado salario. Si desea obtener información sobre las áreas de trabajo,
consulte "Usar múltiples tablas" en el capítulo 7, Trabajar con tablas..
Programa de ejemplo para aumentar el salario de los empleados
Código Observaciones
SCAN El código comprendido entre SCAN y ENDSCAN
se ejecuta tantas veces como registros haya en la
tabla. Cada vez que se ejecuta el código, el
puntero de registro se desplaza al siguiente
registro de la tabla.
IF salario >= 3000000
REPLACE salary WITH ;
salario * 1,03
Para cada registro, si el salario es mayor o igual
que 3.000.000, este valor se sustituye por un
nuevo salario que es un 3% superior.

El signo de punto y coma (;) que aparece después
de WITH indica que el comando continúa en la
siguiente línea.
ELSE
REPLACE salario WITH ;
salario * 1,06
Para cada registro, si el salario no es mayor o igual
que 3.000.000, se sustituye este valor por un
nuevo salario que es un 6% superior.
ENDIF
ENDSCAN
Final de la instrucción condicional IF.
Final del código que se ejecuta para cada registro
de la tabla.
Este ejemplo utiliza comandos de bifurcación y bucle condicional para controlar el desarrollo del
programa.
Bifurcación condicional
La bifurcación condicional permite someter a prueba condiciones y, a continuación, en función del
resultado de la prueba, realizar distintas operaciones. Visual FoxPro ofrece dos comandos que
permiten realizar una bifurcación condicional:
l IF ... ELSE ... ENDIF
l DO CASE ... ENDCASE
El código comprendido entre la instrucción inicial y la instrucción ENDIF o ENDCASE sólo se
ejecuta si una condición lógica se evalúa como verdadera (.T.). En el programa de ejemplo, el
comando IF se utiliza para distinguir entre dos estados: o el salario es de 3.000.000 pesetas o más, o
no lo es. Se adoptan diferentes medidas, dependiendo del estado.
En el siguiente ejemplo, si el valor almacenado en la variable nTempAgua es menor que 100, no se
realizará ninguna acción:
* definir una variable lógica como Verdadera si se cumple una condición.
IF nTempAgua >= 100
lEbullición = .T.
ENDIF
Nota Un asterisco al principio de una línea de un programa indica que la línea es un comentario.
Los comentarios ayudan al programador a recordar la función que debe realizar cada segmento de
código, si bien Visual FoxPro los pasa por alto.
Si se desea comprobar varias condiciones posibles, un bloque DO CASE ... ENDCASE puede
resultar más eficaz que varias instrucciones IF y además es más fácil realizar un seguimiento del
mismo.
Bucles
Un bucle le permite ejecutar una o más líneas de código tantas veces como sea necesario. En Visual

FoxPro hay tres comandos que permiten realizar bucles:
l SCAN ... ENDSCAN
l FOR ... ENDFOR
l DO WHILE ... ENDDO
Utilice SCAN cuando realice una serie de acciones para cada uno de los registros de una tabla, como
en el ejemplo de programa descrito anteriormente. El bucle SCAN permite escribir el código una vez
y ejecutarlo para cada registro a medida que el puntero de registro se desplaza por la tabla.
Utilice FOR cuando sepa cuántas veces debe ejecutarse la sección de código. Por ejemplo, sabe que
una tabla contiene un número específico de campos. Puesto que la función FCOUNT( ) de Visual
FoxPro devuelve este número, puede utilizar un bucle FOR para imprimir los nombres de todos los
campos de la tabla:
FOR nRecuento = 1 TO FCOUNT( )
? FIELD(nRecuento)
ENDFOR
Utilice DO WHILE cuando desee ejecutar una sección de código mientras cumpla una determinada
condición. Tal vez no sepa cuántas veces debe ejecutarse el código, pero sí sabe cuándo debe
detenerse la ejecución. Por ejemplo, supongamos que dispone de una tabla en la que figuran los
nombres y las iniciales de una serie de personas y desea utilizar las iniciales para consultar los
nombres de las personas. Surgiría un problema la primera vez que intentase agregar una persona
cuyas iniciales fuesen las mismas que las de otra persona contenida en la tabla.
Para resolver este problema, podría agregar un número a las iniciales. Por ejemplo, el código de
identificación de Miguel Suárez podría ser MS. La siguiente persona cuyas iniciales fuesen las
mismas, Margarita Sánchez, sería MS1. Si a continuación anexase María Sanz a la tabla, su código de
identificación sería MS2. Un bucle DO WHILE permite localizar el número correcto que se debe
adjuntar a las iniciales.
Programa de ejemplo que utiliza DO WHILE para generar un número de identificación único
Código Comentarios
nAquí = RECNO() Guardar la posición del registro.
cIniciales = LEFT(nombre,1) + ;
LEFT(apellido,1)
nSufijo = 0
Obtener las iniciales de la persona a partir de las
primeras letras de los campos nombre y apellido.
Si es necesario, establecer una variable que
contenga el número que se debe agregar al final de
las iniciales de una persona.
LOCATE FOR id_persona = cIniciales Comprobar si hay otra persona en la tabla cuyas
iniciales son las mismas.
DO WHILE FOUND( ) Si en otro registro de la tabla hay un valor
id_persona que coincide con cIniciales, la

función FOUND( ) devolverá el valor verdadero
(.T.) y se ejecutará el código contenido en el bucle
DO WHILE.
Si no se encuentra ninguna coincidencia, la
siguiente línea de código que se ejecute será la
línea que figura a continuación de ENDDO.
nSufijo = nSufijo + 1
cIniciales = ;
LEFT(cIniciales,2);
+ ALLTRIM(STR(nSufijo))
Preparar un sufijo nuevo y anexarlo al final de las
iniciales.
CONTINUE CONTINUE hace que se vuelva a evaluar el
último comando LOCATE. El programa
comprueba si el nuevo valor contenido en
cIniciales ya existe en el campo id_persona de
otro registro. Si es así, FOUND( ) seguirá
devolviendo el valor .T. y se volverá a ejecutar el
código contenido en el bucle DO WHILE. Si el
nuevo valor contenido en cIniciales es
efectivamente único, FOUND( ) devolverá el valor
.F. y la ejecución del programa continuará con la
línea de código que figura a continuación de
ENDDO.
ENDDO Final del bucle DO WHILE.
GOTO nAquí
REPLACE id_persona WITH cIniciales
Volver al registro y almacenar el código de
identificación único en el campo id_persona.
Puesto que no hay manera de saber de antemano cuántas veces se encontrarán los códigos de
identificación coincidentes que ya se están utilizando, se utiliza el bucle DO WHILE.
El proceso de la programación
Cuando entienda los conceptos básicos, la programación será un proceso reiterativo. Los pasos se
repiten numerosas veces, perfeccionándose el código a medida que se avanza. Al principio, someterá
el código a prueba frecuentemente mediante un sistema de prueba y tanteo. Cuanto más conozca el
lenguaje, mayor será la rapidez con que pueda programar y podrá realizar más pruebas preliminares
mentalmente.
Entre los pasos básicos de la programación cabe citar los siguientes:
l Definir el problema.
l Desglosar el problema en elementos discretos.
l Construir los elementos.
l Comprobar y perfeccionar los elementos.
l Ensamblar los elementos.

l Comprobar el programa en su conjunto.
A continuación se enumeran algunos aspectos que debe tener presentes al empezar a programar:
l Defina claramente el problema antes de intentar resolverlo. Si no lo hace, acabará por realizar
numerosos cambios, desechará código, tendrá que empezar de nuevo o bien terminará con un
resultado que no es realmente lo que deseaba.
l Desglose el problema en pasos manejables, en lugar de intentar resolver todo el problema de
una sola vez.
l Pruebe y depure secciones de código a medida que desarrolla el programa. Compruebe que el
código hace lo que quiere que haga. La depuración es el proceso de encontrar y solucionar
problemas que impiden que el código se ejecute correctamente.
l Perfeccione los datos y el almacenamiento de datos para facilitar la manipulación de estos
datos a través del código del programa. Esto suele implicar estructurar las tablas de forma
adecuada.
En el resto de esta sección se describen los pasos que debe seguir para construir un pequeño programa
Visual FoxPro.
Definir el problema
Antes de poder resolver un problema, debe formularlo claramente. Algunas veces, si ajusta la
formulación del problema podrá ver más opciones para resolverlo.
Suponga que obtiene muchos datos de distintos orígenes. Si bien la mayoría de los datos son
estrictamente numéricos, algunos valores contienen guiones y espacios en blanco además de
números. Suponga que quiere eliminar todos los espacios en blanco y los guiones de dichos campos y
guardar los datos numéricos.
En lugar de intentar eliminar los espacios en blanco y los guiones de los datos originales, podría
formular el objetivo del programa como:
Objetivo Reemplazar los valores existentes de un campo por otros valores que contengan todo lo
que contenían los valores originales, excepto los espacios en blanco y los guiones.
Esta formulación evita la dificultad que supone manipular una cadena de caracteres cuya longitud
sigue cambiando a medida que trabaja con ella.
Descomponer el problema
Puesto que tiene que indicar instrucciones específicas a Visual FoxPro en términos de operaciones,
comandos y funciones, debe descomponer el problema en pasos discretos. La tarea más discreta para
este problema sería examinar cada carácter de la cadena. Hasta que pueda examinar un carácter
individualmente, no podrá determinar si desea guardarlo.
Una vez que examine un carácter, deberá comprobar si se trata de un guión o de un espacio en
blanco. En este momento, quizá desee refinar la declaración del problema. ¿Y si obtuviera más
adelante datos que contienen paréntesis de apertura y de cierre? ¿Y si desea deshacerse de los
símbolos de moneda, las comas y los puntos? Cuanto más genérico pueda hacer el código, más

trabajo se ahorrará de ahora en adelante; lo principal es ahorrar trabajo. He aquí una formulación del
problema válida para una variedad mucho mayor de datos:
Objetivo refinado Reemplazar los valores existentes en un campo por otros valores que contengan
únicamente los caracteres numéricos de los valores originales.
Con esta formulación, ahora puede volver a plantear el problema a nivel de carácter: si el carácter es
numérico, guardar el carácter; si el carácter es no numérico, pasar al siguiente carácter. Cuando haya
construido una cadena que sólo contenga los elementos numéricos de la cadena inicial, podrá
reemplazar la primera cadena y pasar al siguiente registro hasta que haya terminado con todos los
datos.
Para resumir, el problema se descompone en los siguientes elementos:
1. Examinar cada carácter.
2. Decidir si el carácter es numérico o no.
3. Si es numérico, copiarlo a la segunda cadena.
4. Cuando haya terminado con todos los caracteres de la cadena original, reemplazar la cadena
original con la cadena que sólo contiene valores numéricos.
5. Repetir estos pasos para todos los registros de la tabla.
Construir los elementos
Cuando sepa qué debe hacer, puede empezar a formular los elementos en términos de comandos,
funciones y operadores de Visual FoxPro.
Como los comandos y funciones se usan para manipular datos, tiene algunos datos de prueba para
trabajar con ellos. Los datos de prueba sirven para simular los datos verdaderos lo mejor posible.
Para este ejemplo puede almacenar en una variable una cadena de prueba introduciendo el siguiente
comando en la ventana Comandos:
cTest = "123-456-7 89 0"
Examinar cada carácter
En primer lugar desea buscar un único carácter en la cadena. Para obtener una lista de funciones que
se pueden utilizar para manipular cadenas, vea Funciones de carácter.
Verá tres funciones que devuelven determinadas secciones de una cadena: LEFT( ), RIGHT( ) y
SUBSTR( ). De estas tres funciones, SUBSTR( ) devuelve caracteres de cualquier parte de la cadena.
SUBSTR( ) usa tres argumentos o parámetros: la cadena, la ubicación inicial dentro de la cadena y el
número de caracteres que se deben devolver de la cadena, empezando por la ubicación inicial. Para
comprobar si SUBSTR( ) va a hacer lo que usted quiere, podría escribir los siguientes comandos en la

ventana Comandos:
? SUBSTR(cTest, 1, 1)
Resultado
1
3
-
Puede ver que en la ventana principal de Visual FoxPro se muestran el primer, el tercer y el octavo
caracteres de la cadena de prueba.
Para hacer eso mismo varias veces, utilice un bucle. Puesto que la cadena de prueba tiene un número
determinado de caracteres (14), puede utilizar un bucle FOR. El contador del bucle FOR se
incrementa cada vez que se ejecuta el código del bucle, por lo que puede utilizar el contador de la
función SUBSTR( ). Puesto que en la ventana Comandos no puede comprobar las construcciones de
bucles, deberá probar la siguiente sección de código en un programa de ejemplo.
Para crear un programa nuevo
1. Escriba el siguiente comando en la ventana Comandos:
MODIFY COMMAND numonly
2. En la ventana que aparecerá, escriba las siguientes líneas de código:
FOR nCnt = 1 TO 14
? SUBSTR(cTest, nCnt, 1)
ENDFOR
Ahora que ha creado un programa, ya puede ejecutarlo.
Para ejecutar un programa
1. En la ventana del programa abierto, presione CTRL+E.
2. Si aparece un cuadro de diálogo Guardar, elija Aceptar.
Cuando ejecute este programa, los caracteres individuales de la cadena de prueba se imprimirán en
líneas distintas en la ventana principal de Visual FoxPro.
Comprobar parte del programa

Ya ha completado la primera tarea. Ahora puede examinar cada carácter de la cadena.
Decidir si el carácter es numérico
Cuando tenga un único carácter de la cadena, debe saber si se trata de un número. Puede hacerlo con
ISDIGIT( ).
Puede probar los siguientes comandos en la ventana Comandos:
? ISDIGIT('2')
? ISDIGIT('-')
? ISDIGIT(SUBSTR(cTest, 3, 1))
Resultado
.T.
.F.
.T.
De este resultado se desprende que ‘2’ es un número, ‘ – ’ no es un número y el tercer carácter, 3, es
un número.
Si el carácter es numérico, copiarlo a la segunda cadena
Ahora que puede examinar los caracteres y determinar si son o no numéricos, necesita una variable

para almacenar los valores numéricos: cNumOnly.
Para crear la variable, debe asignarle un valor inicial, una cadena de longitud cero:
cNumOnly = ""
A medida que el bucle FOR recorre la cadena, es conveniente crear otra variable para almacenar
temporalmente cada carácter de la cadena a medida que ésta se manipula:
cCharacter = SUBSTR(cTest, nCnt, 1)
Sugerencia Normalmente es mejor almacenar en una variable de memoria el resultado de un
cálculo, evaluación o función. Entonces puede manipular la variable en lugar de tener que repetir el
cálculo o la evaluación.
La siguiente línea de código puede utilizarse cada vez que se encuentra un número para sumar el
número a la segunda cadena:
cNumOnly = cNumOnly + cCharacter
Hasta ahora, el programa es el siguiente:
cNumOnly = ""
FOR nCnt = 1 TO 14
IF ISDIGIT(cCharacter)
ENDIF
ENDFOR
Prueba de los elementos
Si agrega un par de comandos al final para imprimir las cadenas y ejecutar el programa, podrá ver que
el programa funciona con la cadena de prueba:
cNumOnly = ""
FOR nCnt = 1 TO 14
ENDIF
ENDFOR
? cTest
? cNumOnly
Resultado
123-456-7 89 0
1234567890
El resultado parece correcto. Pero si cambia la cadena de prueba mientras comprueba los elementos,
puede tener problemas. Escriba el siguiente comando en la ventana Comandos y ejecute de nuevo el
programa:

cTest = "456-789 22"
El programa generará un mensaje de error. El bucle FOR ha intentado ejecutarse 14 veces, pero en la
cadena sólo había 10 caracteres. Necesita una forma de ajustar las longitudes variables de las cadenas.
Use LEN( ) para devolver el número de caracteres de una cadena. Si sustituye este comando en el
bucle FOR, verá que el programa funciona correctamente con ambas cadenas de prueba:
cNumOnly = ""
FOR nCnt = 1 TO LEN(cTest)
ENDIF
ENDFOR
? cTest
? cNumOnly
Agrupar los elementos
Para completar la solución de programación para este problema, quizá desee volver a leer sus datos
de una tabla. Cuando tenga una tabla, explore los registros y aplique su código de programa a un
campo de la tabla, en lugar de a una variable.
En primer lugar, podría crear una tabla temporal que contuviera diversas cadenas de prueba. Dicha
tabla podría contener un único campo de caracteres llamado Testfield y cuatro o cinco registros:
Contenido de Testfield
123-456-7 89 0 -9221 9220 94321 99-
456-789 22 000001 98-99-234
Cuando sustituya el nombre de la cadena de prueba por el nombre del campo, el programa será
similar al siguiente:
FOR nCnt = 1 TO LEN(TestField)
cCharacter = SUBSTR(TestField, nCnt, 1)
ENDIF
ENDFOR
? TestField
? cNumOnly
Puede ajustar manualmente el puntero de registro si examina la tabla y se desplaza por ella. Cuando
el puntero de registro esté en cada uno de los registros, el programa funcionará de la forma deseada.
O bien, ahora puede envolver el código de desplazamiento por la tabla en el resto de su programa:
SCAN
cNumOnly = ""

ENDIF
ENDFOR
? TestField
? cNumOnly
?
ENDSCAN
Resultado
123-456-7 89 0
1234567890
456-789 22
45678922
-9221 9220 94321 99-
922192209432199
000001 98-99-234
0000019899234
Comprobar todo el programa
En lugar de imprimir la cadena al final del programa, quizá desee guardarla en la tabla. Para ello,
utilice la siguiente línea de código:
REPLACE TestField WITH cNumOnly
El programa completo será el siguiente:
SCAN
cNumOnly = ""
ENDIF
ENDFOR
REPLACE TestField WITH cNumOnly
ENDSCAN
Cuando tenga el programa completo, necesitará probarlo con los datos de ejemplo antes de probarlo
con los datos reales.
Aumentar la robustez del programa
Un programa robusto hace lo que usted quiere que haga, pero también se anticipa a posibles
problemas y se encarga de ellos. Este programa hace lo que usted quiere, pero hace algunas
suposiciones que deben ser verdaderas para que funcione:
l Hay una tabla abierta en el área de trabajo actual.
l La tabla tiene un campo de caracteres llamado TestField.
Si la tabla no está abierta en el área de trabajo actual o si la tabla no tiene un campo de caracteres con

el nombre esperado, el programa generará un mensaje de error y no realizará la tarea prevista.
Programa para eliminar los caracteres no numéricos de todos los registros de un campo
Código Comentarios
lFieldOK = .F. Esta variable determina si existen las
condiciones necesarias para que el programa
funcione. Inicialmente se establece la variable
como falsa (.F.) para suponer que las
condiciones necesarias no existen.
FOR nCnt = 1 TO FCOUNT( )
IF FIELD(nCnt) = ;
UPPER("TestField")
IF TYPE("TestField") = "C"
lFieldOK = .T.
ENDIF
EXIT
ENDIF
ENDFOR
Esta sección de código recorre todos los campos
de la tabla actual hasta que encuentra un campo
de caracteres llamado TestField. En cuanto se
encuentra el campo correcto, lFieldOK se
establece como verdadera (.T.) y EXIT finaliza
el bucle (no hay ninguna razón para continuar
con la comprobación una vez identificado el
campo correcto). Si ningún campo cumple el
criterio, lFieldOK seguirá siendo falso (.F.).
IF lFieldOK La sección de conversión del programa sólo se
ejecuta si en la tabla activa actualmente hay un
campo de caracteres llamado TestField.
SCAN
cNumOnly = ""
cCharacter = ;
SUBSTR(TestField, nCnt, 1)
cNumOnly = cNumOnly + ;
cCharacter
ENDIF
ENDFOR
El código de conversión.
REPLACE TestField WITH ;
cNumOnly
ENDSCAN
ENDIF Fin de la condición IF lFieldOK.
La mayor limitación de este programa es que sólo puede utilizarlo para un campo. Si desea eliminar
los caracteres no numéricos de un campo distinto de TestField, tendrá que recorrer el programa y
cambiar cada aparición de TestField por el nombre del otro campo.
Convertir el programa a un procedimiento, según se explica en las próximas secciones, permite hacer
que el código que ha escrito sea más genérico y más reutilizable, con lo que ahorrará trabajo más
adelante.

Usar procedimientos y funciones definidas por el usuario
Los procedimientos y funciones permiten mantener en un único lugar el código que utiliza con
frecuencia y llamarlo a través de su aplicación siempre que lo necesite. Esto hace que su código sea
más fácil de leer y mantener, ya que en un procedimiento el cambio se realiza una sola vez, no varias
veces como ocurre en un programa.
En Visual FoxPro, los procedimientos son similares a éste:
PROCEDURE miproc
* Esto es un comentario, pero podría ser código ejecutable
ENDPROC
Tradicionalmente, los procedimientos contienen código que usted escribe para realizar una operación
y funciones que calculan y devuelven un valor. En Visual FoxPro, las funciones son similares a los
procedimientos:
FUNCTION mifunción
* Esto es un comentario, pero podría ser código ejecutable
ENDFUNC
Puede incluir procedimientos y funciones en un archivo de programa distinto o al final de un archivo
de programa que contenga código normal de programa. En un archivo de programa no puede tener
código ejecutable de programa a continuación de los procedimientos y las funciones.
Si incluye sus procedimientos y funciones en un archivo de programa distinto, podrá hacer accesibles
estos procedimientos y funciones desde su programa si utiliza el comando SET PROCEDURE TO.
Por ejemplo, para un archivo llamado FUNPROC.PRG, utilice el siguiente comando en la ventana
Comandos:
SET PROCEDURE TO funproc.prg
Llamar a un procedimiento o a una función
Hay dos formas de llamar a un procedimiento o a una función en sus programas:
l Utilizar el comando DO. Por ejemplo:
DO miproc
–O bien–
l Incluir detrás del nombre de la función un par de paréntesis. Por ejemplo:
mifunción( )
Cada uno de estos métodos puede ampliarse enviando o recibiendo valores desde el procedimiento o
la función.

Enviar valores a un procedimiento o a una función
Para enviar valores a procedimientos o funciones se incluyen parámetros. Por ejemplo, el
procedimiento siguiente acepta un solo parámetro:
PROCEDURE miproc( cString )
* La línea siguiente muestra un mensaje
MESSAGEBOX ("miproc" + cString)
ENDPROC
Nota Incluir los parámetros dentro de los paréntesis en la línea de definición de un procedimiento o
una función, por ejemplo PROCEDURE miproc(cString), indica que el parámetro tiene alcance local
al procedimiento o la función. También puede permitir que una función o un procedimiento acepte
parámetros de alcance local mediante LPARAMETERS.
Los parámetros funcionan de manera idéntica en una función. Para enviar un valor como un
parámetro de este procedimiento o a una función, podría utilizar una cadena o una variable que
contuviera una cadena, como se muestra en la tabla siguiente.
Transferencia de parámetros
Código Comentarios
DO miproc WITH cTestString
DO miproc WITH "cadena de prueba"
Llama a un procedimiento y transfiere una
variable de caracteres o un literal de cadena.
mifunción("cadena de prueba")
mifunción( cTestString )
Llama a una función y transfiere una copia de
una cadena literal o una variable de caracteres.
Nota Si llama un procedimiento o función sin usar el comando DO, la configuración de
UDFPARMS controla cómo se transfieren los parámetros. De forma predeterminada, UDFPARMS
se establece como VALUE, por lo que se transferirán copias de los parámetros. Cuando utilice DO,
se empleará el parámetro real (el parámetro se transfiere por referencia) y cualquier cambio realizado
en el procedimiento o en la función se reflejarán en los datos originales, cualquiera que sea la
configuración de UDFPARMS.
Puede enviar múltiples valores a un procedimiento o función si los separa mediante comas. Por
ejemplo, el siguiente procedimiento espera tres parámetros: una fecha, una cadena de caracteres y un
número.
PROCEDURE miproc( dDate, cString, nTimesToPrint )
FOR nCnt = 1 to nTimesToPrint
? DTOC(dDate) + " " + cString + " " + STR(nCnt)
ENDFOR
ENDPROC
Podría llamar a este procedimiento mediante la siguiente línea de código:
DO miproc WITH DATE(), "Hola", 10

Recibir valores desde una función
El valor devuelto de forma predeterminada es verdadero (.T.), pero puede utilizar el comando
RETURN para devolver cualquier valor. Por ejemplo, la siguiente función devuelve una fecha
correspondiente a dos semanas después de la fecha que se ha pasado como parámetro.
FUNCTION plus2weeks
PARAMETERS dDate
RETURN dDate + 14
ENDFUNC
La siguiente línea de código almacena el valor devuelto desde esta función en una variable:
dDeadLine = plus2weeks(DATE())
En la tabla siguiente se muestran las formas en que puede almacenar o mostrar valores devueltos por
una función.
Manipular valores devueltos
Código Comentarios
var = mifunción( ) Almacena en una variable el valor devuelto por la
función.
? mifunción( ) Imprime en la ventana activa de salida el valor
devuelto por la función.
Comprobar parámetros en un procedimiento o en una función
Es conveniente comprobar que los parámetros enviados a su procedimiento o a su función son los que
espera recibir. Puede utilizar las funciones TYPE( ) y PARAMETERS( ) para comprobar el tipo y el
número de parámetros enviados a su procedimiento o a su función.
El ejemplo de la sección anterior necesita recibir un parámetro de tipo Fecha. Puede utilizar la
función TYPE( ) para asegurarse de que el valor que su función recibe es del tipo adecuado.
FUNCTION plus2weeks( dDate )
IF TYPE("dDate") = "D"
RETURN dDate + 14
ELSE
MESSAGEBOX( "requiere un parámetro de tipo Fecha" )
RETURN {} && Devuelve una fecha vacía
ENDIF
ENDFUNC
Si un procedimiento espera menos parámetros de los que recibe, Visual FoxPro generará un mensaje
de error. Por ejemplo, si especificó dos parámetros pero llamó al procedimiento con tres parámetros,
obtendrá un mensaje de error. Pero si un procedimiento espera más parámetros de los que recibe, los
parámetros adicionales simplemente se inicializarán como falso (.F.). Puesto que no hay ninguna
forma de decir si el último parámetro se estableció como falso (.F.) o se omitió, el siguiente

procedimiento comprueba que se ha enviado el número correcto de parámetros:
PROCEDURE SaveValue( cStoreTo, cNewVal, lIsInTable )
IF PARAMETERS( ) < 3
MESSAGEBOX( "No se han pasado suficientes parámetros". )
RETURN .F.
ENDIF
IF lIsInTable
REPLACE (cStoreTo) WITH (cNewVal)
ELSE
&cStoreTo = cNewVal
ENDIF
RETURN .T.
ENDPROC
Convertir el programa NUMONLY en una función
NUMONLY.PRG, el programa de ejemplo descrito en la sección El proceso de la programación,
puede hacerse más robusto y útil si crea una función para la parte del programa que elimina los
caracteres no numéricos de una cadena.
Procedimiento de ejemplo para devolver caracteres numéricos de una cadena
Código Comentarios
FUNCTION NumbersOnly( cMixedVal ) Principio de la función, que acepta una cadena de
caracteres.
cNumOnly = ""
FOR nCnt = 1 TO LEN(cMixedVal)
cCharacter = ;
SUBSTR(cMixedVal, nCnt, 1)
cNumOnly = ;
cNumOnly + cCharacter
ENDIF
ENDFOR
Crea una cadena que sólo tiene los caracteres
numéricos de la cadena original.
RETURN cNumOnly Devuelve la cadena que sólo tiene caracteres
numéricos.
ENDFUNC Fin de la función.
Además de permitirle utilizar este código en múltiples situaciones, esta función mejora la legibilidad
del programa:
SCAN
REPLACE FieldName WITH NumbersOnly(FieldName)
ENDSCAN
O, más sencillo aún:
REPLACE ALL FieldName WITH NumbersOnly(FieldName)

Cómo avanzar
La programación por procedimientos, junto con la programación orientada a objetos y las
herramientas de diseño de Visual FoxPro, pueden ayudarle a programar una versátil aplicación de
Visual FoxPro. El resto de este manual explica temas con los que se encontrará a medida que
programe aplicaciones de Visual FoxPro.
Para obtener más información acerca de la programación orientada a objetos, consulte el capítulo 3,
Programación orientada a objetos. Para aprender a diseñar formularios con el Diseñador de
formularios, consulte el capítulo 9,Crear formularios.
Capítulo 2: Programar una aplicación
Una aplicación de Visual FoxPro incluye normalmente una o más bases de datos, un programa
principal que configura el entorno del sistema para la aplicación y una interfaz de usuario compuesta
por formularios, barras de herramientas y menús. Las consultas y los informes permiten que los
usuarios extraigan información de sus datos.
Este capítulo trata los temas siguientes:
l Diseñar la aplicación
l Crear bases de datos
l Crear clases
l Proporcionar acceso a la funcionalidad
l Proporcionar acceso a la información
l Pruebas y depuración
l Para obtener información acerca de la programación de aplicaciones con el Generador de
aplicaciones y el Marco de aplicaciones mejorado, vea Programar aplicaciones con el Marco de
aplicaciones.
Diseñar la aplicación
Un diseño apropiado ahorra tiempo, esfuerzo, dinero y permite mantener la cordura al programar.
Cuanto más implique a los usuarios en el proceso de diseño, mejor. No importa lo cuidadosamente
que se diseñe; aun así, acabará refinando las especificaciones a medida que avance el proyecto y los
usuarios le proporcionen información adicional.
Algunas de las decisiones de diseño que tome afectarán a la forma en que creará elementos de la
aplicación. ¿Quién utilizará la aplicación? ¿Cuál es el centro de actividad del usuario? ¿Con qué
cantidad de datos se supone que se trabajará? ¿Se utilizarán servidores de datos de apoyo o los datos
serán exclusivamente locales para un único usuario o para múltiples usuarios a través de una red?
Considere estos factores antes de avanzar demasiado en el proyecto.
Actividades frecuentes de usuario

Incluso si sus usuarios finales trabajan con clientes, pedidos y piezas, lo que determinará la forma en
que la aplicación deberá tratar los datos es el modo en que los usuarios trabajan con esa información.
Un formulario de entrada de pedidos, como el de Tastrade.app (en el directorio ...SamplesVfp98
Tastrade de Visual Studio), puede ser necesario para algunas aplicaciones, pero no sería una buena
herramienta para administrar inventarios o para hacer un seguimiento de las ventas, por ejemplo.
Tamaño de la base de datos
Deberá pensar más en el rendimiento si trata con grandes conjuntos de datos. En el capítulo 15,
Optimizar aplicaciones, se explican los métodos para optimizar el rendimiento. También puede
desear ajustar el modo en que los usuarios pueden desplazarse por los datos. Si tiene veinte o treinta
registros en una tabla, está bien que permita que los usuarios desplacen el puntero de registro de una
tabla un registro cada vez. Si tiene veinte o treinta mil registros, deberá proporcionar otros sistemas
para obtener los datos deseados: agregar listas o cuadros de diálogos de búsqueda, filtros, consultas
personalizadas, etc. El capítulo 10, Usar controles, explica la forma de utilizar una lista para
seleccionar registros específicos de una tabla. En el capítulo 8, Crear vistas, se explica la creación de
consultas parametrizadas.
Usuario individual frente a múltiples usuarios
Es conveniente crear la aplicación pensando que múltiples usuarios tendrán acceso simultáneo a la
base de datos. Visual FoxPro facilita la programación para acceso compartido. En el capítulo 17,
Programar para acceso compartido, se describen técnicas para permitir que varios usuarios tengan
acceso simultáneo a la base de datos.
Consideraciones internacionales
Si sabe que su aplicación sólo se utilizará en el entorno de un único idioma, no debe preocuparse de
la internacionalización. Por otra parte, si desea ampliar su mercado, o si sus usuarios deben trabajar
con datos o configuraciones de entorno internacionales, deberá tener en cuenta estos factores al crear
la aplicación. En el capítulo 18, Programar aplicaciones internacionales, se explican los puntos que
debe tener en cuenta cuando programe aplicaciones internacionales.
Datos locales frente a datos remotos
Si su aplicación trata con datos remotos, deberá administrarlos de forma diferente a como
administraría los datos nativos de Visual FoxPro. En el capítulo 8, Crear vistas, se explica la forma de
crear vistas para datos locales o remotos. En la parte 6 del Manual del programador, Crear
soluciones cliente-servidor, se explica cómo diseñar aplicaciones que trabajen sin problemas con
datos remotos.
Descripción general del proceso
El proceso de crear una aplicación es muy repetitivo. Puesto que no hay dos aplicaciones exactamente
iguales, lo que hará probablemente será definir prototipos y refinar algunos componentes varias veces
antes de obtener un producto final. Las expectativas de los usuarios finales, o sus solicitudes, también
pueden cambiar, lo que hará necesario redefinir aspectos de la aplicación. Además, nadie escribe
código libre de errores, por lo que las pruebas y la depuración conducen a algún tipo de rediseño o

rescritura.
El proceso de creación de una aplicación
Además de tener en cuenta la imagen general durante la fase de diseño, tendrán que decidir cuáles
son las funciones necesarias, qué datos están implicados y cómo debe estar estructurada la base de
datos. Tendrá que diseñar una interfaz para que el usuario tenga acceso a la funcionalidad de la
aplicación. Puede crear informes y consultas para que los usuarios puedan extraer información útil de
sus datos.
Iniciar la programación
Después de haber pensado qué componentes son necesarios en la aplicación, es posible que quiera
configurar un conjunto de directorios y un proyecto para organizar los archivos componentes que
desea crear para la aplicación. Puede crear el conjunto de directorios mediante el Explorador de
Windows y puede crear el proyecto en el Administrador de proyectos o usar el Asistente para
aplicaciones para configurarlos a la vez. Este nuevo Asistente para aplicaciones abre el Generador de
aplicaciones para que pueda personalizar aún más un proyecto y los componentes que inicie en el
Asistente. Por compatibilidad con versiones anteriores, puede elegir el Asistente para aplicaciones
(5.0) anterior.
Usar el Administrador de proyectos

El Administrador de proyectos permite compilar la aplicación completa. En la fase de programación
de la aplicación, el Administrador de proyectos facilita el diseño, la modificación y la ejecución de
los componentes individuales de su aplicación.
El Administrador de proyectos
Cuando utilice el Administrador de proyectos, podrá:
l Modificar y ejecutar partes de su aplicación (formularios, menús, programas) con tan sólo
algunos clics.
l Arrastrar clases, tablas y campos desde el Administrador de proyectos hasta el Diseñador de
formularios o el Diseñador de clases.
l Arrastrar clases entre bibliotecas de clases.
l Ver y modificar fácilmente sus tablas y bases de datos.
l Agregar descripciones para los componentes de la aplicación.
l Arrastrar y colocar elementos entre proyectos.
Para obtener información detallada acerca del uso del Administrador de proyectos, consulte el
capítulo 1, Introducción, del Manual del usuario. Para obtener información acerca de la compilación
de aplicaciones, consulte el capítulo 13, Compilar una aplicación, en este manual.
Crear bases de datos
Puesto que una aplicación de base de datos depende tanto de los datos subyacentes, la mejor forma de
empezar a diseñar su aplicación es comenzar por los datos. Puede configurar su propia base de datos
y determinar cuáles serán las relaciones entre las tablas, qué reglas comerciales va a exigir, etc. antes

de diseñar cualquier componente de interfaz o de manipulación de datos. La creación de una
estructura sólida de la base de datos hará que el trabajo de programación sea mucho más sencillo.
En el capítulo 5, Diseñar bases de datos, el capítulo 6, Crear bases de datos y el capítulo 7, Trabajar
con tablas, se explican los temas de diseño y uso de Visual FoxPro para diseñar tablas y bases de
datos efectivas y eficaces.
Crear clases
Puede crear una aplicación robusta, orientada a objetos y controlada por eventos utilizando
únicamente las clases de base de Visual FoxPro. Es posible que no tenga que crear una clase, pero
deseará hacerlo. Además de hacer que el código sea más manejable y sencillo de mantener, una
biblioteca de clases sólida le permite crear rápidamente prototipos e incorporar funciones a una
aplicación. Puede crear clases en un archivo de programa, en el Diseñador de formularios (mediante
el comando Guardar como clase del menú Archivo) o en el Diseñador de clases.
El capítulo 3, Programación orientada a objetos, trata algunos de los beneficios de la creación de
clases y detalla su creación con el Diseñador de clases o mediante programación.
Proporcionar acceso a la funcionalidad
La satisfacción del usuario se verá influenciada en gran medida por la interfaz que le proporcione
para la funcionalidad de su aplicación. Puede tener un modelo de clases muy limpio, código muy
elegante y soluciones muy inteligentes para los problemas difíciles de su aplicación, pero esto casi
siempre está oculto a los clientes. Lo que ellos ven es la interfaz que usted les proporciona.
Afortunadamente, las herramientas de diseño de Visual FoxPro facilitan la creación de interfaces
atractivas y ricas en características.
La interfaz de usuario consiste principalmente en formularios, barras de herramientas y menús. Puede
asociar toda la funcionalidad de su aplicación con controles o comandos de menú en la interfaz. En el
capítulo 9, Crear formularios, se describe la creación de formularios y conjuntos de formularios. La
utilización de controles de Visual FoxPro en los formularios se trata en el capítulo 10, Usar controles.
Consulte el capítulo 11, Diseñar menús y barras de herramientas, para dar los últimos retoques a la
aplicación.
Proporcionar acceso a la información
Probablemente muestre cierta información para los usuarios en formularios, pero también deseará
ofrecer a los usuarios la posibilidad de especificar exactamente la información que desean ver, así
como la opción de imprimirla en informes o etiquetas. Las consultas, especialmente las consultas que
aceptan parámetros definidos por el usuario, permiten a los usuarios tener más control sobre sus
datos. Los informes permiten a los usuarios imprimir imágenes totales, parciales o de resumen de sus
datos. Los controles ActiveX y la automatización permiten que su aplicación comparta información y
funciones con otras aplicaciones.
El Diseñador de consultas y el Diseñador de informes se describen en los capítulos 4 a 7 del Manual
del usuario. En el capítulo 12 de este manual, Agregar consultas e informes, se explica la integración
de consultas e informes en una aplicación. El capítulo 16, Agregar OLE describe la integración de

OLE en una aplicación.
Probar y depurar
La prueba y depuración es algo que la mayoría de los programadores hace en cada paso del proceso
de desarrollo. Es conveniente probar y depurar a medida se va avanzando. Si crea un formulario,
querrá asegurarse de que éste hace lo que se desea antes de continuar con otros elementos de su
aplicación.
En el capítulo 14, Probar y depurar aplicaciones, se explica el uso de las herramientas de depuración
de Visual FoxPro para depurar sus aplicaciones y se ofrecen sugerencias para que el proceso resulte
más sencillo.
Capítulo 3: Programación orientada a objetos
Aunque Visual FoxPro admite la programación estándar por procedimientos, se ha ampliado la
capacidad del lenguaje para proporcionar la potencia y la flexibilidad propias de la programación
orientada a objetos.
El diseño orientado a objetos y la programación orientada a objetos representan un cambio de
perspectiva con respecto a la programación estándar por procedimientos. En lugar de pensar en el
flujo del programa desde la primera hasta la última línea de código, se debe pensar en la creación de
objetos: componentes autocontenidos de una aplicación que tienen funcionalidad privada además de
la funcionalidad que se puede exponer al usuario.
En este capítulo se tratan los temas siguientes:
l Descripción de los objetos de Visual FoxPro
l Descripción de las clases de Visual FoxPro
l Adaptar la clase a la tarea
l Crear clases
l Agregar clases a formularios
l Definir clases mediante programación
Descripción de los objetos de Visual FoxPro
En Visual FoxPro, los formularios y los controles son objetos que puede incluir en sus aplicaciones.
Puede manipular estos objetos a través de sus propiedades, eventos y métodos.
Las mejoras en el lenguaje orientado a objetos de Visual FoxPro proporcionan un mayor control
sobre los objetos de las aplicaciones. Asimismo, facilitan la creación y el mantenimiento de
bibliotecas de código reutilizable, proporcionando:
l Código más compacto.
l Incorporación más sencilla del código a las aplicaciones sin necesidad de elaborar esquemas de
asignación de nombres.
l Menos complejidad al integrar código de distintos archivos en una aplicación.

La programación orientada a objetos es en gran medida un modo de empaquetar código de manera
que se pueda volver a utilizar y mantener más fácilmente. Los paquetes principales se llaman clases.
Clases y objetos: los bloques funcionales de las aplicaciones
Las clases y los objetos están estrechamente relacionados, pero no son lo mismo. Una clase contiene
información sobre cuál debe ser la apariencia y el comportamiento de un objeto. Una clase es el plano
o esquema de un objeto. Por ejemplo, el esquema eléctrico y de diseño de un teléfono sería algo
similar a una clase. El objeto o una instancia de la clase sería el teléfono.
La clase determina las características del objeto.
Los objetos tienen propiedades
Un objeto tiene ciertas propiedades o atributos. Por ejemplo, un teléfono tiene un color y un tamaño
determinados. Cuando se instala un teléfono en la oficina, tiene una determinada posición sobre la
mesa. El receptor puede estar colgado o descolgado.
Los objetos que se crean en Visual FoxPro también tienen propiedades que están determinadas por la
clase en la que se basa el objeto. Estas propiedades pueden establecerse en tiempo de diseño o en
tiempo de ejecución.
Por ejemplo, en la tabla siguiente se indican algunas propiedades que puede tener una casilla de
verificación.
Propiedad Descripción
Caption Texto descriptivo que aparece junto a la casilla de verificación.
Enabled Especifica si un usuario puede elegir o no la casilla de verificación.
ForeColor Color del texto del título.
Left Posición del extremo izquierdo de la casilla de verificación.
MousePointer Apariencia del puntero del mouse (ratón) cuando está situado sobre la
casilla de verificación.
Top Posición de la parte superior de la casilla de verificación.

Visible Especifica si la casilla de verificación es visible o no.
Los objetos tienen eventos y métodos asociados
Cada objeto reconoce y puede responder a determinadas acciones denominadas eventos. Un evento es
una actividad específica y predeterminada, iniciada por el usuario o por el sistema. Los eventos, en la
mayor parte de los casos, se generan por interacción del usuario. Por ejemplo, con un teléfono, se
desencadena un evento cuando un usuario descuelga el receptor. Los eventos también se
desencadenan cuando el usuario presiona los botones para efectuar una llamada.
En Visual FoxPro, las acciones del usuario que desencadenan eventos incluyen clics, movimientos
del mouse y pulsaciones de teclas. Inicializar un objeto y encontrar una línea de código que produce
un error son eventos iniciados por el sistema.
Los métodos son procedimientos asociados a un objeto. Los métodos se diferencian de los
procedimientos normales de Visual FoxPro en que están vinculados inseparablemente a un objeto y
tienen nombres distintos que los procedimientos normales de Visual FoxPro.
Los eventos pueden tener métodos asociados. Por ejemplo, si escribe código de método para el
evento Click, ese código se ejecutará cuando se produzca el evento Click. Los métodos también
pueden existir independientemente de los eventos. Se debe llamar a estos métodos de forma explícita
en el código.
El conjunto de eventos es limitado, aunque amplio. No es posible crear nuevos eventos. Sin embargo,
el conjunto de métodos puede ampliarse indefinidamente.
La tabla siguiente muestra algunos de los eventos asociados a una casilla de verificación:
Evento Descripción
Click El usuario hace clic en la casilla de verificación.
GotFocus El usuario activa la casilla de verificación al hacer clic en ella o al llegar a
ella a través de la tecla TAB.
LostFocus El usuario selecciona otro control.
La tabla siguiente muestra algunos métodos asociados a una casilla de verificación:
Método Descripción
Refresh El valor de la casilla de verificación se actualiza para reflejar los cambios
que se puedan haber producido en el origen de datos subyacente.
SetFocus El enfoque se establece en la casilla de verificación como si el usuario
hubiera presionado la tecla TAB hasta activar la casilla de verificación.
Consulte el capítulo 4, Descripción del modelo de eventos si desea obtener una explicación del orden

en que se producen los eventos.
Descripción de las clases de Visual FoxPro
Todas las propiedades, eventos y métodos de un objeto se especifican en la definición de clase.
Además, las clases tienen las siguientes características que las hacen especialmente útiles para crear
código reutilizable y fácil de mantener:
l Encapsulamiento
l Subclases
l Herencia
Ocultar la complejidad innecesaria
Cuando instale un teléfono en la oficina, lo más probable es que no le interese el funcionamiento
interno del aparato para la recepción de llamadas, la realización o la finalización de conexiones con
centralitas electrónicas o la conversión de las pulsaciones de tecla en señales electrónicas. Lo único
que necesitará saber es que puede levantar el auricular, marcar los números apropiados y hablar con
la persona con la que desea hablar. La complejidad de realizar esa conexión queda oculta. La ventaja
de ignorar los detalles internos de un objeto para poder centrarse en los aspectos del objeto que
necesita utilizar se denomina abstracción.
La complejidad interna puede estar oculta
El encapsulamiento, que empaqueta el código de métodos y propiedades en un mismo objeto,
contribuye a la abstracción. Por ejemplo, las propiedades que determinan los elementos de un cuadro
de lista y el código que se ejecuta al elegir un elemento de la lista pueden encapsularse en un único
control que se agrega a un formulario.
Aprovechar la potencia de las clases existentes
Una subclase puede tener toda la funcionalidad de una clase existente, además de la funcionalidad y
los controles adicionales que quiera darle. Si la clase es un teléfono básico, podrá tener subclases que
tengan toda la funcionalidad del teléfono original y todas las características especializadas que desee
darles.
Las subclases le permiten reutilizar código.

La creación de subclases es un modo de reducir la cantidad de código que hay que escribir. Puede
comenzar definiendo un objeto que sea similar al deseado y personalizarlo.
Simplificar el mantenimiento de código
Con la herencia, si realiza un cambio en una clase, ese cambio se reflejará en todas las subclases que
se basen en ella. Esta actualización automática ahorra tiempo y trabajo. Por ejemplo, si un fabricante
de teléfonos quisiera cambiar los teléfonos de tipo marcación por aparatos de pulsación, se ahorraría
mucho trabajo si pudiera hacer el cambio en el diagrama original y hacer que todos los teléfonos
fabricados anteriormente con ese diagrama heredaran automáticamente la nueva característica, en
lugar de tener que agregarla a todos los teléfonos existentes individualmente.
La herencia facilita el mantenimiento del código.
La herencia no funciona con el hardware, pero sí en el software. Si descubre un error en una clase, en
lugar de tener que cambiar el código de todas las subclases podrá corregirlo una única vez en la clase
y el cambio se propagará a todas las subclases pertenecientes a ella.

Jerarquía de clases de Visual FoxPro
A la hora de crear clases definidas por el usuario, resulta útil comprender la jerarquía de clases de
Visual FoxPro.
Jerarquía de clases de Visual FoxPro
Contenedores y no contenedores
Los dos tipos principales de clases de Visual FoxPro y por extensión, de objetos de Visual FoxPro,
son las clases de contenedor y las clases de control.
Clases de contenedor y clases de control

Clases de contenedor
Los contenedores pueden incluir otros objetos y permiten el acceso a los objetos que contienen. Por
ejemplo, si crea una clase de contenedor que consta de dos cuadros de lista y dos botones de comando
y, a continuación, agrega a un formulario un objeto basado en esta clase, cada objeto individual podrá
manipularse en tiempo de ejecución y en tiempo de diseño. Puede cambiar fácilmente las posiciones
de los cuadros de lista o los títulos de los botones de comando. También puede agregar objetos al
control en tiempo de diseño; por ejemplo, puede agregar etiquetas para identificar los cuadros de
lista.
La tabla siguiente muestra los posibles componentes de cada clase de contenedor:
Contenedor Puede contener
Grupos de botones de comando Botones de comando
Contenedor Cualquier control
Control Cualquier control
Personalizado Cualquier control, marcos de página, contenedor,
personalizado
Conjuntos de formularios Formularios, barras de herramientas
Formularios Marcos de página, cualquier control, contenedores,
personalizado
Columnas de cuadrícula Encabezados de columnas, cualquier objeto excepto
conjuntos de formularios, formularios, barras de
herramientas, cronómetros y otras columnas

Cuadrículas Columnas de cuadrícula
Grupos de botones de opción Botones de opción
Marcos de página Páginas
Páginas Cualquier control, contenedores, personalizado
Proyecto Archivos, servidores
Barras de herramientas Cualquier control, marcos de página, contenedor
Clases de control
Las clases de control están más encapsuladas que las clases de contenedor, pero por esa misma razón
es posible que sean menos flexibles. Las clases de control no tienen un método AddObject.
Adaptar la clase a la tarea
Es conveniente poder usar clases en muchos contextos distintos. Un diseño inteligente le permitirá
decidir con mayor efectividad qué clases desea diseñar y qué funcionalidad va a incluir en la clase.
Decidir cuándo crear clases
Puede crear una clase para cada control y cada formulario que utilice, aunque éste no es el modo más
efectivo de diseñar aplicaciones. Es muy probable que acabe con múltiples clases que tengan
prácticamente la misma función y que deban mantenerse por separado.
Encapsular funcionalidad genérica
Cree una clase de control para funcionalidad genérica. Por ejemplo, los botones de comando que
permiten al usuario mover el puntero de registro en una tabla, un botón para cerrar un formulario y un
botón de ayuda pueden guardarse como clases y agregarse a formularios en cualquier momento que
desee que los formularios tengan esta funcionalidad.
Puede exponer las propiedades y los métodos en una clase de modo que el usuario pueda integrarlos
en el entorno de datos concreto de un formulario o un conjunto de formularios.
Proporcionar una apariencia y un uso coherentes
Puede crear clases de conjunto de formularios, de formulario y de control con una apariencia
característica, de modo que todos los componentes de la aplicación tengan la misma apariencia. Por
ejemplo, podría agregar gráficos y patrones de color específicos a una clase de formulario y utilizarla
como plantilla para todos los formularios que cree. Podría crear una clase de cuadro de texto con una
apariencia característica, como un efecto de sombreado, y usar esta clase en la aplicación en cualquier
momento que desee agregar un cuadro de texto.
Decidir qué tipo de clase va a crear

Visual FoxPro permite crear distintos tipos de clases, cada uno con sus propias características.
Especifique el tipo de clase que desea crear en el cuadro de diálogo Nueva clase o en la cláusula AS
del comando CREATE CLASS.
Clases de base de Visual FoxPro
En el Diseñador de clases puede crear subclases para la mayoría de las clases de base de Visual
FoxPro.
Clases de base de Visual FoxPro
ActiveDoc Custom Label PageFrame
CheckBox EditBox Line ProjectHook
Column* Form ListBox Separator
CommandButton FormSet OLEBoundControl Shape
CommandGroup Grid OLEContainerControl Spinner
ComboBox Header* OptionButton* TextBox
Container Hyperlink Object OptionGroup Timer
Control Image Page* ToolBar
* Estas clases son parte integral de un contenedor primario y no pueden usarse como subclases en el
Diseñador de clases.
Todas las clases de base de Visual FoxPro reconocen el siguiente conjunto mínimo de eventos:
Evento Descripción
Init Ocurre cuando se crea el objeto.
Destroy Ocurre cuando el objeto se libera de la memoria.
Error Ocurre siempre que tiene lugar un error en procedimientos de evento o de
método de la clase.
Todas las clases de base de Visual FoxPro tienen el siguiente conjunto mínimo de propiedades:
Propiedad Descripción
Class El tipo de clase de que se trata.
BaseClass La clase de base de la que se deriva, como Form, Commandbutton,
Custom, etc.

ClassLibrary La biblioteca de clases en la que está almacenada.
ParentClass La clase de la que se deriva la clase actual. Si la clase se deriva
directamente de una clase de base de Visual FoxPro, la propiedad
ParentClass es la misma que la propiedad BaseClass.
Extensión de las clases de base de Visual FoxPro
Puede convertir en subclases estas clases para establecer sus propias propiedades de control
predeterminadas. Por ejemplo, si quiere que los nombres predeterminados de controles que agregue a
formularios de sus aplicaciones reflejen automáticamente sus convenciones de nombres, puede crear
clases basadas en las clases de base de Visual FoxPro para hacerlo. Puede crear clases de formulario
con una apariencia o un comportamiento personalizado para que sirvan como plantillas para todos los
formularios que cree.
También podría convertir en subclases las clases de base de Visual FoxPro para crear controles con
funcionalidad encapsulada. Si quiere que un botón libere formularios cuando haga clic en él, puede
crear una clase basada en la clase de botón de comando de Visual FoxPro, establecer como título
"Salir" e incluir el siguiente comando en el evento Click:
THISFORM.Release
Puede agregar este nuevo botón a cualquier formulario de la aplicación.
Botón de comando personalizado agregado a un formulario
Crear controles con múltiples componentes
Las subclases no están limitadas a clases de base únicas. Puede agregar múltiples controles a una
única definición de clase de contenedor. Muchas de las clases de la biblioteca de clases de ejemplo de
Visual FoxPro están incluidas en esta categoría. Por ejemplo, la clase VCR de Buttons.vcx, ubicada
en la carpeta ...SamplesVfp98Classes de Visual Studio, contiene cuatro botones de comando para
desplazarse por los registros de una tabla.
Creación de clases no visuales

Una clase basada en la clase personalizada de Visual FoxPro no tiene un elemento visual de tiempo
de ejecución. Puede crear métodos y propiedades para la clase personalizada en el entorno del
Diseñador de clases. Por ejemplo, podría crear una clase personalizada llamada StrMethods e incluir
en ella una serie de métodos para manipular cadenas de caracteres. Podría agregar esta clase a un
formulario con un cuadro de edición y llamar a los métodos cuando lo necesitara. Si tuviera un
método llamado WordCount, podría llamarlo cuando lo necesitara:
THISFORM.txtCount.Value = ;
THISFORM.StrMethods.WordCount(THISFORM.edtText.Value)
Las clases no visuales (como el control personalizado y el control cronómetro) tienen una
representación visual, únicamente en tiempo de diseño, en el Diseñador de formularios. Establezca la
propiedad de imagen de la clase personalizada como el archivo .bmp que desea mostrar en el
Diseñador de formularios cuando se agregue la clase personalizada a un formulario.
Crear clases
Puede crear nuevas clases en el Diseñador de clases y puede ver cómo verá el usuario cada objeto a
medida que lo diseña.
Para crear una clase nueva
l En el Administrador de proyectos, seleccione la ficha Clases y elija Nuevo.
–O bien–
l En el menú Archivo, elija Nuevo, seleccione Clase y elija Nuevo archivo.
–O bien–
l Utilice el comando CREATE CLASS.
El cuadro de diálogo Nueva clase le permite especificar el nombre de la nueva clase, la clase en la
que se basa la nueva clase y la biblioteca en la que se almacenará.
Crear una clase nueva

Modificar una definición de clase
Cuando haya creado una clase, podrá modificarla. Los cambios realizados a una clase afectan a todas
las subclases y a todos los objetos basados en esta clase. Puede agregar una mejora a una clase o
reparar un error en la clase, y todas las subclases y los objetos basados en dicha clase heredarán el
cambio.
Para modificar una clase en el Administrador de proyectos
1. Seleccione la clase que desea modificar.
2. Elija Modificar.
Se abrirá el Diseñador de clases.
También puede modificar una definición de clase visual mediante el comando MODIFY CLASS.
Importante No cambie la propiedad Name de una clase si la usan otros componentes de la
aplicación. De lo contrario, Visual FoxPro no podrá encontrar la clase cuando la necesite.
Subclases de una definición de clase
Hay dos formas de crear una subclase de una clase definida por el usuario.
Para crear una subclase de una clase definida por el usuario
1. En el cuadro de diálogo Nueva clase, haga clic en el botón de tres puntos situado a la derecha
del cuadro Basada en.
2. En el cuadro de diálogo Abrir, elija la clase en la que desea basar la nueva clase.
–O bien–
l Utilice el comando CREATE CLASS.
Por ejemplo, para basar una nueva clase, x, en parentclass de Mylibrary.vcx, use el código
siguiente:
CREATE CLASS x OF y AS parentclass ;
FROM mylibrary
Utilizar el Diseñador de clases
Cuando especifica la clase en la que está basada la nueva clase y la biblioteca en la que se va a
almacenar, se abre el Diseñador de clases.
Diseñador de clases

El Diseñador de clases proporciona la misma interfaz que el Diseñador de formularios, que le permite
ver y modificar las propiedades de la clase en la ventana Propiedades. La ventana de edición de
código le permite escribir código para que se ejecute cuando ocurran eventos o se llame a métodos.
Agregar objetos a una clase de control o a una clase de contenedor
Si basa la nueva clase en una clase de control o en una clase de contenedor, podrá agregarle controles
del mismo modo que en el Diseñador de formularios: elija el botón del control en la barra de
herramientas Controles de formularios y arrastre para ajustar el tamaño en el Diseñador de clases.
Independientemente del tipo de clase en el que base la nueva clase, puede establecer propiedades y
escribir código de método. También podrá crear nuevas propiedades y métodos para la clase.
Agregar propiedades y métodos a una clase
Puede agregar tantas propiedades y métodos nuevos a la nueva clase como desee. Las propiedades
contienen valores, mientras que los métodos contienen código de procedimiento que se ejecutará
cuando llame al método.
Crear propiedades y métodos nuevos
Cuando crea propiedades y métodos nuevos para clases, las propiedades y los métodos tienen como
alcance la clase, no los componentes individuales de la misma.
Para agregar una propiedad nueva a una clase

1. En el menú Clase, elija Nueva propiedad.
2. En el cuadro de diálogo Nueva propiedad, escriba el nombre de la propiedad.
3. Especifique la visibilidad: Public, Protected o Hidden.
Puede tener acceso a una propiedad Public desde cualquier lugar de la aplicación. Las
propiedades Protected y Hidden se tratan en "Proteger y ocultar miembros de clase" más
adelante en este mismo capítulo.
Cuadro de diálogo Nueva propiedad
4. Elija Agregar.
También puede incluir una descripción de la propiedad que aparecerá en la parte inferior de la
ventana Propiedades en el Diseñador de clases y en el Diseñador de formularios cuando se
agregue el control a un formulario.
Solución de problemas Cuando agregue una propiedad a una clase que un usuario de la clase pueda
establecer, el usuario puede introducir un valor incorrecto para la propiedad que cause errores en
tiempo de ejecución. Tiene que documentar de forma explícita los valores válidos de la propiedad. Si
la propiedad puede establecerse como 0, 1 ó 2, por ejemplo, indíquelo en el cuadro Descripción del
cuadro de diálogo Nueva propiedad. También es conveniente comprobar el valor de la propiedad en
código que haga referencia a ella.
Para crear una propiedad de matriz
l En el cuadro Nombre del cuadro de diálogo Nueva propiedad, especifique el nombre, el
tamaño y las dimensiones de la matriz.
Por ejemplo, para crear una propiedad de matriz llamada mimatriz con diez filas y dos
columnas, escriba lo siguiente en el cuadro Nombre:
mimatriz[10,2]
La propiedad de matriz es de sólo lectura en tiempo de diseño y se muestra en cursiva en la ventana
Propiedades. Se puede administrar y redimensionar en tiempo de ejecución. Para ver un ejemplo del

uso de una propiedad de matriz, consulte "Administrar varias instancias de un formulario" en el
capítulo 9, Crear formularios.
Para agregar un método nuevo a una clase
1. En el menú Clase, elija Nuevo método.
2. En el cuadro de diálogo Nuevo método, escriba el nombre del método.
3. Especifique la visibilidad: Public, Protected o Hidden.
4. Seleccione la casilla de verificación Access para crear un método de Access, seleccione la
casilla de verificación para crear un método Assign o seleccione ambas casillas de verificación
para crear métodos Access y Assign.
Los métodos Access y Assign le permiten ejecutar código cuando se consulta el valor de una
propiedad o cuando se intenta cambiar su valor.
El código de un método Access se ejecuta cuando se consulta el valor de una propiedad,
generalmente al utilizar la propiedad en una referencia de objeto, al almacenar el valor de una
propiedad en una variable o al mostrar el valor de la propiedad con un signo de interrogación (?).
El código de un método Assign se ejecuta cuando intenta modificar el valor de una propiedad,
generalmente mediante los comandos STORE o = para asignar un nuevo valor a la propiedad.
Para obtener más información acerca de los métodos Access y Assign, consulte Métodos Access y
Assign.
También puede incluir una descripción del método.
Proteger y ocultar miembros de clases
Las propiedades y métodos de una definición de clase son Public de forma predeterminada: el código
de otras clases u otros procedimientos puede establecer las propiedades o llamar a los métodos. A las
propiedades y los métodos definidos como Protected sólo pueden tener acceso otros métodos de la
definición de la clase o de subclases de la clase. A las propiedades y los métodos definidos como
Hidden sólo pueden tener acceso otros miembros de la definición de la clase. Las subclases de la
clase no pueden "ver" o hacer referencia a miembros ocultos.
Para asegurar un correcto funcionamiento en algunas clases, deberá impedir que los usuarios cambien
las propiedades o llamen al método desde fuera de la clase mediante programación.
El ejemplo siguiente ilustra el uso de propiedades y métodos protegidos de una clase
La clase Stopwatch incluida en Samples.vcx, en el directorio ...SamplesVfp98Classes de Visual
Studio, incluye un cronómetro y cinco etiquetas que muestran el tiempo transcurrido:
La clase Stopwatch de Samples.vcx

La clase Stopwatch contiene etiquetas y un cronómetro.
Valores de las propiedades de la clase Stopwatch
Control Propiedad Valor
lblSeconds Caption 00
lblColon1 Caption :
lblMinutes Caption 00
lblColon2 Caption :
lblHours Caption 00
tmrSWatch Interval 1000
Esta clase tiene también tres propiedades protegidas, nSec, nMin y nHour, así como un método
protegido, UpdateDisplay. Los otros tres métodos personalizados de la clase, Start, Stop y Reset no
están protegidos.
Sugerencia Elija Información de clase en el menú Clase para ver la visibilidad de todas las
propiedades y métodos de una clase.
Las propiedades protegidas se utilizan en cálculos internos en el método UpdateDisplay y el evento
Timer. El método UpdateDisplay establece los títulos de las etiquetas para que reflejen el tiempo
transcurrido.
Método UpdateDisplay
Código Comentarios
CSecDisplay = ALLTRIM(STR(THIS.nSec))
cMinDisplay = ALLTRIM(STR(THIS.nMin))
cHourDisplay = ALLTRIM(STR(THIS.nHour))
Convierte las propiedades numéricas al
tipo Character para mostrarlas en los
títulos de etiqueta.
THIS.lblSeconds.Caption = ;
IIF(THIS.nSec < 10, ;
Establece los títulos de etiqueta,

IIF(THIS.nSec < 10, ;
"0" ,"") + cSecDisplay
THIS.lblMinutes.Caption = ;
IIF(THIS.nMin < 10, ;
"0", "") + cMinDisplay
THIS.lblHours.Caption = ;
IIF(THIS.nHour < 10, ;
"0", "") + cHourDisplay
conservando los 0 iniciales si el valor de
la propiedad numérica es menor que 10.
La tabla siguiente muestra el código del evento tmrSWatch.Timer.
Evento Timer
Código Comentarios
THIS.Parent.nSec = THIS.Parent.nSec + 1
IF THIS.Parent.nSec = 60
THIS.Parent.nSec = 0
THIS.Parent.nMin = ;
THIS.Parent.nMin + 1
ENDIF
Incrementa el valor de la propiedad nSec
cada vez que se desencadena el evento de
cronómetro cada segundo.
Si nSec ha llegado a 60, lo restablece a 0 e
incrementa la propiedad nMin.
IF THIS.Parent.nMin = 60
THIS.Parent.nMin = 0
THIS.Parent.nHour = ;
THIS.Parent.nHour + 1
ENDIF
THIS.Parent.UpdateDisplay
Si nMin ha llegado a 60, lo restablece a 0 e
incrementa la propiedad nHour.
Llama al método UpdateDisplay cuando
se establecen los nuevos valores de la
propiedad.
La clase Stopwatch tiene tres métodos que no están protegidos: Start, Stop y Reset. Un usuario debe
poder llamar directamente a estos métodos para controlar el cronómetro.
El método Start contiene la línea de código siguiente:
THIS.tmrSWatch.Enabled = .T.
El método Stop contiene la línea de código siguiente:
THIS.tmrSWatch.Enabled = .F.
El método Reset establece las propiedades protegidas a 0 y llama al método protegido:
THIS.nSec = 0
THIS.nMin = 0
THIS.nHour = 0
THIS.UpdateDisplay
El usuario no puede establecer directamente estas propiedades o llamar a este método, pero el código
del método Reset sí puede hacerlo.
Especificar el valor predeterminado para una propiedad

Al crear una nueva propiedad, su valor predeterminado es falso (.F.). Para especificar un valor
predeterminado distinto para una propiedad, utilice la ventana Propiedades. En la ficha Otras, haga
clic en la propiedad y establezca el valor deseado. Este será el valor inicial de la propiedad cuando se
agregue la clase a un formulario o a un conjunto de formularios.
También puede establecer cualquiera de las propiedades de clase de base en el Diseñador de clases.
Cuando un objeto basado en la clase se agregue al formulario, reflejará el valor de su propiedad en
lugar del valor de la propiedad de la clase de base de Visual FoxPro.
Sugerencia Si desea convertir el valor predeterminado de una propiedad en una cadena vacía,
seleccione el valor en el cuadro Edición de propiedades y presione la tecla RETROCESO.
Especificar la apariencia en tiempo de diseño
Puede especificar el icono de barra de herramientas y el de contenedor para su clase en el cuadro de
diálogo Información de clase.
Para establecer un icono de barra de herramientas para una clase
1. En el Diseñador de clases, elija Información de clase en el menú Clase.
2. En el cuadro de diálogo Información de clase, escriba el nombre y la ruta de acceso del archivo
.BMP en el cuadro Icono de la barra de herramientas.
Sugerencia El archivo de mapa de bits (archivo .bmp) para el icono de la barra de
herramientas debe tener 15 por 16 píxeles. Si la imagen es mayor o menor, se ajustará a 15 por
16 píxeles y posiblemente no tendrá la apariencia deseada.
El icono de barra de herramientas especificado se muestra en la barra de herramientas Controles de
formularios cuando se llena la barra de herramientas con las clases de la biblioteca de clases.
También puede especificar que se muestre el icono para la clase en el Administrador de proyectos y
el Examinador de clases si establece el icono contenedor.
Para establecer un icono contenedor para una clase
1. En el Diseñador de clases, elija Información de clase en el menú Clase.
2. En el cuadro Icono de contenedor, escriba el nombre y la ruta de acceso del archivo .bmp que
se va a mostrar en el botón de la barra de herramientas Controles de formularios.
Usar archivos de bibliotecas de clases
Todas las clases diseñadas visualmente se almacenan en una biblioteca de clases con la extensión de
archivo .vcx.
Crear una biblioteca de clases

Una biblioteca de clases puede crearse de una de estas tres formas.
Para crear una biblioteca de clases
l Cuando cree una clase, especifique un nuevo archivo de biblioteca de clases en el cuadro
Almacenar en del cuadro de diálogo Nueva clase.
–O bien–
l Utilice el comando CREATE CLASS, especificando el nombre de la nueva biblioteca de
clases.
Por ejemplo, la instrucción siguiente crea una nueva clase llamada miclase y una nueva
biblioteca de clases llamada nue_bib:
CREATE CLASS miclase OF nue_bib AS CUSTOM
–O bien–
l Utilice el comando CREATE CLASSLIB.
Por ejemplo, escriba el comando siguiente en la ventana Comandos para crear una biblioteca de
clases llamada nue_bib:
CREATE CLASSLIB nue_bib
Copiar y quitar clases de bibliotecas de clases
Cuando agregue una biblioteca de clases a un proyecto, podrá copiar clases de una biblioteca a otra
con facilidad o, simplemente, quitar clases de las bibliotecas.
Para copiar una clase de una biblioteca a otra
1. Asegúrese de que ambas bibliotecas están en un proyecto (no necesariamente en el mismo).
2. En el Administrador de proyectos, seleccione la ficha Clases.
3. Haga clic en el signo más (+) situado a la izquierda de la biblioteca de clases en la que se
encuentra ahora la clase.
4. Arrastre la clase desde la biblioteca original y colóquela en la nueva.
Sugerencia Es conveniente guardar en una biblioteca de clases una clase y todas las subclases
basadas en ella. Si tiene una clase que contiene elementos de muchas bibliotecas de clases
distintas, estas bibliotecas deberán estar abiertas, por lo que se tardará un poco más en cargar
inicialmente la clase en tiempo de ejecución y en tiempo de diseño.
Para quitar una clase de una biblioteca

l Seleccione la clase en el Administrador de proyectos y elija Quitar.
–O bien–
l Utilice el comando REMOVE CLASS.
Puede utilizar el comando RENAME CLASS para cambiar el nombre de una clase de una biblioteca
de clases. Sin embargo, recuerde que cuando cambia el nombre de una clase, los formularios que
contienen la clase y las subclases en otros archivos .vcx siguen haciendo referencia al nombre antiguo
y no volverán a funcionar correctamente.
Visual FoxPro incluye un Examinador de clases para facilitar el uso y la administración de clases y
bibliotecas de clases. Para obtener más información, vea la ventana Examinador de clases.
Agregar clases a formularios
Puede arrastrar una clase desde el Administrador de proyectos hasta el Diseñador de formularios o
hasta el Diseñador de clases. También puede registrar las clases de modo que puedan mostrarse
directamente en la barra de herramientas Controles de formularios del Diseñador de formularios o el
Diseñador de clases y agregarse a contenedores de la misma forma que los controles estándar.
Para registrar una biblioteca de clases
1. En el menú Herramientas, elija Opciones.
2. En el cuadro de diálogo Opciones, elija la ficha Controles.
3. Seleccione Bibliotecas de clases visuales y elija Agregar.
4. En el cuadro de diálogo Abrir, elija una biblioteca de clases para agregar el registro y, a
continuación, elija Abrir.
5. Elija Establecer como predeterminado si desea que la biblioteca de clases esté disponible en
la barra de herramientas Controles de formularios en sesiones futuras de Visual FoxPro.
También puede agregar la biblioteca de clases a la barra de herramientas Controles de formularios si
elige Agregar en el submenú del botón Ver clases. Para que estas clases estén disponibles en la barra
de herramientas Controles de formularios en sesiones futuras de Visual FoxPro, tendrán que
establecer el valor predeterminado en el cuadro de diálogo Opciones.
Anular valores predeterminados de propiedades
Al agregar a un formulario objetos basados en una clase definida por el usuario, puede cambiar el
valor de todas las propiedades de la clase que no estén protegidas, anulando los valores
predeterminados. Si posteriormente cambia las propiedades de clase en el Diseñador de clases, no se
verá afectada la configuración del objeto del formulario. Si no ha cambiado el valor de una propiedad
del formulario y cambia el de la clase, el cambio también surtirá efecto en el objeto.

Por ejemplo, un usuario puede agregar a un formulario un objeto basado en su clase y cambiar la
propiedad BackColor de blanco a rojo. Si cambia a verde la propiedad BackColor de la clase, el
objeto del formulario del usuario seguirá teniendo un valor rojo para BackColor. Por otra parte, si el
usuario no cambia la propiedad BackColor del objeto y usted cambia a verde el color de fondo de la
clase, la propiedad BackColor del objeto del formulario heredará el cambio y también será verde.
Llamar al código de métodos de clase primaria
Un objeto o una clase que se basa en otra clase hereda automáticamente la funcionalidad de la clase
original. Sin embargo, puede anular fácilmente el código de métodos heredado. Por ejemplo, puede
escribir nuevo código para el evento Click de una clase después de haberla convertido en subclase o
después de agregar al contenedor un objeto basado en la clase. En ambos casos, el nuevo código se
ejecuta en tiempo de ejecución; el código original no se ejecuta.
Sin embargo, es más frecuente que quiera agregar funcionalidad a la nueva clase u objeto
conservando la funcionalidad original. De hecho, una de las decisiones clave que tiene que hacer en
la programación orientada a objetos es qué funcionalidad va a incluir a nivel de clase, a nivel de
subclase y a nivel de objeto. Puede optimizar el diseño de la clase con la función DODEFAULT( ) o
el operador de resolución de alcance (::) para agregar código a distintos niveles de la jerarquía del
contenedor o de la clase.
Agregar funcionalidad a subclases
Puede llamar al código de la clase primaria desde una subclase mediante la función DODEFAULT( ).
Por ejemplo, cmdOK es una clase de botón de comando almacenada en Buttons.vcx, ubicada en el
directorio ...SamplesVfp98Classes de Visual Studio. El código asociado al evento Click de cmdOk
libera el formulario que contiene el botón. cmdCancel es una subclase de cmdOk de la misma
biblioteca de clases. Para agregar funcionalidad a cmdCancel para descartar cambios, por ejemplo,
puede agregar el código siguiente al evento Click:
IF USED( ) AND CURSORGETPROP("Buffering") != 1
TABLEREVERT(.T.)
ENDIF
DODEFAULT( )
Como los cambios se escriben en una tabla almacenada en búfer de forma predeterminada cuando se
cierra la tabla, no tiene que agregar código TABLEUPDATE( ) a cmdOk. El código adicional de
cmdCancel deshace los cambios realizados a la tabla antes de llamar al código de cmdOk, la clase
primaria, para liberar el formulario.
Jerarquías de clases y de contenedores
Las jerarquías de clases y de contenedores son dos entidades distintas. Visual FoxPro busca código de
evento en la jerarquía de clases, mientras que se hace referencia a los objetos en la jerarquía de
contenedores. La siguiente sección, "Referencias a objetos en la jerarquía de contenedores", trata la
jerarquía de contenedores. Más adelante en este capítulo se explican las jerarquías de clases en la
sección Llamar a código de evento en la jerarquía de clases.

Referencias a objetos en la jerarquía de contenedores
Para manipular un objeto, hay que identificarlo en relación a la jerarquía de contenedores. Por
ejemplo, para manipular un control de un formulario perteneciente a un conjunto de formularios,
deberá hacer referencia al conjunto de formularios, al formulario y, por último, al control.
Hacer referencia a un objeto dentro de su jerarquía de contenedores se puede comparar con dar una
dirección del objeto a Visual FoxPro. Cuando describe la ubicación de una casa a otra persona fuera
de su marco inmediato de referencia, debe indicar el país, la provincia o la región, la ciudad, la calle o
bien sólo el número de la calle donde se encuentra la vivienda, según lo lejos que se encuentre esa
otra persona. De lo contrario, podría haber cierta confusión.
La ilustración siguiente muestra una posible situación de anidamiento del contenedor.
Contenedores anidados
Para desactivar el control de la columna de cuadrícula, deberá proporcionar la dirección siguiente:
Formset.Form.PageFrame.Page.;
Grid.Column.Control.Enabled = .F.
La propiedad ActiveForm del objeto aplicación (_VFP) le permite manipular el formulario activo
aunque no conozca su nombre. Por ejemplo, la siguiente línea de código cambia el color de fondo del
formulario activo, independientemente del conjunto de formularios al que pertenezca:
_VFP.ActiveForm.BackColor = RGB(255,255,255)
De forma similar, la propiedad ActiveControl permite manipular el control activo del formulario
activo. Por ejemplo, la expresión siguiente introducida en la ventana Inspección muestra el nombre
del control activo de un formulario a medida que se eligen interactivamente los distintos controles:
_VFP.ActiveForm.ActiveControl.Name
Referencias relativas

Cuando haga referencia a objetos desde la jerarquía de contenedores (por ejemplo, en el evento Click
de un botón de comando de un formulario perteneciente a un conjunto de formularios), puede utilizar
algunos métodos abreviados para identificar el objeto que desea manipular. La tabla siguiente indica
las propiedades o las palabras clave que facilitan la referencia a un objeto desde la jerarquía del
objeto:
Propiedad o palabra clave Referencia
Parent El contenedor más inmediato del objeto
THIS El objeto
THISFORM El formulario que contiene el objeto
THISFORMSET El conjunto de formularios que contiene el objeto
Nota Sólo puede utilizar THIS, THISFORM y THISFORMSET en código de métodos y eventos.
La tabla siguiente proporciona ejemplos del uso de THISFORMSET, THISFORM, THIS y Parent
para establecer propiedades de objetos:
Comando Dónde incluir el comando
THISFORMSET.frm1.cmd1.Caption = "Aceptar" En el código de evento o de método de
cualquier control de cualquier
formulario del conjunto de formularios.
THISFORM.cmd1.Caption = "Aceptar" En el código de evento o de método de
cualquier control del mismo formulario
en el que está cmd1.
THIS.Caption = "Aceptar" En el código de evento o de método del
control cuyo título desee cambiar.
THIS.Parent.BackColor = RGB(192,0,0) En el código de evento o de método de
un control de un formulario. El
comando cambia a rojo oscuro el color
de fondo del formulario.
Establecer propiedades
Las propiedades de un objeto pueden establecerse en tiempo de ejecución o en tiempo de diseño.
Para establecer una propiedad
l Utilice esta sintaxis:
Contenedor.Objeto.Propiedad = Valor

Por ejemplo, las instrucciones siguientes establecen varias propiedades de un a cuadro de texto
llamado txtDate en un formulario llamado frmPhoneLog:
frmPhoneLog.txtDate.Value = DATE( ) && Muestra la fecha actual
frmPhoneLog.txtDate.Enabled = .T. && El control está activado
frmPhoneLog.txtDate.ForeColor = RGB(0,0,0) && texto en negro
frmPhoneLog.txtDate.BackColor = RGB(192,192,192) && fondo en gris
Para la configuración de propiedades de los ejemplos anteriores, frmPhoneLog es el objeto
contenedor de mayor nivel. Si frmPhoneLog estuviera incluido en un conjunto de formularios,
también debería incluir el conjunto de formularios en la ruta de acceso primaria:
frsContacts.frmPhoneLog.txtDate.Value = DATE( )
Establecer múltiples propiedades
La estructura WITH ... ENDWITH simplifica el establecimiento de múltiples propiedades. Por
ejemplo, para establecer múltiples propiedades de una columna en una cuadrícula de un formulario
perteneciente a un conjunto de formularios, podría utilizar la sintaxis siguiente:
WITH THISFORMSET.frmForm1.grdGrid1.grcColumn1
.Width = 5
.Resizable = .F.
.ForeColor = RGB(0,0,0)
.BackColor = RGB(255,255,255)
.SelectOnEntry = .T.
ENDWITH
Llamar a métodos
Una vez creado un objeto, puede llamar a los métodos de ese objeto desde cualquier lugar de la
aplicación.
Para llamar a un método
l Utilice esta sintaxis:
Primario.Objeto.Método
Las instrucciones siguientes llaman a métodos para mostrar un formulario y establecer el enfoque en
un cuadro de texto:
frsFormSet.frmForm1.Show
frsFormSet.frmForm1.txtGetText1.SetFocus
Los métodos que devuelven valores y se utilizan en expresiones deben terminar en paréntesis de
apertura y de cierre. Por ejemplo, la instrucción siguiente establece el título de un formulario como el
valor devuelto por el método definido por el usuario GetNewCaption:
Form1.Caption = Form1.GetNewCaption( )

Nota Los parámetros transferidos a métodos deben incluirse entre paréntesis después del nombre del
método; por ejemplo, Form1.Show(nStyle). transfiere nStyle al código del método Show de
Form1.
Responder a eventos
El código incluido en un procedimiento de evento se ejecuta cuando se produce el evento. Por
ejemplo, el código incluido en el procedimiento de evento Click de un botón de comando se ejecutará
cuando el usuario haga clic en el botón de comando.
Puede activar los eventos Click, DblClick, MouseMove y DragDrop con el evento MOUSE o usar el
comando ERROR para generar eventos Error y el comando KEYBOARD para generar eventos
KeyPress. No puede hacer que se produzca ningún otro evento mediante programación, pero sí puede
llamar al procedimiento asociado con el evento. Por ejemplo, la instrucción siguiente hace que se
ejecute el código del evento Activate de frmPhoneLog, pero no activa el formulario:
frmPhoneLog.Activate
Si desea activar el formulario, utilice el método Show del formulario. Al llamar al método Show se
mostrará y activará el formulario, momento en el que también se ejecutará el código del evento
Activate:
frmPhoneLog.Show
Definir clases mediante programación
Las clases se pueden definir visualmente en el Diseñador de clases y el Diseñador de formularios o
mediante programación en archivos .PRG. En esta sección se explica cómo escribir definiciones de
clase. Para obtener información sobre comandos, funciones y operadores específicos, vea la Ayuda.
Para obtener más información sobre formularios, consulte el capítulo 9, Crear formularios
En un archivo de programa es posible tener código de programa delante de las definiciones de clase,
pero no después de ellas, del mismo modo que el código de programa no puede ir después de los
procedimientos de un programa. El intérprete de comandos básico para la creación de clases tiene la
sintaxis siguiente:
DEFINE CLASS NombreClase1 AS ClasePrimaria [OLEPUBLIC]
[[PROTECTED | HIDDEN NombrePropiedad1, NombrePropiedad2 ...]
[Object.]NombrePropiedad = eExpresión ...]
[ADD OBJECT [PROTECTED] NombreObjeto AS NombreClase2 [NOINIT]
[WITH cListaPropiedades]]...
[[PROTECTED | HIDDEN] FUNCTION | PROCEDURE Nombre[_ACCESS | _ASSIGN]
[NODEFAULT]
cInstrucciones
[ENDFUNC | ENDPROC]]...
ENDDEFINE

Proteger y ocultar miembros de clase
Puede proteger u ocultar propiedades y métodos de una definición de clase con las palabras clave
PROTECTED y HIDDEN del comando DEFINE CLASS.
Por ejemplo, si crea una clase para almacenar información sobre empleados y no desea que los
usuarios puedan modificar la fecha de contratación, puede proteger la propiedad FechaContr. Si los
usuarios necesitan averiguar cuándo se contrató a un empleado determinado, podrá incluir un método
para devolver la fecha de contratación.
DEFINE CLASS empleado AS CUSTOM
PROTECTED FechaContr
Nombre = ""
Apellido = ""
Dirección = ""
FechaContr = { - - }
PROCEDURE ObtFechaContr
RETURN This.FechaContr
ENDPROC
ENDDEFINE
Crear objetos a partir de clases
Cuando haya guardado una clase visual, puede crear un objeto basado en ella mediante la función
CREATEOBJECT( ). El ejemplo siguiente muestra la ejecución de un formulario guardado como una
definición de clase en el archivo de biblioteca de clases Forms.vcx:
Crear y mostrar un objeto Form cuya clase se diseñó en el Diseñador de formularios
Código Comentarios
SET CLASSLIB TO Forms ADDITIVE Establece como biblioteca de clases el archivo
.vcx en el que se guardó la definición del
formulario. La palabra clave ADDITIVE impide
que este comando cierre otras bibliotecas de clases
que estuvieran abiertas.
frmTest = CREATEOBJECT ("FormPrueba") Este código supone que el nombre de la clase de
formulario guardada en la biblioteca de clases es
FormPrueba.
frmTest.Show Muestra el formulario.
Agregar objetos a una clase contenedor
Puede utilizar la cláusula ADD OBJECT en el comando DEFINE CLASS o en el método AddObject
para agregar objetos a un contenedor.

Por ejemplo, la siguiente definición de clase se basa en un formulario. El comando ADD OBJECT
agrega dos botones de comando al formulario:
DEFINE CLASS miform AS FORM
ADD OBJECT cmdOK AS COMMANDBUTTON
ADD OBJECT PROTECTED cmdCancel AS COMMANDBUTTON
ENDDEFINE
Utilice el método AddObject para agregar objetos a un contenedor después de crear el objeto
contenedor. Por ejemplo, las líneas de código siguientes crean un objeto formulario y le agregan dos
botones de comando:
frmMessage = CREATEOBJECT("FORM")
frmMessage.AddObject("txt1", "TEXTBOX")
frmMessage.AddObject("txt2", "TEXTBOX")
También puede utilizar el método AddObject en el código de método de una clase. Por ejemplo, la
definición de clase siguiente utiliza AddObject en el código asociado al evento Init para agregar un
control a una columna de cuadrícula.
DEFINE CLASS micuad AS GRID
ColumnCount = 3
PROCEDURE Init
THIS.Column2.AddObject("cboCliente", "COMBOBOX")
THIS.Column2.CurrentControl = "cboCliente"
ENDPROC
ENDDEFINE
Agregar y crear clases en código de métodos
Puede agregar objetos a un contenedor mediante programación con el método AddObject. También
puede crear objetos con la función CREATEOBJECT( ) en los métodos Load, Init o en cualquier otro
método de la clase.
Cuando agregue un objeto con el método AddObject, el objeto se convierte en un miembro del
contenedor. La propiedad Parent del objeto agregado se refiere al contenedor. Cuando un objeto
basado en el contenedor o en la clase del control se libera de la memoria, también se libera el objeto
agregado.
Cuando crea un objeto con la función CREATEOBJECT( ), el objeto está en el alcance de una
propiedad de la clase o variable del método que llama a esta función. La propiedad primaria del
objeto no está definida.
Asignar código de método y código de evento
Además de escribir código para los métodos y eventos de un objeto, puede ampliar el conjunto de
métodos en las subclases de clases de base de Visual FoxPro. Estas son las reglas para escribir código
de evento y métodos:
l El conjunto de eventos para las clases de base de Visual FoxPro es limitado y no puede
ampliarse.

l Todas las clases reconocen un conjunto limitado de eventos predeterminados, que incluye
como mínimo los eventos Init, Destroy y Error.
l Al crear en una definición de clase un método con el mismo nombre que un evento reconocible
por la clase, el código del método se ejecutará cuando se produzca el evento.
l Puede agregar métodos a las clases mediante la creación de un procedimiento o una función en
la definición de clase.
l Puede crear métodos Access y Assign para sus clases si crea un procedimiento o una función
con el mismo nombre que una propiedad de clase y anexa _ACCESS o _ASSIGN al nombre de
procedimiento o de función.
Llamar al código de evento en la jerarquía de clases
Al crear una clase, ésta hereda automáticamente todas las propiedades, los métodos y los eventos de
la clase primaria. Si se escribe código para un evento en la clase primaria, ese código se ejecutará
cuando se produzca el evento con respecto a un objeto basado en la subclase. Sin embargo, podrá
sobrescribir el código de la clase primaria escribiendo código para el evento en la subclase.
Para llamar explícitamente al código de evento en una clase primaria cuando la subclase tiene código
escrito para el mismo evento, utilice la función DODEFAULT( ).
Por ejemplo, podría tener una clase llamada cmdBottom basada en la clase de base del botón de
comando que tuviera el código siguiente en el evento Click:
GO BOTTOM
THISFORM.Refresh
Al agregar un objeto basado en esta clase a un formulario llamado, por ejemplo, cmdInferior1,
podría decidir que también desea mostrar un mensaje para informar al usuario de que el puntero de
registro está en la parte inferior de la tabla. Podría agregar el código siguiente al evento Click del
objeto para mostrar el mensaje:
WAIT WINDOW "En la parte inferior de la tabla" TIMEOUT 1
Sin embargo, al ejecutar el formulario se muestra el mensaje, pero el puntero de registro no se mueve
porque nunca se ejecuta el código del evento Click de la clase primaria. Para asegurarse de que
también se ejecuta el código del evento Click de la clase primaria, incluya las siguientes líneas de
código en el procedimiento del evento Click del objeto:
DODEFAULT( )
WAIT WINDOW "En la parte inferior de la tabla" TIMEOUT 1
Nota Puede utilizar la función ACLASS( ) para determinar todas las clases de la jerarquía de clases
de un objeto.
Impedir la ejecución del código de clase de base
En algunos casos, deseará evitar que produzca el comportamiento predeterminado de la clase de base
en un evento o método. Para ello, incluya la palabra clave NODEFAULT en el código de método que
escriba. Por ejemplo, el programa siguiente utiliza la palabra clave NODEFAULT en el evento

KeyPress de un cuadro de texto para impedir que se muestren en el cuadro los caracteres escritos:
frmKeyExample = CREATEOBJECT("prueba")
frmKeyExample.Show
READ EVENTS
DEFINE CLASS prueba AS FORM
ADD OBJECT texto1 AS TEXTBOX
PROCEDURE texto1.KeyPress
PARAMETERS nKeyCode, nShiftAltCtrl
NODEFAULT
IF BETWEEN(nKeyCode, 65, 122) && entre 'A' y 'z'
This.Value = ALLTRIM(This.Value) + "*"
ACTIVATE SCREEN && enviar el resultado a la ventana principal de Visual FoxPro
?? CHR(nKeyCode)
ENDIF
ENDPROC
PROCEDURE Destroy
CLEAR EVENTS
ENDPROC
ENDDEFINE
Crear un conjunto de botones de desplazamiento por tablas
Una característica común de muchas aplicaciones es una serie de botones de desplazamiento que
permiten a los usuarios moverse por una tabla. Suelen incluir botones para mover el puntero de
registro al registro siguiente o anterior de la tabla, así como al registro superior o inferior de la tabla.
Botones de desplazamiento por tablas
Diseño de los botones de desplazamiento
Todos los botones tendrán algunas características y funciones comunes, por lo que es conveniente
crear una clase de botones de desplazamiento. A continuación, los botones individuales pueden
aprovechar fácilmente esta apariencia y funcionalidad comunes. Esta clase primaria es la clase
NavButton que se definirá posteriormente en esta sección.
Una vez definida la clase primaria, las subclases siguientes definen la funcionalidad y apariencia
específicas de cada uno de los cuatro botones de desplazamiento: navTop, navPrior, navNext,
navBottom.
Por último se crea una clase de contenedor vcr, a la que se agregan todos los botones de
desplazamiento. El contenedor puede agregarse a un formulario o una barra de herramientas para
proporcionar funcionalidad de desplazamiento por tablas.
Definición de la clase NAVBUTTON
Para crear NavButton, guarde las seis definiciones de clase siguientes (Navbutton, navTop,
navBottom, navPrior, navNext y vcr) en un archivo de programa como Navclass.prg.
Definición de la clase genérica botón de comando de desplazamiento

Código Comentarios
DEFINE CLASS NavButton AS
COMMANDBUTTON
Height = 25
Width = 25
TableAlias = ""
Define la clase primaria de los botones de
desplazamiento.
Asigna dimensiones a la clase.
Incluye una propiedad personalizada, TableAlias,
que contiene el nombre del alias por el que
desplazarse.
PROCEDURE Click
IF NOT EMPTY(This.TableAlias)
SELECT (This.TableAlias)
ENDIF
ENDPROC
Si se ha establecido TableAlias, este
procedimiento de clase priamria selecciona el alias
antes de ejecutar el código real de desplazamiento
en las subclases. De lo contrario, se supondrá que
el usuario desea desplazarse por la tabla del área
de trabajo seleccionada actualmente.
PROCEDURE RefreshForm
_SCREEN.ActiveForm.Refresh
ENDPROC
Al emplear _SCREEN.ActiveForm.Refresh en
lugar de THISFORM.Refresh puede agregar la
clase a un formulario o una barra de herramientas
y hacer que funcione con la misma precisión.
ENDDEFINE Finaliza la definición de clase.
Los botones de desplazamiento específicos se basan en la clase NavButton. El código siguiente
define el botón Superior para el conjunto de botones de desplazamiento. Los tres botones de
desplazamiento restantes se definen en la tabla siguiente. Las cuatro definiciones de clase son
similares. Por ello, sólo se ofrecen comentarios extensos para la primera definición.
Definición de la clase botón de desplazamiento Superior
Código Comentarios
DEFINE CLASS navTop AS BotDespl
Caption = "|<"
Define la clase botón de desplazamiento Superior
y establece la propiedad Caption.
PROCEDURE Click Crea código de método que se ejecutará cuando se
produzca el evento Click para el control.
DODEFAULT( )
GO TOP
THIS.RefreshForm
Llama al código de evento Click de la clase
primaria, Navbutton, de modo que se pueda
seleccionar el alias adecuado si se ha establecido
la propiedad TableAlias.
Incluye el código para establecer el puntero de
registro en el primer registro de la tabla: GO TOP.

Llama al método RefreshForm de la clase
primaria. No es necesario utilizar el operador de
resolución de alcance (::) en este caso porque no
hay ningún método en la subclase que tenga el
mismo nombre que el método de la clase primaria.
Por otra parte, tanto la clase primaria como la
subclase tienen código de método para el evento
Click.
ENDPROC Termina el procedimiento Click.
ENDDEFINE Termina la definición de clase.
Los restantes botones de desplazamiento tienen definiciones de clase similares.
Definición de las demás clases de botones de desplazamiento
Código Comentarios
DEFINE CLASS navNext AS Navbutton
Caption = ">"
Define la clase de botón de desplazamiento
Siguiente y establece la propiedad Caption.
PROCEDURE Click
DODEFAULT( )
SKIP 1
IF EOF( )
GO BOTTOM
ENDIF
THIS.RefreshForm
ENDPROC
ENDDEFINE
registro en el siguiente registro de la tabla.
Termina la definición de la clase.
DEFINE CLASS navPrior AS Navbutton
Caption = "<"
Anterior y establece la propiedad Caption.
PROCEDURE Click
DODEFAULT( )
SKIP -1
IF BOF( )
GO TOP
ENDIF
THIS.RefreshForm
ENDPROC
ENDDEFINE
registro en el registro anterior de la tabla.
Termina la definición de clase.
DEFINE CLASS navBottom AS
Navbutton
Caption = ">|"
Inferior y establece la propiedad Caption.

PROCEDURE Click
DODEFAULT( )
GO BOTTOM
THIS.RefreshForm
ENDPROC
ENDDEFINE
registro en el último registro de la tabla.
La siguiente definición de clase contiene los cuatro botones de desplazamiento para poder agregarlos
como una unidad a un formulario. La clase también incluye un método para establecer la propiedad
TableAlias de los botones.
Definición de una clase de controles de desplazamiento por tabla
Código Comentarios
DEFINE CLASS vcr AS CONTAINER
Height = 25
Width = 100
Left = 3
Top = 3
Comienza la definición de clase. La
propiedad Height se establece en el
mismo alto que los botones de comando
que contendrá.
ADD OBJECT cmdTop AS navTop ;
WITH Left = 0
ADD OBJECT cmdPrior AS navPrior ;
WITH Left = 25
ADD OBJECT cmdNext AS navNext ;
WITH Left = 50
ADD OBJECT cmdBot AS navBottom ;
WITH Left = 75
Agrega los botones de desplazamiento.
PROCEDURE SetTable(cTableAlias)
IF TYPE("cTableAlias") = 'C'
THIS.cmdTop.TableAlias = ;
cTableAlias
THIS.cmdPrior.TableAlias = ;
cTableAlias
THIS.cmdNext.TableAlias = ;
cTableAlias
THIS.cmdBot.TableAlias = ;
cTableAlias
ENDIF
ENDPROC
Este método se utiliza para establecer la
propiedad TableAlias de los botones.
TableAlias se define en la clase primaria
Navbutton.
También podría utilizar el método
SetAll para establecer esta propiedad:
IF TYPE ("cTableAlias") = 'C'
This.SetAll("TableAlias",
"cTableAlias")
ENDIF
Sin embargo, esto produciría un error si
se agregara a la clase un objeto que no
tuviera la propiedad TableAlias.
Una vez definida la clase, puede dividirla en subclases o agregarla a un formulario.

Crear una subclase basada en la nueva clase
También puede crear subclases basadas en vcr que tengan botones adicionales como Buscar,
Modificar, Guardar y Salir. Por ejemplo, vcr2 incluye un botón Salir:
Botones de desplazamiento por tablas con un botón para cerrar el formulario
Definición de una subclase de control de desplazamiento por tablas
Código Comentarios
DEFINE CLASS vcr2 AS vcr
ADD OBJECT cmdQuit AS
COMMANDBUTTON WITH ;
Caption = "Salir",;
Height = 25, ;
Width = 50
Width = THIS.Width + THIS.cmdQuit.Width
cmdQuit.Left = THIS.Width - ;
THIS.cmdQuit.Width
Define una clase basada en vcr y le agrega un
botón de comando.
PROCEDURE cmdQuit.CLICK
RELEASE THISFORM
ENDPROC
Cuando el usuario haga clic en cmdQuit, este
código liberará el formulario.
Vcr2 tiene todo lo de vcr más el nuevo botón de comando y no es necesario volver a escribir ninguna
parte del código.
Cambios en VCR reflejados en la subclase
A causa de la herencia, los cambios realizados en la clase primaria se reflejan en todas las subclases
que se basan en ella. Por ejemplo, puede informar al usuario de que se ha llegado al final de la tabla si
cambia la instrucción IF EOF( ) de navNext.Click por la siguiente:
IF EOF( )
GO BOTTOM
SET MESSAGE TO "Final de la tabla"
ELSE
SET MESSAGE TO
ENDIF
Puede indicar al usuario que ha llegado al principio de la tabla si cambia la instrucción IF BOF( ) de
navPrior.Click por la siguiente:
IF BOF()

GO TOP
SET MESSAGE TO "Principio de la tabla"
ELSE
SET MESSAGE TO
ENDIF
Si se realizan estos cambios en las clases navNext y navPrior, también se aplicarán
automáticamente a los botones apropiados de vcr y vcr2.
Agregar vcr a una clase de formulario
Una vez definido vcr como un control, el control puede agregarse a la definición de un contenedor.
Por ejemplo, el código siguiente agregado a Navclass.prg define un formulario al que se han agregado
botones de desplazamiento:
DEFINE CLASS NavForm AS Form
ADD OBJECT oVCR AS vcr
ENDDEFINE
Ejecutar el formulario que contiene VCR
Una vez definida la subclase de formulario, podrá mostrarla fácilmente con los comandos apropiados.
Para mostrar el formulario
1. Cargue la definición de clase:
SET PROCEDURE TO navclass ADDITIVE
2. Cree un objeto basado en la clase navForm:
frmPrueba = CREATEOBJECT("navForm")
3. Invoque el método Show del formulario:
frmPrueba.Show
Si no llama al método SetTable de oVCR (el objeto VCR de NavForm), cuando el usuario haga clic
en los botones de desplazamiento el puntero de registro se moverá por la tabla del área de trabajo
seleccionada actualmente. Puede llamar al método SetTable para especificar en qué tabla se va a
desplazar.
frmPrueba.oVCR.SetTable("customer")
Nota Cuando el usuario cierre el formulario, frmPrueba se establecerá a un valor nulo (.NULL.).
Para liberar de la memoria la variable de objeto, utilice el comando RELEASE. Las variables de
objeto creadas en los archivos de programa se liberan de la memoria cuando se completa el programa.
Definir un control cuadrícula
Una cuadrícula contiene columnas que, a su vez, pueden contener encabezados y cualquier otro

control. El control predeterminado contenido en una columna es un cuadro de texto, por lo que la
funcionalidad predeterminada de la cuadrícula se aproxima a una ventana Examinar. Sin embargo, la
arquitectura subyacente de la cuadrícula la abre hasta una extensión ilimitada.
El ejemplo siguiente crea un formulario que contiene un objeto Grid (Cuadrícula) con dos columnas.
La segunda columna contiene una casilla de verificación para mostrar los valores en un campo lógico
de una tabla.
Control Grid (Cuadrícula) con una casilla de verificación en una columna
Definición de una clase Grid con una casilla de verificación en una columna de cuadrícula
Código Comentarios
DEFINE CLASS grdProducts AS Grid
Left = 24
Top = 10
Width = 295
Height = 210
Visible = .T.
RowHeight = 28
ColumnCount = 2
Comienza la definición de clase y establece
las propiedades que determinan la apariencia
de la cuadrícula.
Al establecer la propiedad ColumnCount en
2, se agregan dos columnas a la cuadrícula.
Cada columna contiene un encabezado con el
nombre Header1. Además, cada columna
tiene un grupo de propiedades independiente
que determina su apariencia y
comportamiento.
Column1.ControlSource ="prod_name"
Column2.ControlSource ="discontinu"
Al establecer la propiedad ControlSource de
una columna, la columna muestra los valores
de ese campo para todos los registros de la
tabla.
Discontinu es un campo lógico.
Column2.Sparse = .F. Column2 contendrá la casilla de verificación.
Establezca la propiedad Sparse de la columna

en .F. de modo que la casilla de verificación
sea visible en todas las filas, no sólo en la
celda seleccionada.
Procedure Init
THIS.Column1.Width = 175
THIS.Column2.Width = 68
THIS.Column1.Header1.Caption = ;
"Nombre de producto"
THIS.Column2.Header1.Caption = ;
"Suspendido"
THIS.Column2.AddObject("chk1", ;
"checkbox")
THIS.Column2.CurrentControl = ;
"chk1"
THIS.Column2.chk1.Visible = .T.
THIS.Column2.chk1.Caption = ""
ENDPROC
Establece el ancho de las columnas y los
títulos de los encabezados.
El método AddObject permite agregar un
objeto a un contenedor ; en este caso, una
casilla de verificación llamada chk1.
Establece la propiedad CurrentControl de la
columna en la casilla de verificación, de
modo que se muestre la casilla de
verificación.
Comprueba que la casilla de verificación es
visible.
Establece el título en una cadena vacía de
modo que no se muestre el título
predeterminado "chk1".
La siguiente definición de clase es el formulario que contiene la cuadrícula. Ambas definiciones de
clase pueden incluirse en el mismo archivo de programa.
Definición de una clase Form que contiene la clase Grid
Código Comentarios
DEFINE CLASS GridForm AS FORM
Width = 330
Height = 250
Caption = "Ejemplo de cuadrícula"
ADD OBJECT grid1 AS grdProducts
Crea una clase de formulario y le agrega un
objeto basado en la clase de cuadrícula.
PROCEDURE Destroy
CLEAR EVENTS
ENDPROC
ENDDEFINE
El programa que crea un objeto basado en
esta clase utilizará READ EVENTS. Al
incluir CLEAR EVENTS en el evento
Destroy del formulario, el programa podrá
terminar cuando el usuario cierre el
formulario.

El programa siguiente abre la tabla donde están incluidos los campos que se van a mostrar en las
columnas de cuadrícula, crea un objeto basado en la clase GridForm y ejecuta el comando READ
EVENTS.
CLOSE DATABASE
OPEN DATABASE (SYS(2004) + "samplesdatatestdata.dbc")
USE products
frmTest= CREATEOBJECT("GridForm")
frmTest.Show
READ EVENTS
Este programa puede incluirse en el mismo archivo en el que están incluidas las definiciones de clase
si aparece al principio del archivo. También puede emplear el comando SET PROCEDURE TO para
especificar el programa que contiene las definiciones de clase e incluir este código en un programa
distinto.
Crear referencias a objetos
En lugar de realizar una copia de un objeto, puede crear una referencia a dicho objeto. Una referencia
ocupa menos memoria que un objeto adicional, puede transferirse fácilmente entre procedimientos y
puede ayudar a escribir código genérico.
Devolver una referencia a un objeto
En algunas ocasiones puede resultar conveniente manipular un objeto por medio de una o varias
referencias al mismo. Por ejemplo, el programa siguiente define una clase, crea un objeto basado en
la clase y devuelve una referencia al objeto:
*--NEWINV.PRG
*--Devuelve una referencia a un nuevo formulario de facturas.
frmInv = CREATEOBJECT("InvoiceForm")
RETURN frmInvoice
DEFINE CLASS InvoiceForm AS FORM
ADD OBJECT txtCompany AS TEXTBOX
* código para establecer propiedades, agregar otros objetos, etc.
ENDDEFINE
El programa siguiente establece una referencia al objeto creado en Newin.prg. La variable de
referencia puede manipularse exactamente del mismo modo que la variable de objeto:
frmInvoice = NewInv() && almacena la referencia al objeto en una variable
frmInvoice.SHOW
También puede crear una referencia a un objeto de un formulario, como en el ejemplo siguiente.
txtCustName = frmInvoice.txtCompany
txtCustName.Value = "Usuario de Fox"
Sugerencia Cuando ha creado un objeto, puede usar el comando DISPLAY OBJECTS para mostrar
la jerarquía de clases del objeto, los valores de las propiedades, los objetos contenidos y los métodos
y eventos disponibles. Puede llenar una matriz con las propiedades (no los valores de las
propiedades), eventos, métodos y objetos contenidos de un objeto con la función AMEMBERS( ).

Liberar objetos y referencias de la memoria
Si existe una referencia a un objeto, la liberación del objeto no borra el objeto de la memoria. Por
ejemplo, el comando siguiente libera el objeto original, frmFactura:
RELEASE frmFactura
Sin embargo, puesto que sigue existiendo una referencia a un objeto perteneciente a frmFactura, el
objeto no se liberará de la memoria hasta que se libere txtNombrePers con el comando siguiente:
RELEASE txtNombrePers
Comprobar si existe un objeto
Puede utilizar las funciones TYPE( ), ISNULL( ) y VARTYPE( ) para determinar si existe un objeto.
Por ejemplo, las líneas de código siguientes comprueban si existe un objeto llamado oConexión:
IF TYPE("oConexión") = "O" AND NOT ISNULL(oConexión)
* El objeto existe
ELSE
* El objeto no existe
ENDIF
Nota El comando ISNULL( ) es necesario porque .NULL. se almacena en la variable de objeto de
formulario cuando un usuario cierra un formulario, pero el tipo de variable sigue siendo "O".
Crear matrices de miembros
Puede definir miembros de clases como matrices. En el ejemplo siguiente, elecc es una matriz de
controles.
DEFINE CLASS MoverListBox AS CONTAINER
DIMENSION choices[3]
ADD OBJECT lFromListBox AS LISTBOX
ADD OBJECT lToListBox AS LISTBOX
ADD OBJECT choices[1] AS COMMANDBUTTON
ADD OBJECT choices[2] AS COMMANDBUTTON
ADD OBJECT choices[3] AS CHECKBOX
PROCEDURE choices.CLICK
PARAMETER nIndex
DO CASE
CASE nIndex = 1
* código
CASE nIndex = 2
* código
CASE nIndex = 3
* código
ENDCASE
ENDPROC
ENDDEFINE
Cuando un usuario hace clic en un control incluido en una matriz de controles, Visual FoxPro
transfiere el número de índice del control al procedimiento de evento Click. En este procedimiento,

puede utilizar una instrucción CASE para ejecutar código distinto según el botón en el que se haya
hecho clic.
Crear matrices de objetos
También puede crear matrices de objetos. Por ejemplo, MiMatriz contiene cinco botones de
comando:
DIMENSION MiMatriz[5]
FOR x = 1 TO 5
MiMatriz[x] = CREATEOBJECT("COMMANDBUTTON")
ENDFOR
Hay una serie de consideraciones que conviene tener en cuenta con respecto a las matrices de objetos:
l No se puede asignar un objeto a una matriz completa mediante un comando. Es necesario
asignar individualmente el objeto a cada miembro de la matriz.
l No se puede asignar un valor a una propiedad de una matriz completa. El comando siguiente
produciría un error:
MiMatriz.Enabled = .F.
l Al redimensionar una matriz de objetos para que sea más grande que la matriz original, los
elementos nuevos se inicializarán como falso (.F.), como ocurre con todas las matrices de
Visual FoxPro. Cuando redimensione una matriz de objetos para que sea más pequeña que la
matriz original, se liberarán los objetos cuyo subíndice sea mayor que el mayor subíndice
nuevo.
Usar objetos para almacenar datos
En los lenguajes orientados a objetos, una clase ofrece un medio útil y cómodo para almacenar datos
y procedimientos relacionados con una entidad. Por ejemplo, podría definir una clase de cliente para
incluir en ella información sobre un cliente, así como un método para calcular la edad del cliente:
DEFINE CLASS cliente AS CUSTOM
Apellidos = ""
Nombre = ""
FechaNacimiento = { - - }
PROCEDURE Edad
IF !EMPTY(THIS.FechaNacimiento)
RETURN YEAR(DATE()) - YEAR(THIS.FechaNacimiento)
ELSE
RETURN 0
ENDIF
ENDPROC
ENDDEFINE
Sin embargo, los datos almacenados en objetos que se basan en la clase de cliente sólo se almacenan
en memoria. Si estos datos estuvieran en una tabla, ésta se almacenaría en disco. Si tuviera que hacer
un seguimiento de varios clientes, la tabla le daría acceso a todos los comandos y las funciones de
administración de bases de datos de Visual FoxPro. De este modo, podría localizar información
rápidamente, ordenarla, agruparla, realizar cálculos, crear informes y consultas basándose en la

información, etc.
Visual FoxPro ofrece un resultado incomparable en cuanto al almacenamiento y la manipulación de
datos de bases de datos y tablas. Sin embargo, en determinadas ocasiones deseará almacenar datos en
objetos. Generalmente, los datos sólo serán significativos mientras se esté ejecutando la aplicación y
pertenecerán a una única entidad.
Por ejemplo, en una aplicación que incluye un sistema de seguridad, normalmente tendría una tabla
de los usuarios que tienen acceso a la aplicación. La tabla incluiría la identificación, la contraseña y el
nivel de acceso del usuario. Cuando un usuario haya iniciado una sesión no necesitará toda la
información de la tabla. Lo único que necesitará es la información sobre el usuario actual y esta
información se puede almacenar y manipular fácilmente en un objeto. Por ejemplo, la definición de
clase siguiente inicia una sesión al crear un objeto basado en la clase:
DEFINE CLASS NuevoUsuario AS CUSTOM
PROTECTED LogonTime, AccessLevel
UserId = ""
PassWord = ""
LogonTime = { - - : : }
AccessLevel = 0
PROCEDURE Init
DO FORM LOGON WITH ; && suponiendo que ha creado este formulario
This.UserId, ;
This.PassWord, ;
This.AccessLevel
This.LogonTime = DATETIME( )
ENDPROC
* Crear métodos para devolver valores de propiedad protegidos.
PROCEDURE GetLogonTime
RETURN This.LogonTime
ENDPROC
PROCEDURE GetAccessLevel
RETURN This.AccessLevel
ENDPROC
ENDDEFINE
En el programa principal de la aplicación, podría crear un objeto basado en la clase NuevoUsuario:
oUser = CREATEOBJECT('NuevoUsuario')
oUser.Logon
En cualquier parte de la aplicación, cuando necesite información sobre el usuario actual, podrá
obtenerla del objeto oUser. Por ejemplo:
IF oUser.GetAccessLevel( ) >= 4
DO ADMIN.MPR
ENDIF
Integrar objetos y datos
En la mayoría de las aplicaciones, puede sacar el máximo partido de la potencia de Visual FoxPro si
integra objetos y datos. La mayoría de las clases de Visual FoxPro tienen propiedades y métodos que
permiten integrar la potencia de un administrador de base de datos relacional y un sistema
completamente orientado a objetos.

Propiedades para integrar datos de clases y bases de datos de Visual FoxPro
Clase Propiedades de datos
Cuadrícula RecordSource, ChildOrder, LinkMaster
Todos los demás controles ControlSource
Cuadro de lista y cuadro
combinado
ControlSource, RowSource
Formulario y conjunto de
formularios
DataSession
Puesto que estas propiedades de datos pueden cambiarse en tiempo de diseño o en tiempo de
ejecución, puede crear controles genéricos con funcionalidad encapsulada que opere con datos
diversos.
Para obtener más información sobre la integración de datos y objetos, consulte el capítulo 9, Crear
formularios y el capítulo 10, Usar controles.
Capítulo 4: Descripción del modelo de eventos
Visual FoxPro ofrece un auténtico funcionamiento no modal, por lo que es posible coordinar
fácilmente múltiples formularios automáticamente y ejecutar simultáneamente múltiples instancias de
un formulario. Además, Visual FoxPro se encarga del procesamiento de los eventos, por lo que puede
ofrecer a sus usuarios un entorno interactivo mucho más rico.
En este capítulo se describe:
l Eventos de Visual FoxPro
l Seguimiento de secuencias de eventos
l Asignar código a eventos
Eventos de Visual FoxPro
El sistema desencadena automáticamente un código de evento como respuesta a alguna acción del
usuario. Por ejemplo, el sistema procesa automáticamente el código escrito para el evento Click
cuando el usuario hace clic en un control. El código de un evento también puede desencadenarse
mediante eventos del sistema, como es el caso del evento Timer en un control de cronómetro.
Los eventos básicos
La tabla siguiente contiene una lista del principal conjunto de eventos de Visual FoxPro que se
aplican a la mayoría de los controles.
Conjunto básico de eventos

Evento Cuándo se desencadena el evento
Init Al crear un objeto.
Destroy Al liberar de la memoria un objeto.
Click Cuando el usuario hace clic en el objeto con el botón principal del
mouse.
DblClick Cuando el usuario hace doble clic en el objeto con el botón
principal del mouse.
RightClick Cuando el usuario hace clic en el objeto con el botón secundario del
mouse.
GotFocus Cuando el objeto recibe el enfoque, ya sea como resultado de una
acción del usuario o al hacer clic, o porque se cambie el enfoque en
el código mediante el método SetFocus.
LostFocus Cuando el objeto pierde el enfoque, ya sea como resultado de una
acción del usuario o al hacer clic, o porque se cambie el enfoque en
el código mediante el método SetFocus.
KeyPress Cuando el usuario presiona y suelta una tecla.
MouseDown Cuando el usuario presiona el botón del mouse mientras el puntero
del mouse se encuentra sobre el objeto.
MouseMove Cuando el usuario mueve el mouse sobre el objeto.
MouseUp Cuando el usuario libera un botón del mouse mientras el puntero
del mouse se encuentra sobre el objeto.
Contenedores y eventos de objeto
A la hora de escribir código de eventos para los controles se deben tener en cuenta dos reglas básicas:
l Los contenedores no procesan los eventos asociados a los controles que contienen.
l Si no hay código de evento asociado a un control, Visual FoxPro comprobará si hay código
asociado al evento en algún nivel superior de la jerarquía de clase para dicho control.
Cuando un usuario interactúa con un objeto de alguna forma, ya sea presionando la tecla tab,
haciendo clic en él, moviendo el puntero del mouse sobre él, etc., tienen lugar los eventos de objeto.
Cada objeto recibe sus eventos de forma independiente. Por ejemplo, aunque un botón de comando se
encuentre en un formulario, el evento Click del formulario no se desencadenará cuando un usuario
haga clic en el botón de comando; sólo se desencadenará el evento Click del botón de comando.
El código de evento del contenedor es distinto del código de evento del control

Si no hay ningún código de evento Click asociado al botón de comando, cuando el usuario haga clic
en el botón no ocurrirá nada, incluso cuando haya un código de evento Click asociado al formulario.
Esta regla también es aplicable a los controles cuadrícula. La cuadrícula contiene columnas que a su
vez contienen encabezados y controles. Cuando ocurren los eventos, sólo el objeto más interno
implicado en el evento reconoce el evento. Los contenedores de mayor nivel no reconocen el evento.
La ilustración siguiente muestra qué objetos procesan los eventos MouseMove que se generan cuando
un usuario mueve el puntero del mouse por la cuadrícula.
Eventos MouseMove para una cuadrícula
No obstante, hay una excepción a esta regla. Si ha escrito código de evento para un grupo de botones
de opción o para un grupo de botones de comando pero no hay código para el evento en un
determinado botón del grupo, el código de evento del grupo se ejecutará cuando se produzca el
evento del botón.
Por ejemplo, podría tener un grupo de botones de opción con un código de evento Click asociado.
Sólo uno de los dos botones de opción del grupo tienen asociado código de evento Click:

El código de evento para los grupos de botones puede utilizarse como valor predeterminado
Si un usuario hace clic en Opción1, se ejecutará el código de evento Click asociado a Opción1. El
código de evento Click asociado al grupo de botones de opción no se ejecutará.
Puesto que no hay código de evento Click asociado a Opción2, si el usuario hace clic en Opción2 se
ejecutará el código de evento Click del grupo de opciones.
Nota Cuando se inicia una secuencia de eventos, como MouseDown y MouseUp, para un control,
toda la secuencia de eventos pertenece al control.
Por ejemplo, si presiona el botón primario del mouse en un botón de comando y arrastra el puntero
del mouse hacia fuera del botón de comando, los eventos MouseMove del botón de comando
seguirán produciéndose, aunque el puntero del mouse se esté moviendo fuera del formulario. Si suelta
el botón primario del mouse sobre el formulario en lugar de hacerlo sobre el botón de comando, el
evento MouseUp que ocurrirá será el asociado al botón de comando, no al formulario.
Clases y eventos de controles
Si un control de un formulario está basado en una clase definida por el usuario (que, a su vez, está
basada en otra clase definida por el usuario), cuando se produzca un evento, Visual FoxPro
comprobará el código de evento del control inmediato. Si hay código en ese procedimiento de evento,
Visual FoxPro lo ejecutará. Si no existe código en el procedimiento de evento, Visual FoxPro
comprobará un nivel superior en la jerarquía de clases. Si en algún lugar de la jerarquía de clases
Visual FoxPro encuentra código para el evento, se ejecutará dicho código. Cualquier código que haya
más allá dentro de la jerarquía no se ejecutará.
Si no hay código de evento asociado a un objeto, Visual FoxPro comprobará la clase primaria.

No obstante, puede incluir código en un procedimiento de evento y llamar explícitamente al código
en clases en las cuales se base el control; para ello se utiliza la función DODEFAULT( ).
Seguimiento de secuencias de eventos
El modelo de eventos de Visual FoxPro es amplio y le concede bastante control sobre los
componentes de la aplicación en respuesta a una amplia variedad de acciones de usuario. Algunas de
las secuencias de eventos son fijas como, por ejemplo, la creación o destrucción de un formulario.
Algunos eventos ocurren de forma independiente, pero la mayor parte ocurre con otros eventos
basados en la interacción con el usuario.
Establecer el seguimiento de eventos
La mejor manera de ver las secuencias de eventos de Visual FoxPro es establecer el seguimiento de
eventos en el depurador. El seguimiento de eventos le permite ver cuándo tiene lugar cada evento
asociado a sus propios formularios y controles en relación a otros eventos, de forma que puede
determinar el lugar más eficiente para incluir el código.
Para establecer el seguimiento de eventos
1. En el menú Herramientas de la ventana Depurador, elija Seguimiento de eventos.
2. En el cuadro de diálogo Seguimiento de eventos, seleccione Activar el seguimiento de
eventos.
Los eventos de la lista Eventos para seguir se escriben en la ventana Salida del depurador o en un
archivo cuando tengan lugar.
El cuadro de diálogo Seguimiento de eventos

Nota En este ejemplo, los eventos MouseMove y Paint han sido eliminados de la lista Eventos para
seguir porque ocurren con tanta frecuencia que hacen más difícil ver las secuencias de los otros
eventos.
Observar cómo ocurren los eventos
A veces una acción de un usuario desencadena un único evento, como mover el puntero del mouse
sobre un control, por ejemplo. Sin embargo, con frecuencia una acción del usuario desencadena
múltiples eventos.
En esta sección se describe el orden en que ocurren los eventos como respuesta a la interacción del
usuario, utilizando el siguiente formulario como ejemplo.
Formulario de ejemplo para ilustrar las secuencias de eventos
En esta situación de ejemplo, el usuario realiza las siguientes acciones en el formulario:
1. Ejecuta el formulario.

2. Escribe texto en Text1.
3. Selecciona el campo y lo copia al Portapapeles.
4. Va a Text2.
5. Pega el texto en Text2.
6. Cierra el formulario haciendo clic en Command2.
Estas acciones desencadenan uno o más eventos del sistema para cada objeto. En las tablas siguientes
se describen los eventos desencadenados como respuesta a cada acción del usuario.
Acción 1
El usuario ejecuta el formulario escribiendo el siguiente comando en la ventana Comandos:
DO FORM form1 NAME frmObject
Visual FoxPro carga el formulario, inicializa cada objeto y después inicializa el formulario; el
formulario se activa y el primer campo recibe el enfoque de entrada.
Objeto Evento
DataEnvironment BeforeOpenTables
Form1 Load
DataEnvironment Init
Text1 Init
Text2 Init
Command1 Init
Command2 Init
Form1 Init
Form1 Activate
Form1 GotFocus
Text1 When
Text1 GotFocus
Acción 2
El usuario escribe Test en Text1. Cada pulsación de teclas genera dos eventos. El evento KeyPress

recibe 2 parámetros: la tecla presionada y el estado de las teclas MAYÚS, ALT y CTRL.
Objeto Evento
Text1 KeyPress(84, 1) “T”
Text1 InteractiveChange
Text1 KeyPress(101, 0) “e”
Text1 KeyPress(115,0) “s”
Text1 KeyPress(116,0) “t”
Acción 3
El usuario hace doble clic en Text1 para seleccionar el texto y presiona CTRL+C para copiar el texto
al Portapapeles. Los eventos Mouse y un evento Click acompañan al evento DblClick. Los eventos
MouseMove y MouseDown reciben cuatro parámetros: qué botón, el estado de MAYÚS y las
ubicaciones X e Y. Las ubicaciones X e Y son relativas al formulario y reflejan el modo de escala
(por ejemplo, píxeles) del formulario. Sólo se presenta un evento MouseMove para cada control. En
realidad, este evento se activaría probablemente media docena de veces o más.
Objeto Evento
Form1 MouseMove(0, 0, 100, 35)
Text1 MouseMove(0,0,44,22)
Text1 MouseDown(1, 0, 44, 22)
Text1 MouseUp(1, 0, 44, 22)
Text1 Click
Text1 MouseDown(1, 0, 44, 22)
Text1 MouseUp(1, 0, 44, 22)
Text1 DblClick
Acción 4
El usuario presiona TAB para pasar a Text2.

Objeto Evento
Text1 KeyPress(9, 0)
Text1 Valid
Text1 LostFocus
Text2 When
Text2 GotFocus
Acción 5
El usuario pega en Text2 el texto copiado al presionar CTRL+V.
Objeto Evento
Acción 6
El usuario hace clic en Command2, que cierra el formulario.
Objeto Evento
Form1 MouseMove
Command2 MouseMove
Text2 Valid
Command2 When
Text2 LostFocus
Command2 GotFocus
Command2 MouseDown(1, 0, 143, 128)
Command2 MouseUp(1, 0, 143, 128)
Command2 Click
Command2 Valid
Command2 When
Cuando se cierra el formulario y se libera el objeto se producen estos eventos adicionales, en orden
inverso a los eventos de la Acción 1.

Objetos Evento
Form1 Destroy
Command2 Destroy
Command1 Destroy
Text2 Destroy
Text1 Destroy
Form1 Unload
DataEnvironment AfterCloseTables
DataEnvironment Destroy
La secuencia de eventos de Visual FoxPro
La tabla siguiente muestra la secuencia de activación general de los eventos de Visual FoxPro. Se
supone que la propiedad AutoOpenTables del entorno de datos está establecida a verdadero (.T.).
Otros eventos pueden tener lugar en base a interacciones de usuario y a respuesta del sistema.
Objeto Evento
DataEnvironment BeforeOpenTables
FormSet Load
Form Load
Cursores DataEnvironment Init
DataEnvironment Init
Objects 1 Init
Form Init
FormSet Init
FormSet Activate
Form Activate
Object1 2 When
Form GotFocus
Object1 GotFocus
Object1 Message

Object1 Valid 3
Object1 LostFocus
Object2 3 When
Object2 GotFocus
Object2 Message
Object2 Valid 4
Object2 LostFocus
Form QueryUnload
Form Destroy
Object 5 Destroy
Form Unload
FormSet Unload
DataEnvironment AfterCloseTables
DataEnvironment Destroy
Cursores DataEnvironment Destroy
1 Para cada objeto, desde el objeto más interno hasta el contenedor más externo
2 Primer objeto según el orden de tabulación
3 Siguiente objeto que va a recibir el enfoque
4 Cuando el objeto pierde el enfoque
5 Para cada objeto, desde el contenedor más externo hasta el objeto más interno
Asignar código a eventos
A menos que asocie código a un evento, no pasará nada cuando se produzca dicho evento. Casi nunca
escribirá código para los eventos asociados a cualquier objeto de Visual FoxPro, pero querrá
incorporar funcionalidad como respuesta a ciertos eventos clave de sus aplicaciones. Para agregar
código que se va a ejecutar cuando se produzca un evento, utilice la ventana Propiedades del
Diseñador de formularios.
La secuencia de eventos afecta a dónde debe situar el código. Tenga en cuenta las siguientes
sugerencias:
l El evento Init de todos los controles del formulario se ejecuta antes que el evento Init del
formulario, por lo que puede incluir código en el evento Init del formulario para manipular
cualquier control del formulario. Por ejemplo, si va a agregar controles para columnas de
cuadrícula, podrá hacerlo en el evento Init del formulario.

l Si quiere que se procese parte del código siempre que el valor de cuadro de lista, cuadro
combinado o casilla de verificación cambia, asóciela al evento InteractiveChange. El evento
Click puede no tener lugar o puede ser llamado incluso si el valor no ha cambiado.
l Cuando arrastra un control, los otros eventos de mouse se paran. Por ejemplo, los eventos
MouseUp y MouseMove no tienen lugar durante una operación de arrastrar y colocar.
l Los eventos Valid y When devuelven un valor, verdadero (.T.) de forma predeterminada. Si
devuelve falso (.F.) ó 0 desde el evento When, el control no puede tener el enfoque. Si
devuelve falso (.F.) ó 0 desde el evento Valid, el enfoque no puede abandonar el control.
Para obtener más información acerca del uso del Diseñador de formularios, consulte el capítulo 9,
Crear formularios. Para obtener información acerca de la codificación de clases y la forma de agregar
código de eventos, consulte el capítulo 3, Programación orientada a objetos.

Manual del programador, Parte 2: Trabajar con datos Página 1 de 133
file://C:temp~hhE1A2.htm 30/05/2000
Manual del programador, Parte 2: Trabajar
con datos
Para crear aplicaciones efectivas, debe comprender sus requisitos de datos y después diseñar sus
bases de datos, índices y tablas de forma que resuelvan estas necesidades.
Capítulo 5 Diseñar una base de datos
Aproveche la tecnología de bases de datos relacionales que ofrece Visual FoxPro creando bases de
datos bien diseñadas.
Capítulo 6 Crear bases de datos
Use bases de datos de Visual FoxPro para establecer relaciones entre tablas, hacer cumplir la
integridad referencial y administrar datos locales y remotos.
Capítulo 7 Trabajar con tablas
Asegúrese de que sus tablas tengan la estructura que necesita su aplicación. La elección de los tipos
de datos y los índices es esencial para el éxito de su aplicación.
Capítulo 8 Crear vistas
Use las vistas para tener acceso a registros de varias tablas y actualizarlos. Mediante vistas puede
actualizar datos locales y remotos.
Capítulo 5: Diseñar una base de datos
En Visual FoxPro se utilizan bases de datos para organizar y relacionar tablas y vistas. La base de
datos proporciona la arquitectura necesaria para almacenar los datos y cuenta además con otras
ventajas. Al utilizar una base de datos, puede crear extensiones a nivel de tabla, tales como reglas a
nivel de campo o de registro, valores predeterminados para los campos y desencadenantes. También
puede crear procedimientos almacenados y relaciones persistentes entre tablas. La base de datos
puede utilizarse para tener acceso a conexiones con orígenes de datos remotos y también para crear
vistas de tablas remotas y locales.
Este capítulo proporciona instrucciones para diseñar las tablas que se incluyen en una base de datos

de Visual FoxPro. Le muestra el diseño de base de datos de la base de datos de ejemplo Importadores
Tasmanian y le proporciona diseños de base de datos de ejemplo adicionales. La base de datos de
ejemplo Importadores Tasmanian, Tastrade.dbc, se encuentra en el directorio ...SamplesVfp98
TastradeData de Visual Studio.
Para obtener información sobre la creación de bases de datos de Visual FoxPro después de diseñarlas,
consulte el capítulo 6, Crear bases de datos. Para obtener información sobre la creación de tablas de
Visual FoxPro, consulte el capítulo 7, Trabajar con tablas.
Este capítulo trata los siguientes temas:
l Usar un proceso de diseño de base de datos
l Analizar los requisitos de datos
l Agrupar requisitos en tablas
l Determinar los campos que necesita
l Identificar relaciones
l Refinar el diseño
l Diagramas de base de datos de ejemplo
El proceso de diseño de una base de datos
Si usa un proceso de diseño de base de datos establecido, puede crear de forma rápida y efectiva una
base de datos bien diseñada que le proporciona acceso conveniente a la información que desea. Con
un diseño sólido tardará menos tiempo en construir la base de datos y obtendrá resultados más
rápidos y precisos.
Nota Los términos "base de datos" y "tabla" no son sinónimos en Visual FoxPro. El término base de
datos (archivo .dbc) se refiere a una base de datos relacional que almacena información sobre una o
más tablas (archivos .dbf) o vistas.
La clave para entender el proceso de diseño de una base de datos radica en comprender la forma en
que un sistema de administración de bases de datos relacionales, como Visual FoxPro, almacena los
datos. Para ofrecer información de forma eficiente y precisa, Visual FoxPro debe tener almacenados
los datos sobre distintos temas en tablas separadas. Por ejemplo, puede haber una tabla donde sólo se
almacenen datos sobre empleados y otra tabla que sólo contenga datos de ventas.
Al organizar los datos de forma apropiada, proporciona flexibilidad a la base de datos y tiene la
posibilidad de combinar y presentar información de muchas formas diferentes. Por ejemplo, podría
imprimir informes que combinasen datos sobre empleados con datos sobre ventas.
La separación de hechos en tablas agrega flexibilidad a su base de datos.

Al diseñar una base de datos, en primer lugar debe dividir la información que desea almacenar como
temas distintos y después indicar a Visual FoxPro cómo se relacionan estos temas para que pueda
recuperar la información correcta cuando sea necesario. Si mantiene la información en tablas
separadas facilitará la organización y el mantenimiento de los datos y conseguirá aplicaciones de alto
rendimiento.
A continuación se indican los pasos que hay que seguir en el proceso de diseño de una base de datos.
Cada paso se trata con mayor detalle en las secciones restantes de este capítulo.
1. Determinar el propósito de la base de datos Este paso le ayudará a decidir los datos que
desea que Visual FoxPro almacene.
2. Determinar las tablas necesarias Cuando ya conoce claramente el propósito de la base de
datos, puede dividir la información en temas distintos, como "Empleados" o "Pedidos". Cada
tema será una tabla de la base de datos.
3. Determinar los campos necesarios Tiene que decidir la información que desea incluir en
cada tabla. Cada categoría de información de una tabla se denomina campo y se muestra en
forma de columna al examinar la tabla. Por ejemplo, un campo de la tabla Empleado podría ser
Apellidos y otro podría ser Fecha_cont.
4. Determinar las relaciones Observe cada tabla y decida cómo se relacionan sus datos con los
de las tablas restantes. Agregue campos a las tablas o cree tablas nuevas para clarificar las
relaciones, si es necesario.
5. Perfeccionar el diseño Busque errores en el diseño. Cree las tablas y agregue algunos
registros de datos de ejemplo. Vea si puede obtener los resultados que desea de sus tablas.

Haga los ajustes necesarios al diseño.
No se preocupe si se equivoca o si olvida algunos aspectos en el diseño inicial. Piense en él como en
un borrador que podrá refinar posteriormente. Pruebe con datos de ejemplo y con prototipos de los
formularios e informes. Con Visual FoxPro resulta sencillo modificar el diseño de la base de datos
durante su creación. Sin embargo, es mucho más difícil modificar las tablas cuando ya están llenas de
datos y se han generado formularios e informes. Por este motivo, debe asegurarse de tener un diseño
sólido antes de llegar demasiado lejos en la programación de una aplicación.
Analizar los requisitos de datos
El primer paso para diseñar una base de datos de Visual FoxPro es determinar el objetivo de la misma
y cómo se va a utilizar. A partir de este punto, puede determinar sobre qué temas desea almacenar
datos (las tablas) y qué datos necesita almacenar sobre cada tema (los campos de las tablas).
Consulte con las personas que vayan a utilizar la base de datos. Reflexione sobre las preguntas que
desee que la base de datos responda. Haga un borrador de los informes que desee producir. Reúna los
formularios que se utilicen actualmente para registrar los datos. Utilizará toda esta información en las
etapas restantes del proceso de diseño.
Ejemplo: hacer un seguimiento de ventas e inventario
Suponga que Importadores Tasmanian, una compañía de importación y exportación que vende
productos alimenticios de todo el mundo, desea una base de datos que permita hacer un seguimiento
de sus ventas y su inventario.
Comience por escribir una lista de preguntas que la base de datos tenga que responder. ¿Cuántas
ventas de cierto producto logramos el mes pasado? ¿Dónde viven nuestros mejores clientes? ¿Quién
es el proveedor de nuestro producto más vendido?
A continuación, reúna todos los formularios e informes que contengan la información que la base de
datos deba producir. Actualmente, la compañía utiliza un informe impreso para hacer un seguimiento
de los productos pedidos y un formulario para recibir nuevos pedidos. En la siguiente ilustración se
muestran estos dos documentos.
Los formularios y los informes presentan algunos requisitos de datos para su base de datos.

Importadores Tasmanian necesita también imprimir etiquetas de correo para los clientes, empleados y
proveedores.
Una vez recopilada esta información, podrá continuar con el paso siguiente.
Agrupar requisitos en tablas
Determinar las tablas de la base de datos puede ser la etapa más difícil del proceso de diseño, ya que
los resultados que se esperan de la base de datos (los informes que desea imprimir, los formularios
que desea utilizar, las preguntas que desea responder) no son necesariamente pistas sobre la
estructura de las tablas que los producen. Esta información indica lo que se desea saber, pero no
cómo clasificar la información en tablas.
Como ejemplo, observe el formulario de pedido anterior. En él se incluyen datos sobre el cliente (su
dirección y su número de teléfono) junto con datos sobre el pedido. Este formulario contiene datos
que se sabe que deben almacenarse en la base de datos, pero aparecerían problemas si se almacenasen
los datos de los clientes en la misma tabla que los datos de los pedidos.
El almacenamiento de información una vez reduce las posibilidades de error Por ejemplo, si
sólo usa una tabla para almacenar la información para un formulario de pedido, suponga que un
cliente coloca tres pedidos diferentes. Podría agregar la dirección del cliente y el número de teléfono
a su base de datos tres veces, una para cada pedido. Pero esto multiplica la posibilidad de errores de

a su base de datos tres veces, una para cada pedido. Pero esto multiplica la posibilidad de errores de
entrada de datos.
La tabla Customer almacena la información de dirección una sola vez.
Además, si el cliente cambia de domicilio, deberá aceptar información contradictoria o bien buscar y
modificar cada uno de los registros de ventas del cliente en la tabla. Resulta mucho mejor crear una
tabla Customer que almacene la dirección del cliente una sola vez en la base de datos. Así, si es
necesario modificar los datos, sólo se hará una vez.
Prevenir la eliminación de información valiosa Suponga que un nuevo cliente hace un pedido y

Prevenir la eliminación de información valiosa Suponga que un nuevo cliente hace un pedido y
que posteriormente lo cancela. Al eliminar el pedido de la tabla que contiene información de clientes
y pedidos a la vez, se eliminaría también el nombre del cliente y su dirección. Sin embargo, es
conveniente mantener a este nuevo cliente en la base de datos para poder enviarle el siguiente
catálogo. Una vez más, es mejor conservar la información sobre el cliente en una tabla aparte. De esta
forma se puede eliminar el pedido sin perder la información del cliente.
Estudie la información que desee obtener de la base de datos y divídala en temas fundamentales que
desee mantener, como por ejemplo clientes, empleados, productos que usted vende, servicios
ofrecidos, etc. Cada uno de estos temas es un candidato para una tabla independiente.
Sugerencia Una estrategia para dividir la información en tablas es observar primero los datos
individuales y determinar de qué trata cada uno. Por ejemplo, en el formulario de pedidos de
Importadores Tasmanian, la dirección del cliente no está asociada a la venta, sino al cliente. Este
hecho sugiere la necesidad de una tabla independiente para los clientes. En el informe de productos
pedidos, el número de teléfono del proveedor no está asociado al producto en existencias, sino al
proveedor. Esto sugiere que es necesaria una tabla independiente para los proveedores.
Ejemplo: diseñar tablas para la base de datos de Importadores Tasmanian
El formulario de pedidos y el informe de productos pedidos de Importadores Tasmanian contienen
información sobre los temas siguientes:
l Empleados
l Clientes
l Proveedores
l Productos
l Pedidos
A partir de esta lista, puede esbozar un borrador de las tablas de la base de datos, así como apuntar
algunos de los campos de cada una.
Borrador de tablas y campos necesarios para la base de datos de Importadores Tasmanian
Aunque la base de datos terminada de Importadores Tasmanian contiene otras tablas, esta lista es un

Aunque la base de datos terminada de Importadores Tasmanian contiene otras tablas, esta lista es un
buen comienzo. Más adelante en este capítulo verá cómo agregar otras tablas para ajustar el diseño.
Determinar los campos necesarios
Para determinar los campos de una tabla, decida qué necesita saber sobre las personas, cosas o
eventos que se registran en ella. Puede considerar los campos como atributos de la tabla. Cada
registro (o fila) de la tabla contiene el mismo conjunto de campos o atributos. Por ejemplo, un campo
de dirección de una tabla de clientes contendrá las direcciones de los clientes. Cada registro de la
tabla contendrá datos sobre un cliente y el campo de dirección contendrá la dirección de ese cliente
determinado.
Determinar los campos
A continuación se indican algunas sugerencias para determinar los campos:
Relacione cada campo directamente con el tema de la tabla Los campos que describan el tema de
una tabla distinta pertenecerán a esa otra tabla. Posteriormente, al definir las relaciones entre las
tablas, verá cómo combinar los datos de los campos de múltiples tablas. Por ahora, asegúrese de que
cada campo de una tabla describe el tema de esa tabla. Si descubre que está repitiendo la misma
información en varias tablas, será señal de que algunas tablas contienen campos innecesarios.
No incluya datos derivados o calculados En la mayoría de los casos no es conveniente almacenar
en las tablas el resultado de cálculos. En lugar de ello, puede hacer que Visual FoxPro realice los
cálculos cuando desee ver el resultado. Por ejemplo, el formulario de pedido mostrado anteriormente
en este capítulo muestra el precio con descuento para cada línea de un pedido de la base de datos de
Importadores Tasmanian. Sin embargo, no existe ningún campo de Subtotal Extended Price en
ninguna tabla de Importadores Tasmanian, sino que la tabla Order_Line_Items incluye un campo de
cantidad que almacena las unidades pedidas de cada producto individual, así como el precio unitario
de cada producto pedido. Con esos datos, Visual FoxPro calcula el subtotal cada vez que se imprime
un formulario de pedido y no es necesario almacenar en una tabla el subtotal propiamente dicho.
Incluya toda la información necesaria Es fácil pasar por alto información importante. Vuelva a la
información que reunió en la primera etapa del proceso de diseño y observe los formularios e
informes impresos para asegurarse de que toda la información que ha sido necesaria en el pasado está
incluida en las tablas de Visual FoxPro o que puede derivarse de ellas. Piense en las preguntas que se
formularán a Visual FoxPro. ¿Podrá Visual FoxPro encontrar todas las respuestas con la información
que tiene en las tablas? ¿Ha identificado campos para almacenar datos únicos, como el Id. de cliente?
¿Qué tablas incluyen la información que desea combinar en un informe o en un formulario? Si desea
más información sobre la forma de identificar campos clave y relacionar tablas, consulte las secciones
Uso de campos de clave principal y Determinación de las relaciones, más adelante en este mismo
capítulo.
Almacene la información en sus componentes lógicos más pequeños Puede que sienta la
tentación de utilizar un único campo para nombres completos o para nombres de productos, junto con
su descripción. Si combina más de un tipo de información en un campo, después será difícil obtener
datos individuales. Procure dividir la información en componentes lógicos; por ejemplo, cree campos
distintos para el nombre y los apellidos, o para el nombre de producto, su categoría y su descripción.

Ejemplo: agregar campos a la tabla Products
Importadores Tasmanian vende especialidades alimentarias importadas de todo el mundo. Los
empleados utilizan un informe Products On Order para hacer un seguimiento de los productos
pedidos.
Informe para hacer un seguimiento del inventario de productos
El informe indica que la tabla Products, que contiene datos sobre los productos vendidos, debe
contener campos para el nombre del producto, las unidades en existencia y las unidades pedidas,
entre otros. ¿Pero qué ocurre con los campos para el nombre y el número de teléfono del proveedor?
Para producir el informe, Visual FoxPro necesitará saber a qué proveedor corresponde cada producto.
Borrador de la tabla Supplier con campos para el nombre y el número de teléfono

Puede resolver esto sin almacenar datos redundantes en sus tablas si crea una tabla Supplier con
campos individuales para el nombre y el número de teléfono del suministrador. En el paso siguiente
agregará un campo a la tabla Products para identificar la información de proveedor necesaria.
Usar campos de clave principal
La eficacia de un sistema de administración de bases de datos relacionales como Visual FoxPro
proviene de su capacidad de buscar y agrupar rápidamente información almacenada en tablas
distintas. Para que Visual FoxPro funcione del modo más eficaz, cada tabla de la base de datos debe
incluir un campo o un conjunto de campos que identifique de forma única cada registro individual
almacenado en la tabla. A menudo, este campo será un número único de identificación, como un
número de Id. de empleado o un número de serie. En la terminología de las bases de datos, esta
información se denomina clave principal de la tabla. Visual FoxPro utiliza los campos de clave
principal para asociar rápidamente datos de múltiples tablas y presentarlos agrupados.
Si ya dispone de un identificador único para una tabla, como por ejemplo una serie de números de
producto que haya creado para identificar los productos en existencias, puede utilizarlo como clave
principal de la tabla. Asegúrese de que los valores de este campo serán siempre distintos para cada
registro, pues Visual FoxPro no permite valores duplicados en un campo de clave principal. Por
ejemplo, no debe utilizar nombres de personas como clave principal, ya que no son únicos. Puede
ocurrir fácilmente que haya en una misma tabla dos personas con el mismo nombre.
Al elegir campos de clave principal, tenga en cuenta lo siguiente:
l Visual FoxPro no permite valores duplicados ni nulos en los campos de clave principal. Por
ello, no debe elegir una clave principal que pueda contener valores de este tipo.
l Puede utilizar el valor del campo de clave principal para buscar registros, por lo que no debe
ser demasiado largo para recordarlo o escribirlo. Puede ser conveniente hacer que el valor tenga
un número determinado de letras o dígitos, o que se encuentre en un cierto intervalo de valores.
l El tamaño de la clave principal afecta a la velocidad de las operaciones en la base de datos.
Cuando cree campos de clave principal, utilice el menor tamaño que resulte adecuado a los
valores que se almacenarán en ellos.
Ejemplo: establecer la clave principal de la tabla Products
La clave principal de la tabla Products de Importadores Tasmanian contiene números de Id. de
producto. Como cada número identifica a un producto distinto, no interesará que haya dos productos
con el mismo número.
La clave principal de la tabla Products es el campo Product_id.

En algunos casos puede ser conveniente utilizar dos o más campos para formar la clave principal de
una tabla. Por ejemplo, la tabla Order_Line_Items de la base de datos de Importadores Tasmanian
utiliza dos campos como clave principal: Order_id y Product_id. En el paso siguiente se explicará la
razón de esto.
Determinar las relaciones
Ahora que ha dividido la información en tablas debe indicar a Visual FoxPro la manera de agruparla
de nuevo de forma significativa. Por ejemplo, el formulario siguiente incluye información procedente
de tablas distintas.
El formulario Entrada de pedidos utiliza información de varias tablas.

Visual FoxPro es un sistema de administración de bases de datos relacionales. Esto significa que se
almacenan datos relacionados en tablas separadas y que luego se definen entre las tablas relaciones
que Visual FoxPro utilizará para buscar información asociada almacenada en la base de datos.
Por ejemplo, suponga que desea telefonear a un empleado para consultarle sobre una venta que ha
realizado. Los números de teléfono de los empleados están registrados en la tabla Employee, y las
ventas se registran en la tabla Orders. Al indicar a Visual FoxPro la venta en la que estamos
interesados, éste puede buscar el número de teléfono utilizando la relación existente entre las dos
tablas. El mecanismo funciona gracias a que Employee_id, la clave principal de la tabla Employee, es
también un campo de la tabla Orders. En la terminología de las bases de datos, el campo
Employee_id de la tabla Orders es una clave externa, ya que se refiere a la clave principal de una
tabla distinta, o externa.
Campo Employee_id como clave principal de la tabla Employee y como clave externa de la
tabla Orders
Así, para establecer una relación entre dos tablas (tabla A y tabla B) se agrega la clave principal de
una de ellas a la otra, de forma que aparezca en ambas. Pero, ¿cómo se decide de qué tabla se toma la
clave principal? Para configurar correctamente las relaciones, primero es necesario determinar su
naturaleza. Hay tres tipos de relaciones entre tablas:
l Relaciones de uno a varios
l Relaciones de varios a varios
l Relaciones de uno a uno
En el resto de esta sección se presenta un ejemplo de cada tipo de relación y se explica cómo diseñar

En el resto de esta sección se presenta un ejemplo de cada tipo de relación y se explica cómo diseñar
las tablas de forma que Visual FoxPro pueda asociar sus datos correctamente. El propósito de cada
ejemplo es explicar la forma de determinar las relaciones entre las tablas y cómo decidir los campos
de las tablas que deben utilizarse para las relaciones. No se pretende describir el uso de la interfaz de
Visual FoxPro para relacionar tablas.
Ejemplo: crear una relación de uno a varios
La relación de uno a varios es la más común en una base de datos relacional. En una relación de este
tipo, un registro de la tabla A puede tener más de un registro coincidente en la tabla B, pero cada
registro de la Tabla B tendrá como máximo un registro coincidente en la tabla A.
Por ejemplo, las tablas Supplier y Products de la base de datos de Importadores Tasmanian tienen una
relación de uno a varios.
Las tablas Category y Products representan una relación de uno a varios.
Para establecer la relación, agregue el campo o los campos que forman la clave principal del lado
"uno" de la relación a la tabla del lado "varios". En el lado "uno" se utiliza una clave de índice
principal o candidato y en el lado "varios" puede usarse una clave de índice normal. En este caso, el
campo Supplier_id de la tabla Supplier se agregaría a la tabla Products, ya que un proveedor puede
suministrar varios productos. Visual FoxPro utilizará el número de Id. de proveedor para localizar el
proveedor correspondiente a cada producto.
Para obtener información sobre la creación de claves de índice, consulte el capítulo 7, Trabajar con

Para obtener información sobre la creación de claves de índice, consulte el capítulo 7, Trabajar con
tablas.
Ejemplo: crear una relación de varios a varios
En una relación de varios a varios, un registro de la tabla A puede tener más de un registro
coincidente en la tabla B y a un registro de la tabla B también puede corresponderle más de un
registro de la tabla A. Este tipo de relación requiere cambios en el diseño de la base de datos para su
correcta especificación en Visual FoxPro.
Para detectar relaciones de varios a varios entre las tablas es importante observar los dos sentidos de
cada relación. Por ejemplo, considere la relación entre pedidos y productos de la base de datos de
Importadores Tasmanian. Un pedido puede incluir más de un producto, de forma que para cada
registro de la tabla Orders puede haber varios registros en la tabla Products. Pero eso no es todo: cada
producto puede aparecer en varios pedidos, por lo que para cada registro de la tabla Products puede
haber varios registros en la tabla Orders.
Las tablas Orders y Products representan una relación de varios a varios.

Los temas de las dos tablas (pedidos y productos) tienen una relación de varios a varios. Esto supone
un problema en el diseño de la base de datos. Para entender este problema, imagine lo que ocurriría si
intentase establecer la relación entre las dos tablas agregando el campo Product_id a la tabla Orders.
Para tener más de un producto por pedido, necesitaría más de un registro en la tabla Orders por cada
pedido real y tendría que repetir una y otra vez la información para cada registro relacionado con el
mismo pedido, lo que supone un diseño poco eficaz que puede llevar a una falta de exactitud en los
datos. El mismo problema aparece si se incluye el campo Order_id en la tabla Products: sería
necesario más de un registro en la tabla Products para cada producto real. ¿Cómo puede resolverse
este problema?
La respuesta consiste en crear una tercera tabla que divida la relación de varios a varios en dos
relaciones de uno a varios. Esta tercera tabla se denomina tabla de unión, ya que actúa como conexión
entre las dos tablas y en ella se incluirá la clave principal de cada una de las dos tablas anteriores.
La tabla Order_Line_Items crea un vínculo de uno a varios entre Orders y Products.
Una tabla de conexión podría guardar únicamente las dos claves principales de las tablas que vincula
o, como en la tabla Order_Line_Items, la tabla de conexión podría contener información adicional.
Cada registro de la tabla Order_Line_Items representa una línea de un pedido. La clave principal de la
tabla Order_Line_Items consta de dos campos: las claves externas de las tablas Orders y Products. El
campo Order_id por sí solo no sirve como clave principal de la tabla, ya que un mismo pedido puede
tener varias líneas de productos. El Id. de pedido se repite para cada línea de un pedido, por lo que el
campo no contendrá valores únicos. El campo Product_id tampoco funcionará, ya que un mismo
producto puede aparecer en varios pedidos diferentes. Sin embargo, los dos campos juntos en la tabla
de unión producirán siempre un valor único para cada registro. La tabla de conexión no requiere su
propia clave principal.

propia clave principal.
En la base de datos de Importadores Tasmanian, las tablas Orders y Products no se relacionan
directamente, sino que lo hacen a través de la tabla Order_Line_Items. La relación de varios a varios
entre los pedidos y los productos se representa en la base de datos mediante dos relaciones de uno a
varios:
l Las tablas Orders y Order_Line_Items tienen una relación de uno a varios. Cada pedido puede
tener más de una línea de producto, pero cada línea sólo estará conectada a un pedido.
l Las tablas Products y Order_Line_Items tienen una relación de uno a varios. Cada producto
puede tener más de una línea asociada, pero cada línea sólo se refiere a un producto.
Ejemplo: crear una relación de uno a uno
En una relación de uno a uno, cada registro de la tabla A no puede tener más de un registro
coincidente en la tabla B y a cada registro de la tabla B no puede corresponderle más de un registro
coincidente en la tabla A. Este tipo de relación es poco habitual y puede indicar la necesidad de una
modificación en el diseño de la base de datos.
Las relaciones de uno a uno entre dos tablas son poco usuales ya que, en muchos casos, la
información de ambas tablas puede combinarse de forma sencilla en una tabla única. Por ejemplo,
suponga que se crea una tabla, llamada Jugadores de ping-pong, para hacer un seguimiento de un
torneo benéfico de ping-pong en Importadores Tasmanian. Como todos los jugadores son empleados,
esta tabla tendrá una relación de uno a uno con la tabla Employee de la base de datos de Importadores
Tasmanian.
Las tablas Employee y Jugadores_de_ping_pong representan una relación de uno a uno.

Sería posible agregar todos los campos de la tabla Jugadores de ping-pong a la tabla Employee. Sin
embargo, la tabla Jugadores de ping-pong se utiliza para un acontecimiento puntual y la información
dejará de ser necesaria cuando éste termine. Además, no todos los empleados juegan al Ping-pong, de
modo que si los campos se incorporasen a la tabla Employee, estarían vacíos en muchos registros. Por
estas razones tiene sentido crear una tabla distinta.
Cuando detecte la necesidad de una relación de uno a uno en una base de datos, considere primero si
es conveniente agrupar la información en una sola tabla. Por ejemplo, en la tabla Employee, un
empleado puede tener su propio director, que también es un empleado. Puede agregar un campo para
el número de identificación del director. Para reunir la información más tarde, puede usar una
autocombinación en la consulta o vista. No necesita una tabla independiente para resolver la relación
uno a uno. Si no quiere hacerlo por alguna razón, a continuación se muestra cómo configurar la
relación uno a uno entre las dos tablas:
l Si las dos tablas tratan del mismo tema, probablemente podrá definir la relación utilizando el
mismo campo de clave principal en ambas.
l Si las dos tablas tratan de temas distintos y tienen claves principales diferentes, elija una de
ellas e incluya su campo de clave principal en la otra como clave externa.
Perfeccionar el diseño
Cuando ya se tienen las tablas, los campos y las relaciones necesarios, es el momento de estudiar el
diseño y detectar los posibles fallos que puedan quedar.
Puede encontrar varios fallos mientras está diseñando su base de datos. Estos problemas comunes
pueden hacer que sus datos sean más difíciles de usar que de mantener:
l ¿Tiene una tabla con un gran número de campos que no relaciona con el mismo asunto? Por
ejemplo, una tabla puede contener campos que pertenecen a sus clientes así como información
de ventas. Intente asegurarse de que cada tabla contiene datos sobre un solo tema.
l ¿Tiene campos que se dejan intencionadamente en blanco en muchos registros porque no son
aplicables a dichos registros? Esto generalmente significa que los campos pertenecen a otra
tabla.
l ¿Tiene un gran número de tablas, muchas de las cuales contienen los mismos campos? Por
ejemplo, tiene tablas distintas para las ventas de enero y las de febrero, o para clientes locales y
clientes remotos, en las que almacena el mismo tipo de información. Intente consolidar toda la
información perteneciente a un solo asunto en una sola tabla. Es posible que tenga que agregar
un campo adicional, por ejemplo, para identificar la fecha de venta.

Cree sus tablas, especifique relaciones entre las tablas e introduzca algunos registros de datos en cada
tabla. Vea si puede usar la base de datos para obtener las respuestas que desea. Cree borradores de sus
formularios e informes y vea si muestra los datos que espera. Busque duplicados de datos
innecesarios y elimínelos.
Al probar la base de datos inicial, probablemente descubrirá posibles mejoras. A continuación se
indican algunos puntos que debe comprobar:
l ¿Ha olvidado algún campo? ¿Existe información necesaria que no se ha incluido? Si es así,
¿corresponde a las tablas existentes? Si la información trata de un tema distinto, puede ser
necesario crear otra tabla.
l ¿Ha elegido una buena clave principal para cada tabla? Si la va a utilizar para buscar registros
específicos, ¿es fácil de recordar y escribir? Asegúrese de que no se dará el caso de tener que
introducir en un campo de clave principal un valor que duplique al de otro registro.
l ¿Tiene que introducir información repetida una y otra vez en una de las tablas? Si es así,
probablemente deba dividirla en dos tablas con una relación de uno a varios.
l ¿Tiene tablas con muchos campos, un número de registros limitado y numerosos campos
vacíos en algunos registros? En caso afirmativo, considere la posibilidad de volver a diseñar la
tabla de forma que tenga menos campos y más registros.
A medida que identifique los cambios que desea realizar, puede modificar las tablas y los campos
para reflejar las mejoras en el diseño. Si desea información sobre cómo modificar las tablas, consulte
el capítulo 7, Trabajar con tablas.
Ejemplo: perfeccionar la tabla Products
Cada producto en existencias de Importadores Tasmanian pertenece a una categoría general, como
Bebidas, Condimentos o Pescados. La tabla Products podría contener un campo para mostrar la
categoría de cada producto.
Tabla Products con un campo Category_name
Suponga que al examinar y perfeccionar la base de datos Importadores Tasmanian decide almacenar
una descripción de la categoría junto con su nombre. Si agregase un campo Category Description a la
tabla Products, tendría que repetir la descripción de una categoría para cada producto que
perteneciese a ella, lo que no es una buena solución.
Un método más adecuado es hacer de la categoría un nuevo tema del que tenga que ocuparse la base

Un método más adecuado es hacer de la categoría un nuevo tema del que tenga que ocuparse la base
de datos, con su propia tabla y su propia clave principal. De esta forma puede agregar la clave
principal de la tabla Category a la tabla Products como clave externa.
La tabla Category proporciona un lugar donde almacenar de forma eficaz la información sobre
categorías.
Las tablas Category y Products tienen una relación de uno a varios: una categoría puede tener más de
un producto, pero cada producto sólo pertenece a una categoría.
Ejemplos de diagramas de base de datos
Los diagramas de bases de datos de esta sección pueden sugerirle ideas para el diseño de su propia
base de datos. Estas bases no se incluyen con Visual FoxPro; sólo se ofrecen aquí como ejemplo de
los tipos de bases de datos y tablas que puede crear.
Base de datos de citas
Esta estructura de base de datos almacena las citas de una oficina profesional, y puede modificarse
fácilmente para que la usen médicos, odontólogos, abogados o contables. La tabla Citas cuenta con
una clave principal de múltiples campos para identificar cada cita de forma única. Esta clave
principal, el índice 'client_sta', se crea indexando por una expresión que combina los campos
cliente_id y date_start.
Ejemplo de una base de datos de citas

Base de datos de personal
Esta estructura de base de datos almacena información sobre recursos humanos. La tabla Historial de
trabajo almacena información sobre cada contrato o ascenso, de forma que puede contener varios
registros por cada empleado.
Ejemplo de una base de datos de personal
Base de datos de biblioteca
Esta base de datos almacena información sobre los libros de una biblioteca y los préstamos a los
lectores. Observe la relación de varios a varios entre las tablas Libros y Autores y entre las tablas
Libros y Temas.
Ejemplo de una base de datos de biblioteca

Capítulo 6: Crear bases de datos
Tras haber diseñado una base de datos, puede generarla a través de la interfaz o mediante el lenguaje.
Es posible que quiera agregar tablas existentes a la base de datos y, a continuación, modificarlas para
aprovechar las características de diccionario de datos de Visual FoxPro. Si está trabajando en un
proyecto en el Administrador de proyectos, puede agregar las tablas a medida que las crea.
Para obtener más información sobre la forma de crear una base de datos para un entorno de múltiples
usuarios, consulte el capítulo 17, Programar para acceso compartido.

l Crear una base de datos
l Ver y modificar la arquitectura de una base de datos
l Administrar una base de datos
l Hacer referencia a múltiples bases de datos
l Controlar errores de bases de datos
Crear una base de datos
Al crear una base de datos, usted reúne tablas en un conjunto y aprovecha las características de
diccionario de datos.
Un diccionario de datos proporciona mayor flexibilidad al diseñar y modificar la base de datos y le
libera de tener que escribir código para crear validación a nivel de campos y a nivel de filas o para
asegurar la unicidad de valores en campos de clave principal. El diccionario de datos de Visual
FoxPro le permite crear o especificar:
l Claves principales y candidatas.
l Relaciones persistentes entre tablas de bases de datos.
l Nombres largos para tablas y campos.
l Títulos de campos que aparecen como encabezados en ventanas Examinar y en columnas de
cuadrícula.
l Valores predeterminados en campos.
l La clase de control predeterminada usada en formularios.
l Máscaras de entrada y formatos de presentación para campos.
l Reglas a nivel de campo y reglas a nivel de registro.
l Desencadenantes.
l Procedimientos almacenados.
l Conexiones a orígenes de datos remotos.
l Vistas locales y remotas.
l Comentarios para cada campo, tabla y base de datos.
Algunas características del diccionario de datos, como nombres de campo largos, claves principales y
candidatas, valores predeterminados, reglas a nivel de campo y a nivel de registro y desencadenantes
se almacenan en el archivo .dbc, pero se crean como parte del proceso de generación de una tabla o
una vista. Para obtener más información, consulte el capítulo 7, Trabajar con tablas, y el capítulo 8,
Crear vistas.
Reunir tablas en una base de datos
Para reunir tablas en una base de datos tiene que crear un contenedor de base de datos para guardar
todos los objetos como vistas, conexiones y procedimientos almacenados asociados a las tablas que
forman la base de datos.
Para crear una nueva base de datos
l En el Administrador de proyectos, seleccione la ficha Datos, luego Bases de datos y
finalmente Nuevo.

–O bien–
l Utilice el comando CREATE DATABASE.
Por ejemplo, el código siguiente crea y abre de forma exclusiva una nueva base de datos, llamada
Ejemplo:
CREATE DATABASE Ejemplo
Al crear una nueva base de datos, ésta estará vacía, pues no contendrá tablas asociadas ni ningún otro
objeto. Al agregar una tabla se crean vínculos entre el archivo de tabla y el contenedor de la base de
datos. La información de vínculo sobre una tabla almacenada en la base de datos es un vínculo
posterior. La información de vínculo almacenada en la tabla sobre el contenedor de base de datos es
el vínculo anterior.
Los vínculos especifican las asociaciones entre un contenedor de bases de datos y las tablas.
Para trabajar con una base de datos y sus objetos mediante programación, puede utilizar los
comandos y funciones siguientes.
Comandos y funciones para manipular bases de datos y sus objetos
ADATABASES( ) CREATE VIEW MODIFY CONNECTION
ADBOBJECTS( ) DBC( ) MODIFY DATABASE
ADD TABLE DBGETPROP( ) MODIFY PROCEDURE
ALTER TABLE DBSETPROP( ) MODIFY STRUCTURE
APPEND PROCEDURES DELETE CONNECTION MODIFY VIEW

APPEND PROCEDURES DELETE CONNECTION MODIFY VIEW
CLOSE DATABASE DELETE DATABASE OPEN DATABASE
COPY PROCEDURES DELETE VIEW PACK DATABASE
CREATE CONNECTION DISPLAY DATABASE RENAME TABLE
CREATE DATABASE DROP TABLE REMOVE TABLE
CREATE SQL VIEW INDBC( ) SET DATABASE
CREATE TABLE LIST DATABASE VALIDATE DATABASE
Agregar tablas a una base de datos
Cada tabla de Visual FoxPro puede existir en uno de dos estados: como tabla libre, que es un archivo
.DBF no asociado a ninguna base de datos, o como tabla de base de datos, que es un archivo .dbf
asociado a una base de datos. Las tablas asociadas a una base de datos pueden tener propiedades que
no tienen las tablas libres, como las reglas a nivel de campo y a nivel de registro, los desencadenantes
y las relaciones persistentes.
Las tablas se asocian a una base de datos al crearlas desde dentro de una base de datos abierta o al
agregar tablas existentes a una base de datos. Si desea información sobre la forma de crear tablas
nuevas, consulte el capítulo 7, Trabajar con tablas.
Para agregar una tabla libre a una base de datos
l En el Administrador de proyectos, seleccione Tablas en la ficha Todos o en la ficha Datos y, a
continuación, elija Agregar.
-O bien–
l Utilice el comando ADD TABLE.
Por ejemplo, el código siguiente abre la base de datos testdata y le agrega la tabla orditems:
OPEN DATABASE testdata
ADD TABLE orditems
Para que una tabla libre existente pase a formar parte de una base de datos, debe agregarla
explícitamente. La modificación de la estructura de una tabla libre no hace que Visual FoxPro la
agregue a una base de datos, incluso cuando la base de datos se encuentre abierta al utilizar el
comando MODIFY STRUCTURE.
Usar tablas libres
Una tabla determinada sólo se puede asociar a una base de datos. Sin embargo, es posible utilizar los
datos de un archivo .dbf existente sin necesidad de incorporarlo a una base de datos.
Para tener acceso a una tabla de otra base de datos

Para tener acceso a una tabla de otra base de datos
l Cree una vista en la base de datos actual que haga referencia a la tabla en cuestión.
-O bien–
l Tenga acceso a la tabla con el comando USE y el símbolo “!”.
El símbolo “!” permite hacer referencia a una tabla de una base de datos distinta de la actual. Por
ejemplo, si desea examinar la tabla orditems de la base de datos testdata, puede escribir:
USE testdata!orditems
BROWSE
En el ejemplo anterior, la base de datos testdata se abre automáticamente al utilizar el comando
USE, pero Visual FoxPro no la establece como base de datos actual. Las bases de datos abiertas
automáticamente como en el ejemplo anterior se cierran también automáticamente al cerrar la tabla, a
menos que se abra explícitamente la base de datos antes de cerrar la tabla.
Si desea información sobre el uso de una vista para tener acceso a información externa a la base de
datos actual, consulte el capítulo 8, Crear vistas.
Quitar una tabla de una base de datos
Al agregar una tabla a una base de datos, Visual FoxPro modifica el registro de encabezado del
archivo para documentar la ruta de acceso y el nombre de archivo de la base de datos a la que ahora
pertenece la tabla. Esta información de ruta y nombre de archivo se denomina vínculo anterior, ya que
vincula la tabla a la base de datos a la que pertenece. El proceso de quitar una tabla de una base de
datos no solamente suprime la tabla y la información de diccionario de datos asociada del archivo de
la base de datos, sino que también actualiza la información de vínculo anterior para reflejar el nuevo
estado de la tabla como libre.
Para quitar una tabla de una base de datos puede utilizar la interfaz o bien el comando REMOVE
TABLE. Al quitar la tabla de la base de datos, puede elegir también eliminar físicamente del disco el
archivo de la tabla.
Para quitar una tabla de una base de datos
l En el Administrador de proyectos, seleccione el nombre de la tabla y luego elija Quitar.
-O bien–
l En el Diseñador de bases de datos, seleccione la tabla y elija Quitar en el menú Base de datos.
–O bien–
l Utilice el comando REMOVE TABLE.
Por ejemplo, el código siguiente abre la base de datos testdata y quita la tabla orditems:

Por ejemplo, el código siguiente abre la base de datos testdata y quita la tabla orditems:
REMOVE TABLE orditems
Al quitar una tabla de una base de datos, el archivo de tabla no se elimina automáticamente. Si desea
quitar la tabla de la base de datos y además eliminar del disco su archivo .dbf, utilice la cláusula
DELETE del comando REMOVE TABLE o el comando DROP TABLE. Por ejemplo, el código
siguiente abre la base de datos testdata y elimina la tabla orditems del disco:
REMOVE TABLE orditems DELETE
El código siguiente también abre la base de datos testdata y elimina la tabla orditems sin mover
una copia a la Papelera de reciclaje de Windows:
DROP TABLE orditems NORECYCLE
Actualizar vínculos de tablas y bases de datos
Si mueve archivos de base de datos (.dbf, .dct y .dcx) o una tabla asociada con la base de datos, las
rutas relativas cambian y pueden romper los vínculos anteriores y posteriores que Visual FoxPro usa
para asociar archivos de bases de datos y de tablas:
l El vínculo anterior vincula la tabla con la base de datos propietaria de la tabla. Está formado
por la ruta relativa y el nombre de archivo para el archivo .dbc asociado a la tabla, y está
almacenado en el encabezado del archivo de tabla de Visual FoxPro (.dbf).
l El vínculo posterior dice a la base de datos qué tablas le pertenecen. Los vínculos posteriores
están almacenados en el archivo de base de datos (.dbc) y están formados por la ruta relativa y
el nombre de archivo para cada archivo de tabla asociado.
Puede restablecer vínculos y actualizar la información de ruta relativa de forma que refleje la nueva
ubicación del archivo.
Para actualizar vínculos después de mover una tabla o una base de datos
l Use la cláusula RECOVER del comando VALIDATE DATABASE.
Por ejemplo, el código siguiente abre la base de datos testdata y muestra cuadros de diálogo que le
permiten buscar tablas que no están en las ubicaciones contenidas en la base de datos:
VALIDATE DATABASE RECOVER
Sugerencia Si quiere usar una tabla sin perder tiempo restableciendo los vínculos para todas las
tablas de la base de datos, puede abrir la tabla con el comando USE. Visual FoxPro muestra el cuadro
de diálogo Abrir que le permitirá buscar la base de datos propietaria o eliminar los vínculos.
Para obtener información sobre la eliminación del vínculo anterior de una tabla cuya base de datos
propietaria se ha eliminado accidentalmente del disco, vea FREE TABLE.

propietaria se ha eliminado accidentalmente del disco, vea FREE TABLE.
Crear relaciones persistentes
Puede crear relaciones persistentes entre las tablas de una base de datos. Las relaciones persistentes
son relaciones entre tablas de una base de datos que se almacenan en el archivo de la base de datos y
tienen las características siguientes:
l Se utilizan automáticamente como condiciones de combinación predeterminadas en los
Diseñadores de consultas y vistas.
l Se representan en el Diseñador de bases de datos como líneas que relacionan los índices de las
tablas.
l Aparecen en el Diseñador de entorno de datos como relaciones predeterminadas para los
formularios e informes.
l Se utilizan para almacenar información de integridad referencial.
A diferencia de las relaciones temporales creadas con el comando SET RELATION, las relaciones
persistentes no necesitan restablecerse cada vez que se utilizan las tablas. Sin embargo, como las
relaciones persistentes no controlan la relación entre los punteros de registros de las tablas, al
programar aplicaciones de Visual FoxPro se utilizan relaciones de ambos tipos.
En Visual FoxPro se utilizan los índices para establecer relaciones persistentes entre las tablas de una
base de datos. La relación se define entre los índices y no entre los campos, lo que permite relacionar
las tablas basándose en una expresión de índice simple o compleja.
Para crear una relación persistente entre tablas
l En el Diseñador de bases de datos, elija el nombre del índice que desee relacionar y arrástrelo
hasta el nombre del índice de la tabla relacionada.
–O bien–
l Utilice la cláusula FOREIGN KEY en los comandos CREATE TABLE o ALTER TABLE.
Por ejemplo, el comando siguiente agrega una relación persistente de uno a varios entre las tablas
customer y orders, basándose en la clave principal cust_id de la tabla customer y en una nueva
clave externa, cust_id, de la tabla orders:
ALTER TABLE orders;
ADD FOREIGN KEY cust_id TAG ;
cust_id REFERENCES customer
Si examina el esquema de la base de datos en el Diseñador de bases de datos, verá una línea que une
orders y customer, lo que representa la nueva relación persistente.
Los índices proporcionan la base para relaciones persistentes

El tipo de etiqueta o clave de índice determinará el tipo de relación persistente que puede crear. Es
necesaria una etiqueta de índice principal o candidato para el lado 'uno' de una relación de uno a
varios; para el lado 'varios' debe utilizar una etiqueta o clave de índice normal. Si desea más
información sobre los tipos de índices y cómo crearlos, consulte el capítulo 7, Trabajar con tablas.
Para eliminar una relación persistente entre tablas
1. En el Diseñador de bases de datos, haga clic en la línea de relación entre las dos tablas.
El ancho de la línea aumentará para indicar que ha seleccionado la relación.
2. Presione la tecla supr.
–O bien–
Use la cláusula DROP FOREIGN KEY con el comando ALTER TABLE.
Por ejemplo, el comando siguiente elimina una relación persistente entre las tablas customer y
orders basada en la clave principal cust_id de la tabla customer y en una clave externa, cust_id,
de la tabla orders:
ALTER TABLE orders DROP FOREIGN KEY TAG cust_id SAVE
Generar integridad referencial
Establecer integridad referencial implica la creación de un conjunto de reglas para preservar las
relaciones definidas entre las tablas al introducir o eliminar registros.
Si exige la integridad referencial, Visual FoxPro impedirá las acciones siguientes:
l Agregar registros a una tabla relacionada cuando no haya ningún registro asociado en la tabla
principal.
l Cambiar valores de una tabla principal cuando tales cambios supongan dejar registros
huérfanos en una tabla relacionada.
l Eliminar registros de una tabla principal cuando tengan registros relacionados coincidentes.
Si lo desea, puede escribir sus propios desencadenantes y procedimientos almacenados para exigir la
integridad referencial. Sin embargo, el Generador de integridad referencial (IR) de Visual FoxPro

integridad referencial. Sin embargo, el Generador de integridad referencial (IR) de Visual FoxPro
permite determinar los tipos de reglas que desea exigir, las tablas a las que desea exigirlas y los
eventos del sistema que harán que Visual FoxPro las compruebe.
El Generador de IR trata múltiples niveles de eliminaciones y actualizaciones en cascada y es
recomendable como herramienta para asegurar la integridad referencial.
Para abrir el Generador de IR
1. Abra el Diseñador de bases de datos.
2. En el menú Base de datos, elija Modificar integridad referencial.
Al utilizar el Generador de IR para crear reglas que se van a aplicar a la base de datos, Visual FoxPro
guarda el código generado para exigir las reglas de integridad referencial como desencadenantes que
hacen referencia a procedimientos almacenados. Para ver este código puede abrir el editor de texto de
procedimientos almacenados en la base de datos. Si desea información sobre la forma de crear
desencadenantes por programa, consulte Uso de desencadenantes en el capítulo 7, Trabajar con
tablas.
Precaución Cuando haga cambios en el diseño de una base de datos, como modificaciones en sus
tablas o en los índices utilizados en una relación persistente, debe volver a ejecutar el Generador de
IR antes de utilizar de nuevo la base de datos. De esta forma se revisará el código de procedimiento
almacenado y los desencadenantes utilizados para exigir la integridad referencial, de forma que
reflejen el nuevo diseño. Si no vuelve a ejecutar el Generador de RI, puede que obtenga resultados
inesperados, ya que no se habrán actualizado los procedimientos almacenados y los desencadenantes
para ajustarlos a las modificaciones.
Crear procedimientos almacenados
Puede crear procedimientos almacenados para las tablas de una base de datos. Un procedimiento
almacenado está formado por código de Visual FoxPro incluido en el archivo .dbc. Los
procedimientos almacenados son procedimientos de código que operan específicamente sobre los
datos de la base de datos. Su uso puede mejorar el rendimiento, ya que se cargan en memoria en el
momento de abrir la base de datos.
Para crear, modificar o quitar un procedimiento almacenado
l En el Administrador de proyectos, seleccione una base de datos, seleccione Procedimientos
almacenados y, a continuación, elija Nuevo, Modificar o Quitar.
–O bien–
l En el Diseñador de bases de datos, elija Modificar procedimientos almacenados en el menú
Base de datos.
–O bien–
l En la ventana Comandos, utilice el comando MODIFY PROCEDURE.

l En la ventana Comandos, utilice el comando MODIFY PROCEDURE.
Cada una de estas opciones abre el editor de texto de Visual FoxPro, que permite crear o modificar en
él procedimientos almacenados de la base de datos activa.
Los procedimientos almacenados se utilizan principalmente para crear funciones definidas por el
usuario a las que se hace referencia en una regla de validación a nivel de campo o registro. Al guardar
una función definida por el usuario como procedimiento almacenado en la base de datos, el código de
la función se guarda en el archivo .dbc y se desplaza automáticamente con la base de datos cuando
ésta cambia de lugar. El uso de procedimientos almacenados permite también una mayor portabilidad
de la aplicación, ya que no es necesario administrar los archivos de funciones definidas por el usuario
independientemente del archivo de base de datos.
Mostrar y establecer de propiedades de base de datos
Todas las bases de datos de Visual FoxPro contienen las propiedades Comment y Version. Para
verlas puede utilizar las funciones DBGETPROP( ) y DBSETPROP( ).
Por ejemplo, el código siguiente muestra el número de versión de la base de datos testdata:
? DBGETPROP('testdata', 'database', 'version')
El valor devuelto representa el número de versión de .dbc de Visual FoxPro y es de sólo lectura. Con
la misma función puede ver el comentario, si existe, para la base de datos:
? DBGETPROP('testdata', 'database', 'comment')
A diferencia de la propiedad Version, la propiedad Comment se puede establecer. Use la función
DBSETPROP( ) para introducir una descripción u otro texto que quiera almacenar con la base de
datos.
Para establecer la propiedad de comentario de la base de datos activa
l En el Diseñador de bases de datos, elija Propiedades en el menú Base de datos y escriba un
comentario en el cuadro Comentario.
–O bien–
l Utilice la opción de comentario de la función DBSETPROP( ).
Por ejemplo, el código siguiente modifica el comentario de la base de datos testdata:
? DBSETPROP('testdata', 'database', 'comment', ;
'TestData está incluida a Visual FoxPro')
También puede utilizar las funciones DBGETPROP( ) y DBSETPROP( ) para ver y establecer
propiedades de otros objetos de base de datos como conexiones y vistas.
Ver y modificar la arquitectura de las bases de datos

Ver y modificar la arquitectura de las bases de datos
Al crear una base de datos, Visual FoxPro crea y abre de forma exclusiva un archivo .dbc
(Contenedor de base de datos). El archivo .dbc almacena toda la información sobre la base de datos,
incluidos los nombres de los archivos y los objetos asociados a ella. El archivo .dbc no contiene
físicamente ningún objeto de alto nivel, como tablas o campos; Visual FoxPro almacena en él
punteros de rutas de archivo que apuntan a las tablas.
Para examinar la arquitectura de una base de datos, puede examinar el archivo de base de datos, ver el
esquema, validar la base de datos, comprobar los vínculos anteriores e incluso extender el archivo
.dbc.
Mostrar el esquema de la base de datos
El esquema de la base de datos es una representación visual de la estructura de las tablas y las
relaciones persistentes establecidas en ella. La ventana Diseñador de bases de datos muestra el
esquema de la base de datos abierta.
Para ver el esquema de la base de datos
l Utilice el comando MODIFY DATABASE.
Por ejemplo, el código siguiente abre la base de datos testdata y muestra su esquema en el
Diseñador de bases de datos:
MODIFY DATABASE testdata
Un esquema de base de datos es una representación de los objetos de la base de datos.
En el Diseñador de bases de datos, puede utilizar la barra de herramientas Base de datos para crear
una nueva tabla, agregar a la base de datos una tabla existente, quitar una tabla de la base de datos o

una nueva tabla, agregar a la base de datos una tabla existente, quitar una tabla de la base de datos o
modificar la estructura de una tabla. También puede modificar procedimientos almacenados.
Examinar archivos de base de datos
El archivo de base de datos contiene un registro por cada tabla, vista, índice, etiqueta de índice,
relación persistente y conexión asociados a la base, y también por cada campo de tabla o de vista con
propiedades extendidas. También incluye un registro único que contiene todos los procedimientos
almacenados de la base de datos.
Para obtener más información acerca de la estructura del archivo .dbc, vea Estructura de archivos de
tabla.
Aunque el Diseñador de bases de datos proporciona una representación conceptual del esquema de la
base de datos, puede que en ocasiones sea necesario examinar el contenido del propio archivo de base
de datos. Para examinar una base de datos cerrada puede utilizar el comando USE con el archivo
.dbc. En el ejemplo siguiente se abre una ventana Examinar que muestra el contenido de la base de
datos sales en formato de tabla.
CLOSE DATABASE sales
USE sales.dbc EXCLUSIVE
BROWSE
Precaución No utilice el comando BROWSE para modificar el archivo de base de datos si no
conoce la estructura de los archivos .dbc. Si comete un error al intentar modificar el archivo .dbc,
puede invalidar la base de datos y provocar una pérdida de datos.
Extender los archivos de base de datos
Todos los archivos .dbc contienen un campo Memo, llamado User, que puede utilizar para almacenar
su propia información sobre cada registro de la base de datos. También puede extender un archivo
.dbc agregándole campos para ajustarlo a sus necesidades como programador. Para modificar la
estructura de un archivo .dbc es necesario tener acceso al mismo de forma exclusiva.
Para agregar un campo a un archivo .dbc
1. Abra el archivo .dbc para uso exclusivo con el comando USE.
2. Utilice el comando MODIFY STRUCTURE.
Por ejemplo, el código siguiente abre el Diseñador de tablas para permitirle agregar un campo a la
estructura de Testdata.dbc:

estructura de Testdata.dbc:
USE TESTDATA.DBC EXCLUSIVE
MODIFY STRUCTURE
Al agregar un nuevo campo o un archivo de base de datos, utilice como primer carácter de su nombre
“U” para indicar que se trata de un campo definido por el usuario. Esta convención evita que el
campo entre en conflicto con futuras extensiones del archivo .dbc.
Precaución No modifique ninguno de los campos definidos por Visual FoxPro en un archivo .dbf.
Las modificaciones de un archivo .dbc pueden afectar a la integridad de la base de datos.
Validar una base de datos
La validación de una base de datos asegura que las filas de la base de datos almacenan
representaciones precisas de los metadatos de la base de datos. Para comprobar la integridad de la
base de datos activa, puede utilizar el comando VALIDATE DATABASE.
Para validar una base de datos
l Utilice el comando VALIDATE DATABASE.
Por ejemplo, el código siguiente utiliza y valida el archivo .dbc de la base de datos testdata:
OPEN DATABASE testdata EXCLUSIVE
VALIDATE DATABASE
Administrar una base de datos
Después de crear una base de datos, es posible que quiera agregarla a un proyecto si no forma parte
de uno. Si su base de datos ya forma parte de un proyecto, puede quitarla del mismo. Además, si ya
no necesita la base de datos, puede eliminarla del disco.
Una base de datos en el Administrador de proyectos

Agregar una base de datos a un proyecto
Al crear una base de datos con el comando CREATE DATABASE, la base de datos no pasa
automáticamente a formar parte de un proyecto, aún cuando el Administrador de proyectos esté
abierto. Puede agregar la base de datos a un proyecto para facilitar la organización, la presentación y
la manipulación de los objetos de base de datos mediante la interfaz y también para simplificar el
proceso de generación de una aplicación. Sólo se puede agregar una base de datos a un proyecto
mediante el Administrador de proyectos.
Para agregar una base de datos a un proyecto
l En el Administrador de proyectos, seleccione Bases de datos y, a continuación, elija Agregar.
Quitar una base de datos de un proyecto
Sólo se puede quitar una base de datos de un proyecto mediante el Administrador de proyectos.
Para quitar una base de datos de un proyecto
l En el Administrador de proyectos, seleccione la base de datos y elija Quitar; a continuación,
elija Quitar de nuevo.
Eliminar una base de datos
Para eliminar del disco una base de datos puede utilizar el Administrador de proyectos o el comando
DELETE DATABASE.
Para eliminar una base de datos
l En el Administrador de proyectos, seleccione la base de datos, elija Quitar y, a continuación,
elija Eliminar.
–O bien–
l Utilice el comando DELETE DATABASE.
Por ejemplo, el código siguiente elimina la base de datos ejemplo:
DELETE DATABASE sample
Utilice siempre alguno de los métodos anteriores para eliminar una base de datos del disco. El uso del
Administrador de proyectos o del comando DELETE DATABASE permite a Visual FoxPro suprimir
los vínculos anteriores que unen la base de datos a sus tablas. Otras utilidades de manipulación de

los vínculos anteriores que unen la base de datos a sus tablas. Otras utilidades de manipulación de
archivos, como el Administrador de archivos de Windows, no suprimen los vínculos anteriores.
Nota El comando DELETE DATABASE no elimina del disco las tablas asociadas a la base de
datos, sino que las convierte en tablas libres. Si desea eliminar del disco una base de datos y también
todas sus tablas asociadas, utilice la cláusula DELETETABLES con el comando DELETE
DATABASE.
Hacer referencia a múltiples bases de datos
En un sistema es posible disponer de múltiples bases de datos de Visual FoxPro para satisfacer las
necesidades de un entorno multiusuario. El uso de múltiples bases de datos ofrece las siguientes
ventajas:
l Controlan el acceso de usuarios a un subconjunto de tablas del sistema global.
l Organizan los datos para satisfacer de forma eficaz las necesidades de información de varios
grupos que usan el sistema.
l Permitiendo el uso exclusivo de un subconjunto de tablas para crear vistas locales y remotas en
tiempo de ejecución.
Por ejemplo, es posible que tenga una base de datos de ventas que guarda información de ventas
usada principalmente por la fuerza de ventas que trabaja con clientes y otra base de datos que guarda
información de inventario usada principalmente por los compradores que trabajan con los
suministradores. A veces es necesario que la información de estos grupos se solape. Estas bases de
datos se pueden abrir simultáneamente y se puede tener acceso a las mismas como se desee, pero
contendrán tipos de información completamente diferentes.
Múltiples bases de datos pueden agregar flexibilidad a su sistema
Puede usar múltiples bases de datos abriendo más de una base de datos simultáneamente o
estableciendo referencias en una base de datos cerrada. Cuando están abiertas varias bases de datos,
puede establecer la base de datos actual y seleccionar tablas de ella.

puede establecer la base de datos actual y seleccionar tablas de ella.
Abrir más de una base de datos
Cuando hay abierta una base de datos, las tablas y las relaciones entre ellas están controladas por la
información almacenada en la base de datos abierta. Puede tener abierta más de una base de datos a la
vez. Por ejemplo, puede utilizar múltiples bases de datos abiertas al ejecutar varias aplicaciones, cada
una basada en una base de datos distinta. También puede ser conveniente abrir varias bases de datos
para utilizar información (como por ejemplo controles personalizados) almacenada en una base de
datos distinta de la que utiliza la aplicación.
Para abrir más de una base de datos
l En el Administrador de proyectos, seleccione una base de datos y elija Modificar o Abrir.
–O bien–
l Utilice el comando OPEN DATABASE.
Al abrir una nueva base de datos no se cierran las que se hayan abierto previamente. Las bases
abiertas continuarán en este estado y la última en abrirse pasará a ser la base de datos activa.
Establecer la base de datos activa
Al abrir varias bases de datos, Visual FoxPro establece como activa la abierta en último lugar. De
forma predeterminada, todas las tablas u objetos que cree o agregue formarán parte de la base de
datos activa. Los comandos y funciones que manipulan bases de datos abiertas, como ADD TABLE y
DBC( ), se aplican también a la base de datos activa.
Puede elegir una base de datos distinta y establecerla como activa mediante la interfaz o mediante el
comando SET DATABASE.
Para establecer la base de datos activa
l En la barra de herramientas estándar, seleccione una base de datos en el cuadro Bases de datos.
–O bien–
l Utilice el comando SET DATABASE.
Por ejemplo, el código siguiente abre tres bases de datos, establece la primera como activa y luego

Por ejemplo, el código siguiente abre tres bases de datos, establece la primera como activa y luego
utiliza la función DBC( ) para mostrar el nombre de la base de datos activa:
OPEN DATABASE tastrade
OPEN DATABASE sample
SET DATABASE TO testdata
? DBC( )
Sugerencia Visual FoxPro puede abrir una o más bases de datos automáticamente al ejecutar una
consulta o un formulario que requiera que esas bases de datos se encuentren abiertas. Para mantener
el control, establezca la base de datos activa explícitamente antes de utilizar comandos que operen
sobre la base de datos activa.
Seleccionar tablas de la base de datos activa
Para elegir en una lista con las tablas de la base de datos activa, puede utilizar el comando USE.
Para elegir una tabla de la base de datos activa
l Escriba el comando USE con el símbolo “?”.
Aparecerá el cuadro de diálogo Usar en el que puede seleccionar la tabla que desea abrir.
Por ejemplo, el código siguiente abre la base de datos ventas y solicita que se seleccione una de las
tablas que contiene.
OPEN DATABASE SALES
USE ?
Si desea seleccionar una tabla no asociada a la base de datos abierta, podrá elegir "Otras" en el cuadro
de diálogo Usar.
Cerrar una base de datos
Puede cerrar una base de datos abierta mediante el Administrador de proyectos o mediante el
comando CLOSE DATABASE.
Para cerrar una base de datos
l En el Administrador de proyectos, seleccione la base de datos y elija Cerrar.
–O bien–
l Utilice el comando CLOSE DATABASE.
Por ejemplo, el código siguiente cierra la base de datos testdata:
SET DATABASE TO testdata
CLOSE DATABASE
Ambas opciones cierran automáticamente la base de datos. También puede cerrar bases de datos y

Ambas opciones cierran automáticamente la base de datos. También puede cerrar bases de datos y
todos los demás objetos abiertos con la cláusula ALL del comando CLOSE.
El uso del comando CLOSE DATABASE desde la ventana Comandos no cerrará las bases de datos
que se hayan abierto de las formas siguientes:
l Con el Administrador de proyectos al expandir el esquema para ver el contenido de una base de
datos.
l Con un formulario que se ejecute en su propia sesión de datos.
En estas circunstancias, la base de datos permanecerá abierta hasta que el Administrador de proyectos
la cierre o hasta que se cierre el formulario que la utiliza.
Resolución del alcance
Visual FoxPro utiliza la base de datos activa como alcance principal para los objetos con nombre,
como las tablas. Cuando una base de datos está abierta, Visual FoxPro busca primero en ella los
objetos que se soliciten, como pueden ser tablas, vistas, conexiones, etcétera. Si el objeto no se
encuentra en la base de datos, Visual FoxPro lo buscará en la ruta de búsqueda predeterminada.
Por ejemplo, si la tabla customer está asociada a la base de datos sales, Visual FoxPro encontrará
siempre la tabla customer de la base de datos al utilizar los comandos siguientes:
OPEN DATABASE SALES
ADD TABLE F:SOURCECUSTOMER.DBF
USE CUSTOMER
Si utiliza el comando siguiente, Visual FoxPro buscará la tabla products comenzando por la base de
datos activa:
USE PRODUCTS
Si products no se encuentra en la base de datos activa, Visual FoxPro intentará buscar fuera de ella
en la ruta de búsqueda predeterminada.
Nota Puede especificar la ruta de acceso completa de una tabla si desea tener acceso a la misma
desde dentro o desde fuera de una base de datos; por ejemplo, si prevé un cambio en la ubicación de
la tabla. Sin embargo, el rendimiento es mejor cuando sólo se hace referencia al nombre de la tabla,
ya que en Visual FoxPro es más rápido el acceso a los nombres de tablas de base de datos que a los
nombres especificados con la ruta de acceso completa.
Controlar errores de bases de datos
Los errores de base de datos, también llamados “errores de motor”, ocurren cuando se dan errores en
tiempo de ejecución en código de eventos a nivel de registros. Por ejemplo, un error de base de datos
ocurre cuando el usuario intenta almacenar un valor nulo en un campo que no admite valores nulos.
Cuando ocurre un error de base de datos, el motor de base de datos subyacente que detecta el error
envía normalmente un mensaje de error. Sin embargo, la naturaleza exacta del mensaje de error

envía normalmente un mensaje de error. Sin embargo, la naturaleza exacta del mensaje de error
depende de la base de datos a la que se tenga acceso, por ejemplo, los mensajes de error producidos
por un servidor de base de datos remota (como Microsoft SQL Server) probablemente serán distintos
de los que se producen si ocurre un error en una tabla local de Visual FoxPro.
Además, los errores a nivel de motor son a veces muy genéricos, porque el motor de base de datos no
tiene información sobre el contexto en el que se actualiza un registro. Como consecuencia, los
mensajes de error producidos por un motor de base de datos suelen ser menos útiles para el usuario
de una aplicación de Visual FoxPro.
Para controlar errores de base de datos de forma más específica para la aplicación, puede crear
desencadenantes con el comando CREATE TRIGGER. El desencadenante se llama cuando se intenta
la actualización de un registro (eliminar, insertar o actualizar). El código de desencadenante
actualizado puede buscar entonces condiciones de error específicas de la aplicación e informar de
ellas.
Si controla errores de base de datos mediante desencadenantes, debería activar el almacenamiento
local. De esta forma, cuando se actualiza un registro, se llama al desencadenante pero el registro no se
envía automáticamente a la base de datos subyacente. Así evita la posibilidad de producir dos
mensajes de error: uno del desencadenante y otro del motor de base de datos subyacente.
Para crear mensajes de error personalizados mediante desencadenantes
1. Dentro de una función definida por el usuario o un procedimiento almacenado, escriba su
propio texto de mensaje.
2. Active el almacenamiento local con la función CURSORSETPROP( ) para mostrar su texto
personalizado. Si el almacenamiento local está desactivado, el usuario verá tanto su texto
personalizado como el mensaje de error del motor.
Capítulo 7: Trabajar con tablas
La creación de una base de datos implica la creación de tablas. Al diseñar la base de datos especificó
los campos de tabla y las relaciones necesarias para su aplicación. Ahora, al crear las tablas, deberá
indicar con más detalle los tipos de datos, los títulos y los posibles valores predeterminados de cada
campo, los desencadenantes de cada tabla y los índices que se utilizan para establecer relaciones entre
las tablas. En este capítulo se describe el proceso de crear, ajustar y relacionar tablas e índices al
programar una aplicación. Se tratará principalmente el uso del lenguaje para trabajar con tablas y
registros, pero también se explicará el uso de la interfaz para realizar tareas habituales.
l Crear tablas
l Trabajar con registros
l Indexar tablas
l Usar múltiples tablas
Crear tablas

Puede crear una tabla en una base de datos o una tabla libre que no esté asociada a ninguna base de
datos. A medida que crea la tabla puede crear nombres largos de tabla y de campo, y aprovechar las
posibilidades del diccionario de datos para tablas de base de datos, nombres largos de campo, valores
de campo predeterminados, reglas a nivel de campo y a nivel de registro, y desencadenantes.
Diseñar tablas de base de datos y tablas libres
Las tablas de Visual FoxPro, o archivos .dbf, pueden existir en dos estados: como tabla de base de
datos (una tabla asociada a una base de datos) o como una tabla libre no asociada a ninguna base de
datos. Las tablas asociadas a una base de datos cuentan con ciertas ventajas sobre las tablas libres.
Cuando una tabla forma parte de una base de datos, es posible crear:
l Nombres largos para la tabla y para cada uno de sus campos.
l Títulos y comentarios para cada campo de la tabla.
l Valores predeterminados, máscaras de entrada y formato para los campos de la tabla.
l Clases de control predeterminada para campos de tablas.
l Reglas a nivel de campo y a nivel de registro.
l Índices de clave primaria y relaciones de tablas para compatibilidad con reglas de integridad
referencial.
l Un desencadenante para cada evento INSERT, UPDATE o DELETE.
Algunas características sólo son aplicables a las tablas de base de datos. Si desea información sobre la
forma de asociar tablas a una base de datos, consulte el capítulo 6, Crear bases de datos.
Las tablas de base de datos tienen propiedades con las que no cuentan las tablas libres
Puede diseñar y crear una tabla de forma interactiva mediante el Diseñador de tablas, accesible a
través del Administrador de proyectos o del menú Archivo, o mediante el lenguaje de programación.
En esta sección se describe principalmente la creación de una tabla mediante programación. Si desea
información sobre el uso del Diseñador de tablas para crear tablas de forma interactiva, consulte el
capítulo 2, Crear tablas e índices, del Manual del usuario.
Para crear y modificar una tabla mediante programación se utilizan los comandos siguientes:
Comandos para crear y modificar tablas

Comandos para crear y modificar tablas
ALTER TABLE CLOSE TABLES
CREATE TABLE DELETE FILE
REMOVE TABLE RENAME TABLE
DROP TABLE
Crear una tabla de base de datos
Para crear una nueva tabla en una base de datos puede utilizar el sistema de menús, el Administrador
de proyectos o puede hacerlo mediante el lenguaje. Al crear la tabla puede especificar nombres largos
de tabla y de campo, valores de campo predeterminados, reglas a nivel de campo y a nivel de registro,
y desencadenantes.
Para crear una nueva tabla de base de datos
l En el Administrador de proyectos seleccione una base de datos, elija Tablas y, a continuación,
Nuevo para abrir el Diseñador de tablas.
–O bien–
l Utilice el comando CREATE TABLE con una base de datos abierta.
Por ejemplo, el código siguiente crea la tabla peqtbl con una columna, llamada nombre:
OPEN DATABASE Sales
CREATE TABLE peqtbl (nombre c(50))
La nueva tabla se asocia automáticamente a la base de datos abierta en el momento de su creación.
Esta asociación está definida por un vínculo anterior almacenado en el registro de encabezado de la
tabla.
Crear una tabla libre
Para crear una nueva tabla libreLas tablas libres no están asociadas a ninguna base de datos. Puede
ser conveniente crear una tabla libre, por ejemplo, para almacenar información de consulta que
comparten múltiples bases de datos.

comparten múltiples bases de datos.
l En el Administrador de proyectos, seleccione Tablas libres y, a continuación, Nuevo para
abrir el Diseñador de tablas.
–O bien–
l Use la palabra clave FREE con el comando CREATE TABLE.
Por ejemplo, el código siguiente crea la tabla libre peqtbl con una columna, llamada nombre:
CLOSE DATABASES
CREATE TABLE peqtbl FREE (nombre c(50))
Si no hay ninguna base de datos abierta cuando crea la tabla, no tiene que usar la palabra clave FREE.
Asignar un nombre a una tabla
Al utilizar el comando CREATE TABLE se especifica el nombre del archivo .DBF que Visual
FoxPro creará para almacenar la nueva tabla. El nombre del archivo será el nombre predeterminado
de la tabla, tanto en el caso de tablas de base de datos como en el de tablas libres. Los nombres de las
tablas pueden contener letras, dígitos o signos de subrayado y deben empezar por una letra o un signo
de subrayado.
Si la tabla es de base de datos, también podrá especificar un nombre largo de tabla. Los nombres
largos de tabla pueden tener hasta 128 caracteres y pueden usarse en lugar de los nombres cortos para
identificar la tabla en la base de datos. Cuando se han definido nombres largos de tabla, Visual
FoxPro los mostrará siempre que la tabla aparezca en la interfaz, como por ejemplo en el Diseñador
de bases de datos, el Diseñador de consultas y el Diseñador de vistas, así como en la barra de título de
las ventanas Examinar.
Para asignar un nombre largo a una tabla de base de datos
l En el Diseñador de tablas, escriba un nombre largo en el cuadro de texto Nombre de la ficha
Tabla.
–O bien–
l Utilice la cláusula NAME del comando CREATE TABLE.
Por ejemplo, el código siguiente crea la tabla provintl y le asigna el nombre largo
vendors_international, más legible:
CREATE TABLE provintl NAME vendors_international (company C(40))
También puede utilizar el Diseñador de tablas para cambiar el nombre de las tablas o agregar
nombres largos a tablas creadas sin ellos. Por ejemplo, cuando agregue una tabla libre a una base de
datos, puede utilizar el Diseñador de tablas para agregarle un nombre largo de tabla. Los nombres
largos pueden contener letras, dígitos o signos de subrayado, y deben empezar por una letra o un

largos pueden contener letras, dígitos o signos de subrayado, y deben empezar por una letra o un
signo de subrayado. No se permite el uso de espacios en blanco en los nombres largos de tabla.
Cambiar el nombre de una tabla
Puede cambiar el nombre de tablas de base de datos a través de la interfaz porque va a cambiar el
nombre largo. Si quita la tabla de la base de datos, el nombre de archivo de la tabla conserva el
nombre original. Las tablas libres no tienen un nombre largo y sólo se puede cambiar su nombre a
través del lenguaje.
Para cambiar el nombre de una tabla de una base de datos
1. En el Diseñador de bases de datos, seleccione la tabla cuyo nombre desea cambiar.
2. En el menú Base de datos, elija Modificar.
3. En el Diseñador de tablas escriba un nuevo nombre para la tabla en el cuadro Nombre de
tabla de la ficha Tabla.
Para cambiar el nombre de una tabla
l Use el comando RENAME.
Precaución Si usa el comando RENAME en tablas asociadas a la base de datos, el comando
no actualiza el vínculo anterior a la base de datos y puede producir errores de acceso a la tabla.
Eliminar una tabla de base de datos
Si una tabla está asociada a una base de datos, para eliminarla quítela de la base de datos. Sin
embargo, eliminar una tabla es distinto de quitarla de una base de datos. Si desea quitar la tabla de la
base de datos, pero no desea eliminarla físicamente del disco, consulte Quitar una tabla de una base
de datos" en el capítulo 6, Crear bases de datos.
Para eliminar una tabla de base de datos del disco
l En el Administrador de proyectos, seleccione el nombre de la tabla, elija Quitar y, a
continuación, elija Eliminar.
–O bien–
l En el Diseñador de bases de datos, seleccione la tabla, elija Quitar del menú Base de datos y,
a continuación, elija Eliminar.
–O bien–
l Para eliminar la tabla junto a todos los índices principales, valores predeterminados y reglas de
validación asociadas a la tabla, use el comando DROP TABLE.
–O bien–

–O bien–
l Para eliminar únicamente el archivo de tabla (.dbf), use el comando ERASE.
Precaución Si usa el comando ERASE en tablas asociadas a la base de datos, el comando no
actualiza el vínculo anterior a la base de datos y puede producir errores de acceso a tabla.
Por ejemplo, el código siguiente abre la base de datos testdata y elimina la tabla orditems y sus
índices, valores predeterminados y reglas de validación:
DROP TABLE orditems
Al eliminar una tabla con la cláusula DELETE del comando REMOVE TABLE también desaparecen
el archivo memo .fpt y el archivo de índice estructural .cdx.
Eliminar una tabla libre
Si una tabla no está asociada a ninguna base de datos, podrá eliminar su archivo mediante el
Administrador de proyectos o con el comando DELETE FILE.
Para eliminar una tabla libre
l En el Administrador de proyectos, seleccione la tabla libre, elija Quitar y, a continuación, elija
Eliminar.
–O bien–
l Utilice el comando DELETE FILE.
Por ejemplo, si la tabla actual es ejemplo, el código siguiente cerrará la tabla y eliminará su archivo
del disco:
USE
DELETE FILE ejemplo.dbf
El archivo que desea eliminar no puede estar abierto en el momento de utilizar DELETE FILE. Si
elimina una tabla que tiene otros archivos asociados, como un archivo memo .fpt o archivos de índice
(.cdx o .idx), asegúrese de eliminar también este archivo. Por ejemplo, si el archivo ejemplo.dbf
tuviese además un archivo memo asociado, podría eliminar ambos archivos con los comandos
siguientes:
USE
DELETE FILE ejemplo.dbf
DELETE FILE ejemplo.fpt
Duplicar una tabla
Puede hacer una copia idéntica de una tabla, sus procedimientos almacenados, expresiones
desencadenantes, valores de campos predeterminados y su contenido a través de programación. No
hay ninguna opción de menú que realice la misma función. Este procedimiento no copia el contenido

hay ninguna opción de menú que realice la misma función. Este procedimiento no copia el contenido
de la tabla.
Para duplicar una tabla
1. Abra la tabla original.
2. Use el comando COPY STRUCTURE para hacer una copia de la tabla original.
3. Abra la tabla vacía creada con el comando COPY STRUCTURE.
4. Use el comando APPEND FROM para copiar los datos desde la tabla original.
Copiar y modificar la estructura de una tabla
Para modificar la estructura de una tabla puede abrir el Diseñador de tablas o bien puede realizar los
cambios mediante programación con el comando ALTER TABLE. De forma alternativa, puede crear
una tabla nueva en base a la estructura de una tabla existente y, a continuación, modificar la
estructura de la nueva tabla.
Para copiar y modificar la estructura de una tabla
1. Abra la tabla original.
2. Use el comando COPY STRUCTURE EXTENDED para producir una tabla nueva que
contenga la información estructural de la tabla antigua.
3. Modifique la nueva tabla que contiene la información estructural para variar la estructura de
cualquier tabla nueva creada a partir de esa información.
4. Cree una tabla nueva con el comando CREATE FROM.
La nueva tabla está vacía.
5. Use APPEND FROM o uno de los comandos de copia de datos para rellenar la tabla si es
necesario.
Guardar una tabla como HTML
Puede utilizar la opción Guardar como HTML del menú Archivo cuando examine el contenido de
una tabla para guardarla como un archivo HTML (Lenguaje de marcado de hipertexto).
Para guardar una tabla como HTML
1. Abra la tabla.
2. Examine la tabla; para ello, ejecute el comando BROWSE en la ventana Comandos o elija
Examinar en el menú Ver.
3. Elija Guardar como HTML en el menú Archivo.

3. Elija Guardar como HTML en el menú Archivo.
4. Escriba el nombre del archivo HTML que desea crear y elija Guardar.
Crear campos
Al crear campos de tabla debe especificar un nombre de campo, un tipo de datos y un ancho de
campo. También puede indicar si el campo debe permitir valores nulos y especificar el valor
predeterminado del campo. Al configurar las propiedades de presentación, puede especificar el tipo
de control de formulario que se crea cuando el campo se agrega a un formulario, el formato del
contenido de los campos o el título del contenido del campo.
Nota Las tablas de Visual FoxPro puede contener hasta 255 campos. Si uno o más campos pueden
contener valores nulos, el número máximo de campos que la tabla puede contener se reduce en una
unidad, de 255 a 254.
Asignar nombres a los campos
Los nombres de los campos se especifican al crear la nueva tabla. Estos nombres pueden tener hasta
10 caracteres en las tablas libres y hasta 128 en las tablas de base de datos. Si quita una tabla de una
base de datos, los nombres largos de campo se truncarán a 10 caracteres.
Para asignar nombre a un campo de tabla
l En el Diseñador de tablas, escriba un nombre de campo en el cuadro de texto Nombre.
–O bien–
l Utilice el comando CREATE TABLE o el comando ALTER TABLE.
Por ejemplo, para crear y abrir la tabla customer con tres campos, cust_id, company y contact,
podría utilizar el comando siguiente:
CREATE TABLE customer (cust_id C(6), company C(40), contact C(30))
En el ejemplo anterior, C(6) indica que el campo tiene el tipo de datos Character y un ancho de 6. La
elección del tipo de datos de los campos de tablas se trata más adelante en esta sección.
Con el comando ALTER TABLE agrega los campos, company, y contact, a una tabla customer
existente:
ALTER TABLE customer ;
ADD COLUMN (company C(40), contact C(30))
Usar nombres cortos de campo
Al crear una tabla en una base de datos, Visual FoxPro almacena el nombre largo de los campos de la
tabla en un registro del archivo .dbc. Los 10 primeros caracteres de cada nombre largo se almacenan
también en el archivo .dbf como nombre de campo.

también en el archivo .dbf como nombre de campo.
Si los 10 primeros caracteres del nombre largo de campo no son únicos en la tabla, Visual FoxPro
generará un nombre formado por los n primeros caracteres del nombre largo y un número secuencial
a continuación, de forma que el nombre del campo tenga 10 caracteres. Por ejemplo, los nombres
largos de campo siguientes se convierten en los nombres de 10 caracteres que se indican:
Nombre largo Nombre corto
cliente_contacto_nombre cliente_co
cliente_contacto_dirección cliente_c2
customer_contact_city cliente_c3
... ...
cliente_contacto_fax cliente_11
Mientras una tabla esté asociada a una base de datos, deberá usar los nombres largos para referirse a
sus campos. No puede utilizar los nombres de 10 caracteres para hacer referencia a los campos de una
tabla de base de datos. Si quita una tabla de su base de datos, los nombres largos de los campos se
perderán y deberá utilizar los de 10 caracteres (almacenados en el archivo .dbf).
Puede utilizar nombres largos de campo en los archivos de índice. Sin embargo, si crea un índice con
nombres largos de campo y luego quita la tabla correspondiente de la base de datos, el índice no
funcionará. En este caso, puede eliminar el índice y volver a crearlo con nombres cortos de campo. Si
desea información sobre la forma de eliminar un índice, consulte "Eliminar un índice", más adelante
en este mismo capítulo.
Las reglas para crear nombres largos de campo son las mismas que para cualquier identificador de
Visual FoxPro, salvo que pueden contener hasta 128 caracteres.
Si desea más información sobre la asignación de nombres a los identificadores de Visual FoxPro, vea
Crear nombres de Visual FoxPro.
Elegir los tipos de datos
Al crear cada campo de una tabla, deberá elegir el tipo de los datos que ese campo va a almacenar. Al
elegir el tipo de datos, decide lo siguiente:
l La clase de valores que se van a permitir en el campo. Por ejemplo, no puede almacenar texto
en un campo Numeric.
l El espacio de almacenamiento que Visual FoxPro debe reservar para los valores almacenados
en el campo. Por ejemplo, todos los valores con tipo de datos Currency ocuparán 8 bytes.
l Los tipos de operaciones que pueden realizarse con los valores almacenados en el campo. Por
ejemplo, Visual FoxPro puede hallar la suma de valores numéricos o de moneda, pero no la de
valores de tipo character o general.
l Si Visual FoxPro puede o no indexar u ordenar los valores del campo. No es posible ordenar ni
crear índices para los campos de tipo memo o general.
Sugerencia Para los números de teléfono, números de pieza y otros números que no vaya a

Sugerencia Para los números de teléfono, números de pieza y otros números que no vaya a
utilizar en cálculos matemáticos, debe elegir el tipo de datos Character, en lugar de Numeric.
Para elegir el tipo de datos de un campo
l En el Diseñador de tablas, elija un tipo de datos en la lista Tipo.
–O bien–
l Utilice el comando CREATE TABLE.
Por ejemplo, para crear y abrir la tabla products con tres campos, prod_id, prod_name y
unit_price, podría utilizar el comando siguiente:
CREATE TABLE products (prod_id C(6), prod_name C(40), unit_price Y)
En el ejemplo anterior, la ‘Y’ que aparece después de unit_price especifica el tipo de datos
Moneda.
Para obtener más información acerca de tipos de datos específicos, vea Tipos de datos y tipos de
campos.
Agregar rápidamente un índice normal
Al agregar un campo, puede definir rápidamente un índice normal en el campo si especifica
ascendente o descendente en la columna Índice del Diseñador de tablas. El índice que cree se agrega
automáticamente a la ficha Índices y usa el campo como expresión. Para modificar el índice, puede
cambiar a la ficha Índices para cambiar el nombre de índice, el tipo o agregar un filtro.
Usar valores nulos
Al crear una tabla nueva, puede especificar si uno o más campos de la misma deben aceptar valores
nulos. Al usar un valor nulo, se indica que la información que normalmente se almacenaría en un
campo o registro no está disponible en ese momento. Por ejemplo, las ventajas sanitarias o el estado
impositivo de un empleado pueden no estar determinados en el momento de rellenar un registro. En
lugar de almacenar un cero o dejar los campos en blanco, lo que podría interpretarse de modo
erróneo, puede almacenar en ellos un valor nulo hasta que la información correspondiente esté
disponible.
Para controlar la introducción de valores nulos campo a campo
l En el Diseñador de tablas, seleccione o desactive la columna Null del campo correspondiente.
Cuando la columna Null está seleccionada, se pueden introducir valores nulos en el campo.
–O bien–
l Utilice las cláusulas NULL y NOT NULL del comando CREATE TABLE.

l Utilice las cláusulas NULL y NOT NULL del comando CREATE TABLE.
Por ejemplo, el comando siguiente crea y abre una tabla que no admite valores nulos en los campos
cust_id y company pero que sí los permite en el campo contact:
CREATE TABLE customer (cust_id C(6) NOT NULL, ;
company C(40) NOT NULL, contact C(30) NULL)
También puede controlar si se admiten o no valores nulos en los campos de la tabla con el comando
SET NULL ON.
Para permitir valores nulos en todos los campos de la tabla
l En el Diseñador de tablas, seleccione la columna Null para todos los campos de la tabla.
–O bien–
l Utilice el comando SET NULL ON antes del comando CREATE TABLE.
Al especificar el comando SET NULL ON, Visual FoxPro marca automáticamente la columna NULL
para cada campo de la tabla a medida que usted agrega campos en el Diseñador de tablas. Si ejecuta
el comando SET NULL antes de CREATE TABLE, no será necesario especificar las cláusulas NULL
o NOT NULL. Por ejemplo, el código siguiente crea una tabla que permite valores nulos en todos sus
campos:
SET NULL ON
CREATE TABLE test (field1 C(6), field2 C(40), field3 Y)
La presencia de valores nulos afecta al comportamiento de las tablas y de los índices. Por ejemplo, si
utiliza APPEND FROM para copiar registros de una tabla que contiene valores nulos a otra que no
los admite, los campos anexados que contengan valores nulos se considerarán en blanco, vacíos o con
valor cero en la tabla actual.
Si desea más información sobre la forma en que los valores nulos interactúan con los comandos,
consulte Controlar valores nulos.
Agregar comentarios a los campos
Una vez creada una tabla en una base de datos abierta, puede agregar una descripción de cada campo
de la tabla para facilitar la comprensión y la actualización de la tabla. Visual FoxPro muestra el texto
de comentario de los campos en el Administrador de proyectos cuando se seleccionan en la lista de
campos de la tabla.
Para agregar un comentario a un campo de una tabla de base de datos
l En el Diseñador de tablas, escriba el texto del comentario en el área de edición de Comentario
de campo.
–O bien–
l Utilice la función DBSETPROP( ).

l Utilice la función DBSETPROP( ).
Por ejemplo, puede ser conveniente aclarar el contenido del campo unit_price de la tabla orditems
con el comentario “Precio actual por unidad” como texto asociado al campo:
?DBSETPROP('orditems.price', 'field', 'comment', ;
'Precio de venta al por menor actual’)
Si desea más información sobre el uso de DBSETPROP( ) para establecer propiedades de los campos
de una tabla de base de datos, consulte el capítulo 6, Crear bases de datos.
Crear valores predeterminados de campo
Si desea que Visual FoxPro rellene automáticamente un campo al agregar un nuevo registro, puede
crear un valor predeterminado para ese campo. El valor predeterminado se aplica al introducir datos
mediante un formulario, en una ventana Examinar, en una vista o mediante programación, y
permanece en el campo hasta que se escriba un nuevo valor.
Los valores predeterminados se crean con el Diseñador de tablas o a través del lenguaje. Es posible
especificar valores predeterminados para todos los tipos de datos, excepto General.
Para asignar un valor predeterminado a un campo de una tabla de base de datos
l En el Diseñador de tablas, introduzca el valor en el cuadro de texto Valor predeterminado de
la sección Propiedades de campo.
–O bien–
l Utilice la cláusula DEFAULT del comando CREATE TABLE.
Por ejemplo, puede estimar conveniente que su aplicación limite la mercancía que puede pedir un
nuevo cliente hasta que haya tenido tiempo de realizar una comprobación de su crédito y determinar
la cantidad que desea autorizarle. En el ejemplo siguiente se crea un campo maxordamt con un valor
predeterminado de 1000:
CREATE TABLE customer (cust_id C(6), company C(40), contact C(30), ;
maxordamt Y(4) DEFAULT 1000)
Si la tabla customer ya incluye la columna maxordamt, podrá agregar un valor predeterminado para
la columna con el comando siguiente:
ALTER TABLE customer ALTER COLUMN maxordamt SET DEFAULT 1000
Usar valores predeterminados para acelerar la escritura de datos
Puede utilizar valores predeterminados para acelerar la escritura de datos por parte de los usuarios de
la aplicación, permitiéndoles así saltar un campo si no desean introducir en él un valor distinto. Por
ejemplo, si en su negocio trata principalmente con clientes nacionales, puede hacer que el campo
país de la tabla cliente de una base de datos se rellene automáticamente con el nombre de su país.
Al introducir el registro de un cliente extranjero, puede sobrescribir el nombre de su país con el del

Al introducir el registro de un cliente extranjero, puede sobrescribir el nombre de su país con el del
país correspondiente.
Sugerencia Si alguna de las reglas de la aplicación requiere que un campo contenga siempre un
valor, el uso de un valor predeterminado ayudará a asegurar que se cumpla una regla concreta a nivel
de campo o de registro.
Si quita o elimina una tabla de una base de datos, todos los valores predeterminados de la tabla se
eliminarán de la base de datos. Los procedimientos almacenados a los que haga referencia el valor
predeterminado quitado o eliminado permanecerán aún después de la eliminación.
Cuando no especifique un valor predeterminado, se insertará un valor en blanco (tal y como se define
para cada tipo de datos), salvo en el caso en que esté activado SET NULL. De esta forma se mantiene
la compatibilidad con el código de FoxPro de versiones anteriores que pueda conservar.
Puede indicar .NULL. como valor predeterminado si desea que el campo utilice valores nulos. Esté
activado o no SET NULL, si utiliza .NULL. como valor predeterminado, Visual FoxPro insertará
.NULL. para todos los comandos excepto APPEND BLANK.
Valores predeterminados permitidos
Puede especificar valores predeterminados escalares (por ejemplo, ‘un número’), o expresiones que
se evalúen como una cantidad escalar. También puede especificar cualquier expresión de Xbase
válida que devuelva un valor coherente con el tipo de datos del campo.
Visual FoxPro evalúa las expresiones para el tipo de datos cuando se cierra la estructura de la tabla.
Si el tipo de datos no coincide con el tipo asociado al campo, Visual FoxPro generará un error. Si la
expresión es una función definida por el usuario (FDU) o contiene una FDU, no se evaluará.
Al crear el valor predeterminado por medio del lenguaje, los comandos CREATE TABLE y ALTER
TABLE generarán un error cuando los tipos de datos no coincidan. Si la expresión es una FDU o
contiene una FDU, no se evaluará al ejecutar CREATE y no se generará ningún error.
Cuándo se aplican los valores predeterminados
Los valores predeterminados se evalúan (si es necesario) y se colocan en los campos correspondientes
cuando se ejecutan los comandos APPEND, APPEND BLANK o INSERT.
Al asignar valores con los comandos APPEND FROM o INSERT - SQL, Visual FoxPro asignará
valores predeterminados a todos los campos que no los tengan asignados explícitamente. Los
comandos APPEND FROM e INSERT - SQL también respetan los valores predeterminados. Sin
embargo, cuando se utiliza alguno de estos comandos, los valores predeterminados no sobrescriben a
los valores existentes en los campos. Si los campos anexados o insertados contienen valores, los
valores existentes se conservarán al anexar o insertar el registro, y no se utilizará el valor
predeterminado.
Usar valores predeterminados para rellenar automáticamente campos NOT NULL
Los valores predeterminados son especialmente útiles para rellenar automáticamente los campos que
no permiten valores nulos. Al agregar un nuevo registro, los valores predeterminados se aplican en

no permiten valores nulos. Al agregar un nuevo registro, los valores predeterminados se aplican en
primer lugar y después se comprueba cada campo según su orden de definición para determinar si
falta información. Así se asegura que los campos designados como NOT NULL tengan ocasión de
rellenarse con valores predeterminados antes de aplicar la restricción NOT NULL.
Especificar una máscara de entrada
Al especificar una máscara de entrada, define la puntuación, el espacio y otros atributos de formato
de valores que se introducen en el campo. Los valores se almacenan así de una forma uniforme que
puede reducir los errores de entrada de datos, haciendo que se procesen de forma más eficaz. Por
ejemplo, al agregar una máscara a un campo numérico que almacena números de teléfono ayuda al
usuario a rellenar rápidamente el campo porque la puntuación y los espacios ya los proporciona la
máscara.
Para proporcionar una máscara de entrada
l En el Diseñador de tablas, escriba la máscara en el cuadro Máscara de entrada en el área
Mostrar.
–O bien–
l Use la función DBSETPROP( ) para establecer la propiedad InputMask.
Por ejemplo, el código siguiente especifica una máscara de entrada para una fecha:
DBSetProp("orders.postalcode","field","InputMask", "99999-9999")
Controlar la presentación de un campo
Las propiedades adicionales para campos le permiten controlar cómo aparecen un campo y sus
valores en formularios, ventanas Examinar e informes. Puede especificar un formato de presentación,
un título de campo predeterminado y una clase y una biblioteca de clases predeterminadas.
Definir un formato
Un formato proporciona una máscara de salida que determina la manera en que se presenta el valor de
un campo en un formulario, una ventana Examinar o un informe. Por ejemplo,
Para proporcionar un formato
l En el Diseñador de tablas, escriba la máscara en el cuadro Formato en el área Mostrar.
–O bien–
l Use la función DBSETPROP( ) para establecer la propiedad Format.
Por ejemplo, el código siguiente especifica un formato de presentación para una tarjeta postal:
DBSetProp("orders.postalcode","field","Format","@R 99999-9999")

DBSetProp("orders.postalcode","field","Format","@R 99999-9999")
Crear títulos para campos
Puede crear un título para cada campo de una tabla de base de datos. Visual FoxPro muestra el texto
del título de un campo como encabezado de columna en una ventana Examinar y como nombre de
encabezado predeterminado en una cuadrícula de formulario.
Para agregar un título a un campo de una tabla de base de datos
l En el Diseñador de tablas, escriba el texto para el título en el cuadro Título de la sección
Mostrar.
–O bien–
l Use la función DBSETPROP( ).
Por ejemplo, es posible que quiera crear un título para el campo fax de la tabla supplier escribiendo
“Supplier_Fax” como título del campo:
?DBSETPROP('supplier.fax', 'field', 'caption', 'Supplier_Fax')
Para obtener más información sobre el uso de DBSETPROP( ) para establecer propiedades de
campos de tablas de base de datos, consulte el capítulo 6, Crear bases de datos.
Establecer una clase predeterminada
Para ahorrar tiempo más tarde al crear formularios puede establecer una clase predeterminada para un
campo. Una vez establecida, cada vez que agrega un campo a un formulario, el control del formulario
usa la clase que especifique como predeterminada. Por ejemplo, los campos de tipo Character
aparecen automáticamente como controles cuadro de texto cuando los agrega al formulario. Si en
lugar de esto quiere agregar automáticamente un control cuadro combinado cuando use el campo en
un formulario, puede establecer la clase como predeterminada para este campo. También puede usar
bibliotecas de clases que haya creado.
Para establecer una clase predeterminada
l En el Diseñador de tablas, elija una clase y una biblioteca en los cuadros Mostrar clase y
Mostrar biblioteca.
Si cambia a menudo la biblioteca y la clase para sus campos, puede asignar los tipos de datos de los
campos a una biblioteca y a una clase en el cuadro de diálogo Opciones. Para obtener más
información sobre la asignación de tipos de datos de campo a clases, consulte el capítulo 3,
Configurar Visual FoxPro, de la Guía de instalación e Índice principal. Para obtener más
información sobre la creación de clases, consulte el capítulo 3, Programación orientada a objetos, en
este manual.
Exigir reglas comerciales
Puede exigir reglas comerciales para la introducción de datos si crea a nivel de campo y a nivel de

Puede exigir reglas comerciales para la introducción de datos si crea a nivel de campo y a nivel de
registro las llamadas reglas de validación, con las que se pueden controlar los datos introducidos en
los campos y registros de las tablas de base de datos. Las reglas a nivel de campo y a nivel de registro
comparan los valores introducidos con expresiones definidas previamente. Si el valor introducido no
satisface los requisitos de la regla, se rechazará el valor. Las reglas de validación sólo pueden darse
para las tablas de base de datos.
Las reglas a nivel de campo y a nivel de registro permiten controlar el tipo de información
introducido en una tabla, tanto si el acceso a los datos se realiza mediante una ventana Examinar, un
formulario o mediante programación. Las reglas permiten exigir su cumplimiento en un campo con
menos código que si se escribiera la expresión de la regla en una cláusula VALID de un formulario o
en un fragmento de código del programa. Además, las reglas establecidas para una base de datos se
aplicarán a todos los usuarios de la tabla, independientemente de los requisitos de la aplicación.
También puede crear índices candidatos o principales que eviten entradas duplicadas en un campo, y
desencadenantes que exijan la integridad referencial o que realicen otras acciones cuando se modifica
la información de la base de datos.
Cuándo se establecen las restricciones
Las restricciones de la base de datos se eligen basándose en el nivel al que se desea exigir una regla
comercial o de integridad referencial, y también la acción que causa que la restricción se active. En la
tabla siguiente se enumeran las restricciones de validación de datos en el orden en que las exige el
motor de Visual FoxPro, el nivel al que se aplican y cuándo activa el motor la validación.
Mecanismo de exigencia Nivel Activación
Validación NULL Campo o columna Al salir del campo o columna en una
ventana Examinar o cuando el valor del
campo cambia a causa de INSERT o
REPLACE.
Reglas a nivel de campo Campo o columna Al salir del campo o columna en una
ventana Examinar o cuando el valor del
campo cambia a causa de INSERT o
REPLACE.
Reglas a nivel de registro Registro Al producirse la actualización del
registro.
Índice candidato o principal Registro Al producirse la actualización del
registro.
Cláusula VALID Formulario Al salir del registro.
Desencadenantes Tabla Al cambiar los valores de la tabla a
causa de un evento INSERT, UPDATE
o DELETE.
Las restricciones se activan en el orden en que aparecen en la tabla. El primer incumplimiento de una
validación detiene el comando correspondiente.

validación detiene el comando correspondiente.
Los índices candidatos y principales se tratan más adelante en este capítulo, dentro de la sección
"Controlar los valores duplicados".
Limitar los valores de un campo
Cuando desee controlar el tipo de información que un usuario puede introducir en un campo y sea
posible validarlo independientemente de las restantes entradas del registro, puede utilizar una regla de
validación a nivel de campo. Por ejemplo, puede utilizar una regla de validación a nivel de campo
para asegurarse de que el usuario no escriba un número negativo en un campo que sólo debe contener
valores positivos. También puede utilizar una regla a nivel de campo para comparar los valores
introducidos en un campo con los de otra tabla.
No debe crear reglas específicas de la aplicación a nivel de campo o a nivel de registro. Utilícelas
para exigir reglas de integridad de datos y reglas comerciales que sean siempre aplicables a la
información de la base de datos, independientemente de quién tenga acceso a la misma. Por ejemplo,
podría crear una regla que comparase el valor introducido en el campo código postal de una tabla
con una tabla de búsqueda con los códigos abreviados de su país y que rechazase los valores que no
fueran una abreviatura válida de código postal.
Para crear una regla a nivel de campo
l En el Diseñador de tablas, introduzca la expresión de la regla en el cuadro de texto Regla de la
sección Validación de campos.
–O bien–
l Utilice la cláusula CHECK del comando CREATE TABLE.
–O bien–
l Utilice la cláusula SET CHECK del comando ALTER TABLE.
Por ejemplo, el código siguiente agrega a la tabla orditems una regla de validación a nivel de campo
que requiere que el número introducido en el campo quantity sea mayor o igual que 1:
ALTER TABLE orditems
ALTER COLUMN quantity SET CHECK quantity >= 1
Cuando el usuario intente introducir un valor menor que 1, Visual FoxPro mostrará un mensaje de
error y rechazará el valor.
Puede personalizar el mensaje que aparece cuando se infringe la regla si agrega texto de validación al
campo. El texto especificado se mostrará en el cuadro de diálogo en lugar del mensaje de error
predeterminado.
Para agregar un mensaje de error personalizado a una regla a nivel de campo
l En el Diseñador de tablas, escriba el mensaje de error que desee en el cuadro Mensaje del área

l En el Diseñador de tablas, escriba el mensaje de error que desee en el cuadro Mensaje del área
Validación de campos.
–O bien–
l Utilice la cláusula opcional ERROR con la cláusula CHECK de los comandos CREATE
TABLE o ALTER TABLE.
Por ejemplo, el código siguiente agrega una regla de validación a nivel de campo para la tabla
orditems que requiere que los números introducidos en la columna quantity sean mayores o
iguales que 1 y además define un mensaje de error personalizado:
ALTER TABLE orditems ;
ALTER COLUMN quantity SET CHECK quantity >= 1 ;
ERROR "Las cantidades deben ser mayores o iguales que 1"
Cuando el usuario intente escribir un valor menor que 1, Visual FoxPro mostrará un cuadro de
diálogo de error con el mensaje de error personalizado que usted ha definido y rechazará el valor.
También puede utilizar la cláusula SET CHECK del comando ALTER TABLE con la cláusula
opcional ERROR para crear un mensaje de error personalizado.
Cuándo se comprueban las reglas a nivel de campo
Las reglas a nivel de campo se comprueban cuando se modifica el valor del campo. Al contrario que
los desencadenantes, las reglas a nivel de campo se activan incluso cuando los datos se encuentran en
búfer. Al trabajar con los datos en una ventana Examinar, en un formulario u otra ventana de interfaz
de usuario, Visual FoxPro comprueba las reglas a nivel de campo al salir del campo correspondiente.
Si el valor del campo no ha cambiado, la regla no se comprobará. Esto significa que puede
desplazarse por los campos sin que el sistema valide su contenido.
Comprobación de las reglas a nivel de campo
Método de introducción de
datos
Ventana o comando Comprobación de la regla a
nivel de campo
Interfaz de usuario Ventana Examinar
Formulario
Otra ventana
Al salir del campo, si el valor ha
variado. (Si el valor no cambia,
la regla no se comprueba).
Comandos que no
especifican campos
APPEND
APPEND GENERAL
APPEND MEMO
BROWSE
CHANGE
DELETE
EDIT
GATHER
Al cambiar el valor del campo,
en el orden de definición de los
campos.
APPEND BLANK
INSERT
INSERT - SQL
Al anexar o insertar el registro.

INSERT - SQL
Comandos que especifican
campos
UPDATE
UPDATE - SQL
REPLACE
En el orden en que aparecen los
campos en el comando.
Validar valores a nivel de registro
Las reglas de validación a nivel de registro permiten controlar el tipo de información que el usuario
puede introducir en los registros. Normalmente, las reglas de validación a nivel de registro comparan
los valores de dos o más campos del mismo registro para asegurarse de que cumplen las reglas
comerciales establecidas para la base de datos. Por ejemplo, puede utilizar una regla de validación a
nivel de registro para asegurarse de que el valor de un campo sea siempre superior al de otro campo
del mismo registro.
Para crear una regla de validación a nivel de registro y un mensaje de error personalizado
l En la ficha Tabla del Diseñador de tablas, escriba la regla y el mensaje de error que desee en
los cuadros Regla y Mensaje.
–O bien–
l Utilice la cláusula CHECK de los comandos CREATE TABLE o ALTER TABLE.
Por ejemplo, puede querer asegurarse de que los empleados tengan 18 o más años en el momento de
su contratación. En el código siguiente se agrega a la tabla employee una regla de validación a nivel
de registro y un texto de error para requerir que la fecha de contratación introducida en hire_date
sea mayor o igual que la fecha de nacimiento más 18 años:
ALTER TABLE employee SET CHECK ;
hire_date >= birth_date + (18 * 365.25) ;
ERROR "Los empleados deben tener 18 años en la fecha de contratación"
Si el usuario introduce un registro de empleado con una fecha no válida, Visual FoxPro mostrará un
cuadro de diálogo de error con el mensaje de error personalizado definido y no actualizará el registro.
También puede utilizar la cláusula SET CHECK del comando ALTER TABLE para crear una regla
de validación a nivel de registro. Debe asegurarse de que las reglas especificadas para los campos no
entren en conflicto semántico con las definidas para la tabla. Visual FoxPro no comprueba la
coherencia entre las expresiones a nivel de campo y a nivel de registro.
Cuándo se comprueban las reglas a nivel de registro
Las reglas a nivel de registro, al igual que las reglas a nivel de campo, se activan cuando el valor del
registro cambia. Independientemente de la forma de trabajar con los datos, ya sea en una ventana

registro cambia. Independientemente de la forma de trabajar con los datos, ya sea en una ventana
Examinar, en un formulario, en otra ventana de interfaz de usuario o mediante comandos que alteren
los datos, Visual FoxPro comprobará las reglas a nivel de registro a medida que usted desplace el
puntero de registro fuera del registro. Si no ha cambiado ningún valor del registro, la regla a nivel de
registro no se comprobará al desplazar el puntero, por lo que es posible desplazarse por los registros
sin que el sistema valide los datos que contienen.
Si modifica un registro, pero no desplaza el puntero y cierra la ventana Examinar, la regla se
comprobará, aparecerá un aviso si se producen errores y luego se cerrará la ventana Examinar.
Precaución No incluya en las reglas de validación comandos o funciones que intenten desplazar el
puntero de registro del área de trabajo actual (es decir, del área de trabajo cuyas reglas se están
comprobando). El uso de comandos o funciones tales como SEEK, LOCATE, SKIP, APPEND,
APPEND BLANK, INSERT o AVERAGE, COUNT, BROWSE y REPLACE FOR en las reglas de
validación puede causar su desencadenamiento recursivo, produciendo una condición de error.
Al contrario que los desencadenantes, las reglas a nivel de registro se activan incluso cuando los
datos se encuentran en búfer. Para el caso de que durante la ejecución de una aplicación se active una
regla a nivel de registro, es necesario incluir código de control de errores. Normalmente, este código
no permitirá que la aplicación abandone el formulario (o que cambie el entorno activo, hablando de
forma más genérica), hasta que el usuario corrija el error detectado o cancele la actualización.
Quitar de una base de datos una tabla con reglas asociadas
Si quita o elimina una tabla de una base de datos, se eliminarán todas las reglas a nivel de campo y a
nivel de registro de la base de datos. Esto se debe a que las reglas se almacenan en el archivo .dbc, y
al quitar una tabla de la base de datos se rompe el vínculo entre el archivo .dbf y su archivo .dbc. Sin
embargo, los procedimientos almacenados a los que haga referencia la regla quitada o eliminada no
se eliminan automáticamente, ya que aún pueden utilizarlos otras reglas de otras tablas que
permanezcan en la base de datos.
Usar desencadenantes
Un desencadenante es una expresión dependiente de una tabla que se invoca cuando se modifica
alguno de los registros de la tabla con alguno de los comandos de modificación de datos
especificados. Los desencadenantes pueden utilizarse para realizar cualquier operación que requiera
una aplicación de base de datos cuando se modifique la información. Por ejemplo, puede utilizar
desencadenantes para llevar a cabo las acciones siguientes:
l Registrar las modificaciones de la base de datos.
l Exigir la integridad referencial.
l Crear un pedido automáticamente para un producto cuyas existencias están a punto de agotarse.
Los desencadenantes se crean y almacenan como propiedades de una tabla específica. Si quita una
tabla de una base de datos, los desencadenantes asociados a la misma se eliminarán. Los
desencadenantes se activan una vez realizadas todas las comprobaciones restantes, como las reglas de
validación, la exigencia de clave principal y la de valor nulo. Al contrario de lo que ocurre con las
reglas de validación a nivel de campo y a nivel de registro, los desencadenantes no se activan para los
datos almacenados en búfer.

Crear desencadenantes
Para crear desencadenantes puede utilizar el Diseñador de tablas o el comando CREATE TRIGGER.
Puede crear un desencadenante para cada tabla y para cada uno de los tres eventos INSERT,
UPDATE y DELETE. En un momento dado, una tabla puede tener un máximo de tres
desencadenantes. Los desencadenantes deben devolver un valor verdadero (.T.) o falso (.F.).
Para crear un desencadenante
l En el cuadro de diálogo Tabla del Diseñador de tablas, escriba la expresión del desencadenante
o el nombre del procedimiento almacenado que la contiene en los cuadros Insertar
desencadenante, Actualizar desencadenante, o Eliminar desencadenante.
–O bien–
l Utilice el comando CREATE TRIGGER.
Por ejemplo, puede que cada vez que Importadores Tasmanian venda un producto desee comparar las
unidades en existencias Units_in_stock con el nivel del nuevo pedido Reorder_level y recibir una
notificación si es necesario volver a pedir ese producto. Podría crear un desencadenante de
actualización para la tabla products para conseguirlo. El desencadenante elegido es de actualización
(y no de eliminación o inserción), ya que debe activarse cada vez que se venda un producto, y el
campo Units_in_stock se actualizará cada vez que se venda un producto para reflejar los que
queden en existencias.
Para crear el desencadenante puede especificar updProductsTrigger( ) como desencadenante de
actualización de la tabla products. Puede agregar un campo a products, llamado reorder_amount,
para almacenar el importe que desee pedir cada vez que realice un nuevo pedido del producto en
cuestión y crear una tabla reorder con los campos: product_id y reorder_amount. A continuación
puede agregar este código al procedimiento almacenado:
PROCEDURE updProductsTrigger
IF (units_in_stock+units_on_order) <= reorder_level
INSERT INTO Reorder VALUES(Products.product_id, ;
Products.reorder_amount)
ENDIF
ENDPROC
Puede crear desencadenantes similares para los eventos de inserción o eliminación mediante las
cláusulas FOR INSERT o FOR DELETE, respectivamente, en lugar de la cláusula FOR UPDATE. Si
intenta crear un desencadenante que ya existe para un evento y una tabla determinados y está activado
SET SAFETY, Visual FoxPro le preguntará si desea sobrescribir el desencadenante existente.
Quitar o eliminar desencadenantes
Puede quitar un desencadenante de una tabla de base de datos mediante la interfaz o el comando
DELETE TRIGGER.
Para eliminar un desencadenante

l En el cuadro de diálogo Tabla del Diseñador de tablas, seleccione la expresión de
desencadenante en el cuadro Insertar desencadenante, Actualizar desencadenante o
Eliminar desencadenante y elimínela.
–O bien–
l Utilice el comando DELETE TRIGGER.
En el ejemplo siguiente se elimina el desencadenante de actualización de la tabla customer:
DELETE TRIGGER ON customer FOR UPDATE
Si quita o elimina una tabla de una base de datos, todos los desencadenantes dependientes de ella se
eliminarán de la base de datos. Sin embargo, los procedimientos almacenados a los que haga
referencia el desencadenante quitado o eliminado no se eliminarán.
Modificar desencadenantes
Puede modificar los desencadenantes mediante el Diseñador de tablas o a través del lenguaje.
Para modificar un desencadenante
l En el cuadro de diálogo Tabla del Diseñador de tablas, introduzca la nueva expresión del
desencadenante en el cuadro Insertar desencadenante, Actualizar desencadenante o
Eliminar desencadenante.
–O bien-
l Ejecute el comando SET SAFETY OFF, seguido del comando CREATE TRIGGER.
Si modifica un desencadenante utilizando primero el comando SET SAFETY OFF y volviendo a
crear después el desencadenante, la expresión anterior se eliminará y se sustituirá automáticamente
con la expresión recién creada.
Usar desencadenantes para generar integridad referencial
Visual FoxPro cuenta con un Generador de integridad referencial para generar desencadenantes y
procedimientos almacenados que exijan la integridad referencial (IR) de la base de datos. Si desea
más información sobre el uso del Generador de integridad referencial, consulte el capítulo 6,Crear
bases de datos.
Modificar la estructura de la tabla
Una vez creada una tabla, siempre puede modificar su estructura y sus propiedades. Puede ser
conveniente agregar, modificar o eliminar los nombres, anchos y tipos de datos de los campos, así
como sus valores predeterminados o sus reglas, y también agregar comentarios o títulos.

cambios mediante programación con el comando ALTER TABLE. Asegúrese de que tiene acceso
exclusivo a la tabla antes de modificar su estructura.
Para modificar la estructura de una tabla con el Diseñador de tablas
l En el Administrador de proyectos, seleccione el nombre de la tabla y, a continuación, elija
Modificar.
–O bien–
l En el Diseñador de bases de datos, seleccione la tabla en el esquema y elija Modificar en el
menú Base de datos.
–O bien–
l Utilice el comando MODIFY STRUCTURE.
Por ejemplo, puede modificar la estructura de la tabla de base de datos employee con los comandos
siguientes:
USE employee EXCLUSIVE
MODIFY STRUCTURE
Todas las opciones anteriores abren el Diseñador de tablas.
Para modificar la estructura de una tabla por programa
l Utilice el comando ALTER TABLE.
El comando ALTER TABLE ofrece diversas cláusulas que permiten agregar o eliminar campos, crear
o eliminar claves principales o únicas, o etiquetas de claves externas, así como cambiar el nombre de
los campos existentes. Algunas cláusulas sólo son aplicables a las tablas asociadas a una base de
datos. En esta sección se incluyen algunos ejemplos específicos.
Agregar campos
Para agregar un nuevo campo a una tabla puede utilizar el Diseñador de tablas o hacerlo a través del
lenguaje.
Para agregar un campo a una tabla
l En el Diseñador de tablas, elija Insertar.
–O bien–
l Utilice la cláusula ADD COLUMN del comando ALTER TABLE.
Por ejemplo, el comando siguiente agrega un campo llamado fax a la tabla customer y permite que

Por ejemplo, el comando siguiente agrega un campo llamado fax a la tabla customer y permite que
el nuevo campo tenga valores nulos:
ALTER TABLE customer ADD COLUMN fax c(20) NULL
Eliminar campos
Puede eliminar un campo existente de una tabla mediante el Diseñador de tablas o a través del
lenguaje.
Para eliminar un campo de una tabla
l En el Diseñador de tablas, seleccione el campo y elija Eliminar.
–O bien–
l Utilice la cláusula DROP COLUMN del comando ALTER TABLE.
Por ejemplo, el comando siguiente elimina el campo fax de la tabla customer:
ALTER TABLE customer DROP COLUMN fax
Al quitar un campo de una tabla también se quita su valor predeterminado, sus definiciones de reglas
y su título. Si hay referencias al campo en la clave de índice o en expresiones de desencadenante,
estas expresiones dejarán de ser válidas cuando se elimine el campo. Las expresiones no válidas de
clave de índice o de desencadenante no generarán errores hasta el tiempo de ejecución.
Cambiar el nombre de los campos
Hay dos formas de cambiar el nombre de los campos existentes en una tabla.
Para cambiar el nombre de un campo de una tabla
l En el Diseñador de tablas, escriba un nuevo nombre en el cuadro de texto Nombre del campo
correspondiente.
–O bien–
l Utilice la cláusula RENAME COLUMN del comando ALTER TABLE.
Por ejemplo, para cambiar el nombre de la columna company de la tabla customer, podría utilizar el
comando siguiente:
ALTER TABLE customer RENAME COLUMN company TO company_long_new_name
En el ejemplo anterior, el nuevo nombre del campo aprovecha la posibilidad de crear nombres largos
de campo de la que disfrutan las tablas de base de datos.
Establecer o modificar las reglas a nivel de campo o de tabla

Puede establecer nuevas expresiones y texto de reglas a nivel de campo o de tabla, así como
modificar las reglas y el texto especificados con los comandos CREATE TABLE o ALTER TABLE.
Para cambiar una regla existente
l En el Diseñador de tablas, seleccione la ficha Tabla y escriba la nueva expresión de regla o
texto de regla en los cuadros Regla y Mensaje de la sección Validación de registros.
–O bien–
Puede utilizar la función DBGETPROP( ) para ver la expresión o el texto actual de una regla; estos
valores son de sólo lectura para las tablas y sólo se pueden modificar mediante el comando ALTER
TABLE.
Establecer o modificar los valores predeterminados
Una vez generada una tabla, puede establecer o cambiar los valores predeterminados de sus campos.
Para cambiar un valor predeterminado existente
l En el Diseñador de tablas, escriba el nuevo valor en el cuadro Valor predeterminado de la
ficha Campos.
–O bien–
Puede utilizar la función DBGETPROP( ) para ver el valor predeterminado actual de un campo; estos
valores son de sólo lectura para las tablas y sólo se pueden cambiar mediante el comando ALTER
TABLE.
Trabajar con registros
Una vez diseñada y creada la estructura de una tabla, puede almacenar datos en ella agregándole
registros. Después podrá modificar y eliminar los registros existentes. Cada una de estas tareas puede
realizarse a través de la interfaz o mediante comandos. En esta sección se tratará principalmente el
trabajo con los registros por programa. Si desea más información sobre el trabajo con registros a
través de la interfaz, consulte el capítulo 2, Crear tablas e índices, del Manual del usuario.
Agregar registros
Cuando cree una tabla de Visual FoxPro, la tabla estará abierta, pero vacía. Si intenta almacenar datos
en una tabla sin crear primero un registro en ella, no sucederá nada. El primer paso para agregar
registros a una tabla nueva es agregar filas en las que almacenar los nuevos datos.
Para agregar registros a una tabla

Para agregar registros a una tabla
l Utilice el comando INSERT - SQL.
El comando INSERT - SQL puede utilizarse para insertar valores indicados en el mismo o tomados
de una matriz o variable de memoria. Por ejemplo, para insertar un nuevo registro en la tabla
customer de la base de datos TasTrade, puede utilizar el comando siguiente:
INSERT INTO customer (cust_id, company, contact) ;
VALUES ("SMI007", "Calzados Arbor", "Daniel Rendich")
El comando INSERT - SQL es útil en el caso de datos remotos, ya que sigue una sintaxis SQL
compatible con ANSI.
Para agregar un registro en blanco a una tabla y almacenar datos en sus campos puede utilizar el
comando APPEND BLANK seguido del comando REPLACE. El comando APPEND BLANK anexa
un nuevo registro en blanco a la tabla. El comando REPLACE sustituye el valor actual de un campo
(incluso si está vacío) con un nuevo valor.
El comando REPLACE requiere:
l Una tabla abierta.
l Un registro existente.
l El nombre del campo en el que desea almacenar el valor.
l Un valor para cada campo válido según el tipo de datos correspondiente.
En el ejemplo siguiente se utiliza el comando APPEND BLANK para crear un registro en el que
almacenar datos con el comando REPLACE:
APPEND BLANK && registro disponible ahora
REPLACE lastname WITH "SMITH" && almacenar valor character en el campo
Puede utilizar el comando UPDATE - SQL en lugar de REPLACE para actualizar los registros de una
tabla.
Agregar registros de otra tabla
Otra forma de almacenar datos en los registros es copiarlos de otras tablas o archivos. Por ejemplo,
puede anexar registros de otra tabla o archivo.
Para anexar registros de otro archivo
l Utilice el comando APPEND FROM.
–O bien–
l Utilice el comando IMPORT.
Los registros pueden aceptar los datos directamente, como en el ejemplo anterior, en el que el
comando INSERT especificaba el texto que se va a insertar en campos específicos de la tabla

comando INSERT especificaba el texto que se va a insertar en campos específicos de la tabla
customer y también tomarlos de constantes, variables, matrices, objetos u otros orígenes de datos. Si
desea más información sobre otras formas de importar datos, consulte el capítulo 9, Importar y
exportar datos, del Manual del usuario.
Agregar registros en modo Examinar
Si desea agregar un nuevo registro a una tabla mientras se encuentra en modo Examinar, puede elegir
Anexar registro en el menú Tabla. Por el contrario, si desea evitar que los usuarios puedan anexar
registros en el modo Examinar, puede utilizar la cláusula NOAPPEND del comando BROWSE.
Introducir datos en una tabla
Puede introducir datos en una tabla de forma interactiva, a través de una ventana Examinar o
mediante programación, con los comandos REPLACE o UPDATE - SQL. Al utilizar REPLACE o
UPDATE - SQL en una aplicación multiusuario, puede activar el almacenamiento en búfer de
registros o tablas, lo que le permitirá modificar los datos sin bloquear el registro hasta que desee
hacer efectivos los cambios. Si desea más información sobre el búfer de registros y tablas, consulte el
capítulo 17, Programar para acceso compartido.
Modificar los registros de una tabla
Para mostrar y modificar los registros existentes en una tabla puede utilizar la interfaz o hacerlo
mediante programación.
Para mostrar los registros y modificarlos
l Utilice el comando EDIT.
–O bien–
l Utilice el comando CHANGE.
Por ejemplo, el código siguiente muestra la tabla customer en una ventana Examinar en modo de
edición:
USE customer
EDIT
Si desea utilizar un formulario para modificar un registro, cree un cuadro de texto en el formulario y
establezca su propiedad DataSource como el nombre de la tabla que desee modificar. Si desea más
información sobre los formularios, consulte el capítulo 9, Crear formularios.
También puede utilizar los comandos CHANGE y EDIT para modificar campos específicos de una
tabla.
Agregar gráficos a una tabla
Puede almacenar gráficos en una tabla de Visual FoxPro si crea un campo de tipo general e importa o

Puede almacenar gráficos en una tabla de Visual FoxPro si crea un campo de tipo general e importa o
pega en él objetos OLE tales como mapas de bits o gráficos. El comando APPEND GENERAL sitúa
un objeto OLE en un campo General. En el ejemplo siguiente se almacena un archivo gráfico de
Microsoft Excel situado en el directorio predeterminado de Visual FoxPro en un campo General
llamado Gráfico:
APPEND GENERAL Chart FROM "CHART1.CLX" CLASS EXCELCHART
Si desea más información sobre el manejo de objetos OLE en las tablas de Visual FoxPro, consulte el
capítulo 16, Agregar OLE.
Introducir valores nulos en los campos
Para introducir un valor nulo en un campo puede utilizar el lenguaje, con el elemento .NULL, o
hacerlo a través de la interfaz con una combinación de teclas si el campo admite valores nulos.
Para almacenar un valor nulo en un campo
l En una ventana Examinar o en un control de formulario, presione CTRL+0 (cero).
–O bien–
l Utilice el elemento .NULL.
Por ejemplo, el código siguiente sustituye el valor existente en el campo automóvil por un valor
nulo:
REPLACE automóvil WITH .NULL
Nota Use el comando SET NULLDISPLAY para especificar el texto mostrado para los valores
nulos.
Eliminar registros
Para eliminar registros debe marcarlos primero para eliminación y luego suprimir los registros
marcados. Hasta su supresión, los registros marcados permanecen en el disco y puede quitarles la
marca para restaurarlos. En esta sección se explica cómo marcar, desmarcar y suprimir los registros
de una tabla.
Marcar registros para su eliminación
Para marcar registros para su eliminación puede utilizar la interfaz o bien el comando DELETE -
SQL.
Para marcar un registro para su eliminación
l En una ventana Examinar haga clic en el marcador de eliminación para marcar el registro.
–O bien-

–O bien-
l En el menú Tabla, elija Eliminar registros.
–O bien–
l Utilice el comando DELETE - SQL.
También puede utilizar el comando DELETE - SQL para especificar un intervalo de registros, así
como una condición basada en una expresión lógica que los registros deben satisfacer para que se
marquen para su eliminación. Por ejemplo, el código siguiente marca para eliminación todos los
registros de productos que contienen ‘T’ en el campo Discontinu:
USE products
DELETE FROM products WHERE discontinu = .T.
BROWSE
Los registros marcados para su eliminación no se suprimen físicamente de la tabla hasta que no se
especifique el comando PACK. Al ver la tabla en la ventana Examinar, cada registro eliminado
tendrá un indicador de eliminación, pero aún será visible en la tabla, siempre que SET DELETED
esté desactivado. Si SET DELETED está activado, los registros marcados para su eliminación no
aparecerán en la ventana Examinar.
La configuración del comando SET DELETED también afecta al acceso a los registros marcados para
su eliminación por parte de los comandos que operan sobre registros.
Desmarcar los registros marcados para su eliminación
Para desmarcar los registros marcados para su eliminación puede utilizar el comando RECALL. El
comando RECALL sólo podrá recuperar los registros cuando aún no se haya especificado un
comando PACK o ZAP, los cuales eliminan físicamente los registros de la tabla.
Para quitar la marca de un registro marcado para su eliminación
l En una ventana Examinar, haga clic en el marcador de eliminación para quitar el indicador del
registro.
–O bien–
l En el menú Tabla, elija Desmarcar registros.
–O bien–
l Utilice el comando RECALL.
Con el comando RECALL puede especificar un intervalo de registros, así como una condición basada
en una expresión lógica que los registros deben satisfacer para que se les quite la marca de
eliminación. Por ejemplo, el código siguiente quita la marca de eliminación de todos los registros de
productos que contengan ‘T’ en el campo discontinu:

USE products
RECALL FOR discontinu = .T.
BROWSE
Cuando vea la tabla en la ventana Examinar, los registros especificados ya no tendrán la marca de
eliminación.
Suprimir registros marcados para eliminación
Una vez marcado un grupo de registros para su eliminación, puede suprimirlos de forma definitiva
del disco a través de la interfaz o mediante el lenguaje.
Para suprimir del disco los registros marcados para eliminación
l En una ventana Examinar, elija Quitar registros eliminados en el menú Tabla.
–O bien–
l Utilice el comando PACK.
El comando PACK tiene dos cláusulas: MEMO y DBF. Si especifica PACK sin MEMO ni DBF, se
suprimirán tanto los registros del archivo de tabla como los del archivo memo asociado. Por ejemplo,
el código siguiente suprime los registros marcados para eliminación:
USE customer EXCLUSIVE
PACK
Para eliminar solamente los registros del archivo de tabla y dejar intactos los del archivo memo,
utilice PACK DBF.
Conservar espacio
La información de los campos memo de una tabla se almacena en un archivo memo asociado con el
mismo nombre de la tabla y la extensión .FPT. Si desea eliminar el espacio no utilizado en el archivo
memo, pero no quiere suprimir los registros de la tabla marcados para eliminación, ejecute el
comando PACK con la cláusula MEMO. Asegúrese de tener acceso exclusivo a la tabla.
Suprimir todos los registros de una tabla
Si desea suprimir todos los registros de una tabla, dejando sólo su estructura, puede utilizar el
comando ZAP. El uso de ZAP equivale a especificar DELETE ALL y a continuación PACK, pero
ZAP es mucho más rápido. Asegúrese de tener acceso exclusivo a la tabla.
Precaución Los registros de la tabla actual suprimidos con ZAP no pueden recuperarse.
Indexar tablas
Para desplazarse por los registros de una tabla, verlos o manipularlos en un orden determinado, debe

Para desplazarse por los registros de una tabla, verlos o manipularlos en un orden determinado, debe
utilizar un índice. Visual FoxPro utiliza los índices como mecanismos de ordenación para ofrecer
flexibilidad y eficacia al programar una aplicación. La flexibilidad supone crear y utilizar múltiples
claves de índice distintas para la misma tabla, lo que permite trabajar con los registros ordenados de
formas diferentes, según las necesidades de la aplicación. La potencia implica crear relaciones
personalizadas entre las tablas, basadas en sus índices, lo que le permite tener acceso a los registros
que desea.
Un índice de Visual FoxPro es un archivo que contiene punteros ordenados lógicamente según los
valores de una clave de índice. El archivo de índice es independiente del archivo .DBF de la tabla, y
no cambia el orden físico de los registros contenidos en la misma. Al crear un índice se crea un
archivo que mantiene punteros a los registros del archivo .DBF. Cuando desee trabajar con los
registros de la tabla en un orden determinado, elija un índice para controlar el orden en que se ve la
tabla y se tiene acceso a ella.
Crear un índice
Al crear una tabla, Visual FoxPro crea el archivo .DBF correspondiente y, si la tabla contiene campos
de tipo Memo o General, el archivo .FPT asociado. En este momento no se genera ningún archivo de
índice. Los registros introducidos en la nueva tabla se almacenarán en el orden de introducción, y al
examinar la tabla aparecerán en ese orden.
Normalmente, será conveniente ver y tener acceso a los registros en un orden específico. Por ejemplo,
puede ser adecuado ver los registros de la tabla de clientes ordenados alfabéticamente por nombres de
empresa. Cuando se desea controlar el orden en que se muestran los registros y se tiene acceso a los
mismos, es necesario crear un archivo de índice para la tabla creando la primera ordenación de
registros, o clave de índice, de la tabla. A continuación puede establecer como orden de la tabla la
nueva clave de índice y tener acceso a los registros siguiendo ese orden.
Para crear una clave de índice de una tabla
l En el Diseñador de tablas, elija la ficha Índices e introduzca la información de una clave de
índice. Elija Normal como tipo de índice.
–O bien–
l Utilice el comando INDEX.
Por ejemplo, en el código siguiente se utiliza la tabla customer y se crea una clave de índice sobre el
campo city. La palabra clave TAG y la palabra ‘city’ que la sigue especifican un nombre, o
‘etiqueta’, para la nueva clave de índice asociada al campo de ciudad.
USE customer
INDEX ON city TAG city
En el ejemplo anterior, la etiqueta de la clave de índice tiene el mismo nombre que el campo de
índice. Estos nombres no tienen que coincidir necesariamente (y podría haber elegido uno distinto
para la etiqueta).
Al crear un índice con el comando INDEX, Visual FoxPro lo utiliza automáticamente para establecer
el orden de los registros de la tabla. Por ejemplo, si introduce algunos datos en la tabla utilizada en el

el orden de los registros de la tabla. Por ejemplo, si introduce algunos datos en la tabla utilizada en el
ejemplo anterior y a continuación la examina, los registros aparecerán ordenados por ciudad.
Crear un archivo de índice
Al crear la primera clave de índice para la tabla del ejemplo anterior, Visual FoxPro creó
automáticamente un nuevo archivo, Customer.cdx, para almacenar la nueva clave de índice. Las
claves de índice se almacenan en archivos con la extensión .cdx. El archivo de índice .cdx, llamado
índice compacto estructural compuesto, es el tipo de archivo de índice más importante y más común
en Visual FoxPro. El archivo .cdx estructural:
l Se abre automáticamente al abrir la tabla.
l Puede contener múltiples ordenaciones de registros, o claves de índice, en el mismo archivo.
l Se modifica automáticamente al agregar, cambiar o eliminar registros de la tabla.
Si una tabla de Visual FoxPro tiene un archivo de índice asociado, normalmente se tratará de un
archivo .cdx estructural. El término “estructural” hace referencia al hecho de que Visual FoxPro trata
al archivo como una parte intrínseca de la tabla y lo abre automáticamente al abrir aquélla. Ya sea a
través del Diseñador de tablas o con la forma más simple del comando INDEX, como se mostraba en
el ejemplo anterior, Visual FoxPro crea el archivo .cdx con el mismo nombre que la tabla actual y
almacena la información de índice de la nueva clave, o etiqueta, dentro de él. Los archivos .cdx
estructurales se utilizan para claves de índice de uso frecuente, como las que ordenan los registros
para tareas diarias de presentación o introducción de datos, vínculos con SET RELATION,
optimización Rushmore™ al ver los registros o para informes que se imprimen con frecuencia.
Visual FoxPro ofrece otros dos tipos de archivos de índice: el archivo .cdx no estructural y el archivo
.idx de una sola clave. Al ser el índice .cdx, o índice estructural compuesto, el más importante, la
mayoría de los ejemplos de esta sección utilizarán claves de índice de archivos .cdx para ordenar los
registros de las tablas. Los dos tipos de índice restantes se usan con menos frecuencia y se tratan al
final de la sección.
Ver la información de índice
Para ver el número registros que se indexan durante el proceso de indexación, puede establecer
TALK a ON. El intervalo de registros mostrado durante la indexación puede especificarse con SET
ODOMETER. Si desea más información sobre los archivos de índice abiertos, utilice el comando
DISPLAY STATUS. Este comando muestra los nombres de todos los archivos de índice abiertos, su
tipo (estructural, .cdx o .idx), sus expresiones de índice y el nombre del archivo de índice principal o
etiqueta principal.
El número de archivos de índice (.idx o .cdx) que pueden abrirse sólo está limitado por la memoria y
los recursos del sistema.
Controlar los valores duplicados
Visual FoxPro cuenta con cuatro tipos de índices: principal, candidato, único y normal. Estos tipos
determinan si se admiten o no valores duplicados en los campos y registros de la tabla.
Impedir valores duplicados

Un índice principal nunca permite valores duplicados en la expresión o en los campos especificados.
Los índices principales se utilizan sobre todo en la tabla principal o “referenciada” para establecer la
integridad referencial en una relación persistente. Sólo es posible crear un índice principal para cada
tabla. Visual FoxPro devolverá un error si especifica un índice principal sobre un campo que
contenga datos duplicados.
Un índice candidato nunca permite valores duplicados en la expresión o en los campos especificados.
El nombre “candidato” hace referencia al estado del índice: puesto que estos índices no admiten
valores duplicados, se convierten en “candidatos” para ser elegidos como índice principal de la tabla.
Puede crear múltiples índices candidatos para una tabla. Los índices candidatos pueden utilizarse para
hacer referencia o para ser referenciados en una relación persistente con el fin de establecer la
integridad referencial.
Visual FoxPro generará un error si especifica un índice candidato sobre un campo que contenga datos
duplicados.
Establecer un índice principal o candidato
Los índices principales y candidatos pueden crearse con los comandos CREATE TABLE y ALTER
TABLE. Puede utilizar ambos tipos de índices para definir el lado “uno” de una relación persistente
de uno a varios o de uno a uno.
Para crear un índice principal o candidato
l En el Diseñador de tablas, elija la ficha Índices y cree un índice, seleccionando como tipo
Principal o Candidato.
–O bien–
Por ejemplo, cualquiera de los dos comandos siguientes hace de cust_id la clave principal de la
tabla customer:
ALTER TABLE customer ADD PRIMARY KEY cust_id TAG cust_id
ALTER TABLE customer ALTER COLUMN cust_id c(5) PRIMARY KEY
Los índices principal y candidatos se almacenan en el archivo .cdx estructural de la tabla
correspondiente y también en la base de datos con las propiedades “Primary” o “Candidate”. No se
puede almacenar estos tipos de índices en otros archivos .cdx, ni tampoco utilizar para ellos archivos
.idx. El motivo principal es que el archivo que contiene estos índices siempre debe estar abierto
cuando esté abierta la tabla a la que están asociados.
Las claves principales forman parte de una tabla que pertenece a una base de datos. Si libera una tabla
de una base de datos, se elimina la clave principal.
Si utiliza una función definida por el usuario en una expresión de índice asociada a una base de datos,
Visual FoxPro tratará la expresión de la misma forma que las expresiones de reglas y

Visual FoxPro tratará la expresión de la misma forma que las expresiones de reglas y
desencadenantes que contienen FDU.
Permitir valores duplicados
En Visual FoxPro, los índices únicos no evitan el uso de valores duplicados, aunque sólo almacenan
la primera aparición del valor o valores en el archivo de índice. En este sentido, la palabra “único” se
refiere a las entradas del archivo de índice, que sólo contiene valores únicos, pues no almacena cada
clave más de una vez e ignora la segunda y posteriores apariciones de los valores no únicos. Las
tablas indexadas con índices únicos pueden contener valores duplicados. Los índices únicos se
admiten principalmente por compatibilidad con las versiones anteriores.
Un índice normal es simplemente un índice que no es único, principal ni candidato. Los índices
normales se utilizan para ordenar y buscar registros, pero no se exige que los datos de dichos registros
sean únicos. También puede usar un índice normal como lado “varios” de una relación persistente de
uno a varios.
Para crear un índice normal
l En el Diseñador de tablas, elija la ficha Índices y cree un índice seleccionando Normal como
tipo.
–O bien–
Por ejemplo, los comandos siguientes hacen de city una clave normal para la tabla customer:
USE customer
INDEX ON city TAG city
Crear múltiples índices
A medida que trabaje con los registros de una tabla, descubrirá la necesidad de tener acceso a los
registros utilizando varias secuencias diferentes. Por ejemplo, puede ser conveniente ordenar la tabla
customer por el campo contact para encontrar rápidamente un nombre que se busca, o por
postal_code, para generar etiquetas de correo ordenadas para un envío más eficiente.
Puede crear y almacenar varias ordenaciones distintas para una tabla creando múltiples claves de
índice para la misma. Esto permite ordenar los registros de una forma distinta en cada momento,
según las operaciones que vaya a realizar.
Para crear claves de índice adicionales para una tabla
l En el Diseñador de tablas elija la ficha Índices e introduzca la información de las claves
adicionales.
–O bien–

Por ejemplo, el código siguiente crea dos nuevas claves de índice en la tabla employee: una sobre el
campo last_name y otra sobre el campo country:
USE employee
INDEX ON last_name TAG last_name
INDEX ON country TAG country
Al crear una etiqueta de índice sin especificar el nombre de un archivo de índice, la etiqueta se
agregará automáticamente al archivo .cdx estructural de la tabla. En el diagrama siguiente se muestra
un archivo de índice .cdx con tres etiquetas.
Índice .cdx con múltiples etiquetas que representan múltiples ordenaciones de registros
Dos de las etiquetas del diagrama, emp_id y last_name, representan índices basados en un solo
campo. El índice cntry_last ordena los registros según una expresión sencilla de dos campos. Si
desea más información sobre la forma de generar índices basados en múltiples campos, consulte
"Indexar por prestaciones", más adelante en este mismo capítulo.
Controlar el orden de acceso a los registros
Una vez creadas las claves de índice para la tabla customer sobre los campos company, city, y
country puede tener acceso a la tabla y mostrarla en secuencias distintas; para ello, debe elegir la
clave de índice que desee. El comando SET ORDER permite elegir un índice determinado como
clave de ordenación de la tabla.

Por ejemplo, el código siguiente abre una ventana Examinar con los registros de la tabla customer
ordenados por países:
SET ORDER TO country
BROWSE
Establecer el orden de los registros en tiempo de ejecución
SET ORDER permite designar el archivo o etiqueta de índice que controla el orden de los registros.
Una tabla puede tener abiertos simultáneamente varios archivos de índice. Sin embargo, para
determinar el orden en que se muestran los registros o se tiene acceso a los mismos, hay que
establecer como índice de control un archivo de una sola clave (.idx, archivo de control) o una
etiqueta de un archivo de índice compuesto (.cdx, etiqueta de control). Algunos comandos, como
SEEK, utilizan la etiqueta de índice de control para buscar registros. No tiene que usar SET ORDER
para ejecutar consultas.
Establecer el orden de los registros de forma interactiva en un formulario
Puede utilizar SET ORDER en tiempo de ejecución para cambiar el orden de los registros en un
formulario. Por ejemplo, puede ser conveniente que los usuarios de su aplicación puedan cambiar el
orden de los registros de una cuadrícula haciendo clic en el encabezado de la columna que deseen
ordenar.
Para ordenar los registros de una cuadrícula por una columna
1. Cree un formulario con un control Grid.

1. Cree un formulario con un control Grid.
2. Establezca en la propiedad ColumnCount de la cuadrícula el número de campos que desee
mostrar en ella.
3. En el evento Click del encabezado de cada columna de la cuadrícula, inserte código para:
l Establecer como orden de los registros una clave de índice basada en la columna.
l Actualizar el formulario.
Por ejemplo, si crea un formulario basado en la tabla Customer de la base de datos Testdata con una
cuadrícula que contenga las cuatro columnas, company, contact, postal code y phone, la
cuadrícula aparecerá en primer lugar ordenada alfabéticamente, ya que los registros de esa tabla se
introdujeron por ese orden.
Tabla Customer en una cuadrícula, ordenada alfabéticamente por nombre de empresa
A continuación puede permitir que el usuario ordene la cuadrícula por contact o postal_code si
inserta el código siguiente en el evento Click de cada encabezado de columna:
Ejemplo de código de evento para ordenar los registros de una cuadrícula al hacer clic en el
encabezado de las columnas
Código Comentario
SET ORDER TO company
GO TOP
THISFORM.Refresh
En el código de evento Click del encabezado de Company se
reordena la cuadrícula por la clave de índice company y se
actualiza el formulario para mostrar los registros ordenados
por empresas.
SET ORDER TO contact
GO TOP
THISFORM.Refresh
En el código de evento Click del encabezado de Contact se
reordena la cuadrícula por la clave de índice contact y se
actualiza el formulario para mostrar los registros ordenados
por nombres de contacto.

SET ORDER TO
postalcode
GO TOP
THISFORM.Refresh
En el código de evento Click del encabezado de
Postal_Code se reordena la cuadrícula por la clave de
índice postalcode y se actualiza el formulario para mostrar
los registros ordenados por códigos postales.
Como la ordenación por números de teléfono no es adecuada
para esta aplicación, se deja en blanco el código del evento
Click del encabezado de Phone.
En este ejemplo, al mostrar un formulario la cuadrícula aparece ordenada alfabéticamente por
empresas. Cuando el usuario hace clic en el encabezado de la columna Contact, Visual FoxPro
muestra los registros en la cuadrícula ordenados alfabéticamente por el nombre del contacto.
Tabla Customer en una cuadrícula, reordenada alfabéticamente por nombre de contacto
Si el usuario hace clic en el encabezado de la columna Postal_code la cuadrícula se reordenará y
aparecerá ordenada por códigos postales.
Tabla Customer en una cuadrícula, reordenada por códigos postales

Como en esta aplicación de ejemplo no hay necesidad de ordenar los contactos por sus números de
teléfono, no se inserta el código con SET ORDER en el evento Click del encabezado de la columna
phone. Cuando el usuario hace clic en el encabezado de Phone, la cuadrícula no cambia.
Usar otros tipos de índices
Además del índice más habitual, el compacto estructural compuesto .cdx, Visual FoxPro admite otros
dos tipos de archivos de índice: el .cdx no estructural y el índice autónomo .idx. Los índices .cdx no
estructurales se utilizan como etiquetas de clave múltiple de uso menos frecuente. Los índices
autónomos, o .idx, se usan como índices de clave única de uso poco frecuente o temporal, y se
admiten principalmente por la compatibilidad con las versiones anteriores.
La tabla siguiente es un resumen de los tres tipos de índices, su nombre, el número de claves que
pueden contener y las limitaciones en caracteres de cada uno de ellos.
Tipos de índices de Visual FoxPro
Tipo de índice Descripción Número de claves Límites
.cdx estructural Utiliza el mismo
nombre base que el
archivo de tabla; se abre
automáticamente con la
tabla
Expresiones de
múltiples claves,
llamadas etiquetas
Límite de 240
caracteres en las
expresiones
evaluadas
.cdx no estructural Debe abrirse
explícitamente; utiliza
un nombre distinto del
nombre base de la tabla
Expresiones de
múltiples claves,
llamadas etiquetas
Límite de 240
caracteres en las
expresiones
evaluadas
.idx autónomo Debe abrirse
explícitamente; el
usuario define el
nombre del archivo .idx
Expresión de una sola
clave
Límite de 100
caracteres en las
expresiones
evaluadas
Usar índices .cdx no estructurales
Un índice .cdx no estructural resulta útil cuando desea crear múltiples etiquetas de índice con un fin
determinado, pero no quiere cargar sus aplicaciones manteniendo estos índices de una forma
continua. Por ejemplo, su aplicación puede tener un conjunto especial de informes que analicen los
datos basándose en campos normalmente no indexados. En este caso el programa puede crear un
índice .cdx no estructural con las etiquetas necesarias, ejecutar los informes especiales y a
continuación eliminar el índice .cdx no estructural.
Para crear una etiqueta de índice .cdx no estructural

Para crear una etiqueta de índice .cdx no estructural
l Utilice el comando INDEX con las cláusulas TAG y OF.
Al especificar la cláusula OF con el comando INDEX, se indica a Visual FoxPro que debe almacenar
la etiqueta en un archivo distinto del índice .cdx estructural de la tabla. Por ejemplo, el comando
siguiente crea etiquetas llamadas title y hire_date en la tabla employee y las almacena en un
índice .cdx no estructural llamado QRTLYRPT.CDX:
USE employee
INDEX ON title TO TAG title OF QRTLYRPT
INDEX ON hire_date TO TAG hiredate OF QRTLYRPT
Usar índices autónomos
Los índices autónomos, basados en una expresión de una sola clave, se almacenan como archivos
.idx. Al contrario que los índices .cdx, que pueden almacenar expresiones de múltiples claves, los
índices .idx se limitan a una sola.
Normalmente, los índices autónomos se utilizan de forma temporal, creándolos o reindexándolos
inmediatamente antes de su uso. Por ejemplo, puede tener un índice que sólo utilice para un informe
resumen trimestral o anual. En lugar de incluir este índice de uso poco frecuente en el .cdx
estructural, donde se actualizará cada vez que se utilice la tabla, puede crear un índice .idx autónomo.
Una tabla determinada puede tener tantos archivos .idx como se desee.
Para crear un índice .idx autónomo
l Utilice la cláusula COMPACT del comando INDEX.
–O bien–
l Utilice el comando COPY TAG.
Al utilizar el comando INDEX con la cláusula COMPACT se crea un nuevo índice autónomo en un
archivo pequeño y de acceso rápido. Puede omitir la cláusula COMPACT si desea crear un archivo
.idx autónomo no compacto y mantener así la compatibilidad con los formatos de índice de
FoxBASE+® y FoxPro® versión 1.0.
El código siguiente crea un archivo .idx autónomo sobre order para la tabla orders, establece como
orden el nuevo índice y luego abre una ventana Examinar, que muestra los pedidos ordenados por
order_date:
USE ORDERS
INDEX ON order_date TO orddate COMPACT
SET ORDER TO orddate
BROWSE
Puede utilizar el comando COPY TAG para generar un archivo de índice autónomo a partir de una
etiqueta de índice de un archivo .cdx existente. Esto puede ser útil, por ejemplo, si comprueba que
uno de los índices que actualmente se incluyen en el .cdx estructural sólo se utiliza para informes

uno de los índices que actualmente se incluyen en el .cdx estructural sólo se utiliza para informes
trimestrales o anuales. En el código siguiente se crea un índice autónomo a partir de una etiqueta
birth_date de la tabla employee:
COPY TAG birth_date to birthdt COMPACT
Una vez creado un índice autónomo a partir de una etiqueta de un archivo .cdx, normalmente deberá
eliminar la etiqueta, ahora innecesaria, del archivo .cdx. En la sección siguiente se describe la forma
de eliminar índices.
Eliminar un índice
Cuando no vaya a utilizar un índice, puede eliminar su etiqueta en el archivo .cdx o bien puede
eliminar el propio archivo .idx en el caso de los índices autónomos. La eliminación de las etiquetas de
índice no utilizadas mejora el rendimiento, ya que suprime la necesidad de que Visual FoxPro
actualice etiquetas no utilizadas para reflejar los cambios en los datos de la tabla.
Eliminar una etiqueta del archivo .idx estructural
Puede eliminar una etiqueta del archivo .idx estructural mediante el Diseñador de tablas o bien
mediante el lenguaje.
Para eliminar una etiqueta de índice del .cdx estructural
l En el Diseñador de tablas, utilice la ficha Índices para seleccionar el índice y eliminarlo.
–O bien–
l Utilice el comando DELETE TAG.
–O bien–
l Utilice las cláusulas DROP PRIMARY KEY o DROP UNIQUE TAG del comando ALTER
TABLE.
Por ejemplo, si la tabla employee contiene una etiqueta llamada title, puede eliminarla con el
código siguiente:
USE employee
DELETE TAG title
En el caso de que la etiqueta que desea eliminar sea la clave principal de la tabla employee, puede
utilizar el comando ALTER TABLE:
USE employee
ALTER TABLE DROP PRIMARY KEY
Eliminar una etiqueta de un archivo .cdx no estructural
Los índices .cdx no estructurales y sus etiquetas no son visibles en el Diseñador de tablas. Para
eliminar las etiquetas de un archivo .cdx no estructural debe utilizar el lenguaje.

eliminar las etiquetas de un archivo .cdx no estructural debe utilizar el lenguaje.
Para eliminar un índice de un archivo .cdx no estructural
l Utilice la cláusula OF del comando DELETE TAG.
Al utilizar la cláusula OF con el comando DELETE TAG, se indica a Visual FoxPro que debe
eliminar una etiqueta de un archivo .cdx distinto del .cdx estructural. Por ejemplo, si tiene un archivo
.cdx no estructural llamado QRTLYRPT.CDX con una etiqueta llamada title, puede eliminar la
etiqueta title con el comando siguiente:
DELETE TAG title OF qtrlyrpt
Para eliminar todas las etiquetas de un archivo .cdx estructural o no estructural, utilice la cláusula
ALL del comando DELETE TAG.
Eliminar un archivo de índice autónomo .idx
Como los archivos de índice autónomos solamente contienen una expresión de clave única, para
eliminar la expresión basta con eliminar el archivo .IDX del disco.
Para eliminar un archivo de índice autónomo .idx
l Utilice el comando DELETE FILE.
Por ejemplo, el código siguiente elimina el archivo de índice autónomo .idx Orddate.idx:
DELETE FILE orddate.idx
También puede utilizar el sistema operativo para eliminar los archivos .idx autónomos innecesarios.
Indexar sobre expresiones
Para hacer más eficaces sus aplicaciones puede crear índices basados en expresiones. Estas
expresiones pueden ser simples o complejas, dependiendo de lo que se quiera lograr.
Indexar sobre expresiones simples
Las expresiones de índice simples se basan en un solo campo o en la concatenación de dos o más
campos de caracteres para formar una clave de múltiples campos. Por ejemplo, para la tabla
Customer de la base de datos TasTrade podría crear un índice basado en la expresión:
country + region + cust_id
Al examinar la tabla Customer ordenada según esta etiqueta de índice, los clientes aparecerán
ordenados por países, dentro de cada país por regiones y dentro de cada región por Id. de cliente.
Usar una expresión para evitar valores duplicados en una combinación de campos
Si desea evitar la duplicación de valores en múltiples campos, puede crear un índice principal o

Si desea evitar la duplicación de valores en múltiples campos, puede crear un índice principal o
candidato basado en una expresión que combine múltiples campos.
Por ejemplo, si tiene una tabla que almacena el prefijo de zona y el número de teléfono en dos
columnas:
Prefijo de zona Número de teléfono
206 444-nnnn
206 555-nnnn
313 444-nnnn
En ambas columnas existen valores duplicados en otras filas. Sin embargo, no hay ningún número de
teléfono duplicado, ya que la combinación de los dos campos siempre es única. Por ello, si se
especifican las dos columnas en la expresión de un índice principal o candidato, las filas del ejemplo
no se considerarán duplicadas. Si intenta introducir un valor con el mismo prefijo de zona y el mismo
número de teléfono que una de las filas existentes, Visual FoxPro rechazará la entrada por estar
duplicada.
Usar valores nulos en expresiones de índice
Puede crear índices sobre campos que contengan valores nulos. Las expresiones de índice cuyo
resultado es .NULL. se insertan en el archivo .CDX o .IDX delante de las entradas no nulas. Todos
los valores nulos quedan por tanto al principio del índice.
El ejemplo siguiente ilustra un efecto de indexar valores nulos. Es el estado de la tabla antes de
aplicar el índice:
Hay valores nulos en el campo SocSec de dos registros
El valor .NULL. en dos registros representa el hecho de que los números de seguridad social de Anne
Dunn y Alan Carter son desconocidos o no están disponibles. Puede crear un índice con el número
SocSec, como en el ejemplo siguiente:
INDEX ON SocSec + LastName + FirstName TAG MyIndex
Al ver la tabla ordenada por este índice, la secuencia es:
Después de indexar sobre SocSec, los registros con valores nulos en SocSec aparecen en primer
lugar

lugar
Cuando la expresión de índice contiene valores nulos, los registros cuyo valor de SocSec es .NULL.
se sitúan los primeros (ordenados por LastName), y a continuación se colocan los registros cuyos
valores de SocSec son no nulos. Observe que hay dos entradas para Alan Carter. Como el registro 5
contiene un valor nulo, se indexa antes que el registro 2.
Indexar sobre expresiones complejas
También puede crear índices basados en expresiones más complejas. Las expresiones de clave de
índice de Visual FoxPro pueden contener funciones de Visual FoxPro, constantes o funciones
definidas por el usuario.
La expresión que cree debe ofrecer como resultado no más de 100 caracteres en el caso de índices
autónomos (.idx) o de 240 caracteres para las etiquetas de índice .cdx. Puede utilizar campos de tipos
de datos diferentes en una sola etiqueta, convirtiendo los componentes individuales de la expresión a
datos de tipo Character.
Para aprovechar la optimización Rushmore™, la expresión de índice debe cumplir exactamente los
criterios.
Usar funciones de Visual FoxPro en una etiqueta de índice
Puede utilizar funciones de Visual FoxPro en las etiquetas de índice. Por ejemplo, puede utilizar la
función STR( ) para convertir un valor numérico en una cadena de caracteres. Si desea crear una
etiqueta de índice para la tabla customer que combine el campo cust_id con el campo maxordamt,
puede convertir maxordamt del tipo Currency con ancho 8 a un campo de 8 caracteres con dos lugares
decimales mediante el código siguiente:
INDEX ON cust_id + STR(maxordamt, 8, 2) TAG custmaxord
Si quiere reducir el tamaño de los índices para campos que contienen valores enteros, puede convertir
los valores enteros en una representación Character (Binary) mediante la función BINTOC( ).
También puede convertir los valores binarios mediante la función CTOBIN( ).

Si desea crear un índice para ordenar una tabla en orden cronológico, puede utilizar la función DTOS
( ) para convertir un campo de fecha en una cadena de caracteres. Para tener acceso a la tabla
employee por hire_date y emp_id, puede crear la siguiente expresión de índice:
INDEX ON DTOS(hire_date) + emp_id TAG id_hired
Incluir procedimientos almacenados o funciones definidas por el usuario en una etiqueta de
índice
Para hacer más eficaz el índice puede hacer referencia en su expresión a un procedimiento
almacenado o a una función definida por el usuario. Por ejemplo, puede utilizar un procedimiento
almacenado o una FDU para extraer el nombre de la calle de un campo único que incluya además del
nombre el número de la calle. Si el número de la calle es siempre numérico, el procedimiento
almacenado o la FDU puede devolver la parte de caracteres del campo y rellenar el resto con espacios
hasta completar una clave de índice de longitud constante. A continuación puede utilizar esta clave de
índice para tener acceso a los registros de la tabla ordenados por el nombre de calle.
Puede ser preferible utilizar un procedimiento almacenado en vez de una FDU en las etiquetas de
índice. Como las FDU se almacenan en archivos independientes de la base de datos, puede mover o
eliminar el archivo de la FDU, lo que hará que la etiqueta que hace referencia a la misma deje de ser
válida. El código de los procedimientos almacenados, por el contrario, se conserva en el archivo
.DBC y Visual FoxPro puede encontrarlo siempre.
Otra ventaja de los procedimientos almacenados en las etiquetas de índice es que la referencia a un
procedimiento almacenado garantiza que el índice se basará en el código especificado. Si utiliza una
FDU en la expresión de índice, se usará en la indexación toda FDU que se encuentre al alcance y que
tenga el mismo nombre que la referenciada en el índice.
Nota Tenga cuidado al referenciar un procedimiento almacenado o una FDU en una expresión de
índice, ya que el tiempo necesario para crear el índice aumentará.
Usar datos de un campo de otra tabla en una etiqueta de índice
Puede crear una etiqueta de índice que haga referencia a una tabla abierta en otra área de trabajo. Lo
mejor es utilizar un índice autónomo (.idx) para las etiquetas que hagan referencia a más de una tabla,
ya que si se incluye una etiqueta de este tipo en un archivo .cdx estructural, Visual FoxPro no
permitiría abrir la tabla hasta que esté abierta la tabla referenciada en la etiqueta de índice.
Acceso a los registros en orden descendente
Para ver los registros en orden descendente puede crear un índice descendente o bien leer un índice
existente en orden descendente.
Para crear un índice descendente
l En la ficha Índices del Diseñador de tablas, elija el botón de flecha situado a la izquierda del
cuadro Nombre de forma que la flecha apunte hacia abajo.
–O bien–

l Utilice la cláusula DESCENDING con el comando INDEX ON para crear un índice
descendente.
Para crear archivos de índice estructural compuesto, puede utilizar los dos métodos. Para crear otros
tipos de archivos de índice, sólo puede utilizar el segundo. Por ejemplo, puede crear un nuevo índice
descendente que ordene la tabla product de mayor a menor por unit_price y examinar la tabla con
el nuevo orden, mediante el código siguiente:
USE products
INDEX ON unit_price TAG unit_price DESCENDING
BROWSE
Para leer un índice existente en orden descendente
l Utilice la cláusula DESCENDING del comando SET ORDER para leer el índice en orden
descendente.
Leer los índices en orden descendente permite aprovechar los índices existentes, en lugar de crear
otros nuevos. Por ejemplo, puede que ya haya creado un índice que ordene la tabla product por
unit_price con el código siguiente:
USE products
INDEX ON unit_price TAG unit_price
De forma predeterminada, el orden es ascendente. Ahora puede examinar la tabla en orden
descendente con el siguiente código:
USE products
SET ORDER TO unit_price DESCENDING
BROWSE
En los ejemplos anteriores se trata el acceso a la información en orden descendente. Tanto SET
ORDER como INDEX cuentan con una cláusula ASCENDING. Si combina estos dos comandos
puede obtener una gran flexibilidad en sus aplicaciones. Por ejemplo, si utiliza la cláusula
ASCENDING o DESCENDING para crear un índice en el orden de uso más frecuente, puede utilizar
la cláusula opuesta con el comando SET ORDER para ver o tener acceso a la información en el orden
inverso cuando resulte más adecuado.
Filtrar datos
Puede limitar el acceso a los registros que se desee con un índice filtrado. Al crear un índice filtrado,
solamente estarán disponibles para su presentación y acceso los registros que satisfagan la expresión
de filtro.
Para filtrar los datos con un índice filtrado
l En el Diseñador de tablas, escriba una expresión de filtro en el cuadro de texto Filtro del índice
correspondiente.
–O bien–

–O bien–
l Utilice la cláusula opcional FOR con el comando INDEX.
Si incluye la cláusula opcional FOR con el comando INDEX, el archivo de índice actuará como un
filtro para la tabla. En el archivo de índice sólo se crearán claves para los registros que satisfagan la
expresión de filtro. Por ejemplo, si prepara una circular destinada a los representantes de ventas de su
empresa y desea ordenar el envío por países, puede crear un índice que filtre la tabla employee de
forma que sólo aparezcan los registros de los representantes de ventas, ordenados por países y por
apellidos. El código siguiente crea tal índice filtrado y muestra los datos resultantes en una ventana
Examinar:
USE employee
INDEX ON country+last_name FOR title = "Representante de ventas" ;
TAG reps_cntry
BROWSE
Al ver la ventana Examinar sólo aparecerán los representantes de ventas, no los registros de los
demás empleados.
Un índice filtrado se aplica solamente a los registros que satisfacen la expresión de filtro.

Filtrar datos de forma temporal
Puede utilizar el comando SET FILTER para filtrar los datos de forma temporal, sin crear un índice
filtrado especial. Este comando es especialmente útil cuando se desea especificar una condición
temporal que los registros de una tabla deben satisfacer para ser accesibles. Por ejemplo, puede
utilizar el comando siguiente para filtrar la tabla customer de forma que sólo muestre los clientes de
Alemania:
USE customer
SET FILTER TO country = "Germany"
BROWSE
El comando SET FILTER admite como condición de filtro cualquier expresión lógica válida en
Visual FoxPro. Una vez especificado el comando SET FILTER, sólo estarán disponibles en la tabla
los registros que cumplan la condición de filtro. Todos los comandos de acceso a la tabla respetan la
condición de SET FILTER. Puede establecer un filtro distinto para cada tabla abierta.
Usar los índices de forma eficaz
Puede mejorar el rendimiento de las tablas indexadas si mantiene los índices actualizados y utiliza en
ellos expresiones optimizables.
Volver a generar un archivo de índice activo
Los archivos de índice quedan obsoletos cuando se abre una tabla sin abrir sus archivos de índice
correspondientes y se modifican los campos clave. Los archivos de índice también pueden quedar
invalidados a consecuencia de una caída del sistema o al tener acceso a una tabla y actualizarla desde
otro programa. Cuando los archivos de índice quedan obsoletos, puede actualizarlos con el comando
REINDEX.
Para volver a generar un archivo de índice activo

l En el menú Tabla, elija Volver a generar índices.
–O bien–
l Utilice el comando REINDEX.
Por ejemplo, el código siguiente actualiza el archivo de índice de la tabla Customer:
USE customer
REINDEX
REINDEX actualiza todos los archivos de índice abiertos en el área de trabajo seleccionada. Visual
FoxPro reconoce cada tipo de archivo de índice (.cdx compuestos, .cdx estructurales e .idx de índice
único) y efectúa la reindexación según corresponda. Al hacerlo, actualiza todas las etiquetas de los
archivos .cdx y también los archivos .cdx estructurales, que se abren automáticamente con la tabla.
También puede actualizar los archivos de índice obsoletos con el comando REINDEX.
Reindexar en tiempo de ejecución
La reindexación lleva tiempo, especialmente cuando se trata de tablas de gran tamaño. Sólo debe
reindexar cuando sea necesario. Para mejorar el rendimiento, puede reindexar durante la
inicialización o la finalización del programa, en lugar de hacerlo en la ejecución principal.
Usar índices para optimizar consultas
Puede utilizar índices para acelerar las consultas y otras operaciones. Si desea información sobre la
forma de crear expresiones de índice optimizables Rushmore, consulte el capítulo 15, Optimizar
aplicaciones
Usar múltiples tablas
Para usar varias tablas es necesario emplear áreas de trabajo. Un área de trabajo es una región
numerada que identifica una tabla abierta. Puede abrir y manipular tablas de Visual FoxPro en 32.767
áreas de trabajo. Las áreas de trabajo se suelen identificar en las aplicaciones por el alias de la tabla
abierta en ellas. Un alias de tabla es un nombre que se refiere a una tabla abierta en un área de trabajo.
Usar sesiones de datos
Además de las áreas de trabajo visibles en la ventana Sesión de datos, Visual FoxPro proporciona
automáticamente un entorno independiente para cada instancia de un formulario o conjunto de
formularios a través de las sesiones de datos. Una sesión de datos es una representación del entorno
de trabajo dinámico actual utilizado por un formulario, un conjunto de formularios o un informe.
Cada sesión de datos contiene su propio conjunto de áreas de trabajo. Estas áreas de trabajo contienen
las tablas abiertas en las áreas de trabajo, sus índices y sus relaciones. Para obtener información sobre
el uso de sesiones de datos, consulte el capítulo 17, Programar para acceso compartido.
Ver las áreas de trabajo

Para ver la lista de tablas abiertas en una sesión de Visual FoxPro, puede abrir la ventana Vista.
Para abrir la ventana Vista
l En el menú Ventana, elija Sesión de datos.
–O bien–
l Utilice el comando SET.
Al escribir SET en la ventana Comandos, Visual FoxPro abre la ventana Sesión de datos y muestra
los alias de las áreas de trabajo de las tablas abiertas en la sesión actual.
Ventana Sesión de datos con tabla Employees abierta
Abrir una tabla en un área de trabajo
Para abrir una tabla en un área de trabajo puede utilizar la ventana Sesión de datos o el comando
USE.
Para abrir una tabla en un área de trabajo
l En la ventana Sesión de datos elija Abrir.
–O bien–
l Escriba USE en la ventana Comandos.
Para abrir una tabla en la menor área de trabajo disponible, utilice la cláusula IN del comando USE
con el área de trabajo 0. Por ejemplo, si hay tablas abiertas en las áreas de trabajo de 1 a 10, el
comando siguiente abrirá la tabla customer en el área de trabajo 11.
USE customer IN 0

USE customer IN 0
También puede elegir Abrir en el menú Archivo para abrir una tabla en un área de trabajo.
Cerrar una tabla en un área de trabajo
Para cerrar una tabla en un área de trabajo puede utilizar la ventana Sesión de datos o bien hacerlo
mediante el lenguaje.
Para cerrar una tabla en un área de trabajo
l En la ventana Sesión de datos, seleccione el alias de la tabla y luego elija Cerrar.
–O bien–
l Escriba USE sin indicar un nombre de tabla.
–O bien–
l Utilice la cláusula IN del comando USE para referirse al área de trabajo de la tabla que desee
cerrar.
Cuando especifique el comando USE sin ningún nombre de tabla y haya un archivo de tabla abierto
en el área de trabajo seleccionada actualmente, la tabla se cerrará. Por ejemplo, el código siguiente
abre la tabla customer, muestra una ventana Examinar y luego cierra la tabla:
USE customer
BROWSE
USE
También se cierra la tabla automáticamente cuando se abre otra en la misma área de trabajo o cuando
se especifica el comando USE con la cláusula IN y se hace referencia al área de trabajo actual. El
código siguiente abre, muestra y cierra la tabla customer utilizando USE IN y el alias de tabla
customer:
USE customer
BROWSE
USE IN customer
No puede tener abierta más de una tabla a la vez en la misma área de trabajo.
Hacer referencia a un área de trabajo
Antes de abrir una tabla, puede referirse a la siguiente área de trabajo disponible con el número de
área de trabajo como se indica a continuación:
SELECT 0
Usar alias de tablas
Un alias de tabla es el nombre que utiliza Visual FoxPro para referirse a una tabla abierta en un área

Un alias de tabla es el nombre que utiliza Visual FoxPro para referirse a una tabla abierta en un área
de trabajo. Visual FoxPro utiliza automáticamente el nombre de archivo como alias predeterminado
al abrir una tabla. Por ejemplo, si abre con los comandos siguientes el archivo CUSTOMER.DBF en
el área de trabajo 0, se asignará automáticamente a la tabla el alias predeterminado customer:
SELECT 0
USE customer
A continuación puede utilizar el alias customer para identificar la tabla en un comando o función.
También puede especificar otro alias.
Crear un alias definido por el usuario
Puede asignar el alias que desee a una tabla en el momento de abrirla.
Para abrir una tabla con un alias definido por el usuario
l Escriba USE con un nombre de alias de tabla.
Por ejemplo, para abrir el archivo CUSTOMER.DBF en el área de trabajo 0 y asignarle el alias
people, utilice los comandos siguientes:
SELECT 0
USE customer ALIAS people
A continuación podrá utilizar el alias people para referirse a la tabla abierta. Un alias puede tener
hasta 254 letras, dígitos o signos de subrayado, y debe comenzar por una letra o un signo de
subrayado. Visual FoxPro crea automáticamente un alias alternativo cuando el especificado contiene
algún carácter no admitido.
Usar un alias asignado por Visual FoxPro
Visual FoxPro asigna alias automáticamente a las tablas en determinadas situaciones:
l Al abrir una misma tabla simultáneamente en varias áreas de trabajo incluyendo la cláusula
AGAIN en el comando USE y sin especificar alias distintos al abrir la tabla en cada área.
l Cuando se produce un conflicto con los alias.
Los alias predeterminados asignados a las primeras 10 áreas de trabajo son las letras de área de
trabajo de A a J; los asignados a las áreas de 11 a 32767 van de W11 a W32767. Puede utilizar estos
alias asignados por Visual FoxPro exactamente de la misma forma que cualquier otro alias
predeterminado o definido por el usuario para referirse a una tabla abierta en un área de trabajo.
Seleccionar un área de trabajo con un alias
Para pasar de un área de trabajo a otra puede utilizar el comando SELECT. Por ejemplo, si se ha
abierto Customer.dbf en un área de trabajo y tiene asignado su alias predeterminado CUSTOMER,
puede pasar a esta área de trabajo con el comando SELECT siguiente:
SELECT customer
Hacer referencia a tablas abiertas en otras áreas de trabajo

Hacer referencia a tablas abiertas en otras áreas de trabajo
También puede hacer referencia a campos de otras áreas de trabajo si precede el nombre del campo
con el nombre de alias correspondiente y un punto, o con el alias y el operador –> . Por ejemplo, si se
encuentra en un área de trabajo y desea tener acceso al campo contact de la tabla Customer, abierta
en un área distinta, puede utilizar la siguiente expresión para hacer referencia al campo:
customer.contact
Si la tabla a la que desea hacer referencia se ha abierto con un alias, puede utilizar el nombre del
alias. Por ejemplo, si la tabla Customer se ha abierto con el alias people, puede referirse al campo
lastname con la expresión siguiente:
people.lastname
El uso del nombre o el alias de una tabla la identifica específicamente, independientemente del área
de trabajo en la que esté abierta.
Establecer relaciones temporales entre tablas
Al establecer una relación temporal entre tablas, se hace que el puntero de registro de una tabla (la
tabla secundaria) siga automáticamente los movimientos del de la otra (la tabla primaria), lo que
permite seleccionar un registro en el lado ‘uno’, o primario, de una relación y tener acceso
automáticamente a los registros relacionados del lado ‘varios’, o secundario.
Por ejemplo, puede estimar conveniente relacionar las tablas customer y orders de forma que al
situar el puntero de registro en un cliente determinado de la tabla customer, el puntero de la tabla
orders se desplace hasta el registro con el mismo número de cliente.
Puede utilizar las áreas de trabajo y los alias de las tablas al establecer relaciones entre dos tablas
abiertas con el comando SET RELATION. Si utiliza un formulario para trabajar con las tablas, puede
almacenar estas relaciones como parte del entorno de datos del formulario.
Tablas relacionadas temporalmente
Puede utilizar la ventana Sesión de datos o el lenguaje para crear relaciones temporales entre las
tablas.
Para relacionar tablas temporalmente
l En la ventana Sesión de datos, seleccione las tablas y utilice el botón Relaciones para crear las
relaciones.
–O bien –
l Utilice el comando SET RELATION.
Con el comando SET RELATION puede establecer una relación entre una tabla abierta en el área de
trabajo seleccionada actualmente y otra tabla abierta en otra área. Normalmente se relacionan tablas

trabajo seleccionada actualmente y otra tabla abierta en otra área. Normalmente se relacionan tablas
que tienen un campo común y la expresión utilizada para establecer la relación es habitualmente la
expresión del índice que controla la tabla secundaria.
Por ejemplo, puede que un cliente tenga varios pedidos asociados a su registro de cliente. Si crea una
relación entre el campo común a ambas tablas, podrá ver fácilmente todos los pedidos de un cliente
determinado. En el programa siguiente se utiliza un campo, cust_id, común a las dos tablas, para
crear una relación entre el campo cust_id de la tabla customer y la etiqueta de índice cust_id de la
tabla orders.
Uso de SET RELATION para establecer una relación entre dos tablas
Código Comentarios
USE customer IN 1 Abre la tabla customer (tabla primaria) en el área
de trabajo 1
USE orders IN 2 Abre la tabla orders (tabla secundaria) en el área
de trabajo 2
SELECT orders Selecciona el área de trabajo secundaria.
SET ORDER TO TAG cust_id Especifica el orden de la tabla secundaria
mediante la etiqueta de índice cust_id.
SELECT customer Selecciona el área de trabajo independiente.
SET RELATION TO cust_id INTO orders Crea la relación entre la tabla primaria y el índice
que controla la tabla secundaria.
SELECT orders
BROWSE NOWAIT
SELECT customer
BROWSE NOWAIT
Abre dos ventanas Examinar. Observe que al
mover el puntero de registro en la tabla primaria
los datos de la tabla secundaria cambian.
La ventana Sesión de datos muestra las dos tablas abiertas, Orders y Customer, y la relación
establecida con el comando SET RELATION.
La ventana Sesión de datos muestra los alias y las relaciones temporales de las tablas abiertas

El índice creado para la tabla secundaria, orders, ordena los registros de la tabla orders por grupos,
según el cliente que ha originado el pedido. Al establecer una relación entre la tabla primaria y el
índice de la tabla secundaria, Visual FoxPro selecciona solamente los registros de la tabla secundaria
cuya clave de índice coincide con la del registro primario seleccionado.
En el ejemplo anterior se ha establecido una relación simple entre dos tablas. También puede utilizar
el comando SET RELATION para establecer relaciones múltiples entre una tabla primaria y varias
tablas secundarias.
Guardar relaciones entre tablas en un entorno de datos
Si va a crear un formulario que utiliza más de una tabla, puede utilizar el entorno de datos para crear
relaciones entre tablas y almacenarlas en el formulario. Las relaciones establecidas en el entorno de
datos se abren automáticamente al ejecutar el formulario. Si desea información sobre cómo crear un
entorno de datos, consulte el capítulo 9, Crear formularios.
Relacionar registros de una sola tabla
También puede crear una relación entre registros de una sola tabla. Esta relación, denominada con
referencia a sí misma, puede ser útil en aquellas situaciones en las que se tiene toda la información
necesaria almacenada en una sola tabla. Por ejemplo, puede ser conveniente desplazarse por los
supervisores de la tabla Employee haciendo que los empleados a cargo de cada supervisor cambien
automáticamente al mover el puntero de registro de un supervisor a otro.
Para relacionar temporalmente registros de una sola tabla
l En la ventana Sesión de datos, seleccione la tabla y utilice el botón Relaciones para establecer
relaciones.
-O bien-
l Utilice el comando SET RELATION.
Para crear una relación con referencia a sí misma, debe abrir la misma tabla dos veces, una en un área
de trabajo y una segunda vez, con el comando USE AGAIN, en otra área distinta. A continuación
utilizará un índice para relacionar los registros. Por ejemplo, el código siguiente establece y examina
una relación con referencia a sí misma creando una etiqueta de índice llamada mgr_id que ordena la
tabla Employee por el campo reports_to:
SELECT 0
USE employee ALIAS managers

USE employee ALIAS managers
SELECT 0
USE employee AGAIN ALIAS employees
INDEX ON reports_to TAG mgr_id
SET ORDER TO mgr_id
SELECT managers
SET RELATION TO emp_id INTO employees
BROWSE
SELECT employees
BROWSE
Al desplazar el puntero de registro de la ventana Examinar managers, la ventana Examinar
employees se actualiza de forma que sólo muestra los empleados que dependen del supervisor
seleccionado.
Establecer relaciones persistentes con índices
Los índices permiten establecer relaciones persistentes entre las tablas de una base de datos. Las
relaciones persistentes son relaciones entre tablas de base de datos almacenadas en el archivo de la
base de datos y se utilizan automáticamente como condiciones predeterminadas de combinación en el
Diseñador de consultas y en el Diseñador de vistas. Las relaciones persistentes aparecen también en el
Diseñador de bases de datos en forma de líneas que unen los índices de las tablas y son las relaciones
predeterminadas al utilizar las tablas en el entorno de datos.
A diferencia de las relaciones temporales establecidas con el comando SET RELATION, las
relaciones persistentes no tienen que establecerse de nuevo cada vez que se utilizan las tablas. Sin
embargo, las relaciones persistentes no controlan la relación entre los punteros de registros, por lo
que deberá utilizar ambos tipos al programar aplicaciones con Visual FoxPro. Si desea más
información sobre el establecimiento de relaciones persistentes, consulte el capítulo 6,Crear bases de
datos.
Capítulo 8: Crear vistas
Si desea un conjunto de datos personalizado y actualizable para su aplicación, puede utilizar vistas.
Las vistas combinan las cualidades de las consultas y las tablas: al igual que una consulta, puede

Las vistas combinan las cualidades de las consultas y las tablas: al igual que una consulta, puede
utilizar una vista para extraer un conjunto de datos de una o más tablas relacionadas; y como en una
tabla, puede utilizar una vista para actualizar la información de la misma y almacenar definitivamente
en disco sus resultados.
En este capítulo se describe la creación y actualización de vistas mediante programación, así como el
establecimiento de sus propiedades para optimizar su rendimiento. Para obtener más información
sobre bases de datos, consulte el capítulo 6, Crear bases de datos. Si desea más información sobre
tablas o índices, consulte el capítulo 7, Trabajar con tablas. Para obtener más información sobre el
Diseñador de vistas, consulte el capítulo 5, Actualizar datos con vistas, del Manual del programador.
Este capítulo incluye:
l Crear una vista
l Usar las vistas
l Actualizar datos en una vista
l Combinar vistas
l Trabajar con datos fuera de línea
l Optimizar el rendimiento de una vista
Crear una vista
Como las vistas y las consultas tienen mucho en común, se siguen los mismos pasos para crear una
vista y una consulta. Elija las tablas y los campos que desee incluir en la vista, especifique las
condiciones de combinación utilizadas para relacionar las tablas y especifique filtros para seleccionar
registros específicos. A diferencia de las consultas, en las vistas también puede seleccionar cómo se
envían las modificaciones realizadas a los datos de una vista a las tablas originales, o tablas de base, a
partir de las cuales se construye la vista.
Cuando usted crea una vista, Visual FoxPro almacena una definición de vista en la base de datos
actual. Esta definición contiene los nombres de las tablas y los campos de la vista, así como los
valores de sus propiedades. Cuando use la vista, la definición de la misma se usará para generar una
instrucción SQL que define el conjunto de datos de la vista.
Para obtener información acerca de las propiedades de la vista, vea Establecer las propiedades de la
vista y de las conexiones más adelante en este capítulo y vea DBGETPROP( ) o CURSORGETPROP
( ).
.
Puede crear dos tipos de vistas: local y remota. Las vistas remotas utilizan sintaxis remota de SQL
para seleccionar información de tablas de un origen de datos ODBC remoto. Las vistas locales usan la
sintaxis SQL de Visual FoxPro para seleccionar información de tablas o vistas. Puede agregar una o
más vistas remotas a una vista local, lo que le permitirá tener acceso a información de orígenes de
datos de Visual FoxPro y ODBC remoto en la misma vista. Para obtener más información sobre el
acceso a datos remotos y locales en una única vista, consulte Combinar datos locales y remotos en
una vista, más adelante en este mismo capítulo.
Crear una vista local

Puede crear una vista local con el Diseñador de vistas o mediante el comando CREATE SQL VIEW.
Para crear una vista local
l En el Administrador de proyectos, seleccione una base de datos, elija Vistas locales y, a
continuación, elija Nuevo para abrir el Diseñador de vistas.
–O bien–
l Use el comando CREATE SQL VIEW cuando haya una base de datos abierta para mostrar el
Generador de vistas.
–O bien–
l Use el comando CREATE SQL VIEW con la cláusula AS.
Por ejemplo, el código siguiente crea una vista que contiene todos los campos de la tabla products:
CREATE SQL VIEW product_view AS SELECT * ;
FROM testdata!products
El nombre de la nueva vista aparecerá en el Administrador de proyectos. Si abre el Diseñador de
bases de datos, la vista se mostrará de la misma manera que una tabla en el esquema, con el nombre
de la vista en lugar del nombre de la tabla.
En el ejemplo anterior, el nombre de la tabla está precedido, o cualificado, por el nombre de la base
de datos de la tabla y el símbolo "!". Si cualifica el nombre de la tabla al crear una vista, Visual
FoxPro buscará la tabla tanto en la lista de bases de datos abiertas, incluyendo las bases de datos
actuales y las no actuales, como en la ruta de acceso predeterminada de la tabla.
Si no cualifica una tabla con un nombre de base de datos en una definición de vista, la base de datos
deberá estar abierta antes de poder utilizar la vista.
Sugerencia Cuando cree o use una vista en el Administrador de proyectos, éste abrirá la base de
datos automáticamente. Por consiguiente, si usa una vista fuera del proyecto, deberá abrir la base de
datos o asegurarse de que la base de datos está en el alcance antes de poder utilizar la vista.
Crear vistas con instrucciones SQL SELECT almacenadas
Puede usar sustitución de macros para almacenar la instrucción SQL SELECT en una variable que
puede llamar con la cláusula AS del comando CREATE SQL VIEW. Por ejemplo, el código
siguiente almacena una instrucción SQL SELECT en la variable emp_cust_sql, que se utiliza para
crear una vista nueva.
emp_cust_sql = "SELECT employee.emp_id, ;
customer.cust_id, customer.emp_id, ;
customer.contact, customer.company ;
FROM employee, customer ;
WHERE employee.emp_id = customer.emp_id"

WHERE employee.emp_id = customer.emp_id"
CREATE SQL VIEW emp_cust_view AS &emp_cust_sql
Modificar vistas
Puede modificar vistas existentes en el Diseñador de vistas mediante el Administrador de proyectos o
a través del lenguaje. Si quiere modificar la cadena SQL de la vista mediante programación debe
crear una vista nueva. Entonces, puede guardar la nueva definición de vista y sobrescribir el nombre
de la vista existente. Para modificar las propiedades de una vista, consulte Establecer propiedades de
las vistas y las conexiones más adelante en este mismo capítulo.
Sugerencia En el Diseñador de vistas, puede abrir una vista existente y, a continuación, copiar la
cadena SQL de sólo lectura y pegarla en el código como método abreviado para la creación de una
vista mediante programación.
Para modificar una vista
l En el Administrador de proyectos, seleccione el nombre de la vista y elija Modificar para abrir
el Diseñador de vistas.
–O bien–
l Abra una base de datos y utilice el comando MODIFY VIEW con el nombre de la vista.
En el Diseñador de vistas, puede utilizar el menú Consulta o la barra de herramientas Diseñador de
vistas para agregar una nueva tabla a la vista. El código siguiente muestra product_view en el
Diseñador de vistas:
MODIFY VIEW product_view
Cambiar el nombre de una vista
Puede cambiar el nombre de una vista desde el Administrador de proyectos o mediante el comando
RENAME VIEW.
Para cambiar el nombre de una vista
l En el Administrador de proyectos, seleccione una base de datos, después el nombre de la vista
y, a continuación, elija Cambiar el nombre del archivo en el menú Proyecto.
–O bien–
l Use el comando RENAME VIEW.
Por ejemplo, el código siguiente cambia el nombre de product_view a products_all_view :
RENAME VIEW product_view TO products_all_view

La base de datos que contiene la vista debe estar abierta para que usted pueda cambiar el nombre de
la vista.
Eliminar una vista
Puede eliminar la definición de una vista de una base de datos en el Administrador de proyectos o con
el comando DELETE VIEW. Antes de eliminar la vista, asegúrese de que la base de datos que la
contiene está abierta y establecida como base de datos actual.
Para eliminar una vista
l En el Administrador de proyectos, seleccione una base de datos, después el nombre de la vista
y, a continuación, elija Quitar.
–O bien–
l Use el comando DELETE VIEW o el comando DROP VIEW.
Por ejemplo, el código siguiente elimina product_view y customer_view de la base de datos:
DELETE VIEW product_view
DROP VIEW customer_view
Nota Estos comandos producen el mismo resultado; DROP VIEW es la sintaxis estándar ANSI
SQL para eliminar una vista SQL.
Crear una vista de múltiples tablas
Para tener acceso a información relacionada almacenada en tablas distintas, puede crear una vista y
agregar dos o más tablas, o puede modificar una vista existente agregando tablas. Para agregar las
tablas, puede usar el Diseñador de vistas o el comando CREATE SQL VIEW. Después de agregar las
tablas, puede expandir su control de los resultados de la vista con la condición de combinación
definida entre las tablas.
Para crear una vista de múltiples tablas
l En el Administrador de proyectos, cree una vista y agregue las tablas que quiera en el
Diseñador de vistas.
–O bien–
l Abra una base de datos y use el comando CREATE SQL VIEW; agregue nombres de tabla a la
cláusula FROM y condiciones de combinación.
Cuando se agregan las tablas al comando CREATE SQL VIEW se produce un producto
cartesiano. Tiene que especificar una condición de combinación en la cláusula FROM o en la
cláusula WHERE de la instrucción para emparejar registros relacionados entre las tablas. Si
existen relaciones persistentes entre las tablas, se usan automáticamente como condiciones de

existen relaciones persistentes entre las tablas, se usan automáticamente como condiciones de
combinación.
Definir y modificar condiciones de combinación
Normalmente, para definir una condición de combinación se usan las relaciones establecidas en los
campos clave principal y clave externa entre las tablas. Por ejemplo, puede que quiera buscar
información sobre pedidos, incluyendo información sobre el cliente que hizo el pedido. Puede crear
una vista con las tablas Customer y Orders. Especifique una condición de combinación para comparar
valores de los campos que tienen en común y, generalmente, devolver los que son iguales. En el
ejemplo, Customer y Orders tienen un campo Customer ID.
Para definir condiciones de combinación en una vista
l En el Administrador de proyectos, cree o modifique una vista y, a continuación, agregue las
tablas que quiera en el Diseñador de vistas.
–O bien–
l Abra una base de datos y use el comando CREATE SQL VIEW; agregue nombres de tabla y
condiciones de combinación a la cláusula FROM.
Condiciones de combinación especificadas en el Diseñador de vistas y mostradas en la
instrucción SELECT - SQL

El código siguiente crea la nueva vista como se describe en el ejemplo anterior, usando la cláusula
FROM para especificar las condiciones de combinación para la vista:
CREATE SQL VIEW cust_orders_view AS ;
SELECT * FROM testdata!customer ;
INNER JOIN testdata!orders ;
ON customer.cust_id = orders.cust_id
La condición de combinación tiene varias características: el tipo de combinación, los campos que hay
que combinar y el operador para comparar los campos. En este caso, en el que tenemos una
combinación interna, sólo se incluyen en el resultado las filas de la tabla customer que coinciden con
uno o más registros de la tabla orders.
Para cambiar el resultado de la vista de forma que satisfaga sus necesidades específicas, puede
especificar:
l Campos de la combinación
l Operadores de comparación entre los campos
l Una secuencia de combinaciones, si tiene dos tablas en la vista
l El tipo de combinación
Especificar combinaciones en campos que no sean clave principal ni clave externa puede ser útil en
casos específicos, pero no se suele hacer en la mayor parte de las vistas.
Si cambia el operador de combinación, puede controlar qué registros se comparan y se devuelven de
forma similar a un filtro. Por ejemplo, si usa un campo de fecha en la combinación, puede usar el
operador de combinación para incluir sólo los registros anteriores a una fecha específica.
Para obtener más información sobre la secuencia de combinaciones, consulte Definir múltiples
condiciones de combinación más adelante en este mismo capítulo.
Si elige un tipo de combinación diferente puede expandir el resultado de su consulta para incluir los
registros que cumplan la condición de combinación y los que no la cumplan. Si tiene más de dos
tablas en la vista, puede cambiar el resultado si cambia el orden de combinaciones en la cláusula
FROM.
Puede modificar los tipos de combinación de la vista con el Diseñador de vistas o a través del
lenguaje.
Para modificar un tipo de combinación
l Seleccione la ficha Combinación.
–O bien–
l Haga doble clic en la línea de combinación.
-O bien–

-O bien–
l Abra una base de datos y use el comando CREATE SQL VIEW; agregue nombres de tablas y
condiciones de combinación a la cláusula FROM.
Incluir registros no coincidentes en el resultado
Si desea incluir filas no coincidentes en el resultado, puede usar una combinación externa. Por
ejemplo, puede querer una lista de todos los clientes y saber si han hecho un pedido o no. Además,
para los clientes que han hecho pedidos, es posible que quiera incluir los números de pedido en la
vista. Cuando usa una combinación externa, los campos vacíos de las filas no coincidentes devuelven
valores nulos.
También puede usar el lenguaje para crear esta vista con el código siguiente:
CREATE SQL VIEW cust_orders_view AS ;
LEFT OUTER JOIN testdata!orders ;
ON customer.cust_id = orders.cust_id
Para controlar qué registros no coincidentes están incluidos en la vista, puede elegir los siguientes
tipos de combinación.
Para Utilice
Devolver sólo registros desde ambas tablas que satisfagan la
condición de combinación establecida entre los dos campos
de la condición de combinación.
Condición interna
Devolver todos los registros de la tabla situada a la izquierda
de la palabra clave JOIN y únicamente los registros
coincidentes de la tabla situada a la derecha de la palabra
clave.
Combinación externa izquierda
Devolver todos los registros de la tabla situada a la derecha
de la palabra clave JOIN y únicamente los registros
coincidentes de la tabla situada a la izquierda de la palabra
clave.
Combinación externa derecha
Devolver registros coincidentes y no coincidentes de ambas
tablas
Combinación externa completa
Definir múltiples condiciones de combinación
Si crea vistas o consultas con más de dos tablas, puede cambiar el resultado por el orden en que estén
especificadas las condiciones de combinación. Por ejemplo, es posible que quiera buscar información
sobre los pedidos, incluyendo información sobre el empleado que hizo la venta y el cliente que hizo
el pedido. Puede crear una vista con las tablas customer, orders y employee y especificando
condiciones de combinación interna en los campos que tienen en común: customer y orders tienen
un campo customer ID; orders y employee tienen un campo employee ID.

Esta vista tiene la siguiente instrucción SQL subyacente:
CREATE SQL VIEW cust_orders_emp_view AS ;
INNER JOIN testdata!orders ;
ON customer.cust_id = orders.cust_id ;
INNER JOIN testdata!employee ;
ON orders.emp_id = employee.emp_id
Usar combinaciones en la cláusula WHERE
Puede especificar sus condiciones de combinación en la cláusula WHERE; sin embargo, no puede
especificar un tipo de combinación de la misma forma que puede hacerlo en combinaciones en la
cláusula FROM. Para vistas remotas, la cláusula de combinación aparece siempre en la cláusula
WHERE.
El código siguiente crea la misma vista que el ejemplo anterior, con la cláusula WHERE para
especificar las condiciones de combinación para la vista:
CREATE SQL VIEW cust_orders_emp_view AS ;
SELECT * FROM testdata!customer, ;
testdata!orders, testdata!employee ;
WHERE customer.cust_id = orders.cust_id ;
AND orders.emp_id = employee.emp_id
Acceso a datos remotos
Cuando desee utilizar datos situados en un servidor remoto, deberá crear una vista remota. Para crear
una vista remota, primero debe ser capaz de conectarse a un origen de datos.
Conectarse a un origen de datos remoto
Un origen de datos remoto es generalmente un servidor remoto para el que ha instalado un
controlador ODBC y establecido un nombre de origen de datos ODBC. Para tener un origen de datos
válido, debe asegurarse de que ODBC está instalado. Desde Visual FoxPro, puede definir un origen
de datos y conexiones.
Para obtener información sobre cómo establecer un origen de datos ODBC, consulte el capítulo 1,
Instalar Visual FoxPro, de la Guía de instalación e Índice principal.
Definir una conexión
En Visual FoxPro, puede crear y almacenar en una base de datos una definición de conexión con
nombre, a la que se puede referir desde ese momento por su nombre cuando cree una vista remota.
También puede establecer las propiedades de la conexión con nombre para optimizar la
comunicación entre Visual FoxPro y el origen de datos remoto. Cuando active una vista remota, la
conexión de la vista se convertirá en el canal hacia el origen de datos remoto.
Para crear una conexión con nombre

Para crear una conexión con nombre
l En el Administrador de proyectos, seleccione Conexiones y, a continuación, elija Nuevo para
abrir el Diseñador de conexiones.
–O bien–
l Abra una base de datos y utilice el comando CREATE CONNECTION para abrir el Diseñador
de conexiones.
–O bien–
l Use el comando CREATE CONNECTION con un nombre de conexión.
Por ejemplo, para crear una conexión en la base de datos testdata que almacene la información
necesaria para conectarse al origen de datos ODBC sqlremote, puede escribir el código siguiente:
CREATE CONNECTION remote_01 DATASOURCE sqlremote userid password
Visual FoxPro muestra remote_01 como el nombre de la conexión en el Administrador de proyectos.
La creación de una conexión con nombre en su base de datos no utiliza ningún recurso remoto ni de
red, ya que Visual FoxPro no activa la conexión hasta que usted utiliza la vista. Hasta que active la
conexión, la conexión con nombre sólo existe como una definición de conexión almacenada como
una fila en el archivo .dbc de la base de datos. Cuando utilice una vista remota, Visual FoxPro usará
la conexión con nombre mencionada en la vista para crear una conexión activa con el origen de datos
remoto y enviará la solicitud de datos al origen remoto utilizando la conexión activa como canal.
Puede crear opcionalmente una vista que especifique únicamente el nombre del origen de datos, en
lugar del nombre de la conexión. Cuando utilice la vista, Visual FoxPro usará la información de
ODBC acerca del origen de datos para crear y activar una conexión con el origen de datos. Cuando
cierre la vista se cerrará la conexión.
Prioridad de nombres para conexiones y orígenes de datos
Cuando utilice el comando CREATE SQL VIEW con la cláusula CONNECTION, especifique un
nombre que represente una conexión o bien un origen de datos. Visual FoxPro buscará primero en la
base de datos actual una conexión con el nombre que especificó. Si no existe ninguna conexión con
ese nombre en la base de datos, Visual FoxPro buscará entonces un origen de datos ODBC
establecido con el nombre especificado. Si su base de datos actual contiene una conexión con nombre
cuyo nombre coincide con el de un origen de datos ODBC de su sistema, Visual FoxPro la encontrará
y utilizará la conexión con nombre.
Mostrar instrucciones de inicio de sesión ODBC
Cuando use una vista cuya información de registro de conexión no esté totalmente especificada,
Visual FoxPro puede mostrar un cuadro de diálogo específico del origen de datos que le pida la
información que falte.
Puede controlar si Visual FoxPro le pedirá la información que dejó sin especificar en el momento de

Puede controlar si Visual FoxPro le pedirá la información que dejó sin especificar en el momento de
la conexión.
Para controlar la presentación de instrucciones de inicio de sesión ODBC
l En el Administrador de proyectos, seleccione el nombre de la conexión y elija Modificar para
abrir el Diseñador de conexiones.
l En el área Mostrar instrucciones de inicio de sesión ODBC, elija una opción.
–O bien–
l Use la propiedad DispLogin de las funciones DBSETPROP( ) o SQLSETPROP( ).
Usar una conexión existente
Puede utilizar una conexión con nombre ya existente para crear una vista remota. Puede ver una lista
de las conexiones disponibles en la base de datos y utilizar el Administrador de proyectos o el
comando DISPLAY CONNECTIONS.
Para determinar las conexiones existentes
l En el Administrador de proyectos, seleccione una base de datos y seleccione Conexiones.
–O bien–
l Use el comando DISPLAY CONNECTIONS.
Por ejemplo, el código siguiente muestra las conexiones de la base de datos testdata:
DISPLAY CONNECTIONS
Crear una vista remota
Cuando tiene un origen de datos o una conexión con nombre válidos, puede crear una vista remota
con el Administrador de proyectos o el lenguaje de programación. Una vista remota es similar a una
vista local, pero usted agrega un nombre de conexión o de origen de datos al definir la vista. La
instrucción SQL de la vista remota utiliza el dialecto nativo del servidor.
Para crear una vista remota
l En el Administrador de proyectos, seleccione una base de datos, seleccione Vistas remotas y
elija Nuevo para abrir el Diseñador de vistas.
–O bien–
l Use el comando CREATE SQL VIEW con la cláusula REMOTE o la cláusula
CONNECTION.

CONNECTION.
Si usa la cláusula CONNECTION con el comando CREATE SQL VIEW, no necesitará incluir la
palabra clave REMOTE. Visual FoxPro identifica la vista como remota por la presencia de la palabra
clave CONNECTION. Por ejemplo, si tiene la tabla products de la base de datos Testdata en un
servidor remoto, el código siguiente creará una vista remota de la tabla products:
CREATE SQL VIEW product_remote_view ;
CONNECTION remote_01 ;
AS SELECT * FROM products
Puede utilizar el nombre de un origen de datos en lugar del nombre de una conexión cuando cree una
vista remota. También puede elegir entre omitir el nombre de la conexión o del origen de datos
remoto cuando utilice el comando CREATE SQL VIEW con la cláusula REMOTE. Visual FoxPro
mostrará entonces el cuadro de diálogo Selección de conexión u Origen de datos, en el que podrá
elegir un origen de datos o una conexión válidos.
Después de crear una vista, puede abrir el Diseñador de bases de datos; la vista se mostrará de la
misma manera que una tabla en el esquema con el nombre de la vista y un icono en lugar del nombre
de la tabla y un icono.
Si combina dos o más tablas en el Diseñador de vistas remotas, el Diseñador usa combinaciones
internas (o equicombinaciones) y coloca la condición de combinación en la cláusula WHERE. Si
quiere usar una combinación externa, el Diseñador de vistas remotas sólo proporciona combinaciones
externas izquierdas, la sintaxis con la que es compatible ODBC. Si necesita combinaciones externas
derechas o completas o sólo quiere usar una sintaxis nativa para una combinación externa izquierda,
cree la vista mediante programación.
Usar vistas
Después de haber creado una vista, puede utilizarla para mostrar y actualizar datos. También puede
modificar las propiedades de una vista para aumentar el rendimiento de la misma. Se trata la vista
como una tabla:
l Abra la vista con el comando USE y el nombre de la vista.
l Cierre la vista con el comando USE.
l Muestre los registros de la vista en una ventana Examinar.
l Muestre los alias de vista abierta en la ventana Sesión de datos.
l Use la vista como un origen de datos como en un formulario o un control Grid.
Puede utilizar una vista con el Administrador de proyectos o con el lenguaje de programación.
Para usar una vista
l En el Administrador de proyectos, seleccione una base de datos, elija el nombre de la vista y
elija Examinar para mostrar la vista en una ventana Examinar.
–O bien–

–O bien–
l Tenga acceso a la vista mediante programación con el comando USE.
El código siguiente muestra product_view en una ventana Examinar:
USE product_view
BROWSE
Cuando utilice una vista, ésta se abrirá como un cursor en su propia área de trabajo. Si la vista está
basada en tablas locales, Visual FoxPro también abrirá las tablas base en áreas de trabajo distintas.
Las tablas base de una vista son las tablas a las que tiene acceso la instrucción SELECT - SQL que
usted incluye en el comando CREATE SQL VIEW al crear una vista. En el ejemplo anterior, al usar
product_view también se abre automáticamente la tabla products.
La ventana Sesión de datos muestra la vista y su tabla base
Cuando una vista está basada en tablas remotas, estas tablas no se abren en áreas de trabajo. En la
ventana Sesión de datos sólo aparece el nombre de la vista remota.
Limitar el alcance de una vista
Cuando tiene acceso a un origen de datos remoto, tendrá acceso a cantidades potencialmente masivas
de datos. Puede limitar el alcance de los datos seleccionados en la vista únicamente a los registros
que necesite en cada momento. Esto reduce el tráfico en la red y aumenta el rendimiento de su vista.
Por ejemplo, si desea ver información acerca de los clientes de un determinado país y sus pedidos,
mejorará el rendimiento si descarga en la vista sólo los registros correspondientes a ese país, en lugar
de los de todos los clientes.
Un método que puede utilizar para limitar el alcance de su vista es agregar una cláusula WHERE a la
instrucción SQL de su vista. Si deseara buscar los registros de los clientes de Suecia, podría crear esta
cláusula SQL WHERE para su vista:

cláusula SQL WHERE para su vista:
SELECT * FROM customer ;
WHERE customer.country = 'Suecia'
Este código limitará el alcance de su vista al descargar únicamente los registros correspondientes a
los clientes de Suecia, pero también puede que sea necesaria la creación de una vista distinta para
cada país, ya que el valor real de customer.country para un país está codificado en la instrucción
SELECT de su vista.
Crear una vista parametrizada
Puede limitar el alcance de una vista sin crear una vista distinta para cada subconjunto de registros si
crea vistas parametrizadas. Una vista parametrizada crea una cláusula WHERE en la instrucción SQL
SELECT de la vista que limita los registros descargados únicamente a aquellos que cumplen las
condiciones de la cláusula WHERE que se creó con los valores proporcionados para el parámetro.
Este valor se puede proporcionar en tiempo de ejecución o se puede transferir a la vista mediante
programación.
En el caso del ejemplo anterior, puede crear una vista que le permita descargar los registros para
cualquier país escribiendo simplemente el nombre del país al abrir la vista.
Para crear una vista parametrizada
l En el Diseñador de vistas, elija Parámetros de vista en el menú Consulta.
–O bien–
l Use el comando CREATE SQL VIEW con un símbolo "?" y un parámetro.
El parámetro que usted proporciona se evalúa como una expresión de Visual FoxPro y el valor se
envía como parte de la instrucción SQL de la vista. Si la evaluación falla, Visual FoxPro pedirá el
valor del parámetro. Por ejemplo, si tiene la tabla customer de la base de datos Testdata en un
servidor remoto, el código siguiente creará una vista remota parametrizada que limita la vista a
aquellos clientes cuyo país coincida con el valor proporcionado para el parámetro ?cCountry:
CREATE SQL VIEW customer_remote_view ;
AS SELECT * FROM customer ;
WHERE customer.country = ?cCountry
Puede proporcionar un valor para ?cCountry mediante programación cuando utilice la vista. Por
ejemplo, podría escribir el código siguiente:
cCountry = 'Suecia'
USE Testdata!customer_remote_view IN 0
BROWSE
Visual FoxPro mostrará los registros de los clientes para las compañías suecas en la ventana
Examinar Customer_remote_view.
Vista que muestra los registros cuyo país coincide con el parámetro proporcionado

Vista que muestra los registros cuyo país coincide con el parámetro proporcionado
Sugerencia Si su parámetro es una expresión, escriba la expresión entre paréntesis. Esto permite
que toda la expresión se evalúe como parte del parámetro.
Pedir al usuario para que escriba un valor de parámetro
Si su parámetro no es una variable o una expresión, quizá desee pedir al usuario que suministre el
valor del parámetro mediante la utilización de una cadena entre comillas como parámetro de la vista.
Cuando cree un parámetro de vista con una cadena entre comillas después del símbolo "?", Visual
FoxPro no interpretará la cadena como una expresión. En su lugar, le pedirá que introduzca el valor
del parámetro en tiempo de ejecución. Por ejemplo, el código siguiente crea una vista remota
parametrizada que pide al usuario que suministre un valor para el parámetro ?'mi id cliente':
CREATE SQL VIEW customer_remote_view ;
AS SELECT * FROM customer ;
WHERE customer.cust_id = ?'mi id cliente'
USE customer_remote_view
Cuando utilice la vista del ejemplo anterior aparecerá el cuadro de diálogo Parámetro de vista.
El cuadro de diálogo Parámetro de vista pide el valor de la cadena entre comillas
Cuando haya introducido un identificador (Id.) de usuario válido, Visual FoxPro recuperará el
registro que coincide con ese Id.. Si introduce el valor ‘ALFKI’ en el ejemplo anterior y examina
Customer_remote_view, verá el registro del cliente en la ventana Examinar.
Ventana Examinar que muestra el registro para el cust_id ALFKI

Mediante la utilización de una cadena entre comillas como parámetro de vista, se asegurará de que
Visual FoxPro pedirá siempre al usuario el valor del parámetro.
Abrir múltiples instancias de una vista
Puede abrir múltiples instancias de una vista en áreas de trabajo distintas, del mismo modo que puede
abrir una tabla en más de un área de trabajo. A diferencia de las tablas, las vistas recopilan un nuevo
conjunto de datos predeterminado cada vez que usted las utiliza.
Para abrir una vista en múltiples áreas de trabajo
l En el Administrador de proyectos, elija el nombre de la vista y después Examinar para mostrar
la vista en una ventana Examinar. Repita este proceso para abrir la vista en áreas de trabajo
adicionales.
–O bien–
l En la ventana Sesión de datos, elija Abrir y el nombre de la vista. Repita este proceso para
abrir la vista en áreas de trabajo adicionales.
–O bien–
l Tenga acceso a la vista mediante programación con el comando USE.
Cuando tiene acceso a la vista mediante programación con el comando USE, puede elegir abrir otra
instancia de la vista sin necesidad de volver a consultar el origen de datos. Esto resulta especialmente
útil cuando quiere abrir una vista remota en múltiples áreas de trabajo sin esperar a que los datos se
descarguen desde un origen de datos remoto.
Para usar una vista de nuevo sin descargar datos
l Use la cláusula NOREQUERY con el comando USE.
–O bien–
l Use la cláusula AGAIN con el comando USE.
El código siguiente utiliza la cláusula NOREQUERY para mostrar el cursor buscado de la primera
instancia de product_remote_view en dos ventanas Examinar sin volver a consultar el origen de
datos remoto:
CREATE SQL VIEW product_remote_view ;

AS SELECT * FROM products
USE product_remote_view
BROWSE
SELECT 0
USE product_remote_view NOREQUERY
BROWSE
Puede especificar un número de sesión mediante la cláusula NOREQUERY. Si no especifica un
número de sesión, Visual FoxPro buscará en todas las sesiones. Si se encuentra un conjunto de
resultados ya abierto para la vista, se volverá a abrir un cursor con el mismo conjunto de resultados.
Si no se encuentra un conjunto de resultados ya abierto, se obtendrá un nuevo conjunto para la vista.
Del mismo modo que en las tablas, si no se encuentra la vista se abrirá un nuevo cursor de vista.
Si desea que Visual FoxPro busque sólo en la sesión actual un conjunto de resultados abierto para su
vista, puede utilizar la cláusula AGAIN. El código siguiente muestra product_remote_view en dos
ventanas Examinar:
USE product_remote_view
BROWSE
USE product_remote_view AGAIN in 0
BROWSE
Cuando utilice la cláusula AGAIN, Visual FoxPro buscará un cursor de vista existente en la sesión
actual y abrirá un alias adicional que apunta a este cursor de vista. Abrir otra instancia de una vista
con la cláusula AGAIN equivale a ejecutar USE con la cláusula NONQUERY con el número de
sesión actual..
Mostrar la estructura de una vista
Puede abrir y mostrar únicamente la estructura de una vista mediante la cláusula NODATA del
comando USE. Esta opción resulta especialmente útil cuando se quiere ver la estructura de una vista
remota sin tener que esperar a la descarga de datos.
Para abrir una vista sin datos
l Tenga acceso a la vista mediante programación con el comando USE y la cláusula NODATA.
El código siguiente muestra customer_remote_view sin datos en una ventana Examinar:
USE customer_remote_view NODATA in 0
BROWSE
El uso de una vista con la cláusula NODATA siempre abre un nuevo cursor de la vista. La cláusula
NODATa es siempre el modo más rápido de obtener la estructura de una vista, porque crea el menor
cursor posible en el origen de datos remoto. Cuando utilice la cláusula NODATA, Visual FoxPro
creará una cláusula WHERE para la vista que siempre devolverá un valor falso. Puesto que ningún
registro del origen de datos puede cumplir la condición de la cláusula WHERE, no se seleccionará
ninguna fila en el cursor del origen de datos remoto. Su vista se recuperará rápidamente ya que no
espera que el origen de datos remoto cree un cursor potencialmente grande.

espera que el origen de datos remoto cree un cursor potencialmente grande.
Sugerencia El uso de la cláusula NODATA es más eficaz que usar un valor 0 para la propiedad
MaxRecords en su vista o en el cursor. Cuando utilice la propiedad MaxRecords, deberá esperar
mientras el origen de datos remoto construye un cursor para la vista que contiene todas las filas de
datos que cumplen las condiciones normales de la cláusula WHERE. Las filas del cursor completo de
la vista remota se descargarán de acuerdo con el valor de la propiedad MaxRecords.
Crear un índice en una vista
Puede crear índices locales en una vista, igual que en una tabla, mediante el comando INDEX ON. A
diferencia de los índices generados para una tabla, los índices locales que cree en una vista no se
almacenarán definitivamente: desaparecerán cuando cierre la vista.
Sugerencia Considere el tamaño del conjunto de resultados de su vista cuando decida si va a crear
un índice local en una vista. Indexar un conjunto de resultados grande puede llevar un tiempo
considerable y disminuir el rendimiento de su vista.
Para obtener más información acerca de la creación de índices, consulte el capítulo 7,Trabajar con
tablas, o vea INDEX.
Crear relaciones temporales en las vistas
Puede crear relaciones temporales entre índices de vistas o entre índices de vistas e índices de tablas
mediante el comando SET RELATION.
Para obtener un mejor rendimiento cuando utilice el comando SET RELATION para relacionar una
vista y una tabla, haga que la vista sea el objeto primario y la tabla el objeto secundario en la relación.
Hacer que la tabla sea el objeto secundario es más eficaz porque el índice estructural de la tabla se
mantiene constantemente, se tiene acceso al mismo de forma más rápida y lo puede usar el entorno de
datos para ordenar los registros. Hay que volver a generar el índice de la vista cada vez que ésta se
activa y tarda más tiempo que el índice de la tabla. Un índice de una vista no forma parte de la
definición de la vista; por lo tanto, si usa un entorno de datos, la vista no puede ser el objeto
secundario porque el índice del objeto secundario tiene que existir como parte de la definición y esto
no lo admiten las vistas.
Establecer las propiedades de vistas y conexiones
Cuando cree una vista, ésta heredará los valores de las propiedades, como UpdateType y
UseMemoSize, del cursor de entorno o cursor 0 de la sesión actual. Puede cambiar estos valores
predeterminados de las propiedades mediante la función CURSORSETPROP( ) con 0 como número
de cursor. Una vez creada la vista y almacenada en una base de datos, puede cambiar las propiedades
de la vista mediante la función DBSETPROP( ). Los cambios que realice a las propiedades de una
vista en una base de datos se almacenarán definitivamente en la base de datos.
Cuando utilice una vista, el cursor activo de la vista heredará los valores de las propiedades
almacenados para la vista en la base de datos. Puede cambiar estas propiedades en el cursor activo
mediante la función CURSORSETPROP( ) para el cursor de vista. Los cambios realizados por la
función CURSORSETPROP( ) son temporales. El valor temporal para la vista activa desaparece al
cerrar la vista, mientras que el valor temporal para el cursor 0 desaparece al cerrar la sesión de Visual

cerrar la vista, mientras que el valor temporal para el cursor 0 desaparece al cerrar la sesión de Visual
FoxPro.
Las conexiones heredan las propiedades de una forma similar. Las propiedades predeterminadas de la
conexión 0 se heredan cuando usted crea y almacena una conexión con nombre en una base de datos.
Puede cambiar estos valores predeterminados de propiedades para la conexión 0 mediante la función
SQLSETPROP( ). Después de haber creado la conexión y haberla almacenado en una base de datos,
puede cambiar las propiedades de conexión mediante la función DBSETPROP( ). Cuando utilice una
conexión, la conexión activa heredará los valores de las propiedades almacenados para la conexión en
la base de datos. Puede cambiar estas propiedades en la conexión activa con la función
SQLSETPROP( ) para el controlador de la conexión.
Tanto las vistas como las conexiones pueden utilizar un origen de datos ODBC con nombre. Si utiliza
un origen de datos ODBC en una vista, la conexión heredará las propiedades de la configuración
predeterminada de la sesión.
El diagrama siguiente ilustra la herencia de propiedades para las vistas y conexiones. Las líneas en
gris representan el flujo de herencia de propiedades, mientras que las líneas negras representan los
comandos de Visual FoxPro.
Propiedades de vistas y conexiones, y sus herencias

Cambiar tipos de datos predeterminados al descargar vistas remotas
Cuando cree una vista, se establece la propiedad DataType para todos los campos a un valor
predeterminado. El valor es la letra del tipo de datos (D, G, I, L, M, P, T, Y) para tipos de datos de
longitud fija y la letra seguida por parámetros de precisión y escala entre paréntesis (B(d), C(n), N
(n,d)) para tipos de longitud variable. Esta propiedad es de sólo lectura para vistas locales. Para ver
una lista de tipos predeterminados, consulte "Descargar y cargar datos de vistas remotas" en el
capítulo 21, Implementar una aplicación cliente-servidor.
Puede modificar el valor de la propiedad DataType para el campo vista remota con la función
DBSETPROP( ) como se muestra en esta tabla.
Tipos de datos ODBC para
campos remotos
Tipos de datos posibles de un cursor de Visual FoxPro
SQL_CHAR
SQL_VARCHAR
SQL_LONGVARCHAR
Character o Memo1 (predeterminado); también General o
Picture
SQL_BINARY
SQL_VARBINARY
SQL_LONGVARBINARY
Memo (predeterminado); también Character, General o
Picture
SQL_DECIMAL
SQL_NUMERIC
Numeric o Currency2 (predeterminado); también Character,
Integer o Double
SQL_BIT Logical (predeterminado); también Character
SQL_TINYINT
SQL_SMALLINT
SQL_INTEGER
Integer (predeterminado); también Character, Numeric,
Double o Currency
SQL_BIGINT Character (predeterminado); también Integer, Numeric,
Double o Currency
SQL_REAL
SQL_FLOAT
SQL_DOUBLE
Double (predeterminado); el número de caracteres decimales
es el valor de SET DECIMALS en Visual FoxPro; también
Character, Integer, Numeric o Currency
SQL_DATE Date (predeterminado); también Character o DateTime
SQL_TIME DateTime3 (predeterminado); también Character
SQL_TIMESTAMP DateTime4 (predeterminado); también Character o Date
1. Si el ancho del campo ODBC es menor que el valor de la propiedad de cursor UseMemoSize, se
convierte en un campo Character en el cursor de Visual FoxPro; si no, se convierte en un campo
Memo.

2. Si el campo de servidor es un tipo de datos monetario, se convierte en un tipo de datos Currency en
Visual FoxPro.
3. El valor predeterminado del día es 1/1/1900.
4. Si el valor del campo SQL_TIMESTAMP contiene fracciones de segundo, las fracciones se
truncan cuando el valor se convierte en un tipo de datos DateTime de Visual FoxPro.
Usar la propiedad DataType
Puede usar la propiedad DataType para elegir un tipo de datos diferente que el predeterminado. Por
ejemplo, es posible que quiera descargar un campo marca de hora del servidor a Visual FoxPro, pero
la asignación de tipo de datos predeterminada a un campo DateTime de Visual FoxPro truncaría
cualquier fracción de segundo almacenada en la marca de hora de servidor. Puede usar la propiedad
DataType para asignar el campo marca de hora remota a un campo Character de Visual FoxPro para
conservar las fracciones de segundo.
Cerrar las tablas base de una vista
Las tablas base locales abiertas automáticamente cuando usa una vista no se cierran automáticamente
cuando cierra una vista; debe cerrarlas explícitamente. Esto es coherente con el comando SELECT -
SQL.
Actualizar datos en una vista
Puede actualizar los datos en una vista del mismo modo que lo haría en una tabla. Con una vista
también puede actualizar las tablas base de la vista. Las vistas se almacenan de forma predeterminada
en un búfer de filas con el método optimista. Puede cambiarlo para que se almacenen en un búfer de
tablas; para obtener más información acerca del almacenamiento en búfer, consulte el capítulo 17,
Programar para acceso compartido.
Puede actualizar datos en una vista a través de la interfaz o mediante el lenguaje de programación. El
primer paso para actualizar los datos de una vista consiste en hacer actualizable la vista. En la
mayoría de los casos, los valores predeterminados de las propiedades preparan automáticamente la
vista para que sea actualizable, pero las actualizaciones no se envían al origen de datos hasta que
usted indique a Visual FoxPro que lo haga estableciendo a On la propiedad SendUpdates.
Una vista utiliza cinco propiedades para controlar las actualizaciones. Estas propiedades se relacionan
a continuación, junto con sus valores predeterminados:
Propiedades de actualización de vistas y sus valores predeterminados
Propiedad de vista Valores predeterminados
Tables Incluye todas las tablas que tienen campos actualizables y al menos un
campo clave principal.
KeyField Campos clave de la base de datos y claves principales y remotas de la

KeyField Campos clave de la base de datos y claves principales y remotas de la
tabla.
UpdateName Nombre_tabla.nombre_columna para todos los campos.
Updatable Todos los campos excepto los campos de clave principal.
SendUpdates De forma predeterminada son los valores predeterminados de la sesión,
que originalmente se establece en falso (.F.); si cambia el valor a
verdadero (.T.), se convertirá en el valor predeterminado para todas las
vistas creadas en la sesión.
CompareMemo El valor predeterminado es verdadero (.T.), lo cual significa que los
campos memo se incluyen en la cláusula WHERE y se usan para
detectar conflictos de actualización.
Si bien las cinco propiedades son necesarias para actualizar datos, la propiedad SendUpdates actúa
como "conmutador principal" que controla si se envían o no las actualizaciones. A medida que
desarrolla su aplicación, puede desactivar la propiedad SendUpdates y configurar las demás
propiedades para permitir actualizaciones de los campos que desee actualizar. Cuando vaya a probar
su aplicación, podrá activar la propiedad SendUpdates para iniciar el flujo de actualizaciones.
En algunas situaciones más complejas, puede que los valores predeterminados de actualización no
proporcionen actualizaciones para una vista que usted creó mediante programación. Para permitir las
actualizaciones, examine el valor predeterminado de cada una de las propiedades de actualización y
ajústelo según sea necesario. También puede especificar propiedades adicionales, tales como
UpdateType, WhereType, etc., de acuerdo con sus preferencias. Para ver una lista completa de las
propiedades de vista, vea DBGETPROP( ).
Para hacer que una vista sea actualizable desde el Diseñador de vistas
l En el Diseñador de vistas, seleccione la ficha Criterios de actualización y active el valor
predeterminado.
El valor predeterminado de las vistas que usted crea mediante el Diseñador de vistas normalmente
prepara la vista para que sea actualizable; sólo necesita activar la casilla de verificación "Enviar
actualizaciones SQL" para activar las actualizaciones. Además puede modificar las tablas, los
campos, la cláusula SQL WHERE y las opciones de actualización como desee.
Para hacer que una vista sea actualizable estableciendo las propiedades de actualización de la
vista
l Examine el valor predeterminado actual con el comando DISPLAY DATABASE y modifique
después las propiedades de la definición de vista como desee con la función DBSETPROP( ).
El ejemplo siguiente muestra los pasos que podría seguir para especificar las cinco propiedades de
actualización de vista mediante programación:
Nota Las propiedades View predeterminadas pueden suministrar toda la información necesaria para
actualizar la vista.

actualizar la vista.
1. Establecer la propiedad Tables con al menos el nombre de una tabla.
Por ejemplo, si tuviera una vista basada en la tabla customer, podría configurar el nombre de
la tabla con la siguiente función:
DBSETPROP('cust_view','View','Tables','customer')
Sugerencia Si una tabla aparece como un cualificador en la propiedad UpdateName pero no
está incluida en la lista predeterminada de la propiedad Tables, quizá no tenga especificado un
campo clave principal. Haga que la tabla sea actualizable; para ello, agregue a la lista de la
propiedad el campo que considere que es un campo clave y, a continuación, agregue la tabla a
la lista de la propiedad Tables.
2. Establezca la propiedad KeyField con uno o más nombres de campos locales de Visual FoxPro
que, juntos, definan una clave única para la tabla de actualización.
Con el mismo ejemplo, podría hacer que cust_id fuese el campo clave mediante el código
siguiente:
DBSETPROP('cust_view.cust_id','Field','KeyField',.T.)
Precaución Asegúrese de que el campo o los campos clave que especifique definan una clave
única tanto en la tabla base que desee actualizar como en la vista.
3. Asigne los campos de la vista a los campos de su tabla base con la propiedad UpdateName.
Esta propiedad resulta especialmente útil cuando la vista está basada en una combinación de
dos tablas con un nombre de campo común o cuando los campos tienen alias en la vista. Para
actualizar la tabla base deseada, asigne el nombre del campo de la vista de Visual FoxPro al
campo de la tabla base y al nombre de la tabla.
DBSETPROP('cust_view.cust_id','Field','UpdateName',;
'customer.cust_id')
Sugerencia Para evitar la creación de campos sinónimos en su vista, puede cualificar
nombres de campo en la instrucción SQL que utilice para generar la vista. Después, utilice la
propiedad UpdateName de la vista de Visual FoxPro para asociar cada campo cualificado a la
tabla base y al campo correspondiente.
4. Especifique el alcance de los campos que desea actualizar mediante la propiedad UpdateField.
Debe especificar solamente aquellos campos también especificados con la propiedad
UpdateName.
DBSETPROP('cust_view.cust_id','Field','Updatable',;
.T.)
5. Establezca la propiedad SendUpdates como verdadera (.T.). Se trata del conmutador principal
que indica a Visual FoxPro que debe crear y enviar actualizaciones a cualquiera de las tablas y
campos que usted especificó como actualizables.

DBSETPROP('cust_view','View','SendUpdates',.T.)
Cuando utilice DBSETPROP( ) para establecer las propiedades de una vista antes de usarla, el valor
se almacenará en la base de datos y se usará automáticamente siempre que active la vista. Cuando la
vista está activa, puede utilizar CURSORSETPROP( ) para cambiar el valor de las propiedades de la
vista activa. El valor de las propiedades que establezca para una vista activa mediante
CURSORSETPROP( ) no se almacenará al cerrar la vista.
Actualizar múltiples tablas en una vista
Puede actualizar múltiples tablas base desde una vista. Cuando su vista combine dos o más tablas,
debe establecer las propiedades para asegurarse de que sólo sea actualizable el lado varios de la
consulta de la vista.
Las vistas se actualizan tabla por tabla. Debe asegurarse de que para cada tabla a la que se tiene
acceso en una vista, el conjunto de campos clave sea una clave única tanto para el conjunto resultante
de la vista como para la tabla base.
Para hacer actualizable una vista de múltiples tablas
l En el Diseñador de vistas, elija la ficha Criterios de actualización y seleccione las tablas y los
nombres de los campos que desea actualizar.
–O bien–
l Use la función DBSETPROP( ).
En la mayoría de los casos, los valores predeterminados proporcionados por Visual FoxPro preparan
una vista de múltiples tablas para que sea actualizable, aunque cree la vista mediante programación.
El ejemplo de código siguiente crea y establece explícitamente propiedades para actualizar una vista
de dos tablas. Puede usar este ejemplo como guía para personalizar las propiedades de actualización
de una vista.
Actualización de múltiples tablas en una vista
Código
CREATE SQL VIEW emp_cust_view AS ;
SELECT employee.emp_id, ;
employee.phone, customer.cust_id, ;
customer.emp_id, customer.contact, ;
customer.company ;
FROM employee, customer ;
WHERE employee.emp_id = customer.emp_id
DBSETPROP('emp_cust_view', 'View', 'Tables',
'employee, customer')
DBSETPROP('emp_cust_view.emp_id', 'Field', ; 'UpdateName', 'employee.emp_id'
DBSETPROP('emp_cust_view.phone', 'Field', ; 'UpdateName', 'employee.phone')

DBSETPROP('emp_cust_view.phone', 'Field', ; 'UpdateName', 'employee.phone')
DBSETPROP('emp_cust_view.cust_id', 'Field', ; 'UpdateName', 'customer.cust_id')
DBSETPROP('emp_cust_view.emp_id1', 'Field', ; 'UpdateName', 'customer.emp_id')
DBSETPROP('emp_cust_view.contact', 'Field', ; 'UpdateName', 'customer.contact')
DBSETPROP('emp_cust_view.company', 'Field', ; 'UpdateName', 'customer.
DBSETPROP('emp_cust_view.emp_id', 'Field', ; 'KeyField', .T.)
DBSETPROP('emp_cust_view.cust_id', 'Field', ;
'KeyField', .T.)
DBSETPROP('emp_cust_view.emp_id1', 'Field', ;
'KeyField', .T.)
DBSETPROP('emp_cust_view.phone', 'Field', ;
'UpdatableField', .T.)
DBSETPROP('emp_cust_view.contact', 'Field', ; 'UpdatableField', .T.)
DBSETPROP('emp_cust_view.company', 'Field', ; 'UpdatableField', .T.)
DBSETPROP('emp_cust_view', 'View', ;
'SendUpdates', .T.)
GO TOP
REPLACE employee.phone WITH "(206)111-2222"
REPLACE customer.contact WITH "John Doe"
TABLEUPDATE()
Personalizar vistas con el diccionario de datos
Como las vistas están almacenadas en una base de datos, puede crear:
l Títulos
l Comentarios para la vista y los campos de vista
l Valores predeterminados para campos de vista
l Reglas a nivel de campo y a nivel de fila para mensajes de error de regla
Las características del diccionario de datos para vistas son similares en su funcionamiento a sus
homólogos para tablas de base de datos. Sin embargo, se usa el lenguaje en lugar del Diseñador de
tablas para crear títulos, comentarios, valores predeterminados y reglas para vistas.
Crear valores predeterminados para campos de vista
De la misma manera que los valores predeterminados para campos de tabla, los valores
predeterminados de campo de vista se almacenan en la base de datos y están disponibles cada vez que
usa la vista. Visual FoxPro no compara los valores predeterminados que cree localmente con ningún
valor predeterminado establecido en el origen de datos remoto. Debe crear valores predeterminados

valor predeterminado establecido en el origen de datos remoto. Debe crear valores predeterminados
aceptables para el origen de datos.
Para asignar un valor predeterminado a un campo predeterminado
l En la ficha Campos del Diseñador de vistas, seleccione un campo y, a continuación, elija
Propiedades y escriba el valor predeterminado para el campo.
–O bien-
l Use la propiedad DefaultValue de la función DBSETPROP( ).
Por ejemplo, es posible quiera que su aplicación limite la cantidad de mercancías que un cliente
nuevo puede encargar hasta que haya tenido tiempo de terminar un cheque de crédito y de determinar
la cantidad de crédito que quiere conceder al cliente. El siguiente ejemplo crea un campo maxordamt
con un valor predeterminado de 1000:
USE VIEW customer_view
?DBSETPROP ('Customer_view.maxordamt', 'Field', 'DefaultValue', 1000)
También puede usar valores predeterminados para llenar automáticamente algunas filas para los
usuarios. Por ejemplo, puede agregar un control Grid para un formulario de entrada de pedidos
basado en una vista remota de una tabla de elementos de pedido. El campo order_id es el campo
clave que asigna cada fila de la cuadrícula a su homóloga de la tabla de elementos de pedido remota.
Como el Id. de pedido para cada fila de la cuadrícula será el mismo para un pedido, puede usar un
valor predeterminado para guardar las pulsaciones de teclas y llenar el campo order_id
automáticamente.
Sugerencia Si una de las reglas comerciales de su aplicación requiere que un campo contenga una
entrada, el hecho de proporcionar un valor predeterminado ayuda a asegurar que no se va a infringir
una regla concreta a nivel de campo o a nivel de registro.
Crear reglas en campos y filas de vista
Puede crear versiones locales de reglas de orígenes de datos remotos para:
l Reducir el tiempo de respuesta.
l Reducir el impacto en recursos de red.
l Probar datos antes de enviarlos al origen de datos remotos.
l Evitar el envío de datos defectuosos al origen de datos remotos.
Visual FoxPro no compara las reglas creadas localmente con reglas remotas. Debe crear reglas
aceptables para el origen de datos. Si las reglas remotas cambian, debe cambiar las reglas locales para
que se cumplan.
Para crear una regla en un campo o una fila de vista
l En la ficha Campos del Diseñador de vistas, seleccione un campo y, a continuación, elija
Propiedades y escriba la expresión de regla y el texto de mensaje para el campo.

Propiedades y escriba la expresión de regla y el texto de mensaje para el campo.
–O bien–
l Use las propiedades RuleExpression y RuleText de la función DBSETPROP( ).
Por ejemplo, el código siguiente crea una regla a nivel de campo en orditems_view que evita la
entrada de una cantidad inferior a 1:
USE VIEW orditems_view
DBSETPROP('Orditems_view.quantity','Field', ;
'RuleExpression', 'quantity >= 1')
DBSETPROP('Orditems_view.quantity','Field', ;
'RuleText', ;
'"Las cantidades deben ser mayores o iguales que 1"')
También puede usar la función DBSETPROP( ) para crear reglas a nivel de fila.
Combinar vistas
Puede generar una vista basada en otras vistas. Puede que quiera hacerlo si necesita un subconjunto
de la información disponible en varias vistas diferentes o si desea combinar datos locales y remotos
en una única vista. Una vista basada en otras vistas, o en una combinación de tablas locales y vistas
locales o remotas, se denomina una vista multicapa. La vista que combina otras vistas es la vista de
nivel superior. Puede tener múltiples niveles de vistas entre la vista de nivel superior y las tablas base
locales o remotas. Cuando utilice una vista multicapa, las vistas en las que se basa la vista de nivel
superior y cualquier tabla base de Visual FoxPro usada en vistas de nivel superior o intermedio se
mostrarán en la ventana Sesión de datos. Las tablas remotas no aparecen en la ventana Sesión de
datos.
Combinar datos locales y remotos en una vista
Puede combinar datos locales y remotos en una vista si crea una nueva vista local basada en una vista
local y una vista remota.
Para crear una vista que combina datos locales y remotos
l En el Administrador de proyectos, seleccione una base de datos, elija Vistas locales y, a
continuación, elija Nuevo para abrir el Diseñador de vistas. Agregue cualquier combinación de
tablas, vistas locales y vistas remotas a su vista.
–O bien-
l Use el comando CREATE SQL VIEW.
Por ejemplo, para crear una vista local que combine información de la tabla local Employee y la tabla
remota Orders, puede utilizar el código siguiente:
CREATE SQL VIEW remote_orders_view ;

CREATE SQL VIEW remote_orders_view ;
AS SELECT * FROM orders
CREATE SQL VIEW local_employee_remote_orders_view ;
AS SELECT * FROM testdata!local_employee_view, ;
testdata!remote_orders_view ;
WHERE local_employee_view.emp_id = ;
remote_orders_view.emp_id
Actualizar datos locales y remotos en una vista
Cuando actualice datos en una vista multicapa, las actualizaciones bajarán un nivel, hasta la vista en
que está basada la vista de nivel superior. Si desea actualizar las tablas base desde las que se
construye una vista multicapa, deberá ejecutar un comando TABLEUPDATE para cada vista de la
estructura.
Trabajar con datos fuera de línea
Hay veces en las que quiere mostrar, reunir o modificar datos independientemente de la base de datos
host. Con las características de la vista fuera de línea de Visual FoxPro, puede usar vistas para
conectarse a una base de datos host y crear un subconjunto de datos para trabajar fuera de línea.
Entonces, al trabajar fuera de línea podrá usar la vista directamente o mediante una aplicación que
cree. Cuando haya terminado, puede cargar las modificaciones almacenadas en la vista a la base de
datos host.
Algunos escenarios en los que son útiles las vistas fuera de línea son:
l Una situación de almacenamiento de datos, en la que se mantienen grandes bases de datos
centralizadas en servidores MIS. Si sólo está interesado en datos pertenecientes a, por ejemplo,
el departamento de Marketing, puede crear una vista que incluya sólo los datos que le
importen. Entonces puede usar los datos fuera de línea, permitir que varios usuarios del
departamento de Marketing actualicen los datos y después devolver los datos modificados a la
base de datos de origen.
l Una ubicación geográfica remota que requiere que lleve un subconjunto de datos en su portátil,
modificar los datos de forma independiente en la base de datos host y después actualizar la base
de datos con los datos modificados.
l Datos sensibles al tiempo. Por ejemplo, puede querer actualizar datos que reflejen los aumentos
de sueldo de los empleados antes de que se apliquen los nuevos sueldos.
Trabajar con vistas fuera de línea

Para crear y usar datos de vista fuera de línea, puede usar las siguientes características del lenguaje:
l La función CREATEOFFLINE( )
l El comando USE SQLNombreVista con las cláusulas ADMIN y ONLINE
l El comando TABLEUPDATE
l La función DROPOFFLINE( )
Si pretende usar la vista fuera de línea en un equipo distinto del utilizado para crear la vista fuera de
línea, debe preparar el destino fuera de línea creando una copia del archivo de base de datos host
(.dbc); asegúrese de que el origen de datos ODBC usado por la vista existe en el equipo de destino; y
analice los requisitos de datos para determinar el contenido de la vista que necesita.
Nota Use el programa Administrador ODBC para instalar orígenes de datos en un equipo. Puede
tener acceso al programa Administrador ODBC desde el grupo de programas Visual FoxPro o desde
el Panel de control.
Crear vistas fuera de línea
Como con los datos en línea, analice sus requisitos antes de crear vistas fuera de línea para determinar
el diseño de vistas que necesita en la base de datos fuera de línea. Cuando determine el subconjunto
de datos que desea usar fuera de línea, puede partir de una vista existente o crear una vista nueva. Si
ya existe una vista que devuelve los registros que quiere usar fuera de línea, puede usarla, o puede
crear una vista mediante programación. La vista que usa fuera de línea se almacena en un archivo .dbf
en el contenedor de base de datos.
Nota Si pretende modificar datos en una vista fuera de línea, asegúrese de hacer la vista actualizable
antes de usarla fuera de línea. Cuando una vista está fuera de línea sólo puede establecer sus
propiedades de actualización a través de programación; no puede modificar una vista fuera de línea
en el Diseñador de vistas.
Para usar una vista existente fuera de línea
l Use la función CREATEOFFLINE( ) y el nombre de la vista.
Por ejemplo, si quiere ir a sitios cliente para actualizar cuentas, agregar clientes y registrar nuevas
ventas, necesita la información de los clientes así como los pedidos actuales y las descripciones de
productos en pantalla. Puede tener una vista llamada customerinfo que combine información de la
tabla Customers, la tabla Orders y la tabla OrderItems. Para crear la vista, use este código:
CREATEOFFLINE("customerinfo")

Para crear una vista fuera de línea mediante programación
l Use el comando CREATE SQL VIEW, seguido por el comando CREATEOFFLINE( ).
Por ejemplo, el código siguiente crea una vista que muestra datos de la tabla Products y la tabla
Inventory desde la base de datos en línea. Como no se especifica ningún criterio de actualización,
esta vista es de sólo lectura.
CREATE SQL VIEW showproducts ;
CONNECTION dsource ;
AS SELECT * FROM Products INNER JOIN Inventory ;
ON Products.ProductID = Inventory.ProductID ;
CREATEOFFLINE("showproducts")
Mostrar y modificar datos fuera de línea
Después de crear la vista para sus datos fuera de línea, puede usarla como cualquier vista de su
aplicación: puede agregar, cambiar y eliminar registros. Múltiples usuarios pueden tener acceso a la
vista fuera de línea simultáneamente usando la misma base de datos en modo compartido. Si decide
no conservar las modificaciones, puede revertir la información para que refleje la información
original.
Usar datos fuera de línea
Si usa los datos fuera de línea, puede mostrar y actualizar datos de la misma forma que lo hace en
línea con los mismos formularios, informes o aplicaciones. Por ejemplo, el código siguiente abre la
vista Showproducts:
USE Showproducts
Sugerencia Si no obtiene el subconjunto de datos que esperaba, compruebe la configuración de
optimización para la vista remota. Si establece la propiedad MaxRecords mediante la función
DBSETPROP( ), sólo aparece ese número de registros en las vistas fuera de línea. Sin embargo, si
incluye un campo Memo en la lista de campos de la vista, se incluye automáticamente en el conjunto

incluye un campo Memo en la lista de campos de la vista, se incluye automáticamente en el conjunto
de resultados incluso si FetchMemo está establecido como falso (.F.).
Administrar datos fuera de línea
En algunos casos (especialmente en un entorno de múltiples usuarios en el que muchas personas
modifican los datos) puede querer examinar las modificaciones realizadas a la vista fuera de línea
antes de introducir las modificaciones en la base de datos de origen. Con el comando USE y la
cláusula ADMIN, puede ver todas las modificaciones que se han introducido en una vista desde que
se usó fuera de línea. Entonces puede revertir de forma selectiva las modificaciones que se hayan
realizado sin estar conectado al origen de datos. Por ejemplo, el código siguiente abre la vista
Showproducts en modo administrador:
USE Showproducts ADMIN
Actualizar datos en línea
Después de terminar de trabajar fuera de línea, puede actualizar los datos en el servidor usando las
mismas transacciones de actualización de tabla que utiliza normalmente con los datos en línea. Al
trabajar con datos remotos, recuerde las sugerencias siguientes:
l Para actualizaciones de registros individuales, use transacciones automáticas.
l Para actualizaciones de proceso por lotes, use transacciones manuales.
l Si es necesario, incluya código para detectar conflictos, cree un registro de conflictos y
resuélvalos.
Antes de poder procesar sus actualizaciones, tiene que usar el comando USE y la palabra clave
ONLINE para volver a conectarse a la base de datos host. Después de ejecutar el comando, Visual
FoxPro intenta localizar la base de datos host con la información de origen de datos almacenada en la
vista. Cuando la conexión está establecida, puede usar TABLEUPATE( ) para procesar las
actualizaciones almacenadas en los datos fuera de línea.
Para asegurarse de que la información de conexión es correcta independientemente de la ubicación
del host y las tablas de vista, tiene que usar sintaxis de cadena de conexión en lugar de una conexión
con nombre.
Actualizar lotes de registros en tablas locales
Para procesar un lote de cambios en tablas locales, puede usar transacciones manuales que le
permiten procesar el lote de cambios en una única transacción en lugar de una serie de transacciones
independientes.
Actualización de tablas locales con vistas fuera de línea
Código Coment
USE myofflineview ONLINE EXCLUSIVE Volver a conectarse
abrir la vista

BEGIN TRANSACTION
IF TABLEUPDATE (2, .F., "myofflineview")
END TRANSACTION
ELSE
MESSAGEBOX("Ha ocurrido un error: La actualización no ha tenido éxito")
ROLLBACK
ENDIF
Comprobar si hay c
actualización y actu
apropiado.
Actualizar lotes de registros en tablas remotas
Para procesar un lote de cambios en tablas remotas, use transacciones manuales: empiece con
TABLEUPDATE( ) y termine el procesamiento con SQLCOMMIT( ) o SQLROLLBACK( )..
Para establecer la conexión para administrar sus transacciones manualmente, tiene que usar
CURSORGETPROP( ) en el cursor de la vista para obtener el controlador de conexión y, a
continuación, establecer la propiedad Transactions a modo manual.
En el código siguiente, la identificación de conexión actual para la vista, myview, se almacena en
hConn1. hConn1 se usa para establecer la propiedad Transactions a "2" para transacciones manuales.
hConn1 = CURSORGETPROP("CONNECTHANDLE","myview") ;
SQLSETPROP(hConn1,"TRANSACTIONS",2)
Después de establecer la conexión para controlar las actualizaciones, puede usar TABLEUPDATE( )
para controlar sus transacciones.
Si las tablas host residen en un servidor remoto, como SQL Server, puede usar el siguiente código
como directiva.
Actualización de tablas remotas con vistas fuera de línea
Código Comentario
USE myofflineview ONLINE EXCLUSIVE Volver a conectarse al h
abrir la vista.
SQLSetProp(liviewhandle,"transacciones",2)
SQLSetProp(custviewhandle,"transacciones",2)
SQLSetProp(ordviewhandle,"transacciones",2)
Establecer las conexion
las vistas para controlar
manualmente la transac
IF NOT TABLEUPDATE(.T.,.F.,"lineitemsview")
=SQLROLLBACK(ordviewhandle)
=MESSAGEBOX("No se puede actualizar la tabla de elementos de línea")
IF NOT TableUpdate(.T.,.F.,"ordersview")
=SQLROLLBACK(liviewhandle)
=MESSAGEBOX("No se puede actualizar la tabla de pedidos")
IF NOT TABLEUPDATE(.T.,.F.,"customerview")
=SQLROLLBACK(custviewhandle)
=MESSAGEBOX("No se puede actualizar la tabla de clientes")
Else *# comprobar escenarios de error
IF NOT SQLCOMMIT(liviewhandle)
Controlar actualizacion
conflictos de actualizac

IF NOT SQLCOMMIT(ordviewhandle)
=SQLROLLBACK(ordviewhandle)
IF NOT SQLCOMMIT(custviewhandle)
=SQLROLLBACK(custviewhandle)
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
Actualizar un registro
Si va a actualizar una única fila, puede usar transacciones automáticas. Como cada instrucción para
procesar una actualización, eliminación o inserción se controla como una transacción independiente,
no puede deshacer instrucciones de transacciones anteriores.
USE customerview ONLINE EXCLUSIVE
GO TO 3
IF TABLEUPDATE (0, .F. workarea)
* conflicto controlando el código
ENDIF
Sugerencia Para actualizar un único registro en una tabla local, use la función
GETNEXTMODIFIED().
Cancelar actualizaciones fuera de línea
Si decide que quiere eliminar los datos fuera de línea y convertir la vista en una vista en línea, puede
usar la función DROPOFFLINE( ).
Para cancelar actualizaciones fuera de línea
l Use DROPOFFLINE( ) con el nombre de la vista.
Asegúrese de comprobar los valores devueltos. Verdadero (.T.) indica que se ha conseguido y falso
(.F.) indica que la vista no se ha cerrado antes de ejecutar el comando.
El código siguiente pasa por alto todas las modificaciones realizadas al subconjunto de datos de
myview. La vista sigue formando parte de la base de datos, pero se ignora el conjunto de datos actual.
DROPOFFLINE("myview")
Puede eliminar registros fuera de línea, pero no puede usar los comandos PACK, ZAP o INSERT con
una vista fuera de línea.
Optimizar el rendimiento de una vista
Puede optimizar el rendimiento de sus vistas estableciendo sus propiedades.

Controlar el tamaño de búsqueda de la búsqueda progresiva
Puede controlar el número de filas que Visual FoxPro busca progresivamente en el origen de datos
remoto mediante la propiedad FetchSize de la vista y del cursor activo. Utilice DBSETPROP( ) y
CURSORSETPROP( ) para establecer estas propiedades.
Controlar la búsqueda memo
Puede utilizar la característica de búsqueda diferida de memo de Visual FoxPro para acelerar la
recuperación de los datos de la vista. Cuando elija esta característica, Visual FoxPro no recuperará el
contenido de un campo Memo hasta que usted no abra y muestre el campo. Como Visual FoxPro
necesita el campo clave y el nombre de la tabla para encontrar una fila en el origen de datos remoto,
debe establecer la propiedad UpdateName o UpdateFieldList, la propiedad KeyField o KeyFieldList y
la propiedad Tables para que la búsqueda diferida de memo funcione. No obstante, no tiene que
establecer las propiedades SendUpdates o Updatable para que la búsqueda memo funcione.
Establecer el número máximo de registros que se descargarán
Puede controlar la cantidad de datos que se descargan al abrir una vista si establece la propiedad
MaxRecords. Cuando Visual FoxPro envía una instrucción SQL al origen de datos para crear una
vista, el origen de datos genera y almacena un conjunto resultante. La propiedad MaxRecords
especifica el número máximo de filas que se buscan del conjunto resultante remoto para la vista. El
valor predeterminado es –1, que descarga todas las filas en el conjunto resultante.
Para controlar el número de filas que se descargan en una vista
l Elija Opciones en el menú Herramientas y seleccione la ficha Datos remotos. En el área
Opciones predeterminadas de vista remota, junto a Máximo de registros para buscar,
desactive Todos, introduzca un valor en el cuadro de texto y elija Aceptar.
-O bien–
l Use la propiedad MaxRecords de las funciones DBSETPROP( ) o CURSORSETPROP( ).
Por ejemplo, el código siguiente modifica la definición de la vista para limitar a 50 el número de filas
descargadas en la vista, independientemente del tamaño del conjunto resultante generado en el origen
de datos remoto:
USE VIEW remote_customer_view
?DBSETPROP ('Remote_customer_view', ; 'View','MaxRecords', 50)
Puede utilizar la función CURSORSETPROP( ) para establecer el límite de MaxRecords para una
vista activa.
Sugerencia No puede usar la propiedad MaxRecords para detener una consulta en ejecución, ya que
la propiedad MaxRecords no controla la creación del conjunto resultante. Use la propiedad
QueryTimeOut para controlar el tiempo de ejecución en el origen de datos remoto.
Optimizar filtros y combinaciones

Optimizar filtros y combinaciones
Para tomar decisiones de optimización para una vista o una consulta, es posible que tenga que
conocer el plan de ejecución: el orden en que se evalúan las cláusulas de combinaciones y filtros. Con
la función SYS(3054), puede mostrar uno de los tres niveles de optimización Rushmore. Los tres
niveles indican el grado en que las condiciones de filtro o las condiciones de combinación pudieron
utilizar la optimización Rushmore. Los niveles son completamente (Full), parcialmente (Partial) o
nada (None).
Para mostrar el plan de ejecución para filtros
1. En la ventana Comandos, escriba SYS(3054,1) para activar SQL ShowPlan.
2. Escriba la instrucción SQL SELECT.
Por ejemplo, puede escribir:
SELECT * FROM customer, orders ;
AND Upper(country) = "Méjico"
3. Lea el plan de ejecución que aparece en pantalla.
Para este ejemplo, la pantalla podría tener esta apariencia:
Using Index Tag Country to optimize table customer
Rushmore Optimization Level for table customer: Full
Rushmore Optimization level for table orders: none
4. En la ventana Comandos, escriba SYS(3054,0) para desactivar SQL ShowPlan.
Entonces puede pasar 11 a la función SYS para evaluar combinaciones en las cláusulas FROM o
WHERE.
Para mostrar el plan de ejecución para combinaciones
1. En la ventana Comandos, escriba SYS(3054,11) para activar SQL ShowPlan.
2. Escriba su instrucción SQL SELECT.
Por ejemplo, puede escribir:
SELECT * ;
FROM customer INNER JOIN orders ;
ON customer.cust_id = orders.cust_id ;
WHERE Upper(country) = "Méjico"
3. Lea el plan de ejecución que aparece en pantalla.
Para este ejemplo, la pantalla puede tener la siguiente apariencia:

Rushmore Optimization Level for table customer: Full
Rushmore Optimization level for table orders: none
Joining table customer and table orders using Cust_id
4. En la ventana Comandos, escriba SYS(3054,0) para desactivar SQL ShowPlan.
Controlar la evaluación de combinaciones
Si el plan de ejecución para sus combinaciones no satisface sus necesidades específicas, puede hacer
que el orden de combinación se ejecute exactamente como está escrito sin optimización del
procesador. Para forzar el orden de evaluación de la combinación, debe agregar la palabra clave
FORCE y colocar sus condiciones de combinación en la cláusula FROM. Las condiciones de
combinación que se colocan dentro de una cláusula WHERE no se incluyen en una evaluación de
combinación forzada.
Nota No puede usar la palabra clave FORCE en instrucciones de paso a través SQL ni en vistas
remotas porque la palabra clave es una extensión de Visual FoxPro del estándar ANSI y no está
admitida en otros diccionarios SQL.
La cláusula FORCE es global, por lo que se aplica a todas las tablas de la cláusula JOIN. Asegúrese
de que el orden en el que aparecen las tablas de combinación es exactamente el orden en el que se
deben combinar. También puede usar los paréntesis para controlar el orden de evaluación de
combinaciones.
En este ejemplo, la primera combinación especificada también es la primera combinación evaluada.
La tabla Customer se combina con la tabla Orders en primer lugar. El resultado de la combinación se
combina entonces con la tabla OrdItems:
SELECT * ;
FROM FORCE Customers ;
INNER JOIN Orders ;
ON Orders.Company_ID = Customers.Company_ID ;
INNER JOIN OrItems;
ON OrdItems.Order_NO = Orders.Order_NO
En el ejemplo, la combinación entre paréntesis para la tabla Orders y OrdItems se evalúa primero. El
resultado de la combinación se utiliza en la evaluación de la combinación con Customers:
SELECT * ;
FROM FORCE Customers ;
INNER JOIN (orders INNER JOIN OrdItems ;
ON OrdItems.Order_No = Orders.Order_No) ;
ON Orders.Company_ID = Customers.Company_ID
Conexiones compartidas para múltiples vistas remotas
Puede utilizar una conexión activa como canal de información para múltiples vistas remotas si
comparte una conexión. Cuando comparte una conexión activa, usted:
l Reduce el número de conexiones de un servidor remoto.
l Reduce los costes por conexiones a servidores que se cobran por conexión.

Para compartir conexiones establece la definición de la vista para utilizar una conexión compartida al
activarse. Cuando se utiliza la vista, Visual FoxPro se conecta al origen de datos remoto con la
conexión compartida existente (en caso de que haya alguna). Si no hay ninguna conexión compartida
en uso, Visual FoxPro creará una conexión exclusiva cuando se abra la vista, que puede compartirse
con otras vistas.
Sólo una instancia activa de una definición de conexión con nombre se comparte durante una sesión
de Visual FoxPro. Si hay varias instancias activas de la misma definición de conexión, la primera de
ellas que se use como conexión compartida se convertirá en la conexión compartida designada. Todas
las vistas que utilicen esa definición de conexión y empleen conexiones compartidas tendrán acceso
al servidor remoto a través de la conexión compartida designada.
No se compartirán otras conexiones distintas de la conexión compartida designada. El uso
compartido de conexiones no está ligado a las sesiones.
Para compartir una conexión
l Elija Opciones en el menú Herramientas. Elija la ficha Datos remotos; active la casilla de
verificación Compartir conexión en el área Opciones predeterminadas de vista remota y
elija Aceptar.
–O bien–
l Use el Diseñador de vistas.
–O bien–
l Use el comando CREATE SQL VIEW con la cláusula SHARE.
El código siguiente crea una vista que, cuando se activa con el comando USE, comparte una
conexión:
CREATE SQL VIEW product_view_remote ;
CONNECTION remote_01 SHARE AS ;
SELECT * FROM products
USE product_view_remote
Comprobar si una conexión está ocupada
Cuando una conexión está ocupada, como ocurre cuando Visual FoxPro busca datos de forma
progresiva en un cursor, no querrá comenzar otra búsqueda o enviar actualizaciones por la misma
conexión. Puede determinar si una conexión está ocupada mediante la propiedad ConnectBusy, que
devuelve un valor verdadero (.T.) si la conexión está ocupada. Puede utilizar esta propiedad en su
aplicación para comprobar si la conexión está ocupada o no antes de enviar una solicitud a un origen
de datos remoto a través de una conexión compartida.
Para determinar si una conexión está ocupada
Use la propiedad ConnectBusy de la función SQLGETPROP( ).

l Use la propiedad ConnectBusy de la función SQLGETPROP( ).
Necesita el controlador de la conexión para utilizar la función SQLGETPROP( ). Puede identificar el
controlador de la conexión para una vista activa mediante la propiedad ConnectHandle de la función
CURSORGETPROP( ). El código siguiente identifica un controlador de conexión y lo utiliza para
comprobar si la conexión está ocupada:
nConnectionHandle=CURSORGETPROP('ConnectHandle')
SQLGETPROP(nConnectionHandle, "ConnectBusy")

Manual del programador fox pro

Más contenido relacionado

Similar a Manual del programador fox pro (20)

Más de hmosquera (20)

Último (20)

Manual del programador fox pro