Листовка для Xerox XDPE/400 (also known as EOMS I-Services) Support & Software

from its normal setting of X'AA' (a Logical Not Sign character in ASCII
Code Page 437) to X'1B'. The X’5F’ position has been changed so the correct translation
will occur by using the following EBCASCTBL (EBCDIC to ASCII Mapping Table) and
EBCASCTBLE (EBCDIC to ASCII Mapping Table Entry) tags.

Type (or cut and paste) the following after the :EASCCPINFO tag and before the
:EWSCST tag, which is the last tag in the WSCST source member.

 :EBCASCTBL.

  

 :EBCASCTBLE

   

    EBCDICCP = 37

    

    ASCIICP  = 437

    

    DATA =

    

 /* -0-1-2-3-4-5-6-7-8-9-A-B-C-D-E-F */

       

'2020838485A0A68687A49B2E3C282B7C'X       /* 4- */

       

'268288898AA18C8B8DE121242A293B1B'X       /* 5- */

       

'2D2F838E85A0A68F80A57C2C255F3E3F'X       /* 6- */

       

'6F9088898AA18C8B8D603A2340273D22'X       /* 7- */

       

'ED616263646566676869AEAF647900F1'X       /* 8- */

       

'F86A6B6C6D6E6F707172A6A791009200'X       /* 9- */

       

'E67E737475767778797AADA844590000'X       /* A- */

       

'5E9C9DFA001514ACAB005B5D00DB27DD'X       /* B- */

       

'7B41424344454647484900939495A2A7'X       /* C- */

       

'7D4A4B4C4D4E4F50515200968197A398'X       /* D- */

       

'5CF6535455565758595AFD939995A2DC'X       /* E- */

       

'3031323334353637383900969A97A300'X.      /* F- */

    

:EEBCASCTBL.

Note: Examples of the various Code Pages, including EBCDIC Code Page 37
(USA/Canada - CECP) and ASCII Code Page 437 (Personal Computer), can be
found in Adobe Acrobat PDF format on the IBM Code Pages web page at the
following URL:

http://www.ibm.com/servers/eserver/iseries/software/globalization/codepages.html

12.  Compile the user created workstation customization object using the OS/400 command:

CRTWSCST WSCST(XDPE214/XWSCSTBANR) SRCMBR(XWSCSTBANR)
TEXT(‘Translate escape character’) SRCFILE(XDPE214/SAMPLE)

Verify message ‘Customization object XWSCSTBANR created successfully’ is received
before moving to the next step.

      13.  Re-start the Monitor queue specifying parameter ‘workstation customizing object 

(WSCST) with user-created object XWSCSTBANR, and library XDPE214.