バージョン 6.3.3
 —  システム関数  —

*TRANSLATE - 小文字/大文字に変換

*TRANSLATE (operand

,

LOWER

)
UPPER

フォーマット/長さ:operand と同じ。

このドキュメントでは、次のトピックについて説明します。


関数

Natural システム関数 *TRANSLATE は、英字またはバイナリのオペランドの文字を大文字または小文字に変換します。 operand の内容は、修正されていません。

*TRANSLATE は、フォーマット A または B の operand が許可されるステートメントの任意の位置に operand として指定できます。 ただし、ターゲット変数が予期される位置に *TRANSLATE を使用しないでください。 *TRANSLATE は、システム関数でネストすることはできません。

Top of page

構文説明

オペランド定義テーブル:

オペランド 構文要素 フォーマット ステートメント参照 ダイナミック定義
operand C S A     A U  B                     不可

構文要素の説明:

LOWER 2 番目の引数としてキーワード LOWER を使用すると、operand を小文字に変換します。
*TRANSLATE (..., LOWER)
UPPER 2 番目の引数としてキーワード UPPER を使用すると、operand を大文字に変換します。
*TRANSLATE (..., UPPER)

Top of page

DEFINE DATA LOCAL
1 #SRC  (A)DYNAMIC INIT <'aBcDeFg !§$%&/()=?'>
1 #DEST (A)DYNAMIC
END-DEFINE
*
PRINT 'Source string to be translated:..........' #SRC
*
MOVE *TRANSLATE(#SRC, UPPER) TO #DEST
PRINT 'Source string translated into upper case:' #DEST
*
MOVE *TRANSLATE(#SRC, LOWER) TO #DEST
PRINT 'Source string translated into lower case:' #DEST
END

出力:

Source string to be translated:.......... aBcDeFg !§$%&/()=?

Source string translated into upper case: ABCDEFG !§$%&/()=?

Source string translated into lower case: abcdefg !§$%&/()=?

Top of page