diff --git a/PROYECTO/bin/IMAGENES/EMPLEADOS/.gitkeep b/PROYECTO/bin/IMAGENES/EMPLEADOS/.gitkeep new file mode 100644 index 0000000..e69de29 diff --git a/PROYECTO/mbsERP.4pw b/PROYECTO/mbsERP.4pw index c036e1c..754714d 100644 --- a/PROYECTO/mbsERP.4pw +++ b/PROYECTO/mbsERP.4pw @@ -489,6 +489,7 @@ + @@ -567,6 +568,11 @@ + + + + + diff --git a/PROYECTO/nodir/noprrp039.4gl b/PROYECTO/nodir/noprrp039.4gl index 9ffddc8..42821ed 100644 --- a/PROYECTO/nodir/noprrp039.4gl +++ b/PROYECTO/nodir/noprrp039.4gl @@ -52,27 +52,27 @@ OPEN WINDOW w1 WITH FORM "nofmrp039" IF fotos = "SI" THEN LET selec = "SELECT a.num_emp,a.departamento,a.cod_puesto,", - " a.nom1_emp,a.apell1_emp,a.apell2_emp,a.calle,a.casa_num,CONVERT(CHAR(10),a.fech_efec,103), ", - " a.cedula,a.sueldo_ac,a.fech_nac,a.foto_empleado ", - " FROM adtb00003 a WHERE ",criterio CLIPPED, " AND and a.fech_efec IS NOT NULL - AND a.foto_empleado IS NOT NULL + " a.nom1_emp,a.apell1_emp,a.apell2_emp,a.calle,a.casa_num,a.fech_efec, ", + " a.cedula,a.sueldo_ac,a.fech_nac,a.foto_empleado ", + " FROM adtb00003 a WHERE ",criterio CLIPPED, " AND a.fech_efec IS NOT NULL + AND a.foto_empleado IS NOT NULL ORDER BY a.departamento,a.num_emp " ELSE LET selec = "SELECT a.num_emp,a.departamento,a.cod_puesto,", - " a.nom1_emp,a.apell1_emp,a.apell2_emp,a.calle,a.casa_num,CONVERT(CHAR(10),a.fech_efec,103), ", - " a.cedula,a.sueldo_ac,a.fech_nac,a.foto_empleado ", - " FROM adtb00003 a WHERE ",criterio CLIPPED, " AND and a.fech_efec IS NOT NULL - AND a.foto_empleado IS NULL + " a.nom1_emp,a.apell1_emp,a.apell2_emp,a.calle,a.casa_num,a.fech_efec, ", + " a.cedula,a.sueldo_ac,a.fech_nac,a.foto_empleado ", + " FROM adtb00003 a WHERE ",criterio CLIPPED, " AND a.fech_efec IS NOT NULL + AND a.foto_empleado IS NULL ORDER BY a.departamento,a.num_emp " - END IF + END IF IF fotos = "TODOS" THEN LET selec = "SELECT a.num_emp,a.departamento,a.cod_puesto,", - " a.nom1_emp,a.apell1_emp,a.apell2_emp,a.calle,a.casa_num,CONVERT(CHAR(10),a.fech_efec,103), ", - " a.cedula,a.sueldo_ac,a.fech_nac,a.foto_empleado ", - " FROM adtb00003 a WHERE ",criterio CLIPPED, " AND and a.fech_efec IS NOT NULL - AND a.foto_empleado IS NOT NULL + " a.nom1_emp,a.apell1_emp,a.apell2_emp,a.calle,a.casa_num,a.fech_efec, ", + " a.cedula,a.sueldo_ac,a.fech_nac,a.foto_empleado ", + " FROM adtb00003 a WHERE ",criterio CLIPPED, " AND a.fech_efec IS NOT NULL + AND a.foto_empleado IS NOT NULL ORDER BY a.departamento,a.num_emp " END IF END IF @@ -80,10 +80,10 @@ OPEN WINDOW w1 WITH FORM "nofmrp039" LET chEmpleados = "EMPLEADOS ACTIVOS" LET selec = "SELECT a.num_emp,a.departamento,a.cod_puesto,", - " a.nom1_emp,a.apell1_emp,a.apell2_emp,a.calle,a.casa_num,CONVERT(CHAR(10),a.fech_efec,103), ", - " a.cedula,a.sueldo_ac,a.fech_nac,a.foto_empleado ", + " a.nom1_emp,a.apell1_emp,a.apell2_emp,a.calle,a.casa_num,a.fech_efec, ", + " a.cedula,a.sueldo_ac,a.fech_nac,a.foto_empleado ", " FROM adtb00003 a WHERE ",criterio CLIPPED, - " AND (a.status_t is null or a.status_t = 'I') and a.fech_efec IS NOT NULL ", + " AND (a.status_t is null or a.status_t = 'I') and a.fech_efec IS NOT NULL ", " ORDER BY a.departamento,a.num_emp " END IF @@ -91,10 +91,10 @@ OPEN WINDOW w1 WITH FORM "nofmrp039" LET chEmpleados = "EMPLEADOS DESACTIVOS" LET selec = "SELECT a.num_emp,a.departamento,a.cod_puesto,", - " a.nom1_emp,a.apell1_emp,a.apell2_emp,a.calle,a.casa_num,CONVERT(CHAR(10),a.fech_efec,103),", - " a.cedula,a.sueldo_ac,a.fech_nac,a.foto_empleado ", + " a.nom1_emp,a.apell1_emp,a.apell2_emp,a.calle,a.casa_num,a.fech_efec,", + " a.cedula,a.sueldo_ac,a.fech_nac,a.foto_empleado ", " FROM adtb00003 a WHERE ",criterio CLIPPED, - " AND a.status_t is not null and a.fech_efec IS NOT NULL", + " AND a.status_t is not null and a.fech_efec IS NOT NULL", " ORDER BY a.departamento,a.num_emp " END IF