| Pregunta: | 25330 - QUE COMANDO SE UTLIZA PARA PONE LA HORA EN FOX PRO |
| Autor: | elizabeth castro |
| por ejemplo yo tengo un programa que calcula la hora de un centro de internet pero calcula la hora pero no toma en cuenta los minutos | |
| Respuesta: | wences |
| El Time() , devuelve la hora , con minutos y segundos , por defecto ... y del sistema y el sys(2) lo devuelve en segundos los tiempos ... Ahora bien si quieres trabajar con campos hora , tendras que usar transformaciones a caracter y numericas , para operar y volver a transformarlos a campos hora .... parameters hora hora=padl(alltrim(str(val(substr(hora,1,2)),2)),2,'0')+padl(alltrim(str(val(substr(hora,3,2)),2)),2,'0') if val(substr(hora,1,2))<1 or val(substr(hora,1,2))>23 or val(substr(hora,3,2))>59 or val(substr(hora,3,2))<0 hora="Novale" endif return hora esto devuelve la comprobacion de una hora correcta o no ... y esto otro el resultado de operar con una hora de comienzo y fin... parameters inicio,final empieza=(val(substr(inicio,1,2))*60)+val(substr(inicio,3,2)) acaba=(val(substr(final,1,2))*60)+val(substr(final,3,2)) totales=acaba-empieza sonminutos=mod(totales,60) if val(substr(inicio,3,2))<=val(substr(final,3,2)) sonhoras=val(substr(final,1,2))-val(substr(inicio,1,2)) else sonhoras=(val(substr(final,1,2))-val(substr(inicio,1,2)))-1 endif sontotal=padl(alltrim(str(sonhoras,2)),2,'0')+padl(alltrim(str(sonminutos,2)),2,'0') return sontotal espero te sirva... | |