%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