*TRANSLATE (operand	,		LOWER		)
			UPPER

フォーマット／長さ：operand と同じ。

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

• 関数

• 制限

• 構文説明

• 例

---

関数

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

*TRANSLATE は、フォーマット A、U、または B のオペランドが許可されるステートメントの任意の位置にオペランドとして指定できます。

制限

システム関数 *TRANSLATE を使用する場合、以下の制限が適用されます。

• *TRANSLATE をターゲット変数が予期される位置に使用しないでください。

• *TRANSLATE は、システム関数でネストすることはできません。

構文説明

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

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

構文要素の説明：

構文要素	説明
*TRANSLATE (operand,LOWER)	小文字変換 キーワード LOWER が 2 番目の引数として使用される場合、operand の文字列は小文字に変換されます。
*TRANSLATE (operand,UPPER)	大文字変換 キーワード UPPER が 2 番目の引数として使用される場合、operand の文字列は大文字に変換されます。

例

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 !§$%&/()=?