REPLRIGHT()
 Exchanges particular characters at the end of a string
------------------------------------------------------------------------------
 Syntax
     REPLRIGHT(<cString>,<cReplacecharacter|
        nReplacecharacter>[<cSearchCharacter|
        nSearchCharacter>]) --> cString
 Arguments
     <cString>  [@]  Designates the string that is processed.
     <cReplacecharacter|nReplacecharacter>  Designates the character that
     replaces the character in <cSearchCharacter|nSearchCharacter> at the end
     of the <cString>.
     <cSearchCharacter|nSearchCharacter>  Designates the character at the
     end of <cString> that is replaced by <cReplacecharacter|
     nReplacecharacter>.  The default value is a space, CHR(32).
 Returns
     The processed <cString> is returned.
 Description
     REPLRIGHT() can be used to exchange all trailing characters in a string
     for any character you choose.
 Note
     .  The return value of this function can be suppressed by
        implementing CSETREF() to save space in working memory.
 Examples
     .  Replace the trailing spaces with dashes:
        ? REPLRIGHT("abcd  ", "-")        // "abcd--"
     .  Replace the trailing dashes with spaces:
        ? REPLRIGHT("abcd--", " ", "-")   // "abcd  "
     .  Replace only the trailing spaces:
        ? REPLRIGHT("   1  ", "-")        // "   1--"