.TEXT TO UNICODE

This subroutine transcodes a RAW alpha field to a Unicode field.

Usage:

Description:

This subroutine will transcode a RAW alpha field to a Unicode field. The first 2 parameters are required. If any required parameters are missing, the subroutine will CANCEL.

<unicode_field> is the Unicode field to receive the transcoded text (Required). This must be PASSed with Share "Y" to return the value.

<source_text> is the field containing the string to be transcoded (Required).

<encoding> identifies the encoding of the <source_text>. If not specified or a blank is PASSed, it will check the environment variable APPX_RAW_ENCODING and use that encoding. If that is not present, it will default to ISO-8859-15.

<error text> if an error occured this field contains additional error text from the Unicode library (Optional). This must be PASSed with Share "Y" to return the value.

Note: Normally this routine is not required as a simple SET from a RAW alpha to a Unicode field will automatically transcode it (using the APPX_RAW_ENCODING or the default ISO-8859-15 if not specified). If your source data is not in that encoding, then this routine can be used to transcode from the correct encoding.