call "PC_PRINTER_DEFAULT_FONT" using 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).
cblte-pn-name-len | The length of the font family name. |
cblte-pn-name | 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. If the point size is zero the font is reset to the system defaults. |
font-style | The font-style set:
All remaining bits are reserved for future use and should not be set. |
status-code | Printer Handling Routines Return Codes |
Comments:
Default parameters are not validated until the default printer is opened.