Messias Gomes
não registrado
|
|
Postada em 28/01/2011 22:50 hs
Boa Noite, Claro! Preciso de Aduda!
Tenho um Banco de Dados que alimento TotalHoras HorasPagas e Horas Acumuladas, todo final de fica horas acumuladas de um mes para outro, preciso gerar um relatorio que soma horas acumuladas porfuncionarios, Exemplo:
Data 26/01/2011 a 26/06/2011
Pedro 10:00:00
Joao 25:00:00
Maria 15:30:00
Antonio 08:15:00 e assim por diante. è faciol criar uma formula no rodapé do formulario, porem o que eu precio é que esse cálculo Detalhe para preecher toda pagina com os nomes dos funcionários e o total de horas de cada um acumulado durante 1 mes ou mais, Acredito que Preciso usa o Codigo VBA do Access, por favor me ajuda!
Messias Gomes
mmgomes_silva@ig.com.br
|
|
|
|
|
|
|
|
Postada em 30/01/2011 17:19 hs
bem, vc tem que fazer isso no detail do crystal report para aparecer os nomes de cada funcionario e as horas. no mesmo crystal tem para agrupar por codigos ou por formulas, ja no rodape vc coloca a funcao sum de cada hora por funcionario lembrando que vc precisa de mais leitura para poder colocar em pratica relatorios em CR. |
|
|
|
Messias gomes
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 09/02/2011 21:02 hs
Juan calors, Obrigado pela atwnção, tente utilizar esta formula, mais não deu certo, veja.Function calculaIntervaloTempo(intervalo)
Dim totalHoras As Long
Dim totalMinutos As Long
Dim totalSegundos As Long
Dim dia As Long, horas As Long, minutos As Long, segundos As Long
dias = Int(CSng(intervalo))
totalHoras = Int(CSng(intervalo * 24))
totalMinutos = Int(CSng(intervalo * 1440))
totalSegundos = Int(CSng(intervalo * 86400))
horas = totalHoras Mod 24
minutos = totalMinutos Mod 60
segundos = totalSegundos Mod 60
calculaIntervaloTempo = dias & " dias " & horas & " Horas " & minutos & " Minutos " & segundos & " Segundos "
End Function
|
|
|
|
|
|
Postada em 10/02/2011 15:01 hs
O que vc tem que fazer é criar a funcao no crystal report para exibir o total de horas. convertidos o minutos e segundos em horas. e colocar o sum de horas para cada funcionario
|
|
|
|
