Hi
Investigating a little more I observed this:
harbour/contrib/hbwin_win.ole.c/hb_oleVariantToItem()
case VT_DATE | VT_BYREF:
hb_itemPutDL( pItem, ( long ) ( *pVariant->n1.n2.n3.pdblVal ) +
2415019 );
break;
case VT_DATE:
hb_itemPutDL( pItem, ( long ) ( pVariant->n1.n2.n3.dblVal ) +
2415019 );
break;
/* xHarbour Implementation
case VT_DATE | VT_BYREF:
hb_itemPutDTD( pItem, *pVariant->n1.n2.n3.pdblVal + (double)
2415019 );
break;
case VT_DATE:
hb_itemPutDTD( pItem, pVariant->n1.n2.n3.dblVal + (double) 2415019
);
break;
*/
And this is the point where I cannot fetch fraction
of a date-time value. xHarbour implementation requires
one more member in PHB_ITEM structure :
item.asDate.time
So I cannot implement at my own.
Any workarounds ?
Regards
Pritpal Bedi
--
View this message in context:
http://www.nabble.com/Date-Time-Functions---Revisited-tp21767870p21780477.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
