109 lines
4.5 KiB
Plaintext
109 lines
4.5 KiB
Plaintext
{
|
|
----------------------------------------------------------------------------
|
|
FORMULARIO : NOFMMT003
|
|
OBJETIVO : Pantalla para actualizar las informaciones comunes de
|
|
la accion de personal y la maestra de empleados.
|
|
Es utilizada por: ADPRMT022
|
|
PROGRAMADOR : JUAN SOTO
|
|
FECHA REALIZACION : FEBRERO 18, 1998.
|
|
----------------------------------------------------------------------------
|
|
}
|
|
database smarmotech
|
|
ACTION DEFAULTS
|
|
ACTION busca_foto (TEXT="Buscar Fotos")
|
|
END
|
|
|
|
TOOLBAR
|
|
ITEM nuevo (TEXT="Empleados", IMAGE="new", COMMENT="Nuevo Empleado")
|
|
ITEM buscar (TEXT="Buscar Empleado", IMAGE="find", COMMENT="Criterio de busqueda")
|
|
SEPARATOR
|
|
ITEM salir (TEXT="Salir", IMAGE="quit")
|
|
END
|
|
|
|
LAYOUT (TEXT="MAESTRA EMPLEADOS", STYLE="basic")
|
|
GRID
|
|
|
|
{
|
|
<G "Empleados" >
|
|
Ficha No. [f000]-[f001]-[f2]-[f3 ] [i101 ]
|
|
Nombre [n ][n1 ]
|
|
Apellidos [a1 ][a2 ] [sh ]
|
|
|
|
<G "Generales" ><G >
|
|
Puesto [l ] LOCALIDAD:[lo ]
|
|
Depto. [m ] STATUS:[s1 ]
|
|
Dir. [f004 ] Casa No:[f005 ]
|
|
Urbanizacion[f006 ] [f007 ] Credito [cr1 ]
|
|
Ced [f010 ] Serie [f011 ] Licencia [m1 ]
|
|
Telefono [f008 ]Fecha de Naci.[p ] Sexo[x][ tx ]
|
|
Nacionalidad[p1] [p2 ] Poncha [c3]
|
|
Estado Civil[a] [c ] Tipo de Sangre[f03] Sueldo [s ]
|
|
Nomina[d] [d1 ] Fecha Entrada [fe ] F.Salida [fs ]
|
|
Paga Seguro [z] Codigo TSS [c1 ][c2] Cuenta_no[cta ]
|
|
|
|
<G >
|
|
[k]Usuario Creador [f11 ] Usuario Modificador[f13 ]
|
|
Fecha Creacion [f12 ] Fecha Creacion [f14 ]
|
|
}
|
|
end
|
|
tables
|
|
adtb00007,adtb00003,
|
|
adtb00001,adtb00004
|
|
ATTRIBUTES
|
|
COMBOBOX cr1 = formonly.credito,INCLUDE=("SI","NO");
|
|
COMBOBOX lo = formonly.localidad;
|
|
IMAGE i101 =formonly.fotos,STRETCH = BOTH,AUTOSCALE;
|
|
BUTTON sh: busca_foto;
|
|
fs = formonly.fecha_salida type date,format = "dd/mm/yyyy";
|
|
cta = adtb00003.cuenta_no;
|
|
s1 = formonly.descrip_st;
|
|
f000 = adtb00003.num_emp;
|
|
f001 = adtb00003.departamento;
|
|
f2 = adtb00003.nivel_emp;
|
|
f3 = adtb00003.cod_puesto;
|
|
n = adtb00003.nom1_emp,upshift;
|
|
n1 = adtb00003.nom2_emp,upshift;
|
|
a1 = adtb00003.apell1_emp,upshift;
|
|
a2 = adtb00003.apell2_emp,upshift;
|
|
l = adtb00004.nom_puesto,noentry;
|
|
m = adtb00001.nom_dpto,noentry;
|
|
f004 = adtb00003.calle,upshift,scroll;
|
|
f005 = adtb00003.casa_num,upshift;
|
|
f006 = adtb00003.barrio,upshift,scroll;
|
|
f007 = adtb00003.urbanizacion,upshift,scroll;
|
|
f010 = adtb00003.cedula,autonext,comments = "Digite la cedula del empleado";
|
|
f011 = adtb00003.serie,autonext,comments = "Digite la serie del empleado";
|
|
p = adtb00003.fech_nac,format = "dd/mm/yyyy",
|
|
comments = "Digite la fecha de nacimiento del empleado";
|
|
p1 = adtb00003.cod_nac,autonext,
|
|
comments = "Digite la nacionalidad del empleado";
|
|
p2 = adtb00007.nom_nac,noentry;
|
|
m1 = adtb00003.licencia;
|
|
f008 = formonly.telefono,format="(###)###-####";
|
|
a = adtb00003.estado_civil,upshift,include = ("S", "C"),
|
|
comments = "Digite S = Soltero, C = Casado";
|
|
c = formonly.descr,noentry;
|
|
f03 = adtb00003.tipo_sangre,
|
|
comments = "Digite el tipo de sangre del empleado";
|
|
s = adtb00003.sueldo_ac;
|
|
d = adtb00003.nomina, upshift,include = ("Q", "S", "V","J"),
|
|
comments = "Digite Q = Quincenal, S = Semanal, V = Vendedor J-Jornales";
|
|
d1 = formonly.descrip,noentry;
|
|
fe = adtb00003.fech_efec,format = "dd/mm/yyyy";
|
|
x = formonly.p_sexo type char,upshift,include= ("M","F"),comments =
|
|
"Digite M Para SEXO MASCULINO y F Para FEMENINO";
|
|
tx = formonly.tipo_sexo,noentry;
|
|
c1 = adtb00003.cod_seg1;
|
|
c2 = adtb00003.cod_seg2;
|
|
COMBOBOX c3 = adtb00003.cod_seg3,include=(1,0),comments = "1- CONTROL ASISTENCIA 0- NO CONTROL",DEFAULT=1;
|
|
z = adtb00003.paga_seg,include=("S","N"),required,upshift,comments=
|
|
"Digite S si el empleado paga SEGURO, N en caso contario";
|
|
k = adtb00003.status_t,noentry;
|
|
f11 = adtb00003.us_crea,noentry;
|
|
f12 = adtb00003.fech_crea,noentry;
|
|
f13 = adtb00003.us_mod,noentry;
|
|
f14 = adtb00003.fech_mod,noentry;
|
|
instructions
|
|
delimiters " "
|
|
end
|