Output Queues used for Thermal Label printing may need to be configured to use a Workstation Customising Object which has been created especially to change the code page to 850 so Cobwebb have provided one called CPPDTH1 in library CPPD, which you may use. The source for this has also been provided in file QTXTSRC in library CPPD.

This CPPDTH1 WSCST has been altered to add the following two lines:

    :DFTASCCP                                          

      ASCIICP=850. /* SET THE OUTPUT CODEPAGE TO 850 (ZPL DEFAULT) */                                       

These two lines set the default ASCII codepage to 850. Without these two lines being added, the half sign (½ ) and possibly other characters would not print.

Amend the Output Queue to use the CPPDTH1 WSCST

If you are happy to use the supplied CPPDTH1 WSCST then all you need to do is to amend the output queue to use it by setting these fields as shown:

CHGOUTQ OUTQ(OUTQLIB/OUTQ) WSCST(CPPD/CPPDTH1)

Creating a different Workstation Customising Object

If you wish to create a different Workstation Customising Object then you can use the supplied source for the CPPDTH1 object from QTXTSRC in library CPPD.

Copy the source and call is something different, make the required changes and then create a new object using the following command:

CRTWSCST WSCST(COBEXIT/CPPDTH850) SRCMBR(CPPDTH850) TEXT('Thermal Printer WSCST with CODEPAGE=850') SRCFILE(CPPD/QTXTSRC) AUT(*LIBCRTAUT) REPLACE(*YES)

Note: This creates a CPPDTH850 WSCST object in library COBEXIT from a source member CPPDTH850 in file CPPD/QTXTSRC (amend as needed).

The IBM website includes Instructions for Modifying a Workstation Customizing Object (WSCST) which might be worth reading and it includes a video.