[Resolvido]Calculo com horas

Estou montando um banco de dados para lançamento do "Ponto Corrido" da UPA que trabalho. Os profissionais trabalhão em sua maioria no sistema 12x36. Preciso ao lançar Entra, Saida_Almoço, Entrada_Almoço, Saida já nos calcule o total de horas.



Se puderem me ajudar. E depois que fizer o calculo já focalizar no campo do Formulário "Servidor".

Desde Já agradeço a todos.

Ola;

Faça o teste num campo novo na consulta;

Código:

HorasTrabalhadas: (Format$(TimeSerial(0;(Nz(DateDiff("n";[Entrada];[Saida]);0)-(Nz(DateDiff("n";[Saida_refeicao];[Entrada_refeicao]);0)))/60*60;0);"Short Time"))

Braine. Bom dia

Proceda conforme figura em anexo

Quase fis na consulta deu certo. Só que quando e quebrado que daria 11:10 me da a resposta: 11,1666666666667
Isso na consulta. E se o profissional entrou as 19:00hs e a Saida for 07:00hs. da negativo. Acho que tem que ser código mesmo.
Com as variáveis.

Se saída < que entrada=tal código

Se saída > que entrada=tal código.

Rapaz, copie novamente a formula que lhe passei que já não mostra em decimal.

Se tiver necessidade de fazer o calculo mudando de dia, como disse "profissional entrou as 19:00hs e a Saida for 07:00hs", vai ter de incrementar na sua tabela a data.

Ou seja, terá de ter data e hora.

Veja este exemplo de uma duvida aqui;

Repare no funcionario Nº2, que Entrou num dia ás 17:00 e saíu no dia seguinte ás 02:00, retorna 08:00 trabalhadas já sem a refeição.

Download

Não abriu


Já volto

Faça o download novamente, tem de abrir.

Consigo ler o codigo mas não entra no modo estrutura da consulta para mim ver como foi feito.

Mas a minha ideia e ser sem a data mesmo, pois são 115 funcionários que da um total de 6900 lançamentos no mês. A responsavel pelo RH passa parte do dia digitando entradas e saidas. Consome muito tempo, no modo que estou fazendo e muito rapido os lançamentos, só falta fazer os calculos.

Exemplo de formula:

Se Entrada < Saída
Total= ((Saida - Entrada)-(Saida_Refeição - Entrada_Refeição))

Se Entrada > Saída
Total= ((24:00 - Entrada)+Saida)-(Saida_Refeição - Entrada_Refeição)

Só não sei como faze-lo ainda.

Segue o banco de Dados para dar uma olhada

Quase consegui conforme imagem abaixo, só estou precisando de ajuda quando não tiver intervalo de almoço.
Pois alguns funcionários não tem assinado a saída e entrada e gostaria de colocar um valor padrão:
dia Entrada < 11:00 = 11:00 Saida_Refeição e Entrada_Refeição = 12:00
Noite Entrada < 21:00 = 21:00 Saida_Refeição e Entrada_Refeição = 22:00



Usei um exemplo que encontrei em outro fórum http://www.accessexemplos.com/calculo-horas/ e adaptei para o meu uso.

Se puderem me ajudar com este único ponto que ainda falta agradeço.

Estou usando uma consulta que faz a soma das horas usando a seguinte formula no campo Total:

Total: SeImed([Saida]>[Entrada];[Saida]-[Entrada]-[Intervalo];([Totalhoras]-[Entrada]+[Acerto])+[Saida]-[Intervalo])

E no campo Intervalo:

Intervalo: (Nz([Entrada_Refeição]-[Saida_Refeição];#01:00:00#))



Que me apresenta o seguinte erro:



Se resolver esse erro, quando for Nulo pegar o valor padrão de 01:00:00 e fazer o calculo já resolvo minha consulta.

Consegui mudei a formula da consulta do Intervalo para

Intervalo: (Nz([Entrada_Refeição]-[Saida_Refeição];0,0416666666666667))





Agradeço a todos e obrigado pela ajuda.

Tenho apreendido muito no Fórum

Estou postando o banco de dados para ficar de exemplo se alguém tiver o mesmo problema consiga solucioná-lo.

Até a próxima.