ODAC
Provides a date portion of the datetime value.
TOraTimeStamp
procedure GetDate(var Year: smallint; var Month: byte; var Day: byte);
Call the GetDate method to get a date (year, month, day) portion of the datetime value.