To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=103021
Issue #|103021
Summary|Throw IllegalArgumentException if set Propertyvalues t
|o NumberingRule
Component|Word processor
Version|OOO310m13
Platform|All
URL|
OS/Version|All
Status|NEW
Status whiteboard|
Keywords|
Resolution|
Issue type|PATCH
Priority|P3
Subcomponent|programming
Assigned to|writerneedsconfirm
Reported by|pflin
------- Additional comments from pf...@openoffice.org Tue Jun 23 03:48:31 +0000
2009 -------
Step to reproduce:
1. run the following Basic macro in Writer:
Sub Main
oNumberingStyles =
Thiscomponent.getStyleFamilies().getByName("NumberingStyles")
If oNumberingStyles.hasByName("List 1") Then
oNumberingStyle = oNumberingStyles.getByName("List 1")
oNumberingRules = oNumberingStyle.NumberingRules
oPropertyValues = oNumberingRules.getByIndex(0)
nCount = Ubound( oPropertyValues )
for i=0 to nCount-1
if oPropertyValues(i).Name = "BulletId" then
msgbox "The bullet Id is: " &
oPropertyValues(i).Value & ", And greater than
0xff "
end if
next i
oNumberingRules.replaceByIndex( 0, oPropertyValues )
oNumberingStyle.NumberingRules = oNumberingRules
End If
End Sub
2. It will throw IllegalArgumentException
---------------------------------------------------------------------
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: issues-unsubscr...@sw.openoffice.org
For additional commands, e-mail: issues-h...@sw.openoffice.org
---------------------------------------------------------------------
To unsubscribe, e-mail: allbugs-unsubscr...@openoffice.org
For additional commands, e-mail: allbugs-h...@openoffice.org
