Estoy realizando un proyecto realizado en Autoplay Media Studio 8.5.2 y MSQL para controlar el tiempo de Servicio de los trabajadores, he logrado ingresas ,modificar , eliminar registros.
Ingresar Registros
Modificar Registros
Eliminar Registros
Mi gran duda es como haría para que cuando esta aplicación detente que el trabajador lleva 5 meses laborando le emita una alerta que le toca cortar vinculo con la Empresa por 1 mes.
Ejemplo
Enrique tiene contrato con la empresa:
del 01-01-2018 al 31-01-2018
del 01-02-2018 al 28 -02-2018
del 01-03-2018 al 31-03-2018
del 01-04-2018 al 30-04-2018
del 01-05-2018 al 31-05-2018
el corte de vinculo laboral seria
del 01-06-2018 al 30-06-2018
eso quiere decir que el trabajador podrá laborar en nuestra empresa desde el
del 01-07-2018 al 31-07-2018
del 01-08-2018 al 31-08-2018
del 01-09-2018 al 30-09-2018
del 01-10-2018 al 31-10-2018
del 01-11-2018 al 30-11-2018
y el próximo corte de vinculo laborar seria
del 01-12-2018 al 31-12-2018
Ingresar Registros
MySQL.Query("INSERT INTO controltrabajador (ID, CODIGO, NOMBREAPELLIDO, TIPODOCUMENTO, NUMERODOCUMENTO, ESTADOCIVIL, DISTRITO, TIPOCONTRATO, DEPENDENCIA, ACTIVIDAD, FECHAINICIO, FECHATERMINO, CONTEODIAS, USUARIOREGISTRO, FECHA) VALUES (NULL, '"
..tCodigo.."', '"
..tNrequerimiento.."', '"
..tCls.."', '"
..tNombreapellido.."', '"
..tTipodocumento.."', '"
..tNumerodocumento.."', '"
..tEstadocivil.."', '"
..tDistrito.."', '"
..tTipocontrato.."', '"
..tDependencia.."', '"
..tActividad.."', '"
..tRetribucion.."', '"
..tFechainicio.."', '"
..tFechatermino.."', '"
..tConteodias.."', '"
..tUsuarioregistro.."', '"
..tFecha.."')")
MySQL.Query("UPDATE controltrabajador SET CODIGO ='"
..tCodigo.."',NREQUERIMIENTO ='"
..tNrequerimiento.."',CLS ='"
..tCls.."',NOMBREAPELLIDO ='"
..tNombreapellido.."',TIPODOCUMENTO ='"
..tTipodocumento.."',NUMERODOCUMENTO ='"
..tNumerodocumento.."',ESTADOCIVIL ='"
..tEstadocivil.."',DISTRITO ='"
..tDistrito.."',TIPOCONTRATO ='"
..tTipocontrato.."',DEPENDENCIA ='"
..tDependencia.."',ACTIVIDAD ='"
..tActividad.."',RETRIBUCION ='"
..tRetribucion.."',FECHAINICIO ='"
..tFechainicio.."',FECHATERMINO ='"
..tFechatermino.."',CONTEODIAS ='"
..tConteodias.."',USUARIOREGISTRO ='"
..tUsuarioregistro.."',FECHA ='"
..tFecha.."'WHERE ID ="..nID)
---------------------------------------------------------------------------<< REGISTROS EXCLUÍDOS >>
sFocalizar = Grid.GetFocusCell("Grid1");
xTexto = Grid.GetCellText("Grid1", sFocalizar.Row, 0);
if xTexto == "" then
Dialog.TimedMessage("Error", "Primero seleccione un registro para ser eliminado!..", 2000, MB_ICONSTOP);
else
-----------------------------------------------<<EXCLUIR REGISTRO >>
MySQL.Query("DELETE FROM controltrabajador WHERE ID = "..nID);
MySQL.Query("ALTER TABLE controltrabajador AUTO_INCREMENT = 1");
Dialog.TimedMessage("Eliminar registro", "Registro eliminado con exito!..", 2000, MB_ICONQUESTION);
tContePagina()
tSel = Grid.GetFocusCell("Grid1");
Grid.DeleteRow("Grid1", tSel.Row, true);
Grid.Refresh("Grid1");
end
Ejemplo
Enrique tiene contrato con la empresa:
del 01-01-2018 al 31-01-2018
del 01-02-2018 al 28 -02-2018
del 01-03-2018 al 31-03-2018
del 01-04-2018 al 30-04-2018
del 01-05-2018 al 31-05-2018
el corte de vinculo laboral seria
del 01-06-2018 al 30-06-2018
eso quiere decir que el trabajador podrá laborar en nuestra empresa desde el
del 01-07-2018 al 31-07-2018
del 01-08-2018 al 31-08-2018
del 01-09-2018 al 30-09-2018
del 01-10-2018 al 31-10-2018
del 01-11-2018 al 30-11-2018
y el próximo corte de vinculo laborar seria
del 01-12-2018 al 31-12-2018