call "PC_PRINTER_SET_FONT" using printer-handle
font-family-name
by value font-size
by value font-style
returning status-code
01 cblt-printer-name typedef.
03 cblte-pn-name-length cblt-x2-comp5. *> pic x(2) comp-5.
03 cblte-pn-name cblt-x1. *> Occurs depending on
*> cblte-pn-name-length. pic x(n).
| printer-handle | The printer handle returned when the printer was opened. |
| name-len | The length of the font family name. |
| name-text | The family name of the font to be used (for example, Courier, Helvetica, Times, Symbol, Times New Roman, Roman, and so on). |
| font-size | Point size of font. |
| font-style | Set of bits defining the required font style:
All remaining bits are reserved for future use and should not be set. |
| status-code | Printer Handling Routines Return Codes |