Converts the given IANA registered name or decimal CCSID string into an equivalent IBM CCSID.
Syntax:
call "CBL_CCSID_FROM_IANA" using by reference iana
ccsid
Parameters:
| |
Using call prototype (see
Key)
|
Picture
|
|
iana
|
pic x(n)
|
pic x(n)
|
|
ccsid
|
cblt-x4-comp5
|
pic x(4) comp-5
|
On Entry:
- iana
- The IANA name whose CCSID is required, or the decimal digits representing a CCSID number. This data must be in ASCII, and
either null- or space-terminated.
On Exit:
- ccsid
- The binary CCSID equivalent of the IANA or decimal CCSID representation.
- return-code
- Indicates whether the routine was successful:
| 0
|
Success
|
| 1
|
Conversion map files not installed
|
| 2
|
Target buffer is too small for conversion
|
| 3
|
Invalid maps files installed for conversion
|
| 4
|
Out of memory
|
| 5
|
Internal error
|
| 6
|
Unable to open map file
|
| 7
|
Unable to read map file
|
| 8
|
Invalid source data for conversion
|
| 9
|
Too many installed map files for conversion
|
| 10
|
IANA name not found
|
| 11
|
COBDIR is an invalid directory name
|
| 12
|
Flags invalid for conversion
|
Comments:
The COBOL Runtime System uses the following table when converting to a CCSID value:
| IANA
|
CCSID
|
| 37
|
IBM037
|
| 273
|
IBM273
|
| 277
|
IBM277
|
| 278
|
IBM278
|
| 280
|
IBM280
|
| 284
|
IBM284
|
| 285
|
IBM285
|
| 297
|
IBM297
|
| 367
|
US-ASCII
|
| 420
|
IBM420
|
| 423
|
IBM423
|
| 424
|
IBM424
|
| 437
|
IBM437
|
| 500
|
IBM500
|
| 808
|
IBM808
|
| 813
|
ISO-8859-7
|
| 819
|
ISO-8859-1
|
| 838
|
IBM-Thai
|
| 850
|
IBM850
|
| 852
|
IBM852
|
| 855
|
IBM855
|
| 857
|
IBM857
|
| 858
|
IBM00858
|
| 862
|
IBM862
|
| 863
|
IBM863
|
| 864
|
IBM864
|
| 866
|
IBM866
|
| 867
|
IBM867
|
| 869
|
IBM869
|
| 870
|
IBM870
|
| 871
|
IBM871
|
| 872
|
IBM872
|
| 874
|
TIS-620
|
| 878
|
KOI8-R
|
| 901
|
ISO-8859-13
|
| 902
|
IBM902
|
| 904
|
IBM904
|
| 912
|
ISO-8859-2
|
| 915
|
ISO-8859-5
|
| 916
|
ISO-8859-8-I
|
| 920
|
ISO-8859-9
|
| 921
|
IBM921
|
| 922
|
IBM922
|
| 923
|
ISO-8859-15
|
| 924
|
IBM00924
|
| 932
|
Shift_JIS
|
| 943
|
Windows-31J
|
| 949
|
EUC-KR
|
| 950
|
Big5
|
| 954
|
EUC-JP
|
| 964
|
EUC-TW
|
| 970
|
EUC-KR
|
| 1004
|
Microsoft-Publish
|
| 1026
|
IBM1026
|
| 1043
|
IBM1043
|
| 1047
|
IBM1047
|
| 1051
|
hp-roman8
|
| 1089
|
ISO-8859-6
|
| 1129
|
VISCII
|
| 1140
|
IBM01140
|
| 1141
|
IBM01141
|
| 1142
|
IBM01142
|
| 1143
|
IBM01143
|
| 1144
|
IBM01144
|
| 1145
|
IBM01145
|
| 1146
|
IBM01146
|
| 1147
|
IBM01147
|
| 1148
|
IBM01148
|
| 1149
|
IBM01149
|
| 1153
|
IBM01153
|
| 1155
|
IBM01155
|
| 1160
|
IBM-Thai
|
| 1161
|
TIS-620
|
| 1162
|
TIS-620
|
| 1163
|
VISCII
|
| 1168
|
KOI8-U
|
| 1200
|
UTF-16BE
|
| 1202
|
UTF-16LE
|
| 1204
|
UTF-16
|
| 1208
|
UTF-8
|
| 1232
|
UTF-32BE
|
| 1234
|
UTF-32LE
|
| 1236
|
UTF-32
|
| 1250
|
windows-1250
|
| 1251
|
windows-1251
|
| 1252
|
windows-1252
|
| 1253
|
windows-1253
|
| 1254
|
windows-1254
|
| 1255
|
windows-1255
|
| 1256
|
windows-1256
|
| 1257
|
windows-1257
|
| 1258
|
windows-1258
|
| 1275
|
MACINTOSH
|
| 1363
|
KSC_5601
|
| 1370
|
Big5
|
| 1381
|
GB2312
|
| 1383
|
GB2312
|
| 1386
|
GBK
|
| 1392
|
GB18030
|
| 4909
|
ISO-8859-7
|
| 5039
|
Shift_JIS
|
| 5346
|
windows-1250
|
| 5347
|
windows-1251
|
| 5348
|
windows-1252
|
| 5349
|
windows-1253
|
| 5350
|
windows-1254
|
| 5351
|
windows-1255
|
| 5352
|
windows-1256
|
| 5353
|
windows-1257
|
| 5354
|
windows-1258
|
| 5488
|
GB18030
|
| 8612
|
IBM420
|
| 8616
|
IBM424
|
| 9005
|
ISO-8859-7
|
| 12712
|
IBM424
|
| 13488
|
UTF-16BE
|
| 13490
|
UTF-16LE
|
| 16840
|
IBM420
|
| 17248
|
IBM864
|
| 17584
|
UTF-16BE
|
| 17586
|
UTF-16LE
|
| 62209
|
IBM862
|
| 62210
|
ISO-8859-8
|
| 62211
|
IBM424
|
| 62213
|
IBM862
|
| 62215
|
ISO-8859-8
|
| 62218
|
IBM864
|
| 62221
|
IBM862
|
| 62222
|
ISO-8859-8
|
| 62223
|
windows-1255
|
| 62224
|
IBM420
|
| 62225
|
IBM864
|
| 62227
|
ISO-8859-6
|
| 62228
|
windows-1256
|
| 62229
|
IBM424
|
| 62231
|
IBM862
|
| 62232
|
ISO-8859-8
|
| 62233
|
IBM420
|
| 62234
|
IBM420
|
| 62235
|
IBM424
|
| 62237
|
windows-1255
|
| 62238
|
ISO-8859-8-I
|
| 62239
|
windows-1255
|
| 62240
|
IBM424
|
| 62242
|
IBM862
|
| 62243
|
ISO-8859-8-I
|
| 62244
|
windows-1255
|
| 62245
|
IBM424
|
| 62250
|
IBM420
|