db/routines/vn/procedures/workerTimeControl_clockIn.sql

@@ -1,13 +1,13 @@
 DELIMITER $$
 CREATE OR REPLACE DEFINER=`vn`@`localhost` PROCEDURE `vn`.`workerTimeControl_clockIn`(
-		vWorkerFk INT,
+	vWorkerFk INT,
-		vTimed DATETIME,
+	vTimed DATETIME,
-		vDirection VARCHAR(10),
+	vDirection VARCHAR(10),
-		vDevice VARCHAR(255)
+	vDevice VARCHAR(255)
 )
 BEGIN
 /**
-* Verifica si el empleado puede fichar
+* Verifica si el empleado puede fichar, en caso de que sí ficha.
 * @param vWorkerFk Identificador del trabajador
 * @param vTimed Balor de la fichada, IF vTimed IS NULL vTimed = NOW
 * @param vDirection Solo se pueden pasa los valores del campo
@@ -18,14 +18,13 @@ BEGIN
 * Solo retorna el primer problema, en caso de no ocurrir ningún error se añadirá
 * fichada a la tabla vn.workerTimeControl
 */
-
 	DECLARE vLastIn DATETIME;
 	DECLARE vLastOut DATETIME;
 	DECLARE vNextIn DATETIME;
 	DECLARE vNextOut DATETIME;
 	DECLARE vNextDirection ENUM('in', 'out');
 	DECLARE vLastDirection ENUM('in', 'out');
-	DECLARE vDayMaxTime INTEGER; 
+	DECLARE vDayMaxTime INTEGER;
 	DECLARE vDayBreak INT;
 	DECLARE vShortWeekBreak INT;
 	DECLARE vLongWeekBreak INT;
@@ -40,6 +39,7 @@ BEGIN
 	DECLARE vIsManual BOOLEAN DEFAULT TRUE;
 	DECLARE vMaxWorkShortCycle INT;
 	DECLARE vMaxWorkLongCycle INT;
+	DECLARE vIsCampaing BOOL;
 
 	DECLARE EXIT HANDLER FOR SQLSTATE '45000'
 	BEGIN
@@ -52,7 +52,7 @@ BEGIN
 			WHERE w.id = vWorkerFk;
 
 		SELECT `description` INTO vErrorMessage
-			FROM workerTimeControlError 
+			FROM workerTimeControlError
 			WHERE `code` = vErrorCode;
 
 		IF vErrorMessage IS NULL THEN
@@ -64,7 +64,7 @@ BEGIN
 				' no ha podido fichar por el siguiente problema: ',
 				vErrorMessage)
 			INTO vErrorMessage;
-			
+
 		CALL mail_insert( vMailTo, vMailTo, 'Error al fichar', vErrorMessage);
 	END;
 
@@ -97,19 +97,32 @@ BEGIN
 			JOIN workerTimeControlConfig wc
 		WHERE b.workerFk = vWorkerFk
 			AND vDated BETWEEN b.started AND IFNULL(b.ended, vDated);
-		
+
+	SELECT EXISTS (
+		SELECT id FROM campaign
+			WHERE vTimed BETWEEN dated - INTERVAL scopeDays DAY
+				AND dated + INTERVAL vLongWeekBreak SECOND
+	) INTO vIsCampaing;
+
+	IF vIsCampaing THEN
+		SET vWeekScope = vWeekScope * 2;
+	ELSE
+		SET vLongWeekBreak = vShortWeekBreak,
+			vMaxWorkLongCycle = vMaxWorkShortCycle;
+	END IF;
+
 	-- CONTRATO EN VIGOR
 	IF vDayBreak IS NULL THEN
 		SET vErrorCode = 'INACTIVE_BUSINESS';
 		CALL util.throw(vErrorCode);
 	END IF;
-	
+
 	-- FICHADAS A FUTURO
-	IF vTimed > util.VN_NOW() +  INTERVAL 1 MINUTE THEN
+	IF vTimed > util.VN_NOW() + INTERVAL 1 MINUTE THEN
 		SET vErrorCode = 'IS_NOT_ALLOWED_FUTURE';
 		CALL util.throw(vErrorCode);
 	END IF;
-	
+
 	-- VERIFICAR SI ESTÁ PERMITIDO TRABAJAR
 	CALL timeBusiness_calculateByWorker(vWorkerFk, vDated, vDated);
 	SELECT isAllowedToWork INTO vIsAllowedToWork
@@ -121,7 +134,6 @@ BEGIN
 		CALL util.throw(vErrorCode);
 	END IF;
 
-
 	-- DIRECCION CORRECTA
 	CALL workerTimeControl_direction(vWorkerFk, vTimed);
 	IF (SELECT
@@ -138,18 +150,18 @@ BEGIN
 		) THEN
 		SET vIsError = TRUE;
 	END IF;
-	
+
-	
 	IF vIsError THEN
 		SET vErrorCode = 'WRONG_DIRECTION';
 		IF(SELECT option1 IS NULL AND option2 IS NULL
 			FROM tmp.workerTimeControlDirection) THEN
-			
+
 			SET vErrorCode = 'DAY_MAX_TIME';
 		END IF;
 		CALL util.throw(vErrorCode);
 	END IF;
 	DROP TEMPORARY TABLE tmp.workerTimeControlDirection;
+
 	-- FICHADAS IMPARES
 	SELECT timed INTO vLastIn
 		FROM workerTimeControl
@@ -158,7 +170,7 @@ BEGIN
 			AND timed < vTimed
 		ORDER BY timed DESC
 		LIMIT 1;
-	
+
 	IF (SELECT IF(vDirection = 'in',
 				MOD(COUNT(*), 2) ,
 				IF (vDirection = 'out', NOT MOD(COUNT(*), 2), FALSE))
@@ -169,7 +181,7 @@ BEGIN
 		SET vErrorCode = 'ODD_WORKERTIMECONTROL';
 		CALL util.throw(vErrorCode);
 	END IF;
-	
+
 	-- DESCANSO DIARIO
 	SELECT timed INTO vLastOut
 		FROM workerTimeControl
@@ -178,7 +190,7 @@ BEGIN
 			AND timed < vTimed
 		ORDER BY timed DESC
 		LIMIT 1;
-	
+
 	SELECT timed INTO vNextIn
 		FROM workerTimeControl
 		WHERE userFk = vWorkerFk
@@ -186,7 +198,7 @@ BEGIN
 			AND timed > vTimed
 		ORDER BY timed ASC
 		LIMIT 1;
-	
+
 	CASE vDirection
 		WHEN 'in' THEN
 			IF UNIX_TIMESTAMP(vTimed) - UNIX_TIMESTAMP(vLastOut) <= vDayBreak THEN
@@ -204,11 +216,8 @@ BEGIN
 		CALL util.throw(vErrorCode);
 	END IF;
 
-
-
 	IF (vDirection IN('in', 'out')) THEN
 		-- VERIFICA MAXIMO TIEMPO DESDE ENTRADA HASTA LA SALIDA
-		
 		SELECT timed INTO vNextOut
 			FROM workerTimeControl
 			WHERE userFk = vWorkerFk
@@ -216,7 +225,7 @@ BEGIN
 				AND timed > vTimed
 			ORDER BY timed ASC
 			LIMIT 1;
-	
+
 		SELECT direction INTO vNextDirection
 			FROM workerTimeControl
 			WHERE userFk = vWorkerFk
@@ -224,7 +233,7 @@ BEGIN
 				AND timed > vTimed
 			ORDER BY timed ASC
 			LIMIT 1;
-		
+
 		SELECT direction INTO vLastDirection
 			FROM workerTimeControl
 			WHERE userFk = vWorkerFk
@@ -232,34 +241,33 @@ BEGIN
 				AND timed < vTimed
 			ORDER BY timed ASC
 			LIMIT 1;
-	
+
-		IF (vDirection ='in' 
+		IF (vDirection ='in'
-				AND vNextDirection = 'out' 
+				AND vNextDirection = 'out'
 				AND UNIX_TIMESTAMP(vNextOut) - UNIX_TIMESTAMP(vTimed) > vDayMaxTime) OR
-			(vDirection ='out' 
+			(vDirection ='out'
 				AND vLastDirection = 'in'
 				AND UNIX_TIMESTAMP(vTimed) -UNIX_TIMESTAMP(vLastIn) > vDayMaxTime) THEN
 			SET vErrorCode = 'DAY_MAX_TIME';
 			CALL util.throw(vErrorCode);
 		END IF;
-		
+
 		-- VERIFICA DESCANSO SEMANAL
-	
 		WITH wtc AS(
-		(SELECT timed 
+		(SELECT timed
-			FROM vn.workerTimeControl 
+			FROM vn.workerTimeControl
 			WHERE userFk = vWorkerFk
 				AND direction IN ('in', 'out')
-				AND timed BETWEEN vTimed - INTERVAL (vWeekScope * 2) SECOND 
+				AND timed BETWEEN vTimed - INTERVAL vWeekScope SECOND
-					AND vTimed + INTERVAL (vWeekScope * 2) SECOND )
+					AND vTimed + INTERVAL vWeekScope SECOND)
-		UNION 
+		UNION
 		(SELECT vTimed)
 		), wtcGap AS(
 			SELECT timed,
-				TIMESTAMPDIFF(SECOND, LAG(timed) OVER (ORDER BY timed), timed) gap 
+				TIMESTAMPDIFF(SECOND, LAG(timed) OVER (ORDER BY timed), timed) gap
 			FROM wtc
 			ORDER BY timed
-		), wtcBreak AS( 
+		), wtcBreak AS(
 			SELECT timed,
 					IF(IFNULL(gap, 0) > vShortWeekBreak, TRUE, FALSE) hasShortBreak,
 					IF(IFNULL(gap, 0) > vLongWeekBreak, TRUE, FALSE) hasLongBreak
@@ -270,8 +278,8 @@ BEGIN
 					SUM(hasShortBreak) OVER (ORDER BY timed) breakCounter ,
 					LEAD(hasLongBreak) OVER (ORDER BY timed) nextHasLongBreak
 				FROM wtcBreak
-		)SELECT TIMESTAMPDIFF(SECOND, MIN(timed), MAX(timed)) > vMaxWorkLongCycle OR 
+		)SELECT TIMESTAMPDIFF(SECOND, MIN(timed), MAX(timed)) > vMaxWorkLongCycle OR
-				(TIMESTAMPDIFF(SECOND, MIN(timed), MAX(timed))> vMaxWorkShortCycle 
+				(TIMESTAMPDIFF(SECOND, MIN(timed), MAX(timed)) > vMaxWorkShortCycle
 					AND NOT SUM(IFNULL(nextHasLongBreak, 1)))
 				hasError INTO vIsError
 			FROM wtcBreakCounter
@@ -290,6 +298,5 @@ BEGIN
 		VALUES(vWorkerFk, vTimed, vDirection, vDevice, vIsManual);
 
 	SELECT LAST_INSERT_ID() id;
-
 END$$
 DELIMITER ;