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).