isCOBOL Evolve : Appendices : Library Routines : P$ : P$SETPEN
P$SETPEN
The P$SETPEN library routine sets the style, width and color of the pen.
Syntax
 CALL "P$SETPEN" USING  style 
                       [width]
                       [color]
Parameters
style
any numeric data item
Specifies the pen style.
Possible values are:
0 -> solid
1 -> dash
2 -> dot
3 -> dashdot
4 -> dashdotdot
5 -> null
width
any numeric data item
Optional. Width of the pen in logical units.
color
PIC X(n)
Optional. Specifies the color name.
Possible values are:
"Black"
"Dark Blue"
"Dark Green"
"Dark Cyan"
"Dark Red"
"Dark Magenta"
"Brown"
"Dark Gray"
"Light Gray"
"Blue"
"Green"
"Cyan"
"Red"
"Magenta"
"Yellow"
"White"