To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=90289
                 Issue #|90289
                 Summary|Printing with basic
               Component|scripting
                 Version|OOo 2.4.0
                Platform|HP
                     URL|
              OS/Version|Windows XP
                  Status|NEW
       Status whiteboard|
                Keywords|
              Resolution|
              Issue type|DEFECT
                Priority|P1
            Subcomponent|code
             Assigned to|kr
             Reported by|pbd4499





------- Additional comments from [EMAIL PROTECTED] Tue Jun  3 07:50:44 +0000 
2008 -------
Since the new version 2.4.0 the printer is printing SETS. When the end-user 
fills for multiple printouts then the printer prints it till the power of 2 (2 
becomes 4 printouts, 3 becomes 9 printouts) with the code as mentioned below:

Function PrintOut(iFirstPage as string, iNextPages as string, iCopies AS Long)
  oDoc = StarDesktop.getCurrentComponent
  oDispatcher = createUnoService("com.sun.star.frame.DispatchHelper") 
  oDispatcher.executeDispatch(oDoc.getCurrentController().getFrame
(), ".uno:Printer", "", 0, Array(MakePropertyValue("Printer", "\\" + 
strStandardPrinter)))

  oPageStyle = oDoc.StyleFamilies.GetByName("PageStyles").GetByName("First 
Page") 
  oPageStyle.PrinterPaperTray = iFirstPage
  oPageStyle = oDoc.StyleFamilies.GetByName("PageStyles").GetByName("Next 
Pages") 
  oPageStyle.PrinterPaperTray = iNextPages
  Document = ThisComponent.CurrentController.Frame
  Dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
  DIM args1(2) AS new com.sun.star.beans.PropertyValue

  args1(0).Name  = "Copies"
  args1(0).Value = iCopies
  args1(2).Name  = "Collate"
  args1(2).Value = false
  dispatcher.executeDispatch(Document, ".uno:Print", "", 0, args1())
End Function

=> iCopies will be ^2 in result for printouts. Previous versions, older than 
2.4.0 were working properly with this code.

---------------------------------------------------------------------
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]

Reply via email to