Example 2

Operation: Specify character translation for certain characters not available on an IBM® 3767 Communication Terminal with an EBCDIC keyboard.

Known:

Your terminal supports the character translation facility, and you are using the default translation table or a previously specified translation table (that you specified with the TRAN operand). You now want [ to stand for <, ] to stand for >, and ! to stand for P.

terminal char((C'[',X'4C'),(C']',X'6E'),(C'!',X'FA'))