Page 1 of 1

peticion de funcion : nRandom()

Posted: Tue Jan 10, 2006 1:41 pm
by astursoft
Esta funcion aparece en el codigo , pero no funciona al no tener implementada totalmente seconds() .
Existe algun codigo alternativo de momento ?
Gracias

Posted: Tue Jan 10, 2006 1:53 pm
by astursoft
Me respondo yo mismo , de momento hice esto :

Code: Select all


Function segundos()
local ctime:= Time()
Return ( (3600* val( SUBSTR(cTIME, 1, 2) ) )+ (60* val( SUBSTR(cTIME, 4, 2))    )  +   val(SUBSTR(cTIME, 7, 2)) )

parece que puede servir mientras disponemos de seconds().