Rational Developer for System z
Enterprise COBOL for z/OS, Version 4.1, Programming Guide


Image description: converting to UTF-8

This image shows sample code that converts Greek EBCDIC data to UTF-8. The following code is the same except that the VALUE clause in the image has 10 Greek characters where this code has 'Greek text'.

01 Greek-EBCDIC pic X(10) value 'Greek text'.
01 UnicodeString pic N(10).
01 UTF-8-String pic X(20).
    Move function National-of(Greek-EBCDIC, 00875) to UnicodeString
    Move function Display-of(UnicodeString, 01208) to UTF-8-String

End of image description.


Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)