Ajuda do LibreOffice 24.8
Devolve a data como estrutura UNO com.sun.star.util.Date.
CDateToUnoDate(aDate)
com.sun.star.util.Date
aDate: data a converter
Sub ExampleCDateToUnoDate
aDatabaseRow.updateDate(3, CDateToUnoDate(Now))
aDateControl.Date = CDateToUnoDate(Now)
End Sub