Ver Mensaje Individual
  #5  
Antiguo 12-08-2014
novato_erick novato_erick is offline
Miembro
 
Registrado: ago 2010
Ubicación: Panamá
Posts: 396
Reputación: 14
novato_erick Va por buen camino
Hola... Bueno después de todo buscando y buscando varios link dentro del mismo clubdelphi al final hice esto:

Código SQL [-]
              IF (ENTRADA0 IS NULL) THEN FALTA = 'X'; ELSE FALTA='';  
             /*CALCULOS DE HORAS EN EL PROSEDIMIENTO*/
             HORADIA = DATEDIFF(MINUTE, ENTRADA0, SALIDA1) / 60.00 -
             DATEDIFF(MINUTE, SALIDA0, ENTRADA1)/60.00;
             /*SUMAR TIEMPO DE ALMUERZO*/
             HORAALMUERZO = DATEDIFF(MINUTE, SALIDA0, ENTRADA1)/ 60.00;
             /*EXTRAEMOS LOS MINUTOS DE LAS HORAS DEL DIA*/
             MINUTOSDIA = TRUNC(HORADIA, 0);
             /*RESTAMOS LOS ENTEROS CONTRA LOS DECIMALES PARA DEJAR LOS DECIMALES*/
             HORASDIACONVER = HORADIA - MINUTOSDIA;
             /*MULTIPLICAMOS LOS DECIMALES PARA OPENER MINUTOS EJEMPLO .50 * 60.00 = 30.00 MINUTOS REDONDEANDO*/
             MINUTOSDIASCONVER =  ROUND(HORASDIACONVER * 60.00);
             /*DIVIDIMOS LO REDONDEADO /100 PARA OBTENER EL 30 DE ENTERO A 0.30 EN DECIMAL*/
             MINUTOSDIASCONVER =  MINUTOSDIASCONVER /100;
             /*SUMAMOS AL FINAL LAS HORAS ENTERAS CON LOS MINUTOS PARA EL TOTAL DE HORAS CON MINUTOS TRABAJADA EN EL DIA*/
             HORATOTALDIA = MINUTOSDIA + MINUTOSDIASCONVER;

en fin logre el objetivo...

Saludos

novato_erick
Responder Con Cita