Utilice VPF para diseñar un sistema de gestión de datos de información de empleados. ¡Abriré una nueva publicación una vez completada! !

Suponga que el nombre del archivo de la biblioteca es zgk.dbf

**Programa principal**

Haga mientras .t.

borre

Asigne "Ingresar contraseña:" a h

Si h="12345" entonces salga

Fin do

Usar zgk

Hacer mientras .t.

Borrar

Texto

1. Introducir datos

2. Modificar datos

3. Consultar datos

4. Eliminar datos

5. Salir

Fin del texto

Ingresar "Por favor seleccione 1 -5 " a ​​A

Hacer caso

Caso a=1

Hacer entrada

Caso a=2

Hacer Modificar

Caso a=3

Hacer Consulta

Caso a=4

Hacer Eliminar

De lo contrario

salir

Finalizar caso

Finalizar hacer

Consulta de programa

Hacer mientras .t.

Borrar

Texto

1. Buscar por número de empleado

2. Buscar por fecha de nacimiento

3. Buscar por nombre Consulta

4. Consulta por departamento

5. Regresar

Fin del texto

Ingrese “Por favor seleccione 1- 5” a C

Hacer caso

Caso c=1

Acepte “Ingresar número de empleado” a H

disp para número de empleado =H

Caso c=2

Aceptar “Ingresar fecha de nacimiento” en H

Mostrar fecha de nacimiento=cdod(H)

Caso c=3

Acepte “Ingresar nombre” en H

disp para Nombre=H

Caso c=4

Aceptar “Ingresar departamento” a H

Mostrar para departamento=H

De lo contrario

Salir

Finalizar caso

Fin do

Volver

Modificación del programa

Hacer mientras .t.

Borrar

Texto

1. Modificar por número de empleado

2. Modificar por nombre

3. Volver

Fin de texto

Ingrese "Por favor seleccione 1-3” en C

Hacer caso

Caso c=1

Acepte “Ingresar número de empleado” en H

Ubicar el número de empleado =H

Editar

Caso c=2

Aceptar “Ingresar nombre del empleado” en H

Localizar para Nombre=H

Editar

De lo contrario