*TRANSLATE ( operand
|
, | LOWER
|
)
|
||||
UPPER
|
フォーマット/長さ:operand と同じ。
このドキュメントでは、次のトピックについて説明します。
Natural システム関数 *TRANSLATE
は、英字またはバイナリのオペランドの文字を大文字または小文字に変換します。 operand の内容は、修正されていません。
*TRANSLATE
は、フォーマット A または B の operand が許可されるステートメントの任意の位置に operand として指定できます。 ただし、ターゲット変数が予期される位置に *TRANSLATE
を使用しないでください。 *TRANSLATE
は、システム関数でネストすることはできません。
オペランド | 構文要素 | フォーマット | ステートメント参照 | ダイナミック定義 | ||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
operand | C | S | A | A | U | B | 可 | 不可 |
構文要素の説明:
LOWER | 2 番目の引数としてキーワード LOWER を使用すると、operand を小文字に変換します。 *TRANSLATE (..., LOWER) |
---|---|
UPPER | 2 番目の引数としてキーワード UPPER を使用すると、operand を大文字に変換します。 *TRANSLATE (..., UPPER) |
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 !§$%&/()=?