%EDITW (編集語を使用する編集値)

%EDITW(numeric : editword)

この関数は、編集語に従って編集された数値を表す文字結果を戻します。数値および編集語の規則は、出力仕様で数値を編集する場合の規則と同一です。

浮動式は 1 番目のパラメーターでは使用できません。 %DEC を使用して、浮動形式を編集可能形式に変換します。

編集語は文字定数でなければなりません。

詳細については、変換命令または組み込み関数を参照してください。

図 1. %EDITW の例

 *..1....+....2....+....3....+....4....+....5....+....6....+....7...+....
D*Name++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++
D amount          S             30A
D salary          S              9P 2
D editwd          C                    '$ ,   ,  **Dollars&  &Cents'

 * If the value of salary is 2451.53, then the edited version of
 * (salary * 12) is '$***29,418*Dollars 36 Cents'. The value of
 * amount is 'The annual salary is $***29,418*Dollars 36 Cents'.

 /FREE
   amount = 'The annual salary is '
                 + %editw(salary * 12 : editwd);
 /END-FREE