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 |