Thanks but I have to evaluate in printer time, because no all pages with graphics have to print to laser color.

A need to know how detect page change in a CR Report.

Thanks,
José Luis.

>I have not tested this but if may be possible to include a function in a report variable which will execute
>
>

>if not empty(cursor.graphicsfield)
>  lcprinter = getprinter()
>  set printer to name (lcPrinter)
>else
>  set printer to name laser
>endif
>
>

>
>Glenn
>
>>I have a report with a lot of pages.
>>
>>This report is printed in a Laser printer, but some pages have graphics I need to send to a laser color printer.
>>
>>Can I detect when a page contain a coloured graphic and send this page to the laser color printer?
>>
>>How?
>>
>>Thanks
>>José Luis.