OK, so I found a sneaky way of adding a new conversion table to Unicode
Services to match TCPIP.STANDARD.TCPXLBIN. Thanks again to Mark and John
for getting me started..
1) Unless you want to modify SYS1.SCUNTBL, create a new PDS: HLQ.SCUNTBL
with RECFM=F,LRECL=256,BLKSIZE=256
2) I wanted to create a new conversion from IBM-850 <-> IBM-037. Looking
these up in the manual, their two-character codes are EB (850) and AA (037).
For my new conversion, I'll use the conversion technique code "2".
If you look at TCPIP.STANDARD.TCPXLBIN, you will see that it has three
records -
1) a comment
2) the 256-byte ASCII->EBCDIC table
3) the 256-byte EBCDIC->ASCII table
a) create a new member CUN2EBAA (850->037, TECH=2)
copy the first non-comment record from TCPIP.STANDARD.TCPXLBIN into
this member
b) create another new member CUN2AAEB (037->850, TECH=2)
copy the second non-comment record from TCPIP.STANDARD.TCPXLBIN into
this member
3) To activate your new conversion tables:
setuni add,from(037),to(850),TECH(2),DSN(HLQ.SCUNTBL)
setuni add,from(850),to(037),TECH(2),DSN(HLQ.SCUNTBL)
(You would also want to update PARMLIB(CUNUNIxx) to include these add
statements)
4) verify with iconv that it works. We have a simple utility in Co:Z that
will display single byte translate tables:
> *showtrtab -s IBM-850 -t IBM-037 -q 2*
00: 00 01 02 03 37 2D 2E 2F 16 05 25 0B 0C 0D 0E 0F
10: 10 11 12 13 3C 3D 32 26 18 19 3F 27 22 1D 35 1F
20: 40 5A 7F 7B 5B 6C 50 7D 4D 5D 5C 4E 6B 60 4B 61
30: F0 F1 F2 F3 F4 F5 F6 F7 F8 F9 7A 5E 4C 7E 6E 6F
40: 7C C1 C2 C3 C4 C5 C6 C7 C8 C9 D1 D2 D3 D4 D5 D6
50: D7 D8 D9 E2 E3 E4 E5 E6 E7 E8 E9 AD E0 BD 5F 6D
60: 79 81 82 83 84 85 86 87 88 89 91 92 93 94 95 96
70: 97 98 99 A2 A3 A4 A5 A6 A7 A8 A9 C0 4F D0 A1 07
80: 00 01 02 03 37 2D 2E 2F 16 05 25 0B 0C 0D 0E 0F
90: 10 11 12 13 3C 3D 32 26 18 19 3F 27 22 1D 35 1F
A0: 40 5A 7F 7B 5B 6C 50 7D 4D 5D 5C 4E 6B 60 4B 61
B0: F0 F1 F2 F3 F4 F5 F6 F7 F8 F9 7A 5E 4C 7E 6E 6F
C0: 7C C1 C2 C3 C4 C5 C6 C7 C8 C9 D1 D2 D3 D4 D5 D6
D0: D7 D8 D9 E2 E3 E4 E5 E6 E7 E8 E9 AD E0 BD 5F 6D
E0: 79 81 82 83 84 85 86 87 88 89 91 92 93 94 95 96
F0: 97 98 99 A2 A3 A4 A5 A6 A7 A8 A9 C0 4F D0 A1 07
On Wed, Feb 1, 2012 at 2:02 PM, Kirk Wolf <k...@dovetail.com> wrote:
> Thanks to everyone for your kind suggestions, especially John McKown who
> responded offline.
>
> It is possible to build your own Unicode Services tables to match the
> TCPIP "STANDARD" table, but I am surprised that there isn't a Unicode
> Services table that matches STANDARD. If anyone knows of one, please let
> me know. (I can build my own, but we have customers that would like this,
> and modifying z/OS Unicode Services is a little intimidating).
>
> Thanks again,
> Kirk Wolf
> Dovetailed Technologies
> http://dovetail.com
>
>
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
