MICROSOFT VISUAL FOXPRO

Visual Fox Pro

Visual Fox Pro es un gestor de base de datos, orientado a la programación de objetos.

Visual Fox Pro pertenece a la familia xbase lo que hace que su programación sea sencilla, estructurada y mas fácil de entender tanto para programadores principiantes como programadores expertos.

Nos enfocaremos en cinco áreas principales:

• Base de datos: Trata sobre el diseño, creación y manipulación de tablas libres o tablas con integridad referencial (base de datos)
• Programción: En esta parte seremos capaces de identificar y aplicar las estructuras básicas de programación y conocer aspectos sobre la programación orientada a objetos.
• Formularios: Aplicaremos conocimientos para la integración de una interfaz con el usuario y base de datos.
• Informes: Aprenderemos a diseñar las salidas de los sistemas de información, haciendo uso de las herramientas que el programa ofrece.
• SQL: En esta sección haremos uso del lenguaje SQL para manipular datos, creando así diferentes consultas o vistas.

 MICROSOFT VISUAL FOXPRO

Microsoft Visual FoxPro es un programa de gestión de bases de datos, este esta conformado por un compilador que traduce las palabras reservadas (comando y funciones) a lenguaje de maquina (0...1) binario.

Cuando se refiere a palabras reservadas o comandos y funciones son las palabras con las que es lenguaje señala de color azul.

Comando: Una instrucción que, cuando la ejecuta el usuario, hace que Visual FoxPro realice una acción. Un comando se puede escribir desde el teclado, o también se puede seleccionar en un menú o se puede incluir en código de programa. Ejemplo:

Clear: Limpia la pantalla de fondo del entorno de visual FoxPro

@2,2 Say “Hola” &&Imprime la palabra Hola en la pantalla de fondo

Función: Un cálculo preprogramado que se puede realizar bajo petición desde cualquier lugar de un programa de Visual FoxPro. Puesto que una función adopta uno o más argumentos (parámetros) y devuelve un único valor, se puede incluir en una expresión. Las funciones contienen un par de paréntesis que las distinguen de los comandos. Las funciones pueden ser propias de Visual FoxPro o pueden estar definidas por el usuario.

Ejemplo:

? Date( ) : &&Devuelve la fecha actual del sistema operativo

? year(date( )) : &&Devuelve el año de la fecha del sistema

Parámetro: Un valor que se transfiere a una función o a un procedimiento. Son también canales de comunicación entre programas y subprogramas

ENTORNO GRAFICO

Visual FoxPro cuenta con una ventana de comandos para la ejecución rápida de algunos comandos, que el usuario desea escribir, si este no desea realizar una rutina (programa que cumpla con determinada línea de comandos).

COMANDOS Y FUNCIONES

Modify Command (Nombre del Programa): Comando para abrir una pagina en blanco para crear una rutina (programa). Si al comando Modify Command se omite el nombre del programa este siempre realizar la operación de una nueva página pero sin nombre, el cual podrá brindar al guardar o cerrar la pagina.

Ejemplo:

Modify Command MiPrograma

Local (Variable1, Variable2): Declara como locales las variables señaladas después del comando. Si la declaración de variables es mas de una, debe de ser separado por coma (,).

Ejemplo:

Local Num1, Num2, Num3

Store (Valor) to (Variable1, Variable2): Establece un mismo valor a las variables descritas en el comando ejemplo:

Store 2 to Num1, Num2, Num3

@ Fila, Columna Say “”: Dibuja un texto el la fila y columna especificada ejemplo

@5,5 Say “Valor a Sumar del Numero 1”&&Dibuja la palabra Valor a Sumar del Numero 1

&&: Símbolo Ampersan, dos ampersan al principio o al final de una línea es tomado como un comentario

&&Programa de resta

Total = Num1 – Num2 &&Restar Num1 y Num2

**: Realiza la misma función del ampersan

@Fila, Columna Get Variable: Comando para la captura de datos a una variable

Ejemplo:

@2,2 Say “Ingrese el Valor 1”

@3,2 Get Num1

Read: Comando para dar lectura a la captura de datos si se ha usado el comando Get ejemplo:

@2,2 Say “Ingrese el Valor 1”

@3,2 Get Num1

Read

Alltrim( ): Elimina los espacios en blanco de una cadena de caracteres ejemplo:

Local Cadena

Cadena = “ Inicio “

Alltrim(Cadena) && la variable cadena tiene el valor “Inicio”

Str( ): Convierte un dato numérico a carácter que desee visualizarse en una cadena ejemplo

Numero = 12

@ 5, 5 Say “El valor de numero es:” + alltrim(str(Numero)) &&Convertir a carácter y mostrar

@Fila, Columna Prompt “Texto”: Crea un texto para ser usado como selección de opción brindada al usuario. ejemplo

@3,2 Say “Elija una Opción”
@5,2 Prompt “Sumar”
@7,2 Prompt “Restar”
@9,2 Prompt “Multiplicar”
@11,2 Prompt “Dividir”

OPERADORES
El uso de los operadores le ayudara a realizar operaciones matemáticas y a unir cadenas de caracteres. Debe de prevenir la forma que los usara.
Operaciones Matemáticas
+ (Suma),
– (resta)
* (Multiplicación)
/ (División) Cociente de la división
^ (Exponenciación)
% (módulo). Residuo de la división, al igual que la función MOD( )
Nota: Visual FoxPro contiene la regla matemática de realizar las operaciones en orden de jerarquía como ser primero lo que este en paréntesis o corchetes.

Operadores de cadena
La unión de cadenas de caracteres debe de ser en un mismo formato o tipo de dato ejemplo
Cadena1 = “Hola”
Cadena2 = “Mundo”
CadenaTotal = alltrim(Cadena1) + “ “ + alltrim(Cadena2)
? CadenaTotal && Imprime Hola Mundo
Error
Cadena1 = “Hora”
Hora = 12
Cadena = Cadena1 + Hora
Enviara un error “Incompatibilidad en operador/operando” en Español
“Operador/operand type mismatch” en Ingles
El cual significa que no puede sumar o unir dos tipos de datos distintos, a menos que sean convertidos.

Operador Lógico
Un operador que produce un resultado lógico (verdadero o falso); a veces se denomina operador booleano. Los operadores lógicos son:
( ) (Agrupación de expresiones)
NOT o ! (negación)
AND y OR (OR inclusivo).

 PRACTICAS

Nº4 PEDIR UN NÚMERO CUAL TENDRA QUE SER DE  2 DÍGITOS, INDICAR SI ES PAR O IMPAR.

set talk off

set echo off

clear

store 0 TO N,R

DO while N < 10 OR N > 99

@10,10 say "ing numero:" get N

read

enddo

r= mod (n,2)

if R=0 then

@11,10 say "par:"

else

@12,10 say "impar:"

endif

inkey(0)

  Nº 5.-  ESTE ES UN PROGRAMA PARA CONVERTIR MEDIDAS DE METROS A 

             CENTIMETROS Y PULGASA

este es el codigo del programa
----------------------------------------
im = 0
cm = 0
pg = 0
CLEAR
@ 3,18 say "CONVERSOR DE MEDIDAS"
@ 5,15 say "INGRESE MEDIDAS mts:" get im

READ

cm = im*100
pg = im*39.37

@ 7,15 say "CENTIMETROS:" get cm
@ 9,15 say "PULGADAS:" get pg

_________________________________________-
EL PROGRAMA QUEDA DE LA SIGUIENTE FORMA.  ver imagenes

 ------------------------------------------------------------------------------------------------------

 Trabajo 

Nº 5.- PEDIR UN NÚMERO EL CUAL TENDRÁ QUE SER UN NÚMERO BINARIO DE 3 DÍGITOS, MOSTRAR   SU EQUIVALENTE DECIMAL.