PC_PRINTER_DRAW_RECTANGLE

Draws an outline or filled rectangle at position start-x, start-y to end-x, end-y.

Restriction: This routine is not currently supported on UNIX platforms.

Syntax:

call "PC_PRINTER_DRAW_RECTANGLE" using 
                                 printer-handle
                                 by value draw-rectangle-options
                                 by value box-style
                                 by value start-x
                                 by value start-y
                                 by value end-x
                                 by value end-y
end-call

Parameters:

	Using call prototype (see Key)	Picture
`printer-handle`	cblt-x4-comp5	pic x(4) comp-5
`draw-rectangle-options`	cblt-x4-comp5	pic x(4) comp-5
`box-style`	cblt-x4-comp5	pic x(4) comp-5
`start-x`, `start-y`	cblt-x4-comp5	pic x(4) comp-5
`end-x`, `end-y`	cblt-x4-comp5	pic x(4) comp-5

On Entry:

printer-handle

The printer handle returned when the printer was opened; see PC_PRINTER_OPEN.

draw-rectangle-options

The options to apply to the rectangle. The valid options are:

Value	Meaning
0	Use logical units of measurement

box-style

The style of rectangle to be drawn.

Value	Meaning
0	outline
1	filled

start-x, start-y

The starting point of the rectangle along the x-axis and y-axis.

end-x, end-y

The ending point of the rectangle along the x-axis and y-axis.

On Exit:

status-code

Printer Handling Routines Return Codes

Comments:

Drawing the resulting rectangle does not change the logical position on the page used by other printer routines.

Use PC_PRINTER_SET_PEN to set the color used to draw and fill the rectangle. If box-style is set to 1 (filled) and PC_PRINTER_SET_PEN is not set, the box is filled solid black.