Naruto uZumaki Posted March 16, 2009 Report Share Posted March 16, 2009 Bom dia moçada ! preciso fazer um controle de horas extras só que estou com um problema na troca de dia ex: 23:00 PM até 01:00AM , aqui no caso seriam 02 horas, mas como calcular isso ja que não possos diminuir um pelo outro?? té+ ____________________________ Eder Xavier Msn:eder_xavier_2@hotmail.com C:\Xharbour Free\fivewin 8.05\workshop\VSX Quote Link to comment Share on other sites More sharing options...
Naruto uZumaki Posted March 16, 2009 Author Report Share Posted March 16, 2009 Bom dia moçada ! preciso fazer um controle de horas extras só que estou com um problema na troca de dia ex: 23:00 PM até 01:00AM , aqui no caso seriam 02 horas, mas como calcular isso ja que não possos diminuir um pelo outro?? té+ ____________________________ Eder Xavier Msn:eder_xavier_2@hotmail.com C:\Xharbour Free\fivewin 8.05\workshop\VSX Quote Link to comment Share on other sites More sharing options...
beniti Posted March 16, 2009 Report Share Posted March 16, 2009 Olá Fiz a seguinte função para resolveu um problema igual ao seu. xhoras=elapmeu(datai,horai,dataf,horaf) ********************************************************** * Calcula a diferenca entre hora, levando em conta a data * isso que diferencia do elaptime, que so considera a hora ********************************************************** Function Elapmeu Para vdatai58,vhorai58,vdataf59,vhoraf59 v60=elaptime(vhorai58,vhoraf59) if vdataf59>vdatai58 //TESTA DIFERENCA ENTRE AS DATAS v59=(vdataf59-vdatai58) * 24 if vhoraf59 v59-=24 elseif vhoraf59>=vhorai58 endif v61=subs(v60,3,3) v60=val(subs(v60,1,2))+v59 v60=strzero(v60,2)+v61 endif Retu v60 //retorna hora Teste e veja se resolve. Abraços Fernando FW 2.7 / XH 0.99.61 / XMATE Quote Link to comment Share on other sites More sharing options...
Rikardocv Posted March 16, 2009 Report Share Posted March 16, 2009 Eder : Pq não podes diminuir? pq dá negativo? Se fosse assim: quando dar negativo suma a diferencia o valor 24 1 - 23 = -22 + 24 = 2 5 - 20 = -15 + 24 = 9 Quote Link to comment Share on other sites More sharing options...
sygecom Posted March 16, 2009 Report Share Posted March 16, 2009 Olá Eder, Pode usar: MsgInfo(ElapTime( "23:00:00", "01:00:00" )) Leonardo Machado Porto Alegre-RS Hwgui + Mysql / xHarbour 1.0.0 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.