{
-----------------------------------------------------------------------
 FORMULARIO        : ADFMMT001
 OBJETIVO          : Capturar registros de la Tabla de Departamentos     
 PROGRAMADOR       : Ing. Betania Guerrero Perez
 FECHA REALIZACION : Mayo 19, 1993   
-----------------------------------------------------------------------
}
database rayovac   
screen size 24 by 80
{
  Ficha de Empleado [f000 ]
  Cod. Puesto       [f001 ]
  1er Nombre Emp.   [a                   ]  
  2do Nombre Emp.   [b                   ]
  1er Apellido Emp. [c                   ]
  2do Apellido Emp. [d                   ]
  Cedula            [e          ]
  Serie             [f     ]
  Nomina            [g]
  Fecha de Ingreso  [h         ]
  Nombre del Puesto [i                         ]
  Fecha de Salida   [j         ]
}
end
tables
vacaciones
attributes
f000 = vacaciones.num_emp;
f001 = vacaciones.cod_puesto;
a    = vacaciones.nom1_emp,noentry;
b    = vacaciones.nom2_emp,noentry;
c    = vacaciones.apell1_emp,noentry;
d    = vacaciones.apell2_emp,noentry;
e    = vacaciones.cedula,noentry;
f    = vacaciones.serie,noentry;
g    = vacaciones.nomina,noentry;
h    = vacaciones.fecha_ing,format = "dd/mm/yyyy";
i    = vacaciones.nom_puesto,noentry;
j    = vacaciones.fech_vac,format = "dd/mm/yyyy";

instructions
  delimiters " "
end