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.