INSTITUTO SUPERIOR TECNOLGICO

NORBERT WIENER

Manual del Alumno

ASIGNATURA: Lenguaje de
Programacin III (Visual Fox
Pro)
PROGRAMA: S3C

Manual del Alumno

Lima-Per

II Diseo del Repositorio de Datos en Visual Foxpro

CREACION DE LA BASE DE DATOS

1. Ubiquese en el folder Data y luego en Databases y presione el botn New

La ventana del Database Designer aparecer :

Puede ocupar el toolbar Database Designer para el control de la Base de Datos.

Manual del Alumno

Descripcin de los botones del toolbar:

Crear una nueva tabla.

Agregar una tabla existente

Eliminar una tabla seleccionada

Modificar una tabla seleccionada

Creacin de Vistas remotas

Creacin de Vistas locales

Editar Procedimientos almacenados en la Base de Datos

Creacin de Conexiones con vistas remotas

Examinar el contenido la tabla (BROWSE)

Manual del Alumno

Crear una nueva tabla:

1. Click en el boton de Nueva tabla, aparecera la ventana New Table

2. Se selecciona New Table, luego aparece la ventana de guardar el archivo,

seleccione el directorio y el nombre de la tabla y luego presione el boton de salvar.

Manual del Alumno

La ventana de Table designer aparecera en pantalla:
Esta es la parte mas importante de la tabla, es aqu donde se define la estructura de
datos que contendr dicha tabla. El primer paso es definir los campos, tipos, tamao,
Formato y Reglas de validacin en el foder de Fields.
Tipos de Datos

Definicin de campos

Definicin del Formato de Entrada

Definicin de reglas de validacin de l

a. Definicin de campos:
Igual que en las versiones anteriores, la definicin de campos es igual. Se introduce el
nombre del campo (name) el tipo de datos que soportar (Type) y el tamao.

Manual del Alumno

b. Definicin del Display
Format : Es el formato de salida del campo, ejemplo si fuera nmerico 9,999.99 o si
fuera carcter !!!!!!!!!!!!, para que solo acepte mayusculas
Input mask : Igual que el Format, lo nico que es para la entrada de datos.
Captin : Descripcin mas precisa del campo, es de utilidad al disear los
Formularios.
c. Definicin de reglas de validacin a nivel de campo
La validacin son triggers o eventos que se ejecutan a nivel de campo. Ejemplo: una
validacin de un campo que solo acepte nmeros positivos. (id > 0)
Rule : Es la regla de validacin, ejemplo: id > 0, si queremos que acepte valores
positivos.
Message: Es el mensaje personalizado que queremos que aparezca en pantalla a la
hora de violarse la regla de validacin del campo. Ejemplo : Solo se aceptan nmeros
positivos (nota: el texto debe escribirse entre comillas).
Default Value : Valor por defecto del campo. (nota: hay que respetar el tipo de dato del
Campo)
Luego de hacer la deficion de los campos, pasamos a la definicion de Indices de la
tabla, que ser muy importante a la hora de crear las relaciones entre las tablas.

Tipo de Indice
Nombre del o los campos que componen el indice

Nombre del ndice

Manual del Alumno

a. Nombre del Indice (name)
Introducir el Nombre del archivo ndice. Es conocido tambin como TAG.
b. Type ( tipo de Indice)
Primary : Llave primaria.
Candidate : Llave candidata
Unique
: Llave nica.
Regular : Llave fornea.
c. Nombre de la Expresin
Nombre de los campos que conforman la llave primaria:
Ejemplo : id, o si son varios campos : id + linea
Nota: si los campos no son del mismo hay que forzarlos al tipo de dato deseado,
ejemplo: si id es carcter y linea, entoces el nombre de la expresion sera:
Id + STR(linea)
STR() convierte de nmero a carcter y VAL() convierte de carcter a nmerico.

Despus de detallar los ndices, se define los eventos de La validacin a nivel de

registro y los eventos que se ejecuten a la hora de Insertar un registro, de actualizar o
borrar.

Manual del Alumno

Ejercicio Prctico:
Cree la siguiente base de datos con el nombre de scott.

RELACIONES ENTRE TABLAS:

Manual del Alumno

Las relaciones mas comunes entre tablas se definen :
De uno a uno : Ejemplo de una llave primaria a otra llave primaria
De uno a muchos : Ejemplo de una llave primaria a una Regular o Fornea.

Las relaciones entre tablas se crean arrastrando la llave de la tabla a la llave de otra
tabla.

Relacin entre tablas

(de uno a muchos)

La figura muestra una relacin entre las tablas regin y departamento, la relacin
se leera as : Una regin tiene muchos departamentos.

Manual del Alumno

Generacin de integridad referencial
Reglas que rigen la coherencia de datos, especficamente las relaciones entre las
claves principal y externa de claves de tablas distintas. Visual Foxpro Resuelve la
Integridad Referencial mediante reglas a nivel de campo y a nivel de registro
definidas por el usuario. El Generador de la Integridad Referencial le ayuda a
definir reglas para controlar cmo se insertan actualizan o eliminan registros de
tablas relacionadas.
Desencadenante: cdigo de evento a nivel de registro que se ejecuta despues de
una insercin, una actualizacin o una eliminacin. Se ocupan para integridad
entre las tablas.
El establecimiento de la integridad referencial implica la creacin 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:
Agregar registros a una tabla relacionada cuando no haya ningn registro
asociado en la tabla primaria.
Cambiar valores de una tabla primaria cuando tales cambios supongan dejar
registros hurfanos en una tabla relacionada.
Eliminar registros de una tabla primaria 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 permite determinar los tipos de reglas
que desea exigir, las tablas a las que desea exigirlas y los eventos del sistema que
harn que Visual FoxPro las compruebe.
El Generador de IR trata mltiples 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 Diseador de bases de datos.
2 En el men Base de datos, elija Editar 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 cdigo generado para exigir las reglas de integridad
referencial como desencadenantes que hacen referencia a procedimientos
almacenados. Para ver este cdigo puede abrir el editor de texto de
procedimientos almacenados en la base de datos. Si desea informacin sobre la
forma de crear desencadenantes por programa, consulte Uso de desencadenantes
en el captulo 7, Trabajo con tablas.
Precaucin Cuando haga cambios en el diseo de una base de datos, como
modificaciones en sus tablas o alteraciones en los ndices utilizados en una
relacin persistente, debe volver a ejecutar el Generador de IR antes de utilizar de

Manual del Alumno

nuevo la base de datos. De esta forma se revisarn el cdigo de procedimiento
almacenado y los desencadenantes utilizados para exigir la integridad referencial,
de forma que reflejen el nuevo diseo. Si no vuelve a ejecutar el Generador de RI,
puede que obtenga resultados inesperados, ya que no se habrn actualizado los
procedimientos almacenados y los desencadenantes para ajustarlos a las
modificaciones.

El Generador IR se muestra cuando:

Hace doble clic en una lnea de relacin entre dos tablas del Diseador de bases de
datos y elige el botn Integridad Referencial en el cuadro de dilogo Editar relacin.
Elige Integridad referencial en el men contextual del Diseador de bases de datos.
Elige Editar integridad referencial en el men Base de datos.

Fichas del generador

Reglas para la actualizacin Especifica reglas para aplicar cuando se modifica el valor
clave de la tabla primaria.
Reglas para la eliminacin Especifica las reglas que se aplican cuando se elimina un
registro de la tabla primaria.
Reglas para insertar Especifica las reglas que se aplican cuando se inserta un nuevo
registro o cuando se actualiza un registro existente en la tabla secundaria.

Manual del Alumno

VISTAS LOCALES:
Qu es una vista?
Una vista es un objeto que se crea empleando la instruccin SELECT de SQL para
bases de datos relacionales. Las vistas pueden ser locales o Remotas
SELECT
FROM
WHERE
GROUP
ORDER

campos
tablas
condicion
BY campos de agrupamiento
BY campos de ordenamiento

Ejemplo:
SELECT
FROM
ORDER

id, name
s_region
BY name

Creacin de una vista local.

Clic en el botn para crear vistas locales.

Agregar una tabla

Eliminar
tabla

Agregar una relacin

Ver el comando SQL

La ventana para agregar las tablas, se utiliza para aadir tablas que se van a ocupar
en la instruccin SELECT SQL, en este caso estaramos seleccionando la parte del
FROM. Seleccionemos s_region y luego Agregar. La tabla se agregar, luego le
damos cerrar (close).

Ventana de creacin de la vista:

Manual del Alumno

Fields: (Campos) Aqu se seleccionan los campos de la vista (SELECT campos)

Join : Relaciones entre tablas
Filter : Condicin de filtrado (WHERE condicin)
Order by : campos de ordenamiento (ORDER BY)
Group by : campos de Agrupamiento (GROUP BY)

CREACION DE VISTAS REMOTAS:

Una vista remota es una vista que se hace de otra base de datos va ODBC. Esta base
de datos puede ser Access, ORACLE, SQL-SERVER, entre otros.
Crear una vista remota:

Manual del Alumno

Clic en icono para crear vista remotas.

Escoger Nueva Vista (New View)

Si no a creado una conexin es necesario crear en New, si ya esta creada seleccione

la conexin y luego OK.
Como crear una conexin?
Si no ha creado la conexin seleccione New

Manual del Alumno

Siga estos pasos cuidadosamente:

1. Seleccione New Data Source (Nueva Fuente de Datos) y aparecer la
configuracin del ODBC:

2. En el folder User DSN Presione el botn Add (Agregar)

Manual del Alumno

3. Escoja de la ventana el Controlador deseado, Ejemplo: Microsoft Access Driver

(*.mdb) y luego el botn Finalizar.

4. Luego aparece la Ventana de ODBC del controlador que selecciono (En este caso
en de Access)
Escriba el nombre del Data Source (Fuente de datos), Luego seleccione la Base de
Dato a la que hace referencia ( en el boton Select Database)

Manual del Alumno

Luego de haber seleccionado la base de datos, acepte todas las ventanas que
aparecieron anteriormente y detengase en la siguiente ventana:

Seleccin de la lista el Data Source que ha

creado

Luego seleccione de la lista de data source el data source que usted acaba de crear.
Luego presione Aceptar (OK).
Despus le aparece la primera Ventana donde escoge las conexiones, le aparecer la
conexin que usted ha creado.
Nota: Esta conexin que usted a creado servir para sesiones futuras.

Manual del Alumno

Seleccione la conexin creada y luego Aceptar (OK)

Luego le aparecer la ventana donde usted escoge las tablas que utilizar:

Luego aparecer la ventana donde se disea la vista:

Manual del Alumno

El procedimiento para crear la vista es igual a la creacin de vista Locales.

Consultas a la BD usando SELECT-SQL

SELECT - SQL

usando dos o mas tablas:

Manual del Alumno

Sintaxis :
SELECT
FROM
WHERE

alias1.campo1
,alias2.campo2
,alias3.campo3
tabla1 alias1
,tabla2 alias2
,tabla3 alias3
alias1.campo1 = alias2.campo2
alias1.campo2 = alias2.campo3

Ejemplo :
Un ejemplo sencillo: si queremos listar el nombre del empleado, el id del
departamento, y el nombre del departamento al que pertenece el empleado
la query sera:
SELECT
FROM
WHERE

A.nombre
AS empleado
,A.dept_id
,B.nombre
AS depto
s_emp A
,s_dept B
A.id = B.region_id

Manual del Alumno

Ejercicios :
Seleccionar el No. depto, apellido, salario y cargo para los empleados que
ganen mas de 100 y el departamento este en 41, 10 y 50
select dept_id
,nombre
,salario
,cargo
from
s_emp
where salario > 100
and
dept_id IN (41,10,50)

seleccionar el apellido, del empleado, id del depto, y el nombre del depto.

select
from
where

a.nombre
AS empleado
,b.id
,b.nombre
AS depto
s_emp a
,s_dept b
a.id = b.dept_id

Seleccionar el apellido del empleado, no del depto, el nombre deldepto para los depto
que esten entre 20 y 50 sin incluirlos.
select a.nombre
AS empleado,
b.id,
b.nombre
AS depto
from
s_emp a, s_dept b
where a.id = b.dept_id
and
b.id > 20 and b.id < 50
seleccionar el nombre del empleado no. del depto, nombre del depto, para los deptos
que comiencen con 4 y ordenados el numero de depto y nombre del empleado desc
select a.nombre
AS empleado,
b.id,
b.nombre
AS depto
from
s_emp a,
s_dept b
where a.id=b.dept_id
and
ALLTRIM(STR(b.id)) like '4%'
order by a.nombre asc,
b.id

Manual del Alumno

Seleccionar el nombre del cliente para aquellos empleados que el no del depto sean
30, 40, 41, 42 y el ( salario sea mayor que 1000 o el depto sea 50 )
select a.nombre
AS cliente,
b.nombre
AS empleado,
b.salario,
b.id,
b.dept_id
from
s_customer a,
s_emp b
where a.emp_id=b.id
and
b.dept_id IN (30,40,41,42)
and
(b.salario > 1000 or b.dept_id='50')
Otra soluccion:
select a.nombre
from
s_customer a
where a.emp_id IN (Select id
from s_emp
where dept_id in (30, 40,41,42)
and (salario > 1000 or dept_id=50 )
Seleccionar el nombre del cliente, nombre de region y el salario para todos los
empleados que el salario sean mayor que 100
select a.nombre
AS empleado,
b.nombre
AS depto,
a.salario
from
s_emp a,
s_dept b
where a.dept_id=b.id
and
a.salario > 100

Funciones de grupos
salarios minimos y maximos de los empleados
select max(salario) sal_max,
min(salario) sal_min
from
s_emp

Manual del Alumno

Suma, maximo, minimo salario por Departamento
select dept_id,
sum(salario),
max(salario),
min(salario)
from
s_emp
group by dept_id
*---

select dept_id,
count(dept_id)
from
s_emp
group by dept_id
having dept_id > 20
*---

select dept_id,
sum(salario)
from
s_emp
group by dept_id
having sum(salario) between 2000 and 4000
*---

select avg(salario),
min(salario),
max(salario),
sum(salario)
from
s_emp
where UPPER(title) like 'SALES%'
*---

select count(nombre),
dept_id
from
s_emp
where dept_id=31
group by dept_id

SELECT COUNT(ID),
DEPT_ID
FROM
S_EMP
GROUP BY DEPT_ID

SELECT COUNT(ID),
CREDIT_RATING

Manual del Alumno

FROM
GROUP

S_CUSTOMER
BY CREDIT_RATING

*----

SELECT
FROM
WHERE
GROUP

SUM(SALARIO), CARGO
S_EMP
upper(TITLE) NOT LIKE 'VP%'
BY CARGO

*----

SELECT SUM(SALARIO), TITLE

FROM S_EMP
GROUP BY TITLE
*----

SELECT
FROM
WHERE
GROUP
HAVING
*----

TITLE, SUM(SALARIO)
S_EMP
UPPER(TITLE) NOT LIKE 'VP%'
BY TITLE
SUM(SALARIO)> 5000

Manual del Alumno

Programacin Multiusuario:
En la programacin multiusuario hay que tener muy en cuenta el control de la
zona critica. En Visual Foxpro, esto se puede hacer Automaticamente o
Manualmente.
En la forma Automtica, Fox controla la zona critica con los enllavamientos
automticos, lo que nos ahorra tiempo ya que no tenemos que preocuparnos
por ello. ( esta es la forma que utilizaremos )
Qu se requiere?
Se requiere algunas definir variables de ambiente en el programa principal de
nuestro Sistema:
* Definicion de para Ambiente Red
SET EXCLUSIVE OFF
SET MULTILOCKS ON
SET DELETE ON
SET REFRESH TO 5

Abre las tablas en modo compartido

Para que se puedan bloquear mas de un registro
Para que los registros marcados no se vizualicen
Refrescamiento cada 5 segundos en el Browse

SET REPROCESS TO AUTOMATIC

Si un registro esta bloqueado o enllavado

Fox intenta acualizarlo hasta que uno

presione
esc

*SET REPROCESS TO 5 SECONDS

Si despues de 5 segundos no puede

actualizarlo
Fox manda un error.

* Otro Ambiente
SET ECHO OFF
SET TALK OFF
SET CENTURY ON
SET CLOCK STATUS
SET DATE BRIT
SET PATH TO menu,forms,bmp,prg,data
SET SAFETY OFF
SET PROCEDURE TO .\prg\utility

Manual del Alumno

Usando el Buffer con las tablas.

Buffer Optimista: Dos usuarios pueden estar modificando el registro sin ningn
problema.
Pesimista : Solo un usuario puede estar modificando el registro.

Cmo fijar el Buffer?

* Set buffering mode and store logical result
lSuccess = CURSORSETPROP("Buffering", 5, "customer")
IF lSuccess = .T.
=MESSAGEBOX("Operation successful!",0,"Operation Status")
ELSE
=MESSAGEBOX("Operation NOT successful!",0,"Operation Status")
ENDIF

Tipos de Buffer
1 No utilizar el buffer
2 Pessimistic row buffering on.
3 Optimistic row buffering on.
4 Pessimistic table buffering on.
5 Optimistic table buffering on.

Con el buffer activado podemos hacer uso de los comandos :

TABLEREVERT(.T.)
TABLEUPDATE(.T.)

Manual del Alumno

TABLEUPDATE(.T.)
Graba los cambios hechos en la tabla.
SET MULTILOCKS ON && Must be on for table buffering
= CURSORSETPROP('Buffering', 5, 'employee' )
&& Enable table
buffering
INSERT INTO employee (cLastName) VALUES ('Smith')
CLEAR
? 'Original cLastName value: '
?? cLastName && Displays current cLastName value (Smith)
REPLACE cLastName WITH 'Jones'
? 'New cLastName value: '
?? cLastName && Displays new cLastName value (Jones)
= TABLEUPDATE(.T.)

&& Commits changes

? 'Updated cLastName value: '

?? cLastName && Displays current cLastName value (Jones)

TABLEREVERT(.t.)
Cancela los cambios hechos a la tabla
USE Customer
&& Open customer table
= CURSORSETPROP('Buffering', 5, 'customer')
buffering

&& Enable table

CLEAR
Generador
de Formularios
y Controles ms comunes
? 'Original cust_id
value:
'
?? cust_id && Displays current cust_id value
REPLACE cust_id WITH '***' && Changes field contents
? 'New cust_id value: '
?? cust_id && Displays new cust_id value
= TABLEREVERT(.T.) && Discard all table changes
? 'Reverted cust_id value: '
?? cust_id && Displays reverted cust_id value

Diseo de Formularios
Gua rpida visual:
A la hora de disear formularios usted tiene que estar familiarizado con las ventanas
siguientes:

Entorno de Datos, son las tablas que ocupa el formulario

Manual del Alumno

Propiedades de los objetos

Manual del Alumno

Cmo crear un nuevo Formulario:
1. En el Administrador de Proyectos, pulse documentos
2. Pulse Formulario para seleccionar la categora
3. Pulse botn nuevo
Aparece en cuadro de dilogo Nuevo Formulario. Este cuadro refleja la posibilidad de
utilizar el Asistente para formularios o construir uno nuevo.

Sugerencia: utilice el Asistente para formularios para desarrollar formularios

simples de introduccin de datos. El Asistente para formularios hace una serie
de preguntas para guiarle durante el proceso de creacin del formulario. El
Asistente permite la creacin de un formulario para nica tabla o para tablas
uno a muchos.
4. Pulse el botn Nuevo formulario
Aparecer el Generador de formularios.

El Generador de formularios visualiza Form1 en la ventana DocForm1,

indicando que ste es el primer formulario que tiene abierto en este proyecto.
Podr cambiar de nombre Docform1 por el nombre que indique al guardar el
formulario. Form1 es un rea de trabajo en blanco.
Tambin aparecer la barra de herramientas con los controles para la creacin
de formularios.

Manual del Alumno

Agregacin de Objetos a su formulario.
Una vez que tenga en pantalla una ventana de formulario en blanco, Form1,
inserte objetos para crear el su formulario.
MS Visual Foxpro 5.0 ofrece dos tipos de objetos que se pueden insertar en un
nuevo formulario: objetos contenedores y objetos de control. Podemos accesar
a estos objetos desde la barra de herramientas Controles de formulario o desde
el Administrador de proyectos.
Objetos contenedores: Un objeto contenedor es un objeto primario que
contiene otros objetos subordinados. Por ejemplo, un formulario es el objeto
contenedor que es propietario de un botn de comando visualizado en el
formulario. Otros objetos contenedores pueden incluir marcos de pgina,
cuadrculas y grupos de botones de comando.
Objetos de control: Un objeto de control permite al usuario seleccionar opciones,
introducir datos y escoger acciones. En un formulario, estos objetos pueden incluir
casillas de verificacin, botones de comando, cuadros de texto y cuadrculas.

El objeto FORM

Propiedades mas comunes de la Forma :

Nombre
Caption
Autocenter
ShowTips
Closable
MaxButton
MinButton
ControlBox

Tipo de dato
Carcter
Booleano
Booleano
Booleano
Booleano
Booleano
Booleano

Descripcin
Titulo de la ventana o Forma
Para central la Forma
Para que se muestren los Tooltips
Visualiza el boton de Cerrar la Ventana (X)
Visualiza el boton de Maximizar la Ventana
Visualiza el boton de Minimizar la Ventana
Visualiza el Menu de Control de la Ventana.

Eventos o Mtodos ms comunes de la Forma

Nombre

Descripcin

Manual del Alumno

Init
Load
Destroy
Unload

Se dispara a la hora que se inicializa todos los

objetos de la forma.
Se dispara antes que se inicialicen los objetos de
la forma (ante que Init)
Se dispara al cerrar la forma
Se dispara despues de Destroy.

Utilizacin de mltiples pginas en un formulario simple.

En VFP, un formulario simple puede contener mltiples pginas que visualicen
diferentes conjuntos de datos y controles. En la parte superior del formulario,
una ficha representa cada pgina. Podemos pulsar en una ficha para mostrar el
contenido de la pgina.

Cmo crear un formulario de varias pginas.

1. Pulse el botn Marco de pgina (page frame) en la barra de herramientas
Controles de formulario.
2. Site el cursor en la esquina superior izquierda de form1. ( El cursor cambia
su forma a cruceta)
3. Pulse en la esquina superior izquierda del formulario y arrastre el cursor
hacia la esquina inferior derecha para crear un marco de pgina que cubra
la mayor parte de la ventana form1. Deje un espacio de unos dos
centmetros en la parte inferior del formulario para los botones de comando
que se agregarn despus en esta leccin.

Manual del Alumno

Propiedades mas comunes de la pginas :

Nombre
Pagecount

Tipo de dato
Nmerico

TabStyle
Visible

Nmerico
Booleano

Descripcin
Fija el nmero de Folders o pginas
(Page1, page2...)
Justificacion de las pginas.
Si el control es visible al usuario.

Agregacin de cuadros de texto y cuadros de edicin:

Cmo agregar objetos en la pagina 1 (page1):
1. Con el botn derecho del ratn, pulse sobre Page1 en el formulario. Aparece un
men instantaneo
2. Seleccione la ventana propiedades
Aparece el cuadro de dilogo propiedadades, donde muestra Page1 en el cuadro
de texto.

Manual del Alumno

3. Pulse el botn Flecha hacia abajo.

4. Seleccione Page1 en el cuadro de texto Objeto.
Sugerencia: Cada vez que inserte un objeto en un formulario, marco de pgina
o cuadricula, compruebe en la ventana Propiedades que ha colocado el objeto
en el contenedor apropiado.

Como Agregar de cuadros de texto directamente de una tabla:

1. Seleccione Ver el men Generador de Formularios
2. Seleccione Entorno de Datos (Data Environment)
3. Seleccione Entorno de datos (Data Environment) en el men de Visual
Foxpro y luego Agregar.
Sugerencia: Tambin puede abrir la ventana Agregar tabla o vista con el botn
derecho del ratn. Utilizando el botn derecho del ratn, pulse en cualquier
parte del Entorno de datos y luego seleccione Agregar. Para obtener la ventana
de Entorno de Datos o la ventana de propiedades, utilice el botn derecho del
ratn pulsando fuera del marco de pgina, pero dentro del formulario. Aparece
un men instantneo desde el que puede hacer la seleccin.

Manual del Alumno

Aparece la ventana Agregar tabla o vista.

4. Confirme si es la Base de Dato deseada.
5. Pulse dos veces en la tabla a utilizar.
6. Seleccione el campo deseado en la lista de campos de la tabla, arrstrelo
hacia el formulario y djelo en cualquier parte del mismo.
En el formulario aparecer el cuadro de texto.text1
7. Pulse y arrastre el cuadro de texto text1 a la posicin que desee.
Sugerencia: Para desplazar un control de texto, pulse sobre l y arrastrelo
hacia otro lugar en le formulario. Para modificar el tamao del cuadro de texto,
pulse sobre l y luego arrastre algunos de los mrgenes.

Propiedades mas comunes del Text (control de texto):

Nombre
Controlsource
Value

Tipo de dato
Segn la
variable
Segn la

Descripcin
Es la variable o nombre del campo al cual
hace referencia.
Contenido de la variable o campo

Manual del Alumno

variable
Booleano
Booleano

Visible
Enabled

referenciado en controlsource
Si el control es visible al usuario.
Si el control esta habilitado o no.

Control Botn de Comando:

Propiedades mas comunes del Botn :

Nombre
Caption
Visible
Enabled

Tipo de dato
Carcter
Booleano
Booleano

Descripcin
Etiqueta del comando (Ej. Click Aqu)
Si el control es visible al usuario.
Si el control esta habilitado o no.

Eventos o Mtodos ms comunes del control

Nombre
Init
Click
Setfocus
Lostfocus
Refresh

Descripcin
Se dispara a la hora que se inicializa el objeto
Se dispara al dar click en el objeto
El cursor se va al objeto.
Se dispara cuando el objeto pierde el cursor.
Refresca el objeto.

Manual del Alumno

Cmo asociar un procedimiento a un botn:
1. Haga doble click en el boton. Aparece una ventana de cdigo:

Asegurese que esta ubicado en el control deseado

Escoga el evento deseado. (En este caso Click = Se ejecuta al Presionar el Boton)

Introduzca el cdigo deseado.

Control Botn de Cuadro de Edicin:

Se utiliza para los campos memo.

Propiedades mas comunes del control de edicin

Nombre
Controlsource
Value
Visible
Enabled

Tipo de dato
Segn la
variable
Segn la
variable
Booleano
Booleano

Descripcin
Es la variable o nombre del campo al cual
hace referencia.
Contenido de la variable o campo
referenciado en controlsource
Si el control es visible al usuario.
Si el control esta habilitado o no.

Eventos o Mtodos ms comunes del control de edicin

Manual del Alumno

Nombre

Descripcin
Se dispara a la hora que se inicializa el objeto
Se dispara al dar click en el objeto
El cursor se va al objeto.
Se dispara cuando el objeto pierde el cursor.
Se dispara despues de presionar Enter o Tab, se
utiliza para validar.
Refresca el objeto.

Init
Click
Setfocus
Lostfocus
Valid
Refresh
Control de Opciones:

Propiedades mas comunes del control de opciones

Nombre
Controlsource

Tipo de dato
Nmerico

Value

Nmerico

Visible
Enabled

Booleano
Booleano

Descripcin
Es la variable o nombre del campo al cual
hace referencia.
Contenido de la variable o campo
referenciado en controlsource
Si el control es visible al usuario.
Si el control esta habilitado o no.

Eventos o Mtodos ms comunes del control de opciones

Nombre
InteractiveChange
Init
Click
Setfocus
Lostfocus
Valid
Refresh

Descripcin
Se dispara cuando modificamos el campo
Se dispara a la hora que se inicializa el objeto
Se dispara al dar click en el objeto
El cursor se va al objeto.
Se dispara cuando el objeto pierde el cursor.
Se dispara despues de presionar Enter o Tab, se
utiliza para validar.
Refresca el objeto.

Manual del Alumno

Control Check:

Propiedades mas comunes del control Check

Nombre
Controlsource

Tipo de dato
Booleano

Value

Booleano

Visible
Enabled

Booleano
Booleano

Descripcin
Es la variable o nombre del campo al cual
hace referencia.
Contenido de la variable o campo
referenciado en controlsource
Si el control es visible al usuario.
Si el control esta habilitado o no.

Eventos o Mtodos ms comunes del control Check

Nombre
InteractiveChange
Init
Click
Setfocus
Lostfocus
Valid
Refresh

Descripcin
Se dispara cuando modificamos el campo
Se dispara a la hora que se inicializa el objeto
Se dispara al dar click en el objeto
El cursor se va al objeto.
Se dispara cuando el objeto pierde el cursor.
Se dispara despues de presionar Enter o Tab, se
utiliza para validar.
Refresca el objeto.

Manual del Alumno

Control Grid:

Propiedades mas comunes del control Grid:

Nombre
Recordsource
Visible
Enabled
ColumnCount
Deletemark

Tipo de dato
Carcter
Booleano
Booleano
Nmerico
Booleano

Descripcin
Nombre de la tabla
Si el control es visible al usuario.
Si el control esta habilitado o no.
Numero de columnas del Grid
Permite registro para borrar ( Aparece en
la parte izquierda del Grid)

Eventos o Mtodos ms comunes del control Grid:

Nombre
Init
Click
Setfocus
Lostfocus
Refresh

Descripcin
Se dispara a la hora que se inicializa el objeto
Se dispara al dar click en el objeto
El cursor se va al objeto.
Se dispara cuando el objeto pierde el cursor.
Refresca el objeto.

Manual del Alumno

Control Listas:

Propiedades mas comunes del control Listas

Nombre
Controlsource
RowSource
RowSourceType
Visible
Enabled
BoundColumn

Tipo de dato
Segn la
variable
Carcter
Numrico
Booleano
Booleano
Numrico

BoundTo

Booleano

Descripcin
Variable a que hace referencia (campo
donde se almacena el valor de la lista)
Tabla o query de los elementos de la lista
Tipo de la Fuente (Si es tabla o query.)
Si el control es visible al usuario.
Si el control esta habilitado o no.
Valor que retorna la lista (Nmero de la
columna del RowSource )
Especifica si el valor de la lista esta
determinado por los valores o por la
propiedad ListIndex

Eventos o Mtodos ms comunes del control Listas

Nombre
InteractiveChange
Init
Click
Setfocus
Lostfocus
Valid
Refresh

Descripcin
Se dispara cuando modificamos el campo
Se dispara a la hora que se inicializa el objeto
Se dispara al dar click en el objeto
El cursor se va al objeto.
Se dispara cuando el objeto pierde el cursor.
Se dispara despues de presionar Enter o Tab, se
utiliza para validar.
Refresca el objeto.

Formularios Sencillos
Un Formulario Sencillo, es el que es realizado generalmente utilizando una sola tabla.

Manual del Alumno

Un ejemplo tpico de formularios sencillos son las pantallas de los
catlogos de un Sistema, que solamente tienen la funcin de
registrar, modificar, eliminar y consultar datos de una tabla.
Por ejemplo vamos a construir una forma sencilla utilizando el
Wizard de Visual Foxpro:
1.
2.
3.
4.

Abra su proyecto
Ubquese en la pestaa de documentos (document) y luego en Formas (Forms).
Presione el Botn Nuevo (New).
Seleccione Wizard.
Aparece la siguiente ventana:

5. Seleccione Form Wizard y OK.

6. Luego aparece la ventana donde usted escoge la tabla a utilizar y los campos de esa
tabla.

Seleccione
la tabla
a utilizar

Seleccione
Los campos que aparecern en la forma

Manual del Alumno

7. Una vez seleccionado la tabla y sus respectivos campos, presiones prximo (Next).
8. Se visualizar la siguiente ventana:

Seleccione el estilo de la Forma

Seleccione el tipo de botn

10. Seleccione el estilo de la forma y el tipo de botones a utilizar en la forma y luego

presione prximo (Next).

11. Aparecer la siguiente ventana:

Seleccione el ordenamiento de la tabla. (por lo general se selecciona el indice

Manual del Alumno

12. Seleccione el ordenamiento de la tabla, aqu por lo general se selecciona el ndice

de la tabla ( los ndices aparecen con asterisco *)

Manual del Alumno

13. Introduzca el titulo de la forma y luego Finalizar (Finish)
Visual Foxpro Generar la forma, luego usted puede modificar la forma si lo
desea.

La forma, que creamos con el wizard, quedara de esta forma:

Barra de botones creada por el wizard (Contenido en la clase Wizstyle)

Nota: Reconstruya el proyecto en la opcin Build (botn del proyecto). Luego

Seleccione Rebuild Proyect y OK. Visual Foxpro, compila su proyecto.
Notar que en la pestaa de clases de su proyecto Visual Foxpro le ha
agregado una clase que l ocupa para construir formas con el Wizard, el
nombre de la clase es WizStyle.

Si usted, crea una forma con el Wizard, Visual foxpro le incorpora la clase
WizStyle

Manual del Alumno

Formularios Maestro - Detalle
Un formulario maestro detalles es aquel en que entran en juego dos o ms
tablas, las cuales tengan una relacin de uno a muchos. Ejemplo la relacin de
s_region con s_dept ( una regin puede tener muchos departamentos).
Se pueden construir formas mestro-detalle utilizando el Wizard, sin embargo,
nosotros utilizaremos la forma manual para personalizar a nuestro gusto la
forma.

Pasos para construir una forma maestro - detalle

Para este ejemplo utilizaremos las tablas s_region y s_dept
1.
2.
3.
4.
5.

Abra su proyecto
Ubquese en la pestaa de documentos (document) y luego en Formas (Forms).
Presione el Botn Nuevo (New).
Seleccione Nueva Forma en blanco.
En la forma en blanco presione el botn derecho del ratn y luego Entorno de Datos
(Data Environment)

6. Seleccione las tablas s_region, que ser el maestro y luego la tabla s_dept que ser
nuestro detalle.

Manual del Alumno

7. Arrastre uno por uno los campos de la tabla s_region a su forma, de tal manera que
queden asi:

8. Luego arrastre toda la tabla s_dept al formulario

Manual del Alumno

9. Ahora vamos a modificar las propiedades del Grid que hemos insertado: seleccionan
el grid, botn derecho del ratn y luego propiedades. Se sitan en la pestaa datos,
para modificar las siguientes propiedades con el fin de establecer la relacin entre
las dos tablas:
Propiedad
LinkMaster

Contenido
La tabla maestra
(s_region)
RecorSource
La tabla hija
(s_dept)
RecordSourceType Tipo de fuente de
datos (Alias)
RelationalExpr
La relacion entre
las tablas
(s_region.id =
s_dept.region_id

10. colocaremos los botones para Desplazarnos en la tabla, agregar, eliminar , grabar,
cancelar y salir.

Cdigo para los botones :

Cdigo

Botn
Agregar

INSERT INTO
VALUES

<<
>>

SKIP -1
SKIP

s_dept ( region_id )
(s_region.Id)

Manual del Alumno

Eliminar
Grabar
Cancelar
Salir

DELETE IN s_dept
SELECT s_dept
=TABLEUPDATE(.T.)
SELECT s_dept
=TABLEREVERT(.T.)
THISFORM.Release

Cdigo a nivel de Forma :

Cdigo

Mtodo
Destroy

SELECT s_dept
=TABLEREVERT(.T.)

Importante: la tabla s_dept debe de estar en modo buffer, para que funcionen
los comando de TABLEUPDATE() y TABLEREVERT(). El modo buffer de la
tabla lo puede fijar en Entorno de datos y luego en la propiedades de la tabla
s_dept, especficamente en la propiedad BufferModeOverride.

Manual del Alumno

Creacin de Clases de Objetos
En Visual Foxpro se pueden crear clases de objetos que pueden de uso muy
comn, como por ejemplo el botn salir es muy comun en todas las pantallas.
Pasos para creacin de clases:
1. Abra su proyecto
2. Ubquese en la pestaa de classes.
3. Presione el Botn Nuevo (New).

4. Introduzca el nombre de la clase, el tipo de clase (en este caso Boton de

comando) y guardarlo como curso.
5. Inmediatamente aparecer la siguiente pantalla:

6. Personalice el botn y luego cierre la ventana y slvelo.

Manual del Alumno

7. La clase que usted a creado aparecer en la pestaa clases de su proyecto:

Cmo hacer uso de la clase :

1. Cree o Abra una forma

Ver Clases

2. presione el botn de ver clases y luego agregar (Add) y seleccione la clase

que usted a creado.

Manual del Alumno

2. Aparecer la clase que usted a creado con el botn de salir

3. Para poner el botn en la forma, seleccione el botn en la barra de

controles y luego clic en la forma.

Manual del Alumno

Soporte de Tecnologa ActiveX
Cuando usted instala Visual Foxpro, se instalan una serie de controles ActiveX
soportados por Visual Foxpro.
Un ActiveX, no es ms que un control externo, es parecido a una clase ya que
las clases se pueden guardar en un archivo (extensin VCX) y los ActiveX
tienen extensin OCX. La diferencia es que los VCX solo puede ocuparse en
Visual Foxpro, mientras que los OCX se consideran como tecnologa abierta,
es decir, pueden ser utilizado por cualquier lenguaje visual como Visual C++ o
Visual Basic, por mencionar algunos.
Estos controles ActiveX, vienen hechos de fabrica, son comercializables y no
son modificables, sin embargo uno puede crear sus propios OCX. Los
lenguajes donde se pueden construir estos OCX actualmente son Visual C++ y
Visual Basic. En visual Foxpro 5.0 usted no puede crear OCX.
Hay que tener mucho cuidado a la hora de comprar un OCX y verificar que
lenguajes soporta, por que algunos OCX no son soportados por algunos
lenguajes visuales incluso con Visual Foxpro.
Cmo hacer uso de los ActiveX en Visual Foxpro:
Un OCX es un objeto por lo cual tiene propiedades y eventos implcitos en l.
En el curso, utilizaremos dos Controles ActiveX :
OutLine control
Microsoft Progress Bar Control
OutLine control:
El Outline Control se utiliza para hacer Arboles como por Ejemplo: Regiones con
departamentos (maestro-detalle)

Manual del Alumno

Cmo agregar un ActiveX a la forma:

1.
2.
3.
4.

Abra o Cree una nueva forma.

Seleccione Ver clases
Seleccione ActiveX Control
Seleccione el control deseado, en este caso el Outline Control y pngalo en
la forma.

5. Vamos a crear una forma maestro detalle utilizando el Outline Control. El

Outline control presentar la informacin de las Regiones y vamos a agregar un
Grid que sern los departamentos, Algo asi:

Manual del Alumno

Completar Cdigo del Outline control:

Cdigo

Mtodo

*------------------------------------*
Cargar el OCX
*------------------------------------*-------pnIndex = 0
THIS.Additem( "Regiones" )
THIS.Indent( pnIndex ) = pnIndex

Init

Select s_region
SCAN

pnIndex = pnIndex + 1
datos = ALLTRIM(name)
THIS.Additem(datos)
THIS.Indent( pnIndex ) = 1
THIS.PictureType(pnindex) = 2
THIS.ListIndex = pnindex
THIS.ItemData(pnIndex) = RECNO()
ENDSCAN

Click

SELECT s_region
GO RECORD THIS.ItemData(THIS.ListIndex)
THISFORM.REFRESH()

El ltimo paso es agregar el Grid con la tabla departamentos y luego establecer

la relacin con la tabla de regiones.

Manual del Alumno

Progress Bar Control:
Este control permite hacer una barra de progreso:

Propiedades :

Propiedad
Max
Min
Value

Descripcin
Mximo valor de la Barra (nmerico)
Mnimo valor de la Barra (nmerico)
Valor actual de la barra (nmerico)

Manual del Alumno

Almacenar objetos OLE en la Base de Datos:
Con Visual Foxpro se pueden almacenar objetos OLE en la Base de Datos,
estos objetos OLE van desde una simple imagen BMP de Paintbruhs hasta un
video clip, un documento en Word, una hoja en Excel un grafico.
Esto se llama OLE Automation (automatizacin OLE)
Qu se necesita para hacer OLE Automation?
Muy sencillo:
-

El campo de la tabla debe ser tipo General

Utilizar el control OLE Bound Control de Visual Foxpro
Utilizar el Comando APPEND GENERAL

Sintaxis de APPEND GENERAL

APPEND GENERAL Nombre Campo tipo General
[FROM Nombre Archivo]
[DATA Nombre de Variable]
[CLASS Nombre de la Clase OLE]
FROM : Por si deseamos insertar un Archivo existente en el disco
DATA : Si no es un archivo puede ser una variable, entonces se especifica
aqu.
CLASS : El nombre de la clase de la aplicacin al que esta asociada el archivo
o la variable.
Toda aplicacin Windows ( Word, Excel, Graph, Paint, WordPad, Block de Notas,
Power Point, entre otras) tienen un nombre de clase:

Por mencionar algunos nombres de clases:

Aplicacin
Paintbrush Picture
Documento de Word 97
Hoja de Calculo de Excel

Nombre de la clase
PAINT.PICTURE
WORD.DOCUMENT
EXCEL.SHEET

Manual del Alumno

Como conocer el nombre de clase de una aplicacin Windows:
1. Cree un formulario nuevo
2. Inserte en el formulario el control OLE Container Control
3. Insertar la Aplicacin deseada: (Escoger el objeto y luego OK)

4. Luego en las propiedades del objeto insertado buscar la propiedad

OLECLASS:

Propiedad OleClass, se puede ver el nombre de la clase de la Aplicacin PaintBrusht

Manual del Alumno

Incluir en el Formulario el Objeto OLE:
SELECT s_product
APPEND GENERAL picture FROM GETFILE('BMP') CLASS PAINT.PICTURE

OLE Bound Control

(ControlSource = s_product.picture)

Diseo de Reportes

Encabezado: Aparece en todas las paginas

Barra de Herramientas de Reportes

Titulo: Aparece solo en la primera pagina

Guia rpida visual:

Detalle: Se especifican los campos de la tabla

Sumario: Aparece en la ultima pagina

Entorno de Datos

Manual del Alumno

Los informes muestran datos y resumen datos en un formulario impreso o en pantalla.

Los dos componentes principales de los informes son los datos y el formato. La fuente
de datos del informe puede ser una tabla de base de dato, una consulta o una vista.
El primer paso para disear un informe es determinar los datos que se van a mostrar, y
el segundo paso es determinar cul va a ser el mejor formato para mostrar ese
informe. Puede crear listados que se basen en una nica tabla o en informes
complejos.
El Generador de Informes es una herramienta flexible y de fcil uso para la creacin,
diseo y modificacin de informes.
Pasos para Creacin de Informes :
I. Seleccin de los datos
Esta es la parte ms importante del informe, la seleccin de datos, hay que saber qu
es lo que quiere el usuario o que el usuario muestre el diseo del informe que desea,
para comenzar a trabajar.
Los datos pueden ser simples (utilizando una sola tabla), como listados de regiones,
listado de departamentos, entre otros; o pueden ser algo mas complejos (utilizando
mas de una tabla) Ejemplo Reportes agrupados, reportes consolidados, etc.
Los datos se pueden obtener directamente utilizando las tablas o utilizando SQL para
crear cursores, esta ltima es la ms recomendada para una aplicacin multiusuario.
Existen varios tipos de informes entre ellos :
- Listados (Ej. Listados de regiones)
Muestra:
------------------------------id
name
------------------------------01
Region 1
02
Region 2
--------------------------------

Manual del Alumno

- Grupos con detalles ( o maestro detalles)
------------------------------Region
Departamento
------------------------------Region 1
Departamento a
Departamento b
Region 2
Departamento x
Departamento y
-------------------------------- Matriciales o consolidados
-------------------------------------------Rating
Region
Excellent
Good
Poor
-------------------------------------------Region 1
1
2
0
Region 2
3
0
1
-------------------------------------------Totales
4
2
1
-------------------------------------------Creacin de Informes usando el entorno de datos:
1. En el administrador de proyectos, seleccione la ficha Documentos.
2. Seleccione Informes
3. Pulse el botn nuevo
4. Pulse el botn nuevo informe.
Aparece el generador de informes y al barra de herramientas Controles de informes.
5. Seleccione Entorno de datos y seleccione la tabla
6. Arrastre los campos a utilizar del entorno de datos en el informe en la parte de
detalle
7. Introduzca los encabezados del reporte
8. Puede ver como queda el informe con el botn de presentacin preliminar:

Arrastre el campo a la parte de detalle

Manual del Alumno

Presentacin Preliminar :

Manual del Alumno

Men de Reportes

Titulo/Sumario (Title/Summary):
Muestra el rea del Titulo y el Sumario del Informe
Titulo
Sumario

: Aparece solo en la primera pagina del Reporte

: Aparece solo en la ultima pagina del Reporte

Agrupamiento de datos (Data Grouping)

El agrupamiento de datos se utiliza para informes maestro detalle.

Especifique el campo por el cual esta agrupando

Manual del Alumno

Variables:
Las variables son tiles para hacer clculos con los datos del reporte y luego
presentarlas en el mismo reporte.

Nombre de la variable

Campo a calcular
Tipo de Calculo

Manual del Alumno

Propiedades de los campos
Cada campo en el Informe posee propiedades :

Doble clic en el campo para mostrar las propiedades

Si deseamos hacer clculos con el campo

Manual del Alumno

Creacin de Informes usando Cursores SQL:
1. Crear el cursor con el comando SELECT..... FROM .....WHERE....
2. Crear el Informe manualmente, con los nombres de campos del cursor.
3. Correr el Reporte.

Ejemplo:
* Se define una ventana Personalizada
DEFINE

WINDOW w_Output
FROM 0,0 TO 25,70
TITLE 'Informes - INATEC'
CLOSE FLOAT GROW ZOOM SYSTEM

;
;
;

USE IN .\data\s_region IN 0
SELECT
FROM
INTO

id, name
s_region
CURSOR c_region

* Si lo queremos por pantalla

REPORT FORM .\report\pp_detalles
PREVIEW WINDOWS w_output
NOEJECT NOCONSOLE

;
;

* Por Impresora
REPORT FORM .\report\pp_detalles
TO PRINTER PROMPT
NOEJECT NOCONSOLE

;
;

* Hacia un Archivo
REPORT FORM .\report\pp_detalles
TO FILE PUTFILE()
ASCII
* Cerrar el cursor
USE IN c_region

Integracin de la Aplicacin

;
;

Manual del Alumno

Creacin de Mens:
Gua rpida Visual:

Instruccin de men

Lista de Resultados del men

(Sub men, comando, procedimiento)

Opciones del men

Presentacin preliminar del men

Modificacin o creacin de Resultados del men

Manual del Alumno

Tipos de Mens:
Existen dos tipos de mens : men y Shortcut.

El Shorcut men se invoca con el botn derecho del mouse

Menu desplegable a nivel de la ventana superior de Visual Foxpro.

Manual del Alumno

Creacin de Mens:
La creacin de mens es un proceso que conlleva diferentes pasos. Primero,
debemos definir las opciones del men y de los submens. Luego, asignar
funcionalidad a las opciones de men. Finalmente, generar el programa de
mens.
Puede l generador de mens de Visual Foxpro para que le ayude a construir
mens rpidamente. El Generador de mens le permite definir la estructura y
funcionalidad de su sistema de mens a travs de cuadros de dilogo de fcil
uso y de listas desplegables que puede utilizar para crear y modificar su sitema
de mens.
Definicin de las opciones de men.
Los mens presentan su aspecto con una lista de opciones para iniciar una
actividad. La mayora de los elementos de men muestran submens u
opciones adicionales cuando el usuario selecciona uno de estos elementos.
Antes de generar un men para una aplicacin, tendr que determinar que
selecciones tendr disponibles el usuario final y qu opciones de mens
pertenecen a otras opciones de mens (sub menus).
Cmo crear un nuevo men
1. Pulse la ficha de otros
en el Administrador de
proyectos.
Aparece la pgina
otros
con
las
categoras de archivo
de Mens, Texto y
Otros.
2. Seleccione mens en
la lista de categoras
3. Pulse el botn nuevo y
escoja si es Menu o un Shortcut
4. Introduzca las opciones del menu y luego el resultado del men ( submenu,
comando o procedimiento)
5. A la derecha del resultado se encuentra la opcin crear o modificar segn el
caso. ( crea o modificar los resultados de la opcin del menu).

Manual del Alumno

Tipos de Resultados :
Submenu : Si el men contiene un submenu

Comando : Si la opcin de ese men invoca un

comando (Ejemplo: DO FORM
Regiones, para llamar un formulario;
CLEAR EVENT, por lo general va en la opcin Salir)
Procedimiento : Si la opcin de ese men invoca varias lneas de comandos
( un procedimiento).

Opciones de Men:
En las opciones del men se
especifican:
-

Teclas de Acceso directo

Mensajes del men
Condicin de habilita/No habilitar

Generacin del men :

1. En el men escoja la opcin Men.
2. Se le pregunta si desea grabar los cambios ( responda que si)
3. Luego se le pide que proporcione el archivo de salida del menu ( escoja la
ruta y el nombre del archivo, por lo general son extension MPR) y luego
seleccione generar.
4. Si existe ya el archivo se le pide si desea re-escribirlo ( seleccione que si)

Manual del Alumno

Como invocar al men creado:
Al generar el men se crea un archivo que por lo general tiene extensin MPR
que contiene el cdigo para desplegar el men.
La instruccin sera:

DO ruta y nombre del archivo MPR

Ejemplo : DO menu.MPR

Para volver a re establecer el men por default de Visual Foxpro utilice la

instruccin: SET SYSMENU TO DEFAULT

Creacin del Ejecutable de la Aplicacin.

Primero se tiene que crear

un programa de inicio, al
cual se le tiene que decir
que ese es el programa
que se ejecutara de
primero ( esto se hace
haciendo clic derecho en el
programa que designemos
como principal y escoger la
opcin main ( principal) del
men de opciones)

Manual del Alumno

Contenido Ejemplo del programa principal:
CLEAR ALL
* Variables Publicas
PUBLIC w_Output, g_ao, gid_area, g_nivel, g_cambio, g_login_entry ;
,g_pass_entry, V_MENU_PRE, V_ERROR, g_acceso
* Definicion de Ventana para los Reportes
DEFINE

WINDOW w_Output
FROM 0,0 TO 25,70
TITLE 'Informes - BCN'
CLOSE FLOAT GROW ZOOM SYSTEM

* Ambiente
SET SYSMENU TO
SET ECHO OFF
SET TALK OFF
SET CENTURY ON
SET CLOCK STATUS
SET DATE brit
SET DELETE ON
SET PATH TO formenu,bmp,prg,data
SET EXCLUSIVE OFF
SET SAFETY OFF
SET REFRESH TO 5
SET REPROCESS TO AUTOMATIC
SET MULTILOCK ON
SET LOCK OFF
SET PROCEDURE TO .\prg\utility
* Fondo de la Pantalla principal
_SCREEN.Picture=".\bmp\fondo.bmp"
_SCREEN.WINDOWSTATE=2
_SCREEN.CLOSABLE=.F.
_SCREEN.CAPTION="Formulacin Presupuestaria"
* Base de Datos
OPEN DATA .\SCOTT\scott SHARED
* Llamada al Menu
DO .\menu\menu.mpr
READ EVENT
CLEAR ALL
SET SYSMENU TO DEFAULT

;
;
;

Manual del Alumno

Creacin del Ejecutable

En el Administrador de proyectos seleccione la opcion Build, luego la opcin

build Executable y luego OK.

En las opciones es recomendable seleccionar Recompile All y display Error,

para recompilar todos sus programas y formularios ; y Por si hay un error
mostrarlo al final de la generacin del Ejecutable.

Visual Foxpro 6.0 en la Web

En este ejercicio pondremos un formulario de Visual Foxpro en la Web, En el proyecto tenemos el
formulario s_region :

Este formulario se ver en la Web

As se vera el formulario en el Browser:

Manual del Alumno

Manual del Alumno

Con Visual Foxpro usted puede desplegar su aplicacin para que sea vista desde un
Browser ( de Preferencia Internet Explorer ). La modificacin es mnima si usted ya
tiene una aplicacin.
Siga las siguientes instrucciones:
1.

Desde su proyecto, crearemos una clase nueva, Basada en Documento Activo (ActiveDic):
Presionamos Aceptar (OK)

Esta es la clase

2. En el evento Run de la clase pondremos el cdigo para la llamada al formulario que queremos que se
mire en la Web.

Manual del Alumno

3. En el evento ContainerRelease escriba lo siguiente:

4. Salvamos la clase.
5. Establecemos como principal (Set Main) las clase que creamos.

Manual del Alumno

6. Haremos una pequea modificacin en el formulario, agregaremos la instruccin CLEAR EVENT en
el botn de salir:
(Esto es muy importante , no se nos debe de olvidar)

7. Construya el APP de su proyecto:

Construir la Aplicacin (app)

Manual del Alumno

7.

Ejecute el APP desde Internet Exprorer:

Importante: En la maquina del Cliente, se deben de instalar los RUNTIME de Visual Foxpro, para que se
pueda ver en el Browser.