Collate Property

Sets or returns whether the Report object collates during printing.

Syntax

Print.Collate

Applies To

Print Object

Discussion

If True, the report prints collated, if your print driver supports collating. If False, the report prints in a group (that is all copies of the same page at once followed by all copies of the next page.)

Default: False

Type

Boolean

Access

Read/Write

Example

This example opens a report and prints one copy of all the data for the second graphical display only. This example includes the display title, summary category, and axis on all pages; turns on the collating option; and excludes the legend.

Sub Main()
   Dim objPPRep as Object
   Dim objRepPrt as Object
   Set objPPRep = CreateObject("CognosPowerPlay.Report")
   objPPRep.Open "C:\Cubes and Reports\Sample2.ppx"
   Set objRepPrt = objPPRep.Print
   objRepPrt.PrintAllCharts = False
   objRepPrt.SetListOfRowsToPrint objPPrep.Rows
   objRepPrt.SetListOfLayersToPrint objPPRep.Layers
   objRepPrt.SetChartToPrint objPPRep.Graphs.Item(2)
   objRepPrt.IncludeLegend = True
   objRepPrt.ChartTitleOnAllPages = True
   objRepPrt.SummariesOnAllPages = True
   objRepPrt.AxisOnAllPages = True
   objRepPrt.Collate = True
   objRepPrt.Copies = 1
   objRepPrt.PrintOut
   Set objRepPrt = Nothing
   Set objPPRep = Nothing
End Sub

Related Topics