Xailer & OZ Software

Saludos a todos...
Tal vez una pregunta tonta pero nunca trabaje hasta hoy con las variables DateTime y mi pregunta es como puedo Extraer solo el DATE o el TIME de una variable DATETIME de forma directa. Alguna funcion? o tengo que hacerme una? Lo cual no quiero ya que es tedioso y facil pero quiero usar un metodo directo si existe. Gracias....
Aparte les recomiendo este articulo de Rene que me ayudo mucho con este tipo de variables...
http://objetopersistente.blogspot.com/2 ... s-de-datos -datetime-en-xharbour.html
Gracias Rene !!!

Para extraer la Fecha es Directo, es decir, haz las operaciones necesarias de fecha como si una DATE directamente se tratase
En cambio para la Hora....Espero te sirva de algo..

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* F U N C I O N: GetHoraFromDateTime(<dDateTime>) --> <cHora>
* DESCRIPCION : Regresa sólo la hora (hh:mm:ss) del DateTime pasado
* PARAMETROS : <dDateTime> = DateTime a tratar.
* DEVUELVE : <cHora> = Cadena con la hora en el fotmato hh:mm:ss
* E J E M P L O: GetHoraFromDateTime( DateTime() ) => "22:08:45"
*
FUNCTION GetHoraFromDateTime(dDateTime) // --> cHora
LOCAL cTime
IF ! HB_IsDateTime(dDateTime)
OutDebug("GetHoraFromDateTime(dDateTime): Error en Parámetro, se esperaba DateTime")
RETURN("")
ENDIF
cTime := TtoS(dDateTime)
RETURN(SubStr(cTime, 9, 2) + ":" + SubStr(cTime, 11, 2) + ":" + SubStr(cTime, 13, 2))
*
* FIN GetHoraFromDateTime()
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

Saludos !!
Israel

Gracias Israel !!!
Yo lo llegue a hacer asi:
Function ExtractTime( dtValue )
Local cTime := "00:00:00"
If !Empty( dtValue )
cTime := SubStr( ToS( dtValue ), 12, 8 )
EndIf
Return cTime