UnicodeUntranslatablePosition (Unicode function)

Position of first Unicode character not translatable to EBCDIC

This function finds the character position of the first character in the input Unicode string that is not translatable to EBCDIC.

The UnicodeUntranslatablePosition function is available as of version 7.3 of the Sirius Mods.

Syntax

  %position = unicode:UnicodeUntranslatablePosition

%position

A numeric variable to receive either of the following:

• 0, indicating that all of the input Unicode characters are translatable to EBCDIC.
• The character position of the first character that is not translatable to EBCDIC. Position 1 is the first character in the string.

unicode

A Unicode string.

Examples

The following fragment shows a successful call of UnicodeUntranslatablePosition. The U constant function is used in the example.

    %u Unicode Initial('A€B':U)
    Print %u:UnicodeUntranslatablePosition

The result is:

    2