Changing Output Translate Table Values
Related Topics
The Output Translate Table can be used to allow the display of non-English characters when your terminal's codepage is not supported by the Code Debug CICS global NLS parameter. It is also useful when there is a mismatch between a listing's codepage and your terminal codepage. The following example shows how C-language programmers can display open and close brackets within a listing that was compiled with codepage 1047, when their terminal codepage is 037. We will change the listing's bracket positions in this table (x'AD' and x'BD' for IBM-1047 codepage) to the bracket values of your terminal's codepage (x'BA' and x'BB', for IBM-037 codepage, respectively).
- Start with a display of our C-language demo program CWDEMC on the 2.L screen. Type UP MAX on the command line and press Enter. Type FIND eibtime on the command line, and press Enter. Eibtime has left and right brackets on it. Note that those brackets don't display as brackets on your terminal.
Code Debug for CICS - Source Listing Screen (2.L)
COMMAND ===> SCROLL ===> CSR
MODULE: CWDEMC CSECT: CWDEMC COMPILED: 11 OCT 2007 - 16:33:29
------ --------------------------------------------------------------------->
000063 | typedef struct {
000064 | unsigned char eibtime Ý4¨ ;
000065 | unsigned char eibdate Ý4¨ ;
000066 | unsigned char eibtrnid Ý4¨ ;
000067 | unsigned char eibtaskn Ý4¨ ;
000068 | unsigned char eibtrmid Ý4¨ ;
000069 | signed short int eibfil01 ;
000070 | signed short int eibcposn ;
000071 | signed short int eibcalen ;
000072 | unsigned char eibaid ;
000073 | unsigned char eibfn Ý2¨ ;
000074 | unsigned char eibrcode Ý6¨ ;
000075 | unsigned char eibds Ý8¨ ;
000076 | unsigned char eibreqid Ý8¨ ;
000077 | unsigned char eibrsrce Ý8¨ ;
------------------------------- P F K E Y S -------------------------------
F1 =HELP F2 =RUNTO F3 =END F4 =EXIT F5 =RFIND F6 =LOCATE *
F7 =UP F8 =DOWN F9 =GO 1 F10=LEFT F11=RIGHT F12=GO
F13=MENU F14=MEMORY F15=SELECT F16=WS F17=TRACE F18=LAST3270
F19=UP MAX F20=DOWN MAX F21=FILE F22=DLEFT F23=DRIGHT F24=RETRIEVE
2. Type =0.3 on the command line to go to the Output Translate Table. Go to the "AD" vertical hex spot found on the X80-XBF line, overtype the A (found on the top line) with a B, and the D (on the bottom line) with an A and press Enter. You have now replaced the X'AD' with X'BA'.
3. Go to the "BD" vertical hex spot also found on the X80-XBF line and leave the B (top line) as is, and overtype the D (bottom line) with a B and press Enter. You have now replaced the X'BD' with X'BB'.
Code Debug for CICS - Output Translate Table Screen (0.3) after changing X'AD' and X'BD'
COMMAND ===>
MODULE: CWDEMC CSECT: CWDEMC COMPILED: 11 OCT 2007 - 16:33:29
................ ................ ................ ................
X00 - X3F 4444444444444444 4444444444444444 4444444444444444 4444444444444444
BBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBB
âäàáãåçñ¢.<(+| &éêëèíîïìß!$*);¬ -/ÂÄÀÁÃÅÇѦ,%_>? øÉÊËÈÍÎÏÌ`:#@'="
X40 - X7F 4444444444444444 5555555555555555 6666666666666666 7777777777777777
0123456789ABCDEF 0123456789ABCDEF 0123456789ABCDEF 0123456789ABCDEF
Ruler: 0...4...8...C... 0...4...8...C... 0...4...8...C... 0...4...8...C...
Øabcdefghi«»ðýþ± °jklmnopqrªºæ¸Æ¤ μ~stuvwxyz¡¿Ð[Þ® ^£¥·©§¶¼½¾[]¯]´×
X80 - XBF 8888888888888888 9999999999999999 AAAAAAAAAAAAABAA BBBBBBBBBBBBBBBB
0123456789ABCDEF 0123456789ABCDEF 0123456789ABCAEF 0123456789ABCBEF
{ABCDEFGHI-ôöòóõ }JKLMNOPQR¹ûüùúÿ \÷STUVWXYZ²ÔÖÒÓÕ 0123456789³ÛÜÙÚ.
XC0 - XFF CCCCCCCCCCCCCCCC DDDDDDDDDDDDDDDD EEEEEEEEEEEEEEEE FFFFFFFFFFFFFFF4
0123456789ABCDEF 0123456789ABCDEF 0123456789ABCDEF 0123456789ABCDEB
4. Return to the Source Listing screen (2.L) to see your changes. If you aren't still positioned on the eibtime field, repeat the UP MAX and FIND eibtime commands. You should now see the brackets display as brackets.
Code Debug for CICS - Source Listing Screen (2.L) with display brackets
COMMAND ===> SCROLL ===> CSR
MODULE: CWDEMC CSECT: CWDEMC COMPILED: 11 OCT 2007 - 16:33:29
------ --------------------------------------------------------------------->
000063 | typedef struct {
000064 | unsigned char eibtime [4] ;
000065 | unsigned char eibdate [4] ;
000066 | unsigned char eibtrnid [4] ;
000067 | unsigned char eibtaskn [4] ;
000068 | unsigned char eibtrmid [4] ;
000069 | signed short int eibfil01 ;
000070 | signed short int eibcposn ;
000071 | signed short int eibcalen ;
000072 | unsigned char eibaid ;
000073 | unsigned char eibfn [2] ;
000074 | unsigned char eibrcode [6] ;
000075 | unsigned char eibds [8] ;
000076 | unsigned char eibreqid [8] ;
000077 | unsigned char eibrsrce [8] ;
------------------------------- P F K E Y S -------------------------------
F1 =HELP F2 =RUNTO F3 =END F4 =EXIT F5 =RFIND F6 =LOCATE *
F7 =UP F8 =DOWN F9 =GO 1 F10=LEFT F11=RIGHT F12=GO
F13=MENU F14=MEMORY F15=SELECT F16=WS F17=TRACE F18=LAST3270
F19=UP MAX F20=DOWN MAX F21=FILE F22=DLEFT F23=DRIGHT F24=RETRIEVE