To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=84918
Issue #|84918
Summary|Setting the boundfield.value of a date field is wrong
Component|Database access
Version|OOo 2.3
Platform|PC
URL|
OS/Version|Windows XP
Status|UNCONFIRMED
Status whiteboard|
Keywords|
Resolution|
Issue type|DEFECT
Priority|P3
Subcomponent|none
Assigned to|dbaneedsconfirm
Reported by|kirschbaum
------- Additional comments from [EMAIL PROTECTED] Sun Dec 30 18:51:25 +0000
2007 -------
The following macro does not work properly:
****************************************************
Sub Main
dim oDoc as object
dim oForm as object
dim oDate as object
dim sDate as string
dim iDate as integer
oDoc = ThisComponent
oForm = oDoc.DrawPage.Forms.GetByIndex(0)
oDate = oForm.getByName("datdate")
sDate = "20.12.1950"
iDate = DateSerial(mid(sDate,7),mid(sDate,4,2),left(sDate,2))
oDate.BoundField.Value = iDate
End Sub
*********************************************************
datdate is a date field in a form based on a table with the field date. The
macro sets the field "datdate" to the value "22.12.1950" instead of
"20.12.1950". If I change the last line to
"oDate.BoundField.Value = iDate - 2"
then the field is set to the right value.
I would like to attach an example database, but I don't know how.
---------------------------------------------------------------------
Please do not reply to this automatically generated notification from
Issue Tracker. Please log onto the website and enter your comments.
http://qa.openoffice.org/issue_handling/project_issues.html#notification
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
