%FIELDS(name{:name...})
フィールドのリストは、自由形式グループでコーディングされる入出力操作 UPDATE に対する最後の引数として指定することができます。指定されたフィールドのみが更新され、入出力バッファーに入れられます。
%FIELDS は更新するフィールドのリストを指定します。 たとえば、次のようになります。
/free chain empno record; salary = salary + 2000; status = STATEXEMPT; update record %fields(salary:status); /end-free
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.