Подсчет времени

SELECT JOB_ID, INT(dur) & " д. " & Format(dur-INT(dur),"hh:nn:ss") AS Результат
FROM [SELECT R.JOB_ID, 
      IIf(Nz(SUM(K.duration),0)=0, Now()-FIRST(R.begin), SUM(K.duration)) AS dur
      FROM Работа AS R LEFT JOIN Квант_времени AS K ON R.JOB_ID = K.JOB_ID
      GROUP BY R.JOB_ID]. AS Q

SELECT Работа.JOB_ID, Работа.user_id, Работа.job_name, 
TimeSerial(HOUR(SUM([Квант времени].[duration])),MINUTE(SUM([Квант времени].[duration])),0)+(TimeSerial(0,DateDiff("n",LAST([Квант времени].[begin_time]),TIME()),0)) AS was_time, 
TimeSerial(0,DateDiff("n",TIME(),((LAST([Квант времени].[begin_time]))+[Матрица возможностей].[averagetime])),0) AS [END], 
TIME()+END AS free_time, IIf((free_time)>TimeValue("17:00:00"),0,1) AS free
FROM [Матрица возможностей] INNER JOIN (Работа INNER JOIN [Квант времени] ON Работа.JOB_ID = [Квант времени].JOB_ID) ON ([Матрица возможностей].TYPEJOB_ID = Работа.typejob_id) AND ([Матрица возможностей].USER_ID = Работа.user_id)
GROUP BY Работа.JOB_ID, Работа.user_id, Работа.job_name, [Матрица возможностей].averagetime, Работа.status_id
HAVING (((Работа.status_id)=2 OR (Работа.status_id)=5))
ORDER BY Работа.JOB_ID;

SELECT R.JOB_ID, R.user_id, R.job_name, 
       TimeValue(CDate(SUM(Nz(K.end_time,TIME())- K.begin_time))) AS was_time, 
       TimeValue(CDate(TIME()-MAX(K.begin_time)-M.averagetime+was_time)) AS [END],
       IIf(end>=#17:00:00#,#00:00:00#,#17:00:00#-END) AS free
FROM [Матрица возможности] AS M INNER JOIN 
     (Работа AS R INNER JOIN 
     [Квант времени] AS K 
ON R.JOB_ID = K.JOB_ID) 
ON (M.TYPEJOB_ID = R.typejob_id) AND (M.USER_ID = R.user_id)
WHERE (R.status_id=2) OR (R.status_id=4)
GROUP BY R.JOB_ID, R.user_id, R.job_name, M.averagetime
ORDER BY R.JOB_ID