87 lines
3.5 KiB
Plaintext
87 lines
3.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
|
|
screen size 24 by 80
|
|
{
|
|
Ficha No.[f000]-[f001]-[f2]-[f3 ]
|
|
Nombre [n ][n1 ]
|
|
Apellidos[a1 ][a2 ]
|
|
Puesto[l ] STATUS:[s1 ]
|
|
Depto.[m ]
|
|
Dir.[f004 ] [f005] [f006 ] [f007 ]
|
|
Ced [f010 ]Serie [f011 ]Fecha Aumento Sexo[x][ tx ]
|
|
Telefono [f008 ] Fecha de Nacimiento [p ]
|
|
Nacionalidad[p1] [p2 ] Licencia [m1 ]
|
|
Estado Civil[a] [c ] Tipo de Sangre [f03] Sueldo [s ]
|
|
Nomina[d] [d1 ] Fecha de Entrada [fe ]F.Salida[fs ]
|
|
Paga Seguro [z] Codigo TSS[c1 ][c2][c3 ]Cuenta_no[cta ]
|
|
[k]Usuario Creador [f11 ] Usuario Modificador[f13 ]
|
|
Fecha Creacion [f12 ] Fecha Creacion [f14 ]
|
|
}
|
|
end
|
|
tables
|
|
adtb00007,adtb00003,
|
|
adtb00001,adtb00004
|
|
attributes
|
|
|
|
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;
|
|
f005 = adtb00003.casa_num,upshift;
|
|
f006 = adtb00003.barrio,upshift;
|
|
f007 = adtb00003.urbanizacion,upshift;
|
|
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 = adtb00003.telefono,upshift,picture="###-####";
|
|
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;
|
|
c3 = adtb00003.cod_seg3;
|
|
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
|